external/ibm-public/postfix/dist/src/global/mail_conf_int.c

   1 /*      $NetBSD$        */
   2
   3 /*++
   4 /* NAME
   5 /*      mail_conf_int 3
   6 /* SUMMARY
   7 /*      integer-valued configuration parameter support
   8 /* SYNOPSIS
   9 /*      #include <mail_conf.h>
  10 /*
  11 /*      int     get_mail_conf_int(name, defval, min, max);
  12 /*      const char *name;
  13 /*      int     defval;
  14 /*      int     min;
  15 /*      int     max;
  16 /*
  17 /*      int     get_mail_conf_int_fn(name, defval, min, max);
  18 /*      const char *name;
  19 /*      int     (*defval)();
  20 /*      int     min;
  21 /*      int     max;
  22 /*
  23 /*      void    set_mail_conf_int(name, value)
  24 /*      const char *name;
  25 /*      int     value;
  26 /*
  27 /*      void    get_mail_conf_int_table(table)
  28 /*      const CONFIG_INT_TABLE *table;
  29 /*
  30 /*      void    get_mail_conf_int_fn_table(table)
  31 /*      const CONFIG_INT_TABLE *table;
  32 /* AUXILIARY FUNCTIONS
  33 /*      int     get_mail_conf_int2(name1, name2, defval, min, max);
  34 /*      const char *name1;
  35 /*      const char *name2;
  36 /*      int     defval;
  37 /*      int     min;
  38 /*      int     max;
  39 /* DESCRIPTION
  40 /*      This module implements configuration parameter support
  41 /*      for integer values.
  42 /*
  43 /*      get_mail_conf_int() looks up the named entry in the global
  44 /*      configuration dictionary. The default value is returned
  45 /*      when no value was found.
  46 /*      \fImin\fR is zero or specifies a lower limit on the integer
  47 /*      value or string length; \fImax\fR is zero or specifies an
  48 /*      upper limit on the integer value or string length.
  49 /*
  50 /*      get_mail_conf_int_fn() is similar but specifies a function that
  51 /*      provides the default value. The function is called only
  52 /*      when the default value is needed.
  53 /*
  54 /*      set_mail_conf_int() updates the named entry in the global
  55 /*      configuration dictionary. This has no effect on values that
  56 /*      have been looked up earlier via the get_mail_conf_XXX() routines.
  57 /*
  58 /*      get_mail_conf_int_table() and get_mail_conf_int_fn_table() initialize
  59 /*      lists of variables, as directed by their table arguments. A table
  60 /*      must be terminated by a null entry.
  61 /*
  62 /*      get_mail_conf_int2() concatenates the two names and is otherwise
  63 /*      identical to get_mail_conf_int().
  64 /* DIAGNOSTICS
  65 /*      Fatal errors: malformed numerical value.
  66 /* SEE ALSO
  67 /*      config(3) general configuration
  68 /*      mail_conf_str(3) string-valued configuration parameters
  69 /* LICENSE
  70 /* .ad
  71 /* .fi
  72 /*      The Secure Mailer license must be distributed with this software.
  73 /* AUTHOR(S)
  74 /*      Wietse Venema
  75 /*      IBM T.J. Watson Research
  76 /*      P.O. Box 704
  77 /*      Yorktown Heights, NY 10598, USA
  78 /*--*/
  79
  80 /* System library. */
  81
  82 #include <sys_defs.h>
  83 #include <stdlib.h>
  84 #include <stdio.h>                      /* sscanf() */
  85
  86 /* Utility library. */
  87
  88 #include <msg.h>
  89 #include <mymalloc.h>
  90 #include <dict.h>
  91 #include <stringops.h>
  92
  93 /* Global library. */
  94
  95 #include "mail_conf.h"
  96
  97 /* convert_mail_conf_int - look up and convert integer parameter value */
  98
  99 static int convert_mail_conf_int(const char *name, int *intval)
 100 {
 101     const char *strval;
 102     char    junk;
 103
 104     if ((strval = mail_conf_lookup_eval(name)) != 0) {
 105         if (sscanf(strval, "%d%c", intval, &junk) != 1)
 106             msg_fatal("bad numerical configuration: %s = %s", name, strval);
 107         return (1);
 108     }
 109     return (0);
 110 }
 111
 112 /* check_mail_conf_int - validate integer value */
 113
 114 static void check_mail_conf_int(const char *name, int intval, int min, int max)
 115 {
 116     if (min && intval < min)
 117         msg_fatal("invalid %s parameter value %d < %d", name, intval, min);
 118     if (max && intval > max)
 119         msg_fatal("invalid %s parameter value %d > %d", name, intval, max);
 120 }
 121
 122 /* get_mail_conf_int - evaluate integer-valued configuration variable */
 123
 124 int     get_mail_conf_int(const char *name, int defval, int min, int max)
 125 {
 126     int     intval;
 127
 128     if (convert_mail_conf_int(name, &intval) == 0)
 129         set_mail_conf_int(name, intval = defval);
 130     check_mail_conf_int(name, intval, min, max);
 131     return (intval);
 132 }
 133
 134 /* get_mail_conf_int2 - evaluate integer-valued configuration variable */
 135
 136 int     get_mail_conf_int2(const char *name1, const char *name2, int defval,
 137                                 int min, int max)
 138 {
 139     int     intval;
 140     char   *name;
 141
 142     name = concatenate(name1, name2, (char *) 0);
 143     if (convert_mail_conf_int(name, &intval) == 0)
 144         set_mail_conf_int(name, intval = defval);
 145     check_mail_conf_int(name, intval, min, max);
 146     myfree(name);
 147     return (intval);
 148 }
 149
 150 /* get_mail_conf_int_fn - evaluate integer-valued configuration variable */
 151
 152 typedef int (*stupid_indent_int) (void);
 153
 154 int     get_mail_conf_int_fn(const char *name, stupid_indent_int defval,
 155                                   int min, int max)
 156 {
 157     int     intval;
 158
 159     if (convert_mail_conf_int(name, &intval) == 0)
 160         set_mail_conf_int(name, intval = defval());
 161     check_mail_conf_int(name, intval, min, max);
 162     return (intval);
 163 }
 164
 165 /* set_mail_conf_int - update integer-valued configuration dictionary entry */
 166
 167 void    set_mail_conf_int(const char *name, int value)
 168 {
 169     char    buf[BUFSIZ];                /* yeah! crappy code! */
 170
 171     sprintf(buf, "%d", value);                  /* yeah! more crappy code! */
 172     mail_conf_update(name, buf);
 173 }
 174
 175 /* get_mail_conf_int_table - look up table of integers */
 176
 177 void    get_mail_conf_int_table(const CONFIG_INT_TABLE *table)
 178 {
 179     while (table->name) {
 180         table->target[0] = get_mail_conf_int(table->name, table->defval,
 181                                           table->min, table->max);
 182         table++;
 183     }
 184 }
 185
 186 /* get_mail_conf_int_fn_table - look up integers, defaults are functions */
 187
 188 void    get_mail_conf_int_fn_table(const CONFIG_INT_FN_TABLE *table)
 189 {
 190     while (table->name) {
 191         table->target[0] = get_mail_conf_int_fn(table->name, table->defval,
 192                                              table->min, table->max);
 193         table++;
 194     }
 195 }