git.sur5r.net Git - bacula/bacula/blob - bacula/src/stored/bcopy.c

   1 /*
   2  *
   3  *  Program to copy a Bacula from one volume to another.
   4  *
   5  *   Kern E. Sibbald, October 2002
   6  *
   7  *
   8  *   Version $Id$
   9  */
  10 /*
  11    Copyright (C) 2002-2004 Kern Sibbald and John Walker
  12
  13    This program is free software; you can redistribute it and/or
  14    modify it under the terms of the GNU General Public License as
  15    published by the Free Software Foundation; either version 2 of
  16    the License, or (at your option) any later version.
  17
  18    This program is distributed in the hope that it will be useful,
  19    but WITHOUT ANY WARRANTY; without even the implied warranty of
  20    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  21    General Public License for more details.
  22
  23    You should have received a copy of the GNU General Public
  24    License along with this program; if not, write to the Free
  25    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  26    MA 02111-1307, USA.
  27
  28  */
  29
  30 #include "bacula.h"
  31 #include "stored.h"
  32
  33 /* Forward referenced functions */
  34 static bool record_cb(JCR *jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec);
  35
  36
  37 /* Global variables */
  38 static DEVICE *in_dev = NULL;
  39 static DEVICE *out_dev = NULL;
  40 static JCR *in_jcr;                    /* input jcr */
  41 static JCR *out_jcr;                   /* output jcr */
  42 static BSR *bsr = NULL;
  43 static const char *wd = "/tmp";
  44 static int list_records = 0;
  45 static uint32_t records = 0;
  46 static uint32_t jobs = 0;
  47 static DEV_BLOCK *out_block;
  48
  49 #define CONFIG_FILE "bacula-sd.conf"
  50 char *configfile;
  51 bool forge_on = true;
  52
  53
  54 static void usage()
  55 {
  56    fprintf(stderr, _(
  57 "\nVersion: " VERSION " (" BDATE ")\n\n"
  58 "Usage: bcopy [-d debug_level] <input-archive> <output-archive>\n"
  59 "       -b bootstrap      specify a bootstrap file\n"
  60 "       -c <file>         specify configuration file\n"
  61 "       -d <nn>           set debug level to nn\n"
  62 "       -i                specify input Volume names (separated by |)\n"
  63 "       -o                specify output Volume names (separated by |)\n"
  64 "       -p                proceed inspite of errors\n"
  65 "       -v                verbose\n"
  66 "       -w <dir>          specify working directory (default /tmp)\n"
  67 "       -?                print this message\n\n"));
  68    exit(1);
  69 }
  70
  71 int main (int argc, char *argv[])
  72 {
  73    int ch;
  74    char *iVolumeName = NULL;
  75    char *oVolumeName = NULL;
  76    bool ignore_label_errors = false;
  77
  78    my_name_is(argc, argv, "bcopy");
  79    init_msg(NULL, NULL);
  80
  81    while ((ch = getopt(argc, argv, "b:c:d:i:o:pvw:?")) != -1) {
  82       switch (ch) {
  83       case 'b':
  84          bsr = parse_bsr(NULL, optarg);
  85          break;
  86
  87       case 'c':                    /* specify config file */
  88          if (configfile != NULL) {
  89             free(configfile);
  90          }
  91          configfile = bstrdup(optarg);
  92          break;
  93
  94       case 'd':                    /* debug level */
  95          debug_level = atoi(optarg);
  96          if (debug_level <= 0)
  97             debug_level = 1;
  98          break;
  99
 100       case 'i':                    /* input Volume name */
 101          iVolumeName = optarg;
 102          break;
 103
 104       case 'o':                    /* output Volume name */
 105          oVolumeName = optarg;
 106          break;
 107
 108       case 'p':
 109          ignore_label_errors = true;
 110          forge_on = true;
 111          break;
 112
 113       case 'v':
 114          verbose++;
 115          break;
 116
 117       case 'w':
 118          wd = optarg;
 119          break;
 120
 121       case '?':
 122       default:
 123          usage();
 124
 125       }
 126    }
 127    argc -= optind;
 128    argv += optind;
 129
 130    if (argc != 2) {
 131       Pmsg0(0, _("Wrong number of arguments: \n"));
 132       usage();
 133    }
 134
 135    working_directory = wd;
 136
 137    if (configfile == NULL) {
 138       configfile = bstrdup(CONFIG_FILE);
 139    }
 140
 141    parse_config(configfile);
 142
 143    /* Setup and acquire input device for reading */
 144    in_jcr = setup_jcr("bcopy", argv[0], bsr, iVolumeName);
 145    in_jcr->ignore_label_errors = ignore_label_errors;
 146    in_dev = setup_to_access_device(in_jcr, 1);   /* read device */
 147    if (!in_dev) {
 148       exit(1);
 149    }
 150
 151    /* Setup output device for writing */
 152    out_jcr = setup_jcr("bcopy", argv[1], bsr, oVolumeName);
 153    out_dev = setup_to_access_device(out_jcr, 0);   /* no acquire */
 154    if (!out_dev) {
 155       exit(1);
 156    }
 157    /* For we must now acquire the device for writing */
 158    lock_device(out_dev);
 159    if (open_dev(out_dev, out_jcr->VolumeName, OPEN_READ_WRITE) < 0) {
 160       Emsg1(M_FATAL, 0, _("dev open failed: %s\n"), out_dev->errmsg);
 161       unlock_device(out_dev);
 162       exit(1);
 163    }
 164    unlock_device(out_dev);
 165    if (!acquire_device_for_append(out_jcr)) {
 166       free_jcr(in_jcr);
 167       exit(1);
 168    }
 169    out_block = out_jcr->dcr->block;
 170
 171    read_records(in_jcr->dcr, record_cb, mount_next_read_volume);
 172    if (!write_block_to_device(out_jcr->dcr, out_block)) {
 173       Pmsg0(000, _("Write of last block failed.\n"));
 174    }
 175
 176    Pmsg2(000, _("%u Jobs copied. %u records copied.\n"), jobs, records);
 177
 178    term_dev(in_dev);
 179    term_dev(out_dev);
 180    free_jcr(in_jcr);
 181    free_jcr(out_jcr);
 182    return 0;
 183 }
 184
 185
 186 /*
 187  * read_records() calls back here for each record it gets
 188  */
 189 static bool record_cb(JCR *in_jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
 190 {
 191    if (list_records) {
 192       Pmsg5(000, _("Record: SessId=%u SessTim=%u FileIndex=%d Stream=%d len=%u\n"),
 193             rec->VolSessionId, rec->VolSessionTime, rec->FileIndex,
 194             rec->Stream, rec->data_len);
 195    }
 196    /*
 197     * Check for Start or End of Session Record
 198     *
 199     */
 200    if (rec->FileIndex < 0) {
 201
 202       if (verbose > 1) {
 203          dump_label_record(dev, rec, 1);
 204       }
 205       switch (rec->FileIndex) {
 206       case PRE_LABEL:
 207          Pmsg0(000, "Volume is prelabeled. This volume cannot be copied.\n");
 208          return false;
 209       case VOL_LABEL:
 210          Pmsg0(000, "Volume label not copied.\n");
 211          return true;
 212       case SOS_LABEL:
 213          jobs++;
 214          break;
 215       case EOS_LABEL:
 216          while (!write_record_to_block(out_block, rec)) {
 217             Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec->data_len,
 218                        rec->remainder);
 219             if (!write_block_to_device(out_jcr->dcr, out_block)) {
 220                Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
 221                   dev_name(out_dev), strerror_dev(out_dev));
 222                Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
 223                      strerror_dev(out_dev));
 224             }
 225          }
 226          if (!write_block_to_device(out_jcr->dcr, out_block)) {
 227             Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
 228                dev_name(out_dev), strerror_dev(out_dev));
 229             Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
 230                   strerror_dev(out_dev));
 231          }
 232          break;
 233       case EOM_LABEL:
 234          Pmsg0(000, "EOM label not copied.\n");
 235          return true;
 236       case EOT_LABEL:              /* end of all tapes */
 237          Pmsg0(000, "EOT label not copied.\n");
 238          return true;
 239       default:
 240          break;
 241       }
 242    }
 243
 244    /*  Write record */
 245    records++;
 246    while (!write_record_to_block(out_block, rec)) {
 247       Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec->data_len,
 248                  rec->remainder);
 249       if (!write_block_to_device(out_jcr->dcr, out_block)) {
 250          Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
 251             dev_name(out_dev), strerror_dev(out_dev));
 252          Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
 253                strerror_dev(out_dev));
 254          break;
 255       }
 256    }
 257    return true;
 258 }
 259
 260
 261 /* Dummies to replace askdir.c */
 262 bool    dir_get_volume_info(JCR *jcr, enum get_vol_info_rw  writing) { return 1;}
 263 bool    dir_find_next_appendable_volume(JCR *jcr) { return 1;}
 264 bool    dir_update_volume_info(JCR *jcr, bool relabel) { return 1; }
 265 bool    dir_create_jobmedia_record(JCR *jcr) { return 1; }
 266 bool    dir_ask_sysop_to_create_appendable_volume(JCR *jcr) { return 1; }
 267 bool    dir_update_file_attributes(JCR *jcr, DEV_RECORD *rec) { return 1;}
 268 bool    dir_send_job_status(JCR *jcr) {return 1;}
 269
 270
 271 bool dir_ask_sysop_to_mount_volume(JCR *jcr)
 272 {
 273    DEVICE *dev = jcr->dcr->dev;
 274    fprintf(stderr, "Mount Volume \"%s\" on device %s and press return when ready: ",
 275       jcr->VolumeName, dev_name(dev));
 276    getchar();
 277    return true;
 278 }