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