Imported Upstream version 1.8.1p2
[debian/sudo] / plugins / sudoers / defaults.c
diff --git a/plugins/sudoers/defaults.c b/plugins/sudoers/defaults.c
new file mode 100644 (file)
index 0000000..f9e9961
--- /dev/null
@@ -0,0 +1,812 @@
+/*
+ * Copyright (c) 1999-2005, 2007-2011
+ *     Todd C. Miller <Todd.Miller@courtesan.com>
+ *
+ * Permission to use, copy, modify, and distribute this software for any
+ * purpose with or without fee is hereby granted, provided that the above
+ * copyright notice and this permission notice appear in all copies.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+ * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+ * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+ * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
+ * Sponsored in part by the Defense Advanced Research Projects
+ * Agency (DARPA) and Air Force Research Laboratory, Air Force
+ * Materiel Command, USAF, under agreement number F39502-99-1-0512.
+ */
+
+#include <config.h>
+
+#include <sys/types.h>
+#include <sys/param.h>
+#include <stdio.h>
+#ifdef STDC_HEADERS
+# include <stdlib.h>
+# include <stddef.h>
+#else
+# ifdef HAVE_STDLIB_H
+#  include <stdlib.h>
+# endif
+#endif /* STDC_HEADERS */
+#ifdef HAVE_STRING_H
+# include <string.h>
+#endif /* HAVE_STRING_H */
+#ifdef HAVE_STRINGS_H
+# include <strings.h>
+#endif /* HAVE_STRINGS_H */
+# ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif /* HAVE_UNISTD_H */
+#include <pwd.h>
+#include <ctype.h>
+
+#include "sudoers.h"
+#include "parse.h"
+#include <gram.h>
+
+/*
+ * For converting between syslog numbers and strings.
+ */
+struct strmap {
+    char *name;
+    int num;
+};
+
+#ifdef LOG_NFACILITIES
+static struct strmap facilities[] = {
+#ifdef LOG_AUTHPRIV
+       { "authpriv",   LOG_AUTHPRIV },
+#endif
+       { "auth",       LOG_AUTH },
+       { "daemon",     LOG_DAEMON },
+       { "user",       LOG_USER },
+       { "local0",     LOG_LOCAL0 },
+       { "local1",     LOG_LOCAL1 },
+       { "local2",     LOG_LOCAL2 },
+       { "local3",     LOG_LOCAL3 },
+       { "local4",     LOG_LOCAL4 },
+       { "local5",     LOG_LOCAL5 },
+       { "local6",     LOG_LOCAL6 },
+       { "local7",     LOG_LOCAL7 },
+       { NULL,         -1 }
+};
+#endif /* LOG_NFACILITIES */
+
+static struct strmap priorities[] = {
+       { "alert",      LOG_ALERT },
+       { "crit",       LOG_CRIT },
+       { "debug",      LOG_DEBUG },
+       { "emerg",      LOG_EMERG },
+       { "err",        LOG_ERR },
+       { "info",       LOG_INFO },
+       { "notice",     LOG_NOTICE },
+       { "warning",    LOG_WARNING },
+       { NULL,         -1 }
+};
+
+/*
+ * Local prototypes.
+ */
+static int store_int(char *, struct sudo_defs_types *, int);
+static int store_list(char *, struct sudo_defs_types *, int);
+static int store_mode(char *, struct sudo_defs_types *, int);
+static int store_str(char *, struct sudo_defs_types *, int);
+static int store_syslogfac(char *, struct sudo_defs_types *, int);
+static int store_syslogpri(char *, struct sudo_defs_types *, int);
+static int store_tuple(char *, struct sudo_defs_types *, int);
+static int store_uint(char *, struct sudo_defs_types *, int);
+static int store_float(char *, struct sudo_defs_types *, int);
+static void list_op(char *, size_t, struct sudo_defs_types *, enum list_ops);
+static const char *logfac2str(int);
+static const char *logpri2str(int);
+
+/*
+ * Table describing compile-time and run-time options.
+ */
+#include <def_data.c>
+
+/*
+ * Print version and configure info.
+ */
+void
+dump_defaults(void)
+{
+    struct sudo_defs_types *cur;
+    struct list_member *item;
+    struct def_values *def;
+
+    for (cur = sudo_defs_table; cur->name; cur++) {
+       if (cur->desc) {
+           switch (cur->type & T_MASK) {
+               case T_FLAG:
+                   if (cur->sd_un.flag)
+                       sudo_printf(SUDO_CONV_INFO_MSG, "%s\n", cur->desc);
+                   break;
+               case T_STR:
+                   if (cur->sd_un.str) {
+                       sudo_printf(SUDO_CONV_INFO_MSG,
+                           cur->desc, cur->sd_un.str);
+                       sudo_printf(SUDO_CONV_INFO_MSG, "\n");
+                   }
+                   break;
+               case T_LOGFAC:
+                   if (cur->sd_un.ival) {
+                       sudo_printf(SUDO_CONV_INFO_MSG,
+                           cur->desc, logfac2str(cur->sd_un.ival));
+                       sudo_printf(SUDO_CONV_INFO_MSG, "\n");
+                   }
+                   break;
+               case T_LOGPRI:
+                   if (cur->sd_un.ival) {
+                       sudo_printf(SUDO_CONV_INFO_MSG,
+                           cur->desc, logpri2str(cur->sd_un.ival));
+                       sudo_printf(SUDO_CONV_INFO_MSG, "\n");
+                   }
+                   break;
+               case T_UINT:
+               case T_INT:
+                   sudo_printf(SUDO_CONV_INFO_MSG, cur->desc, cur->sd_un.ival);
+                   sudo_printf(SUDO_CONV_INFO_MSG, "\n");
+                   break;
+               case T_FLOAT:
+                   sudo_printf(SUDO_CONV_INFO_MSG, cur->desc, cur->sd_un.fval);
+                   sudo_printf(SUDO_CONV_INFO_MSG, "\n");
+                   break;
+               case T_MODE:
+                   sudo_printf(SUDO_CONV_INFO_MSG, cur->desc, cur->sd_un.mode);
+                   sudo_printf(SUDO_CONV_INFO_MSG, "\n");
+                   break;
+               case T_LIST:
+                   if (cur->sd_un.list) {
+                       sudo_printf(SUDO_CONV_INFO_MSG, "%s\n", cur->desc);
+                       for (item = cur->sd_un.list; item; item = item->next) {
+                           sudo_printf(SUDO_CONV_INFO_MSG,
+                               "\t%s\n", item->value);
+                       }
+                   }
+                   break;
+               case T_TUPLE:
+                   for (def = cur->values; def->sval; def++) {
+                       if (cur->sd_un.ival == def->ival) {
+                           sudo_printf(SUDO_CONV_INFO_MSG,
+                               cur->desc, def->sval);
+                           break;
+                       }
+                   }
+                   sudo_printf(SUDO_CONV_INFO_MSG, "\n");
+                   break;
+           }
+       }
+    }
+}
+
+/*
+ * List each option along with its description.
+ */
+void
+list_options(void)
+{
+    struct sudo_defs_types *cur;
+    char *p;
+
+    sudo_printf(SUDO_CONV_INFO_MSG,
+       "Available options in a sudoers ``Defaults'' line:\n\n");
+    for (cur = sudo_defs_table; cur->name; cur++) {
+       if (cur->name && cur->desc) {
+           switch (cur->type & T_MASK) {
+               case T_FLAG:
+                   sudo_printf(SUDO_CONV_INFO_MSG,
+                       "%s: %s\n", cur->name, cur->desc);
+                   break;
+               default:
+                   p = strrchr(cur->desc, ':');
+                   if (p) {
+                       sudo_printf(SUDO_CONV_INFO_MSG, "%s: %.*s\n",
+                           cur->name, (int) (p - cur->desc), cur->desc);
+                   } else {
+                       sudo_printf(SUDO_CONV_INFO_MSG,
+                           "%s: %s\n", cur->name, cur->desc);
+                   }
+                   break;
+           }
+       }
+    }
+}
+
+/*
+ * Sets/clears an entry in the defaults structure
+ * If a variable that takes a value is used in a boolean
+ * context with op == 0, disable that variable.
+ * Eg. you may want to turn off logging to a file for some hosts.
+ * This is only meaningful for variables that are *optional*.
+ */
+int
+set_default(char *var, char *val, int op)
+{
+    struct sudo_defs_types *cur;
+    int num;
+
+    for (cur = sudo_defs_table, num = 0; cur->name; cur++, num++) {
+       if (strcmp(var, cur->name) == 0)
+           break;
+    }
+    if (!cur->name) {
+       warningx("unknown defaults entry `%s'", var);
+       return FALSE;
+    }
+
+    switch (cur->type & T_MASK) {
+       case T_LOGFAC:
+           if (!store_syslogfac(val, cur, op)) {
+               if (val)
+                   warningx("value `%s' is invalid for option `%s'", val, var);
+               else
+                   warningx("no value specified for `%s'", var);
+               return FALSE;
+           }
+           break;
+       case T_LOGPRI:
+           if (!store_syslogpri(val, cur, op)) {
+               if (val)
+                   warningx("value `%s' is invalid for option `%s'", val, var);
+               else
+                   warningx("no value specified for `%s'", var);
+               return FALSE;
+           }
+           break;
+       case T_STR:
+           if (!val) {
+               /* Check for bogus boolean usage or lack of a value. */
+               if (!ISSET(cur->type, T_BOOL) || op != FALSE) {
+                   warningx("no value specified for `%s'", var);
+                   return FALSE;
+               }
+           }
+           if (ISSET(cur->type, T_PATH) && val && *val != '/') {
+               warningx("values for `%s' must start with a '/'", var);
+               return FALSE;
+           }
+           if (!store_str(val, cur, op)) {
+               warningx("value `%s' is invalid for option `%s'", val, var);
+               return FALSE;
+           }
+           break;
+       case T_INT:
+           if (!val) {
+               /* Check for bogus boolean usage or lack of a value. */
+               if (!ISSET(cur->type, T_BOOL) || op != FALSE) {
+                   warningx("no value specified for `%s'", var);
+                   return FALSE;
+               }
+           }
+           if (!store_int(val, cur, op)) {
+               warningx("value `%s' is invalid for option `%s'", val, var);
+               return FALSE;
+           }
+           break;
+       case T_UINT:
+           if (!val) {
+               /* Check for bogus boolean usage or lack of a value. */
+               if (!ISSET(cur->type, T_BOOL) || op != FALSE) {
+                   warningx("no value specified for `%s'", var);
+                   return FALSE;
+               }
+           }
+           if (!store_uint(val, cur, op)) {
+               warningx("value `%s' is invalid for option `%s'", val, var);
+               return FALSE;
+           }
+           break;
+       case T_FLOAT:
+           if (!val) {
+               /* Check for bogus boolean usage or lack of a value. */
+               if (!ISSET(cur->type, T_BOOL) || op != FALSE) {
+                   warningx("no value specified for `%s'", var);
+                   return FALSE;
+               }
+           }
+           if (!store_float(val, cur, op)) {
+               warningx("value `%s' is invalid for option `%s'", val, var);
+               return FALSE;
+           }
+           break;
+       case T_MODE:
+           if (!val) {
+               /* Check for bogus boolean usage or lack of a value. */
+               if (!ISSET(cur->type, T_BOOL) || op != FALSE) {
+                   warningx("no value specified for `%s'", var);
+                   return FALSE;
+               }
+           }
+           if (!store_mode(val, cur, op)) {
+               warningx("value `%s' is invalid for option `%s'", val, var);
+               return FALSE;
+           }
+           break;
+       case T_FLAG:
+           if (val) {
+               warningx("option `%s' does not take a value", var);
+               return FALSE;
+           }
+           cur->sd_un.flag = op;
+           break;
+       case T_LIST:
+           if (!val) {
+               /* Check for bogus boolean usage or lack of a value. */
+               if (!ISSET(cur->type, T_BOOL) || op != FALSE) {
+                   warningx("no value specified for `%s'", var);
+                   return FALSE;
+               }
+           }
+           if (!store_list(val, cur, op)) {
+               warningx("value `%s' is invalid for option `%s'", val, var);
+               return FALSE;
+           }
+           break;
+       case T_TUPLE:
+           if (!val && !ISSET(cur->type, T_BOOL)) {
+               warningx("no value specified for `%s'", var);
+               return FALSE;
+           }
+           if (!store_tuple(val, cur, op)) {
+               warningx("value `%s' is invalid for option `%s'", val, var);
+               return FALSE;
+           }
+           break;
+    }
+
+    return TRUE;
+}
+
+/*
+ * Set default options to compiled-in values.
+ * Any of these may be overridden at runtime by a "Defaults" file.
+ */
+void
+init_defaults(void)
+{
+    static int firsttime = 1;
+    struct sudo_defs_types *def;
+
+    /* Clear any old settings. */
+    if (!firsttime) {
+       for (def = sudo_defs_table; def->name; def++) {
+           switch (def->type & T_MASK) {
+               case T_STR:
+                   efree(def->sd_un.str);
+                   def->sd_un.str = NULL;
+                   break;
+               case T_LIST:
+                   list_op(NULL, 0, def, freeall);
+                   break;
+           }
+           zero_bytes(&def->sd_un, sizeof(def->sd_un));
+       }
+    }
+
+    /* First initialize the flags. */
+#ifdef LONG_OTP_PROMPT
+    def_long_otp_prompt = TRUE;
+#endif
+#ifdef IGNORE_DOT_PATH
+    def_ignore_dot = TRUE;
+#endif
+#ifdef ALWAYS_SEND_MAIL
+    def_mail_always = TRUE;
+#endif
+#ifdef SEND_MAIL_WHEN_NO_USER
+    def_mail_no_user = TRUE;
+#endif
+#ifdef SEND_MAIL_WHEN_NO_HOST
+    def_mail_no_host = TRUE;
+#endif
+#ifdef SEND_MAIL_WHEN_NOT_OK
+    def_mail_no_perms = TRUE;
+#endif
+#ifndef NO_TTY_TICKETS
+    def_tty_tickets = TRUE;
+#endif
+#ifndef NO_LECTURE
+    def_lecture = once;
+#endif
+#ifndef NO_AUTHENTICATION
+    def_authenticate = TRUE;
+#endif
+#ifndef NO_ROOT_SUDO
+    def_root_sudo = TRUE;
+#endif
+#ifdef HOST_IN_LOG
+    def_log_host = TRUE;
+#endif
+#ifdef SHELL_IF_NO_ARGS
+    def_shell_noargs = TRUE;
+#endif
+#ifdef SHELL_SETS_HOME
+    def_set_home = TRUE;
+#endif
+#ifndef DONT_LEAK_PATH_INFO
+    def_path_info = TRUE;
+#endif
+#ifdef FQDN
+    def_fqdn = TRUE;
+#endif
+#ifdef USE_INSULTS
+    def_insults = TRUE;
+#endif
+#ifdef ENV_EDITOR
+    def_env_editor = TRUE;
+#endif
+#ifdef UMASK_OVERRIDE
+    def_umask_override = TRUE;
+#endif
+    def_iolog_file = estrdup("%{seq}");
+    def_iolog_dir = estrdup(_PATH_SUDO_IO_LOGDIR);
+    def_sudoers_locale = estrdup("C");
+    def_env_reset = ENV_RESET;
+    def_set_logname = TRUE;
+    def_closefrom = STDERR_FILENO + 1;
+
+    /* Syslog options need special care since they both strings and ints */
+#if (LOGGING & SLOG_SYSLOG)
+    (void) store_syslogfac(LOGFAC, &sudo_defs_table[I_SYSLOG], TRUE);
+    (void) store_syslogpri(PRI_SUCCESS, &sudo_defs_table[I_SYSLOG_GOODPRI],
+       TRUE);
+    (void) store_syslogpri(PRI_FAILURE, &sudo_defs_table[I_SYSLOG_BADPRI],
+       TRUE);
+#endif
+
+    /* Password flags also have a string and integer component. */
+    (void) store_tuple("any", &sudo_defs_table[I_LISTPW], TRUE);
+    (void) store_tuple("all", &sudo_defs_table[I_VERIFYPW], TRUE);
+
+    /* Then initialize the int-like things. */
+#ifdef SUDO_UMASK
+    def_umask = SUDO_UMASK;
+#else
+    def_umask = 0777;
+#endif
+    def_loglinelen = MAXLOGFILELEN;
+    def_timestamp_timeout = TIMEOUT;
+    def_passwd_timeout = PASSWORD_TIMEOUT;
+    def_passwd_tries = TRIES_FOR_PASSWORD;
+#ifdef HAVE_ZLIB_H
+    def_compress_io = TRUE;
+#endif
+
+    /* Now do the strings */
+    def_mailto = estrdup(MAILTO);
+    def_mailsub = estrdup(MAILSUBJECT);
+    def_badpass_message = estrdup(INCORRECT_PASSWORD);
+    def_timestampdir = estrdup(_PATH_SUDO_TIMEDIR);
+    def_passprompt = estrdup(PASSPROMPT);
+    def_runas_default = estrdup(RUNAS_DEFAULT);
+#ifdef _PATH_SUDO_SENDMAIL
+    def_mailerpath = estrdup(_PATH_SUDO_SENDMAIL);
+    def_mailerflags = estrdup("-t");
+#endif
+#if (LOGGING & SLOG_FILE)
+    def_logfile = estrdup(_PATH_SUDO_LOGFILE);
+#endif
+#ifdef EXEMPTGROUP
+    def_exempt_group = estrdup(EXEMPTGROUP);
+#endif
+#ifdef SECURE_PATH
+    def_secure_path = estrdup(SECURE_PATH);
+#endif
+    def_editor = estrdup(EDITOR);
+    def_set_utmp = TRUE;
+
+    /* Finally do the lists (currently just environment tables). */
+    init_envtables();
+
+    firsttime = 0;
+}
+
+/*
+ * Update the defaults based on what was set by sudoers.
+ * Pass in an OR'd list of which default types to update.
+ */
+int
+update_defaults(int what)
+{
+    struct defaults *def;
+    int rc = TRUE;
+
+    tq_foreach_fwd(&defaults, def) {
+       switch (def->type) {
+           case DEFAULTS:
+               if (ISSET(what, SETDEF_GENERIC) &&
+                   !set_default(def->var, def->val, def->op))
+                   rc = FALSE;
+               break;
+           case DEFAULTS_USER:
+               if (ISSET(what, SETDEF_USER) &&
+                   userlist_matches(sudo_user.pw, &def->binding) == ALLOW &&
+                   !set_default(def->var, def->val, def->op))
+                   rc = FALSE;
+               break;
+           case DEFAULTS_RUNAS:
+               if (ISSET(what, SETDEF_RUNAS) &&
+                   runaslist_matches(&def->binding, NULL) == ALLOW &&
+                   !set_default(def->var, def->val, def->op))
+                   rc = FALSE;
+               break;
+           case DEFAULTS_HOST:
+               if (ISSET(what, SETDEF_HOST) &&
+                   hostlist_matches(&def->binding) == ALLOW &&
+                   !set_default(def->var, def->val, def->op))
+                   rc = FALSE;
+               break;
+           case DEFAULTS_CMND:
+               if (ISSET(what, SETDEF_CMND) &&
+                   cmndlist_matches(&def->binding) == ALLOW &&
+                   !set_default(def->var, def->val, def->op))
+                   rc = FALSE;
+               break;
+       }
+    }
+    return rc;
+}
+
+static int
+store_int(char *val, struct sudo_defs_types *def, int op)
+{
+    char *endp;
+    long l;
+
+    if (op == FALSE) {
+       def->sd_un.ival = 0;
+    } else {
+       l = strtol(val, &endp, 10);
+       if (*endp != '\0')
+           return FALSE;
+       /* XXX - should check against INT_MAX */
+       def->sd_un.ival = (int)l;
+    }
+    if (def->callback)
+       return def->callback(val);
+    return TRUE;
+}
+
+static int
+store_uint(char *val, struct sudo_defs_types *def, int op)
+{
+    char *endp;
+    long l;
+
+    if (op == FALSE) {
+       def->sd_un.ival = 0;
+    } else {
+       l = strtol(val, &endp, 10);
+       if (*endp != '\0' || l < 0)
+           return FALSE;
+       /* XXX - should check against INT_MAX */
+       def->sd_un.ival = (unsigned int)l;
+    }
+    if (def->callback)
+       return def->callback(val);
+    return TRUE;
+}
+
+static int
+store_float(char *val, struct sudo_defs_types *def, int op)
+{
+    char *endp;
+    double d;
+
+    if (op == FALSE) {
+       def->sd_un.fval = 0.0;
+    } else {
+       d = strtod(val, &endp);
+       if (*endp != '\0')
+           return FALSE;
+       /* XXX - should check against HUGE_VAL */
+       def->sd_un.fval = d;
+    }
+    if (def->callback)
+       return def->callback(val);
+    return TRUE;
+}
+
+static int
+store_tuple(char *val, struct sudo_defs_types *def, int op)
+{
+    struct def_values *v;
+
+    /*
+     * Since enums are really just ints we store the value as an ival.
+     * In the future, there may be multiple enums for different tuple
+     * types we want to avoid and special knowledge of the tuple type.
+     * This does assume that the first entry in the tuple enum will
+     * be the equivalent to a boolean "false".
+     */
+    if (!val) {
+       def->sd_un.ival = (op == FALSE) ? 0 : 1;
+    } else {
+       for (v = def->values; v->sval != NULL; v++) {
+           if (strcmp(v->sval, val) == 0) {
+               def->sd_un.ival = v->ival;
+               break;
+           }
+       }
+       if (v->sval == NULL)
+           return FALSE;
+    }
+    if (def->callback)
+       return def->callback(val);
+    return TRUE;
+}
+
+static int
+store_str(char *val, struct sudo_defs_types *def, int op)
+{
+
+    efree(def->sd_un.str);
+    if (op == FALSE)
+       def->sd_un.str = NULL;
+    else
+       def->sd_un.str = estrdup(val);
+    if (def->callback)
+       return def->callback(val);
+    return TRUE;
+}
+
+static int
+store_list(char *str, struct sudo_defs_types *def, int op)
+{
+    char *start, *end;
+
+    /* Remove all old members. */
+    if (op == FALSE || op == TRUE)
+       list_op(NULL, 0, def, freeall);
+
+    /* Split str into multiple space-separated words and act on each one. */
+    if (op != FALSE) {
+       end = str;
+       do {
+           /* Remove leading blanks, if nothing but blanks we are done. */
+           for (start = end; isblank((unsigned char)*start); start++)
+               ;
+           if (*start == '\0')
+               break;
+
+           /* Find end position and perform operation. */
+           for (end = start; *end && !isblank((unsigned char)*end); end++)
+               ;
+           list_op(start, end - start, def, op == '-' ? delete : add);
+       } while (*end++ != '\0');
+    }
+    return TRUE;
+}
+
+static int
+store_syslogfac(char *val, struct sudo_defs_types *def, int op)
+{
+    struct strmap *fac;
+
+    if (op == FALSE) {
+       def->sd_un.ival = FALSE;
+       return TRUE;
+    }
+#ifdef LOG_NFACILITIES
+    if (!val)
+       return FALSE;
+    for (fac = facilities; fac->name && strcmp(val, fac->name); fac++)
+       ;
+    if (fac->name == NULL)
+       return FALSE;                           /* not found */
+
+    def->sd_un.ival = fac->num;
+#else
+    def->sd_un.ival = -1;
+#endif /* LOG_NFACILITIES */
+    return TRUE;
+}
+
+static const char *
+logfac2str(int n)
+{
+#ifdef LOG_NFACILITIES
+    struct strmap *fac;
+
+    for (fac = facilities; fac->name && fac->num != n; fac++)
+       ;
+    return fac->name;
+#else
+    return "default";
+#endif /* LOG_NFACILITIES */
+}
+
+static int
+store_syslogpri(char *val, struct sudo_defs_types *def, int op)
+{
+    struct strmap *pri;
+
+    if (op == FALSE || !val)
+       return FALSE;
+
+    for (pri = priorities; pri->name && strcmp(val, pri->name); pri++)
+       ;
+    if (pri->name == NULL)
+       return FALSE;                           /* not found */
+
+    def->sd_un.ival = pri->num;
+    return TRUE;
+}
+
+static const char *
+logpri2str(int n)
+{
+    struct strmap *pri;
+
+    for (pri = priorities; pri->name && pri->num != n; pri++)
+       ;
+    return pri->name;
+}
+
+static int
+store_mode(char *val, struct sudo_defs_types *def, int op)
+{
+    char *endp;
+    long l;
+
+    if (op == FALSE) {
+       def->sd_un.mode = (mode_t)0777;
+    } else {
+       l = strtol(val, &endp, 8);
+       if (*endp != '\0' || l < 0 || l > 0777)
+           return FALSE;
+       def->sd_un.mode = (mode_t)l;
+    }
+    if (def->callback)
+       return def->callback(val);
+    return TRUE;
+}
+
+static void
+list_op(char *val, size_t len, struct sudo_defs_types *def, enum list_ops op)
+{
+    struct list_member *cur, *prev, *tmp;
+
+    if (op == freeall) {
+       for (cur = def->sd_un.list; cur; ) {
+           tmp = cur;
+           cur = tmp->next;
+           efree(tmp->value);
+           efree(tmp);
+       }
+       def->sd_un.list = NULL;
+       return;
+    }
+
+    for (cur = def->sd_un.list, prev = NULL; cur; prev = cur, cur = cur->next) {
+       if ((strncmp(cur->value, val, len) == 0 && cur->value[len] == '\0')) {
+
+           if (op == add)
+               return;                 /* already exists */
+
+           /* Delete node */
+           if (prev != NULL)
+               prev->next = cur->next;
+           else
+               def->sd_un.list = cur->next;
+           efree(cur->value);
+           efree(cur);
+           break;
+       }
+    }
+
+    /* Add new node to the head of the list. */
+    if (op == add) {
+       cur = emalloc(sizeof(struct list_member));
+       cur->value = emalloc(len + 1);
+       (void) memcpy(cur->value, val, len);
+       cur->value[len] = '\0';
+       cur->next = def->sd_un.list;
+       def->sd_un.list = cur;
+    }
+}