lib/conf-test.c

   1 /*
   2  *      Insane tester of reading configuration files
   3  *
   4  *      (c) 2006 Robert Spalek <robert@ucw.cz>
   5  */
   6
   7 #include "lib/lib.h"
   8 #include "lib/conf.h"
   9 #include "lib/getopt.h"
  10 #include "lib/clists.h"
  11 #include "lib/fastbuf.h"
  12
  13 #include <stdlib.h>
  14 #include <stdio.h>
  15 #include <time.h>
  16
  17 static int verbose;
  18
  19 struct sub_sect_1 {
  20   cnode n;
  21   byte *name;
  22   time_t t;
  23   byte *level;
  24   int confidence[2];
  25   double *list;
  26 };
  27
  28 static struct sub_sect_1 sec1 = { {}, "Charlie", 0, "WBAFC", { 0, -1}, DARY_ALLOC(double, 3, 1e4, -1e-4, 8) };
  29
  30 static byte *
  31 init_sec_1(struct sub_sect_1 *s)
  32 {
  33   if (s == &sec1)                       // this is a static variable; skip clearing
  34     return NULL;
  35   s->name = "unknown";
  36   s->level = "default";
  37   s->confidence[0] = 5;
  38   s->confidence[1] = 6;
  39   // leave s->list==NULL
  40   return NULL;
  41 }
  42
  43 static byte *
  44 commit_sec_1(struct sub_sect_1 *s)
  45 {
  46   if (s->confidence[0] < 0 || s->confidence[0] > 10)
  47     return "Well, this can't be";
  48   return NULL;
  49 }
  50
  51 static byte *
  52 time_parser(uns number, byte **pars, time_t *ptr)
  53 {
  54   *ptr = number ? atoi(pars[0]) : time(NULL);
  55   return NULL;
  56 }
  57
  58 static struct cf_section cf_sec_1 = {
  59   CF_TYPE(struct sub_sect_1),
  60   CF_INIT(init_sec_1),
  61   CF_COMMIT(commit_sec_1),
  62 #define F(x)    PTR_TO(struct sub_sect_1, x)
  63   CF_ITEMS {
  64     CF_STRING("name", F(name)),
  65     //CF_PARSER("t", F(t), time_parser, 0),
  66     CF_STRING("level", F(level)),
  67     CF_INT_ARY("confidence", F(confidence[0]), 2),              // XXX: the [0] is needed for the sake of type checking
  68     CF_DOUBLE_DYN("list", F(list), 100),
  69     CF_END
  70   }
  71 #undef F
  72 };
  73
  74 static uns nr1 = 15;
  75 static int *nrs1 = DARY_ALLOC(int, 5, 5, 4, 3, 2, 1);
  76 static int nrs2[5];
  77 static byte *str1 = "no worries";
  78 static byte **str2 = DARY_ALLOC(byte *, 2, "Alice", "Bob");
  79 static u64 u1 = 0xCafeBeefDeadC00ll;
  80 static double d1 = -1.1;
  81 static clist secs;
  82 static time_t t1, t2;
  83 static u32 ip;
  84 static int *look = DARY_ALLOC(int, 2, 2, 1);
  85 static u16 numbers[10] = { 2, 100, 1, 5 };
  86
  87 static byte *
  88 parse_u16(byte *string, u16 *ptr)
  89 {
  90   uns a;
  91   byte *msg = cf_parse_int(string, &a);
  92   if (msg)
  93     return msg;
  94   if (a >= (1<<16))
  95     return "Come on, man, this doesn't fit to 16 bits";
  96   *ptr = a;
  97   return NULL;
  98 }
  99
 100 static void
 101 dump_u16(struct fastbuf *fb, u16 *ptr)
 102 {
 103   bprintf(fb, "%d ", *ptr);
 104 }
 105
 106 static struct cf_user_type u16_type = {
 107   .size = sizeof(u16),
 108   .name = "u16",
 109   .parser = (cf_parser1*) parse_u16,
 110   .dumper = (cf_dumper1*) dump_u16
 111 };
 112
 113 static byte *
 114 init_top(void *ptr UNUSED)
 115 {
 116   for (uns i=0; i<5; i++)
 117   {
 118     struct sub_sect_1 *s = xmalloc(sizeof(struct sub_sect_1));  // XXX: cannot by cf_malloc(), because it's deleted when cf_reload()'ed
 119     cf_init_section("slaves", &cf_sec_1, s, 1);
 120     s->confidence[1] = i;
 121     clist_add_tail(&secs, &s->n);
 122   }
 123   return NULL;
 124 }
 125
 126 static byte *
 127 commit_top(void *ptr UNUSED)
 128 {
 129   if (nr1 != 15)
 130     return "Don't touch my variable!";
 131   return NULL;
 132 }
 133
 134 static byte *alphabet[] = { "alpha", "beta", "gamma", "delta", NULL };
 135 static struct cf_section cf_top = {
 136   CF_INIT(init_top),
 137   CF_COMMIT(commit_top),
 138   CF_ITEMS {
 139     CF_UNS("nr1", &nr1),
 140     CF_INT_DYN("nrs1", &nrs1, 1000),
 141     CF_INT_ARY("nrs2", nrs2, 5),
 142     CF_STRING("str1", &str1),
 143     CF_STRING_DYN("str2", &str2, 20),
 144     CF_U64("u1", &u1),
 145     CF_DOUBLE("d1", &d1),
 146     CF_PARSER("FirstTime", &t1, time_parser, -1),
 147     CF_PARSER("SecondTime", &t2, time_parser, 1),
 148     CF_SECTION("master", &sec1, &cf_sec_1),
 149     CF_LIST("slaves", &secs, &cf_sec_1),
 150     CF_IP("ip", &ip),
 151     CF_LOOKUP_DYN("look", &look, alphabet, 1000),
 152     CF_USER_ARY("numbers", numbers, &u16_type, 10),
 153     CF_END
 154   }
 155 };
 156
 157 static byte short_opts[] = CF_SHORT_OPTS "v";
 158 static struct option long_opts[] = {
 159         CF_LONG_OPTS
 160         {"verbose",     0, 0, 'v'},
 161         {NULL,          0, 0, 0}
 162 };
 163
 164 static char *help = "\
 165 Usage: conf-test <options>\n\
 166 \n\
 167 Options:\n"
 168 CF_USAGE
 169 "-v\t\t\tBe verbose\n\
 170 ";
 171
 172 static void NONRET
 173 usage(byte *msg, ...)
 174 {
 175   va_list va;
 176   va_start(va, msg);
 177   if (msg)
 178     vfprintf(stderr, msg, va);
 179   fputs(help, stderr);
 180   exit(1);
 181 }
 182
 183 int
 184 main(int argc, char *argv[])
 185 {
 186   log_init(argv[0]);
 187   cf_declare_section("top", &cf_top, 0);
 188   cf_def_file = "lib/conf-test.cf";
 189
 190   int opt;
 191   while ((opt = cf_getopt(argc, argv, short_opts, long_opts, NULL)) >= 0)
 192     switch (opt) {
 193       case 'v': verbose++; break;
 194       default: usage("unknown option %c\n", opt);
 195     }
 196   if (optind < argc)
 197     usage("too many parameters (%d more)\n", argc-optind);
 198
 199   /*
 200   cf_load("non-existent file");
 201   //cf_reload("non-existent file");
 202   cf_load("non-existent file");
 203   cf_set("top.d1 -1.1; top.master b");
 204   */
 205
 206   struct fastbuf *out = bfdopen(1, 1<<14);
 207   cf_dump_sections(out);
 208   bclose(out);
 209
 210   return 0;
 211 }