]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/stored/bcopy.c
Implement first cut DCR in SD
[bacula/bacula] / 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 int 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 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
52
53 static void usage()
54 {
55    fprintf(stderr, _(
56 "\nVersion: " VERSION " (" BDATE ")\n\n"
57 "Usage: bcopy [-d debug_level] <input-archive> <output-archive>\n"
58 "       -b bootstrap      specify a bootstrap file\n"
59 "       -c <file>         specify configuration file\n"
60 "       -d <nn>           set debug level to nn\n"
61 "       -i                specify input Volume names (separated by |)\n"
62 "       -o                specify output Volume names (separated by |)\n"
63 "       -p                proceed inspite of errors\n"
64 "       -v                verbose\n"
65 "       -w <dir>          specify working directory (default /tmp)\n"
66 "       -?                print this message\n\n"));
67    exit(1);
68 }
69
70 int main (int argc, char *argv[])
71 {
72    int ch;
73    char *iVolumeName = NULL;
74    char *oVolumeName = NULL;
75    bool ignore_label_errors = false;
76
77    my_name_is(argc, argv, "bcopy");
78    init_msg(NULL, NULL);
79
80    while ((ch = getopt(argc, argv, "b:c:d:i:o:pvw:?")) != -1) {
81       switch (ch) {
82       case 'b':
83          bsr = parse_bsr(NULL, optarg);
84          break;
85
86       case 'c':                    /* specify config file */
87          if (configfile != NULL) {
88             free(configfile);
89          }
90          configfile = bstrdup(optarg);
91          break;
92
93       case 'd':                    /* debug level */
94          debug_level = atoi(optarg);
95          if (debug_level <= 0)
96             debug_level = 1; 
97          break;
98
99       case 'i':                    /* input Volume name */
100          iVolumeName = optarg;
101          break;
102
103       case 'o':                    /* output Volume name */
104          oVolumeName = optarg;
105          break;
106
107       case 'p':
108          ignore_label_errors = true;
109          break;
110   
111       case 'v':
112          verbose++;
113          break;
114
115       case 'w':
116          wd = optarg;
117          break;
118
119       case '?':
120       default:
121          usage();
122
123       }  
124    }
125    argc -= optind;
126    argv += optind;
127
128    if (argc != 2) {
129       Pmsg0(0, _("Wrong number of arguments: \n"));
130       usage();
131    }
132
133    working_directory = wd;
134
135    if (configfile == NULL) {
136       configfile = bstrdup(CONFIG_FILE);
137    }
138
139    parse_config(configfile);
140
141    /* Setup and acquire input device for reading */
142    in_jcr = setup_jcr("bcopy", argv[0], bsr, iVolumeName);
143    in_jcr->ignore_label_errors = ignore_label_errors;
144    in_dev = setup_to_access_device(in_jcr, 1);   /* read device */
145    if (!in_dev) { 
146       exit(1);
147    }
148
149    /* Setup output device for writing */
150    out_jcr = setup_jcr("bcopy", argv[1], bsr, oVolumeName);
151    out_dev = setup_to_access_device(out_jcr, 0);   /* no acquire */  
152    if (!out_dev) { 
153       exit(1);      
154    }
155    /* For we must now acquire the device for writing */
156    lock_device(out_dev);
157    if (open_dev(out_dev, out_jcr->VolumeName, READ_WRITE) < 0) {
158       Emsg1(M_FATAL, 0, _("dev open failed: %s\n"), out_dev->errmsg);
159       unlock_device(out_dev);
160       exit(1);
161    }
162    unlock_device(out_dev);
163    if (!acquire_device_for_append(out_jcr)) {
164       free_jcr(in_jcr);
165       exit(1);
166    }
167    out_block = out_jcr->dcr->block;
168
169    read_records(in_jcr, in_dev, record_cb, mount_next_read_volume);
170    if (!write_block_to_device(out_jcr, out_dev, out_block)) {
171       Pmsg0(000, _("Write of last block failed.\n"));
172    }
173
174    Pmsg2(000, _("%u Jobs copied. %u records copied.\n"), jobs, records);
175
176    term_dev(in_dev);
177    term_dev(out_dev);
178    free_jcr(in_jcr);
179    free_jcr(out_jcr);
180    return 0;
181 }
182   
183
184 /*
185  * read_records() calls back here for each record it gets
186  */
187 static int record_cb(JCR *in_jcr, DEVICE *dev, DEV_BLOCK *block, DEV_RECORD *rec)
188 {
189    if (list_records) {
190       Pmsg5(000, _("Record: SessId=%u SessTim=%u FileIndex=%d Stream=%d len=%u\n"),
191             rec->VolSessionId, rec->VolSessionTime, rec->FileIndex, 
192             rec->Stream, rec->data_len);
193    }
194    /* 
195     * Check for Start or End of Session Record 
196     *
197     */
198    if (rec->FileIndex < 0) {
199
200       if (verbose > 1) {
201          dump_label_record(dev, rec, 1);
202       }
203       switch (rec->FileIndex) {
204       case PRE_LABEL:
205          Pmsg0(000, "Volume is prelabeled. This volume cannot be copied.\n");
206          return 1;
207       case VOL_LABEL:
208          Pmsg0(000, "Volume label not copied.\n");
209          return 1;
210       case SOS_LABEL:
211          jobs++;
212          break;
213       case EOS_LABEL:
214          while (!write_record_to_block(out_block, rec)) {
215             Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec->data_len,
216                        rec->remainder);
217             if (!write_block_to_device(out_jcr, out_dev, out_block)) {
218                Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
219                   dev_name(out_dev), strerror_dev(out_dev));
220                Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
221                      strerror_dev(out_dev));
222             }
223          }
224          if (!write_block_to_device(out_jcr, out_dev, out_block)) {
225             Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
226                dev_name(out_dev), strerror_dev(out_dev));
227             Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
228                   strerror_dev(out_dev));
229          }
230          break;
231       case EOM_LABEL:
232          Pmsg0(000, "EOM label not copied.\n");
233          return 1;
234       case EOT_LABEL:              /* end of all tapes */
235          Pmsg0(000, "EOT label not copied.\n");
236          return 1;
237       default:
238          break;
239       }
240    }
241
242    /*  Write record */
243    records++;
244    while (!write_record_to_block(out_block, rec)) {
245       Dmsg2(150, "!write_record_to_block data_len=%d rem=%d\n", rec->data_len,
246                  rec->remainder);
247       if (!write_block_to_device(out_jcr, out_dev, out_block)) {
248          Dmsg2(90, "Got write_block_to_dev error on device %s. %s\n",
249             dev_name(out_dev), strerror_dev(out_dev));
250          Jmsg(out_jcr, M_FATAL, 0, _("Cannot fixup device error. %s\n"),
251                strerror_dev(out_dev));
252          break;
253       }
254    }
255    return 1;
256 }
257
258
259 /* Dummies to replace askdir.c */
260 int     dir_get_volume_info(JCR *jcr, enum get_vol_info_rw  writing) { return 1;}
261 int     dir_find_next_appendable_volume(JCR *jcr) { return 1;}
262 int     dir_update_volume_info(JCR *jcr, DEVICE *dev, int relabel) { return 1; }
263 int     dir_create_jobmedia_record(JCR *jcr) { return 1; }
264 int     dir_ask_sysop_to_create_appendable_volume(JCR *jcr, DEVICE *dev) { return 1; }
265 int     dir_update_file_attributes(JCR *jcr, DEV_RECORD *rec) { return 1;}
266 int     dir_send_job_status(JCR *jcr) {return 1;}
267
268
269 int dir_ask_sysop_to_mount_volume(JCR *jcr, DEVICE *dev)
270 {
271    fprintf(stderr, "Mount Volume \"%s\" on device \"%s\" and press return when ready: ",
272       in_jcr->VolumeName, dev_name(dev));
273    getchar();   
274    return 1;
275 }