server/fcdb.c

   1 /****************************************************************************
   2  Freeciv - Copyright (C) 2005  - M.C. Kaufman
   3    This program is free software; you can redistribute it and/or modify
   4    it under the terms of the GNU General Public License as published by
   5    the Free Software Foundation; either version 2, or (at your option)
   6    any later version.
   7
   8    This program is distributed in the hope that it will be useful,
   9    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11    GNU General Public License for more details.
  12 ****************************************************************************/
  13
  14 #ifdef HAVE_CONFIG_H
  15 #include <fc_config.h>
  16 #endif
  17
  18 #include <stdio.h>
  19 #include <stdlib.h>
  20 #include <string.h>
  21
  22 /* utility */
  23 #include "fcintl.h"
  24 #include "log.h"
  25 #include "md5.h"
  26 #include "shared.h"
  27 #include "support.h"
  28
  29 /* common */
  30 #include "connection.h"
  31 #include "packets.h"
  32
  33 /* server */
  34 #include "connecthand.h"
  35 #include "notify.h"
  36 #include "sernet.h"
  37 #include "srv_main.h"
  38
  39 /* server/scripting */
  40 #ifdef HAVE_FCDB
  41 #include "script_fcdb.h"
  42 #endif /* HAVE_FCDB */
  43
  44 #include "fcdb.h"
  45
  46 /* If HAVE_FCDB is set, the freeciv database module is compiled. Else only
  47  * some dummy functions are defiend. */
  48 #ifdef HAVE_FCDB
  49
  50 enum fcdb_option_source {
  51   AOS_DEFAULT,  /* Internal default, currently not used */
  52   AOS_FILE,     /* Read from config file */
  53   AOS_SET       /* Set, currently not used */
  54 };
  55
  56 struct fcdb_option {
  57   enum fcdb_option_source source;
  58   char *value;
  59 };
  60
  61 #define SPECHASH_TAG fcdb_option
  62 #define SPECHASH_ASTR_KEY_TYPE
  63 #define SPECHASH_IDATA_TYPE struct fcdb_option *
  64 #include "spechash.h"
  65 #define fcdb_option_hash_data_iterate(phash, data)                          \
  66   TYPED_HASH_DATA_ITERATE(struct fcdb_option *, phash, data)
  67 #define fcdb_option_hash_data_iterate_end HASH_DATA_ITERATE_END
  68 #define fcdb_option_hash_keys_iterate(phash, key)                           \
  69   TYPED_HASH_KEYS_ITERATE(char *, phash, key)
  70 #define fcdb_option_hash_keys_iterate_end HASH_KEYS_ITERATE_END
  71 #define fcdb_option_hash_iterate(phash, key, data)                          \
  72   TYPED_HASH_ITERATE(char *, struct fcdb_option *, phash, key, data)
  73 #define fcdb_option_hash_iterate_end HASH_ITERATE_END
  74
  75 struct fcdb_option_hash *fcdb_config = NULL;
  76
  77 static bool fcdb_set_option(const char *key, const char *value,
  78                             enum fcdb_option_source source);
  79 static bool fcdb_load_config(const char *filename);
  80
  81
  82 /****************************************************************************
  83   Set one fcdb option (or delete it if value == NULL).
  84   Replaces any previous setting.
  85 ****************************************************************************/
  86 static bool fcdb_set_option(const char *key, const char *value,
  87                             enum fcdb_option_source source)
  88 {
  89   struct fcdb_option *oldopt = NULL;
  90   bool removed;
  91
  92   if (value != NULL) {
  93     struct fcdb_option *newopt = fc_malloc(sizeof(*newopt));
  94
  95     newopt->value = fc_strdup(value);
  96     newopt->source = source;
  97     removed = fcdb_option_hash_replace_full(fcdb_config, key, newopt,
  98                                             NULL, &oldopt);
  99   } else {
 100     removed = fcdb_option_hash_remove_full(fcdb_config, key, NULL, &oldopt);
 101   }
 102
 103   if (removed) {
 104     /* Overwritten/removed an existing value */
 105     fc_assert_ret_val(oldopt != NULL, FALSE);
 106     FC_FREE(oldopt->value);
 107     FC_FREE(oldopt);
 108   }
 109
 110   return TRUE;
 111 }
 112
 113 /****************************************************************************
 114   Load fcdb configuration from file.
 115   We deliberately don't search datadirs for filename, as we don't want this
 116   overridden by modpacks etc.
 117 ****************************************************************************/
 118 static bool fcdb_load_config(const char *filename)
 119 {
 120   struct section_file *secfile;
 121
 122   fc_assert_ret_val(NULL != filename, FALSE);
 123
 124   if (!(secfile = secfile_load(filename, FALSE))) {
 125     log_error(_("Cannot load fcdb config file '%s':\n%s"), filename,
 126               secfile_error());
 127     return FALSE;
 128   }
 129
 130   entry_list_iterate(section_entries(secfile_section_by_name(secfile,
 131                                                              "fcdb")),
 132                      pentry) {
 133     if (entry_type(pentry) == ENTRY_STR) {
 134       const char *value;
 135 #ifndef FREECIV_NDEBUG
 136       bool entry_str_get_success =
 137 #endif
 138         entry_str_get(pentry, &value);
 139
 140       fc_assert(entry_str_get_success);
 141       fcdb_set_option(entry_name(pentry), value, AOS_FILE);
 142     } else {
 143       log_error("Value for '%s' in '%s' is not of string type, ignoring",
 144                 entry_name(pentry), filename);
 145     }
 146   } entry_list_iterate_end;
 147
 148   /* FIXME: we could arrange to call secfile_check_unused() and have it
 149    * complain about unused entries (e.g. those not in [fcdb]). */
 150   secfile_destroy(secfile);
 151
 152   return TRUE;
 153 }
 154
 155 /****************************************************************************
 156   Initialize freeciv database system
 157 ****************************************************************************/
 158 bool fcdb_init(const char *conf_file)
 159 {
 160   fc_assert(fcdb_config == NULL);
 161   fcdb_config = fcdb_option_hash_new();
 162
 163   if (conf_file && strcmp(conf_file, "-")) {
 164     if (!fcdb_load_config(conf_file)) {
 165       return FALSE;
 166     }
 167   } else {
 168     log_debug("No fcdb config file.");
 169   }
 170
 171   return script_fcdb_init(NULL);
 172 }
 173
 174 /****************************************************************************
 175   Return the selected fcdb config value.
 176 ****************************************************************************/
 177 const char *fcdb_option_get(const char *type)
 178 {
 179   struct fcdb_option *opt;
 180
 181   if (fcdb_option_hash_lookup(fcdb_config, type, &opt)) {
 182     return opt->value;
 183   } else {
 184     return NULL;
 185   }
 186 }
 187
 188 /****************************************************************************
 189   Free resources allocated by fcdb system.
 190 ****************************************************************************/
 191 void fcdb_free(void)
 192 {
 193   script_fcdb_free();
 194
 195   fcdb_option_hash_data_iterate(fcdb_config, popt) {
 196     FC_FREE(popt->value);
 197     FC_FREE(popt);
 198   } fcdb_option_hash_data_iterate_end;
 199
 200   fcdb_option_hash_destroy(fcdb_config);
 201   fcdb_config = NULL;
 202 }
 203
 204 #else  /* HAVE_FCDB */
 205
 206 /****************************************************************************
 207   Dummy function - Initialize freeciv database system
 208 ****************************************************************************/
 209 bool fcdb_init(const char *conf_file)
 210 {
 211   return TRUE;
 212 }
 213
 214 /****************************************************************************
 215   Dummy function - Return the selected fcdb config value.
 216 ****************************************************************************/
 217 const char *fcdb_option_get(const char *type)
 218 {
 219   return NULL;
 220 }
 221
 222 /****************************************************************************
 223   Dummy function - Free resources allocated by fcdb system.
 224 ****************************************************************************/
 225 void fcdb_free(void)
 226 {
 227   return;
 228 }
 229 #endif /* HAVE_FCDB */