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