LCOV - code coverage report
Current view: top level - common/options - monet_options.c (source / functions) Hit Total Coverage
Test: coverage.info Lines: 63 133 47.4 %
Date: 2021-10-13 02:24:04 Functions: 7 8 87.5 %

          Line data    Source code
       1             : /*
       2             :  * This Source Code Form is subject to the terms of the Mozilla Public
       3             :  * License, v. 2.0.  If a copy of the MPL was not distributed with this
       4             :  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
       5             :  *
       6             :  * Copyright 1997 - July 2008 CWI, August 2008 - 2021 MonetDB B.V.
       7             :  */
       8             : 
       9             : /*
      10             :  * @f monet_options
      11             :  * @a N.J. Nes
      12             :  * @* A simple option handling library
      13             :  * @T
      14             :  * The monet server and clients make use of command line options and a (possibly)
      15             :  * shared config file. With this library a set (represented by set,setlen) of
      16             :  * options is created. An option is stored as name and value strings with a
      17             :  * special flag indicating the origin of the options, (builtin, system config
      18             :  * file, special config file or command line option).
      19             :  *
      20             :  */
      21             : #include "monetdb_config.h"
      22             : #include "monet_options.h"
      23             : #ifndef HAVE_GETOPT_LONG
      24             : #  include "monet_getopt.h"
      25             : #else
      26             : # ifdef HAVE_GETOPT_H
      27             : #  include "getopt.h"
      28             : # endif
      29             : #endif
      30             : #include <string.h>
      31             : #include <ctype.h>
      32             : 
      33             : #ifdef HAVE_UNISTD_H
      34             : #include <unistd.h>
      35             : #endif
      36             : 
      37             : #ifndef HAVE_GETOPT_LONG
      38             : #  include "getopt.c"
      39             : #  include "getopt1.c"
      40             : #endif
      41             : 
      42             : #ifdef NATIVE_WIN32
      43             : #define getpid _getpid
      44             : #endif
      45             : 
      46             : /* these two are used if the set parameter passed into functions is NULL */
      47             : static int default_setlen = 0;
      48             : static opt *default_set = NULL;
      49             : 
      50             : static int
      51        1046 : mo_default_set(opt **Set, int setlen)
      52             : {
      53        1046 :         if (*Set == NULL) {
      54           0 :                 if (default_set == NULL) {
      55           0 :                         default_setlen = mo_builtin_settings(&default_set);
      56           0 :                         default_setlen = mo_system_config(&default_set, default_setlen);
      57             :                 }
      58           0 :                 *Set = default_set;
      59           0 :                 setlen = default_setlen;
      60             :         }
      61        1046 :         return setlen;
      62             : }
      63             : 
      64             : void
      65         256 : mo_print_options(opt *set, int setlen)
      66             : {
      67             :         int i = 0;
      68             : 
      69         256 :         setlen = mo_default_set(&set, setlen);
      70        3164 :         for (i = 0; i < setlen; i++) {
      71        2908 :                 if (set[i].kind == opt_builtin) {
      72        1280 :                         fprintf(stderr, "# builtin opt \t%s = %s\n", set[i].name, set[i].value);
      73             :                 }
      74             :         }
      75        3164 :         for (i = 0; i < setlen; i++) {
      76        2908 :                 if (set[i].kind == opt_config) {
      77           0 :                         fprintf(stderr, "# config opt \t%s = %s\n", set[i].name, set[i].value);
      78             :                 }
      79             :         }
      80        3164 :         for (i = 0; i < setlen; i++) {
      81        2908 :                 if (set[i].kind == opt_cmdline) {
      82        1628 :                         fprintf(stderr, "# cmdline opt \t%s = %s\n", set[i].name, set[i].value);
      83             :                 }
      84             :         }
      85         256 : }
      86             : 
      87             : 
      88             : char *
      89         790 : mo_find_option(opt *set, int setlen, const char *name)
      90             : {
      91             :         opt *o = NULL;
      92             :         int i;
      93             : 
      94         790 :         setlen = mo_default_set(&set, setlen);
      95        9646 :         for (i = 0; i < setlen; i++) {
      96        8856 :                 if (strcmp(set[i].name, name) == 0)
      97         534 :                         if (!o || o->kind < set[i].kind)
      98             :                                 o = set + i;
      99             :         }
     100         790 :         if (o)
     101         267 :                 return o->value;
     102             :         return NULL;
     103             : }
     104             : 
     105             : static int
     106           0 : mo_config_file(opt **Set, int setlen, char *file)
     107             : {
     108             :         char buf[BUFSIZ];
     109             :         FILE *fd = NULL;
     110             :         opt *set;
     111             : 
     112           0 :         if (Set == NULL) {
     113           0 :                 if (default_set == NULL) {
     114           0 :                         set = NULL;
     115           0 :                         setlen = mo_default_set(&set, 0);
     116             :                 } else
     117           0 :                         setlen = default_setlen;
     118             :                 Set = &default_set;
     119             :         }
     120           0 :         set = *Set;
     121           0 :         fd = fopen(file, "r");
     122           0 :         if (fd == NULL) {
     123           0 :                 fprintf(stderr, "Could not open file %s\n", file);
     124           0 :                 return setlen;
     125             :         }
     126           0 :         while (fgets(buf, BUFSIZ, fd) != NULL) {
     127             :                 char *s, *t, *val;
     128             :                 int quote;
     129             : 
     130           0 :                 for (s = buf; *s && isspace((unsigned char) *s); s++)
     131             :                         ;
     132           0 :                 if (*s == '#')
     133           0 :                         continue;       /* commentary */
     134           0 :                 if (*s == 0)
     135           0 :                         continue;       /* empty line */
     136             : 
     137           0 :                 val = strchr(s, '=');
     138           0 :                 if (val == NULL) {
     139           0 :                         fprintf(stderr, "mo_config_file: syntax error in %s at %s\n", file, s);
     140           0 :                         fclose(fd);
     141           0 :                         exit(1);
     142             :                 }
     143           0 :                 *val = 0;
     144             : 
     145           0 :                 for (t = s; *t && !isspace((unsigned char) *t); t++)
     146             :                         ;
     147           0 :                 *t = 0;
     148             : 
     149             :                 /* skip any leading blanks in the value part */
     150           0 :                 for (val++; *val && isspace((unsigned char) *val); val++)
     151             :                         ;
     152             : 
     153             :                 /* search to unquoted # */
     154             :                 quote = 0;
     155           0 :                 for (t = val; *t; t++) {
     156           0 :                         if (*t == '"')
     157           0 :                                 quote = !quote;
     158           0 :                         else if (!quote && *t == '#')
     159             :                                 break;
     160             :                 }
     161           0 :                 if (quote) {
     162           0 :                         fprintf(stderr, "mo_config_file: wrong number of quotes in %s at %s\n", file, val);
     163           0 :                         fclose(fd);
     164           0 :                         exit(1);
     165             :                 }
     166             :                 /* remove trailing white space */
     167           0 :                 while (isspace((unsigned char) t[-1]))
     168           0 :                         t--;
     169           0 :                 *t++ = 0;
     170             : 
     171             :                 /* treat value as empty if it consists only of white space */
     172           0 :                 if (t <= val)
     173             :                         val = t - 1;
     174             : 
     175           0 :                 set = (opt *) realloc(set, (setlen + 1) * sizeof(opt));
     176           0 :                 set[setlen].kind = opt_config;
     177           0 :                 set[setlen].name = strdup(s);
     178           0 :                 set[setlen].value = malloc((size_t) (t - val));
     179           0 :                 for (t = val, s = set[setlen].value; *t; t++)
     180           0 :                         if (*t != '"')
     181           0 :                                 *s++ = *t;
     182           0 :                 *s = 0;
     183             :                 setlen++;
     184             :         }
     185           0 :         (void) fclose(fd);
     186           0 :         *Set = set;
     187           0 :         return setlen;
     188             : }
     189             : 
     190             : int
     191         256 : mo_system_config(opt **Set, int setlen)
     192             : {
     193             :         char *cfg;
     194             : 
     195         256 :         if (Set == NULL) {
     196           0 :                 if (default_set == NULL) {
     197           0 :                         opt *set = NULL;
     198             : 
     199           0 :                         setlen = mo_default_set(&set, 0);
     200             :                 } else
     201           0 :                         setlen = default_setlen;
     202             :                 Set = &default_set;
     203             :         }
     204         256 :         cfg = mo_find_option(*Set, setlen, "config");
     205         256 :         if (!cfg)
     206             :                 return setlen;
     207           0 :         setlen = mo_config_file(Set, setlen, cfg);
     208           0 :         free(cfg);
     209           0 :         return setlen;
     210             : }
     211             : 
     212             : int
     213         269 : mo_builtin_settings(opt **Set)
     214             : {
     215             :         int i = 0;
     216             :         opt *set;
     217             : 
     218         269 :         if (Set == NULL)
     219             :                 return 0;
     220             : 
     221             : #define N_OPTIONS       5       /*MUST MATCH # OPTIONS BELOW */
     222         269 :         set = malloc(sizeof(opt) * N_OPTIONS);
     223         269 :         if (set == NULL)
     224             :                 return 0;
     225             : 
     226         269 :         set[i].kind = opt_builtin;
     227         269 :         set[i].name = strdup("gdk_dbpath");
     228         269 :         set[i].value = strdup(LOCALSTATEDIR DIR_SEP_STR "monetdb5" DIR_SEP_STR
     229             :                               "dbfarm" DIR_SEP_STR "demo");
     230             :         i++;
     231         269 :         set[i].kind = opt_builtin;
     232         269 :         set[i].name = strdup("mapi_port");
     233         269 :         set[i].value = strdup(MAPI_PORT_STR);
     234             :         i++;
     235         269 :         set[i].kind = opt_builtin;
     236         269 :         set[i].name = strdup("sql_optimizer");
     237         269 :         set[i].value = strdup("default_pipe");
     238             :         i++;
     239         269 :         set[i].kind = opt_builtin;
     240         269 :         set[i].name = strdup("sql_debug");
     241         269 :         set[i].value = strdup("0");
     242             :         i++;
     243         269 :         set[i].kind = opt_builtin;
     244         269 :         set[i].name = strdup("raw_strings");
     245         269 :         set[i].value = strdup("false");
     246             :         i++;
     247             : 
     248             :         assert(i == N_OPTIONS);
     249         269 :         *Set = set;
     250         269 :         return i;
     251             : }
     252             : 
     253             : int
     254        1640 : mo_add_option(opt **Set, int setlen, opt_kind kind, const char *name, const char *value)
     255             : {
     256             :         opt *set;
     257             : 
     258        1640 :         if (Set == NULL) {
     259           0 :                 if (default_set == NULL) {
     260           0 :                         set = NULL;
     261           0 :                         setlen = mo_default_set(&set, 0);
     262             :                 } else
     263           0 :                         setlen = default_setlen;
     264             :                 Set = &default_set;
     265             :         }
     266        1640 :         set = (opt *) realloc(*Set, (setlen + 1) * sizeof(opt));
     267        1640 :         set[setlen].kind = kind;
     268        1640 :         set[setlen].name = strdup(name);
     269        1640 :         set[setlen].value = strdup(value);
     270        1640 :         *Set = set;
     271        1640 :         return setlen + 1;
     272             : }
     273             : 
     274             : void
     275         268 : mo_free_options(opt *set, int setlen)
     276             : {
     277             :         int i;
     278             : 
     279         268 :         if (set == NULL) {
     280           0 :                 set = default_set;
     281           0 :                 setlen = default_setlen;
     282           0 :                 default_set = NULL;
     283           0 :                 default_setlen = 0;
     284             :         }
     285        3248 :         for (i = 0; i < setlen; i++) {
     286        2980 :                 if (set[i].name)
     287        2980 :                         free(set[i].name);
     288        2980 :                 if (set[i].value)
     289        2980 :                         free(set[i].value);
     290             :         }
     291         268 :         free(set);
     292         268 : }

Generated by: LCOV version 1.14