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