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