2 * Parse a Bootstrap Records (used for restores)
4 * Kern Sibbald, June MMII
10 Copyright (C) 2002 Kern Sibbald and John Walker
12 This program is free software; you can redistribute it and/or
13 modify it under the terms of the GNU General Public License as
14 published by the Free Software Foundation; either version 2 of
15 the License, or (at your option) any later version.
17 This program is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
20 General Public License for more details.
22 You should have received a copy of the GNU General Public
23 License along with this program; if not, write to the Free
32 typedef BSR * (ITEM_HANDLER)(LEX *lc, BSR *bsr);
34 static BSR *store_vol(LEX *lc, BSR *bsr);
35 static BSR *store_client(LEX *lc, BSR *bsr);
36 static BSR *store_job(LEX *lc, BSR *bsr);
37 static BSR *store_jobid(LEX *lc, BSR *bsr);
38 static BSR *store_jobtype(LEX *lc, BSR *bsr);
39 static BSR *store_joblevel(LEX *lc, BSR *bsr);
40 static BSR *store_findex(LEX *lc, BSR *bsr);
41 static BSR *store_sessid(LEX *lc, BSR *bsr);
42 static BSR *store_volfile(LEX *lc, BSR *bsr);
43 static BSR *store_sesstime(LEX *lc, BSR *bsr);
44 static BSR *store_include(LEX *lc, BSR *bsr);
45 static BSR *store_exclude(LEX *lc, BSR *bsr);
46 static BSR *store_stream(LEX *lc, BSR *bsr);
47 static BSR *store_slot(LEX *lc, BSR *bsr);
51 ITEM_HANDLER *handler;
55 * List of all keywords permitted in bsr files and their handlers
57 struct kw_items items[] = {
58 {"volume", store_vol},
59 {"client", store_client},
61 {"jobid", store_jobid},
62 {"fileindex", store_findex},
63 {"jobtype", store_jobtype},
64 {"joblevel", store_joblevel},
65 {"volsessionid", store_sessid},
66 {"volsessiontime", store_sesstime},
67 {"include", store_include},
68 {"exclude", store_exclude},
69 {"volfile", store_volfile},
70 {"stream", store_stream},
81 BSR *bsr = (BSR *)malloc(sizeof(BSR));
82 memset(bsr, 0, sizeof(BSR));
87 * Format a scanner error message
89 static void s_err(char *file, int line, LEX *lc, char *msg, ...)
91 JCR *jcr = (JCR *)(lc->caller_ctx);
95 va_start(arg_ptr, msg);
96 bvsnprintf(buf, sizeof(buf), msg, arg_ptr);
100 Jmsg(jcr, M_FATAL, 0, _("Bootstrap file error: %s\n\
101 : Line %d, col %d of file %s\n%s\n"),
102 buf, lc->line_no, lc->col_no, lc->fname, lc->line);
104 e_msg(file, line, M_FATAL, 0, _("Bootstrap file error: %s\n\
105 : Line %d, col %d of file %s\n%s\n"),
106 buf, lc->line_no, lc->col_no, lc->fname, lc->line);
111 /*********************************************************************
113 * Parse Bootstrap file
116 BSR *parse_bsr(JCR *jcr, char *cf)
120 BSR *root_bsr = new_bsr();
123 Dmsg1(200, "Enter parse_bsf %s\n", cf);
124 lc = lex_open_file(lc, cf, s_err);
125 lc->caller_ctx = (void *)jcr;
126 while ((token=lex_get_token(lc, T_ALL)) != T_EOF) {
127 Dmsg1(200, "parse got token=%s\n", lex_tok_to_str(token));
128 if (token == T_EOL) {
131 for (i=0; items[i].name; i++) {
132 if (strcasecmp(items[i].name, lc->str) == 0) {
133 token = lex_get_token(lc, T_ALL);
134 Dmsg1 (200, "in T_IDENT got token=%s\n", lex_tok_to_str(token));
135 if (token != T_EQUALS) {
136 scan_err1(lc, "expected an equals, got: %s", lc->str);
140 Dmsg1(200, "calling handler for %s\n", items[i].name);
141 /* Call item handler */
142 bsr = items[i].handler(lc, bsr);
148 Dmsg1(200, "Keyword = %s\n", lc->str);
149 scan_err1(lc, "Keyword %s not found", lc->str);
157 lc = lex_close_file(lc);
158 Dmsg0(200, "Leave parse_bsf()\n");
166 static BSR *store_vol(LEX *lc, BSR *bsr)
172 token = lex_get_token(lc, T_STRING);
173 if (token == T_ERROR) {
176 /* This may actually be more than one volume separated by a |
177 * If so, separate them.
179 for (p=lc->str; p && *p; ) {
184 volume = (BSR_VOLUME *)malloc(sizeof(BSR_VOLUME));
185 memset(volume, 0, sizeof(BSR_VOLUME));
186 strcpy(volume->VolumeName, p);
187 /* Add it to the end of the volume chain */
189 bsr->volume = volume;
191 BSR_VOLUME *bc = bsr->volume;
192 for ( ;bc->next; bc=bc->next)
201 static BSR *store_client(LEX *lc, BSR *bsr)
207 token = lex_get_token(lc, T_NAME);
208 if (token == T_ERROR) {
211 client = (BSR_CLIENT *)malloc(sizeof(BSR_CLIENT));
212 memset(client, 0, sizeof(BSR_CLIENT));
213 strcpy(client->ClientName, lc->str);
214 /* Add it to the end of the client chain */
216 bsr->client = client;
218 BSR_CLIENT *bc = bsr->client;
219 for ( ;bc->next; bc=bc->next)
223 token = lex_get_token(lc, T_ALL);
224 if (token != T_COMMA) {
231 static BSR *store_job(LEX *lc, BSR *bsr)
237 token = lex_get_token(lc, T_NAME);
238 if (token == T_ERROR) {
241 job = (BSR_JOB *)malloc(sizeof(BSR_JOB));
242 memset(job, 0, sizeof(BSR_JOB));
243 strcpy(job->Job, lc->str);
244 /* Add it to the end of the client chain */
248 /* Add to end of chain */
249 BSR_JOB *bc = bsr->job;
250 for ( ;bc->next; bc=bc->next)
254 token = lex_get_token(lc, T_ALL);
255 if (token != T_COMMA) {
262 static BSR *store_findex(LEX *lc, BSR *bsr)
268 token = lex_get_token(lc, T_PINT32_RANGE);
269 if (token == T_ERROR) {
272 findex = (BSR_FINDEX *)malloc(sizeof(BSR_FINDEX));
273 memset(findex, 0, sizeof(BSR_FINDEX));
274 findex->findex = lc->pint32_val;
275 findex->findex2 = lc->pint32_val2;
276 /* Add it to the end of the chain */
277 if (!bsr->FileIndex) {
278 bsr->FileIndex = findex;
280 /* Add to end of chain */
281 BSR_FINDEX *bs = bsr->FileIndex;
282 for ( ;bs->next; bs=bs->next)
286 token = lex_get_token(lc, T_ALL);
287 if (token != T_COMMA) {
295 static BSR *store_jobid(LEX *lc, BSR *bsr)
301 token = lex_get_token(lc, T_PINT32_RANGE);
302 if (token == T_ERROR) {
305 jobid = (BSR_JOBID *)malloc(sizeof(BSR_JOBID));
306 memset(jobid, 0, sizeof(BSR_JOBID));
307 jobid->JobId = lc->pint32_val;
308 jobid->JobId2 = lc->pint32_val2;
309 /* Add it to the end of the chain */
313 /* Add to end of chain */
314 BSR_JOBID *bs = bsr->JobId;
315 for ( ;bs->next; bs=bs->next)
319 token = lex_get_token(lc, T_ALL);
320 if (token != T_COMMA) {
327 static BSR *store_jobtype(LEX *lc, BSR *bsr)
329 /* *****FIXME****** */
330 Dmsg0(-1, "JobType not yet implemented\n");
335 static BSR *store_joblevel(LEX *lc, BSR *bsr)
337 /* *****FIXME****** */
338 Dmsg0(-1, "JobLevel not yet implemented\n");
346 * Routine to handle Volume start/end file
348 static BSR *store_volfile(LEX *lc, BSR *bsr)
351 BSR_VOLFILE *volfile;
354 token = lex_get_token(lc, T_PINT32_RANGE);
355 if (token == T_ERROR) {
358 volfile = (BSR_VOLFILE *)malloc(sizeof(BSR_VOLFILE));
359 memset(volfile, 0, sizeof(BSR_VOLFILE));
360 volfile->sfile = lc->pint32_val;
361 volfile->efile = lc->pint32_val2;
362 /* Add it to the end of the chain */
364 bsr->volfile = volfile;
366 /* Add to end of chain */
367 BSR_VOLFILE *bs = bsr->volfile;
368 for ( ;bs->next; bs=bs->next)
372 token = lex_get_token(lc, T_ALL);
373 if (token != T_COMMA) {
382 static BSR *store_sessid(LEX *lc, BSR *bsr)
388 token = lex_get_token(lc, T_PINT32_RANGE);
389 if (token == T_ERROR) {
392 sid = (BSR_SESSID *)malloc(sizeof(BSR_SESSID));
393 memset(sid, 0, sizeof(BSR_SESSID));
394 sid->sessid = lc->pint32_val;
395 sid->sessid2 = lc->pint32_val2;
396 /* Add it to the end of the chain */
400 /* Add to end of chain */
401 BSR_SESSID *bs = bsr->sessid;
402 for ( ;bs->next; bs=bs->next)
406 token = lex_get_token(lc, T_ALL);
407 if (token != T_COMMA) {
414 static BSR *store_sesstime(LEX *lc, BSR *bsr)
420 token = lex_get_token(lc, T_PINT32);
421 if (token == T_ERROR) {
424 stime = (BSR_SESSTIME *)malloc(sizeof(BSR_SESSTIME));
425 memset(stime, 0, sizeof(BSR_SESSTIME));
426 stime->sesstime = lc->pint32_val;
427 /* Add it to the end of the chain */
428 if (!bsr->sesstime) {
429 bsr->sesstime = stime;
431 /* Add to end of chain */
432 BSR_SESSTIME *bs = bsr->sesstime;
433 for ( ;bs->next; bs=bs->next)
437 token = lex_get_token(lc, T_ALL);
438 if (token != T_COMMA) {
446 static BSR *store_stream(LEX *lc, BSR *bsr)
452 token = lex_get_token(lc, T_INT32);
453 if (token == T_ERROR) {
456 stream = (BSR_STREAM *)malloc(sizeof(BSR_STREAM));
457 memset(stream, 0, sizeof(BSR_STREAM));
458 stream->stream = lc->int32_val;
459 /* Add it to the end of the chain */
461 bsr->stream = stream;
463 /* Add to end of chain */
464 BSR_STREAM *bs = bsr->stream;
465 for ( ;bs->next; bs=bs->next)
469 token = lex_get_token(lc, T_ALL);
470 if (token != T_COMMA) {
477 static BSR *store_slot(LEX *lc, BSR *bsr)
481 token = lex_get_token(lc, T_PINT32);
482 if (token == T_ERROR) {
485 bsr->Slot = lc->pint32_val;
490 static BSR *store_include(LEX *lc, BSR *bsr)
496 static BSR *store_exclude(LEX *lc, BSR *bsr)
502 void dump_volfile(BSR_VOLFILE *volfile)
505 Dmsg2(-1, "VolFile : %u-%u\n", volfile->sfile, volfile->efile);
506 dump_volfile(volfile->next);
510 void dump_findex(BSR_FINDEX *FileIndex)
513 if (FileIndex->findex == FileIndex->findex2) {
514 Dmsg1(-1, "FileIndex : %u\n", FileIndex->findex);
516 Dmsg2(-1, "FileIndex : %u-%u\n", FileIndex->findex, FileIndex->findex2);
518 dump_findex(FileIndex->next);
522 void dump_jobid(BSR_JOBID *jobid)
525 if (jobid->JobId == jobid->JobId2) {
526 Dmsg1(-1, "JobId : %u\n", jobid->JobId);
528 Dmsg2(-1, "JobId : %u-%u\n", jobid->JobId, jobid->JobId2);
530 dump_jobid(jobid->next);
534 void dump_sessid(BSR_SESSID *sessid)
537 if (sessid->sessid == sessid->sessid2) {
538 Dmsg1(-1, "SessId : %u\n", sessid->sessid);
540 Dmsg2(-1, "SessId : %u-%u\n", sessid->sessid, sessid->sessid2);
542 dump_sessid(sessid->next);
546 void dump_volume(BSR_VOLUME *volume)
549 Dmsg1(-1, "VolumeName : %s\n", volume->VolumeName);
550 dump_volume(volume->next);
555 void dump_client(BSR_CLIENT *client)
558 Dmsg1(-1, "Client : %s\n", client->ClientName);
559 dump_client(client->next);
563 void dump_job(BSR_JOB *job)
566 Dmsg1(-1, "Job : %s\n", job->Job);
571 void dump_sesstime(BSR_SESSTIME *sesstime)
574 Dmsg1(-1, "SessTime : %u\n", sesstime->sesstime);
575 dump_sesstime(sesstime->next);
583 void dump_bsr(BSR *bsr)
586 Dmsg0(-1, "BSR is NULL\n");
590 "Next : 0x%x\n", bsr->next);
591 dump_volume(bsr->volume);
592 dump_sessid(bsr->sessid);
593 dump_sesstime(bsr->sesstime);
594 dump_volfile(bsr->volfile);
595 dump_client(bsr->client);
596 dump_jobid(bsr->JobId);
598 dump_findex(bsr->FileIndex);
607 /*********************************************************************
612 static void free_bsr_item(BSR *bsr)
615 free_bsr_item(bsr->next);
620 void free_bsr(BSR *bsr)
625 free_bsr_item((BSR *)bsr->volume);
626 free_bsr_item((BSR *)bsr->client);
627 free_bsr_item((BSR *)bsr->sessid);
628 free_bsr_item((BSR *)bsr->sesstime);
629 free_bsr_item((BSR *)bsr->volfile);
630 free_bsr_item((BSR *)bsr->JobId);
631 free_bsr_item((BSR *)bsr->job);
632 free_bsr_item((BSR *)bsr->FileIndex);
633 free_bsr_item((BSR *)bsr->JobType);
634 free_bsr_item((BSR *)bsr->JobLevel);
639 /*****************************************************************
640 * Routines for handling volumes
645 vol = (VOL_LIST *)malloc(sizeof(VOL_LIST));
646 memset(vol, 0, sizeof(VOL_LIST));
651 * Add current volume to end of list, only if the Volume
652 * is not already in the list.
654 * returns: 1 if volume added
655 * 0 if volume already in list
657 int add_vol(JCR *jcr, VOL_LIST *vol)
659 VOL_LIST *next = jcr->VolList;
661 if (!next) { /* list empty ? */
662 jcr->VolList = vol; /* yes, add volume */
664 for ( ; next->next; next=next->next) {
665 if (strcmp(vol->VolumeName, next->VolumeName) == 0) {
666 return 0; /* already in list */
669 if (strcmp(vol->VolumeName, next->VolumeName) == 0) {
670 return 0; /* already in list */
672 next->next = vol; /* add volume */
677 void free_vol_list(JCR *jcr)
679 VOL_LIST *next = jcr->VolList;
689 void create_vol_list(JCR *jcr)
695 * Build a list of volume to be processed
701 if (!bsr->volume || !bsr->volume->VolumeName) {
704 strcpy(jcr->VolumeName, bsr->volume->VolumeName); /* setup first volume */
705 for ( ; bsr; bsr=bsr->next) {
706 BSR_VOLUME *bsrvol = bsr->volume;
707 for ( ; bsrvol; bsrvol=bsrvol->next) {
709 strcpy(vol->VolumeName, bsrvol->VolumeName);
710 if (add_vol(jcr, vol)) {
712 Dmsg1(400, "Added volume %s\n", vol->VolumeName);
714 Dmsg1(400, "Duplicate volume %s\n", vol->VolumeName);
720 /* This is the old way -- deprecated */
721 for (p = jcr->VolumeName; p && *p; ) {
722 n = strchr(p, '|'); /* volume name separator */
724 *n++ = 0; /* Terminate name */
727 strcpy(vol->VolumeName, p);
728 if (add_vol(jcr, vol)) {