]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/stored/autochanger.c
added WSACleanup(), corrected WSA_Init() (removed #ifdef)
[bacula/bacula] / bacula / src / stored / autochanger.c
index f9f269d1f4e04ae6dfe62046e8a32d26d0010b1b..5eb229500e1f648f2b10b44491ccc10739b6db65 100644 (file)
@@ -30,7 +30,8 @@
 #include "stored.h"                   /* pull in Storage Deamon headers */
 
 /* Forward referenced functions */
-static char *edit_device_codes(JCR *jcr, char *omsg, char *imsg, char *cmd);
+char *edit_device_codes(JCR *jcr, char *omsg, char *imsg, char *cmd);
+static int get_autochanger_loaded_slot(JCR *jcr);
 
 
 /*
@@ -44,12 +45,14 @@ static char *edit_device_codes(JCR *jcr, char *omsg, char *imsg, char *cmd);
  *   dir bsock.
  *
  *  Returns: 1 on success
- *          0 on failure
+ *          0 on failure (no changer available) 
+ *         -1 on error on autochanger
  */
 int autoload_device(JCR *jcr, DEVICE *dev, int writing, BSOCK *dir)
 {
    int slot = jcr->VolCatInfo.Slot;
-   int rtn_stat = 0;
+   int drive = jcr->device->drive_index;
+   int rtn_stat = -1;                /* error status */
      
    /*
     * Handle autoloaders here. If we cannot autoload it, we
@@ -63,71 +66,106 @@ int autoload_device(JCR *jcr, DEVICE *dev, int writing, BSOCK *dir)
         slot = jcr->VolCatInfo.Slot; 
       }
    }
-   Dmsg1(100, "Want changer slot=%d\n", slot);
+   Dmsg1(400, "Want changer slot=%d\n", slot);
 
    if (slot > 0 && jcr->device->changer_name && jcr->device->changer_command) {
       uint32_t timeout = jcr->device->max_changer_wait;
       POOLMEM *changer, *results;
-      int status, loaded;
+      int loaded, status;     
 
       results = get_pool_memory(PM_MESSAGE);
       changer = get_pool_memory(PM_FNAME);
 
-      /* Find out what is loaded, zero means device is unloaded */
-      Jmsg(jcr, M_INFO, 0, _("3301 Issuing autochanger \"loaded\" command.\n"));
-      changer = edit_device_codes(jcr, changer, jcr->device->changer_command, 
-                   "loaded");
-      status = run_program(changer, timeout, results);
-      Dmsg3(100, "run_prog: %s stat=%d result=%s\n", changer, status, results);
-      if (status == 0) {
-        loaded = atoi(results);
-      } else {
-         Jmsg(jcr, M_INFO, 0, _("3991 Bad autochanger \"load slot\" status=%d.\n"), status);
-        loaded = -1;              /* force unload */
-      }
-      Dmsg1(100, "loaded=%s\n", results);
+      loaded = get_autochanger_loaded_slot(jcr);
+
+      Dmsg1(400, "loaded=%s\n", results);
 
-      /* If bad status or tape we want is not loaded, load it. */
-      if (status != 0 || loaded != slot) { 
+      /* If tape we want is not loaded, load it. */
+      if (loaded != slot) { 
         offline_or_rewind_dev(dev);
         /* We are going to load a new tape, so close the device */
         force_close_dev(dev);
         if (loaded != 0) {        /* must unload drive */
-            Dmsg0(100, "Doing changer unload.\n");
-            Jmsg(jcr, M_INFO, 0, _("3302 Issuing autochanger \"unload\" command.\n"));
+            Dmsg0(400, "Doing changer unload.\n");
+           Jmsg(jcr, M_INFO, 0, 
+                 _("3303 Issuing autochanger \"unload slot %d, drive %d\" command.\n"),
+                loaded, drive);
+           jcr->VolCatInfo.Slot = loaded;   /* slot to be unloaded */
            changer = edit_device_codes(jcr, changer, 
                         jcr->device->changer_command, "unload");
            status = run_program(changer, timeout, NULL);
-            Dmsg1(100, "unload status=%d\n", status);
+            Dmsg1(400, "unload status=%d\n", status);
         }
         /*
          * Load the desired cassette    
          */
-         Dmsg1(100, "Doing changer load slot %d\n", slot);
-         Jmsg(jcr, M_INFO, 0, _("3303 Issuing autochanger \"load slot %d\" command.\n"), 
-             slot);
+         Dmsg1(400, "Doing changer load slot %d\n", slot);
+        Jmsg(jcr, M_INFO, 0, 
+              _("3304 Issuing autochanger \"load slot %d, drive %d\" command.\n"), 
+             slot, drive);
+        jcr->VolCatInfo.Slot = slot;    /* slot to be loaded */
         changer = edit_device_codes(jcr, changer, 
                       jcr->device->changer_command, "load");
         status = run_program(changer, timeout, NULL);
         if (status == 0) {
-            Jmsg(jcr, M_INFO, 0, _("3304 Autochanger \"load slot %d\" status is OK.\n"),
-                   slot);
+            Jmsg(jcr, M_INFO, 0, _("3305 Autochanger \"load slot %d, drive %d\", status is OK.\n"),
+                   slot, drive);
         } else {
-            Jmsg(jcr, M_INFO, 0, _("3992 Bad autochanger \"load slot\" status=%d.\n"),
-                   status);
+            Jmsg(jcr, M_INFO, 0, _("3992 Bad autochanger \"load slot %d, drive %d\", status=%d.\n"),
+                   slot, drive, status);
         }
-         Dmsg2(100, "load slot %d status=%d\n", slot, status);
+         Dmsg2(400, "load slot %d status=%d\n", slot, status);
+      } else { 
+        status = 0;                  /* we got what we want */
       }
       free_pool_memory(changer);
       free_pool_memory(results);
-      Dmsg1(100, "After changer, status=%d\n", status);
-      if (status == 0) {          /* did we succeed? */
-        rtn_stat = 1;             /* tape loaded by changer */
+      Dmsg1(400, "After changer, status=%d\n", status);
+      if (status == 0) {             /* did we succeed? */
+        rtn_stat = 1;                /* tape loaded by changer */
       }
+   } else {
+      rtn_stat = 0;                  /* no changer found */
    }
    return rtn_stat;
 }
 
+static int get_autochanger_loaded_slot(JCR *jcr)
+{
+   POOLMEM *changer, *results;
+   int status, loaded;
+   uint32_t timeout = jcr->device->max_changer_wait;
+   int drive = jcr->device->drive_index;
+
+   results = get_pool_memory(PM_MESSAGE);
+   changer = get_pool_memory(PM_FNAME);
+
+   /* Find out what is loaded, zero means device is unloaded */
+   Jmsg(jcr, M_INFO, 0, _("3301 Issuing autochanger \"loaded drive %d\" command.\n"),
+       drive);
+   changer = edit_device_codes(jcr, changer, jcr->device->changer_command, 
+                "loaded");
+   status = run_program(changer, timeout, results);
+   Dmsg3(100, "run_prog: %s stat=%d result=%s\n", changer, status, results);
+   if (status == 0) {
+      loaded = atoi(results);
+      if (loaded > 0) {
+         Jmsg(jcr, M_INFO, 0, _("3302 Autochanger \"loaded drive %d\", result is Slot %d.\n"),
+             drive, loaded);
+      } else {
+         Jmsg(jcr, M_INFO, 0, _("3302 Autochanger \"loaded drive %d\", result: nothing loaded.\n"),
+             drive);
+      }
+   } else {
+      Jmsg(jcr, M_INFO, 0, _("3991 Bad autochanger \"loaded drive %d\" command, status=%d.\n"), 
+          drive, status);
+      loaded = -1;             /* force unload */
+   }
+   free_pool_memory(changer);
+   free_pool_memory(results);
+   return loaded;
+}
+
 /*
  * The Volume is not in the correct slot, so mark this 
  *   Volume as not being in the Changer.
@@ -153,6 +191,7 @@ int autochanger_list(JCR *jcr, DEVICE *dev, BSOCK *dir)
    uint32_t timeout = jcr->device->max_changer_wait;
    POOLMEM *changer;
    BPIPE *bpipe;
+   int slot, loaded;
    int len = sizeof_pool_memory(dir->msg) - 1;
 
    if (!dev_cap(dev, CAP_AUTOCHANGER) || !jcr->device->changer_name ||
@@ -167,9 +206,15 @@ int autochanger_list(JCR *jcr, DEVICE *dev, BSOCK *dir)
    force_close_dev(dev);
 
    /* First unload any tape */
-   bnet_fsend(dir, _("3305 Issuing autochanger \"unload\" command.\n"));
-   changer = edit_device_codes(jcr, changer, jcr->device->changer_command, "unload");
-   run_program(changer, timeout, NULL);
+   loaded = get_autochanger_loaded_slot(jcr);
+   if (loaded > 0) {
+      bnet_fsend(dir, _("3305 Issuing autochanger \"unload slot %d\" command.\n"), loaded);
+      slot = jcr->VolCatInfo.Slot; 
+      jcr->VolCatInfo.Slot = loaded;
+      changer = edit_device_codes(jcr, changer, jcr->device->changer_command, "unload");
+      run_program(changer, timeout, NULL);
+      jcr->VolCatInfo.Slot = slot;
+   }
 
    /* Now list slots occupied */
    changer = edit_device_codes(jcr, changer, jcr->device->changer_command, "list");
@@ -199,6 +244,7 @@ bail_out:
  *  %% = %
  *  %a = archive device name
  *  %c = changer device name
+ *  %d = changer drive index       
  *  %f = Client's name
  *  %j = Job name
  *  %o = command
@@ -212,14 +258,14 @@ bail_out:
  *  cmd = command string (load, unload, ...) 
  *
  */
-static char *edit_device_codes(JCR *jcr, char *omsg, char *imsg, char *cmd) 
+char *edit_device_codes(JCR *jcr, char *omsg, char *imsg, char *cmd) 
 {
    char *p;
    const char *str;
    char add[20];
 
    *omsg = 0;
-   Dmsg1(200, "edit_device_codes: %s\n", imsg);
+   Dmsg1(400, "edit_device_codes: %s\n", imsg);
    for (p=imsg; *p; p++) {
       if (*p == '%') {
         switch (*++p) {
@@ -232,6 +278,10 @@ static char *edit_device_codes(JCR *jcr, char *omsg, char *imsg, char *cmd)
          case 'c':
            str = NPRT(jcr->device->changer_name);
            break;
+         case 'd':
+            sprintf(add, "%d", jcr->device->dev->drive_index);
+           str = add;
+           break;
          case 'o':
            str = NPRT(cmd);
            break;
@@ -265,9 +315,9 @@ static char *edit_device_codes(JCR *jcr, char *omsg, char *imsg, char *cmd)
         add[1] = 0;
         str = add;
       }
-      Dmsg1(200, "add_str %s\n", str);
+      Dmsg1(400, "add_str %s\n", str);
       pm_strcat(&omsg, (char *)str);
-      Dmsg1(200, "omsg=%s\n", omsg);
+      Dmsg1(400, "omsg=%s\n", omsg);
    }
    return omsg;
 }