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