X-Git-Url: http://git.silcnet.org/gitweb/?a=blobdiff_plain;f=apps%2Firssi%2Fsrc%2Flib-config%2Fget.c;fp=apps%2Firssi%2Fsrc%2Flib-config%2Fget.c;h=0000000000000000000000000000000000000000;hb=72c2de619079457f7a68100eb13385275a424a23;hp=ccc8c689a6cba07e3ae40361ce979bbc7c65b844;hpb=e7b6c157b80152bf9fb9266e6bdd93f9fb0db776;p=runtime.git diff --git a/apps/irssi/src/lib-config/get.c b/apps/irssi/src/lib-config/get.c deleted file mode 100644 index ccc8c689..00000000 --- a/apps/irssi/src/lib-config/get.c +++ /dev/null @@ -1,338 +0,0 @@ -/* - get.c : irssi configuration - get settings from memory - - Copyright (C) 1999 Timo Sirainen - - 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 2 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, write to the Free Software - Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA -*/ - -#include "module.h" - -CONFIG_NODE *config_node_find(CONFIG_NODE *node, const char *key) -{ - GSList *tmp; - - g_return_val_if_fail(node != NULL, NULL); - g_return_val_if_fail(key != NULL, NULL); - g_return_val_if_fail(is_node_list(node), NULL); - - for (tmp = node->value; tmp != NULL; tmp = tmp->next) { - CONFIG_NODE *node = tmp->data; - - if (node->key != NULL && g_strcasecmp(node->key, key) == 0) - return node; - } - - return NULL; -} - -/* find the section from node - if not found create it unless new_type is -1. - you can also specify in new_type if it's NODE_TYPE_LIST or NODE_TYPE_BLOCK */ -CONFIG_NODE *config_node_section(CONFIG_NODE *parent, const char *key, int new_type) -{ - return config_node_section_index(parent, key, -1, new_type); -} - -CONFIG_NODE *config_node_section_index(CONFIG_NODE *parent, const char *key, - int index, int new_type) -{ - CONFIG_NODE *node; - int nindex; - - g_return_val_if_fail(parent != NULL, NULL); - g_return_val_if_fail(is_node_list(parent), NULL); - - node = key == NULL ? NULL : config_node_find(parent, key); - if (node != NULL) { - g_return_val_if_fail(new_type == -1 || new_type == node->type, NULL); - nindex = g_slist_index(parent->value, node); - if (index >= 0 && nindex != index && - nindex <= g_slist_length(parent->value)) { - /* move it to wanted position */ - parent->value = g_slist_remove(parent->value, node); - parent->value = g_slist_insert(parent->value, node, index); - } - return node; - } - - if (new_type == -1) - return NULL; - - node = g_new0(CONFIG_NODE, 1); - parent->value = index < 0 ? g_slist_append(parent->value, node) : - g_slist_insert(parent->value, node, index); - - node->type = new_type; - node->key = key == NULL ? NULL : g_strdup(key); - - return node; -} - -/* find the section with the whole path. - create the path if necessary `create' is TRUE. */ -CONFIG_NODE *config_node_traverse(CONFIG_REC *rec, const char *section, int create) -{ - CONFIG_NODE *node; - char **list, **tmp, *str; - int is_list, new_type; - - g_return_val_if_fail(rec != NULL, NULL); - - if (section == NULL || *section == '\0') - return rec->mainnode; - - /* check if it already exists in cache */ - node = g_hash_table_lookup(rec->cache, section); - if (node != NULL) return node; - - new_type = -1; - - node = rec->mainnode; - list = g_strsplit(section, "/", -1); - for (tmp = list; *tmp != NULL; tmp++) { - is_list = **tmp == '('; - if (create) new_type = is_list ? NODE_TYPE_LIST : NODE_TYPE_BLOCK; - - node = config_node_section(node, *tmp + is_list, new_type); - if (node == NULL) { - g_strfreev(list); - return NULL; - } - } - g_strfreev(list); - - /* save to cache */ - str = g_strdup(section); - g_hash_table_insert(rec->cache, str, node); - g_hash_table_insert(rec->cache_nodes, node, str); - return node; -} - -char *config_get_str(CONFIG_REC *rec, const char *section, const char *key, const char *def) -{ - CONFIG_NODE *parent, *node; - char *path; - - g_return_val_if_fail(rec != NULL, (char *) def); - g_return_val_if_fail(key != NULL, (char *) def); - - /* check if it already exists in cache */ - path = g_strconcat(section == NULL ? "" : section, "/", key, NULL); - node = g_hash_table_lookup(rec->cache, path); - - if (node != NULL) - g_free(path); - else { - parent = config_node_traverse(rec, section, FALSE); - node = parent == NULL ? NULL : - config_node_find(parent, key); - - /* save to cache */ - if (node == NULL) - g_free(path); - else { - g_hash_table_insert(rec->cache, path, node); - g_hash_table_insert(rec->cache_nodes, node, path); - } - } - - return (node == NULL || !has_node_value(node)) ? (char *) def : node->value; -} - -int config_get_int(CONFIG_REC *rec, const char *section, const char *key, int def) -{ - char *str; - - str = config_get_str(rec, section, key, NULL); - if (str == NULL) return def; - - return atoi(str); -} - -int config_get_bool(CONFIG_REC *rec, const char *section, const char *key, int def) -{ - char *str; - - str = config_get_str(rec, section, key, NULL); - if (str == NULL) return def; - - return i_toupper(*str) == 'T' || i_toupper(*str) == 'Y'; -} - -char *config_node_get_str(CONFIG_NODE *parent, const char *key, const char *def) -{ - CONFIG_NODE *node; - - if (parent == NULL) return (char *) def; - - node = config_node_find(parent, key); - return (char *) ((node != NULL && has_node_value(node)) ? - node->value : def); -} - -int config_node_get_int(CONFIG_NODE *parent, const char *key, int def) -{ - char *str; - - str = config_node_get_str(parent, key, NULL); - if (str == NULL) return def; - - return atoi(str); -} - -int config_node_get_bool(CONFIG_NODE *parent, const char *key, int def) -{ - char *str; - - str = config_node_get_str(parent, key, NULL); - if (str == NULL) return def; - - return i_toupper(*str) == 'T' || i_toupper(*str) == 'Y' || - (i_toupper(*str) == 'O' && i_toupper(str[1]) == 'N'); -} - -/* Get the value of keys `key' and `key_value' and put them to - `ret_key' and `ret_value'. Returns -1 if not found. */ -int config_node_get_keyvalue(CONFIG_NODE *node, const char *key, const char *value_key, char **ret_key, char **ret_value) -{ - CONFIG_NODE *keynode, *valuenode; - GSList *tmp; - - g_return_val_if_fail(node != NULL, -1); - g_return_val_if_fail(key != NULL, -1); - g_return_val_if_fail(value_key != NULL, -1); - g_return_val_if_fail(ret_key != NULL, -1); - g_return_val_if_fail(ret_value != NULL, -1); - - for (tmp = node->value; tmp != NULL; tmp = tmp->next) { - node = tmp->data; - - if (node->type != NODE_TYPE_BLOCK) - continue; - - keynode = config_node_find(node, key); - if (keynode == NULL || keynode->type != NODE_TYPE_KEY) - continue; - - valuenode = config_node_find(node, value_key); - - *ret_key = keynode->key; - *ret_value = valuenode != NULL && valuenode->type == NODE_TYPE_KEY ? - valuenode->value : NULL; - return 0; - } - - return -1; -} - -/* Return all values from from the list `node' in a g_strsplit() array */ -char **config_node_get_list(CONFIG_NODE *node) -{ - GString *values; - GSList *tmp; - char **ret; - - g_return_val_if_fail(node != NULL, NULL); - g_return_val_if_fail(is_node_list(node), NULL); - - /* put values to string */ - values = g_string_new(NULL); - for (tmp = node->value; tmp != NULL; tmp = tmp->next) { - node = tmp->data; - - if (node->type == NODE_TYPE_VALUE) - g_string_sprintfa(values, "%s ", (char *) node->value); - } - - /* split the values to **str array */ - if (values->len == 0) - ret = NULL; - else { - g_string_truncate(values, values->len-1); - ret = g_strsplit(values->str, " ", -1); - } - - g_string_free(values, TRUE); - return ret; -} - -/* Returns n'th node from list. */ -CONFIG_NODE *config_node_nth(CONFIG_NODE *node, int index) -{ - GSList *tmp; - - g_return_val_if_fail(node != NULL, NULL); - g_return_val_if_fail(is_node_list(node), NULL); - - for (tmp = node->value; tmp != NULL; tmp = tmp->next) { - CONFIG_NODE *node = tmp->data; - - if (node->type != NODE_TYPE_COMMENT) { - if (index == 0) - return node; - index--; - } - } - - return NULL; -} - -/* Returns index for given key */ -int config_node_index(CONFIG_NODE *parent, const char *key) -{ - CONFIG_NODE *node; - GSList *tmp; - int index; - - g_return_val_if_fail(parent != NULL, -1); - g_return_val_if_fail(key != NULL, -1); - - node = config_node_find(parent, key); - if (node == NULL) - return -1; - - index = 0; - for (tmp = parent->value; tmp != NULL; tmp = tmp->next) { - CONFIG_NODE *tmpnode = tmp->data; - - if (tmpnode == node) - return index; - - if (tmpnode->type != NODE_TYPE_COMMENT) - index++; - } - - return -1; -} - -/* Returns the first non-comment node in list */ -GSList *config_node_first(GSList *list) -{ - while (list != NULL) { - CONFIG_NODE *node = list->data; - - if (node->type != NODE_TYPE_COMMENT) - break; - list = list->next; - } - return list; -} - -/* Returns the next non-comment node in list */ -GSList *config_node_next(GSList *list) -{ - list = list->next; - return config_node_first(list); -}