pegasus/weechat
1
0
Fork 0
mirror of https://github.com/weechat/weechat.git synced 2026-07-09 19:23:13 +02:00
Code Activity
Files
ad414865430d2d073689f849283a10b06711f1b8
weechat/src/core/wee-config-file.c
T

1560 lines
53 KiB
C
Raw Blame History

/*
* Copyright (c) 2003-2008 by FlashCode <flashcode@flashtux.org>
* See README for License detail, AUTHORS for developers list.
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
/* wee-config-file.c: manages options in config files */
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <stdlib.h>
#include <unistd.h>
#include <stdarg.h>
#include <string.h>
#include <sys/stat.h>
#include "weechat.h"
#include "wee-config-file.h"
#include "wee-log.h"
#include "wee-string.h"
#include "../gui/gui-color.h"
#include "../gui/gui-chat.h"
struct t_config_file *config_files = NULL;
struct t_config_file *last_config_file = NULL;
char *config_boolean_true[] = { "on", "yes", "y", "true", "t", "1", NULL };
char *config_boolean_false[] = { "off", "no", "n", "false", "f", "0", NULL };
/*
* config_file_search: search a configuration file
*/
struct t_config_file *
config_file_search (char *filename)
{
struct t_config_file *ptr_config;
if (!filename)
return NULL;
for (ptr_config = config_files; ptr_config;
ptr_config = ptr_config->next_config)
{
if (strcmp (ptr_config->filename, filename) == 0)
return ptr_config;
}
/* configuration file not found */
return NULL;
}
/*
* config_file_new: create new config options structure
*/
struct t_config_file *
config_file_new (struct t_weechat_plugin *plugin, char *filename,
int (*callback_reload)(void *data,
struct t_config_file *config_file),
void *callback_reload_data)
{
struct t_config_file *new_config_file;
if (!filename)
return NULL;
/* it's NOT authorized to create two config files with same filename */
if (config_file_search (filename))
return NULL;
new_config_file = (struct t_config_file *)malloc (sizeof (struct t_config_file));
if (new_config_file)
{
new_config_file->plugin = plugin;
new_config_file->filename = strdup (filename);
new_config_file->file = NULL;
new_config_file->callback_reload = callback_reload;
new_config_file->callback_reload_data = callback_reload_data;
new_config_file->sections = NULL;
new_config_file->last_section = NULL;
new_config_file->prev_config = last_config_file;
new_config_file->next_config = NULL;
if (config_files)
last_config_file->next_config = new_config_file;
else
config_files = new_config_file;
last_config_file = new_config_file;
}
return new_config_file;
}
/*
* config_file_valid_for_plugin: check if a configuration file pointer exists for a plugin
* return 1 if configuration file exists for plugin
* 0 if configuration file is not found for plugin
*/
int
config_file_valid_for_plugin (struct t_weechat_plugin *plugin,
struct t_config_file *config_file)
{
struct t_config_file *ptr_config;
for (ptr_config = config_files; ptr_config;
ptr_config = ptr_config->next_config)
{
if ((ptr_config == config_file)
&& (ptr_config->plugin == plugin))
return 1;
}
/* configuration file not found */
return 0;
}
/*
* config_file_new_section: create a new section in a config
*/
struct t_config_section *
config_file_new_section (struct t_config_file *config_file, char *name,
void (*callback_read)(void *data,
struct t_config_file *config_file,
char *option_name, char *value),
void *callback_read_data,
void (*callback_write)(void *data,
struct t_config_file *config_file,
char *section_name),
void *callback_write_data,
void (*callback_write_default)(void *data,
struct t_config_file *config_file,
char *section_name),
void *callback_write_default_data)
{
struct t_config_section *new_section;
if (!config_file || !name)
return NULL;
new_section = (struct t_config_section *)malloc (sizeof (struct t_config_section));
if (new_section)
{
new_section->name = strdup (name);
new_section->callback_read = callback_read;
new_section->callback_read_data = callback_read_data;
new_section->callback_write = callback_write;
new_section->callback_write_data = callback_write_data;
new_section->callback_write_default = callback_write_default;
new_section->callback_write_default_data = callback_write_default_data;
new_section->options = NULL;
new_section->last_option = NULL;
new_section->prev_section = config_file->last_section;
new_section->next_section = NULL;
if (config_file->sections)
config_file->last_section->next_section = new_section;
else
config_file->sections = new_section;
config_file->last_section = new_section;
}
return new_section;
}
/*
* config_file_search_section: search a section in a config structure
*/
struct t_config_section *
config_file_search_section (struct t_config_file *config_file,
char *section_name)
{
struct t_config_section *ptr_section;
if (!config_file || !section_name)
return NULL;
for (ptr_section = config_file->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
if (string_strcasecmp (ptr_section->name, section_name) == 0)
return ptr_section;
}
/* section not found */
return NULL;
}
/*
* config_file_section_valid_for_plugin: check if a section pointer exists for a plugin
* return 1 if section exists for plugin
* 0 if section is not found for plugin
*/
int
config_file_section_valid_for_plugin (struct t_weechat_plugin *plugin,
struct t_config_section *section)
{
struct t_config_file *ptr_config;
struct t_config_section *ptr_section;
for (ptr_config = config_files; ptr_config;
ptr_config = ptr_config->next_config)
{
if (ptr_config->plugin == plugin)
{
for (ptr_section = ptr_config->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
if (ptr_section == section)
return 1;
}
}
}
/* section not found */
return 0;
}
/*
* config_file_new_option: create a new option in a config section
*/
struct t_config_option *
config_file_new_option (struct t_config_file *config_file,
struct t_config_section *section, char *name,
char *type, char *description, char *string_values,
int min, int max, char *default_value,
void (*callback_change)(),
void *callback_change_data)
{
struct t_config_option *new_option;
int var_type, int_value, argc, i, index_value;
long number;
char *error;
if (!config_file || !section || !name)
return NULL;
var_type = -1;
if (string_strcasecmp (type, "boolean") == 0)
var_type = CONFIG_OPTION_BOOLEAN;
if (string_strcasecmp (type, "integer") == 0)
var_type = CONFIG_OPTION_INTEGER;
if (string_strcasecmp (type, "string") == 0)
var_type = CONFIG_OPTION_STRING;
if (string_strcasecmp (type, "color") == 0)
var_type = CONFIG_OPTION_COLOR;
if (var_type < 0)
{
gui_chat_printf (NULL, "%sError: unknown option type \"%s\"",
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
type);
return NULL;
}
new_option = (struct t_config_option *)malloc (sizeof (struct t_config_option));
if (new_option)
{
new_option->name = strdup (name);
new_option->type = var_type;
new_option->description = (description) ? strdup (description) : NULL;
argc = 0;
switch (var_type)
{
case CONFIG_OPTION_BOOLEAN:
new_option->string_values = NULL;
new_option->min = CONFIG_BOOLEAN_FALSE;
new_option->max = CONFIG_BOOLEAN_TRUE;
int_value = config_file_string_to_boolean (default_value);
new_option->default_value = malloc (sizeof (int));
*((int *)new_option->default_value) = int_value;
new_option->value = malloc (sizeof (int));
*((int *)new_option->value) = int_value;
break;
case CONFIG_OPTION_INTEGER:
new_option->string_values = (string_values) ?
string_explode (string_values, "|", 0, 0, &argc) : NULL;
if (new_option->string_values)
{
new_option->min = 0;
new_option->max = (argc == 0) ? 0 : argc - 1;
index_value = 0;
for (i = 0; i < argc; i++)
{
if (string_strcasecmp (new_option->string_values[i],
default_value) == 0)
{
index_value = i;
break;
}
}
new_option->default_value = malloc (sizeof (int));
*((int *)new_option->default_value) = index_value;
new_option->value = malloc (sizeof (int));
*((int *)new_option->value) = index_value;
}
else
{
new_option->string_values = NULL;
new_option->min = min;
new_option->max = max;
error = NULL;
number = strtol (default_value, &error, 10);
if (!error || (error[0] != '\0'))
number = 0;
new_option->default_value = malloc (sizeof (int));
*((int *)new_option->default_value) = number;
new_option->value = malloc (sizeof (int));
*((int *)new_option->value) = number;
}
break;
case CONFIG_OPTION_STRING:
new_option->string_values = NULL;
new_option->min = min;
new_option->max = max;
new_option->default_value = (default_value) ?
strdup (default_value) : NULL;
new_option->value = strdup (default_value) ?
strdup (default_value) : NULL;
break;
case CONFIG_OPTION_COLOR:
new_option->string_values = NULL;
new_option->min = min;
new_option->max = min;
new_option->default_value = malloc (sizeof (int));
if (!gui_color_assign (new_option->default_value, default_value))
new_option->default_value = 0;
new_option->value = malloc (sizeof (int));
*((int *)new_option->value) = *((int *)new_option->default_value);
break;
}
new_option->callback_change = callback_change;
new_option->callback_change_data = callback_change_data;
new_option->loaded = 0;
new_option->prev_option = section->last_option;
new_option->next_option = NULL;
if (section->options)
section->last_option->next_option = new_option;
else
section->options = new_option;
section->last_option = new_option;
}
return new_option;
}
/*
* config_file_search_option: search an option in a config or section
*/
struct t_config_option *
config_file_search_option (struct t_config_file *config_file,
struct t_config_section *section,
char *option_name)
{
struct t_config_section *ptr_section;
struct t_config_option *ptr_option;
if (section)
{
for (ptr_option = section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
if (string_strcasecmp (ptr_option->name, option_name) == 0)
return ptr_option;
}
}
else if (config_file)
{
for (ptr_section = config_file->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
for (ptr_option = ptr_section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
if (string_strcasecmp (ptr_option->name, option_name) == 0)
return ptr_option;
}
}
}
/* option not found */
return NULL;
}
/*
* config_file_option_valid_for_plugin: check if an option pointer exists for a plugin
* return 1 if option exists for plugin
* 0 if option is not found for plugin
*/
int
config_file_option_valid_for_plugin (struct t_weechat_plugin *plugin,
struct t_config_option *option)
{
struct t_config_file *ptr_config;
struct t_config_section *ptr_section;
struct t_config_option *ptr_option;
for (ptr_config = config_files; ptr_config;
ptr_config = ptr_config->next_config)
{
if (ptr_config->plugin == plugin)
{
for (ptr_section = ptr_config->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
for (ptr_option = ptr_section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
if (ptr_option == option)
return 1;
}
}
}
}
/* option not found */
return 0;
}
/*
* config_file_string_boolean_is_valid: return 1 if boolean is valid, otherwise 0
*/
int
config_file_string_boolean_is_valid (char *text)
{
int i;
if (!text)
return 0;
for (i = 0; config_boolean_true[i]; i++)
{
if (string_strcasecmp (text, config_boolean_true[i]) == 0)
return 1;
}
for (i = 0; config_boolean_false[i]; i++)
{
if (string_strcasecmp (text, config_boolean_false[i]) == 0)
return 1;
}
/* text is not a boolean */
return 0;
}
/*
* config_file_string_to_boolean: return boolean value of string
* (1 for true, 0 for false)
*/
int
config_file_string_to_boolean (char *text)
{
int i;
if (!text)
return CONFIG_BOOLEAN_FALSE;
for (i = 0; config_boolean_true[i]; i++)
{
if (string_strcasecmp (text, config_boolean_true[i]) == 0)
return CONFIG_BOOLEAN_TRUE;
}
return CONFIG_BOOLEAN_FALSE;
}
/*
* config_file_option_set: set value for an option
* return: 2 if ok (value changed)
* 1 if ok (value is the same)
* 0 if failed
*/
int
config_file_option_set (struct t_config_option *option, char *new_value,
int run_callback)
{
int new_value_int, i, rc;
long number;
char *error;
if (!option)
return 0;
switch (option->type)
{
case CONFIG_OPTION_BOOLEAN:
if (!new_value)
return 0;
if (!config_file_string_boolean_is_valid (new_value))
return 0;
new_value_int = config_file_string_to_boolean (new_value);
if (new_value_int == *((int *)option->value))
return 1;
*((int *)option->value) = new_value_int;
if (run_callback && option->callback_change)
{
(void) (option->callback_change)
(option->callback_change_data);
}
return 2;
case CONFIG_OPTION_INTEGER:
if (!new_value)
return 0;
if (option->string_values)
{
new_value_int = -1;
for (i = 0; option->string_values[i]; i++)
{
if (string_strcasecmp (option->string_values[i],
new_value) == 0)
{
new_value_int = i;
break;
}
}
if (new_value_int < 0)
return 0;
if (new_value_int == *((int *)option->value))
return 1;
*((int *)option->value) = new_value_int;
if (run_callback && option->callback_change)
{
(void) (option->callback_change)
(option->callback_change_data);
}
return 2;
}
else
{
error = NULL;
number = strtol (new_value, &error, 10);
if (error && (error[0] == '\0'))
{
if (number == *((int *)option->value))
return 1;
*((int *)option->value) = number;
if (run_callback && option->callback_change)
{
(void) (option->callback_change)
(option->callback_change_data);
}
return 2;
}
}
break;
case CONFIG_OPTION_STRING:
rc = 1;
if ((!option->value && new_value)
|| (option->value && !new_value)
|| (strcmp ((char *)option->value, new_value) != 0))
rc = 2;
if (option->value)
free (option->value);
if (new_value)
{
option->value = strdup (new_value);
if (!option->value)
return 0;
}
else
option->value = NULL;
if (run_callback && (rc == 2) && option->callback_change)
{
(void) (option->callback_change)
(option->callback_change_data);
}
return rc;
case CONFIG_OPTION_COLOR:
if (!gui_color_assign (&new_value_int, new_value))
return 0;
if (new_value_int == *((int *)option->value))
return 1;
*((int *)option->value) = new_value_int;
if (run_callback && option->callback_change)
{
(void) (option->callback_change)
(option->callback_change_data);
}
return 2;
}
return 0;
}
/*
* config_file_option_reset: set default value for an option
* return: 2 if ok (value changed)
* 1 if ok (value is the same)
* 0 if failed
*/
int
config_file_option_reset (struct t_config_option *option)
{
int rc;
if (!option)
return 0;
switch (option->type)
{
case CONFIG_OPTION_BOOLEAN:
if (CONFIG_BOOLEAN(option) == CONFIG_BOOLEAN_DEFAULT(option))
return 1;
CONFIG_BOOLEAN(option) = CONFIG_BOOLEAN_DEFAULT(option);
return 2;
case CONFIG_OPTION_INTEGER:
if (CONFIG_INTEGER(option) == CONFIG_INTEGER_DEFAULT(option))
return 1;
CONFIG_INTEGER(option) = CONFIG_INTEGER_DEFAULT(option);
return 2;
case CONFIG_OPTION_STRING:
rc = 1;
if ((!option->value && option->default_value)
|| (option->value && !option->default_value)
|| (strcmp ((char *)option->value,
(char *)option->default_value) != 0))
rc = 2;
if (option->value)
free (option->value);
if (option->default_value)
{
option->value = strdup ((char *)option->default_value);
if (!option->value)
return 0;
}
else
option->value = NULL;
return rc;
case CONFIG_OPTION_COLOR:
if (CONFIG_COLOR(option) == CONFIG_COLOR_DEFAULT(option))
return 1;
CONFIG_COLOR(option) = CONFIG_COLOR_DEFAULT(option);
return 2;
}
return 0;
}
/*
* config_file_option_boolean: return boolean value of an option
*/
int
config_file_option_boolean (struct t_config_option *option)
{
if (!option)
return 0;
if (option->type == CONFIG_OPTION_BOOLEAN)
return CONFIG_BOOLEAN(option);
else
return 0;
}
/*
* config_file_option_integer: return integer value of an option
*/
int
config_file_option_integer (struct t_config_option *option)
{
if (!option)
return 0;
switch (option->type)
{
case CONFIG_OPTION_BOOLEAN:
if (CONFIG_BOOLEAN(option) == CONFIG_BOOLEAN_TRUE)
return 1;
else
return 0;
case CONFIG_OPTION_INTEGER:
case CONFIG_OPTION_COLOR:
return CONFIG_INTEGER(option);
case CONFIG_OPTION_STRING:
return 0;
}
return 0;
}
/*
* config_file_option_string: return string value of an option
*/
char *
config_file_option_string (struct t_config_option *option)
{
if (!option)
return NULL;
switch (option->type)
{
case CONFIG_OPTION_STRING:
return CONFIG_STRING(option);
case CONFIG_OPTION_INTEGER:
if (option->string_values)
return option->string_values[CONFIG_INTEGER(option)];
return NULL;
default:
return NULL;
}
return NULL;
}
/*
* config_file_option_color: return color value of an option
*/
int
config_file_option_color (struct t_config_option *option)
{
if (!option)
return 0;
if (option->type == CONFIG_OPTION_COLOR)
return CONFIG_COLOR(option);
else
return 0;
}
/*
* config_file_write_option: write an option in a config file
*/
void
config_file_write_option (struct t_config_file *config_file,
struct t_config_option *option,
int default_value)
{
void *value;
if (!config_file || !config_file->file || !option)
return;
value = (default_value) ? option->default_value : option->value;
switch (option->type)
{
case CONFIG_OPTION_BOOLEAN:
string_iconv_fprintf (config_file->file, "%s = %s\n",
option->name,
(*((int *)value)) == CONFIG_BOOLEAN_TRUE ?
"on" : "off");
break;
case CONFIG_OPTION_INTEGER:
if (option->string_values)
string_iconv_fprintf (config_file->file, "%s = %s\n",
option->name,
option->string_values[*((int *)value)]);
else
string_iconv_fprintf (config_file->file, "%s = %d\n",
option->name,
*((int *)value));
break;
case CONFIG_OPTION_STRING:
string_iconv_fprintf (config_file->file, "%s = \"%s\"\n",
option->name,
(char *)value);
break;
case CONFIG_OPTION_COLOR:
string_iconv_fprintf (config_file->file, "%s = %s\n",
option->name,
gui_color_get_name (*((int *)value)));
break;
}
}
/*
* config_file_write_line: write a line in a config file
* if value is NULL, then write a section with [ ] around
*/
void
config_file_write_line (struct t_config_file *config_file,
char *option_name, char *value, ...)
{
char buf[4096];
va_list argptr;
if (!config_file || !option_name)
return;
va_start (argptr, value);
vsnprintf (buf, sizeof (buf) - 1, value, argptr);
va_end (argptr);
if (!buf[0])
string_iconv_fprintf (config_file->file, "\n[%s]\n",
option_name);
else
{
string_iconv_fprintf (config_file->file, "%s = %s\n",
option_name, buf);
}
}
/*
* config_file_write_internal: write a configuration file
* (should not be called directly)
* return: 0 if ok
* -1 if error writing file
* -2 if not enough memory
*/
int
config_file_write_internal (struct t_config_file *config_file,
int default_options)
{
int filename_length, rc;
char *filename, *filename2;
time_t current_time;
struct t_config_section *ptr_section;
struct t_config_option *ptr_option;
if (!config_file)
return -1;
filename_length = strlen (weechat_home) +
strlen (config_file->filename) + 2;
filename =
(char *)malloc (filename_length * sizeof (char));
if (!filename)
return -2;
snprintf (filename, filename_length, "%s%s%s",
weechat_home, DIR_SEPARATOR, config_file->filename);
filename2 = (char *)malloc ((filename_length + 32) * sizeof (char));
if (!filename2)
{
free (filename);
return -2;
}
snprintf (filename2, filename_length + 32, "%s.weechattmp", filename);
if ((config_file->file = fopen (filename2, "w")) == NULL)
{
gui_chat_printf (NULL,
_("%sError: cannot create file \"%s\""),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename2);
free (filename);
free (filename2);
return -1;
}
current_time = time (NULL);
string_iconv_fprintf (config_file->file,
_("#\n# %s configuration file, created by "
"%s v%s on %s#\n"),
PACKAGE_NAME, PACKAGE_NAME, PACKAGE_VERSION,
ctime (&current_time));
for (ptr_section = config_file->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
/* call write callback if defined for section */
if (default_options && ptr_section->callback_write_default)
{
(void) (ptr_section->callback_write_default) (ptr_section->callback_write_default_data,
config_file,
ptr_section->name);
}
else if (!default_options && ptr_section->callback_write)
{
(void) (ptr_section->callback_write) (ptr_section->callback_write_data,
config_file,
ptr_section->name);
}
else
{
/* write all options for section */
string_iconv_fprintf (config_file->file,
"\n[%s]\n", ptr_section->name);
for (ptr_option = ptr_section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
config_file_write_option (config_file, ptr_option,
default_options);
}
}
}
fclose (config_file->file);
config_file->file = NULL;
chmod (filename2, 0600);
unlink (filename);
rc = rename (filename2, filename);
free (filename);
free (filename2);
if (rc != 0)
return -1;
return 0;
}
/*
* config_file_write: write a configuration file
* return: 0 if ok
* -1 if error writing file
* -2 if not enough memory
*/
int
config_file_write (struct t_config_file *config_file)
{
return config_file_write_internal (config_file, 0);
}
/*
* config_file_read: read a configuration file
* return: 0 = successful
* -1 = config file file not found
* -2 = error in config file
*/
int
config_file_read (struct t_config_file *config_file)
{
int filename_length, line_number, rc;
char *filename;
struct t_config_section *ptr_section;
struct t_config_option *ptr_option;
char line[1024], *ptr_line, *ptr_line2, *pos, *pos2;
if (!config_file)
return -1;
filename_length = strlen (weechat_home) + strlen (config_file->filename) + 2;
filename = (char *)malloc (filename_length * sizeof (char));
if (!filename)
return -2;
snprintf (filename, filename_length, "%s%s%s",
weechat_home, DIR_SEPARATOR, config_file->filename);
if ((config_file->file = fopen (filename, "r")) == NULL)
{
config_file_write_internal (config_file, 1);
if ((config_file->file = fopen (filename, "r")) == NULL)
{
gui_chat_printf (NULL,
_("%sWarning: config file \"%s\" not found"),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename);
free (filename);
return -1;
}
}
ptr_section = NULL;
line_number = 0;
while (!feof (config_file->file))
{
ptr_line = fgets (line, sizeof (line) - 1, config_file->file);
line_number++;
if (ptr_line)
{
/* encode line to internal charset */
ptr_line2 = string_iconv_to_internal (NULL, ptr_line);
if (ptr_line2)
{
snprintf (line, sizeof (line) - 1, "%s", ptr_line2);
free (ptr_line2);
}
/* skip spaces */
while (ptr_line[0] == ' ')
ptr_line++;
/* not a comment and not an empty line */
if ((ptr_line[0] != '#') && (ptr_line[0] != '\r')
&& (ptr_line[0] != '\n'))
{
/* beginning of section */
if (ptr_line[0] == '[')
{
pos = strchr (line, ']');
if (pos == NULL)
{
gui_chat_printf (NULL,
_("%sWarning: %s, line %d: invalid "
"syntax, missing \"]\""),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename, line_number);
}
else
{
pos[0] = '\0';
pos = ptr_line + 1;
ptr_section = config_file_search_section (config_file,
pos);
if (ptr_section)
{
if (ptr_section->callback_read)
{
(void) (ptr_section->callback_read) (ptr_section->callback_read_data,
config_file,
NULL, NULL);
}
}
else
{
gui_chat_printf (NULL,
_("%sWarning: %s, line %d: unknown "
"section identifier "
"(\"%s\")"),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename, line_number, pos);
}
}
}
else
{
pos = strchr (line, '=');
if (pos == NULL)
{
gui_chat_printf (NULL,
_("%sWarning: %s, line %d: invalid "
"syntax, missing \"=\""),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename, line_number);
}
else
{
pos[0] = '\0';
pos++;
/* remove spaces before '=' */
pos2 = pos - 2;
while ((pos2 > line) && (pos2[0] == ' '))
{
pos2[0] = '\0';
pos2--;
}
/* skip spaces after '=' */
while (pos[0] && (pos[0] == ' '))
{
pos++;
}
/* remove CR/LF */
pos2 = strchr (pos, '\r');
if (pos2 != NULL)
pos2[0] = '\0';
pos2 = strchr (pos, '\n');
if (pos2 != NULL)
pos2[0] = '\0';
/* remove simple or double quotes
and spaces at the end */
if (strlen(pos) > 1)
{
pos2 = pos + strlen (pos) - 1;
while ((pos2 > pos) && (pos2[0] == ' '))
{
pos2[0] = '\0';
pos2--;
}
pos2 = pos + strlen (pos) - 1;
if (((pos[0] == '\'') &&
(pos2[0] == '\'')) ||
((pos[0] == '"') &&
(pos2[0] == '"')))
{
pos2[0] = '\0';
pos++;
}
}
if (ptr_section && ptr_section->callback_read)
{
ptr_option = NULL;
(void) (ptr_section->callback_read) (ptr_section->callback_read_data,
config_file,
line, pos);
rc = 1;
}
else
{
rc = -1;
ptr_option = config_file_search_option (config_file,
ptr_section,
line);
if (ptr_option)
{
rc = config_file_option_set (ptr_option, pos, 1);
ptr_option->loaded = 1;
}
}
switch (rc)
{
case -1:
if (ptr_section)
gui_chat_printf (NULL,
_("%sWarning: %s, line %d: "
"option \"%s\" "
"unknown for "
"section \"%s\""),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename, line_number,
line, ptr_section->name);
else
gui_chat_printf (NULL,
_("%sWarning: %s, line %d: "
"unknown option \"%s\" "
"(outside a section)"),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename, line_number,
line);
break;
case 0:
gui_chat_printf (NULL,
_("%sWarning: %s, line %d: "
"invalid value for option "
"\"%s\""),
gui_chat_prefix[GUI_CHAT_PREFIX_ERROR],
filename, line_number, line);
break;
}
}
}
}
}
}
fclose (config_file->file);
config_file->file = NULL;
free (filename);
return 0;
}
/*
* config_file_reload: reload a configuration file
* return: 0 = successful
* -1 = config file file not found
* -2 = error in config file
*/
int
config_file_reload (struct t_config_file *config_file)
{
struct t_config_section *ptr_section;
struct t_config_option *ptr_option;
int rc;
if (!config_file)
return -1;
/* init "loaded" flag for all options */
for (ptr_section = config_file->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
if (!ptr_section->callback_read)
{
for (ptr_option = ptr_section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
ptr_option->loaded = 0;
}
}
}
/* read configuration file */
rc = config_file_read (config_file);
/* reset options not found in configuration file */
for (ptr_section = config_file->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
if (!ptr_section->callback_read)
{
for (ptr_option = ptr_section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
if (!ptr_option->loaded)
{
if (config_file_option_reset (ptr_option) == 2)
{
if (ptr_option->callback_change)
{
(void) (ptr_option->callback_change)
(ptr_option->callback_change_data);
}
}
}
}
}
}
return rc;
}
/*
* config_file_option_free: free an option
*/
void
config_file_option_free (struct t_config_section *section,
struct t_config_option *option)
{
struct t_config_option *new_options;
if (!section || !option)
return;
/* remove option */
if (section->last_option == option)
section->last_option = option->prev_option;
if (option->prev_option)
{
(option->prev_option)->next_option = option->next_option;
new_options = section->options;
}
else
new_options = option->next_option;
if (option->next_option)
(option->next_option)->prev_option = option->prev_option;
/* free data */
if (option->name)
free (option->name);
if (option->description)
free (option->description);
if (option->string_values)
string_free_exploded (option->string_values);
if (option->default_value)
free (option->default_value);
if (option->value)
free (option->value);
section->options = new_options;
}
/*
* config_file_section_free: free a section
*/
void
config_file_section_free (struct t_config_file *config_file,
struct t_config_section *section)
{
struct t_config_section *new_sections;
if (!config_file || !section)
return;
/* remove section */
if (config_file->last_section == section)
config_file->last_section = section->prev_section;
if (section->prev_section)
{
(section->prev_section)->next_section = section->next_section;
new_sections = config_file->sections;
}
else
new_sections = section->next_section;
if (section->next_section)
(section->next_section)->prev_section = section->prev_section;
/* free data */
while (section->options)
{
config_file_option_free (section, section->options);
}
if (section->name)
free (section->name);
config_file->sections = new_sections;
}
/*
* config_file_free: free a configuration file
*/
void
config_file_free (struct t_config_file *config_file)
{
struct t_config_file *new_config_files;
if (!config_file)
return;
/* remove config file */
if (last_config_file == config_file)
last_config_file = config_file->prev_config;
if (config_file->prev_config)
{
(config_file->prev_config)->next_config = config_file->next_config;
new_config_files = config_files;
}
else
new_config_files = config_file->next_config;
if (config_file->next_config)
(config_file->next_config)->prev_config = config_file->prev_config;
/* free data */
while (config_file->sections)
{
config_file_section_free (config_file, config_file->sections);
}
if (config_file->filename)
free (config_file->filename);
config_files = new_config_files;
}
/*
* config_file_free_all: free all configuration files
*/
void
config_file_free_all ()
{
while (config_files)
{
config_file_free (config_files);
}
}
/*
* config_file_free_all: free all configuration files for a plugin
*/
void
config_file_free_all_plugin (struct t_weechat_plugin *plugin)
{
struct t_config_file *ptr_config, *next_config;
ptr_config = config_files;
while (ptr_config)
{
next_config = ptr_config->next_config;
if (ptr_config->plugin == plugin)
config_file_free (ptr_config);
ptr_config = next_config;
}
}
/*
* config_file_print_stdout: print options on standard output
*/
void
config_file_print_stdout (struct t_config_file *config_file)
{
struct t_config_section *ptr_section;
struct t_config_option *ptr_option;
char *color_name;
int i;
for (ptr_section = config_file->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
for (ptr_option = ptr_section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
string_iconv_fprintf (stdout,
"* %s:\n",
ptr_option->name);
switch (ptr_option->type)
{
case CONFIG_OPTION_BOOLEAN:
string_iconv_fprintf (stdout, _(" . type: boolean\n"));
string_iconv_fprintf (stdout, _(" . values: 'on' or 'off'\n"));
string_iconv_fprintf (stdout, _(" . default value: '%s'\n"),
(CONFIG_BOOLEAN_DEFAULT(ptr_option) == CONFIG_BOOLEAN_TRUE) ?
"on" : "off");
break;
case CONFIG_OPTION_INTEGER:
if (ptr_option->string_values)
{
string_iconv_fprintf (stdout, _(" . type: string\n"));
string_iconv_fprintf (stdout, _(" . values: "));
i = 0;
while (ptr_option->string_values[i])
{
string_iconv_fprintf (stdout, "'%s'",
ptr_option->string_values[i]);
if (ptr_option->string_values[i + 1])
string_iconv_fprintf (stdout, ", ");
i++;
}
string_iconv_fprintf (stdout, "\n");
string_iconv_fprintf (stdout, _(" . default value: '%s'\n"),
ptr_option->string_values[CONFIG_INTEGER_DEFAULT(ptr_option)]);
}
else
{
string_iconv_fprintf (stdout, _(" . type: integer\n"));
string_iconv_fprintf (stdout, _(" . values: between %d and %d\n"),
ptr_option->min,
ptr_option->max);
string_iconv_fprintf (stdout, _(" . default value: %d\n"),
CONFIG_INTEGER_DEFAULT(ptr_option));
}
break;
case CONFIG_OPTION_STRING:
switch (ptr_option->max)
{
case 0:
string_iconv_fprintf (stdout, _(" . type: string\n"));
string_iconv_fprintf (stdout, _(" . values: any string\n"));
break;
case 1:
string_iconv_fprintf (stdout, _(" . type: char\n"));
string_iconv_fprintf (stdout, _(" . values: any char\n"));
break;
default:
string_iconv_fprintf (stdout, _(" . type: string\n"));
string_iconv_fprintf (stdout, _(" . values: any string (limit: %d chars)\n"),
ptr_option->max);
break;
}
string_iconv_fprintf (stdout, _(" . default value: '%s'\n"),
CONFIG_STRING_DEFAULT(ptr_option));
break;
case CONFIG_OPTION_COLOR:
color_name = gui_color_get_name (CONFIG_COLOR_DEFAULT(ptr_option));
string_iconv_fprintf (stdout, _(" . type: color\n"));
string_iconv_fprintf (stdout, _(" . values: color (depends on GUI used)\n"));
string_iconv_fprintf (stdout, _(" . default value: '%s'\n"),
color_name);
break;
}
string_iconv_fprintf (stdout, _(" . description: %s\n"),
_(ptr_option->description));
string_iconv_fprintf (stdout, "\n");
}
}
}
/*
* config_file_print_log: print config in log (usually for crash dump)
*/
void
config_file_print_log ()
{
struct t_config_file *ptr_config_file;
struct t_config_section *ptr_section;
struct t_config_option *ptr_option;
for (ptr_config_file = config_files; ptr_config_file;
ptr_config_file = ptr_config_file->next_config)
{
log_printf ("");
log_printf ("[config (addr:0x%x)]", ptr_config_file);
log_printf (" plugin . . . . . . . . : 0x%x", ptr_config_file->plugin);
log_printf (" filename . . . . . . . : '%s'", ptr_config_file->filename);
log_printf (" file . . . . . . . . . : 0x%x", ptr_config_file->file);
log_printf (" sections . . . . . . . : 0x%x", ptr_config_file->sections);
log_printf (" last_section . . . . . : 0x%x", ptr_config_file->last_section);
log_printf (" prev_config. . . . . . : 0x%x", ptr_config_file->prev_config);
log_printf (" next_config. . . . . . : 0x%x", ptr_config_file->next_config);
for (ptr_section = ptr_config_file->sections; ptr_section;
ptr_section = ptr_section->next_section)
{
log_printf ("");
log_printf (" [section (addr:0x%x)]", ptr_section);
log_printf (" name . . . . . . . . . : '%s'", ptr_section->name);
log_printf (" callback_read. . . . . : 0x%x", ptr_section->callback_read);
log_printf (" callback_write . . . . : 0x%x", ptr_section->callback_write);
log_printf (" callback_write_default : 0x%x", ptr_section->callback_write_default);
log_printf (" options. . . . . . . . : 0x%x", ptr_section->options);
log_printf (" last_option. . . . . . : 0x%x", ptr_section->last_option);
log_printf (" prev_section . . . . . : 0x%x", ptr_section->prev_section);
log_printf (" next_section . . . . . : 0x%x", ptr_section->next_section);
for (ptr_option = ptr_section->options; ptr_option;
ptr_option = ptr_option->next_option)
{
log_printf ("");
log_printf (" [option (addr:0x%x)]", ptr_option);
log_printf (" name . . . . . . . . : '%s'", ptr_option->name);
log_printf (" type . . . . . . . . : %d", ptr_option->type);
log_printf (" description. . . . . : '%s'", ptr_option->description);
log_printf (" string_values. . . . : 0x%x", ptr_option->string_values);
log_printf (" min. . . . . . . . . : %d", ptr_option->min);
log_printf (" max. . . . . . . . . : %d", ptr_option->max);
switch (ptr_option->type)
{
case CONFIG_OPTION_BOOLEAN:
log_printf (" default value. . . . : %s",
(CONFIG_BOOLEAN_DEFAULT(ptr_option) == CONFIG_BOOLEAN_TRUE) ?
"true" : "false");
log_printf (" value (boolean). . . : %s",
(CONFIG_BOOLEAN(ptr_option) == CONFIG_BOOLEAN_TRUE) ?
"true" : "false");
break;
case CONFIG_OPTION_INTEGER:
if (ptr_option->string_values)
{
log_printf (" default value. . . . : '%s'",
ptr_option->string_values[CONFIG_INTEGER_DEFAULT(ptr_option)]);
log_printf (" value (integer/str). : '%s'",
ptr_option->string_values[CONFIG_INTEGER(ptr_option)]);
}
else
{
log_printf (" default value. . . . : %d", CONFIG_INTEGER_DEFAULT(ptr_option));
log_printf (" value (integer). . . : %d", CONFIG_INTEGER(ptr_option));
}
break;
case CONFIG_OPTION_STRING:
log_printf (" default value. . . . : '%s'", CONFIG_STRING_DEFAULT(ptr_option));
log_printf (" value (string) . . . : '%s'", CONFIG_STRING(ptr_option));
break;
case CONFIG_OPTION_COLOR:
log_printf (" default value. . . . : %d ('%s')",
CONFIG_COLOR_DEFAULT(ptr_option),
gui_color_get_name (CONFIG_COLOR_DEFAULT(ptr_option)));
log_printf (" value (color). . . . : %d ('%s')",
CONFIG_COLOR(ptr_option),
gui_color_get_name (CONFIG_COLOR(ptr_option)));
break;
}
log_printf (" callback_change. . . : 0x%x", ptr_option->callback_change);
log_printf (" loaded . . . . . . . : %d", ptr_option->loaded);
log_printf (" prev_option. . . . . : 0x%x", ptr_option->prev_option);
log_printf (" next_option. . . . . : 0x%x", ptr_option->next_option);
}
}
}
}
View Git Blame Copy Permalink