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