]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/lib/parse_conf.c
Fix junk in print of resource[rindex] + tweak the messages
[bacula/bacula] / bacula / src / lib / parse_conf.c
index 3313e680f39ca9ae95bf54f1505cd7ff6eac0710..1da62d630630d85c88d7a93ccbd5328be0724260 100644 (file)
@@ -1,29 +1,20 @@
 /*
-   Bacula® - The Network Backup Solution
-
-   Copyright (C) 2000-2009 Free Software Foundation Europe e.V.
-
-   The main author of Bacula is Kern Sibbald, with contributions from
-   many others, a complete list can be found in the file AUTHORS.
-   This program is Free Software; you can redistribute it and/or
-   modify it under the terms of version two of the GNU General Public
-   License as published by the Free Software Foundation and included
-   in the file LICENSE.
-
-   This program is distributed in the hope that it will be useful, but
-   WITHOUT ANY WARRANTY; without even the implied warranty of
-   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
-   General Public License for more details.
-
-   You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software
-   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
-   02110-1301, USA.
-
-   Bacula® is a registered trademark of Kern Sibbald.
-   The licensor of Bacula is the Free Software Foundation Europe
-   (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich,
-   Switzerland, email:ftf@fsfeurope.org.
+   Bacula(R) - The Network Backup Solution
+
+   Copyright (C) 2000-2016 Kern Sibbald
+
+   The original author of Bacula is Kern Sibbald, with contributions
+   from many others, a complete list can be found in the file AUTHORS.
+
+   You may use this file and others of this release according to the
+   license defined in the LICENSE file, which includes the Affero General
+   Public License, v3.0 ("AGPLv3") and some additional permissions and
+   terms pursuant to its AGPLv3 Section 7.
+
+   This notice must be preserved when any source code is 
+   conveyed and/or propagated.
+
+   Bacula(R) is a registered trademark of Kern Sibbald.
 */
 /*
  *   Master Configuration routines.
@@ -57,7 +48,6 @@
  *
  *     Kern Sibbald, January MM
  *
- *   Version $Id$
  */
 
 
@@ -99,22 +89,22 @@ static bool find_config_file(const char *config_file, char *full_path, int max_p
  *  name         handler      value       code   flags  default_value
  */
 RES_ITEM msgs_items[] = {
-   {"name",        store_name,    ITEM(res_msgs.hdr.name),  0, 0, 0},
-   {"description", store_str,     ITEM(res_msgs.hdr.desc),  0, 0, 0},
-   {"mailcommand", store_str,     ITEM(res_msgs.mail_cmd),  0, 0, 0},
-   {"operatorcommand", store_str, ITEM(res_msgs.operator_cmd), 0, 0, 0},
-   {"syslog",      store_msgs, ITEM(res_msgs), MD_SYSLOG,   0, 0},
-   {"mail",        store_msgs, ITEM(res_msgs), MD_MAIL,     0, 0},
-   {"mailonerror", store_msgs, ITEM(res_msgs), MD_MAIL_ON_ERROR, 0, 0},
-   {"mailonsuccess", store_msgs, ITEM(res_msgs), MD_MAIL_ON_SUCCESS, 0, 0},
-   {"file",        store_msgs, ITEM(res_msgs), MD_FILE,     0, 0},
-   {"append",      store_msgs, ITEM(res_msgs), MD_APPEND,   0, 0},
-   {"stdout",      store_msgs, ITEM(res_msgs), MD_STDOUT,   0, 0},
-   {"stderr",      store_msgs, ITEM(res_msgs), MD_STDERR,   0, 0},
-   {"director",    store_msgs, ITEM(res_msgs), MD_DIRECTOR, 0, 0},
-   {"console",     store_msgs, ITEM(res_msgs), MD_CONSOLE,  0, 0},
-   {"operator",    store_msgs, ITEM(res_msgs), MD_OPERATOR, 0, 0},
-   {"catalog",     store_msgs, ITEM(res_msgs), MD_CATALOG,  0, 0},
+   {"Name",        store_name,    ITEM(res_msgs.hdr.name),  0, 0, 0},
+   {"Description", store_str,     ITEM(res_msgs.hdr.desc),  0, 0, 0},
+   {"MailCommand", store_str,     ITEM(res_msgs.mail_cmd),  0, ITEM_ALLOW_DUPS, 0},
+   {"OperatorCommand", store_str, ITEM(res_msgs.operator_cmd), 0, ITEM_ALLOW_DUPS, 0},
+   {"Syslog",      store_msgs, ITEM(res_msgs), MD_SYSLOG,   0, 0},
+   {"Mail",        store_msgs, ITEM(res_msgs), MD_MAIL,     0, 0},
+   {"MailOnError", store_msgs, ITEM(res_msgs), MD_MAIL_ON_ERROR, 0, 0},
+   {"MailOnSuccess", store_msgs, ITEM(res_msgs), MD_MAIL_ON_SUCCESS, 0, 0},
+   {"File",        store_msgs, ITEM(res_msgs), MD_FILE,     0, 0},
+   {"Append",      store_msgs, ITEM(res_msgs), MD_APPEND,   0, 0},
+   {"Stdout",      store_msgs, ITEM(res_msgs), MD_STDOUT,   0, 0},
+   {"Stderr",      store_msgs, ITEM(res_msgs), MD_STDERR,   0, 0},
+   {"Director",    store_msgs, ITEM(res_msgs), MD_DIRECTOR, 0, 0},
+   {"Console",     store_msgs, ITEM(res_msgs), MD_CONSOLE,  0, 0},
+   {"Operator",    store_msgs, ITEM(res_msgs), MD_OPERATOR, 0, 0},
+   {"Catalog",     store_msgs, ITEM(res_msgs), MD_CATALOG,  ITEM_LAST, 0},
    {NULL,          NULL,       {0},       0, 0, 0}
 };
 
@@ -124,40 +114,35 @@ struct s_mtypes {
 };
 /* Various message types */
 static struct s_mtypes msg_types[] = {
-   {"debug",         M_DEBUG},
-   {"abort",         M_ABORT},
-   {"fatal",         M_FATAL},
-   {"error",         M_ERROR},
-   {"warning",       M_WARNING},
-   {"info",          M_INFO},
-   {"saved",         M_SAVED},
-   {"notsaved",      M_NOTSAVED},
-   {"skipped",       M_SKIPPED},
-   {"mount",         M_MOUNT},
-   {"terminate",     M_TERM},
-   {"restored",      M_RESTORED},
-   {"security",      M_SECURITY},
-   {"alert",         M_ALERT},
-   {"volmgmt",       M_VOLMGMT},
-   {"all",           M_MAX+1},
+   {"Debug",         M_DEBUG},
+   {"Abort",         M_ABORT},
+   {"Fatal",         M_FATAL},
+   {"Error",         M_ERROR},
+   {"Warning",       M_WARNING},
+   {"Info",          M_INFO},
+   {"Saved",         M_SAVED},
+   {"NotSaved",      M_NOTSAVED},
+   {"Skipped",       M_SKIPPED},
+   {"Mount",         M_MOUNT},
+   {"Terminate",     M_TERM},
+   {"Restored",      M_RESTORED},
+   {"Security",      M_SECURITY},
+   {"Alert",         M_ALERT},
+   {"VolMgmt",       M_VOLMGMT},
+   {"ErrorTerm",     M_ERROR_TERM},
+   {"All",           M_MAX+1},
    {NULL,            0}
 };
 
-/* Used for certain KeyWord tables */
-struct s_kw {
-   const char *name;
-   int token;
-};
-
 /*
- * Tape Label types permitted in Pool records 
+ * Tape Label types permitted in Pool records
  *
  *   tape label      label code = token
  */
-static s_kw tapelabels[] = {
-   {"bacula",        B_BACULA_LABEL},
-   {"ansi",          B_ANSI_LABEL},
-   {"ibm",           B_IBM_LABEL},
+s_kw tapelabels[] = {
+   {"Bacula",        B_BACULA_LABEL},
+   {"ANSI",          B_ANSI_LABEL},
+   {"IBM",           B_IBM_LABEL},
    {NULL,            0}
 };
 
@@ -213,6 +198,8 @@ static void init_resource(CONFIG *config, int type, RES_ITEM *items, int pass)
             *(int64_t *)(items[i].value) = items[i].default_value;
          } else if (items[i].handler == store_size64) {
             *(uint64_t *)(items[i].value) = (uint64_t)items[i].default_value;
+         } else if (items[i].handler == store_speed) {
+            *(uint64_t *)(items[i].value) = (uint64_t)items[i].default_value;
          } else if (items[i].handler == store_time) {
             *(utime_t *)(items[i].value) = (utime_t)items[i].default_value;
          } else if (pass == 1 && items[i].handler == store_addresses) {
@@ -221,7 +208,7 @@ static void init_resource(CONFIG *config, int type, RES_ITEM *items, int pass)
       }
       /* If this triggers, take a look at lib/parse_conf.h */
       if (i >= MAX_RES_ITEMS) {
-         Emsg1(M_ERROR_TERM, 0, _("Too many items in %s resource\n"), resources[rindex]);
+         Emsg1(M_ERROR_TERM, 0, _("Too many directives in \"%s\" resource\n"), resources[rindex].name);
       }
    }
 }
@@ -321,7 +308,7 @@ void store_msgs(LEX *lc, RES_ITEM *item, int index, int pass)
  */
 static void scan_types(LEX *lc, MSGS *msg, int dest_code, char *where, char *cmd)
 {
-   int i; 
+   int i;
    bool found, is_not;
    int msg_type = 0;
    char *str;
@@ -382,8 +369,8 @@ void store_name(LEX *lc, RES_ITEM *item, int index, int pass)
    free_pool_memory(msg);
    /* Store the name both pass 1 and pass 2 */
    if (*(item->value)) {
-      scan_err2(lc, _("Attempt to redefine name \"%s\" to \"%s\"."),
-         *(item->value), lc->str);
+      scan_err5(lc, _("Attempt to redefine \"%s\" from \"%s\" to \"%s\" referenced on line %d : %s\n"),
+         item->name, *(item->value), lc->str, lc->line_no, lc->line);
       return;
    }
    *(item->value) = bstrdup(lc->str);
@@ -401,6 +388,11 @@ void store_strname(LEX *lc, RES_ITEM *item, int index, int pass)
    lex_get_token(lc, T_NAME);
    /* Store the name */
    if (pass == 1) {
+      if (*(item->value)) {
+         scan_err5(lc, _("Attempt to redefine \"%s\" from \"%s\" to \"%s\" referenced on line %d : %s\n"),
+            item->name, *(item->value), lc->str, lc->line_no, lc->line);
+         return;
+      }
       *(item->value) = bstrdup(lc->str);
    }
    scan_to_eol(lc);
@@ -412,6 +404,15 @@ void store_str(LEX *lc, RES_ITEM *item, int index, int pass)
 {
    lex_get_token(lc, T_STRING);
    if (pass == 1) {
+      if (*(item->value) && (item->flags & ITEM_ALLOW_DUPS)) {
+         free(*(item->value));
+         *(item->value) = NULL;
+      }
+      if (*(item->value)) {
+         scan_err5(lc, _("Attempt to redefine \"%s\" from \"%s\" to \"%s\" referenced on line %d : %s\n"),
+            item->name, *(item->value), lc->str, lc->line_no, lc->line);
+         return;
+      }
       *(item->value) = bstrdup(lc->str);
    }
    scan_to_eol(lc);
@@ -428,7 +429,12 @@ void store_dir(LEX *lc, RES_ITEM *item, int index, int pass)
    lex_get_token(lc, T_STRING);
    if (pass == 1) {
       if (lc->str[0] != '|') {
-         do_shell_expansion(lc->str, sizeof(lc->str));
+         do_shell_expansion(lc->str, sizeof_pool_memory(lc->str));
+      }
+      if (*(item->value)) {
+         scan_err5(lc, _("Attempt to redefine \"%s\" from \"%s\" to \"%s\" referenced on line %d : %s\n"),
+            item->name, *(item->value), lc->str, lc->line_no, lc->line);
+         return;
       }
       *(item->value) = bstrdup(lc->str);
    }
@@ -455,6 +461,11 @@ void store_password(LEX *lc, RES_ITEM *item, int index, int pass)
          sprintf(&sig[j], "%02x", digest[i]);
          j += 2;
       }
+      if (*(item->value)) {
+         scan_err5(lc, _("Attempt to redefine \"%s\" from \"%s\" to \"%s\" referenced on line %d : %s\n"),
+            item->name, *(item->value), lc->str, lc->line_no, lc->line);
+         return;
+      }
       *(item->value) = bstrdup(sig);
    }
    scan_to_eol(lc);
@@ -530,7 +541,7 @@ void store_alist_res(LEX *lc, RES_ITEM *item, int index, int pass)
                item->name, lc->line_no, lc->line);
             return;
          }
-         Dmsg5(900, "Append %p to alist %p size=%d i=%d %s\n", 
+         Dmsg5(900, "Append %p to alist %p size=%d i=%d %s\n",
                res, list, list->size(), i, item->name);
          list->append(res);
          (item->value)[i] = (char *)list;
@@ -555,15 +566,20 @@ void store_alist_str(LEX *lc, RES_ITEM *item, int index, int pass)
    if (pass == 2) {
       if (*(item->value) == NULL) {
          list = New(alist(10, owned_by_alist));
+         *(item->value) = (char *)list;
       } else {
-         list = (alist *)(*(item->value));    
+         list = (alist *)(*(item->value));
+      }
+      for (;;) {
+         lex_get_token(lc, T_STRING);   /* scan next item */
+         Dmsg4(900, "Append %s to alist 0x%p size=%d %s\n",
+            lc->str, list, list->size(), item->name);
+         list->append(bstrdup(lc->str));
+         if (lc->ch != ',') {         /* if no other item follows */
+            break;                    /* get out */
+         }
+         lex_get_token(lc, T_ALL);    /* eat comma */
       }
-
-      lex_get_token(lc, T_STRING);   /* scan next item */
-      Dmsg4(900, "Append %s to alist %p size=%d %s\n", 
-         lc->str, list, list->size(), item->name);
-      list->append(bstrdup(lc->str));
-      *(item->value) = (char *)list;
    }
    scan_to_eol(lc);
    set_bit(index, res_all.hdr.item_present);
@@ -627,14 +643,20 @@ void store_int64(LEX *lc, RES_ITEM *item, int index, int pass)
    set_bit(index, res_all.hdr.item_present);
 }
 
+enum store_unit_type {
+   STORE_SIZE,
+   STORE_SPEED
+} ;
+
 /* Store a size in bytes */
-static void store_size(LEX *lc, RES_ITEM *item, int index, int pass, bool size32)
+static void store_int_unit(LEX *lc, RES_ITEM *item, int index, int pass,
+                           bool size32, enum store_unit_type type)
 {
    int token;
    uint64_t uvalue;
    char bsize[500];
 
-   Dmsg0(900, "Enter store_size\n");
+   Dmsg0(900, "Enter store_unit\n");
    token = lex_get_token(lc, T_SKIP_EOL);
    errno = 0;
    switch (token) {
@@ -653,9 +675,16 @@ static void store_size(LEX *lc, RES_ITEM *item, int index, int pass, bool size32
             break;
          }
       }
-      if (!size_to_uint64(bsize, strlen(bsize), &uvalue)) {
-         scan_err1(lc, _("expected a size number, got: %s"), lc->str);
-         return;
+      if (type == STORE_SIZE) {
+         if (!size_to_uint64(bsize, strlen(bsize), &uvalue)) {
+            scan_err1(lc, _("expected a size number, got: %s"), lc->str);
+            return;
+         }
+      } else {
+         if (!speed_to_uint64(bsize, strlen(bsize), &uvalue)) {
+            scan_err1(lc, _("expected a speed number, got: %s"), lc->str);
+            return;
+         }
       }
       if (size32) {
          *(uint32_t *)(item->value) = (uint32_t)uvalue;
@@ -664,28 +693,34 @@ static void store_size(LEX *lc, RES_ITEM *item, int index, int pass, bool size32
       }
       break;
    default:
-      scan_err1(lc, _("expected a size, got: %s"), lc->str);
+      scan_err2(lc, _("expected a %s, got: %s"),
+                (type == STORE_SIZE)?_("size"):_("speed"), lc->str);
       return;
    }
    if (token != T_EOL) {
       scan_to_eol(lc);
    }
    set_bit(index, res_all.hdr.item_present);
-   Dmsg0(900, "Leave store_size\n");
+   Dmsg0(900, "Leave store_unit\n");
 }
 
 /* Store a size in bytes */
 void store_size32(LEX *lc, RES_ITEM *item, int index, int pass)
 {
-   store_size(lc, item, index, pass, true /* 32 bit */);
+   store_int_unit(lc, item, index, pass, true /* 32 bit */, STORE_SIZE);
 }
 
 /* Store a size in bytes */
 void store_size64(LEX *lc, RES_ITEM *item, int index, int pass)
 {
-   store_size(lc, item, index, pass, false /* not 32 bit */);
+   store_int_unit(lc, item, index, pass, false /* not 32 bit */, STORE_SIZE);
 }
 
+/* Store a speed in bytes/s */
+void store_speed(LEX *lc, RES_ITEM *item, int index, int pass)
+{
+   store_int_unit(lc, item, index, pass, false /* 64 bit */, STORE_SPEED);
+}
 
 /* Store a time period in seconds */
 void store_time(LEX *lc, RES_ITEM *item, int index, int pass)
@@ -768,9 +803,9 @@ void store_bool(LEX *lc, RES_ITEM *item, int index, int pass)
  */
 void store_label(LEX *lc, RES_ITEM *item, int index, int pass)
 {
-   int token, i;
+   int i;
 
-   token = lex_get_token(lc, T_NAME);
+   lex_get_token(lc, T_NAME);
    /* Store the label pass 2 so that type is defined */
    for (i=0; tapelabels[i].name; i++) {
       if (strcasecmp(lc->str, tapelabels[i].name) == 0) {
@@ -832,21 +867,6 @@ void CONFIG::init(
  *  Note, the default behavior unless you have set an alternate
  *  scan_error handler is to die on an error.
  */
-#ifdef xxx
-int
-parse_config(const char *cf, LEX_ERROR_HANDLER *scan_error, int err_type)
-{
-   int ok;
-   CONFIG *config = new_config_parser();
-   config->init(cf, scan_error, err_type, (void *)&res_all, res_all_size,    
-                r_first, r_last, resources, res_head);
-   ok = config->parse_config();
-   free(config);
-   return ok;
-}
-#endif
-      
-   
 bool CONFIG::parse_config()
 {
    LEX *lc = NULL;
@@ -886,16 +906,18 @@ bool CONFIG::parse_config()
          /* We must create a lex packet to print the error */
          lc = (LEX *)malloc(sizeof(LEX));
          memset(lc, 0, sizeof(LEX));
+         lc->str = get_memory(5000);
          if (scan_error) {
             lc->scan_error = scan_error;
          } else {
             lex_set_default_error_handler(lc);
          }
          lex_set_error_handler_error_type(lc, err_type) ;
-         bstrncpy(lc->str, cf, sizeof(lc->str));
+         pm_strcpy(lc->str, cf);
          lc->fname = lc->str;
          scan_err2(lc, _("Cannot open config file \"%s\": %s\n"),
             lc->str, be.bstrerror());
+         free_pool_memory(lc->str);
          free(lc);
          return 0;
       }
@@ -1021,33 +1043,12 @@ bail_out:
 
 const char *get_default_configdir()
 {
-#if defined(HAVE_WIN32)
-   HRESULT hr;
-   static char szConfigDir[MAX_PATH + 1] = { 0 };
-
-   if (!p_SHGetFolderPath) {
-      bstrncpy(szConfigDir, DEFAULT_CONFIGDIR, sizeof(szConfigDir));
-      return szConfigDir;
-   }
-
-   if (szConfigDir[0] == '\0') {
-      hr = p_SHGetFolderPath(NULL, CSIDL_COMMON_APPDATA, NULL, 0, szConfigDir);
-
-      if (SUCCEEDED(hr)) {
-         bstrncat(szConfigDir, "\\Bacula", sizeof(szConfigDir));
-      } else {
-         bstrncpy(szConfigDir, DEFAULT_CONFIGDIR, sizeof(szConfigDir));
-      }
-   }
-   return szConfigDir;
-#else
    return SYSCONFDIR;
-#endif
 }
 
 /*
  * Returns false on error
- *         true  on OK, with full_path set to where config file should be 
+ *         true  on OK, with full_path set to where config file should be
  */
 static bool
 find_config_file(const char *config_file, char *full_path, int max_path)