cfg.c File Reference

#include "gwlib/gwlib.h"
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <dirent.h>
#include <errno.h>
#include "cfg.def"

Go to the source code of this file.

Data Structures
struct	CfgGroup
struct	CfgLoc
struct	Cfg

Macros
#define	OCTSTR(name)
#define	SINGLE_GROUP(name, fields)
#define	MULTI_GROUP(name, fields)
#define	OCTSTR(name)
#define	SINGLE_GROUP(name, fields)
#define	MULTI_GROUP(name, fields)
#define	OCTSTR(name)   printf("%s = <please consult user doc>\n", #name);
#define	SINGLE_GROUP(name, fields)
#define	MULTI_GROUP(name, fields)

Functions
static CfgGroup *	create_group (void)
static void	destroy_group (void *arg)
static CfgLoc *	cfgloc_create (Octstr *filename)
static void	cfgloc_destroy (CfgLoc *cfgloc)
static void	destroy_group_list (void *arg)
static void	set_group_name (CfgGroup *grp, Octstr *name)
static int	octstr_sort_cb (const void *a, const void *b)
static int	octstr_cmp_cb (void *a, void *b)
static int	core_is_allowed_in_group (Octstr *group, Octstr *variable)
static int	core_is_single_group (Octstr *query)
static int	is_allowed_in_group (Octstr *group, Octstr *variable)
static int	is_single_group (Octstr *query)
void	cfg_add_hooks (void *allowed, void *single)
static int	add_group (Cfg *cfg, CfgGroup *grp)
Cfg *	cfg_create (Octstr *filename)
void	cfg_destroy (Cfg *cfg)
static void	parse_value (Octstr *value)
static List *	expand_file (Octstr *file, int forward)
int	cfg_read (Cfg *cfg)
CfgGroup *	cfg_get_single_group (Cfg *cfg, Octstr *name)
List *	cfg_get_multi_group (Cfg *cfg, Octstr *name)
Octstr *	cfg_get_group_name (CfgGroup *grp)
Octstr *	cfg_get_group_checksum (CfgGroup *grp,...)
Octstr *	cfg_get_configfile (CfgGroup *grp)
Octstr *	cfg_get_real (CfgGroup *grp, Octstr *varname, const char *file, long line, const char *func)
int	cfg_get_integer (long *n, CfgGroup *grp, Octstr *varname)
int	cfg_get_bool (int *n, CfgGroup *grp, Octstr *varname)
List *	cfg_get_list (CfgGroup *grp, Octstr *varname)
void	cfg_set (CfgGroup *grp, Octstr *varname, Octstr *value)
void	grp_dump (CfgGroup *grp)
void	cfg_dump (Cfg *cfg)
void	cfg_dump_all (void)
void	cfg_init (void)
void	cfg_shutdown (void)

Variables
static List *	allowed_hooks
static List *	single_hooks

Macro Definition Documentation

MULTI_GROUP [1/3]

#define MULTI_GROUP	(		name,
			fields
	)

Value:

if (octstr_compare(octstr_imm(#name), group) == 0) { \
        if (octstr_compare(groupstr, variable) == 0) \
        return 1; \
        fields \
        return 0; \
    }

MULTI_GROUP [2/3]

#define MULTI_GROUP	(		name,
			fields
	)

Value:

if (octstr_compare(octstr_imm(#name), query) == 0) \
        return 0;

MULTI_GROUP [3/3]

#define MULTI_GROUP	(		name,
			fields
	)

Value:

printf("#\n#  Multi Group\n#\n"); \
        printf("group = %s\n", #name); \
        fields; \
        printf("\n\n");

OCTSTR [1/3]

#define OCTSTR

(

name

)

Value:

if (octstr_compare(octstr_imm(#name), variable) == 0) \
        return 1;

OCTSTR [2/3]

#define OCTSTR

(

name

)

OCTSTR [3/3]

#define OCTSTR

(

name

)

printf("%s = <please consult user doc>\n", #name);

SINGLE_GROUP [1/3]

#define SINGLE_GROUP	(		name,
			fields
	)

Value:

if (octstr_compare(octstr_imm(#name), group) == 0) { \
        if (octstr_compare(groupstr, variable) == 0) \
        return 1; \
        fields \
        return 0; \
    }

SINGLE_GROUP [2/3]

#define SINGLE_GROUP	(		name,
			fields
	)

Value:

if (octstr_compare(octstr_imm(#name), query) == 0) \
        return 1;

SINGLE_GROUP [3/3]

#define SINGLE_GROUP	(		name,
			fields
	)

Value:

printf("#\n#  Single Group\n#\n"); \
        printf("group = %s\n", #name); \
        fields; \
        printf("\n\n");

Function Documentation

add_group()

static int add_group ( Cfg *  cfg, CfgGroup *  grp  )

static

Definition at line 260 of file cfg.c.

References cfg, cfg_get, dict_get(), dict_keys(), dict_put(), error(), gwlist_append(), gwlist_create, gwlist_destroy(), gwlist_extract_first(), is_allowed_in_group(), is_single_group(), Cfg::multi_groups, name, octstr_destroy(), octstr_destroy_item(), octstr_get_cstr, octstr_imm(), set_group_name(), Cfg::single_groups, and CfgGroup::vars.

Referenced by cfg_read().

{
    Octstr *groupname;
    Octstr *name;
    List *names;
    List *list;
    
    groupname = cfg_get(grp, octstr_imm("group"));
    if (groupname == NULL) {
        error(0, "Group does not contain variable 'group'.");
        return -1;
    }
    set_group_name(grp, groupname);

    names = dict_keys(grp->vars);

    while ((name = gwlist_extract_first(names)) != NULL) {
        int a = is_allowed_in_group(groupname, name);
        switch (a) {
            case 0:
                error(0, "Group '%s' may not contain field '%s'.",
                      octstr_get_cstr(groupname), octstr_get_cstr(name));
                octstr_destroy(name);
                octstr_destroy(groupname);
                gwlist_destroy(names, octstr_destroy_item);
                return -1;
                break;
            case -1:
                error(0, "Group '%s' is no valid group identifier.",
                      octstr_get_cstr(groupname));
                octstr_destroy(name);
                octstr_destroy(groupname);
                gwlist_destroy(names, octstr_destroy_item);
                return -1;
                break;
            default:
                octstr_destroy(name);
                break;
        }
    }
    gwlist_destroy(names, NULL);

    if (is_single_group(groupname)) {
        dict_put(cfg->single_groups, groupname, grp);
    } else {
        list = dict_get(cfg->multi_groups, groupname);
        if (list == NULL) {
            list = gwlist_create();
            dict_put(cfg->multi_groups, groupname, list);
        }
        gwlist_append(list, grp);
    }

    octstr_destroy(groupname);
    return 0;
}

cfg_add_hooks()

void cfg_add_hooks	(	void *	allowed,
		void *	single
	)

Definition at line 253 of file cfg.c.

References allowed_hooks, gwlist_append(), and single_hooks.

Referenced by main().

{
    gwlist_append(allowed_hooks, allowed);
    gwlist_append(single_hooks, single);
}

cfg_create()

Cfg* cfg_create

(

Octstr *

filename

)

Definition at line 318 of file cfg.c.

References cfg, destroy_group(), destroy_group_list(), dict_create(), Cfg::filename, filename, Cfg::multi_groups, octstr_duplicate, and Cfg::single_groups.

Referenced by at2_read_modems(), bb_graceful_restart(), bb_reload_smsc_groups(), config_reload(), main(), and read_test_ppg_config().

{
    Cfg *cfg;
    
    cfg = gw_malloc(sizeof(*cfg));
    cfg->filename = octstr_duplicate(filename);
    cfg->single_groups = dict_create(64, destroy_group);
    cfg->multi_groups = dict_create(64, destroy_group_list);

    return cfg;
}

cfg_destroy()

void cfg_destroy

(

Cfg *

cfg

)

Definition at line 331 of file cfg.c.

References cfg, dict_destroy(), Cfg::filename, Cfg::multi_groups, octstr_destroy(), and Cfg::single_groups.

Referenced by at2_read_modems(), bb_reload_smsc_groups(), config_reload(), init_wapbox(), main(), read_ppg_config(), and read_test_ppg_config().

{
    if (cfg != NULL) {
        octstr_destroy(cfg->filename);
        dict_destroy(cfg->single_groups);
        dict_destroy(cfg->multi_groups);
        gw_free(cfg);
    }
}

cfg_dump()

void cfg_dump

(

Cfg *

cfg

)

Definition at line 835 of file cfg.c.

References cfg, cfg_get_multi_group(), cfg_get_single_group(), debug(), dict_keys(), Cfg::filename, grp_dump(), gwlist_destroy(), gwlist_extract_first(), Cfg::multi_groups, name, octstr_destroy(), octstr_get_cstr, and Cfg::single_groups.

Referenced by init_wapbox(), main(), and read_test_ppg_config().

{
    CfgGroup *grp;
    List *list;
    List *names;
    Octstr *name;

    debug("gwlib.cfg", 0, "Dumping Cfg %p", (void *) cfg);
    debug("gwlib.cfg", 0, "  filename = <%s>", 
          octstr_get_cstr(cfg->filename));

    names = dict_keys(cfg->single_groups);
    while ((name = gwlist_extract_first(names)) != NULL) {
    grp = cfg_get_single_group(cfg, name);
    if (grp != NULL)
        grp_dump(grp);
        octstr_destroy(name);
    }
    gwlist_destroy(names, NULL);

    names = dict_keys(cfg->multi_groups);
    while ((name = gwlist_extract_first(names)) != NULL) {
    list = cfg_get_multi_group(cfg, name);
    while ((grp = gwlist_extract_first(list)) != NULL)
        grp_dump(grp);
    gwlist_destroy(list, NULL);
        octstr_destroy(name);
    }
    gwlist_destroy(names, NULL);

    debug("gwlib.cfg", 0, "Dump ends.");
}

cfg_dump_all()

void cfg_dump_all

(

void

)

Definition at line 869 of file cfg.c.

Referenced by get_and_set_debugs().

{
    #define OCTSTR(name) \
        printf("%s = <please consult user doc>\n", #name);
    #define SINGLE_GROUP(name, fields) \
        printf("#\n#  Single Group\n#\n"); \
        printf("group = %s\n", #name); \
        fields; \
        printf("\n\n");
    #define MULTI_GROUP(name, fields) \
        printf("#\n#  Multi Group\n#\n"); \
        printf("group = %s\n", #name); \
        fields; \
        printf("\n\n");
    #include "cfg.def"
}

cfg_get_bool()

int cfg_get_bool	(	int *	n,
		CfgGroup *	grp,
		Octstr *	varname
	)

Definition at line 759 of file cfg.c.

References cfg_get, octstr_case_compare(), octstr_destroy(), octstr_imm(), and warning().

Referenced by at2_read_modems(), config_reload(), create_onetrans(), httpadmin_start(), init_bearerbox(), init_reroute(), init_smppbox(), init_smsbox(), init_sqlbox(), init_wapbox(), read_ppg_config(), read_test_ppg_config(), smsbox_start(), smsc2_start(), smsc_at2_create(), smsc_cimd2_create(), smsc_http_create(), smsc_oisd_create(), smsc_smpp_create(), smsc_soap_create(), smscconn_create(), and wapbox_start().

{
    Octstr *os;

    os = cfg_get(grp, varname);
    if (os == NULL) {
    *n = 0;
        return -1;
    }
    if (octstr_case_compare(os, octstr_imm("true")) == 0
    || octstr_case_compare(os, octstr_imm("yes")) == 0
    || octstr_case_compare(os, octstr_imm("on")) == 0
    || octstr_case_compare(os, octstr_imm("1")) == 0)
    {       
    *n = 1;
    } else if (octstr_case_compare(os, octstr_imm("false")) == 0
    || octstr_case_compare(os, octstr_imm("no")) == 0
    || octstr_case_compare(os, octstr_imm("off")) == 0
    || octstr_case_compare(os, octstr_imm("0")) == 0)
    {
    *n = 0;
    }
    else {
    *n = 1;
    warning(0, "bool variable set to strange value, assuming 'true'");
    }
    octstr_destroy(os);
    return 0;
}

cfg_get_configfile()

Octstr* cfg_get_configfile

(

CfgGroup *

grp

)

Definition at line 716 of file cfg.c.

References CfgGroup::configfile, and octstr_duplicate.

Referenced by smsc_at2_create().

{
    return octstr_duplicate(grp->configfile);
}

cfg_get_group_checksum()

Octstr* cfg_get_group_checksum	(	CfgGroup *	grp,
			...
	)

Definition at line 666 of file cfg.c.

References dict_get(), dict_keys(), gwlist_append(), gwlist_create, gwlist_delete_equal(), gwlist_destroy(), gwlist_extract_first(), gwlist_search(), gwlist_sort(), md5(), CfgGroup::name, octstr_append(), octstr_cmp_cb(), octstr_destroy(), octstr_duplicate, octstr_get_cstr, octstr_sort_cb(), panic, and CfgGroup::vars.

Referenced by cmp_conn_grp_checksum(), cmp_rout_grp_checksum(), smscconn_create(), and smscconn_reconfig().

{
    va_list args;
    Octstr *ret, *os, *key, *val;
    List *exclude, *keys;

    exclude = gwlist_create();

    /*
     * Variadic Octstr* arguments may contain the
     * config key names that DO NOT go into the
     * checksum computation. This allows differential
     * compares and detection of single changes.
     */
    va_start(args, grp);
    while ((os = va_arg(args, Octstr*)) != NULL) {
        gwlist_append(exclude, os);
    }
    va_end(args);

    /* all configured config names of this group */
    keys = dict_keys(grp->vars);

    /* remove all excluded configs names */
    while ((os = gwlist_extract_first(exclude)) != NULL) {
        if ((key = gwlist_search(keys, os, octstr_cmp_cb)) != NULL) {
            if (gwlist_delete_equal(keys, key) != 1)
                panic(0, "%s: multiple config variables with same name `%s'?!", __func__,
                      octstr_get_cstr(key));
            octstr_destroy(key);
        }
    }
    gwlist_destroy(exclude, NULL);

    os = octstr_duplicate(grp->name);
    gwlist_sort(keys, octstr_sort_cb);
    while ((key = gwlist_extract_first(keys)) != NULL) {
        octstr_append(os, key);
        if ((val = dict_get(grp->vars, key)) != NULL)
            octstr_append(os, val);
        octstr_destroy(key);
    }
    gwlist_destroy(keys, NULL);

    ret = md5(os);
    octstr_destroy(os);

    return ret;
}

cfg_get_group_name()

Octstr* cfg_get_group_name

(

CfgGroup *

grp

)

Definition at line 661 of file cfg.c.

References CfgGroup::name, and octstr_duplicate.

Referenced by create_onetrans().

{
    return octstr_duplicate(grp->name);
}

cfg_get_integer()

int cfg_get_integer	(	long *	n,
		CfgGroup *	grp,
		Octstr *	varname
	)

Definition at line 742 of file cfg.c.

References cfg_get, octstr_destroy(), and octstr_parse_long().

Referenced by at2_read_modems(), check_config(), config_reload(), create_onetrans(), dlr_db_fields_create(), generic_get_field_map(), httpadmin_start(), init_bearerbox(), init_configuration(), init_smppbox(), init_smsbox(), init_sqlbox(), init_wapbox(), radius_acct_init(), read_ppg_config(), read_test_ppg_config(), smpp_pdu_init(), smsbox_start(), smsc2_start(), smsc_at2_create(), smsc_cgw_create(), smsc_cimd2_create(), smsc_emi2_create(), smsc_fake_create(), smsc_http_create(), smsc_oisd_create(), smsc_open(), smsc_smpp_create(), smsc_soap_create(), smscconn_create(), smscconn_instances(), and wapbox_start().

{
    Octstr *os;
    int ret;
    
    os = cfg_get(grp, varname);
    if (os == NULL)
        return -1;
    if (octstr_parse_long(n, os, 0, 0) == -1)
        ret = -1;
    else
        ret = 0;
    octstr_destroy(os);
    return ret;
}

cfg_get_list()

List* cfg_get_list	(	CfgGroup *	grp,
		Octstr *	varname
	)

Definition at line 790 of file cfg.c.

References cfg_get, octstr_destroy(), and octstr_split_words().

Referenced by config_reload(), init_bearerbox(), and init_smsbox().

{
    Octstr *os;
    List *list;
    
    os = cfg_get(grp, varname);
    if (os == NULL)
        return NULL;

    list = octstr_split_words(os);
    octstr_destroy(os);
    return list;
}

cfg_get_multi_group()

List* cfg_get_multi_group	(	Cfg *	cfg,
		Octstr *	name
	)

Definition at line 645 of file cfg.c.

References cfg, dict_get(), gwlist_append(), gwlist_create, gwlist_get(), gwlist_len(), Cfg::multi_groups, and name.

Referenced by at2_read_modems(), bb_reload_smsc_groups(), cfg_dump(), config_reload(), init_bearerbox(), init_smsbox_routes(), init_smsc_routes(), read_ppg_config(), smpp_pdu_init(), smsbox_req_sendota(), smsc2_graceful_restart(), smsc2_start(), and urltrans_add_cfg().

{
    List *list, *copy;
    long i;
    
    list = dict_get(cfg->multi_groups, name);
    if (list == NULL)
        return NULL;

    copy = gwlist_create();
    for (i = 0; i < gwlist_len(list); ++i)
        gwlist_append(copy, gwlist_get(list, i));
    return copy;
}

cfg_get_real()

Octstr* cfg_get_real	(	CfgGroup *	grp,
		Octstr *	varname,
		const char *	file,
		long	line,
		const char *	func
	)

Definition at line 722 of file cfg.c.

References dict_get(), file, is_allowed_in_group(), CfgGroup::name, octstr_duplicate, octstr_get_cstr, panic, and CfgGroup::vars.

{
    Octstr *os;

    if(grp == NULL) 
        panic(0, "Trying to fetch variable `%s' in non-existing group",
          octstr_get_cstr(varname));

    if (grp->name != NULL && !is_allowed_in_group(grp->name, varname))
        panic(0, "Trying to fetch variable `%s' in group `%s', not allowed.",
          octstr_get_cstr(varname), octstr_get_cstr(grp->name));

    os = dict_get(grp->vars, varname);
    if (os == NULL)
        return NULL;
    return gw_claim_area_for(octstr_duplicate(os), file, line, func);
}

cfg_get_single_group()

CfgGroup* cfg_get_single_group	(	Cfg *	cfg,
		Octstr *	name
	)

Definition at line 639 of file cfg.c.

References cfg, dict_get(), name, and Cfg::single_groups.

Referenced by cfg_dump(), check_config(), config_reload(), dlr_init(), dlr_init_spool(), httpadmin_start(), init_bearerbox(), init_smppbox(), init_smsbox(), init_sqlbox(), init_wapbox(), read_ppg_config(), read_test_ppg_config(), smsbox_start(), smsc2_start(), udp_start(), and wapbox_start().

{
    return dict_get(cfg->single_groups, name);
}

cfg_init()

void cfg_init

(

void

)

Definition at line 887 of file cfg.c.

References allowed_hooks, core_is_allowed_in_group(), core_is_single_group(), gwlist_append(), gwlist_create, and single_hooks.

Referenced by gwlib_init().

{
    /* make sure we put our own core hooks into the lists */
    allowed_hooks = gwlist_create();
    single_hooks = gwlist_create();

    gwlist_append(allowed_hooks, &core_is_allowed_in_group);
    gwlist_append(single_hooks, &core_is_single_group);
}

cfg_read()

int cfg_read

(

Cfg *

cfg

)

Definition at line 452 of file cfg.c.

References add_group(), cfg, cfg_set(), cfgloc_create(), cfgloc_destroy(), CfgGroup::configfile, create_group(), debug(), destroy_group(), error(), expand_file(), file, CfgLoc::filename, Cfg::filename, filename, gwlist_create, gwlist_destroy(), gwlist_extract_first(), gwlist_insert(), gwlist_search(), CfgLoc::line, CfgLoc::line_no, lines, name, octstr_append_cstr(), octstr_copy, octstr_destroy(), octstr_destroy_item(), octstr_duplicate, octstr_get_char(), octstr_get_cstr, octstr_imm(), octstr_item_match(), octstr_len(), octstr_search(), octstr_search_char(), octstr_strip_blanks(), panic, and parse_value().

Referenced by at2_read_modems(), bb_graceful_restart(), bb_reload_smsc_groups(), config_reload(), main(), and read_test_ppg_config().

{ 
    CfgLoc *loc; 
    CfgLoc *loc_inc; 
    List *lines;
    List *expand; 
    List *stack; 
    Octstr *name;
    Octstr *value;
    Octstr *filename; 
    CfgGroup *grp;
    long equals;
    CfgLoc *err_loc = NULL;
    
    loc = loc_inc = NULL;

    /* 
     * expand initial main config file and add it to the recursion 
     * stack to protect against cycling 
     */ 
    if ((lines = expand_file(cfg->filename, 1)) == NULL) { 
        panic(0, "Failed to load main configuration file `%s'. Aborting!", 
              octstr_get_cstr(cfg->filename)); 
    } 
    stack = gwlist_create(); 
    gwlist_insert(stack, 0, octstr_duplicate(cfg->filename)); 

    grp = NULL;
    err_loc = NULL;
    while (err_loc == NULL && (loc = gwlist_extract_first(lines)) != NULL) { 
        octstr_strip_blanks(loc->line); 
        if (octstr_len(loc->line) == 0) { 
            if (grp != NULL && add_group(cfg, grp) == -1) { 
                err_loc = loc; loc = NULL;
                destroy_group(grp); 
            } 
            grp = NULL; 
        } else if (octstr_get_char(loc->line, 0) != '#') { 
            equals = octstr_search_char(loc->line, '=', 0); 
            if (equals == -1) { 
                error(0, "An equals sign ('=') is missing on line %ld of file %s.", 
                      loc->line_no, octstr_get_cstr(loc->filename)); 
                err_loc = loc; loc = NULL;
            } else  
             
            /* 
             * check for special config directives, like include or conditional 
             * directives here 
             */ 
            if (octstr_search(loc->line, octstr_imm("include"), 0) != -1) { 
                List *files = NULL;
                Octstr *file;
                struct stat filestat;

                filename = octstr_copy(loc->line, equals + 1, octstr_len(loc->line)); 
                parse_value(filename); 
                files = gwlist_create();
 
                /* check if included file is a directory */
                if (lstat(octstr_get_cstr(filename), &filestat) != 0) {
                    error(errno, "lstat failed: couldn't stat `%s'",
                          octstr_get_cstr(filename));
                    panic(0, "Failed to include `%s' "
                          "(on line %ld of file %s). Aborting!",
                          octstr_get_cstr(filename), loc->line_no,
                          octstr_get_cstr(loc->filename));
                }

                /*
                 * is a directory, create a list with files of
                 * this directory and load all as part of the
                 * whole configuration.
                 */
                if (S_ISDIR(filestat.st_mode)) {
                    DIR *dh;
                    struct dirent *diritem;

                    debug("gwlib.cfg", 0, "Loading include dir `%s' "
                          "(on line %ld of file %s).",
                          octstr_get_cstr(filename), loc->line_no,
                          octstr_get_cstr(loc->filename));

                    dh = opendir(octstr_get_cstr(filename));
                    while ((diritem = readdir(dh))) {
                        Octstr *fileitem;

                        fileitem = octstr_duplicate(filename);
                        octstr_append_cstr(fileitem, "/");
                        octstr_append_cstr(fileitem, diritem->d_name);

                        lstat(octstr_get_cstr(fileitem), &filestat);
                        if (!S_ISDIR(filestat.st_mode)) {
                            gwlist_insert(files, 0, fileitem);
                        } else {
                            octstr_destroy(fileitem);
                        }
                    }
                    closedir(dh);
                }
                /* is a file, create a list with it */
                else {
                    gwlist_insert(files, 0, octstr_duplicate(filename));
                }

                /* include files */
                while ((file = gwlist_extract_first(files)) != NULL) {

                    /* check if we are cycling and ignore this file */
                    if (gwlist_search(stack, file, octstr_item_match) != NULL) {
                        debug("gwlib.cfg", 0, "Recursive/multiple include for config file `%s' detected "
                                "(on line %ld of file %s), ignore this file.",
                                octstr_get_cstr(filename), loc->line_no,
                                octstr_get_cstr(loc->filename));
                        octstr_destroy(file);
                        continue;
                    }

                    gwlist_insert(stack, 0, octstr_duplicate(file));
                    debug("gwlib.cfg", 0, "Loading include file `%s' (on line %ld of file %s).",
                          octstr_get_cstr(file), loc->line_no,
                          octstr_get_cstr(loc->filename));

                    /*
                     * expand the given include file and add it to the current
                     * processed main while loop
                     */
                    if ((expand = expand_file(file, 0)) != NULL) {
                        while ((loc_inc = gwlist_extract_first(expand)) != NULL)
                            gwlist_insert(lines, 0, loc_inc);
                    } else {
                        panic(0, "Failed to load whole configuration. Aborting!");
                    }

                    gwlist_destroy(expand, NULL);
                    cfgloc_destroy(loc_inc);
                    octstr_destroy(file);
                }
                gwlist_destroy(files, octstr_destroy_item);
                octstr_destroy(filename); 
            }  
            /* 
             * this is a "normal" line, so process it accordingly
             */ 
            else {
                name = octstr_copy(loc->line, 0, equals); 
                octstr_strip_blanks(name); 
                value = octstr_copy(loc->line, equals + 1, octstr_len(loc->line)); 
                parse_value(value); 
 
                        if (grp == NULL)
                    grp = create_group(); 
                 
                if (grp->configfile != NULL) {
                    octstr_destroy(grp->configfile); 
                    grp->configfile = NULL;
                }
                grp->configfile = octstr_duplicate(cfg->filename); 

                cfg_set(grp, name, value); 
                octstr_destroy(name); 
                octstr_destroy(value); 
            } 
        } 

        cfgloc_destroy(loc); 
    }

    if (grp != NULL && add_group(cfg, grp) == -1) {
        err_loc = cfgloc_create(cfg->filename);
        err_loc->line_no = 1;
        destroy_group(grp); 
    }

    gwlist_destroy(lines, NULL); 
    gwlist_destroy(stack, octstr_destroy_item); 

    if (err_loc != NULL) {
        error(0, "Error found on line %ld of file `%s'.",  
              err_loc->line_no, octstr_get_cstr(err_loc->filename));
        cfgloc_destroy(err_loc);
        return -1; 
    }

    return 0;
}

cfg_set()

void cfg_set	(	CfgGroup *	grp,
		Octstr *	varname,
		Octstr *	value
	)

Definition at line 805 of file cfg.c.

References dict_put(), octstr_duplicate, and CfgGroup::vars.

Referenced by cfg_read().

{
    dict_put(grp->vars, varname, octstr_duplicate(value));
}

cfg_shutdown()

void cfg_shutdown

(

void

)

Definition at line 898 of file cfg.c.

References allowed_hooks, gwlist_destroy(), and single_hooks.

Referenced by gwlib_shutdown().

{
    gwlist_destroy(allowed_hooks, NULL);
    gwlist_destroy(single_hooks, NULL);
    allowed_hooks = single_hooks = NULL;
}

cfgloc_create()

static CfgLoc* cfgloc_create ( Octstr *  filename )

static

Definition at line 114 of file cfg.c.

References CfgLoc::filename, filename, CfgLoc::line, CfgLoc::line_no, and octstr_duplicate.

Referenced by cfg_read(), and expand_file().

{ 
    CfgLoc *cfgloc; 
     
    cfgloc = gw_malloc(sizeof(*cfgloc)); 
    cfgloc->filename = octstr_duplicate(filename); 
    cfgloc->line_no = 0; 
    cfgloc->line = NULL; 
    return cfgloc; 
} 

cfgloc_destroy()

static void cfgloc_destroy ( CfgLoc *  cfgloc )

static

Definition at line 126 of file cfg.c.

References CfgLoc::filename, CfgLoc::line, and octstr_destroy().

Referenced by cfg_read().

{ 
    if (cfgloc != NULL) { 
    octstr_destroy(cfgloc->filename); 
    octstr_destroy(cfgloc->line); 
    gw_free(cfgloc); 
    } 
} 

core_is_allowed_in_group()

static int core_is_allowed_in_group ( Octstr *  group, Octstr *  variable  )

static

Definition at line 180 of file cfg.c.

References octstr_imm().

Referenced by cfg_init().

{
    Octstr *groupstr;
    
    groupstr = octstr_imm("group");

    #define OCTSTR(name) \
        if (octstr_compare(octstr_imm(#name), variable) == 0) \
        return 1;
    #define SINGLE_GROUP(name, fields) \
        if (octstr_compare(octstr_imm(#name), group) == 0) { \
        if (octstr_compare(groupstr, variable) == 0) \
        return 1; \
        fields \
        return 0; \
    }
    #define MULTI_GROUP(name, fields) \
        if (octstr_compare(octstr_imm(#name), group) == 0) { \
        if (octstr_compare(groupstr, variable) == 0) \
        return 1; \
        fields \
        return 0; \
    }
    #include "cfg.def"

    /* unknown group identifier */
    return -1;
}

core_is_single_group()

static int core_is_single_group ( Octstr *  query )

static

Definition at line 210 of file cfg.c.

Referenced by cfg_init().

{
    #define OCTSTR(name)
    #define SINGLE_GROUP(name, fields) \
        if (octstr_compare(octstr_imm(#name), query) == 0) \
        return 1;
    #define MULTI_GROUP(name, fields) \
        if (octstr_compare(octstr_imm(#name), query) == 0) \
        return 0;
    #include "cfg.def"
    return 0;
}

create_group()

static CfgGroup* create_group ( void  )

static

Definition at line 81 of file cfg.c.

References CfgGroup::configfile, dict_create(), CfgGroup::line, CfgGroup::name, octstr_destroy_item(), and CfgGroup::vars.

Referenced by cfg_read().

{
    CfgGroup *grp;
    
    grp = gw_malloc(sizeof(*grp));
    grp->name = NULL;
    grp->vars = dict_create(64, octstr_destroy_item);
    grp->configfile = NULL; 
    grp->line = 0; 
    return grp;
}

destroy_group()

static void destroy_group ( void *  arg )

static

Definition at line 93 of file cfg.c.

References CfgGroup::configfile, dict_destroy(), CfgGroup::name, octstr_destroy(), and CfgGroup::vars.

Referenced by cfg_create(), cfg_read(), and destroy_group_list().

{
    CfgGroup *grp;
    
    if (arg != NULL) {
    grp = arg;
    octstr_destroy(grp->name);
    octstr_destroy(grp->configfile); 
    dict_destroy(grp->vars);
    gw_free(grp);
    }
}

destroy_group_list()

static void destroy_group_list ( void *  arg )

static

Definition at line 136 of file cfg.c.

References destroy_group(), and gwlist_destroy().

Referenced by cfg_create().

{
    gwlist_destroy(arg, destroy_group);
}

expand_file()

static List* expand_file ( Octstr *  file, int  forward  )

static

Definition at line 389 of file cfg.c.

References cfgloc_create(), file, gwlist_append(), gwlist_create, gwlist_destroy(), gwlist_extract_first(), gwlist_insert(), CfgLoc::line, CfgLoc::line_no, lines, octstr_append(), octstr_create, octstr_delete(), octstr_destroy(), octstr_destroy_item(), octstr_get_char(), octstr_get_cstr, octstr_imm(), octstr_len(), octstr_read_file(), and octstr_split().

Referenced by cfg_read().

{
    Octstr *os;
    Octstr *line;
    List *lines; 
    List *expand; 
    long lineno; 
    CfgLoc *loc = NULL; 
 
    os = octstr_read_file(octstr_get_cstr(file)); 
    if (os == NULL) 
        return NULL; 
 
    lines = octstr_split(os, octstr_imm("\n")); 
    lineno = 0; 
    expand = gwlist_create(); 
              
    while ((line = gwlist_extract_first(lines)) != NULL) {
        if (loc == NULL) {
            ++lineno; 
            loc = cfgloc_create(file); 
            loc->line_no = lineno;
            loc->line = octstr_create("");
            if (forward) 
                gwlist_append(expand, loc); 
            else 
                gwlist_insert(expand, 0, loc);
        }
        /* check for escape and then add to existing loc */
        if (octstr_get_char(line, octstr_len(line) - 1) == '\\') {
            octstr_delete(line, octstr_len(line) - 1, 1);
            octstr_append(loc->line, line); 
            /* check for second escape */
            if (octstr_get_char(line, octstr_len(line) - 1) == '\\')
                loc = NULL;
        } else {
            octstr_append(loc->line, line);
            loc = NULL;
        }
        octstr_destroy(line);
    } 
    
    /* 
     * add newline at each end of included files to avoid 
     * concatenating different groups by mistake
     */
    if (lineno > 0) {
        loc = cfgloc_create(file); 
        loc->line_no = lineno;
        loc->line = octstr_create("\n");
        if (forward) 
            gwlist_append(expand, loc); 
        else 
            gwlist_insert(expand, 0, loc); 
    }
         
    gwlist_destroy(lines, octstr_destroy_item); 
    octstr_destroy(os); 
 
    return expand; 
} 

grp_dump()

void grp_dump

(

CfgGroup *

grp

)

Definition at line 811 of file cfg.c.

References cfg_get, debug(), dict_keys(), gwlist_destroy(), gwlist_extract_first(), CfgGroup::name, name, octstr_destroy(), octstr_get_cstr, and CfgGroup::vars.

Referenced by cfg_dump(), create_onetrans(), init_reroute(), init_smsbox_routes(), and init_smsc_routes().

{
    List *names;
    Octstr *name;
    Octstr *value;

    if (grp->name == NULL)
    debug("gwlib.cfg", 0, "  dumping group (name not set):");
    else
    debug("gwlib.cfg", 0, "  dumping group (%s):",
          octstr_get_cstr(grp->name));
    names = dict_keys(grp->vars);
    while ((name = gwlist_extract_first(names)) != NULL) {
    value = cfg_get(grp, name);
    debug("gwlib.cfg", 0, "    <%s> = <%s>", 
          octstr_get_cstr(name),
          octstr_get_cstr(value));
        octstr_destroy(value);
        octstr_destroy(name);
    }
    gwlist_destroy(names, NULL);
}

is_allowed_in_group()

static int is_allowed_in_group ( Octstr *  group, Octstr *  variable  )

static

Definition at line 224 of file cfg.c.

References allowed_hooks, gwlist_get(), and gwlist_len().

Referenced by add_group(), and cfg_get_real().

{
    long i;
    int x, r = -1;

    for (i = 0; i < gwlist_len(allowed_hooks); ++i) {
        x = ((int(*)(Octstr *, Octstr *))
            gwlist_get(allowed_hooks, i))(group, variable);
        r = (x == -1 ? (r == -1 ? x : r) : (r == -1 ? x : r + x));
    }

    return r;
}

is_single_group()

static int is_single_group ( Octstr *  query )

static

Definition at line 239 of file cfg.c.

References gwlist_get(), gwlist_len(), and single_hooks.

Referenced by add_group().

{
    long i;
    int r = 0;

    for (i = 0; i < gwlist_len(single_hooks); ++i) {
        r += ((int(*)(Octstr *))
            gwlist_get(single_hooks, i))(query);
    }

    return (r > 0);
}

octstr_cmp_cb()

static int octstr_cmp_cb ( void *  a, void *  b  )

static

Definition at line 158 of file cfg.c.

References octstr_compare().

Referenced by cfg_get_group_checksum().

{
    return (octstr_compare((Octstr*)a, (Octstr*)b) == 0);
}

octstr_sort_cb()

static int octstr_sort_cb ( const void *  a, const void *  b  )

static

Definition at line 149 of file cfg.c.

References octstr_compare().

Referenced by cfg_get_group_checksum().

{
    const Octstr *fa = a;
    const Octstr *fb = b;

    return octstr_compare(fa, fb);
}

parse_value()

static void parse_value ( Octstr *  value )

static

Definition at line 342 of file cfg.c.

References octstr_append_char(), octstr_delete(), octstr_destroy(), octstr_duplicate, octstr_get_char(), octstr_len(), octstr_strip_blanks(), and octstr_truncate().

Referenced by cfg_read().

{
    Octstr *temp;
    long len;
    int c;
    
    octstr_strip_blanks(value);

    len = octstr_len(value);
    if (octstr_get_char(value, 0) != '"' || 
        octstr_get_char(value, len - 1) != '"')
    return;

    octstr_delete(value, len - 1, 1);
    octstr_delete(value, 0, 1);

    temp = octstr_duplicate(value);
    octstr_truncate(value, 0);
    
    while (octstr_len(temp) > 0) {
    c = octstr_get_char(temp, 0);
    octstr_delete(temp, 0, 1);
    
        if (c != '\\' || octstr_len(temp) == 0)
        octstr_append_char(value, c);
    else {
        c = octstr_get_char(temp, 0);
        octstr_delete(temp, 0, 1);

        switch (c) {
            case '\\':
            case '"':
            octstr_append_char(value, c);
            break;
        
            default:
            octstr_append_char(value, '\\');
            octstr_append_char(value, c);
        break;
        }
    }
    }
    
    octstr_destroy(temp);
}

set_group_name()

static void set_group_name ( CfgGroup *  grp, Octstr *  name  )

static

Definition at line 142 of file cfg.c.

References CfgGroup::name, name, octstr_destroy(), and octstr_duplicate.

Referenced by add_group().

{
    octstr_destroy(grp->name);
    grp->name = octstr_duplicate(name);
}

Variable Documentation

allowed_hooks

List* allowed_hooks

static

Definition at line 177 of file cfg.c.

Referenced by cfg_add_hooks(), cfg_init(), cfg_shutdown(), and is_allowed_in_group().

single_hooks

List* single_hooks

static

Definition at line 178 of file cfg.c.

Referenced by cfg_add_hooks(), cfg_init(), cfg_shutdown(), and is_single_group().