git.sur5r.net Git - bacula/bacula/blob - bacula/src/stored/stored_conf.c

   1 /*
   2  * Configuration file parser for Bacula Storage daemon
   3  *
   4  *     Kern Sibbald, March MM
   5  *
   6  *   Version $Id$
   7  */
   8
   9 /*
  10    Copyright (C) 2000-2005 Kern Sibbald
  11
  12    This program is free software; you can redistribute it and/or
  13    modify it under the terms of the GNU General Public License as
  14    published by the Free Software Foundation; either version 2 of
  15    the License, or (at your option) any later version.
  16
  17    This program is distributed in the hope that it will be useful,
  18    but WITHOUT ANY WARRANTY; without even the implied warranty of
  19    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  20    General Public License for more details.
  21
  22    You should have received a copy of the GNU General Public
  23    License along with this program; if not, write to the Free
  24    Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
  25    MA 02111-1307, USA.
  26
  27  */
  28
  29 #include "bacula.h"
  30 #include "stored.h"
  31
  32 extern int debug_level;
  33
  34
  35 /* First and last resource ids */
  36 int r_first = R_FIRST;
  37 int r_last  = R_LAST;
  38 static RES *sres_head[R_LAST - R_FIRST + 1];
  39 RES **res_head = sres_head;
  40
  41
  42 /* Forward referenced subroutines */
  43
  44 /* We build the current resource here statically,
  45  * then move it to dynamic memory */
  46 URES res_all;
  47 int res_all_size = sizeof(res_all);
  48
  49 /* Definition of records permitted within each
  50  * resource with the routine to process the record
  51  * information.
  52  */
  53
  54 /* Globals for the Storage daemon. */
  55 static RES_ITEM store_items[] = {
  56    {"name",                  store_name, ITEM(res_store.hdr.name),   0, ITEM_REQUIRED, 0},
  57    {"description",           store_str,  ITEM(res_dir.hdr.desc),     0, 0, 0},
  58    {"sdaddress",             store_addresses_address,  ITEM(res_store.sdaddrs),     0, ITEM_DEFAULT, 9103},
  59    {"sdaddresses",           store_addresses,  ITEM(res_store.sdaddrs), 0, ITEM_DEFAULT, 9103},
  60    {"messages",              store_res,  ITEM(res_store.messages),   0, R_MSGS, 0},
  61    {"sdport",                store_addresses_port,  ITEM(res_store.sdaddrs),     0, ITEM_DEFAULT, 9103},
  62    {"workingdirectory",      store_dir,  ITEM(res_store.working_directory), 0, ITEM_REQUIRED, 0},
  63    {"piddirectory",          store_dir,  ITEM(res_store.pid_directory), 0, ITEM_REQUIRED, 0},
  64    {"subsysdirectory",       store_dir,  ITEM(res_store.subsys_directory), 0, 0, 0},
  65    {"scriptsdirectory",      store_dir,  ITEM(res_store.scripts_directory), 0, 0, 0},
  66    {"maximumconcurrentjobs", store_pint, ITEM(res_store.max_concurrent_jobs), 0, ITEM_DEFAULT, 10},
  67    {"heartbeatinterval",     store_time, ITEM(res_store.heartbeat_interval), 0, ITEM_DEFAULT, 0},
  68 #ifdef HAVE_TLS
  69    {"tlsenable",             store_yesno,     ITEM(res_store.tls_enable), 1, ITEM_DEFAULT, 0},
  70    {"tlsrequire",            store_yesno,     ITEM(res_store.tls_require), 1, ITEM_DEFAULT, 0},
  71    {"tlsverifypeer",         store_yesno,     ITEM(res_store.tls_verify_peer), 1, ITEM_DEFAULT, 0},
  72    {"tlscacertificatefile",  store_dir,       ITEM(res_store.tls_ca_certfile), 0, 0, 0},
  73    {"tlscacertificatedir",   store_dir,       ITEM(res_store.tls_ca_certdir), 0, 0, 0},
  74    {"tlscertificate",        store_dir,       ITEM(res_store.tls_certfile), 0, 0, 0},
  75    {"tlskey",                store_dir,       ITEM(res_store.tls_keyfile), 0, 0, 0},
  76    {"tlsdhfile",             store_dir,       ITEM(res_store.tls_dhfile), 0, 0, 0},
  77    {"tlsallowedcn",          store_alist_str, ITEM(res_store.tls_allowed_cns), 0, 0, 0},
  78 #endif /* HAVE_TLS */
  79    {NULL, NULL, 0, 0, 0, 0}
  80 };
  81
  82
  83 /* Directors that can speak to the Storage daemon */
  84 static RES_ITEM dir_items[] = {
  85    {"name",        store_name,     ITEM(res_dir.hdr.name),   0, ITEM_REQUIRED, 0},
  86    {"description", store_str,      ITEM(res_dir.hdr.desc),   0, 0, 0},
  87    {"password",    store_password, ITEM(res_dir.password),   0, ITEM_REQUIRED, 0},
  88    {"monitor",     store_yesno,    ITEM(res_dir.monitor),   1, ITEM_DEFAULT, 0},
  89 #ifdef HAVE_TLS
  90    {"tlsenable",            store_yesno,     ITEM(res_dir.tls_enable), 1, ITEM_DEFAULT, 0},
  91    {"tlsrequire",           store_yesno,     ITEM(res_dir.tls_require), 1, ITEM_DEFAULT, 0},
  92    {"tlsverifypeer",        store_yesno,     ITEM(res_dir.tls_verify_peer), 1, ITEM_DEFAULT, 0},
  93    {"tlscacertificatefile", store_dir,       ITEM(res_dir.tls_ca_certfile), 0, 0, 0},
  94    {"tlscacertificatedir",  store_dir,       ITEM(res_dir.tls_ca_certdir), 0, 0, 0},
  95    {"tlscertificate",       store_dir,       ITEM(res_dir.tls_certfile), 0, 0, 0},
  96    {"tlskey",               store_dir,       ITEM(res_dir.tls_keyfile), 0, 0, 0},
  97    {"tlsdhfile",            store_dir,       ITEM(res_dir.tls_dhfile), 0, 0, 0},
  98    {"tlsallowedcn",         store_alist_str, ITEM(res_dir.tls_allowed_cns), 0, 0, 0},
  99 #endif /* HAVE_TLS */
 100    {NULL, NULL, 0, 0, 0, 0}
 101 };
 102
 103 /* Device definition */
 104 static RES_ITEM dev_items[] = {
 105    {"name",                  store_name,   ITEM(res_dev.hdr.name),        0, ITEM_REQUIRED, 0},
 106    {"description",           store_str,    ITEM(res_dir.hdr.desc),        0, 0, 0},
 107    {"mediatype",             store_strname,ITEM(res_dev.media_type),      0, ITEM_REQUIRED, 0},
 108    {"archivedevice",         store_strname,ITEM(res_dev.device_name),     0, ITEM_REQUIRED, 0},
 109    {"hardwareendoffile",     store_yesno,  ITEM(res_dev.cap_bits), CAP_EOF,  ITEM_DEFAULT, 1},
 110    {"hardwareendofmedium",   store_yesno,  ITEM(res_dev.cap_bits), CAP_EOM,  ITEM_DEFAULT, 1},
 111    {"backwardspacerecord",   store_yesno,  ITEM(res_dev.cap_bits), CAP_BSR,  ITEM_DEFAULT, 1},
 112    {"backwardspacefile",     store_yesno,  ITEM(res_dev.cap_bits), CAP_BSF,  ITEM_DEFAULT, 1},
 113    {"bsfateom",              store_yesno,  ITEM(res_dev.cap_bits), CAP_BSFATEOM, ITEM_DEFAULT, 0},
 114    {"twoeof",                store_yesno,  ITEM(res_dev.cap_bits), CAP_TWOEOF, ITEM_DEFAULT, 0},
 115    {"forwardspacerecord",    store_yesno,  ITEM(res_dev.cap_bits), CAP_FSR,  ITEM_DEFAULT, 1},
 116    {"forwardspacefile",      store_yesno,  ITEM(res_dev.cap_bits), CAP_FSF,  ITEM_DEFAULT, 1},
 117    {"fastforwardspacefile",  store_yesno,  ITEM(res_dev.cap_bits), CAP_FASTFSF, ITEM_DEFAULT, 1},
 118    {"removablemedia",        store_yesno,  ITEM(res_dev.cap_bits), CAP_REM,  ITEM_DEFAULT, 1},
 119    {"randomaccess",          store_yesno,  ITEM(res_dev.cap_bits), CAP_RACCESS, 0, 0},
 120    {"automaticmount",        store_yesno,  ITEM(res_dev.cap_bits), CAP_AUTOMOUNT,  ITEM_DEFAULT, 0},
 121    {"labelmedia",            store_yesno,  ITEM(res_dev.cap_bits), CAP_LABEL,      ITEM_DEFAULT, 0},
 122    {"alwaysopen",            store_yesno,  ITEM(res_dev.cap_bits), CAP_ALWAYSOPEN, ITEM_DEFAULT, 1},
 123    {"autochanger",           store_yesno,  ITEM(res_dev.cap_bits), CAP_AUTOCHANGER, ITEM_DEFAULT, 0},
 124    {"closeonpoll",           store_yesno,  ITEM(res_dev.cap_bits), CAP_CLOSEONPOLL, ITEM_DEFAULT, 0},
 125    {"blockpositioning",      store_yesno,  ITEM(res_dev.cap_bits), CAP_POSITIONBLOCKS, ITEM_DEFAULT, 1},
 126    {"usemtiocget",           store_yesno,  ITEM(res_dev.cap_bits), CAP_MTIOCGET, ITEM_DEFAULT, 1},
 127    {"checklabels",           store_yesno,  ITEM(res_dev.cap_bits), CAP_CHECKLABELS, ITEM_DEFAULT, 0},
 128    {"autoselect",            store_yesno,  ITEM(res_dev.autoselect), 1, ITEM_DEFAULT, 1},
 129    {"changerdevice",         store_strname,ITEM(res_dev.changer_name), 0, 0, 0},
 130    {"changercommand",        store_strname,ITEM(res_dev.changer_command), 0, 0, 0},
 131    {"alertcommand",          store_strname,ITEM(res_dev.alert_command), 0, 0, 0},
 132    {"maximumchangerwait",    store_pint,   ITEM(res_dev.max_changer_wait), 0, ITEM_DEFAULT, 5 * 60},
 133    {"maximumopenwait",       store_pint,   ITEM(res_dev.max_open_wait), 0, ITEM_DEFAULT, 5 * 60},
 134    {"maximumopenvolumes",    store_pint,   ITEM(res_dev.max_open_vols), 0, ITEM_DEFAULT, 1},
 135    {"maximumnetworkbuffersize", store_pint, ITEM(res_dev.max_network_buffer_size), 0, 0, 0},
 136    {"volumepollinterval",    store_time,   ITEM(res_dev.vol_poll_interval), 0, 0, 0},
 137    {"offlineonunmount",      store_yesno,  ITEM(res_dev.cap_bits), CAP_OFFLINEUNMOUNT, ITEM_DEFAULT, 0},
 138    {"maximumrewindwait",     store_pint,   ITEM(res_dev.max_rewind_wait), 0, ITEM_DEFAULT, 5 * 60},
 139    {"minimumblocksize",      store_pint,   ITEM(res_dev.min_block_size), 0, 0, 0},
 140    {"maximumblocksize",      store_pint,   ITEM(res_dev.max_block_size), 0, 0, 0},
 141    {"maximumvolumesize",     store_size,   ITEM(res_dev.max_volume_size), 0, 0, 0},
 142    {"maximumfilesize",       store_size,   ITEM(res_dev.max_file_size), 0, ITEM_DEFAULT, 1000000000},
 143    {"volumecapacity",        store_size,   ITEM(res_dev.volume_capacity), 0, 0, 0},
 144    {"spooldirectory",        store_dir,    ITEM(res_dev.spool_directory), 0, 0, 0},
 145    {"maximumspoolsize",      store_size,   ITEM(res_dev.max_spool_size), 0, 0, 0},
 146    {"maximumjobspoolsize",   store_size,   ITEM(res_dev.max_job_spool_size), 0, 0, 0},
 147    {"driveindex",            store_pint,   ITEM(res_dev.drive_index), 0, 0, 0},
 148    {"maximumpartsize",       store_size,   ITEM(res_dev.max_part_size), 0, ITEM_DEFAULT, 0},
 149    {"requiresmount",         store_yesno,  ITEM(res_dev.cap_bits), CAP_REQMOUNT, ITEM_DEFAULT, 0},
 150    {"mountpoint",            store_strname,ITEM(res_dev.mount_point), 0, 0, 0},
 151    {"mountcommand",          store_strname,ITEM(res_dev.mount_command), 0, 0, 0},
 152    {"unmountcommand",        store_strname,ITEM(res_dev.unmount_command), 0, 0, 0},
 153    {"writepartcommand",      store_strname,ITEM(res_dev.write_part_command), 0, 0, 0},
 154    {"freespacecommand",      store_strname,ITEM(res_dev.free_space_command), 0, 0, 0},
 155    {"labeltype",             store_label,  ITEM(res_dev.label_type), 0, 0, 0},
 156    {NULL, NULL, 0, 0, 0, 0}
 157 };
 158
 159 /* Autochanger definition */
 160 static RES_ITEM changer_items[] = {
 161    {"name",              store_name,      ITEM(res_changer.hdr.name),        0, ITEM_REQUIRED, 0},
 162    {"description",       store_str,       ITEM(res_changer.hdr.desc),        0, 0, 0},
 163    {"device",            store_alist_res, ITEM(res_changer.device),   R_DEVICE, ITEM_REQUIRED, 0},
 164    {"changerdevice",     store_strname,   ITEM(res_changer.changer_name),    0, ITEM_REQUIRED, 0},
 165    {"changercommand",    store_strname,   ITEM(res_changer.changer_command), 0, ITEM_REQUIRED, 0},
 166    {NULL, NULL, 0, 0, 0, 0}
 167 };
 168
 169
 170 // {"mountanonymousvolumes", store_yesno,  ITEM(res_dev.cap_bits), CAP_ANONVOLS,   ITEM_DEFAULT, 0},
 171
 172
 173 /* Message resource */
 174 extern RES_ITEM msgs_items[];
 175
 176
 177 /* This is the master resource definition */
 178 RES_TABLE resources[] = {
 179    {"director",      dir_items,     R_DIRECTOR},
 180    {"storage",       store_items,   R_STORAGE},
 181    {"device",        dev_items,     R_DEVICE},
 182    {"messages",      msgs_items,    R_MSGS},
 183    {"autochanger",   changer_items, R_AUTOCHANGER},
 184    {NULL,            NULL,          0}
 185 };
 186
 187
 188
 189
 190 /* Dump contents of resource */
 191 void dump_resource(int type, RES *reshdr, void sendit(void *sock, const char *fmt, ...), void *sock)
 192 {
 193    URES *res = (URES *)reshdr;
 194    char buf[MAXSTRING];
 195    int recurse = 1;
 196    IPADDR *p;
 197    if (res == NULL) {
 198       sendit(sock, _("Warning: no \"%s\" resource (%d) defined.\n"), res_to_str(type), type);
 199       return;
 200    }
 201    sendit(sock, "dump_resource type=%d\n", type);
 202    if (type < 0) {                    /* no recursion */
 203       type = - type;
 204       recurse = 0;
 205    }
 206    switch (type) {
 207    case R_DIRECTOR:
 208       sendit(sock, "Director: name=%s\n", res->res_dir.hdr.name);
 209       break;
 210    case R_STORAGE:
 211       sendit(sock, "Storage: name=%s SDaddr=%s SDport=%d SDDport=%d HB=%s\n",
 212              res->res_store.hdr.name,
 213              NPRT(get_first_address(res->res_store.sdaddrs, buf, sizeof(buf))),
 214              get_first_port_host_order(res->res_store.sdaddrs),
 215              get_first_port_host_order(res->res_store.sddaddrs),
 216              edit_utime(res->res_store.heartbeat_interval, buf, sizeof(buf)));
 217       if (res->res_store.sdaddrs) {
 218          foreach_dlist(p, res->res_store.sdaddrs) {
 219             sendit(sock, "        SDaddr=%s SDport=%d\n",
 220                    p->get_address(buf, sizeof(buf)), p->get_port_host_order());
 221          }
 222       }
 223       if (res->res_store.sddaddrs) {
 224          foreach_dlist(p, res->res_store.sddaddrs) {
 225             sendit(sock, "        SDDaddr=%s SDDport=%d\n",
 226                    p->get_address(buf, sizeof(buf)), p->get_port_host_order());
 227          }
 228       }
 229       break;
 230    case R_DEVICE:
 231       sendit(sock, "Device: name=%s MediaType=%s Device=%s LabelType=%d\n",
 232          res->res_dev.hdr.name,
 233          res->res_dev.media_type, res->res_dev.device_name,
 234          res->res_dev.label_type);
 235       sendit(sock, "        rew_wait=%d min_bs=%d max_bs=%d\n",
 236          res->res_dev.max_rewind_wait, res->res_dev.min_block_size,
 237          res->res_dev.max_block_size);
 238       sendit(sock, "        max_jobs=%d max_files=%" lld " max_size=%" lld "\n",
 239          res->res_dev.max_volume_jobs, res->res_dev.max_volume_files,
 240          res->res_dev.max_volume_size);
 241       sendit(sock, "        max_file_size=%" lld " capacity=%" lld "\n",
 242          res->res_dev.max_file_size, res->res_dev.volume_capacity);
 243       sendit(sock, "         spool_directory=%s\n", NPRT(res->res_dev.spool_directory));
 244       sendit(sock, "         max_spool_size=%" lld " max_job_spool_size=%" lld "\n",
 245          res->res_dev.max_spool_size, res->res_dev.max_job_spool_size);
 246       if (res->res_dev.changer_res) {
 247          sendit(sock, "         changer=%p\n", res->res_dev.changer_res);
 248       }
 249       bstrncpy(buf, "        ", sizeof(buf));
 250       if (res->res_dev.cap_bits & CAP_EOF) {
 251          bstrncat(buf, "CAP_EOF ", sizeof(buf));
 252       }
 253       if (res->res_dev.cap_bits & CAP_BSR) {
 254          bstrncat(buf, "CAP_BSR ", sizeof(buf));
 255       }
 256       if (res->res_dev.cap_bits & CAP_BSF) {
 257          bstrncat(buf, "CAP_BSF ", sizeof(buf));
 258       }
 259       if (res->res_dev.cap_bits & CAP_FSR) {
 260          bstrncat(buf, "CAP_FSR ", sizeof(buf));
 261       }
 262       if (res->res_dev.cap_bits & CAP_FSF) {
 263          bstrncat(buf, "CAP_FSF ", sizeof(buf));
 264       }
 265       if (res->res_dev.cap_bits & CAP_EOM) {
 266          bstrncat(buf, "CAP_EOM ", sizeof(buf));
 267       }
 268       if (res->res_dev.cap_bits & CAP_REM) {
 269          bstrncat(buf, "CAP_REM ", sizeof(buf));
 270       }
 271       if (res->res_dev.cap_bits & CAP_RACCESS) {
 272          bstrncat(buf, "CAP_RACCESS ", sizeof(buf));
 273       }
 274       if (res->res_dev.cap_bits & CAP_AUTOMOUNT) {
 275          bstrncat(buf, "CAP_AUTOMOUNT ", sizeof(buf));
 276       }
 277       if (res->res_dev.cap_bits & CAP_LABEL) {
 278          bstrncat(buf, "CAP_LABEL ", sizeof(buf));
 279       }
 280       if (res->res_dev.cap_bits & CAP_ANONVOLS) {
 281          bstrncat(buf, "CAP_ANONVOLS ", sizeof(buf));
 282       }
 283       if (res->res_dev.cap_bits & CAP_ALWAYSOPEN) {
 284          bstrncat(buf, "CAP_ALWAYSOPEN ", sizeof(buf));
 285       }
 286       if (res->res_dev.cap_bits & CAP_CHECKLABELS) {
 287          bstrncat(buf, "CAP_CHECKLABELS ", sizeof(buf));
 288       }
 289       bstrncat(buf, "\n", sizeof(buf));
 290       sendit(sock, buf);
 291       break;
 292    case R_AUTOCHANGER:
 293       DEVRES *dev;
 294       sendit(sock, "Changer: name=%s Changer_devname=%s\n      Changer_cmd=%s\n",
 295          res->res_changer.hdr.name,
 296          res->res_changer.changer_name, res->res_changer.changer_command);
 297       foreach_alist(dev, res->res_changer.device) {
 298          sendit(sock, "   --->Device: name=%s\n", dev->hdr.name);
 299       }
 300       bstrncat(buf, "\n", sizeof(buf));
 301       sendit(sock, buf);
 302       break;
 303    case R_MSGS:
 304       sendit(sock, "Messages: name=%s\n", res->res_msgs.hdr.name);
 305       if (res->res_msgs.mail_cmd)
 306          sendit(sock, "      mailcmd=%s\n", res->res_msgs.mail_cmd);
 307       if (res->res_msgs.operator_cmd)
 308          sendit(sock, "      opcmd=%s\n", res->res_msgs.operator_cmd);
 309       break;
 310    default:
 311       sendit(sock, _("Warning: unknown resource type %d\n"), type);
 312       break;
 313    }
 314    if (recurse && res->res_dir.hdr.next)
 315       dump_resource(type, (RES *)res->res_dir.hdr.next, sendit, sock);
 316 }
 317
 318 /*
 319  * Free memory of resource.
 320  * NB, we don't need to worry about freeing any references
 321  * to other resources as they will be freed when that
 322  * resource chain is traversed.  Mainly we worry about freeing
 323  * allocated strings (names).
 324  */
 325 void free_resource(RES *sres, int type)
 326 {
 327    RES *nres;
 328    URES *res = (URES *)sres;
 329
 330    if (res == NULL)
 331       return;
 332
 333    /* common stuff -- free the resource name */
 334    nres = (RES *)res->res_dir.hdr.next;
 335    if (res->res_dir.hdr.name) {
 336       free(res->res_dir.hdr.name);
 337    }
 338    if (res->res_dir.hdr.desc) {
 339       free(res->res_dir.hdr.desc);
 340    }
 341
 342
 343    switch (type) {
 344    case R_DIRECTOR:
 345       if (res->res_dir.password) {
 346          free(res->res_dir.password);
 347       }
 348       if (res->res_dir.address) {
 349          free(res->res_dir.address);
 350       }
 351 #ifdef HAVE_TLS
 352       if (res->res_dir.tls_ctx) {
 353          free_tls_context(res->res_dir.tls_ctx);
 354       }
 355       if (res->res_dir.tls_ca_certfile) {
 356          free(res->res_dir.tls_ca_certfile);
 357       }
 358       if (res->res_dir.tls_ca_certdir) {
 359          free(res->res_dir.tls_ca_certdir);
 360       }
 361       if (res->res_dir.tls_certfile) {
 362          free(res->res_dir.tls_certfile);
 363       }
 364       if (res->res_dir.tls_keyfile) {
 365          free(res->res_dir.tls_keyfile);
 366       }
 367       if (res->res_dir.tls_dhfile) {
 368          free(res->res_dir.tls_dhfile);
 369       }
 370       if (res->res_dir.tls_allowed_cns) {
 371          delete res->res_dir.tls_allowed_cns;
 372       }
 373 #endif /* HAVE_TLS */
 374       break;
 375    case R_AUTOCHANGER:
 376       if (res->res_changer.changer_name) {
 377          free(res->res_changer.changer_name);
 378       }
 379       if (res->res_changer.changer_command) {
 380          free(res->res_changer.changer_command);
 381       }
 382       if (res->res_changer.device) {
 383          delete res->res_changer.device;
 384       }
 385       break;
 386    case R_STORAGE:
 387       if (res->res_store.sdaddrs) {
 388          free_addresses(res->res_store.sdaddrs);
 389       }
 390       if (res->res_store.sddaddrs) {
 391          free_addresses(res->res_store.sddaddrs);
 392       }
 393       if (res->res_store.working_directory) {
 394          free(res->res_store.working_directory);
 395       }
 396       if (res->res_store.pid_directory) {
 397          free(res->res_store.pid_directory);
 398       }
 399       if (res->res_store.subsys_directory) {
 400          free(res->res_store.subsys_directory);
 401       }
 402       if (res->res_store.scripts_directory) {
 403          free(res->res_store.scripts_directory);
 404       }
 405 #ifdef HAVE_TLS
 406       if (res->res_store.tls_ctx) {
 407          free_tls_context(res->res_store.tls_ctx);
 408       }
 409       if (res->res_store.tls_ca_certfile) {
 410          free(res->res_store.tls_ca_certfile);
 411       }
 412       if (res->res_store.tls_ca_certdir) {
 413          free(res->res_store.tls_ca_certdir);
 414       }
 415       if (res->res_store.tls_certfile) {
 416          free(res->res_store.tls_certfile);
 417       }
 418       if (res->res_store.tls_keyfile) {
 419          free(res->res_store.tls_keyfile);
 420       }
 421       if (res->res_store.tls_dhfile) {
 422          free(res->res_store.tls_dhfile);
 423       }
 424       if (res->res_store.tls_allowed_cns) {
 425          delete res->res_store.tls_allowed_cns;
 426       }
 427 #endif /* HAVE_TLS */
 428       break;
 429    case R_DEVICE:
 430       if (res->res_dev.media_type) {
 431          free(res->res_dev.media_type);
 432       }
 433       if (res->res_dev.device_name) {
 434          free(res->res_dev.device_name);
 435       }
 436       if (res->res_dev.changer_name) {
 437          free(res->res_dev.changer_name);
 438       }
 439       if (res->res_dev.changer_command) {
 440          free(res->res_dev.changer_command);
 441       }
 442       if (res->res_dev.alert_command) {
 443          free(res->res_dev.alert_command);
 444       }
 445       if (res->res_dev.spool_directory) {
 446          free(res->res_dev.spool_directory);
 447       }
 448       if (res->res_dev.mount_point) {
 449          free(res->res_dev.mount_point);
 450       }
 451       if (res->res_dev.mount_command) {
 452          free(res->res_dev.mount_command);
 453       }
 454       if (res->res_dev.unmount_command) {
 455          free(res->res_dev.unmount_command);
 456       }
 457       if (res->res_dev.write_part_command) {
 458          free(res->res_dev.write_part_command);
 459       }
 460       if (res->res_dev.free_space_command) {
 461          free(res->res_dev.free_space_command);
 462       }
 463       break;
 464    case R_MSGS:
 465       if (res->res_msgs.mail_cmd) {
 466          free(res->res_msgs.mail_cmd);
 467       }
 468       if (res->res_msgs.operator_cmd) {
 469          free(res->res_msgs.operator_cmd);
 470       }
 471       free_msgs_res((MSGS *)res);  /* free message resource */
 472       res = NULL;
 473       break;
 474    default:
 475       Dmsg1(0, "Unknown resource type %d\n", type);
 476       break;
 477    }
 478    /* Common stuff again -- free the resource, recurse to next one */
 479    if (res) {
 480       free(res);
 481    }
 482    if (nres) {
 483       free_resource(nres, type);
 484    }
 485 }
 486
 487 /* Save the new resource by chaining it into the head list for
 488  * the resource. If this is pass 2, we update any resource
 489  * or alist pointers.
 490  */
 491 void save_resource(int type, RES_ITEM *items, int pass)
 492 {
 493    URES *res;
 494    int rindex = type - r_first;
 495    int i, size;
 496    int error = 0;
 497
 498    /*
 499     * Ensure that all required items are present
 500     */
 501    for (i=0; items[i].name; i++) {
 502       if (items[i].flags & ITEM_REQUIRED) {
 503          if (!bit_is_set(i, res_all.res_dir.hdr.item_present)) {
 504             Emsg2(M_ERROR_TERM, 0, _("\"%s\" item is required in \"%s\" resource, but not found.\n"),
 505               items[i].name, resources[rindex]);
 506           }
 507       }
 508       /* If this triggers, take a look at lib/parse_conf.h */
 509       if (i >= MAX_RES_ITEMS) {
 510          Emsg1(M_ERROR_TERM, 0, _("Too many items in \"%s\" resource\n"), resources[rindex]);
 511       }
 512    }
 513
 514    /* During pass 2, we looked up pointers to all the resources
 515     * referrenced in the current resource, , now we
 516     * must copy their address from the static record to the allocated
 517     * record.
 518     */
 519    if (pass == 2) {
 520       DEVRES *dev;
 521       int errstat;
 522       switch (type) {
 523       /* Resources not containing a resource */
 524       case R_DEVICE:
 525       case R_MSGS:
 526          break;
 527
 528       /* Resources containing a resource or an alist */
 529       case R_DIRECTOR:
 530          if ((res = (URES *)GetResWithName(R_DIRECTOR, res_all.res_dir.hdr.name)) == NULL) {
 531             Emsg1(M_ERROR_TERM, 0, "Cannot find Director resource \"%s\"\n", res_all.res_dir.hdr.name);
 532          }
 533 #ifdef HAVE_TLS
 534          res->res_dir.tls_allowed_cns = res_all.res_dir.tls_allowed_cns;
 535 #endif
 536          break;
 537       case R_STORAGE:
 538          if ((res = (URES *)GetResWithName(R_STORAGE, res_all.res_dir.hdr.name)) == NULL) {
 539             Emsg1(M_ERROR_TERM, 0, "Cannot find Storage resource \"%s\"\n", res_all.res_dir.hdr.name);
 540          }
 541          res->res_store.messages = res_all.res_store.messages;
 542 #ifdef HAVE_TLS
 543          res->res_store.tls_allowed_cns = res_all.res_store.tls_allowed_cns;
 544 #endif
 545          break;
 546       case R_AUTOCHANGER:
 547          if ((res = (URES *)GetResWithName(type, res_all.res_changer.hdr.name)) == NULL) {
 548             Emsg1(M_ERROR_TERM, 0, "Cannot find AutoChanger resource %s\n",
 549                   res_all.res_changer.hdr.name);
 550          }
 551          /* we must explicitly copy the device alist pointer */
 552          res->res_changer.device   = res_all.res_changer.device;
 553          /*
 554           * Now update each device in this resource to point back
 555           *  to the changer resource.
 556           */
 557          foreach_alist(dev, res->res_changer.device) {
 558             dev->changer_res = (AUTOCHANGER *)&res->res_changer;
 559          }
 560          if ((errstat = pthread_mutex_init(&res->res_changer.changer_mutex, NULL)) != 0) {
 561             berrno be;
 562             Jmsg1(NULL, M_ERROR_TERM, 0, _("Unable to init mutex: ERR=%s\n"),
 563                   be.strerror(errstat));
 564          }
 565          break;
 566       default:
 567          printf("Unknown resource type %d\n", type);
 568          error = 1;
 569          break;
 570       }
 571
 572
 573       if (res_all.res_dir.hdr.name) {
 574          free(res_all.res_dir.hdr.name);
 575          res_all.res_dir.hdr.name = NULL;
 576       }
 577       if (res_all.res_dir.hdr.desc) {
 578          free(res_all.res_dir.hdr.desc);
 579          res_all.res_dir.hdr.desc = NULL;
 580       }
 581       return;
 582    }
 583
 584    /* The following code is only executed on pass 1 */
 585    switch (type) {
 586       case R_DIRECTOR:
 587          size = sizeof(DIRRES);
 588          break;
 589       case R_STORAGE:
 590          size = sizeof(STORES);
 591          break;
 592       case R_DEVICE:
 593          size = sizeof(DEVRES);
 594          break;
 595       case R_MSGS:
 596          size = sizeof(MSGS);
 597          break;
 598       case R_AUTOCHANGER:
 599          size = sizeof(AUTOCHANGER);
 600          break;
 601       default:
 602          printf("Unknown resource type %d\n", type);
 603          error = 1;
 604          size = 1;
 605          break;
 606    }
 607    /* Common */
 608    if (!error) {
 609       res = (URES *)malloc(size);
 610       memcpy(res, &res_all, size);
 611       if (!res_head[rindex]) {
 612          res_head[rindex] = (RES *)res; /* store first entry */
 613       } else {
 614          RES *next;
 615          /* Add new res to end of chain */
 616          for (next=res_head[rindex]; next->next; next=next->next) {
 617             if (strcmp(next->name, res->res_dir.hdr.name) == 0) {
 618                Emsg2(M_ERROR_TERM, 0,
 619                   _("Attempt to define second \"%s\" resource named \"%s\" is not permitted.\n"),
 620                   resources[rindex].name, res->res_dir.hdr.name);
 621             }
 622          }
 623          next->next = (RES *)res;
 624          Dmsg2(90, "Inserting %s res: %s\n", res_to_str(type),
 625                res->res_dir.hdr.name);
 626       }
 627    }
 628 }