Imported Upstream version 2.6.1
[debian/amanda] / server-src / amtape.c
index 3465e7ffdb958923e3f4c6b59a087b59d3632975..365c1af73bd0c04b9c21e205ec8ab05a4b10cae9 100644 (file)
  * 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);
 }