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