LCOV - code coverage report
Current view: top level - common/options - monet_options.c (source / functions) Hit Total Coverage
Test: coverage.info Lines: 90 168 53.6 %
Date: 2020-03-26 00:16:25 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 - 2020 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         665 : mo_default_set(opt **Set, int setlen)
      52             : {
      53         665 :         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         665 :         return setlen;
      62             : }
      63             : 
      64             : void
      65         218 : mo_print_options(opt *set, int setlen)
      66             : {
      67         218 :         int i = 0;
      68             : 
      69         218 :         setlen = mo_default_set(&set, setlen);
      70        3534 :         for (i = 0; i < setlen; i++) {
      71        3098 :                 if (set[i].kind == opt_builtin) {
      72        1744 :                         fprintf(stderr, "# builtin opt \t%s = %s\n", set[i].name, set[i].value);
      73             :                 }
      74             :         }
      75        3316 :         for (i = 0; i < setlen; i++) {
      76        3098 :                 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        3316 :         for (i = 0; i < setlen; i++) {
      81        3098 :                 if (set[i].kind == opt_cmdline) {
      82        1354 :                         fprintf(stderr, "# cmdline opt \t%s = %s\n", set[i].name, set[i].value);
      83             :                 }
      84             :         }
      85         218 : }
      86             : 
      87             : 
      88             : char *
      89         447 : mo_find_option(opt *set, int setlen, const char *name)
      90             : {
      91         447 :         opt *o = NULL;
      92         447 :         int i;
      93             : 
      94         447 :         setlen = mo_default_set(&set, setlen);
      95        7189 :         for (i = 0; i < setlen; i++) {
      96        6295 :                 if (strcmp(set[i].name, name) == 0)
      97         458 :                         if (!o || o->kind < set[i].kind)
      98         458 :                                 o = set + i;
      99             :         }
     100         447 :         if (o)
     101         229 :                 return o->value;
     102             :         return NULL;
     103             : }
     104             : 
     105             : static int
     106           0 : mo_config_file(opt **Set, int setlen, char *file)
     107             : {
     108           0 :         char buf[BUFSIZ];
     109           0 :         FILE *fd = NULL;
     110           0 :         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           0 :                         ;
     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           0 :                         ;
     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           0 :                         ;
     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           0 :                         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           0 :                 setlen++;
     184             :         }
     185           0 :         (void) fclose(fd);
     186           0 :         *Set = set;
     187           0 :         return setlen;
     188             : }
     189             : 
     190             : int
     191         218 : mo_system_config(opt **Set, int setlen)
     192             : {
     193         218 :         char *cfg;
     194             : 
     195         218 :         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         218 :         cfg = mo_find_option(*Set, setlen, "config");
     205         218 :         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         231 : mo_builtin_settings(opt **Set)
     214             : {
     215         231 :         int i = 0;
     216         231 :         opt *set;
     217             : 
     218         231 :         if (Set == NULL)
     219             :                 return 0;
     220             : 
     221             : #define N_OPTIONS       8       /*MUST MATCH # OPTIONS BELOW */
     222         231 :         set = malloc(sizeof(opt) * N_OPTIONS);
     223         231 :         if (set == NULL)
     224             :                 return 0;
     225             : 
     226         231 :         set[i].kind = opt_builtin;
     227         231 :         set[i].name = strdup("gdk_dbpath");
     228         231 :         set[i].value = strdup(LOCALSTATEDIR DIR_SEP_STR "monetdb5" DIR_SEP_STR
     229             :                               "dbfarm" DIR_SEP_STR "demo");
     230         231 :         i++;
     231         231 :         set[i].kind = opt_builtin;
     232         231 :         set[i].name = strdup("mapi_port");
     233         231 :         set[i].value = strdup("50000");
     234         231 :         i++;
     235         231 :         set[i].kind = opt_builtin;
     236         231 :         set[i].name = strdup("mapi_open");
     237         231 :         set[i].value = strdup("false");
     238         231 :         i++;
     239         231 :         set[i].kind = opt_builtin;
     240         231 :         set[i].name = strdup("mapi_ipv6");
     241         231 :         set[i].value = strdup("false");
     242         231 :         i++;
     243         231 :         set[i].kind = opt_builtin;
     244         231 :         set[i].name = strdup("mapi_autosense");
     245         231 :         set[i].value = strdup("false");
     246         231 :         i++;
     247         231 :         set[i].kind = opt_builtin;
     248         231 :         set[i].name = strdup("sql_optimizer");
     249         231 :         set[i].value = strdup("default_pipe");
     250         231 :         i++;
     251         231 :         set[i].kind = opt_builtin;
     252         231 :         set[i].name = strdup("sql_debug");
     253         231 :         set[i].value = strdup("0");
     254         231 :         i++;
     255         231 :         set[i].kind = opt_builtin;
     256         231 :         set[i].name = strdup("raw_strings");
     257         231 :         set[i].value = strdup("false");
     258         231 :         i++;
     259             : 
     260         231 :         assert(i == N_OPTIONS);
     261         231 :         *Set = set;
     262         231 :         return i;
     263             : }
     264             : 
     265             : int
     266        1365 : mo_add_option(opt **Set, int setlen, opt_kind kind, const char *name, const char *value)
     267             : {
     268        1365 :         opt *set;
     269             : 
     270        1365 :         if (Set == NULL) {
     271           0 :                 if (default_set == NULL) {
     272           0 :                         set = NULL;
     273           0 :                         setlen = mo_default_set(&set, 0);
     274             :                 } else
     275           0 :                         setlen = default_setlen;
     276             :                 Set = &default_set;
     277             :         }
     278        1365 :         set = (opt *) realloc(*Set, (setlen + 1) * sizeof(opt));
     279        1365 :         set[setlen].kind = kind;
     280        1365 :         set[setlen].name = strdup(name);
     281        1365 :         set[setlen].value = strdup(value);
     282        1365 :         *Set = set;
     283        1365 :         return setlen + 1;
     284             : }
     285             : 
     286             : void
     287         229 : mo_free_options(opt *set, int setlen)
     288             : {
     289         229 :         int i;
     290             : 
     291         229 :         if (set == NULL) {
     292           0 :                 set = default_set;
     293           0 :                 setlen = default_setlen;
     294           0 :                 default_set = NULL;
     295           0 :                 default_setlen = 0;
     296             :         }
     297        3426 :         for (i = 0; i < setlen; i++) {
     298        3197 :                 if (set[i].name)
     299        3197 :                         free(set[i].name);
     300        3197 :                 if (set[i].value)
     301        3197 :                         free(set[i].value);
     302             :         }
     303         229 :         free(set);
     304         229 : }

Generated by: LCOV version 1.14