]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/stored/bcopy.c
kes Apply patch submitted for bug #1107 with a small modification.
[bacula/bacula] / bacula / src / stored / bcopy.c
index e8265ded204349f0851ec5d0f2c5068962c39751..836a43415daaec53940c2a0f5efa507bdeefa68d 100644 (file)
@@ -1,3 +1,30 @@
+/*
+   Bacula® - The Network Backup Solution
+
+   Copyright (C) 2002-2008 Free Software Foundation Europe e.V.
+
+   The main author of Bacula is Kern Sibbald, with contributions from
+   many others, a complete list can be found in the file AUTHORS.
+   This program is Free Software; you can redistribute it and/or
+   modify it under the terms of version two of the GNU General Public
+   License as published by the Free Software Foundation and included
+   in the file LICENSE.
+
+   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., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA.
+
+   Bacula® is a registered trademark of Kern Sibbald.
+   The licensor of Bacula is the Free Software Foundation Europe
+   (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
+   Switzerland, email:ftf@fsfeurope.org.
+*/
 /*
  *
  *  Program to copy a Bacula from one volume to another.
  *
  *   Version $Id$
  */
-/*
-   Copyright (C) 2001, 2002 Kern Sibbald and John Walker
-
-   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.
-
-   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.
-
- */
 
 #include "bacula.h"
 #include "stored.h"
 
+/* Dummy functions */
+int generate_daemon_event(JCR *jcr, const char *event) { return 1; }
+
 /* Forward referenced functions */
-static void do_scan(void);
-static void record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec);
+static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec);
+static bool record_cb(DCR *dcr, DEV_RECORD *rec);
 
 
 /* Global variables */
-static DEVICE *dev = NULL;
-static B_DB *db;
-static JCR *bjcr;                    /* jcr for bscan */
+static DEVICE *in_dev = NULL;
+static DEVICE *out_dev = NULL;
+static JCR *in_jcr;                    /* input jcr */
+static JCR *out_jcr;                   /* output jcr */
 static BSR *bsr = NULL;
-static char *wd = "/tmp";
-static int verbose = 0;
+static const char *wd = "/tmp";
+static bool list_records = false;
+static uint32_t records = 0;
+static uint32_t jobs = 0;
+static DEV_BLOCK *out_block;
+static SESSION_LABEL sessrec;
 
 #define CONFIG_FILE "bacula-sd.conf"
-char *configfile;
+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, _(
-"\nVersion: " VERSION " (" DATE ")\n\n"
+PROG_COPYRIGHT
+"\nVersion: %s (%s)\n\n"
 "Usage: bcopy [-d debug_level] <input-archive> <output-archive>\n"
 "       -b bootstrap      specify a bootstrap file\n"
 "       -c <file>         specify configuration file\n"
-"       -dnn              set debug level to nn\n"
+"       -d <nn>           set debug level to <nn>\n"
+"       -i                specify input Volume names (separated by |)\n"
+"       -o                specify output Volume names (separated by |)\n"
+"       -p                proceed inspite of errors\n"
 "       -v                verbose\n"
-"       -w dir            specify working directory (default /tmp)\n"
-"       -?                print this message\n\n"));
+"       -w <dir>          specify working directory (default /tmp)\n"
+"       -?                print this message\n\n"), 2002, VERSION, BDATE);
    exit(1);
 }
 
 int main (int argc, char *argv[])
 {
    int ch;
+   char *iVolumeName = NULL;
+   char *oVolumeName = NULL;
+   bool ignore_label_errors = false;
+   bool ok;
 
-   my_name_is(argc, argv, "bscan");
-   init_msg(NULL, NULL);
+   setlocale(LC_ALL, "");
+   bindtextdomain("bacula", LOCALEDIR);
+   textdomain("bacula");
+   init_stack_dump();
 
-   fprintf(stderr, "\n\nPlease don't use this program.\n\
-It is currently under development and does not work.\n\n");
+   my_name_is(argc, argv, "bcopy");
+   init_msg(NULL, NULL);
 
-   while ((ch = getopt(argc, argv, "b:c:d:mn:p:rsu:vw:?")) != -1) {
+   while ((ch = getopt(argc, argv, "b:c:d:i:o:pvw:?")) != -1) {
       switch (ch) {
-         case 'b':
-           bsr = parse_bsr(NULL, optarg);
-           break;
-
-         case 'c':                    /* specify config file */
-           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;
-
-         case 'v':
-           verbose++;
-           break;
-
-         case 'w':
-           wd = optarg;
-           break;
-
-         case '?':
-        default:
-           usage();
-
-      }  
+      case 'b':
+         bsr = parse_bsr(NULL, optarg);
+         break;
+
+      case 'c':                    /* specify config file */
+         if (configfile != NULL) {
+            free(configfile);
+         }
+         configfile = bstrdup(optarg);
+         break;
+
+      case 'd':                    /* debug level */
+         if (*optarg == 't') {
+            dbg_timestamp = true;
+         } else {
+            debug_level = atoi(optarg);
+            if (debug_level <= 0) {
+               debug_level = 1;
+            }
+         }
+         break;
+
+      case 'i':                    /* input Volume name */
+         iVolumeName = optarg;
+         break;
+
+      case 'o':                    /* output Volume name */
+         oVolumeName = optarg;
+         break;
+
+      case 'p':
+         ignore_label_errors = true;
+         forge_on = true;
+         break;
+
+      case 'v':
+         verbose++;
+         break;
+
+      case 'w':
+         wd = optarg;
+         break;
+
+      case '?':
+      default:
+         usage();
+
+      }
    }
    argc -= optind;
    argv += optind;
@@ -112,6 +160,8 @@ It is currently under development and does not work.\n\n");
       usage();
    }
 
+   OSDependentInit();
+
    working_directory = wd;
 
    if (configfile == NULL) {
@@ -120,162 +170,215 @@ It is currently under development and does not work.\n\n");
 
    parse_config(configfile);
 
-   bjcr = setup_jcr("bcopy", argv[0], bsr);
-   dev = setup_to_access_device(bjcr, 0);   /* read device */
-   if (!dev) { 
+   /* Setup and acquire input device for reading */
+   Dmsg0(100, "About to setup input jcr\n");
+   in_jcr = setup_jcr("bcopy", argv[0], bsr, iVolumeName, 1); /* read device */
+   if (!in_jcr) {
+      exit(1);
+   }
+   in_jcr->ignore_label_errors = ignore_label_errors;
+   in_dev = in_jcr->dcr->dev;
+   if (!in_dev) {
       exit(1);
    }
 
-   do_copy();
+   /* Setup output device for writing */
+   Dmsg0(100, "About to setup output jcr\n");
+   out_jcr = setup_jcr("bcopy", argv[1], bsr, oVolumeName, 0); /* no acquire */
+   if (!out_jcr) {
+      exit(1);
+   }
+   out_dev = out_jcr->dcr->dev;
+   if (!out_dev) {
+      exit(1);
+   }
+   Dmsg0(100, "About to acquire device for writing\n");
+   /* For we must now acquire the device for writing */
+   out_dev->r_dlock();
+   if (out_dev->open(out_jcr->dcr, OPEN_READ_WRITE) < 0) {
+      Emsg1(M_FATAL, 0, _("dev open failed: %s\n"), out_dev->errmsg);
+      out_dev->dunlock();
+      exit(1);
+   }
+   out_dev->dunlock();
+   if (!acquire_device_for_append(out_jcr->dcr)) {
+      free_jcr(in_jcr);
+      exit(1);
+   }
+   out_block = out_jcr->dcr->block;
 
-   free_jcr(bjcr);
-   return 0;
-}
-  
+   ok = read_records(in_jcr->dcr, record_cb, mount_next_read_volume);
 
-static void do_copy()            
-{
-   detach_jcr_from_device(dev, bjcr);
+   if (ok || out_dev->can_write()) {
+      if (!write_block_to_device(out_jcr->dcr)) {
+         Pmsg0(000, _("Write of last block failed.\n"));
+      }
+   }
+
+   Pmsg2(000, _("%u Jobs copied. %u records copied.\n"), jobs, records);
 
-   read_records(bjcr, dev, record_cb, mount_next_read_volume);
-   release_device(bjcr, dev);
+   free_jcr(in_jcr);
+   free_jcr(out_jcr);
 
-   term_dev(dev);
+   in_dev->term();
+   out_dev->term();
+   return 0;
 }
 
-static void record_cb(JCR *bjcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
-{
-   JCR *mjcr;
-   char ec1[30];
 
+/*
+ * read_records() calls back here for each record it gets
+ */
+static bool record_cb(DCR *in_dcr, DEV_RECORD *rec)
+{
    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 
+   /*
+    * Check for Start or End of Session Record
     *
     */
    if (rec->FileIndex < 0) {
+      get_session_record(in_dcr->dev, rec, &sessrec);
 
       if (verbose > 1) {
-        dump_label_record(dev, rec, 1);
+         dump_label_record(in_dcr->dev, rec, 1);
       }
       switch (rec->FileIndex) {
-        case PRE_LABEL:
-            Pmsg0(000, "Volume is prelabeled. This volume cannot be copied.\n");
-           return;
-           break;
-        case VOL_LABEL:
-            Pmsg1(000, "VOL_LABEL: OK for Volume: %s\n", mr.VolumeName);
-           break;
-        case SOS_LABEL:
-           break;
-        case EOS_LABEL:
-           break;
-        case EOM_LABEL:
-           break;
-        case EOT_LABEL:              /* end of all tapes */
-           break;
-        default:
-           break;
+      case PRE_LABEL:
+         Pmsg0(000, _("Volume is prelabeled. This volume cannot be copied.\n"));
+         return false;
+      case VOL_LABEL:
+         Pmsg0(000, _("Volume label not copied.\n"));
+         return true;
+      case SOS_LABEL:
+         if (bsr && rec->match_stat < 1) {
+            /* Skipping record, because does not match BSR filter */
+            if (verbose) {
+             Pmsg0(-1, _("Copy skipped. Record does not match BSR filter.\n"));
+            }
+         } else {
+            jobs++;
+         }
+         break;
+      case EOS_LABEL:
+         if (bsr && rec->match_stat < 1) {
+            /* Skipping record, because does not match BSR filter */
+           return true;
+        }
+         while (!write_record_to_block(out_block, rec)) {
+            Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec->data_len,
+                       rec->remainder);
+            if (!write_block_to_device(out_jcr->dcr)) {
+               Dmsg2(90, "Got write_block_to_dev error on device %s: ERR=%s\n",
+                  out_dev->print_name(), out_dev->bstrerror());
+               Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
+                     out_dev->bstrerror());
+               return false;
+            }
+         }
+         if (!write_block_to_device(out_jcr->dcr)) {
+            Dmsg2(90, "Got write_block_to_dev error on device %s: ERR=%s\n",
+               out_dev->print_name(), out_dev->bstrerror());
+            Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
+                  out_dev->bstrerror());
+            return false;
+         }
+         return true;
+      case EOM_LABEL:
+         Pmsg0(000, _("EOM label not copied.\n"));
+         return true;
+      case EOT_LABEL:              /* end of all tapes */
+         Pmsg0(000, _("EOT label not copied.\n"));
+         return true;
+      default:
+         return true;
       }
-      return;
    }
 
    /*  Write record */
-
-   return;
+   if (bsr && rec->match_stat < 1) {
+      /* Skipping record, because does not match BSR filter */
+      return true;
+   }
+   records++;
+   while (!write_record_to_block(out_block, rec)) {
+      Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec->data_len,
+                 rec->remainder);
+      if (!write_block_to_device(out_jcr->dcr)) {
+         Dmsg2(90, "Got write_block_to_dev error on device %s: ERR=%s\n",
+            out_dev->print_name(), out_dev->bstrerror());
+         Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
+               out_dev->bstrerror());
+         return false;
+      }
+   }
+   return true;
 }
 
-/*
- * Free the Job Control Record if no one is still using it.
- *  Called from main free_jcr() routine in src/lib/jcr.c so
- *  that we can do our Director specific cleanup of the jcr.
- */
-static void dird_free_jcr(JCR *jcr)
+static void get_session_record(DEVICE *dev, DEV_RECORD *rec, SESSION_LABEL *sessrec)
 {
-   Dmsg0(200, "Start dird free_jcr\n");
-
-   if (jcr->file_bsock) {
-      Dmsg0(200, "Close File bsock\n");
-      bnet_close(jcr->file_bsock);
-   }
-   if (jcr->store_bsock) {
-      Dmsg0(200, "Close Store bsock\n");
-      bnet_close(jcr->store_bsock);
+   const char *rtype;
+   memset(sessrec, 0, sizeof(sessrec));
+   switch (rec->FileIndex) {
+   case PRE_LABEL:
+      rtype = _("Fresh Volume Label");
+      break;
+   case VOL_LABEL:
+      rtype = _("Volume Label");
+      unser_volume_label(dev, rec);
+      break;
+   case SOS_LABEL:
+      rtype = _("Begin Job Session");
+      unser_session_label(sessrec, rec);
+      break;
+   case EOS_LABEL:
+      rtype = _("End Job Session");
+      unser_session_label(sessrec, rec);
+      break;
+   case 0:
+   case EOM_LABEL:
+      rtype = _("End of Medium");
+      break;
+   default:
+      rtype = _("Unknown");
+      break;
    }
-   if (jcr->RestoreBootstrap) {
-      free(jcr->RestoreBootstrap);
+   Dmsg5(10, "%s Record: VolSessionId=%d VolSessionTime=%d JobId=%d DataLen=%d\n",
+         rtype, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
+   if (verbose) {
+      Pmsg5(-1, _("%s Record: VolSessionId=%d VolSessionTime=%d JobId=%d DataLen=%d\n"),
+            rtype, rec->VolSessionId, rec->VolSessionTime, rec->Stream, rec->data_len);
    }
-   Dmsg0(200, "End dird free_jcr\n");
 }
 
 
-
-/* 
- * Create a JCR as if we are really starting the job
- */
-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.
-    */
-   jobjcr = new_jcr(sizeof(JCR), dird_free_jcr);
-   jobjcr->JobType = jr->Type;
-   jobjcr->JobLevel = jr->Level;
-   jobjcr->JobStatus = jr->JobStatus;
-   strcpy(jobjcr->Job, jr->Job);
-   jobjcr->JobId = JobId;      /* this is JobId on tape */
-   jobjcr->sched_time = jr->SchedTime;
-   jobjcr->start_time = jr->StartTime;
-   jobjcr->VolSessionId = rec->VolSessionId;
-   jobjcr->VolSessionTime = rec->VolSessionTime;
-   jobjcr->ClientId = jr->ClientId;
-   attach_jcr_to_device(dev, jobjcr);
-   return jobjcr;
-}
-
 /* Dummies to replace askdir.c */
-int    dir_get_volume_info(JCR *jcr, int writing) { return 1;}
-int    dir_find_next_appendable_volume(JCR *jcr) { return 1;}
-int    dir_update_volume_info(JCR *jcr, VOLUME_CAT_INFO *vol, int relabel) { return 1; }
-int    dir_create_jobmedia_record(JCR *jcr) { return 1; }
-int    dir_ask_sysop_to_mount_next_volume(JCR *jcr, DEVICE *dev) { return 1; }
-int    dir_update_file_attributes(JCR *jcr, DEV_RECORD *rec) { return 1;}
-int    dir_send_job_status(JCR *jcr) {return 1;}
+bool    dir_find_next_appendable_volume(DCR *dcr) { return 1;}
+bool    dir_update_volume_info(DCR *dcr, bool relabel, bool update_LastWritten) { 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 dir_ask_sysop_to_mount_volume(JCR *jcr, DEVICE *dev)
+bool dir_ask_sysop_to_mount_volume(DCR *dcr, int /*mode*/)
 {
-   /*  
-    * We are at the end of reading a tape. Now, we simulate handling
-    *  the end of writing a tape by wiffling through the attached
-    *  jcrs creating jobmedia records.
-    */
-   Dmsg1(100, "Walk attached jcrs. Volume=%s\n", dev->VolCatInfo.VolCatName);
-   for (JCR *mjcr=NULL; (mjcr=next_attached_jcr(dev, mjcr)); ) {
-      if (verbose) {
-         Pmsg1(000, "create JobMedia for Job %s\n", mjcr->Job);
-      }
-      if (dev->state & ST_TAPE) {
-        mjcr->EndBlock = dev->block_num;
-        mjcr->EndFile = dev->file;
-      } else {
-        mjcr->EndBlock = (uint32_t)dev->file_addr;
-        mjcr->StartBlock = (uint32_t)(dev->file_addr >> 32);
-      }
-      if (!create_jobmedia_record(db, mjcr)) {
-         Pmsg2(000, _("Could not create JobMedia record for Volume=%s Job=%s\n"),
-           dev->VolCatInfo.VolCatName, mjcr->Job);
-      }
-   }
+   DEVICE *dev = dcr->dev;
+   fprintf(stderr, _("Mount Volume \"%s\" on device %s and press return when ready: "),
+      dcr->VolumeName, dev->print_name());
+   dev->close();
+   getchar();
+   return true;
+}
 
-   fprintf(stderr, "Mount Volume %s on device %s and press return when ready: ",
-      jcr->VolumeName, dev_name(dev));
-   getchar();  
+bool dir_get_volume_info(DCR *dcr, enum get_vol_info_rw  writing)
+{
+   Dmsg0(100, "Fake dir_get_volume_info\n");
+   bstrncpy(dcr->VolCatInfo.VolCatName, dcr->VolumeName, sizeof(dcr->VolCatInfo.VolCatName));
+   dcr->VolCatInfo.VolCatParts = find_num_dvd_parts(dcr);
+   Dmsg2(500, "Vol=%s num_parts=%d\n", dcr->VolCatInfo.VolCatName, dcr->VolCatInfo.VolCatParts);
    return 1;
 }