]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/stored/bscan.c
This commit was manufactured by cvs2svn to create tag
[bacula/bacula] / bacula / src / stored / bscan.c
index 503dd9aa3ac9917d0bf74c62f5bb904ccb8497e9..ff212e24dc62451bc785a188331cf2c0b73958df 100644 (file)
    Copyright (C) 2001-2005 Kern Sibbald
 
    This program is free software; you can redistribute it and/or
-   modify it under the terms of the GNU General Public License as
-   published by the Free Software Foundation; either version 2 of
-   the License, or (at your option) any later version.
+   modify it under the terms of the GNU General Public License
+   version 2 as amended with additional clauses defined in the
+   file LICENSE in the main source directory.
 
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
-   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
-   General Public License for more details.
-
-   You should have received a copy of the GNU General Public
-   License along with this program; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
-   MA 02111-1307, USA.
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 
+   the file LICENSE for additional details.
 
  */
 
 #include "stored.h"
 #include "findlib/find.h"
 #include "cats/cats.h"
+/* Dummy functions */
+int generate_daemon_event(JCR *jcr, const char *event) { return 1; }
 
 /* Forward referenced functions */
 static void do_scan(void);
 static bool record_cb(DCR *dcr, DEV_RECORD *rec);
 static int  create_file_attributes_record(B_DB *db, JCR *mjcr,
-                              char *fname, char *lname, int type,
-                              char *ap, DEV_RECORD *rec);
+                               char *fname, char *lname, int type,
+                               char *ap, DEV_RECORD *rec);
 static int  create_media_record(B_DB *db, MEDIA_DBR *mr, VOLUME_LABEL *vl);
 static bool update_media_record(B_DB *db, MEDIA_DBR *mr);
 static int  create_pool_record(B_DB *db, POOL_DBR *pr);
 static JCR *create_job_record(B_DB *db, JOB_DBR *mr, SESSION_LABEL *label, DEV_RECORD *rec);
 static int  update_job_record(B_DB *db, JOB_DBR *mr, SESSION_LABEL *elabel,
-                             DEV_RECORD *rec);
+                              DEV_RECORD *rec);
 static int  create_client_record(B_DB *db, CLIENT_DBR *cr);
 static int  create_fileset_record(B_DB *db, FILESET_DBR *fsr);
 static int  create_jobmedia_record(B_DB *db, JCR *jcr);
@@ -54,7 +52,6 @@ static int update_SIG_record(B_DB *db, char *SIGbuf, DEV_RECORD *rec, int type);
 
 
 /* Global variables */
-STORES *me;
 #if defined(HAVE_CYGWIN) || defined(HAVE_WIN32)
 int win32_client = 1;
 #else
@@ -65,7 +62,7 @@ int win32_client = 0;
 /* Local variables */
 static DEVICE *dev = NULL;
 static B_DB *db;
-static JCR *bjcr;                    /* jcr for bscan */
+static JCR *bjcr;                     /* jcr for bscan */
 static BSR *bsr = NULL;
 static MEDIA_DBR mr;
 static POOL_DBR pr;
@@ -91,7 +88,7 @@ static bool list_records = false;
 static int ignored_msgs = 0;
 
 static uint64_t currentVolumeSize;
-static int64_t last_pct = -1;
+static int last_pct = -1;
 static bool showProgress = false;
 static int num_jobs = 0;
 static int num_pools = 0;
@@ -99,15 +96,18 @@ static int num_media = 0;
 static int num_files = 0;
 
 #define CONFIG_FILE "bacula-sd.conf"
-char *configfile;
-bool forge_on = false;
+char *configfile = NULL;
+STORES *me = NULL;                    /* our Global resource */
+bool forge_on = false;                /* proceed inspite of I/O errors */
+pthread_mutex_t device_release_mutex = PTHREAD_MUTEX_INITIALIZER;
+pthread_cond_t wait_device_release = PTHREAD_COND_INITIALIZER;
 
 
 static void usage()
 {
    fprintf(stderr, _(
 "Copyright (C) 2001-2005 Kern Sibbald.\n"
-"\nVersion: " VERSION " (" BDATE ")\n\n"
+"\nVersion: %s (%s)\n\n"
 "Usage: bscan [ options ] <bacula-archive>\n"
 "       -b bootstrap      specify a bootstrap file\n"
 "       -c <file>         specify configuration file\n"
@@ -120,10 +120,11 @@ static void usage()
 "       -p                proceed inspite of I/O errors\n"
 "       -r                list records\n"
 "       -s                synchronize or store in database\n"
+"       -S                show scan progress periodically\n"
 "       -v                verbose\n"
 "       -V <Volumes>      specify Volume names (separated by |)\n"
 "       -w <dir>          specify working directory (default from conf file)\n"
-"       -?                print this message\n\n"));
+"       -?                print this message\n\n"), VERSION, BDATE);
    exit(1);
 }
 
@@ -133,6 +134,10 @@ int main (int argc, char *argv[])
    struct stat stat_buf;
    char *VolumeName = NULL;
 
+   setlocale(LC_ALL, "");
+   bindtextdomain("bacula", LOCALEDIR);
+   textdomain("bacula");
+
    my_name_is(argc, argv, "bscan");
    init_msg(NULL, NULL);
 
@@ -140,72 +145,72 @@ int main (int argc, char *argv[])
    while ((ch = getopt(argc, argv, "b:c:d:h:mn:pP:rsSu:vV:w:?")) != -1) {
       switch (ch) {
       case 'S' :
-        showProgress = true;
-        break;
+         showProgress = true;
+         break;
       case 'b':
-        bsr = parse_bsr(NULL, optarg);
-        break;
+         bsr = parse_bsr(NULL, optarg);
+         break;
 
       case 'c':                    /* specify config file */
-        if (configfile != NULL) {
-           free(configfile);
-        }
-        configfile = bstrdup(optarg);
-        break;
+         if (configfile != NULL) {
+            free(configfile);
+         }
+         configfile = bstrdup(optarg);
+         break;
 
       case 'd':                    /* debug level */
-        debug_level = atoi(optarg);
-        if (debug_level <= 0)
-           debug_level = 1;
-        break;
+         debug_level = atoi(optarg);
+         if (debug_level <= 0)
+            debug_level = 1;
+         break;
 
       case 'h':
-        db_host = optarg;
-        break;
+         db_host = optarg;
+         break;
 
       case 'm':
-        update_vol_info = true;
-        break;
+         update_vol_info = true;
+         break;
 
       case 'n':
-        db_name = optarg;
-        break;
+         db_name = optarg;
+         break;
 
       case 'u':
-        db_user = optarg;
-        break;
+         db_user = optarg;
+         break;
 
       case 'P':
-        db_password = optarg;
-        break;
+         db_password = optarg;
+         break;
 
       case 'p':
-        forge_on = true;
-        break;
+         forge_on = true;
+         break;
 
       case 'r':
-        list_records = true;
-        break;
+         list_records = true;
+         break;
 
       case 's':
-        update_db = true;
-        break;
+         update_db = true;
+         break;
 
       case 'v':
-        verbose++;
-        break;
+         verbose++;
+         break;
 
       case 'V':                    /* Volume name */
-        VolumeName = optarg;
-        break;
+         VolumeName = optarg;
+         break;
 
       case 'w':
-        wd = optarg;
-        break;
+         wd = optarg;
+         break;
 
       case '?':
       default:
-        usage();
+         usage();
 
       }
    }
@@ -227,7 +232,7 @@ int main (int argc, char *argv[])
    if (!me) {
       UnlockRes();
       Emsg1(M_ERROR_TERM, 0, _("No Storage resource defined in %s. Cannot continue.\n"),
-        configfile);
+         configfile);
    }
    UnlockRes();
    /* Check if -w option given, otherwise use resource for working directory */
@@ -235,7 +240,7 @@ int main (int argc, char *argv[])
       working_directory = wd;
    } else if (!me->working_directory) {
       Emsg1(M_ERROR_TERM, 0, _("No Working Directory defined in %s. Cannot continue.\n"),
-        configfile);
+         configfile);
    } else {
       working_directory = me->working_directory;
    }
@@ -243,27 +248,29 @@ int main (int argc, char *argv[])
    /* Check that working directory is good */
    if (stat(working_directory, &stat_buf) != 0) {
       Emsg1(M_ERROR_TERM, 0, _("Working Directory: %s not found. Cannot continue.\n"),
-        working_directory);
+         working_directory);
    }
    if (!S_ISDIR(stat_buf.st_mode)) {
       Emsg1(M_ERROR_TERM, 0, _("Working Directory: %s is not a directory. Cannot continue.\n"),
-        working_directory);
+         working_directory);
    }
 
    bjcr = setup_jcr("bscan", argv[0], bsr, VolumeName, 1); /* read device */
    if (!bjcr) {
       exit(1);
    }
-   dev = bjcr->dcr->dev;
+   dev = bjcr->read_dcr->dev;
    if (showProgress) {
+      char ed1[50];
       struct stat sb;
       fstat(dev->fd, &sb);
       currentVolumeSize = sb.st_size;
-      Pmsg1(000, _("Current Volume Size = %" llu "\n"), currentVolumeSize);
+      Pmsg1(000, _("First Volume Size = %sn"), 
+         edit_uint64(currentVolumeSize, ed1));
    }
 
    if ((db=db_init_database(NULL, db_name, db_user, db_password,
-       db_host, 0, NULL, 0)) == NULL) {
+        db_host, 0, NULL, 0)) == NULL) {
       Emsg0(M_ERROR_TERM, 0, _("Could not init Bacula database\n"));
    }
    if (!db_open_database(NULL, db)) {
@@ -275,9 +282,14 @@ int main (int argc, char *argv[])
    }
 
    do_scan();
-   printf("Records %sadded or updated in the catalog:\n%7d Media\n%7d Pool\n%7d Job\n%7d File\n",
-      update_db?"":"would have been ",
-      num_media, num_pools, num_jobs, num_files);
+   if (update_db) {
+      printf("Records added or updated in the catalog:\n%7d Media\n%7d Pool\n%7d Job\n%7d File\n",
+         num_media, num_pools, num_jobs, num_files);
+   }
+   else {
+      printf("Records would have been added or updated in the catalog:\n%7d Media\n%7d Pool\n%7d Job\n%7d File\n",
+         num_media, num_pools, num_jobs, num_files);
+   }
 
    free_jcr(bjcr);
    term_dev(dev);
@@ -297,21 +309,22 @@ static bool bscan_mount_next_read_volume(DCR *dcr)
    foreach_dlist(mdcr, dev->attached_dcrs) {
       JCR *mjcr = mdcr->jcr;
       if (mjcr->JobId == 0) {
-        continue;
+         continue;
       }
       if (verbose) {
          Pmsg1(000, _("Create JobMedia for Job %s\n"), mjcr->Job);
       }
-      if (dev->state & ST_TAPE) {
-        mdcr->EndBlock = dev->EndBlock;
-        mdcr->EndFile = dev->EndFile;
-      } else {
-        mdcr->EndBlock = (uint32_t)dev->file_addr;
-        mdcr->EndFile = (uint32_t)(dev->file_addr >> 32);
+      if (dev->is_tape()) {
+         mdcr->EndBlock = dcr->EndBlock;
+         mdcr->EndFile = dcr->EndFile;
+//    } else {
+//       mdcr->EndBlock = (uint32_t)dcr->file_addr;
+//       mdcr->EndFile = (uint32_t)(dcr->file_addr >> 32);
       }
+      mjcr->read_dcr->VolLastIndex = dcr->VolLastIndex;
       if (!create_jobmedia_record(db, mjcr)) {
          Pmsg2(000, _("Could not create JobMedia record for Volume=%s Job=%s\n"),
-           dev->VolCatInfo.VolCatName, mjcr->Job);
+            dev->VolCatInfo.VolCatName, mjcr->Job);
       }
    }
    /* Now let common read routine get up next tape. Note,
@@ -321,10 +334,12 @@ static bool bscan_mount_next_read_volume(DCR *dcr)
    bool stat = mount_next_read_volume(dcr);
 
    if (showProgress) {
+      char ed1[50];
       struct stat sb;
       fstat(dev->fd, &sb);
       currentVolumeSize = sb.st_size;
-      Pmsg1(000, _("Current Volume Size = %" llu "\n"), currentVolumeSize);
+      Pmsg1(000, _("First Volume Size = %sn"), 
+         edit_uint64(currentVolumeSize, ed1));
    }
    return stat;
 }
@@ -342,14 +357,14 @@ static void do_scan()
 
    /* Detach bscan's jcr as we are not a real Job on the tape */
 
-   read_records(bjcr->dcr, record_cb, bscan_mount_next_read_volume);
+   read_records(bjcr->read_dcr, record_cb, bscan_mount_next_read_volume);
 
    free_attr(attr);
 }
 
 /*
  * Returns: true  if OK
- *         false if error
+ *          false if error
  */
 static bool record_cb(DCR *dcr, DEV_RECORD *rec)
 {
@@ -361,20 +376,20 @@ static bool record_cb(DCR *dcr, DEV_RECORD *rec)
 
    if (rec->data_len > 0) {
       mr.VolBytes += rec->data_len + WRITE_RECHDR_LENGTH; /* Accumulate Volume bytes */
-      if (showProgress) {
-        int64_t pct = (mr.VolBytes * 100) / currentVolumeSize;
-        if (pct != last_pct) {
-            fprintf(stdout, "done: %" lld "\n", pct);
-           fflush(stdout);
-           last_pct = pct;
-        }
+      if (showProgress && currentVolumeSize > 0) {
+         int pct = (mr.VolBytes * 100) / currentVolumeSize;
+         if (pct != last_pct) {
+            fprintf(stdout, _("done: %d%%\n"), pct);
+            fflush(stdout);
+            last_pct = pct;
+         }
       }
    }
 
    if (list_records) {
       Pmsg5(000, _("Record: SessId=%u SessTim=%u FileIndex=%d Stream=%d len=%u\n"),
-           rec->VolSessionId, rec->VolSessionTime, rec->FileIndex,
-           rec->Stream, rec->data_len);
+            rec->VolSessionId, rec->VolSessionTime, rec->FileIndex,
+            rec->Stream, rec->data_len);
    }
    /*
     * Check for Start or End of Session Record
@@ -384,223 +399,226 @@ static bool record_cb(DCR *dcr, DEV_RECORD *rec)
       bool save_update_db = update_db;
 
       if (verbose > 1) {
-        dump_label_record(dev, rec, 1);
+         dump_label_record(dev, rec, 1);
       }
       switch (rec->FileIndex) {
       case PRE_LABEL:
          Pmsg0(000, _("Volume is prelabeled. This tape cannot be scanned.\n"));
-        return false;
-        break;
+         return false;
+         break;
 
       case VOL_LABEL:
-        unser_volume_label(dev, rec);
-        /* Check Pool info */
-        bstrncpy(pr.Name, dev->VolHdr.PoolName, sizeof(pr.Name));
-        bstrncpy(pr.PoolType, dev->VolHdr.PoolType, sizeof(pr.PoolType));
-        num_pools++;
-        if (db_get_pool_record(bjcr, db, &pr)) {
-           if (verbose) {
+         unser_volume_label(dev, rec);
+         /* Check Pool info */
+         bstrncpy(pr.Name, dev->VolHdr.PoolName, sizeof(pr.Name));
+         bstrncpy(pr.PoolType, dev->VolHdr.PoolType, sizeof(pr.PoolType));
+         num_pools++;
+         if (db_get_pool_record(bjcr, db, &pr)) {
+            if (verbose) {
                Pmsg1(000, _("Pool record for %s found in DB.\n"), pr.Name);
-           }
-        } else {
-           if (!update_db) {
+            }
+         } else {
+            if (!update_db) {
                Pmsg1(000, _("VOL_LABEL: Pool record not found for Pool: %s\n"),
-                 pr.Name);
-           }
-           create_pool_record(db, &pr);
-        }
-        if (strcmp(pr.PoolType, dev->VolHdr.PoolType) != 0) {
+                  pr.Name);
+            }
+            create_pool_record(db, &pr);
+         }
+         if (strcmp(pr.PoolType, dev->VolHdr.PoolType) != 0) {
             Pmsg2(000, _("VOL_LABEL: PoolType mismatch. DB=%s Vol=%s\n"),
-              pr.PoolType, dev->VolHdr.PoolType);
-           return true;
-        } else if (verbose) {
+               pr.PoolType, dev->VolHdr.PoolType);
+            return true;
+         } else if (verbose) {
             Pmsg1(000, _("Pool type \"%s\" is OK.\n"), pr.PoolType);
-        }
-
-        /* Check Media Info */
-        memset(&mr, 0, sizeof(mr));
-        bstrncpy(mr.VolumeName, dev->VolHdr.VolName, sizeof(mr.VolumeName));
-        mr.PoolId = pr.PoolId;
-        num_media++;
-        if (db_get_media_record(bjcr, db, &mr)) {
-           if (verbose) {
+         }
+
+         /* Check Media Info */
+         memset(&mr, 0, sizeof(mr));
+         bstrncpy(mr.VolumeName, dev->VolHdr.VolumeName, sizeof(mr.VolumeName));
+         mr.PoolId = pr.PoolId;
+         num_media++;
+         if (db_get_media_record(bjcr, db, &mr)) {
+            if (verbose) {
                Pmsg1(000, _("Media record for %s found in DB.\n"), mr.VolumeName);
-           }
-           /* Clear out some volume statistics that will be updated */
-           mr.VolJobs = mr.VolFiles = mr.VolBlocks = 0;
-           mr.VolBytes = rec->data_len + 20;
-        } else {
-           if (!update_db) {
+            }
+            /* Clear out some volume statistics that will be updated */
+            mr.VolJobs = mr.VolFiles = mr.VolBlocks = 0;
+            mr.VolBytes = rec->data_len + 20;
+         } else {
+            if (!update_db) {
                Pmsg1(000, _("VOL_LABEL: Media record not found for Volume: %s\n"),
-                 mr.VolumeName);
-           }
-           bstrncpy(mr.MediaType, dev->VolHdr.MediaType, sizeof(mr.MediaType));
-           create_media_record(db, &mr, &dev->VolHdr);
-        }
-        if (strcmp(mr.MediaType, dev->VolHdr.MediaType) != 0) {
+                  mr.VolumeName);
+            }
+            bstrncpy(mr.MediaType, dev->VolHdr.MediaType, sizeof(mr.MediaType));
+            create_media_record(db, &mr, &dev->VolHdr);
+         }
+         if (strcmp(mr.MediaType, dev->VolHdr.MediaType) != 0) {
             Pmsg2(000, _("VOL_LABEL: MediaType mismatch. DB=%s Vol=%s\n"),
-              mr.MediaType, dev->VolHdr.MediaType);
-           return true;              /* ignore error */
-        } else if (verbose) {
+               mr.MediaType, dev->VolHdr.MediaType);
+            return true;              /* ignore error */
+         } else if (verbose) {
             Pmsg1(000, _("Media type \"%s\" is OK.\n"), mr.MediaType);
-        }
-        /* Reset some JCR variables */
-        foreach_dlist(dcr, dev->attached_dcrs) {
-           dcr->VolFirstIndex = dcr->FileIndex = 0;
-           dcr->StartBlock = dcr->EndBlock = 0;
-           dcr->StartFile = dcr->EndFile = 0;
-        }
+         }
+         /* Reset some DCR variables */
+         foreach_dlist(dcr, dev->attached_dcrs) {
+            dcr->VolFirstIndex = dcr->FileIndex = 0;
+            dcr->StartBlock = dcr->EndBlock = 0;
+            dcr->StartFile = dcr->EndFile = 0;
+         }
 
          Pmsg1(000, _("VOL_LABEL: OK for Volume: %s\n"), mr.VolumeName);
-        break;
+         break;
 
       case SOS_LABEL:
-        mr.VolJobs++;
-        num_jobs++;
-        if (ignored_msgs > 0) {
+         mr.VolJobs++;
+         num_jobs++;
+         if (ignored_msgs > 0) {
             Pmsg1(000, _("%d \"errors\" ignored before first Start of Session record.\n"),
-                 ignored_msgs);
-           ignored_msgs = 0;
-        }
-        unser_session_label(&label, rec);
-        memset(&jr, 0, sizeof(jr));
-        bstrncpy(jr.Job, label.Job, sizeof(jr.Job));
-        if (db_get_job_record(bjcr, db, &jr)) {
-           /* Job record already exists in DB */
+                  ignored_msgs);
+            ignored_msgs = 0;
+         }
+         unser_session_label(&label, rec);
+         memset(&jr, 0, sizeof(jr));
+         bstrncpy(jr.Job, label.Job, sizeof(jr.Job));
+         if (db_get_job_record(bjcr, db, &jr)) {
+            /* Job record already exists in DB */
             update_db = false;  /* don't change db in create_job_record */
-           if (verbose) {
+            if (verbose) {
                Pmsg1(000, _("SOS_LABEL: Found Job record for JobId: %d\n"), jr.JobId);
-           }
-        } else {
-           /* Must create a Job record in DB */
-           if (!update_db) {
+            }
+         } else {
+            /* Must create a Job record in DB */
+            if (!update_db) {
                Pmsg1(000, _("SOS_LABEL: Job record not found for JobId: %d\n"),
-                 jr.JobId);
-           }
-        }
-        /* Create Client record if not already there */
-           bstrncpy(cr.Name, label.ClientName, sizeof(cr.Name));
-           create_client_record(db, &cr);
-           jr.ClientId = cr.ClientId;
+                  jr.JobId);
+            }
+         }
+         /* Create Client record if not already there */
+            bstrncpy(cr.Name, label.ClientName, sizeof(cr.Name));
+            create_client_record(db, &cr);
+            jr.ClientId = cr.ClientId;
 
          /* process label, if Job record exists don't update db */
-        mjcr = create_job_record(db, &jr, &label, rec);
-        dcr = mjcr->dcr;
-        update_db = save_update_db;
-
-        jr.PoolId = pr.PoolId;
-        /* Set start positions into JCR */
-        if (dev->state & ST_TAPE) {
-           /*
-            * Note, we have already advanced past current block,
-            *  so the correct number is block_num - 1
-            */
-           dcr->StartBlock = dev->block_num - 1;
-           dcr->StartFile = dev->file;
-        } else {
-           dcr->StartBlock = (uint32_t)dev->file_addr;
-           dcr->StartFile = (uint32_t)(dev->file_addr >> 32);
-        }
-        mjcr->start_time = jr.StartTime;
-        mjcr->JobLevel = jr.JobLevel;
-
-        mjcr->client_name = get_pool_memory(PM_FNAME);
-        pm_strcpy(mjcr->client_name, label.ClientName);
-        mjcr->fileset_name = get_pool_memory(PM_FNAME);
-        pm_strcpy(mjcr->fileset_name, label.FileSetName);
-        bstrncpy(dcr->pool_type, label.PoolType, sizeof(dcr->pool_type));
-        bstrncpy(dcr->pool_name, label.PoolName, sizeof(dcr->pool_name));
-
-        if (rec->VolSessionId != jr.VolSessionId) {
+         mjcr = create_job_record(db, &jr, &label, rec);
+         dcr = mjcr->read_dcr;
+         update_db = save_update_db;
+
+         jr.PoolId = pr.PoolId;
+#ifdef xxx
+         /* Set start positions into JCR */
+         if (dev->is_tape()) {
+            /*
+             * Note, we have already advanced past current block,
+             *  so the correct number is block_num - 1
+             */
+            dcr->StartBlock = dev->block_num - 1;
+            dcr->StartFile = dev->file;
+         } else {
+            dcr->StartBlock = (uint32_t)dev->file_addr;
+            dcr->StartFile = (uint32_t)(dev->file_addr >> 32);
+         }
+#endif
+         mjcr->start_time = jr.StartTime;
+         mjcr->JobLevel = jr.JobLevel;
+
+         mjcr->client_name = get_pool_memory(PM_FNAME);
+         pm_strcpy(mjcr->client_name, label.ClientName);
+         mjcr->fileset_name = get_pool_memory(PM_FNAME);
+         pm_strcpy(mjcr->fileset_name, label.FileSetName);
+         bstrncpy(dcr->pool_type, label.PoolType, sizeof(dcr->pool_type));
+         bstrncpy(dcr->pool_name, label.PoolName, sizeof(dcr->pool_name));
+
+         if (rec->VolSessionId != jr.VolSessionId) {
             Pmsg3(000, _("SOS_LABEL: VolSessId mismatch for JobId=%u. DB=%d Vol=%d\n"),
-              jr.JobId,
-              jr.VolSessionId, rec->VolSessionId);
-           return true;              /* ignore error */
-        }
-        if (rec->VolSessionTime != jr.VolSessionTime) {
+               jr.JobId,
+               jr.VolSessionId, rec->VolSessionId);
+            return true;              /* ignore error */
+         }
+         if (rec->VolSessionTime != jr.VolSessionTime) {
             Pmsg3(000, _("SOS_LABEL: VolSessTime mismatch for JobId=%u. DB=%d Vol=%d\n"),
-              jr.JobId,
-              jr.VolSessionTime, rec->VolSessionTime);
-           return true;              /* ignore error */
-        }
-        if (jr.PoolId != pr.PoolId) {
+               jr.JobId,
+               jr.VolSessionTime, rec->VolSessionTime);
+            return true;              /* ignore error */
+         }
+         if (jr.PoolId != pr.PoolId) {
             Pmsg3(000, _("SOS_LABEL: PoolId mismatch for JobId=%u. DB=%d Vol=%d\n"),
-              jr.JobId,
-              jr.PoolId, pr.PoolId);
-           return true;              /* ignore error */
-        }
-        break;
+               jr.JobId,
+               jr.PoolId, pr.PoolId);
+            return true;              /* ignore error */
+         }
+         break;
 
       case EOS_LABEL:
-        unser_session_label(&elabel, rec);
+         unser_session_label(&elabel, rec);
 
-        /* Create FileSet record */
-        bstrncpy(fsr.FileSet, label.FileSetName, sizeof(fsr.FileSet));
-        bstrncpy(fsr.MD5, label.FileSetMD5, sizeof(fsr.MD5));
-        create_fileset_record(db, &fsr);
-        jr.FileSetId = fsr.FileSetId;
+         /* Create FileSet record */
+         bstrncpy(fsr.FileSet, label.FileSetName, sizeof(fsr.FileSet));
+         bstrncpy(fsr.MD5, label.FileSetMD5, sizeof(fsr.MD5));
+         create_fileset_record(db, &fsr);
+         jr.FileSetId = fsr.FileSetId;
 
-        mjcr = get_jcr_by_session(rec->VolSessionId, rec->VolSessionTime);
-        if (!mjcr) {
+         mjcr = get_jcr_by_session(rec->VolSessionId, rec->VolSessionTime);
+         if (!mjcr) {
             Pmsg2(000, _("Could not find SessId=%d SessTime=%d for EOS record.\n"),
-                 rec->VolSessionId, rec->VolSessionTime);
-           break;
-        }
+                  rec->VolSessionId, rec->VolSessionTime);
+            break;
+         }
 
-        /* Do the final update to the Job record */
-        update_job_record(db, &jr, &elabel, rec);
+         /* Do the final update to the Job record */
+         update_job_record(db, &jr, &elabel, rec);
 
-        mjcr->end_time = jr.EndTime;
-        mjcr->JobStatus = JS_Terminated;
+         mjcr->end_time = jr.EndTime;
+         mjcr->JobStatus = JS_Terminated;
 
-        /* Create JobMedia record */
-        create_jobmedia_record(db, mjcr);
-        dev->attached_dcrs->remove(mjcr->dcr);
-        free_jcr(mjcr);
+         /* Create JobMedia record */
+         mjcr->read_dcr->VolLastIndex = dcr->VolLastIndex;
+         create_jobmedia_record(db, mjcr);
+         dev->attached_dcrs->remove(mjcr->read_dcr);
+         free_jcr(mjcr);
 
-        break;
+         break;
 
       case EOM_LABEL:
-        break;
-
-      case EOT_LABEL:             /* end of all tapes */
-        /*
-         * Wiffle through all jobs still open and close
-         *   them.
-         */
-        if (update_db) {
-           DCR *mdcr;
-           foreach_dlist(mdcr, dev->attached_dcrs) {
-              JCR *mjcr = mdcr->jcr;
-              if (!mjcr || mjcr->JobId == 0) {
-                 continue;
-              }
-              jr.JobId = mjcr->JobId;
-              /* Mark Job as Error Terimined */
-              jr.JobStatus = JS_ErrorTerminated;
-              jr.JobFiles = mjcr->JobFiles;
-              jr.JobBytes = mjcr->JobBytes;
-              jr.VolSessionId = mjcr->VolSessionId;
-              jr.VolSessionTime = mjcr->VolSessionTime;
-              jr.JobTDate = (utime_t)mjcr->start_time;
-              jr.ClientId = mjcr->ClientId;
-              if (!db_update_job_end_record(bjcr, db, &jr)) {
+         break;
+
+      case EOT_LABEL:              /* end of all tapes */
+         /*
+          * Wiffle through all jobs still open and close
+          *   them.
+          */
+         if (update_db) {
+            DCR *mdcr;
+            foreach_dlist(mdcr, dev->attached_dcrs) {
+               JCR *mjcr = mdcr->jcr;
+               if (!mjcr || mjcr->JobId == 0) {
+                  continue;
+               }
+               jr.JobId = mjcr->JobId;
+               /* Mark Job as Error Terimined */
+               jr.JobStatus = JS_ErrorTerminated;
+               jr.JobFiles = mjcr->JobFiles;
+               jr.JobBytes = mjcr->JobBytes;
+               jr.VolSessionId = mjcr->VolSessionId;
+               jr.VolSessionTime = mjcr->VolSessionTime;
+               jr.JobTDate = (utime_t)mjcr->start_time;
+               jr.ClientId = mjcr->ClientId;
+               if (!db_update_job_end_record(bjcr, db, &jr)) {
                   Pmsg1(0, _("Could not update job record. ERR=%s\n"), db_strerror(db));
-              }
-              mjcr->dcr = NULL;
-              free_jcr(mjcr);
-           }
-        }
-        mr.VolFiles = rec->File;
-        mr.VolBlocks = rec->Block;
-        mr.VolBytes += mr.VolBlocks * WRITE_BLKHDR_LENGTH; /* approx. */
-        mr.VolMounts++;
-        update_media_record(db, &mr);
+               }
+               mjcr->read_dcr = NULL;
+               free_jcr(mjcr);
+            }
+         }
+         mr.VolFiles = rec->File;
+         mr.VolBlocks = rec->Block;
+         mr.VolBytes += mr.VolBlocks * WRITE_BLKHDR_LENGTH; /* approx. */
+         mr.VolMounts++;
+         update_media_record(db, &mr);
          Pmsg3(0, _("End of all Volumes. VolFiles=%u VolBlocks=%u VolBytes=%s\n"), mr.VolFiles,
-                   mr.VolBlocks, edit_uint64_with_commas(mr.VolBytes, ec1));
-        break;
+                    mr.VolBlocks, edit_uint64_with_commas(mr.VolBytes, ec1));
+         break;
       default:
-        break;
+         break;
       } /* end switch */
       return true;
    }
@@ -609,13 +627,13 @@ static bool record_cb(DCR *dcr, DEV_RECORD *rec)
    if (!mjcr) {
       if (mr.VolJobs > 0) {
          Pmsg2(000, _("Could not find Job for SessId=%d SessTime=%d record.\n"),
-                     rec->VolSessionId, rec->VolSessionTime);
+                      rec->VolSessionId, rec->VolSessionTime);
       } else {
-        ignored_msgs++;
+         ignored_msgs++;
       }
       return true;
    }
-   dcr = mjcr->dcr;
+   dcr = mjcr->read_dcr;
    if (dcr->VolFirstIndex == 0) {
       dcr->VolFirstIndex = block->FirstIndex;
    }
@@ -631,27 +649,27 @@ static bool record_cb(DCR *dcr, DEV_RECORD *rec)
 
       if (attr->file_index != rec->FileIndex) {
          Emsg2(M_ERROR_TERM, 0, _("Record header file index %ld not equal record index %ld\n"),
-           rec->FileIndex, attr->file_index);
+            rec->FileIndex, attr->file_index);
       }
 
       if (verbose > 1) {
-        decode_stat(attr->attr, &attr->statp, &attr->LinkFI);
-        build_attr_output_fnames(bjcr, attr);
-        print_ls_output(bjcr, attr);
+         decode_stat(attr->attr, &attr->statp, &attr->LinkFI);
+         build_attr_output_fnames(bjcr, attr);
+         print_ls_output(bjcr, attr);
       }
       fr.JobId = mjcr->JobId;
       fr.FileId = 0;
       num_files++;
       if (verbose && (num_files & 0x7FFF) == 0) {
-        char ed1[30], ed2[30], ed3[30], ed4[30];
+         char ed1[30], ed2[30], ed3[30], ed4[30];
          Pmsg4(000, _("%s file records. At file:blk=%s:%s bytes=%s\n"),
-                    edit_uint64_with_commas(num_files, ed1),
-                    edit_uint64_with_commas(rec->File, ed2),
-                    edit_uint64_with_commas(rec->Block, ed3),
-                    edit_uint64_with_commas(mr.VolBytes, ed4));
+                     edit_uint64_with_commas(num_files, ed1),
+                     edit_uint64_with_commas(rec->File, ed2),
+                     edit_uint64_with_commas(rec->Block, ed3),
+                     edit_uint64_with_commas(mr.VolBytes, ed4));
       }
       create_file_attributes_record(db, mjcr, attr->fname, attr->lname,
-           attr->type, attr->attr, rec);
+            attr->type, attr->attr, rec);
       free_jcr(mjcr);
       break;
 
@@ -661,26 +679,26 @@ static bool record_cb(DCR *dcr, DEV_RECORD *rec)
    case STREAM_SPARSE_DATA:
       mjcr->JobBytes += rec->data_len;
       if (rec->Stream == STREAM_SPARSE_DATA) {
-        mjcr->JobBytes -= sizeof(uint64_t);
+         mjcr->JobBytes -= sizeof(uint64_t);
       }
 
-      free_jcr(mjcr);                /* done using JCR */
+      free_jcr(mjcr);                 /* done using JCR */
       break;
 
    case STREAM_GZIP_DATA:
       mjcr->JobBytes += rec->data_len; /* No correct, we should expand it */
-      free_jcr(mjcr);                /* done using JCR */
+      free_jcr(mjcr);                 /* done using JCR */
       break;
 
    case STREAM_SPARSE_GZIP_DATA:
       mjcr->JobBytes += rec->data_len - sizeof(uint64_t); /* No correct, we should expand it */
-      free_jcr(mjcr);                /* done using JCR */
+      free_jcr(mjcr);                 /* done using JCR */
       break;
 
    /* Win32 GZIP stream */
    case STREAM_WIN32_GZIP_DATA:
       mjcr->JobBytes += rec->data_len;
-      free_jcr(mjcr);                /* done using JCR */
+      free_jcr(mjcr);                 /* done using JCR */
       break;
 
    case STREAM_MD5_SIGNATURE:
@@ -727,7 +745,7 @@ static bool record_cb(DCR *dcr, DEV_RECORD *rec)
  */
 static void bscan_free_jcr(JCR *jcr)
 {
-   Dmsg0(200, "Start dird free_jcr\n");
+   Dmsg0(200, "Start bscan free_jcr\n");
 
    if (jcr->file_bsock) {
       Dmsg0(200, "Close File bsock\n");
@@ -744,7 +762,11 @@ static void bscan_free_jcr(JCR *jcr)
       free_dcr(jcr->dcr);
       jcr->dcr = NULL;
    }
-   Dmsg0(200, "End dird free_jcr\n");
+   if (jcr->read_dcr) {
+      free_dcr(jcr->read_dcr);
+      jcr->read_dcr = NULL;
+   }
+   Dmsg0(200, "End bscan free_jcr\n");
 }
 
 /*
@@ -752,10 +774,10 @@ static void bscan_free_jcr(JCR *jcr)
  *   record, and then create the attributes record.
  */
 static int create_file_attributes_record(B_DB *db, JCR *mjcr,
-                              char *fname, char *lname, int type,
-                              char *ap, DEV_RECORD *rec)
+                               char *fname, char *lname, int type,
+                               char *ap, DEV_RECORD *rec)
 {
-   DCR *dcr = mjcr->dcr;
+   DCR *dcr = mjcr->read_dcr;
    ar.fname = fname;
    ar.link = lname;
    ar.ClientId = mjcr->ClientId;
@@ -909,8 +931,8 @@ static int create_fileset_record(B_DB *db, FILESET_DBR *fsr)
    } else {
       if (!db_create_fileset_record(bjcr, db, fsr)) {
          Pmsg2(0, _("Could not create FileSet record \"%s\". ERR=%s\n"),
-           fsr->FileSet, db_strerror(db));
-        return 0;
+            fsr->FileSet, db_strerror(db));
+         return 0;
       }
       if (verbose) {
          Pmsg1(000, _("Created FileSet record \"%s\"\n"), fsr->FileSet);
@@ -925,7 +947,7 @@ static int create_fileset_record(B_DB *db, FILESET_DBR *fsr)
  *  begins running.
  */
 static JCR *create_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *label,
-                            DEV_RECORD *rec)
+                             DEV_RECORD *rec)
 {
    JCR *mjcr;
    struct date_time dt;
@@ -970,8 +992,8 @@ static JCR *create_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *label,
       return mjcr;
    }
    Pmsg2(000, _("Created new JobId=%u record for original JobId=%u\n"), jr->JobId,
-        label->JobId);
-   mjcr->JobId = jr->JobId;          /* set new JobId */
+         label->JobId);
+   mjcr->JobId = jr->JobId;           /* set new JobId */
    return mjcr;
 }
 
@@ -980,7 +1002,7 @@ static JCR *create_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *label,
  *  at Job termination time.
  */
 static int update_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *elabel,
-                             DEV_RECORD *rec)
+                              DEV_RECORD *rec)
 {
    struct date_time dt;
    struct tm tm;
@@ -989,7 +1011,7 @@ static int update_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *elabel,
    mjcr = get_jcr_by_session(rec->VolSessionId, rec->VolSessionTime);
    if (!mjcr) {
       Pmsg2(000, _("Could not find SessId=%d SessTime=%d for EOS record.\n"),
-                  rec->VolSessionId, rec->VolSessionTime);
+                   rec->VolSessionId, rec->VolSessionTime);
       return 0;
    }
    if (elabel->VerNum >= 11) {
@@ -1025,7 +1047,7 @@ static int update_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *elabel,
    }
    if (verbose) {
       Pmsg2(000, _("Updated Job termination record for JobId=%u TermStat=%c\n"), jr->JobId,
-        jr->JobStatus);
+         jr->JobStatus);
    }
    if (verbose > 1) {
       const char *term_msg;
@@ -1036,18 +1058,18 @@ static int update_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *elabel,
       switch (mjcr->JobStatus) {
       case JS_Terminated:
          term_msg = _("Backup OK");
-        break;
+         break;
       case JS_FatalError:
       case JS_ErrorTerminated:
          term_msg = _("*** Backup Error ***");
-        break;
+         break;
       case JS_Canceled:
          term_msg = _("Backup Canceled");
-        break;
+         break;
       default:
-        term_msg = term_code;
+         term_msg = term_code;
          sprintf(term_code, _("Job Termination code: %d"), mjcr->JobStatus);
-        break;
+         break;
       }
       bstrftime(sdt, sizeof(sdt), mjcr->start_time);
       bstrftime(edt, sizeof(edt), mjcr->end_time);
@@ -1065,20 +1087,20 @@ static int update_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *elabel,
 "Volume Session Time:    %d\n"
 "Last Volume Bytes:      %s\n"
 "Termination:            %s\n\n"),
-       edt,
-       mjcr->JobId,
-       mjcr->Job,
-       mjcr->fileset_name,
-       job_level_to_str(mjcr->JobLevel),
-       mjcr->client_name,
-       sdt,
-       edt,
-       edit_uint64_with_commas(mjcr->JobFiles, ec1),
-       edit_uint64_with_commas(mjcr->JobBytes, ec2),
-       mjcr->VolSessionId,
-       mjcr->VolSessionTime,
-       edit_uint64_with_commas(mr.VolBytes, ec3),
-       term_msg);
+        edt,
+        mjcr->JobId,
+        mjcr->Job,
+        mjcr->fileset_name,
+        job_level_to_str(mjcr->JobLevel),
+        mjcr->client_name,
+        sdt,
+        edt,
+        edit_uint64_with_commas(mjcr->JobFiles, ec1),
+        edit_uint64_with_commas(mjcr->JobBytes, ec2),
+        mjcr->VolSessionId,
+        mjcr->VolSessionTime,
+        edit_uint64_with_commas(mr.VolBytes, ec3),
+        term_msg);
    }
    free_jcr(mjcr);
    return 1;
@@ -1087,21 +1109,23 @@ static int update_job_record(B_DB *db, JOB_DBR *jr, SESSION_LABEL *elabel,
 static int create_jobmedia_record(B_DB *db, JCR *mjcr)
 {
    JOBMEDIA_DBR jmr;
-   DCR *dcr = mjcr->dcr;
+   DCR *dcr = mjcr->read_dcr;
 
-   if (dev->state & ST_TAPE) {
+   if (dev->is_tape()) {
       dcr->EndBlock = dev->EndBlock;
       dcr->EndFile  = dev->EndFile;
+#ifdef needed
    } else {
       dcr->EndBlock = (uint32_t)dev->file_addr;
       dcr->EndFile = (uint32_t)(dev->file_addr >> 32);
-   }
+#endif
+   } 
 
    memset(&jmr, 0, sizeof(jmr));
    jmr.JobId = mjcr->JobId;
    jmr.MediaId = mr.MediaId;
    jmr.FirstIndex = dcr->VolFirstIndex;
-   jmr.LastIndex = dcr->FileIndex;
+   jmr.LastIndex = dcr->VolLastIndex;
    jmr.StartFile = dcr->StartFile;
    jmr.EndFile = dcr->EndFile;
    jmr.StartBlock = dcr->StartBlock;
@@ -1118,7 +1142,7 @@ static int create_jobmedia_record(B_DB *db, JCR *mjcr)
    }
    if (verbose) {
       Pmsg2(000, _("Created JobMedia record JobId %d, MediaId %d\n"),
-               jmr.JobId, jmr.MediaId);
+                jmr.JobId, jmr.MediaId);
    }
    return 1;
 }
@@ -1134,9 +1158,9 @@ static int update_SIG_record(B_DB *db, char *SIGbuf, DEV_RECORD *rec, int type)
    if (!mjcr) {
       if (mr.VolJobs > 0) {
          Pmsg2(000, _("Could not find SessId=%d SessTime=%d for MD5/SHA1 record.\n"),
-                     rec->VolSessionId, rec->VolSessionTime);
+                      rec->VolSessionId, rec->VolSessionTime);
       } else {
-        ignored_msgs++;
+         ignored_msgs++;
       }
       return 0;
    }
@@ -1167,7 +1191,7 @@ static JCR *create_jcr(JOB_DBR *jr, DEV_RECORD *rec, uint32_t JobId)
    JCR *jobjcr;
    /*
     * Transfer as much as possible to the Job JCR. Most important is
-    *  the JobId and the ClientId.
+    *   the JobId and the ClientId.
     */
    jobjcr = new_jcr(sizeof(JCR), bscan_free_jcr);
    jobjcr->JobType = jr->JobType;
@@ -1180,20 +1204,23 @@ static JCR *create_jcr(JOB_DBR *jr, DEV_RECORD *rec, uint32_t JobId)
    jobjcr->VolSessionId = rec->VolSessionId;
    jobjcr->VolSessionTime = rec->VolSessionTime;
    jobjcr->ClientId = jr->ClientId;
-// attach_jcr_to_device(dev, jobjcr);
-   new_dcr(jobjcr, dev);
+   jobjcr->read_dcr = new_dcr(jobjcr, dev);
+
    return jobjcr;
 }
 
 /* Dummies to replace askdir.c */
-bool   dir_get_volume_info(DCR *dcr, enum get_vol_info_rw  writing) { return 1;}
-bool   dir_find_next_appendable_volume(DCR *dcr) { return 1;}
-bool   dir_update_volume_info(DCR *dcr, bool relabel) { return 1; }
-bool   dir_create_jobmedia_record(DCR *dcr) { return 1; }
-bool   dir_ask_sysop_to_create_appendable_volume(DCR *dcr) { return 1; }
-bool   dir_update_file_attributes(DCR *dcr, DEV_RECORD *rec) { return 1;}
-bool   dir_send_job_status(JCR *jcr) {return 1;}
-
+bool    dir_get_volume_info(DCR *dcr, enum get_vol_info_rw  writing) { return 1;}
+bool    dir_find_next_appendable_volume(DCR *dcr) { return 1;}
+bool    dir_update_volume_info(DCR *dcr, bool relabel) { return 1; }
+bool    dir_create_jobmedia_record(DCR *dcr) { return 1; }
+bool    dir_ask_sysop_to_create_appendable_volume(DCR *dcr) { return 1; }
+bool    dir_update_file_attributes(DCR *dcr, DEV_RECORD *rec) { return 1;}
+bool    dir_send_job_status(JCR *jcr) {return 1;}
+int     generate_job_event(JCR *jcr, const char *event) { return 1; }
+VOLRES *new_volume(DCR *dcr, const char *VolumeName) { return NULL; }
+bool    free_volume(DEVICE *dev) { return true; }
+void    free_unused_volume(DCR *dcr) { }
 
 bool dir_ask_sysop_to_mount_volume(DCR *dcr)
 {
@@ -1203,9 +1230,9 @@ bool dir_ask_sysop_to_mount_volume(DCR *dcr)
    if (dev_cap(dev, CAP_OFFLINEUNMOUNT)) {
       offline_dev(dev);
    }
-   force_close_dev(dev);
-   fprintf(stderr, "Mount Volume \"%s\" on device %s and press return when ready: ",
-        dcr->VolumeName, dev_name(dev));
+   force_close_device(dev);
+   fprintf(stderr, _("Mount Volume \"%s\" on device %s and press return when ready: "),
+         dcr->VolumeName, dev->print_name());
    getchar();
    return true;
 }