]> git.sur5r.net Git - bacula/bacula/blob - bacula/src/dird/dird_conf.c
Fix counter bugs reported by Chris Allen
[bacula/bacula] / bacula / src / dird / dird_conf.c
1 /*
2  *   Main configuration file parser for Bacula Directors,
3  *    some parts may be split into separate files such as
4  *    the schedule configuration (run_config.c).
5  *
6  *   Note, the configuration file parser consists of three parts
7  *
8  *   1. The generic lexical scanner in lib/lex.c and lib/lex.h
9  *
10  *   2. The generic config  scanner in lib/parse_config.c and 
11  *      lib/parse_config.h.
12  *      These files contain the parser code, some utility
13  *      routines, and the common store routines (name, int,
14  *      string).
15  *
16  *   3. The daemon specific file, which contains the Resource
17  *      definitions as well as any specific store routines
18  *      for the resource records.
19  *
20  *     Kern Sibbald, January MM
21  *
22  *     Version $Id$
23  */
24 /*
25    Copyright (C) 2000-2003 Kern Sibbald and John Walker
26
27    This program is free software; you can redistribute it and/or
28    modify it under the terms of the GNU General Public License as
29    published by the Free Software Foundation; either version 2 of
30    the License, or (at your option) any later version.
31
32    This program is distributed in the hope that it will be useful,
33    but WITHOUT ANY WARRANTY; without even the implied warranty of
34    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
35    General Public License for more details.
36
37    You should have received a copy of the GNU General Public
38    License along with this program; if not, write to the Free
39    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
40    MA 02111-1307, USA.
41
42  */
43
44 #include "bacula.h"
45 #include "dird.h"
46
47 /* Define the first and last resource ID record
48  * types. Note, these should be unique for each
49  * daemon though not a requirement.
50  */
51 int r_first = R_FIRST;
52 int r_last  = R_LAST;
53
54 pthread_mutex_t res_mutex =  PTHREAD_MUTEX_INITIALIZER;
55
56 /* Imported subroutines */
57 extern void store_run(LEX *lc, struct res_items *item, int index, int pass);
58 extern void store_finc(LEX *lc, struct res_items *item, int index, int pass);
59 extern void store_inc(LEX *lc, struct res_items *item, int index, int pass);
60
61
62 /* Forward referenced subroutines */
63
64 static void store_backup(LEX *lc, struct res_items *item, int index, int pass);
65 static void store_restore(LEX *lc, struct res_items *item, int index, int pass);
66 static void store_jobtype(LEX *lc, struct res_items *item, int index, int pass);
67 static void store_level(LEX *lc, struct res_items *item, int index, int pass);
68 static void store_replace(LEX *lc, struct res_items *item, int index, int pass);
69
70
71 /* We build the current resource here as we are
72  * scanning the resource configuration definition,
73  * then move it to allocated memory when the resource
74  * scan is complete.
75  */
76 URES res_all;
77 int  res_all_size = sizeof(res_all);
78
79
80 /* Definition of records permitted within each
81  * resource with the routine to process the record 
82  * information.  NOTE! quoted names must be in lower case.
83  */ 
84 /* 
85  *    Director Resource
86  *
87  *   name          handler     value                 code flags    default_value
88  */
89 static struct res_items dir_items[] = {
90    {"name",        store_name,     ITEM(res_dir.hdr.name), 0, ITEM_REQUIRED, 0},
91    {"description", store_str,      ITEM(res_dir.hdr.desc), 0, 0, 0},
92    {"messages",    store_res,      ITEM(res_dir.messages), R_MSGS, 0, 0},
93    {"dirport",     store_pint,     ITEM(res_dir.DIRport),  0, ITEM_DEFAULT, 9101},
94    {"diraddress",  store_str,      ITEM(res_dir.DIRaddr),  0, 0, 0},
95    {"queryfile",   store_dir,      ITEM(res_dir.query_file), 0, ITEM_REQUIRED, 0},
96    {"workingdirectory", store_dir, ITEM(res_dir.working_directory), 0, ITEM_REQUIRED, 0},
97    {"piddirectory",store_dir,     ITEM(res_dir.pid_directory), 0, ITEM_REQUIRED, 0},
98    {"subsysdirectory", store_dir,  ITEM(res_dir.subsys_directory), 0, 0, 0},
99    {"requiressl",  store_yesno,    ITEM(res_dir.require_ssl), 1, ITEM_DEFAULT, 0},
100    {"enablessl",   store_yesno,    ITEM(res_dir.enable_ssl), 1, ITEM_DEFAULT, 0},
101    {"maximumconcurrentjobs", store_pint, ITEM(res_dir.MaxConcurrentJobs), 0, ITEM_DEFAULT, 1},
102    {"password",    store_password, ITEM(res_dir.password), 0, ITEM_REQUIRED, 0},
103    {"fdconnecttimeout", store_time,ITEM(res_dir.FDConnectTimeout), 0, ITEM_DEFAULT, 60 * 30},
104    {"sdconnecttimeout", store_time,ITEM(res_dir.SDConnectTimeout), 0, ITEM_DEFAULT, 60 * 30},
105    {NULL, NULL, NULL, 0, 0, 0}
106 };
107
108 /* 
109  *    Console Resource
110  *
111  *   name          handler     value                 code flags    default_value
112  */
113 static struct res_items con_items[] = {
114    {"name",        store_name,     ITEM(res_con.hdr.name), 0, ITEM_REQUIRED, 0},
115    {"description", store_str,      ITEM(res_con.hdr.desc), 0, 0, 0},
116    {"enablessl",   store_yesno,    ITEM(res_con.enable_ssl), 1, ITEM_DEFAULT, 0},
117    {"password",    store_password, ITEM(res_con.password), 0, ITEM_REQUIRED, 0},
118    {NULL, NULL, NULL, 0, 0, 0}
119 };
120
121
122 /* 
123  *    Client or File daemon resource
124  *
125  *   name          handler     value                 code flags    default_value
126  */
127
128 static struct res_items cli_items[] = {
129    {"name",     store_name,       ITEM(res_client.hdr.name), 0, ITEM_REQUIRED, 0},
130    {"description", store_str,     ITEM(res_client.hdr.desc), 0, 0, 0},
131    {"address",  store_str,        ITEM(res_client.address),  0, ITEM_REQUIRED, 0},
132    {"fdport",   store_pint,       ITEM(res_client.FDport),   0, ITEM_DEFAULT, 9102},
133    {"password", store_password,   ITEM(res_client.password), 0, ITEM_REQUIRED, 0},
134    {"catalog",  store_res,        ITEM(res_client.catalog),  R_CATALOG, 0, 0},
135    {"fileretention", store_time,  ITEM(res_client.FileRetention), 0, ITEM_DEFAULT, 60*60*24*60},
136    {"jobretention",  store_time,  ITEM(res_client.JobRetention),  0, ITEM_DEFAULT, 60*60*24*180},
137    {"autoprune", store_yesno,     ITEM(res_client.AutoPrune), 1, ITEM_DEFAULT, 1},
138    {"enablessl", store_yesno,     ITEM(res_client.enable_ssl), 1, ITEM_DEFAULT, 0},
139    {"maximumconcurrentjobs", store_pint, ITEM(res_client.MaxConcurrentJobs), 0, ITEM_DEFAULT, 1},
140    {NULL, NULL, NULL, 0, 0, 0} 
141 };
142
143 /* Storage daemon resource
144  *
145  *   name          handler     value                 code flags    default_value
146  */
147 static struct res_items store_items[] = {
148    {"name",      store_name,     ITEM(res_store.hdr.name),   0, ITEM_REQUIRED, 0},
149    {"description", store_str,    ITEM(res_store.hdr.desc),   0, 0, 0},
150    {"sdport",    store_pint,     ITEM(res_store.SDport),     0, ITEM_DEFAULT, 9103},
151    {"sddport",   store_pint,     ITEM(res_store.SDDport),    0, 0, 0}, /* deprecated */
152    {"address",   store_str,      ITEM(res_store.address),    0, ITEM_REQUIRED, 0},
153    {"password",  store_password, ITEM(res_store.password),   0, ITEM_REQUIRED, 0},
154    {"device",    store_strname,  ITEM(res_store.dev_name),   0, ITEM_REQUIRED, 0},
155    {"mediatype", store_strname,  ITEM(res_store.media_type), 0, ITEM_REQUIRED, 0},
156    {"autochanger", store_yesno,  ITEM(res_store.autochanger), 1, ITEM_DEFAULT, 0},
157    {"enablessl", store_yesno,    ITEM(res_store.enable_ssl),  1, ITEM_DEFAULT, 0},
158    {"maximumconcurrentjobs", store_pint, ITEM(res_store.MaxConcurrentJobs), 0, ITEM_DEFAULT, 1},
159    {NULL, NULL, NULL, 0, 0, 0} 
160 };
161
162 /* 
163  *    Catalog Resource Directives
164  *
165  *   name          handler     value                 code flags    default_value
166  */
167 static struct res_items cat_items[] = {
168    {"name",     store_name,     ITEM(res_cat.hdr.name),    0, ITEM_REQUIRED, 0},
169    {"description", store_str,   ITEM(res_cat.hdr.desc),    0, 0, 0},
170    {"address",  store_str,      ITEM(res_cat.db_address),  0, 0, 0},
171    {"dbaddress", store_str,     ITEM(res_cat.db_address),  0, 0, 0},
172    {"dbport",   store_pint,     ITEM(res_cat.db_port),      0, 0, 0},
173    /* keep this password as store_str for the moment */
174    {"password", store_str,      ITEM(res_cat.db_password), 0, 0, 0},
175    {"user",     store_str,      ITEM(res_cat.db_user),     0, 0, 0},
176    {"dbname",   store_str,      ITEM(res_cat.db_name),     0, ITEM_REQUIRED, 0},
177    {"dbsocket", store_str,      ITEM(res_cat.db_socket),   0, 0, 0}, 
178    {NULL, NULL, NULL, 0, 0, 0} 
179 };
180
181 /* 
182  *    Job Resource Directives
183  *
184  *   name          handler     value                 code flags    default_value
185  */
186 static struct res_items job_items[] = {
187    {"name",     store_name,    ITEM(res_job.hdr.name), 0, ITEM_REQUIRED, 0},
188    {"description", store_str,  ITEM(res_job.hdr.desc), 0, 0, 0},
189    {"backup",   store_backup,  ITEM(res_job),          JT_BACKUP, 0, 0},
190    {"verify",   store_backup,  ITEM(res_job),          JT_VERIFY, 0, 0},
191    {"restore",  store_restore, ITEM(res_job),          JT_RESTORE, 0, 0},
192    {"schedule", store_res,     ITEM(res_job.schedule), R_SCHEDULE, 0, 0},
193    {"type",     store_jobtype, ITEM(res_job),          0, 0, 0},
194    {"level",    store_level,   ITEM(res_job),          0, 0, 0},
195    {"messages", store_res,     ITEM(res_job.messages), R_MSGS, 0, 0},
196    {"storage",  store_res,     ITEM(res_job.storage),  R_STORAGE, 0, 0},
197    {"pool",     store_res,     ITEM(res_job.pool),     R_POOL, 0, 0},
198    {"client",   store_res,     ITEM(res_job.client),   R_CLIENT, 0, 0},
199    {"fileset",  store_res,     ITEM(res_job.fileset),  R_FILESET, 0, 0},
200    {"where",    store_dir,     ITEM(res_job.RestoreWhere), 0, 0, 0},
201    {"replace",  store_replace, ITEM(res_job.replace), 0, ITEM_DEFAULT, REPLACE_ALWAYS},
202    {"bootstrap",store_dir,     ITEM(res_job.RestoreBootstrap), 0, 0, 0},
203    {"maxruntime", store_time,  ITEM(res_job.MaxRunTime), 0, 0, 0},
204    {"maxstartdelay", store_time,ITEM(res_job.MaxStartDelay), 0, 0, 0},
205    {"prefixlinks", store_yesno, ITEM(res_job.PrefixLinks), 1, ITEM_DEFAULT, 0},
206    {"prunejobs",   store_yesno, ITEM(res_job.PruneJobs), 1, ITEM_DEFAULT, 0},
207    {"prunefiles",  store_yesno, ITEM(res_job.PruneFiles), 1, ITEM_DEFAULT, 0},
208    {"prunevolumes", store_yesno, ITEM(res_job.PruneVolumes), 1, ITEM_DEFAULT, 0},
209    {"runbeforejob", store_str,  ITEM(res_job.RunBeforeJob), 0, 0, 0},
210    {"runafterjob",  store_str,  ITEM(res_job.RunAfterJob),  0, 0, 0},
211    {"clientrunbeforejob", store_str,  ITEM(res_job.ClientRunBeforeJob), 0, 0, 0},
212    {"clientrunafterjob",  store_str,  ITEM(res_job.ClientRunAfterJob),  0, 0, 0},
213    {"spoolattributes", store_yesno, ITEM(res_job.SpoolAttributes), 1, ITEM_DEFAULT, 0},
214    {"writebootstrap", store_dir, ITEM(res_job.WriteBootstrap), 0, 0, 0},
215    {"maximumconcurrentjobs", store_pint, ITEM(res_job.MaxConcurrentJobs), 0, ITEM_DEFAULT, 1},
216    {"rescheduleonerror", store_yesno, ITEM(res_job.RescheduleOnError), 1, ITEM_DEFAULT, 0},
217    {"rescheduleinterval", store_time, ITEM(res_job.RescheduleInterval), 0, ITEM_DEFAULT, 60 * 30},
218    {"rescheduletimes", store_pint, ITEM(res_job.RescheduleTimes), 0, 0, 0},
219    {"priority",   store_pint, ITEM(res_job.Priority), 0, ITEM_DEFAULT, 10},
220    {NULL, NULL, NULL, 0, 0, 0} 
221 };
222
223 /* FileSet resource
224  *
225  *   name          handler     value                 code flags    default_value
226  */
227 static struct res_items fs_items[] = {
228    {"name",        store_name, ITEM(res_fs.hdr.name), 0, ITEM_REQUIRED, 0},
229    {"description", store_str,  ITEM(res_fs.hdr.desc), 0, 0, 0},
230    {"include",     store_inc,  NULL,                  0, ITEM_NO_EQUALS, 0},
231    {"exclude",     store_inc,  NULL,                  1, ITEM_NO_EQUALS, 0},
232    {NULL,          NULL,       NULL,                  0, 0, 0} 
233 };
234
235 /* Schedule -- see run_conf.c */
236 /* Schedule
237  *
238  *   name          handler     value                 code flags    default_value
239  */
240 static struct res_items sch_items[] = {
241    {"name",     store_name,  ITEM(res_sch.hdr.name), 0, ITEM_REQUIRED, 0},
242    {"description", store_str, ITEM(res_sch.hdr.desc), 0, 0, 0},
243    {"run",      store_run,   ITEM(res_sch.run),      0, 0, 0},
244    {NULL, NULL, NULL, 0, 0, 0} 
245 };
246
247 /* Group resource -- not implemented
248  *
249  *   name          handler     value                 code flags    default_value
250  */
251 static struct res_items group_items[] = {
252    {"name",        store_name, ITEM(res_group.hdr.name), 0, ITEM_REQUIRED, 0},
253    {"description", store_str,  ITEM(res_group.hdr.desc), 0, 0, 0},
254    {NULL, NULL, NULL, 0, 0, 0} 
255 };
256
257 /* Pool resource
258  *
259  *   name             handler     value                        code flags default_value
260  */
261 static struct res_items pool_items[] = {
262    {"name",            store_name,    ITEM(res_pool.hdr.name),      0, ITEM_REQUIRED, 0},
263    {"description",     store_str,     ITEM(res_pool.hdr.desc),      0, 0,     0},
264    {"pooltype",        store_strname, ITEM(res_pool.pool_type),     0, ITEM_REQUIRED, 0},
265    {"labelformat",     store_strname, ITEM(res_pool.label_format),  0, 0,     0},
266    {"cleaningprefix",  store_strname, ITEM(res_pool.cleaning_prefix),  0, 0,     0},
267    {"usecatalog",      store_yesno, ITEM(res_pool.use_catalog),     1, ITEM_DEFAULT,  1},
268    {"usevolumeonce",   store_yesno, ITEM(res_pool.use_volume_once), 1, 0,        0},
269    {"purgeoldestvolume", store_yesno, ITEM(res_pool.purge_oldest_volume), 1, 0, 0},
270    {"recycleoldestvolume", store_yesno, ITEM(res_pool.recycle_oldest_volume), 1, 0, 0},
271    {"recyclecurrentvolume", store_yesno, ITEM(res_pool.recycle_current_volume), 1, 0, 0},
272    {"maximumvolumes",  store_pint,  ITEM(res_pool.max_volumes),     0, 0,        0},
273    {"maximumvolumejobs", store_pint,  ITEM(res_pool.MaxVolJobs),    0, 0,       0},
274    {"maximumvolumefiles", store_pint, ITEM(res_pool.MaxVolFiles),   0, 0,       0},
275    {"maximumvolumebytes", store_size, ITEM(res_pool.MaxVolBytes),   0, 0,       0},
276    {"acceptanyvolume", store_yesno, ITEM(res_pool.accept_any_volume), 1, ITEM_DEFAULT,     1},
277    {"catalogfiles",    store_yesno, ITEM(res_pool.catalog_files),   1, ITEM_DEFAULT,  1},
278    {"volumeretention", store_time,  ITEM(res_pool.VolRetention),    0, ITEM_DEFAULT, 60*60*24*365},
279    {"volumeuseduration", store_time,  ITEM(res_pool.VolUseDuration),0, 0, 0},
280    {"autoprune",       store_yesno, ITEM(res_pool.AutoPrune), 1, ITEM_DEFAULT, 1},
281    {"recycle",         store_yesno, ITEM(res_pool.Recycle),     1, ITEM_DEFAULT, 1},
282    {NULL, NULL, NULL, 0, 0, 0} 
283 };
284
285 /* 
286  * Counter Resource
287  *   name             handler     value                        code flags default_value
288  */
289 static struct res_items counter_items[] = {
290    {"name",            store_name,    ITEM(res_counter.hdr.name),        0, ITEM_REQUIRED, 0},
291    {"description",     store_str,     ITEM(res_counter.hdr.desc),        0, 0,     0},
292    {"minimum",         store_int,     ITEM(res_counter.MinValue),        0, ITEM_DEFAULT, 0},
293    {"maximum",         store_pint,    ITEM(res_counter.MaxValue),        0, ITEM_DEFAULT, INT32_MAX},
294    {"wrapcounter",     store_res,     ITEM(res_counter.WrapCounter),     R_COUNTER, 0, 0},
295    {"catalog",         store_res,     ITEM(res_counter.Catalog),         R_CATALOG, 0, 0},
296    {NULL, NULL, NULL, 0, 0, 0} 
297 };
298
299
300 /* Message resource */
301 extern struct res_items msgs_items[];
302
303 /* 
304  * This is the master resource definition.  
305  * It must have one item for each of the resources.
306  *
307  *  name             items        rcode        res_head
308  */
309 struct s_res resources[] = {
310    {"director",      dir_items,   R_DIRECTOR,  NULL},
311    {"console",       con_items,   R_CONSOLE,   NULL},
312    {"client",        cli_items,   R_CLIENT,    NULL},
313    {"job",           job_items,   R_JOB,       NULL},
314    {"storage",       store_items, R_STORAGE,   NULL},
315    {"catalog",       cat_items,   R_CATALOG,   NULL},
316    {"schedule",      sch_items,   R_SCHEDULE,  NULL},
317    {"fileset",       fs_items,    R_FILESET,   NULL},
318    {"group",         group_items, R_GROUP,     NULL},
319    {"pool",          pool_items,  R_POOL,      NULL},
320    {"messages",      msgs_items,  R_MSGS,      NULL},
321    {"counter",       counter_items, R_COUNTER, NULL},
322    {NULL,            NULL,        0,           NULL}
323 };
324
325
326 /* Keywords (RHS) permitted in Job Level records   
327  *
328  *   level_name      level              job_type
329  */
330 struct s_jl joblevels[] = {
331    {"Full",          L_FULL,            JT_BACKUP},
332    {"Base",          L_BASE,            JT_BACKUP},
333    {"Incremental",   L_INCREMENTAL,     JT_BACKUP},
334    {"Differential",  L_DIFFERENTIAL,    JT_BACKUP},
335    {"Since",         L_SINCE,           JT_BACKUP},
336    {"Catalog",       L_VERIFY_CATALOG,  JT_VERIFY},
337    {"InitCatalog",   L_VERIFY_INIT,     JT_VERIFY},
338    {"VolumeToCatalog", L_VERIFY_VOLUME_TO_CATALOG,   JT_VERIFY},
339    {"Data",          L_VERIFY_DATA,     JT_VERIFY},
340    {NULL,            0}
341 };
342
343 /* Keywords (RHS) permitted in Job type records   
344  *
345  *   type_name       job_type
346  */
347 struct s_jt jobtypes[] = {
348    {"backup",        JT_BACKUP},
349    {"admin",         JT_ADMIN},
350    {"verify",        JT_VERIFY},
351    {"restore",       JT_RESTORE},
352    {NULL,            0}
353 };
354
355
356 /* Keywords (RHS) permitted in Backup and Verify records */
357 static struct s_kw BakVerFields[] = {
358    {"client",        'C'},
359    {"fileset",       'F'},
360    {"level",         'L'}, 
361    {NULL,            0}
362 };
363
364 /* Keywords (RHS) permitted in Restore records */
365 static struct s_kw RestoreFields[] = {
366    {"client",        'C'},
367    {"fileset",       'F'},
368    {"jobid",         'J'},            /* JobId to restore */
369    {"where",         'W'},            /* root of restore */
370    {"replace",       'R'},            /* replacement options */
371    {"bootstrap",     'B'},            /* bootstrap file */
372    {NULL,              0}
373 };
374
375 /* Options permitted in Restore replace= */
376 struct s_kw ReplaceOptions[] = {
377    {"always",         REPLACE_ALWAYS},
378    {"ifnewer",        REPLACE_IFNEWER},
379    {"ifolder",        REPLACE_IFOLDER},
380    {"never",          REPLACE_NEVER},
381    {NULL,               0}
382 };
383
384 char *level_to_str(int level)
385 {
386    int i;
387    static char level_no[30];
388    char *str = level_no;
389
390    sprintf(level_no, "%d", level);    /* default if not found */
391    for (i=0; joblevels[i].level_name; i++) {
392       if (level == joblevels[i].level) {
393          str = joblevels[i].level_name;
394          break;
395       }
396    }
397    return str;
398 }
399
400 /* Dump contents of resource */
401 void dump_resource(int type, RES *reshdr, void sendit(void *sock, char *fmt, ...), void *sock)
402 {
403    URES *res = (URES *)reshdr;
404    int recurse = 1;
405    char ed1[30], ed2[30];
406
407    if (res == NULL) {
408       sendit(sock, "No %s resource defined\n", res_to_str(type));
409       return;
410    }
411    if (type < 0) {                    /* no recursion */
412       type = - type;
413       recurse = 0;
414    }
415    switch (type) {
416    case R_DIRECTOR:
417       sendit(sock, "Director: name=%s MaxJobs=%d FDtimeout=%s SDtimeout=%s\n", 
418          reshdr->name, res->res_dir.MaxConcurrentJobs, 
419          edit_uint64(res->res_dir.FDConnectTimeout, ed1),
420          edit_uint64(res->res_dir.SDConnectTimeout, ed2));
421       if (res->res_dir.query_file) {
422          sendit(sock, "   query_file=%s\n", res->res_dir.query_file);
423       }
424       if (res->res_dir.messages) {
425          sendit(sock, "  --> ");
426          dump_resource(-R_MSGS, (RES *)res->res_dir.messages, sendit, sock);
427       }
428       break;
429    case R_CONSOLE:
430       sendit(sock, "Console: name=%s SSL=%d\n", 
431          res->res_con.hdr.name, res->res_con.enable_ssl);
432       break;
433    case R_COUNTER:
434       if (res->res_counter.WrapCounter) {
435          sendit(sock, "Counter: name=%s min=%d max=%d cur=%d wrapcntr=%s\n",
436             res->res_counter.hdr.name, res->res_counter.MinValue, 
437             res->res_counter.MaxValue, res->res_counter.CurrentValue,
438             res->res_counter.WrapCounter->hdr.name);
439       } else {
440          sendit(sock, "Counter: name=%s min=%d max=%d\n",
441             res->res_counter.hdr.name, res->res_counter.MinValue, 
442             res->res_counter.MaxValue);
443       }
444       if (res->res_counter.Catalog) {
445          sendit(sock, "  --> ");
446          dump_resource(-R_CATALOG, (RES *)res->res_counter.Catalog, sendit, sock);
447       }
448       break;
449
450    case R_CLIENT:
451       sendit(sock, "Client: name=%s address=%s FDport=%d MaxJobs=%u\n",
452          res->res_client.hdr.name, res->res_client.address, res->res_client.FDport,
453          res->res_client.MaxConcurrentJobs);
454       sendit(sock, "      JobRetention=%" lld " FileRetention=%" lld " AutoPrune=%d\n",
455          res->res_client.JobRetention, res->res_client.FileRetention,
456          res->res_client.AutoPrune);
457       if (res->res_client.catalog) {
458          sendit(sock, "  --> ");
459          dump_resource(-R_CATALOG, (RES *)res->res_client.catalog, sendit, sock);
460       }
461       break;
462    case R_STORAGE:
463       sendit(sock, "Storage: name=%s address=%s SDport=%d MaxJobs=%u\n\
464       DeviceName=%s MediaType=%s\n",
465          res->res_store.hdr.name, res->res_store.address, res->res_store.SDport,
466          res->res_store.MaxConcurrentJobs,
467          res->res_store.dev_name, res->res_store.media_type);
468       break;
469    case R_CATALOG:
470       sendit(sock, "Catalog: name=%s address=%s DBport=%d db_name=%s\n\
471       db_user=%s\n",
472          res->res_cat.hdr.name, NPRT(res->res_cat.db_address),
473          res->res_cat.db_port, res->res_cat.db_name, NPRT(res->res_cat.db_user));
474       break;
475    case R_JOB:
476       sendit(sock, "Job: name=%s JobType=%d level=%s Priority=%d MaxJobs=%u\n", 
477          res->res_job.hdr.name, res->res_job.JobType, 
478          level_to_str(res->res_job.level), res->res_job.Priority,
479          res->res_job.MaxConcurrentJobs);
480       sendit(sock, "     Resched=%d Times=%d Interval=%s\n",
481           res->res_job.RescheduleOnError, res->res_job.RescheduleTimes,
482           edit_uint64_with_commas(res->res_job.RescheduleInterval, ed1));
483       if (res->res_job.client) {
484          sendit(sock, "  --> ");
485          dump_resource(-R_CLIENT, (RES *)res->res_job.client, sendit, sock);
486       }
487       if (res->res_job.fileset) {
488          sendit(sock, "  --> ");
489          dump_resource(-R_FILESET, (RES *)res->res_job.fileset, sendit, sock);
490       }
491       if (res->res_job.schedule) {
492          sendit(sock, "  --> ");
493          dump_resource(-R_SCHEDULE, (RES *)res->res_job.schedule, sendit, sock);
494       }
495       if (res->res_job.RestoreWhere) {
496          sendit(sock, "  --> Where=%s\n", NPRT(res->res_job.RestoreWhere));
497       }
498       if (res->res_job.RestoreBootstrap) {
499          sendit(sock, "  --> Bootstrap=%s\n", NPRT(res->res_job.RestoreBootstrap));
500       }
501       if (res->res_job.RunBeforeJob) {
502          sendit(sock, "  --> RunBefore=%s\n", NPRT(res->res_job.RunBeforeJob));
503       }
504       if (res->res_job.RunAfterJob) {
505          sendit(sock, "  --> RunAfter=%s\n", NPRT(res->res_job.RunAfterJob));
506       }
507       if (res->res_job.WriteBootstrap) {
508          sendit(sock, "  --> WriteBootstrap=%s\n", NPRT(res->res_job.WriteBootstrap));
509       }
510       if (res->res_job.storage) {
511          sendit(sock, "  --> ");
512          dump_resource(-R_STORAGE, (RES *)res->res_job.storage, sendit, sock);
513       }
514       if (res->res_job.pool) {
515          sendit(sock, "  --> ");
516          dump_resource(-R_POOL, (RES *)res->res_job.pool, sendit, sock);
517       } else {
518          sendit(sock, "!!! No Pool resource\n");
519       }
520       if (res->res_job.messages) {
521          sendit(sock, "  --> ");
522          dump_resource(-R_MSGS, (RES *)res->res_job.messages, sendit, sock);
523       }
524       break;
525    case R_FILESET:
526       sendit(sock, "FileSet: name=%s\n", res->res_fs.hdr.name);
527       for (int i=0; i<res->res_fs.num_includes; i++) {
528          INCEXE *incexe = res->res_fs.include_items[i];
529          for (int j=0; j<incexe->name_list.size(); j++) {
530             sendit(sock, "      Inc: %s\n", incexe->name_list.get(j));
531          }
532       }
533       for (int i=0; i<res->res_fs.num_excludes; i++) {
534          INCEXE *incexe = res->res_fs.exclude_items[i];
535          for (int j=0; j<incexe->name_list.size(); j++) {
536             sendit(sock, "      Exc: %s\n", incexe->name_list.get(j));
537          }
538       }
539       break;
540    case R_SCHEDULE:
541       if (res->res_sch.run) {
542          int i;
543          RUN *run = res->res_sch.run;
544          char buf[1000], num[10];
545          sendit(sock, "Schedule: name=%s\n", res->res_sch.hdr.name);
546          if (!run) {
547             break;
548          }
549 next_run:
550          sendit(sock, "  --> Run Level=%s\n", level_to_str(run->level));
551          strcpy(buf, "      hour=");
552          for (i=0; i<24; i++) {
553             if (bit_is_set(i, run->hour)) {
554                sprintf(num, "%d ", i);
555                strcat(buf, num);
556             }
557          }
558          strcat(buf, "\n");
559          sendit(sock, buf);
560          strcpy(buf, "      mday=");
561          for (i=0; i<31; i++) {
562             if (bit_is_set(i, run->mday)) {
563                sprintf(num, "%d ", i+1);
564                strcat(buf, num);
565             }
566          }
567          strcat(buf, "\n");
568          sendit(sock, buf);
569          strcpy(buf, "      month=");
570          for (i=0; i<12; i++) {
571             if (bit_is_set(i, run->month)) {
572                sprintf(num, "%d ", i+1);
573                strcat(buf, num);
574             }
575          }
576          strcat(buf, "\n");
577          sendit(sock, buf);
578          strcpy(buf, "      wday=");
579          for (i=0; i<7; i++) {
580             if (bit_is_set(i, run->wday)) {
581                sprintf(num, "%d ", i+1);
582                strcat(buf, num);
583             }
584          }
585          strcat(buf, "\n");
586          sendit(sock, buf);
587          strcpy(buf, "      wpos=");
588          for (i=0; i<5; i++) {
589             if (bit_is_set(i, run->wpos)) {
590                sprintf(num, "%d ", i+1);
591                strcat(buf, num);
592             }
593          }
594          strcat(buf, "\n");
595          sendit(sock, buf);
596          sendit(sock, "      mins=%d\n", run->minute);
597          if (run->pool) {
598             sendit(sock, "     --> ");
599             dump_resource(-R_POOL, (RES *)run->pool, sendit, sock);
600          }
601          if (run->storage) {
602             sendit(sock, "     --> ");
603             dump_resource(-R_STORAGE, (RES *)run->storage, sendit, sock);
604          }
605          if (run->msgs) {
606             sendit(sock, "     --> ");
607             dump_resource(-R_MSGS, (RES *)run->msgs, sendit, sock);
608          }
609          /* If another Run record is chained in, go print it */
610          if (run->next) {
611             run = run->next;
612             goto next_run;
613          }
614       } else {
615          sendit(sock, "Schedule: name=%s\n", res->res_sch.hdr.name);
616       }
617       break;
618    case R_GROUP:
619       sendit(sock, "Group: name=%s\n", res->res_group.hdr.name);
620       break;
621    case R_POOL:
622       sendit(sock, "Pool: name=%s PoolType=%s\n", res->res_pool.hdr.name,
623               res->res_pool.pool_type);
624       sendit(sock, "      use_cat=%d use_once=%d acpt_any=%d cat_files=%d\n",
625               res->res_pool.use_catalog, res->res_pool.use_volume_once,
626               res->res_pool.accept_any_volume, res->res_pool.catalog_files);
627       sendit(sock, "      max_vols=%d auto_prune=%d VolRetention=%" lld "\n",
628               res->res_pool.max_volumes, res->res_pool.AutoPrune,
629               res->res_pool.VolRetention);
630       sendit(sock, "      recycle=%d LabelFormat=%s\n", res->res_pool.Recycle,
631               NPRT(res->res_pool.label_format));
632       sendit(sock, "      CleaningPrefix=%s\n",
633               NPRT(res->res_pool.cleaning_prefix));
634       sendit(sock, "      recyleOldest=%d MaxVolJobs=%d MaxVolFiles=%d\n",
635               res->res_pool.purge_oldest_volume, 
636               res->res_pool.MaxVolJobs, res->res_pool.MaxVolFiles);
637       break;
638    case R_MSGS:
639       sendit(sock, "Messages: name=%s\n", res->res_msgs.hdr.name);
640       if (res->res_msgs.mail_cmd) 
641          sendit(sock, "      mailcmd=%s\n", res->res_msgs.mail_cmd);
642       if (res->res_msgs.operator_cmd) 
643          sendit(sock, "      opcmd=%s\n", res->res_msgs.operator_cmd);
644       break;
645    default:
646       sendit(sock, "Unknown resource type %d in dump_resource.\n", type);
647       break;
648    }
649    if (recurse && res->res_dir.hdr.next) {
650       dump_resource(type, res->res_dir.hdr.next, sendit, sock);
651    }
652 }
653
654 /*
655  * Free all the members of an INCEXE structure
656  */
657 static void free_incexe(INCEXE *incexe)
658 {
659    incexe->name_list.destroy();
660    for (int i=0; i<incexe->num_opts; i++) {
661       FOPTS *fopt = incexe->opts_list[i];
662       fopt->match.destroy();
663       fopt->base_list.destroy();
664       free(fopt);
665    }
666    if (incexe->opts_list) {
667       free(incexe->opts_list);
668    }
669    free(incexe);
670 }
671
672 /* 
673  * Free memory of resource.  
674  * NB, we don't need to worry about freeing any references
675  * to other resources as they will be freed when that 
676  * resource chain is traversed.  Mainly we worry about freeing
677  * allocated strings (names).
678  */
679 void free_resource(int type)
680 {
681    int num;
682    URES *res;
683    RES *nres;
684    int rindex = type - r_first;
685
686    res = (URES *)resources[rindex].res_head;
687
688    if (res == NULL)
689       return;
690
691    /* common stuff -- free the resource name and description */
692    nres = (RES *)res->res_dir.hdr.next;
693    if (res->res_dir.hdr.name) {
694       free(res->res_dir.hdr.name);
695    }
696    if (res->res_dir.hdr.desc) {
697       free(res->res_dir.hdr.desc);
698    }
699
700    switch (type) {
701    case R_DIRECTOR:
702       if (res->res_dir.working_directory) {
703          free(res->res_dir.working_directory);
704       }
705       if (res->res_dir.pid_directory) {
706          free(res->res_dir.pid_directory);
707       }
708       if (res->res_dir.subsys_directory) {
709          free(res->res_dir.subsys_directory);
710       }
711       if (res->res_dir.password) {
712          free(res->res_dir.password);
713       }
714       if (res->res_dir.query_file) {
715          free(res->res_dir.query_file);
716       }
717       if (res->res_dir.DIRaddr) {
718          free(res->res_dir.DIRaddr);
719       }
720       break;
721    case R_COUNTER:
722        break;
723    case R_CONSOLE:
724       if (res->res_con.password) {
725          free(res->res_con.password);
726       }
727       break;
728    case R_CLIENT:
729       if (res->res_client.address) {
730          free(res->res_client.address);
731       }
732       if (res->res_client.password) {
733          free(res->res_client.password);
734       }
735       break;
736    case R_STORAGE:
737       if (res->res_store.address) {
738          free(res->res_store.address);
739       }
740       if (res->res_store.password) {
741          free(res->res_store.password);
742       }
743       if (res->res_store.media_type) {
744          free(res->res_store.media_type);
745       }
746       if (res->res_store.dev_name) {
747          free(res->res_store.dev_name);
748       }
749       break;
750    case R_CATALOG:
751       if (res->res_cat.db_address) {
752          free(res->res_cat.db_address);
753       }
754       if (res->res_cat.db_socket) {
755          free(res->res_cat.db_socket);
756       }
757       if (res->res_cat.db_user) {
758          free(res->res_cat.db_user);
759       }
760       if (res->res_cat.db_name) {
761          free(res->res_cat.db_name);
762       }
763       if (res->res_cat.db_password) {
764          free(res->res_cat.db_password);
765       }
766       break;
767    case R_FILESET:
768       if ((num=res->res_fs.num_includes)) {
769          while (--num >= 0) {   
770             free_incexe(res->res_fs.include_items[num]);
771          }
772          free(res->res_fs.include_items);
773       }
774       res->res_fs.num_includes = 0;
775       if ((num=res->res_fs.num_excludes)) {
776          while (--num >= 0) {   
777             free_incexe(res->res_fs.exclude_items[num]);
778          }
779          free(res->res_fs.exclude_items);
780       }
781       res->res_fs.num_excludes = 0;
782       break;
783    case R_POOL:
784       if (res->res_pool.pool_type) {
785          free(res->res_pool.pool_type);
786       }
787       if (res->res_pool.label_format) {
788          free(res->res_pool.label_format);
789       }
790       if (res->res_pool.cleaning_prefix) {
791          free(res->res_pool.cleaning_prefix);
792       }
793       break;
794    case R_SCHEDULE:
795       if (res->res_sch.run) {
796          RUN *nrun, *next;
797          nrun = res->res_sch.run;
798          while (nrun) {
799             next = nrun->next;
800             free(nrun);
801             nrun = next;
802          }
803       }
804       break;
805    case R_JOB:
806       if (res->res_job.RestoreWhere) {
807          free(res->res_job.RestoreWhere);
808       }
809       if (res->res_job.RestoreBootstrap) {
810          free(res->res_job.RestoreBootstrap);
811       }
812       if (res->res_job.WriteBootstrap) {
813          free(res->res_job.WriteBootstrap);
814       }
815       if (res->res_job.RunBeforeJob) {
816          free(res->res_job.RunBeforeJob);
817       }
818       if (res->res_job.RunAfterJob) {
819          free(res->res_job.RunAfterJob);
820       }
821       if (res->res_job.ClientRunBeforeJob) {
822          free(res->res_job.ClientRunBeforeJob);
823       }
824       if (res->res_job.ClientRunAfterJob) {
825          free(res->res_job.ClientRunAfterJob);
826       }
827       break;
828    case R_MSGS:
829       if (res->res_msgs.mail_cmd) {
830          free(res->res_msgs.mail_cmd);
831       }
832       if (res->res_msgs.operator_cmd) {
833          free(res->res_msgs.operator_cmd);
834       }
835       free_msgs_res((MSGS *)res);  /* free message resource */
836       res = NULL;
837       break;
838    case R_GROUP:
839       break;
840    default:
841       printf("Unknown resource type %d in free_resource.\n", type);
842    }
843    /* Common stuff again -- free the resource, recurse to next one */
844    if (res) {
845       free(res);
846    }
847    resources[rindex].res_head = nres;
848    if (nres) {
849       free_resource(type);
850    }
851 }
852
853 /*
854  * Save the new resource by chaining it into the head list for
855  * the resource. If this is pass 2, we update any resource
856  * pointers because they may not have been defined until 
857  * later in pass 1.
858  */
859 void save_resource(int type, struct res_items *items, int pass)
860 {
861    URES *res;
862    int rindex = type - r_first;
863    int i, size;
864    int error = 0;
865    
866    /* 
867     * Ensure that all required items are present
868     */
869    for (i=0; items[i].name; i++) {
870       if (items[i].flags & ITEM_REQUIRED) {
871             if (!bit_is_set(i, res_all.res_dir.hdr.item_present)) {  
872                Emsg2(M_ERROR_TERM, 0, "%s item is required in %s resource, but not found.\n",
873                  items[i].name, resources[rindex]);
874              }
875       }
876       /* If this triggers, take a look at lib/parse_conf.h */
877       if (i >= MAX_RES_ITEMS) {
878          Emsg1(M_ERROR_TERM, 0, "Too many items in %s resource\n", resources[rindex]);
879       }
880    }
881
882    /* During pass 2 in each "store" routine, we looked up pointers 
883     * to all the resources referrenced in the current resource, now we
884     * must copy their addresses from the static record to the allocated
885     * record.
886     */
887    if (pass == 2) {
888       switch (type) {
889       /* Resources not containing a resource */
890       case R_CONSOLE:
891       case R_CATALOG:
892       case R_STORAGE:
893       case R_GROUP:
894       case R_POOL:
895       case R_MSGS:
896       case R_FILESET:
897          break;
898
899       /* Resources containing another resource */
900       case R_DIRECTOR:
901          if ((res = (URES *)GetResWithName(R_DIRECTOR, res_all.res_dir.hdr.name)) == NULL) {
902             Emsg1(M_ERROR_TERM, 0, "Cannot find Director resource %s\n", res_all.res_dir.hdr.name);
903          }
904          res->res_dir.messages = res_all.res_dir.messages;
905          break;
906       case R_JOB:
907          if ((res = (URES *)GetResWithName(R_JOB, res_all.res_dir.hdr.name)) == NULL) {
908             Emsg1(M_ERROR_TERM, 0, "Cannot find Job resource %s\n", res_all.res_dir.hdr.name);
909          }
910          res->res_job.messages = res_all.res_job.messages;
911          res->res_job.schedule = res_all.res_job.schedule;
912          res->res_job.client   = res_all.res_job.client;
913          res->res_job.fileset  = res_all.res_job.fileset;
914          res->res_job.storage  = res_all.res_job.storage;
915          res->res_job.pool     = res_all.res_job.pool;
916          if (res->res_job.JobType == 0) {
917             Emsg1(M_ERROR_TERM, 0, "Job Type not defined for Job resource %s\n", res_all.res_dir.hdr.name);
918          }
919          if (res->res_job.level != 0) {
920             int i;
921             for (i=0; joblevels[i].level_name; i++) {
922                if (joblevels[i].level == res->res_job.level &&
923                    joblevels[i].job_type == res->res_job.JobType) {
924                   i = 0;
925                   break;
926                }
927             }
928             if (i != 0) {
929                Emsg1(M_ERROR_TERM, 0, "Inappropriate level specified in Job resource %s\n", 
930                   res_all.res_dir.hdr.name);
931             }
932          }
933          break;
934       case R_COUNTER:
935          if ((res = (URES *)GetResWithName(R_COUNTER, res_all.res_counter.hdr.name)) == NULL) {
936             Emsg1(M_ERROR_TERM, 0, "Cannot find Counter resource %s\n", res_all.res_counter.hdr.name);
937          }
938          res->res_counter.Catalog = res_all.res_counter.Catalog;
939          res->res_counter.WrapCounter = res_all.res_counter.WrapCounter;
940          break;
941
942       case R_CLIENT:
943          if ((res = (URES *)GetResWithName(R_CLIENT, res_all.res_client.hdr.name)) == NULL) {
944             Emsg1(M_ERROR_TERM, 0, "Cannot find Client resource %s\n", res_all.res_client.hdr.name);
945          }
946          res->res_client.catalog = res_all.res_client.catalog;
947          break;
948       case R_SCHEDULE:
949          /* Schedule is a bit different in that it contains a RUN record
950           * chain which isn't a "named" resource. This chain was linked
951           * in by run_conf.c during pass 2, so here we jam the pointer 
952           * into the Schedule resource.                         
953           */
954          if ((res = (URES *)GetResWithName(R_SCHEDULE, res_all.res_client.hdr.name)) == NULL) {
955             Emsg1(M_ERROR_TERM, 0, "Cannot find Schedule resource %s\n", res_all.res_client.hdr.name);
956          }
957          res->res_sch.run = res_all.res_sch.run;
958          break;
959       default:
960          Emsg1(M_ERROR, 0, "Unknown resource type %d in save_resource.\n", type);
961          error = 1;
962          break;
963       }
964       /* Note, the resource name was already saved during pass 1,
965        * so here, we can just release it.
966        */
967       if (res_all.res_dir.hdr.name) {
968          free(res_all.res_dir.hdr.name);
969          res_all.res_dir.hdr.name = NULL;
970       }
971       if (res_all.res_dir.hdr.desc) {
972          free(res_all.res_dir.hdr.desc);
973          res_all.res_dir.hdr.desc = NULL;
974       }
975       return;
976    }
977
978    /* The following code is only executed for pass 1 */
979    switch (type) {
980    case R_DIRECTOR:
981       size = sizeof(DIRRES);
982       break;
983    case R_CONSOLE:
984       size = sizeof(CONRES);
985       break;
986    case R_CLIENT:
987       size =sizeof(CLIENT);
988       break;
989    case R_STORAGE:
990       size = sizeof(STORE); 
991       break;
992    case R_CATALOG:
993       size = sizeof(CAT);
994       break;
995    case R_JOB:
996       size = sizeof(JOB);
997       break;
998    case R_FILESET:
999       size = sizeof(FILESET);
1000       break;
1001    case R_SCHEDULE:
1002       size = sizeof(SCHED);
1003       break;
1004    case R_GROUP:
1005       size = sizeof(GROUP);
1006       break;
1007    case R_POOL:
1008       size = sizeof(POOL);
1009       break;
1010    case R_MSGS:
1011       size = sizeof(MSGS);
1012       break;
1013    case R_COUNTER:
1014       size = sizeof(COUNTER);
1015       break;
1016    default:
1017       printf("Unknown resource type %d in save_resrouce.\n", type);
1018       error = 1;
1019       size = 1;
1020       break;
1021    }
1022    /* Common */
1023    if (!error) {
1024       res = (URES *)malloc(size);
1025       memcpy(res, &res_all, size);
1026       if (!resources[rindex].res_head) {
1027          resources[rindex].res_head = (RES *)res; /* store first entry */
1028          Dmsg3(200, "Inserting first %s res: %s index=%d\n", res_to_str(type),
1029                res->res_dir.hdr.name, rindex);
1030       } else {
1031          RES *next;
1032          /* Add new res to end of chain */
1033          for (next=resources[rindex].res_head; next->next; next=next->next)
1034             { }
1035          next->next = (RES *)res;
1036          Dmsg3(200, "Inserting %s res: %s index=%d\n", res_to_str(type),
1037                res->res_dir.hdr.name, rindex);
1038       }
1039    }
1040 }
1041
1042 /* 
1043  * Store JobType (backup, verify, restore)
1044  *
1045  */
1046 static void store_jobtype(LEX *lc, struct res_items *item, int index, int pass)
1047 {
1048    int token, i;   
1049
1050    token = lex_get_token(lc, T_NAME);
1051    /* Store the type both pass 1 and pass 2 */
1052    for (i=0; jobtypes[i].type_name; i++) {
1053       if (strcasecmp(lc->str, jobtypes[i].type_name) == 0) {
1054          ((JOB *)(item->value))->JobType = jobtypes[i].job_type;
1055          i = 0;
1056          break;
1057       }
1058    }
1059    if (i != 0) {
1060       scan_err1(lc, "Expected a Job Type keyword, got: %s", lc->str);
1061    }
1062    scan_to_eol(lc);
1063    set_bit(index, res_all.hdr.item_present);
1064 }
1065
1066 /* 
1067  * Store Job Level (Full, Incremental, ...)
1068  *
1069  */
1070 static void store_level(LEX *lc, struct res_items *item, int index, int pass)
1071 {
1072    int token, i;
1073
1074    token = lex_get_token(lc, T_NAME);
1075    /* Store the level pass 2 so that type is defined */
1076    for (i=0; joblevels[i].level_name; i++) {
1077       if (strcasecmp(lc->str, joblevels[i].level_name) == 0) {
1078          ((JOB *)(item->value))->level = joblevels[i].level;
1079          i = 0;
1080          break;
1081       }
1082    }
1083    if (i != 0) {
1084       scan_err1(lc, "Expected a Job Level keyword, got: %s", lc->str);
1085    }
1086    scan_to_eol(lc);
1087    set_bit(index, res_all.hdr.item_present);
1088 }
1089
1090 static void store_replace(LEX *lc, struct res_items *item, int index, int pass)
1091 {
1092    int token, i;
1093    token = lex_get_token(lc, T_NAME);
1094    /* Scan Replacement options */
1095    for (i=0; ReplaceOptions[i].name; i++) {
1096       if (strcasecmp(lc->str, ReplaceOptions[i].name) == 0) {
1097          *(int *)(item->value) = ReplaceOptions[i].token;
1098          i = 0;
1099          break;
1100       }
1101    }
1102    if (i != 0) {
1103       scan_err1(lc, "Expected a Restore replacement option, got: %s", lc->str);
1104    }
1105    scan_to_eol(lc);
1106    set_bit(index, res_all.hdr.item_present);
1107 }
1108
1109 /* 
1110  * Store backup/verify info for Job record 
1111  *
1112  * Note, this code is used for both BACKUP and VERIFY jobs
1113  *
1114  *    Backup = Client=<client-name> FileSet=<FileSet-name> Level=<level>
1115  */
1116 static void store_backup(LEX *lc, struct res_items *item, int index, int pass)
1117 {
1118    int token, i;
1119    RES *res;
1120    int options = lc->options;
1121
1122    lc->options |= LOPT_NO_IDENT;      /* make spaces significant */
1123
1124    
1125    ((JOB *)(item->value))->JobType = item->code;
1126    while ((token = lex_get_token(lc, T_ALL)) != T_EOL) {
1127       bool found = false;
1128
1129       Dmsg1(150, "store_backup got token=%s\n", lex_tok_to_str(token));
1130       
1131       if (token != T_IDENTIFIER && token != T_UNQUOTED_STRING && token != T_QUOTED_STRING) {
1132          scan_err1(lc, "Expected a backup/verify keyword, got: %s", lc->str);
1133       }
1134       Dmsg1(190, "Got keyword: %s\n", lc->str);
1135       for (i=0; BakVerFields[i].name; i++) {
1136          if (strcasecmp(lc->str, BakVerFields[i].name) == 0) {
1137             found = true;
1138             if (lex_get_token(lc, T_ALL) != T_EQUALS) {
1139                scan_err1(lc, "Expected an equals, got: %s", lc->str);
1140             }
1141             token = lex_get_token(lc, T_NAME);
1142             Dmsg1(190, "Got value: %s\n", lc->str);
1143             switch (BakVerFields[i].token) {
1144             case 'C':
1145                /* Find Client Resource */
1146                if (pass == 2) {
1147                   res = GetResWithName(R_CLIENT, lc->str);
1148                   if (res == NULL) {
1149                      scan_err1(lc, "Could not find specified Client Resource: %s",
1150                                 lc->str);
1151                   }
1152                   res_all.res_job.client = (CLIENT *)res;
1153                }
1154                break;
1155             case 'F':
1156                /* Find FileSet Resource */
1157                if (pass == 2) {
1158                   res = GetResWithName(R_FILESET, lc->str);
1159                   if (res == NULL) {
1160                      scan_err1(lc, "Could not find specified FileSet Resource: %s\n",
1161                                  lc->str);
1162                   }
1163                   res_all.res_job.fileset = (FILESET *)res;
1164                }
1165                break;
1166             case 'L':
1167                /* Get level */
1168                for (i=0; joblevels[i].level_name; i++) {
1169                   if (joblevels[i].job_type == item->code && 
1170                        strcasecmp(lc->str, joblevels[i].level_name) == 0) {
1171                      ((JOB *)(item->value))->level = joblevels[i].level;
1172                      i = 0;
1173                      break;
1174                   }
1175                }
1176                if (i != 0) {
1177                   scan_err1(lc, "Expected a Job Level keyword, got: %s", lc->str);
1178                }
1179                break;
1180             } /* end switch */
1181             break;
1182          } /* end if strcmp() */
1183       } /* end for */
1184       if (!found) {
1185          scan_err1(lc, "%s not a valid Backup/verify keyword", lc->str);
1186       }
1187    } /* end while */
1188    lc->options = options;             /* reset original options */
1189    set_bit(index, res_all.hdr.item_present);
1190 }
1191
1192 /* 
1193  * Store restore info for Job record 
1194  *
1195  *    Restore = JobId=<job-id> Where=<root-directory> Replace=<options> Bootstrap=<file>
1196  *
1197  */
1198 static void store_restore(LEX *lc, struct res_items *item, int index, int pass)
1199 {
1200    int token, i;
1201    RES *res;
1202    int options = lc->options;
1203
1204    lc->options |= LOPT_NO_IDENT;      /* make spaces significant */
1205
1206    Dmsg0(190, "Enter store_restore()\n");
1207    
1208    ((JOB *)(item->value))->JobType = item->code;
1209    while ((token = lex_get_token(lc, T_ALL)) != T_EOL) {
1210       bool found = false;
1211
1212       if (token != T_IDENTIFIER && token != T_UNQUOTED_STRING && token != T_QUOTED_STRING) {
1213          scan_err1(lc, "expected a name, got: %s", lc->str);
1214       }
1215       for (i=0; RestoreFields[i].name; i++) {
1216          Dmsg1(190, "Restore kw=%s\n", lc->str);
1217          if (strcasecmp(lc->str, RestoreFields[i].name) == 0) {
1218             found = true;
1219             if (lex_get_token(lc, T_ALL) != T_EQUALS) {
1220                scan_err1(lc, "Expected an equals, got: %s", lc->str);
1221             }
1222             token = lex_get_token(lc, T_ALL);
1223             Dmsg1(190, "Restore value=%s\n", lc->str);
1224             switch (RestoreFields[i].token) {
1225             case 'B':
1226                /* Bootstrap */
1227                if (token != T_IDENTIFIER && token != T_UNQUOTED_STRING && token != T_QUOTED_STRING) {
1228                   scan_err1(lc, "Expected a Restore bootstrap file, got: %s", lc->str);
1229                }
1230                if (pass == 1) {
1231                   res_all.res_job.RestoreBootstrap = bstrdup(lc->str);
1232                }
1233                break;
1234             case 'C':
1235                /* Find Client Resource */
1236                if (pass == 2) {
1237                   res = GetResWithName(R_CLIENT, lc->str);
1238                   if (res == NULL) {
1239                      scan_err1(lc, "Could not find specified Client Resource: %s",
1240                                 lc->str);
1241                   }
1242                   res_all.res_job.client = (CLIENT *)res;
1243                }
1244                break;
1245             case 'F':
1246                /* Find FileSet Resource */
1247                if (pass == 2) {
1248                   res = GetResWithName(R_FILESET, lc->str);
1249                   if (res == NULL) {
1250                      scan_err1(lc, "Could not find specified FileSet Resource: %s\n",
1251                                  lc->str);
1252                   }
1253                   res_all.res_job.fileset = (FILESET *)res;
1254                }
1255                break;
1256             case 'J':
1257                /* JobId */
1258                if (token != T_NUMBER) {
1259                   scan_err1(lc, "expected an integer number, got: %s", lc->str);
1260                }
1261                errno = 0;
1262                res_all.res_job.RestoreJobId = strtol(lc->str, NULL, 0);
1263                Dmsg1(190, "RestorJobId=%d\n", res_all.res_job.RestoreJobId);
1264                if (errno != 0) {
1265                   scan_err1(lc, "expected an integer number, got: %s", lc->str);
1266                }
1267                break;
1268             case 'W':
1269                /* Where */
1270                if (token != T_IDENTIFIER && token != T_UNQUOTED_STRING && token != T_QUOTED_STRING) {
1271                   scan_err1(lc, "Expected a Restore root directory, got: %s", lc->str);
1272                }
1273                if (pass == 1) {
1274                   res_all.res_job.RestoreWhere = bstrdup(lc->str);
1275                }
1276                break;
1277             case 'R':
1278                /* Replacement options */
1279                if (token != T_IDENTIFIER && token != T_UNQUOTED_STRING && token != T_QUOTED_STRING) {
1280                   scan_err1(lc, "Expected a keyword name, got: %s", lc->str);
1281                }
1282                /* Fix to scan Replacement options */
1283                for (i=0; ReplaceOptions[i].name; i++) {
1284                   if (strcasecmp(lc->str, ReplaceOptions[i].name) == 0) {
1285                       ((JOB *)(item->value))->replace = ReplaceOptions[i].token;
1286                      i = 0;
1287                      break;
1288                   }
1289                }
1290                if (i != 0) {
1291                   scan_err1(lc, "Expected a Restore replacement option, got: %s", lc->str);
1292                }
1293                break;
1294             } /* end switch */
1295             break;
1296          } /* end if strcmp() */
1297       } /* end for */
1298       if (!found) {
1299          scan_err1(lc, "%s not a valid Restore keyword", lc->str);
1300       }
1301    } /* end while */
1302    lc->options = options;             /* reset original options */
1303    set_bit(index, res_all.hdr.item_present);
1304 }