X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=server-src%2Famtape.c;h=365c1af73bd0c04b9c21e205ec8ab05a4b10cae9;hb=c489fc6ad53e4658722b7f63fb40edc6f53c57a9;hp=3465e7ffdb958923e3f4c6b59a087b59d3632975;hpb=bde83ad58d800ae004caccab6531234272181da2;p=debian%2Famanda

diff --git a/server-src/amtape.c b/server-src/amtape.c
index 3465e7f..365c1af 100644
--- a/server-src/amtape.c
+++ b/server-src/amtape.c
@@ -24,161 +24,161 @@
  * file named AUTHORS, in the root directory of this distribution.
  */
 /*
- * $Id: amtape.c,v 1.22.2.6.4.5.2.4.2.1 2005/09/20 21:31:52 jrjackson Exp $
+ * $Id: amtape.c,v 1.47 2006/07/25 18:27:57 martinea Exp $
  *
  * tape changer interface program
  */
 #include "amanda.h"
 #include "conffile.h"
 #include "tapefile.h"
-#include "tapeio.h"
+#include "taperscan.h"
 #include "clock.h"
 #include "changer.h"
 #include "version.h"
+#include "device.h"
+#include "timestamp.h"
 
 /* local functions */
-void usage P((void));
-int main P((int argc, char **argv));
-void reset_changer P((int argc, char **argv));
-void eject_tape P((int argc, char **argv));
-void clean_tape P((int argc, char **argv));
-void load_slot P((int argc, char **argv));
-void load_label P((int argc, char **argv));
-void show_slots P((int argc, char **argv));
-void show_current P((int argc, char **argv));
-void taper_scan P((int argc, char **argv));
-void show_device P((int argc, char **argv));
-int scan_init P((int rc, int ns, int bk));
-int loadlabel_slot P((int rc, char *slotstr, char *device));
-int show_init P((int rc, int ns, int bk));
-int show_init_all P((int rc, int ns, int bk));
-int show_init_current P((int rc, int ns, int bk));
-int show_slot P((int rc, char *slotstr, char *device));
-int taperscan_slot P((int rc, char *slotstr, char *device));
-int update_one_slot P((int rc, char *slotstr, char *device));
-void update_labeldb P((int argc, char **argv));
-
-void usage()
+static void usage(void);
+int main(int argc, char **argv);
+static void reset_changer(int argc, char **argv);
+static void eject_tape(int argc, char **argv);
+static void clean_tape(int argc, char **argv);
+static void load_slot(int argc, char **argv);
+static void load_label(int argc, char **argv);
+static void show_slots(int argc, char **argv);
+static void show_current(int argc, char **argv);
+static void amtape_taper_scan(int argc, char **argv);
+static void show_device(int argc, char **argv);
+static int loadlabel_slot(void *ud, int rc, char *slotstr, char *device);
+int show_init(void *ud, int rc, int ns, int bk, int s);
+static int show_slots_slot(void *ud, int rc, char *slotstr, char *device);
+
+static const struct {
+    const char *name;
+    void (*fn)(int, char **);
+    const char *usage;
+} cmdtab[] = {
+    { "reset", reset_changer,
+	T_("reset                Reset changer to known state") },
+    { "eject", eject_tape,
+	T_("eject                Eject current tape from drive") },
+    { "clean", clean_tape,
+	T_("clean                Clean the drive") },
+    { "show", show_slots,
+	T_("show                 Show contents of all slots") },
+    { "current", show_current,
+	T_("current              Show contents of current slot") },
+    { "slot" , load_slot,
+	T_("slot <slot #>        load tape from slot <slot #>") },
+    { "slot" , load_slot,
+	T_("slot current         load tape from current slot") },
+    { "slot" , load_slot,
+	T_("slot next            load tape from next slot") },
+    { "slot" , load_slot,
+	T_("slot advance         advance to next slot but do not load") },
+    { "slot" , load_slot,
+	T_("slot first           load tape from first slot") },
+    { "label", load_label,
+	T_("label <label>        find and load labeled tape") },
+    { "taper", amtape_taper_scan,
+	T_("taper                perform taper's scan alg.") },
+    { "device", show_device,
+	T_("device               show current tape device") },
+    { "update", show_slots,
+	T_("update               update the label matchingdatabase")},
+};
+#define	NCMDS	(int)(sizeof(cmdtab) / sizeof(cmdtab[0]))
+
+static void
+usage(void)
 {
-    fprintf(stderr, "Usage: amtape%s <conf> <command>\n", versionsuffix());
-    fprintf(stderr, "\tValid commands are:\n");
-    fprintf(stderr, "\t\treset                Reset changer to known state\n");
-    fprintf(stderr, "\t\teject                Eject current tape from drive\n");
-    fprintf(stderr, "\t\tclean                Clean the drive\n");
-    fprintf(stderr, "\t\tshow                 Show contents of all slots\n");
-    fprintf(stderr, "\t\tcurrent              Show contents of current slot\n");
-    fprintf(stderr, "\t\tslot <slot #>        load tape from slot <slot #>\n");
-    fprintf(stderr, "\t\tslot current         load tape from current slot\n");
-    fprintf(stderr, "\t\tslot prev            load tape from previous slot\n");
-    fprintf(stderr, "\t\tslot next            load tape from next slot\n");
-    fprintf(stderr, "\t\tslot advance         advance to next slot but do not load\n");
-    fprintf(stderr, "\t\tslot first           load tape from first slot\n");
-    fprintf(stderr, "\t\tslot last            load tape from last slot\n");
-    fprintf(stderr, "\t\tlabel <label>        find and load labeled tape\n");
-    fprintf(stderr, "\t\ttaper                perform taper's scan alg.\n");
-    fprintf(stderr, "\t\tdevice               show current tape device\n");
-    fprintf(stderr, "\t\tupdate               update the label matchingdatabase\n");
+    int i;
 
+    g_fprintf(stderr, _("Usage: amtape%s <conf> <command> {<args>} [-o configoption]*\n"), versionsuffix());
+    g_fprintf(stderr, _("\tValid commands are:\n"));
+    for (i = 0; i < NCMDS; i++)
+	g_fprintf(stderr, "\t\t%s\n", _(cmdtab[i].usage));
     exit(1);
 }
 
-int main(argc, argv)
-int argc;
-char **argv;
+int
+main(
+    int		argc,
+    char **	argv)
 {
-    char *conffile;
     char *conf_tapelist;
-    char *argv0 = argv[0];
-    unsigned long malloc_hist_1, malloc_size_1;
-    unsigned long malloc_hist_2, malloc_size_2;
+    int i;
     int have_changer;
-    uid_t uid_me;
-    uid_t uid_dumpuser;
-    char *dumpuser;
-    struct passwd *pw;
+    config_overwrites_t *cfg_ovr = NULL;
+
+    /*
+     * Configure program for internationalization:
+     *   1) Only set the message locale for now.
+     *   2) Set textdomain for all amanda related programs to "amanda"
+     *      We don't want to be forced to support dozens of message catalogs.
+     */  
+    setlocale(LC_MESSAGES, "C");
+    textdomain("amanda"); 
 
     safe_fd(-1, 0);
     safe_cd();
 
     set_pname("amtape");
-    dbopen();
 
-    malloc_size_1 = malloc_inuse(&malloc_hist_1);
+    /* Don't die when child closes pipe */
+    signal(SIGPIPE, SIG_IGN);
+
+    dbopen(DBG_SUBDIR_SERVER);
 
     erroutput_type = ERR_INTERACTIVE;
 
+    cfg_ovr = extract_commandline_config_overwrites(&argc, &argv);
     if(argc < 3) usage();
 
-    config_name = argv[1];
+    config_init(CONFIG_INIT_EXPLICIT_NAME, argv[1]);
+    apply_config_overwrites(cfg_ovr);
 
-    config_dir = vstralloc(CONFIG_DIR, "/", config_name, "/", NULL);
-    conffile = stralloc2(config_dir, CONFFILE_NAME);
-    if (read_conffile(conffile)) {
-	error("errors processing config file \"%s\"", conffile);
-    }
-    conf_tapelist = getconf_str(CNF_TAPELIST);
-    if (*conf_tapelist == '/') {
-	conf_tapelist = stralloc(conf_tapelist);
-    } else {
-	conf_tapelist = stralloc2(config_dir, conf_tapelist);
-    }
-    if (read_tapelist(conf_tapelist)) {
-	error("could not load tapelist \"%s\"", conf_tapelist);
+    if (config_errors(NULL) >= CFGERR_WARNINGS) {
+	config_print_errors();
+	if (config_errors(NULL) >= CFGERR_ERRORS) {
+	    g_critical(_("errors processing config file"));
+	}
     }
-    amfree(conf_tapelist);
 
-    uid_me = getuid();
-    uid_dumpuser = uid_me;
-    dumpuser = getconf_str(CNF_DUMPUSER);
+    check_running_as(RUNNING_AS_DUMPUSER);
 
-    if ((pw = getpwnam(dumpuser)) == NULL) {
-	error("cannot look up dump user \"%s\"", dumpuser);
-	/* NOTREACHED */
-    }
-    uid_dumpuser = pw->pw_uid;
-    if ((pw = getpwuid(uid_me)) == NULL) {
-	error("cannot look up my own uid %ld", (long)uid_me);
-	/* NOTREACHED */
-    }
-    if (uid_me != uid_dumpuser) {
-	error("running as user \"%s\" instead of \"%s\"",
-	      pw->pw_name, dumpuser);
-	/* NOTREACHED */
+    dbrename(get_config_name(), DBG_SUBDIR_SERVER);
+
+    conf_tapelist = config_dir_relative(getconf_str(CNF_TAPELIST));
+    if (read_tapelist(conf_tapelist)) {
+	error(_("could not load tapelist \"%s\""), conf_tapelist);
+	/*NOTREACHED*/
     }
+    amfree(conf_tapelist);
 
     if((have_changer = changer_init()) == 0) {
-	error("no tpchanger specified in \"%s\"", conffile);
+	error(_("no tpchanger specified in \"%s\""), get_config_filename());
+	/*NOTREACHED*/
     } else if (have_changer != 1) {
-	error("changer initialization failed: %s", strerror(errno));
+	error(_("changer initialization failed: %s"), strerror(errno));
+	/*NOTREACHED*/
     }
 
     /* switch on command name */
 
     argc -= 2; argv += 2;
-    if(strcmp(argv[0], "reset") == 0) reset_changer(argc, argv);
-    else if(strcmp(argv[0], "clean") == 0) clean_tape(argc, argv);
-    else if(strcmp(argv[0], "eject") == 0) eject_tape(argc, argv);
-    else if(strcmp(argv[0], "slot") == 0) load_slot(argc, argv);
-    else if(strcmp(argv[0], "label") == 0) load_label(argc, argv);
-    else if(strcmp(argv[0], "current") == 0)  show_current(argc, argv);
-    else if(strcmp(argv[0], "show") == 0)  show_slots(argc, argv);
-    else if(strcmp(argv[0], "taper") == 0) taper_scan(argc, argv);
-    else if(strcmp(argv[0], "device") == 0) show_device(argc, argv);
-    else if(strcmp(argv[0], "update") == 0) update_labeldb(argc, argv);
-    else {
-	fprintf(stderr, "%s: unknown command \"%s\"\n", argv0, argv[0]);
+    for (i = 0; i < NCMDS; i++)
+	if (strcmp(argv[0], cmdtab[i].name) == 0) {
+	    (*cmdtab[i].fn)(argc, argv);
+	    break;
+	}
+    if (i == NCMDS) {
+	g_fprintf(stderr, _("%s: unknown command \"%s\"\n"), get_pname(), argv[0]);
 	usage();
     }
 
     amfree(changer_resultstr);
-    amfree(conffile);
-    amfree(config_dir);
-
-    malloc_size_2 = malloc_inuse(&malloc_hist_2);
-
-    if(malloc_size_1 != malloc_size_2) {
-	malloc_list(fileno(stderr), malloc_hist_1, malloc_hist_2);
-    }
 
     dbclose();
     return 0;
@@ -186,39 +186,38 @@ char **argv;
 
 /* ---------------------------- */
 
-void reset_changer(argc, argv)
-int argc;
-char **argv;
-{
+static void
+reset_changer(G_GNUC_UNUSED int	argc,
+              G_GNUC_UNUSED char ** argv) {
     char *slotstr = NULL;
 
     switch(changer_reset(&slotstr)) {
     case 0:
-	fprintf(stderr, "%s: changer is reset, slot %s is loaded.\n",
+	g_fprintf(stderr, _("%s: changer is reset, slot %s is loaded.\n"),
 		get_pname(), slotstr);
 	break;
     case 1:
-	fprintf(stderr, "%s: changer is reset, but slot %s not loaded: %s\n",
+	g_fprintf(stderr, _("%s: changer is reset, but slot %s not loaded: %s\n"),
 		get_pname(), slotstr, changer_resultstr);
 	break;
     default:
-	error("could not reset changer: %s", changer_resultstr);
+	error(_("could not reset changer: %s"), changer_resultstr);
+	/*NOTREACHED*/
     }
     amfree(slotstr);
 }
 
 
 /* ---------------------------- */
-void clean_tape(argc, argv)
-int argc;
-char **argv;
-{
+static void
+clean_tape(G_GNUC_UNUSED int	argc,
+           G_GNUC_UNUSED char ** argv) {
     char *devstr = NULL;
 
     if(changer_clean(&devstr) == 0) {
-	fprintf(stderr, "%s: device %s is clean.\n", get_pname(), devstr);
+	g_fprintf(stderr, _("%s: device %s is clean.\n"), get_pname(), devstr);
     } else {
-	fprintf(stderr, "%s: device %s not clean: %s\n",
+	g_fprintf(stderr, _("%s: device %s not clean: %s\n"),
 		get_pname(), devstr ? devstr : "??", changer_resultstr);
     }
     amfree(devstr);
@@ -226,16 +225,15 @@ char **argv;
 
 
 /* ---------------------------- */
-void eject_tape(argc, argv)
-int argc;
-char **argv;
-{
+static void
+eject_tape(G_GNUC_UNUSED int	argc,
+           G_GNUC_UNUSED char ** argv) {
     char *slotstr = NULL;
 
     if(changer_eject(&slotstr) == 0) {
-	fprintf(stderr, "%s: slot %s is ejected.\n", get_pname(), slotstr);
+	g_fprintf(stderr, _("%s: slot %3s is ejected.\n"), get_pname(), slotstr);
     } else {
-	fprintf(stderr, "%s: slot %s not ejected: %s\n",
+	g_fprintf(stderr, _("%s: slot %3s not ejected: %s\n"),
 		get_pname(), slotstr ? slotstr : "??", changer_resultstr);
     }
     amfree(slotstr);
@@ -244,32 +242,38 @@ char **argv;
 
 /* ---------------------------- */
 
-void load_slot(argc, argv)
-int argc;
-char **argv;
+static void
+load_slot(
+    int		argc,
+    char **	argv)
 {
     char *slotstr = NULL, *devicename = NULL;
-    char *errstr;
-    int is_advance;
+    Device * device;
 
     if(argc != 2)
 	usage();
 
-    is_advance = (strcmp(argv[1], "advance") == 0);
-    if(changer_loadslot(argv[1], &slotstr, &devicename)) {
-	error("could not load slot %s: %s", slotstr, changer_resultstr);
+    device_api_init();
+
+    if (strcmp(argv[1], "advance") == 0) {
+	argv[1] = "next";
     }
-    if(! is_advance && (errstr = tape_rewind(devicename)) != NULL) {
-	fprintf(stderr,
-		"%s: could not rewind %s: %s", get_pname(), devicename, errstr);
-	amfree(errstr);
+
+    if(changer_loadslot(argv[1], &slotstr, &devicename)) {
+	error(_("could not load slot %s: %s"), slotstr, changer_resultstr);
+	/*NOTREACHED*/
     }
 
-    fprintf(stderr, "%s: changed to slot %s", get_pname(), slotstr);
-    if(! is_advance) {
-	fprintf(stderr, " on %s", devicename);
+    device = device_open(devicename);
+    g_assert(device != NULL);
+    if (device->status != DEVICE_STATUS_SUCCESS) {
+	g_fprintf(stderr,
+		_("%s: could not open device %s: %s"), get_pname(),
+		devicename, device_error(device));
     }
-    fputc('\n', stderr);
+    g_object_unref(device);
+
+    g_fprintf(stderr, _("%s: changed to slot %s on %s\n"), get_pname(), slotstr, devicename);
     amfree(slotstr);
     amfree(devicename);
 }
@@ -277,342 +281,257 @@ char **argv;
 
 /* ---------------------------- */
 
-int nslots, backwards, found, got_match, tapedays;
-char *datestamp;
-char *label = NULL, *first_match_label = NULL, *first_match = NULL;
-char *searchlabel, *labelstr;
-tape_t *tp;
+/* This initalizes the ChangerStatus structure for all commands that
+   use changer_find; namely, show_slots, load_label, and
+   show_current. */
+static int 
+scan_init(G_GNUC_UNUSED void * data, int rc, G_GNUC_UNUSED int numslots,
+          G_GNUC_UNUSED int backwards, G_GNUC_UNUSED int searchable) {
+    if(rc != 0) {
+	error(_("could not get changer info: %s"), changer_resultstr);
+	/*NOTREACHED*/
+    }
 
-int scan_init(rc, ns, bk)
-int rc, ns, bk;
-{
-    if(rc)
-	error("could not get changer info: %s", changer_resultstr);
+    return 0;
+}
 
-    nslots = ns;
-    backwards = bk;
+static int scan_init_print(void * data, int rc, int numslots,
+                         int backwards, int searchable) {
+    
+    g_fprintf(stderr, _("%s: scanning all %d slots in tape-changer rack:\n"),
+            get_pname(), numslots);
 
-    return 0;
+    return scan_init(data, rc, numslots, backwards, searchable);
 }
 
-int loadlabel_slot(rc, slotstr, device)
-int rc;
-char *slotstr;
-char *device;
+typedef struct {
+    gboolean found;
+    char *searchlabel;
+} LabelChangerStatus;
+
+/* This is the 'user_slot' callback for the 'load label' command. */
+static int
+loadlabel_slot(
+    void *	ud,
+    int		rc,
+    char *	slotstr,
+    char *	device_name)
 {
-    char *errstr;
-
-    if(rc > 1)
-	error("could not load slot %s: %s", slotstr, changer_resultstr);
-    else if(rc == 1)
-	fprintf(stderr, "%s: slot %s: %s\n",
+    LabelChangerStatus * status = ud;
+    Device * device;
+    DeviceStatusFlags device_status;
+
+    if (rc > 1) {
+	error(_("could not load slot %s: %s"), slotstr, changer_resultstr);
+        g_assert_not_reached();
+    } else if (rc == 1) {
+	g_fprintf(stderr, _("%s: slot %3s: %s\n"),
 		get_pname(), slotstr, changer_resultstr);
-    else if((errstr = tape_rdlabel(device, &datestamp, &label)) != NULL)
-	fprintf(stderr, "%s: slot %s: %s\n", get_pname(), slotstr, errstr);
-    else {
-	fprintf(stderr, "%s: slot %s: date %-8s label %s",
-		get_pname(), slotstr, datestamp, label);
-	if(strcmp(label, FAKE_LABEL) != 0
-	   && strcmp(label, searchlabel) != 0)
-	    fprintf(stderr, " (wrong tape)\n");
-	else {
-	    fprintf(stderr, " (exact label match)\n");
-	    if((errstr = tape_rewind(device)) != NULL) {
-		fprintf(stderr,
-			"%s: could not rewind %s: %s",
-			get_pname(), device, errstr);
-		amfree(errstr);
-	    }
-	    found = 1;
-	    amfree(datestamp);
-	    amfree(label);
-	    return 1;
-	}
+        return 0;
     }
-    amfree(datestamp);
-    amfree(label);
-    return 0;
+
+    device = device_open(device_name);
+    g_assert(device != NULL);
+    if (device->status != DEVICE_STATUS_SUCCESS) {
+        g_fprintf(stderr, _("%s: slot %3s: Could not open device: %s.\n"),
+                  get_pname(), slotstr, device_error(device));
+        return 0;
+    }
+
+    if (!device_configure(device, TRUE)) {
+        g_fprintf(stderr, _("%s: slot %3s: Could not configure device: %s.\n"),
+                  get_pname(), slotstr, device_error(device));
+        return 0;
+    }
+
+    device_status = device_read_label(device);
+    if (device_status != DEVICE_STATUS_SUCCESS) {
+        g_fprintf(stderr, _("%s: slot %3s: %s\n"),
+                  get_pname(), slotstr, device_error_or_status(device));
+        g_object_unref(device);
+        return 0;
+    }
+    
+    g_fprintf(stderr, _("%s: slot %3s: time %-14s label %s"),
+            get_pname(), slotstr, device->volume_time, device->volume_label);
+
+    if(strcmp(device->volume_label, status->searchlabel) != 0) {
+        g_fprintf(stderr, _(" (wrong tape)\n"));
+        g_object_unref(device);
+        return 0;
+    } else {
+        g_fprintf(stderr, _(" (exact label match)\n"));
+        g_object_unref(device);
+        status->found = 1;
+        return 1;
+    }
+
+    g_assert_not_reached();
 }
 
-void load_label(argc, argv)
-int argc;
-char **argv;
+/* This does the 'load label' command. */
+static void
+load_label(
+    int		argc,
+    char **	argv)
 {
+    LabelChangerStatus status;
+
     if(argc != 2)
 	usage();
+    
+    device_api_init();
 
-    searchlabel = argv[1];
+    status.searchlabel = argv[1];
 
-    fprintf(stderr, "%s: scanning for tape with label %s\n",
-	    get_pname(), searchlabel);
+    g_fprintf(stderr, _("%s: scanning for tape with label %s\n"),
+	    get_pname(), status.searchlabel);
 
-    found = 0;
+    status.found = 0;
 
-    changer_find(scan_init, loadlabel_slot, searchlabel);
+    changer_find(&status, scan_init, loadlabel_slot, status.searchlabel);
 
-    if(found)
-	fprintf(stderr, "%s: label %s is now loaded.\n",
-		get_pname(), searchlabel);
+    if(status.found)
+	g_fprintf(stderr, _("%s: label %s is now loaded.\n"),
+		get_pname(), status.searchlabel);
     else
-	fprintf(stderr, "%s: could not find label %s in tape rack.\n",
-		get_pname(), searchlabel);
+	g_fprintf(stderr, _("%s: could not find label %s in tape rack.\n"),
+		get_pname(), status.searchlabel);
 }
 
 
 /* ---------------------------- */
 
-int show_init(rc, ns, bk)
-int rc, ns, bk;
+/* This is the user_slot function for "amtape show". */
+static int
+show_slots_slot(G_GNUC_UNUSED void * data, int rc, char * slotstr,
+                char * device_name)
 {
-    if(rc)
-	error("could not get changer info: %s", changer_resultstr);
+    Device * device;
 
-    nslots = ns;
-    backwards = bk;
-    return 0;
-}
+    if(rc > 1) {
+	error(_("could not load slot %s: %s"), slotstr, changer_resultstr);
+        g_assert_not_reached();
+    }
 
-int show_init_all(rc, ns, bk)
-int rc, ns, bk;
-{
-    int ret = show_init(rc, ns, bk);
-    fprintf(stderr, "%s: scanning all %d slots in tape-changer rack:\n",
-	    get_pname(), nslots);
-    return ret;
-}
+    if(rc == 1) {
+	g_fprintf(stderr, _("slot %s: %s\n"), slotstr, changer_resultstr);
+        return 0;
+    }
 
-int show_init_current(rc, ns, bk)
-int rc, ns, bk;
-{
-    int ret = show_init(rc, ns, bk);
-    fprintf(stderr, "%s: scanning current slot in tape-changer rack:\n",
-	    get_pname());
-    return ret;
-}
+    device = device_open(device_name);
+    g_assert(device != NULL);
+    if (device->status != DEVICE_STATUS_SUCCESS) {
+        g_fprintf(stderr, _("%s: slot %3s: Could not open device: %s.\n"),
+                  get_pname(), slotstr, device_error(device));
+    } else {
+        DeviceStatusFlags device_status;
 
-int update_one_slot(rc, slotstr, device)
-int rc;
-char *slotstr, *device;
-{
-    char *errstr;
-
-    if(rc > 1)
-	error("could not load slot %s: %s", slotstr, changer_resultstr);
-    else if(rc == 1)
-	fprintf(stderr, "slot %s: %s\n", slotstr, changer_resultstr);
-    else if((errstr = tape_rdlabel(device, &datestamp, &label)) != NULL)
-	fprintf(stderr, "slot %s: %s\n", slotstr, errstr);
-    else {
-	fprintf(stderr, "slot %s: date %-8s label %s\n",
-		slotstr, datestamp, label);
-	changer_label(slotstr,label);
-    }
-    amfree(datestamp);
-    amfree(label);
-    return 0;
-}
+	if (!device_configure(device, TRUE)) {
+            g_fprintf(stderr, _("%s: slot %3s: %s\n"),
+                      get_pname(), slotstr, device_error_or_status(device));
+	}
 
-int show_slot(rc, slotstr, device)
-int rc;
-char *slotstr, *device;
-{
-    char *errstr;
-
-    if(rc > 1)
-	error("could not load slot %s: %s", slotstr, changer_resultstr);
-    else if(rc == 1)
-	fprintf(stderr, "slot %s: %s\n", slotstr, changer_resultstr);
-    else if((errstr = tape_rdlabel(device, &datestamp, &label)) != NULL)
-	fprintf(stderr, "slot %s: %s\n", slotstr, errstr);
-    else {
-	fprintf(stderr, "slot %s: date %-8s label %s\n",
-		slotstr, datestamp, label);
+	device_status = device_read_label(device);
+
+        if (device_status != DEVICE_STATUS_SUCCESS) {
+            g_fprintf(stderr, _("%s: slot %3s: %s\n"),
+                      get_pname(), slotstr, device_error_or_status(device));
+        } else {
+            g_fprintf(stderr, _("slot %3s: time %-14s label %s\n"),
+                    slotstr, device->volume_time, device->volume_label);
+
+	    /* update the changer db */
+	    changer_label(slotstr, device->volume_label);
+        }
     }
-    amfree(datestamp);
-    amfree(label);
-    return 0;
-}
 
-void show_current(argc, argv)
-int argc;
-char **argv;
-{
-    if(argc != 1)
-	usage();
+    if (device != NULL)
+        g_object_unref(device);
 
-    changer_current(show_init_current, show_slot);
+    return 0;
 }
 
-void update_labeldb(argc, argv)
-int argc;
-char **argv;
-{
+static void
+show_current(int argc, G_GNUC_UNUSED char ** argv) {
     if(argc != 1)
 	usage();
 
-    changer_scan(show_init_all, update_one_slot);
+    device_api_init();
+
+    g_fprintf(stderr, _("%s: scanning current slot in tape-changer rack:\n"),
+	    get_pname());
+    changer_current(NULL, scan_init, show_slots_slot);
 }
 
-void show_slots(argc, argv)
-int argc;
-char **argv;
-{
+static void
+show_slots(int argc, G_GNUC_UNUSED char ** argv) {
     if(argc != 1)
 	usage();
 
-    changer_scan(show_init_all, show_slot);
+    device_api_init();
+    changer_find(NULL, scan_init_print, show_slots_slot, NULL);
 }
 
 
 /* ---------------------------- */
 
-int taperscan_slot(rc, slotstr, device)
-int rc;
-char *slotstr;
-char *device;
-{
-    char *errstr;
-
-    if(rc == 2)
-	error("could not load slot %s: %s", slotstr, changer_resultstr);
-    else if(rc == 1)
-	fprintf(stderr, "%s: slot %s: %s\n",
-		get_pname(), slotstr, changer_resultstr);
-    else {
-	if((errstr = tape_rdlabel(device, &datestamp, &label)) != NULL) {
-	    fprintf(stderr, "%s: slot %s: %s\n", get_pname(), slotstr, errstr);
-	} else {
-	    /* got an amanda tape */
-	    fprintf(stderr, "%s: slot %s: date %-8s label %s",
-		    get_pname(), slotstr, datestamp, label);
-	    if(searchlabel != NULL
-	       && (strcmp(label, FAKE_LABEL) == 0
-		   || strcmp(label, searchlabel) == 0)) {
-		/* it's the one we are looking for, stop here */
-		fprintf(stderr, " (exact label match)\n");
-		found = 1;
-		amfree(datestamp);
-		amfree(label);
-		return 1;
-	    }
-	    else if(!match(labelstr, label))
-		fprintf(stderr, " (no match)\n");
-	    else {
-		/* not an exact label match, but a labelstr match */
-		/* check against tape list */
-		tp = lookup_tapelabel(label);
-		if(tp == NULL)
-		    fprintf(stderr, " (not in tapelist)\n");
-		else if(!reusable_tape(tp))
-		    fprintf(stderr, " (active tape)\n");
-		else if(got_match == 0 && tp->datestamp == 0) {
-		    got_match = 1;
-		    first_match = newstralloc(first_match, slotstr);
-		    first_match_label = newstralloc(first_match_label, label);
-		    fprintf(stderr, " (new tape)\n");
-		    found = 3;
-		    amfree(datestamp);
-		    amfree(label);
-		    return 1;
-		}
-		else if(got_match)
-		    fprintf(stderr, " (labelstr match)\n");
-		else {
-		    got_match = 1;
-		    first_match = newstralloc(first_match, slotstr);
-		    first_match_label = newstralloc(first_match_label, label);
-		    fprintf(stderr, " (first labelstr match)\n");
-		    if(!backwards || !searchlabel) {
-			found = 2;
-			amfree(datestamp);
-			amfree(label);
-			return 1;
-		    }
-		}
-	    }
-	}
-    }
-    amfree(datestamp);
-    amfree(label);
-    return 0;
-}
-
-void taper_scan(argc, argv)
-int argc;
-char **argv;
-{
-    char *slotstr = NULL, *device = NULL;
-
-    if((tp = lookup_last_reusable_tape(0)) == NULL)
-	searchlabel = NULL;
-    else
+static void
+amtape_taper_scan(G_GNUC_UNUSED int argc, G_GNUC_UNUSED char ** argv) {
+    char *label = NULL;
+    char * searchlabel;
+    tape_t * tp;
+    char *timestamp = NULL;
+    char *tapedev = NULL;
+    int result;
+
+    device_api_init();
+    
+    g_fprintf(stderr, _("%s: scanning for "), get_pname());
+
+    tp = lookup_last_reusable_tape(0);
+    if (tp == NULL) {
+        searchlabel = NULL;
+    } else {
 	searchlabel = stralloc(tp->label);
+        g_fprintf(stderr, _("tape label %s or "), searchlabel);
+    }
+    g_fprintf(stderr, _("a new tape.\n"));
 
-    tapedays	= getconf_int(CNF_TAPECYCLE);
-    labelstr	= getconf_str(CNF_LABELSTR);
-    found = 0;
-    got_match = 0;
-
-    fprintf(stderr, "%s: scanning for ", get_pname());
-    if(searchlabel) fprintf(stderr, "tape label %s or ", searchlabel);
-    fprintf(stderr, "a new tape.\n");
-
-    if (searchlabel != NULL)
-      changer_find(scan_init, taperscan_slot, searchlabel);
-    else
-      changer_scan(scan_init, taperscan_slot);
+    result = taper_scan(searchlabel, &label, &timestamp, &tapedev, NULL,
+	                FILE_taperscan_output_callback, stderr, NULL, NULL);
 
-    if(found == 3) {
-	fprintf(stderr, "%s: settling for new tape\n", get_pname());
-	searchlabel = newstralloc(searchlabel, first_match_label);
-    }
-    else if(found == 2) {
-	fprintf(stderr, "%s: %s: settling for first labelstr match\n",
-		get_pname(),
-		searchlabel? "gravity stacker": "looking only for new tape");
-	searchlabel = newstralloc(searchlabel, first_match_label);
-    }
-    else if(!found && got_match) {
-	fprintf(stderr,
-		"%s: %s not found, going back to first labelstr match %s\n",
-		get_pname(), searchlabel, first_match_label);
-	searchlabel = newstralloc(searchlabel, first_match_label);
-	if(changer_loadslot(first_match, &slotstr, &device) == 0) {
-	    found = 1;
-	} else {
-	    fprintf(stderr, "%s: could not load labelstr match in slot %s: %s\n",
-		    get_pname(), first_match, changer_resultstr);
+    if (result < 0) {
+	g_fprintf(stderr, _("Could not find a  non-active Amanda tape.\n"));
+	if (label) {
+	    g_fprintf(stderr, _("Tape with label `%s' is now loaded.\n"), label);
 	}
-	amfree(device);
-	amfree(slotstr);
-    }
-    else if(!found) {
-	fprintf(stderr, "%s: could not find ", get_pname());
-	if(searchlabel) fprintf(stderr, "tape %s or ", searchlabel);
-	fprintf(stderr, "a new tape in the tape rack.\n");
+    } else if (result == 3) {
+	g_fprintf(stderr, _("New tape loaded, it will be labelled `%s'.\n"),
+		  label);
+    } else {
+	g_fprintf(stderr, _("Tape with label `%s' is now loaded.\n"), label);
     }
 
-    if(found)
-	fprintf(stderr, "%s: label %s is now loaded.\n",
-		get_pname(), searchlabel);
-
     amfree(searchlabel);
-    amfree(first_match);
-    amfree(first_match_label);
+    amfree(label);
+    amfree(timestamp);
+    amfree(tapedev);
 }
 
 /* ---------------------------- */
 
-void show_device(argc, argv)
-int argc;
-char **argv;
-{
+static void
+show_device(G_GNUC_UNUSED int	argc,
+            G_GNUC_UNUSED char ** argv) {
     char *slot = NULL, *device = NULL;
+    
+    if(changer_loadslot(_("current"), &slot, &device)) {
+	error(_("could not load current slot: %s\n"), changer_resultstr);
+	/*NOTREACHED*/
+    }
 
-    if(changer_loadslot("current", &slot, &device))
-	error("Could not load current slot.\n");
-
-    printf("%s\n", device);
+    g_printf("%s\n", device);
     amfree(slot);
     amfree(device);
 }