int smpp_pdu_init(Cfg *cfg)
{
CfgGroup *grp;
List *l;
if (initialized)
return 0;
l = cfg_get_multi_group(cfg, octstr_imm("smpp-tlv"));
tlvs = gwlist_create();
tlvs_by_tag = dict_create(1024, (void(*)(void*))dict_destroy);
tlvs_by_name = dict_create(1024, (void(*)(void*))dict_destroy);
while (l != NULL && (grp = gwlist_extract_first(l)) != NULL) {
struct smpp_tlv *tlv;
Octstr *tmp, *smsc_id;
List *l2;
tlv = gw_malloc(sizeof(*tlv));
if ((tlv->name = cfg_get(grp, octstr_imm("name"))) == NULL) {
error(0, "SMPP: Unable to get name for smpp-tlv.");
smpp_tlv_destroy(tlv);
goto failed;
}
if (cfg_get_integer(&tlv->tag, grp, octstr_imm("tag")) == -1) {
error(0, "SMPP: Unable to get tag for smpp-tlv.");
smpp_tlv_destroy(tlv);
goto failed;
}
if (cfg_get_integer(&tlv->length, grp, octstr_imm("length")) == -1) {
error(0, "SMPP: Unable to get length for smpp-tlv.");
smpp_tlv_destroy(tlv);
goto failed;
}
if ((tmp = cfg_get(grp, octstr_imm("type"))) == NULL) {
error(0, "SMPP: Unable to get type for smpp-tlv.");
smpp_tlv_destroy(tlv);
goto failed;
}
if (octstr_str_case_compare(tmp, "octetstring") == 0)
tlv->type = SMPP_TLV_OCTETS;
else if (octstr_str_case_compare(tmp, "nulterminated") == 0)
tlv->type = SMPP_TLV_NULTERMINATED;
else if (octstr_str_case_compare(tmp, "integer") == 0)
tlv->type = SMPP_TLV_INTEGER;
else {
error(0, "SMPP: Unknown type for smpp-tlv: `%s'", octstr_get_cstr(tmp));
octstr_destroy(tmp);
smpp_tlv_destroy(tlv);
goto failed;
}
octstr_destroy(tmp);
/* put to all TLVs */
gwlist_produce(tlvs, tlv);
smsc_id = cfg_get(grp, octstr_imm("smsc-id"));
if (smsc_id != NULL) {
l2 = octstr_split(smsc_id, octstr_imm(";"));
octstr_destroy(smsc_id);
} else {
l2 = gwlist_create();
gwlist_produce(l2, octstr_create(DEFAULT_SMSC_ID));
}
while(l2 != NULL && (smsc_id = gwlist_extract_first(l2)) != NULL) {
Dict *tmp_dict;
debug("sms.smpp", 0, "adding smpp-tlv for smsc-id=%s", octstr_get_cstr(smsc_id));
tmp_dict = dict_get(tlvs_by_name, smsc_id);
if (tmp_dict == NULL) {
tmp_dict = dict_create(1024, NULL);
dict_put(tlvs_by_name, smsc_id, tmp_dict);
}
/* put into dict */
if (!dict_put_once(tmp_dict, tlv->name, tlv)) {
error(0, "SMPP: Double TLV name %s found.", octstr_get_cstr(tlv->name));
octstr_destroy(smsc_id);
goto failed;
}
tmp_dict = dict_get(tlvs_by_tag, smsc_id);
if (tmp_dict == NULL) {
tmp_dict = dict_create(1024, NULL);
dict_put(tlvs_by_tag, smsc_id, tmp_dict);
}
tmp = octstr_format("%ld", tlv->tag);
if (!dict_put_once(tmp_dict, tmp, tlv)) {
error(0, "SMPP: Double TLV tag %s found.", octstr_get_cstr(tmp));
gwlist_destroy(l2, octstr_destroy_item);
octstr_destroy(tmp);
octstr_destroy(smsc_id);
goto failed;
}
octstr_destroy(tmp);
octstr_destroy(smsc_id);
}
gwlist_destroy(l2, octstr_destroy_item);
}
gwlist_destroy(l, NULL);
initialized = 1;
return 0;
failed:
gwlist_destroy(tlvs, (void(*)(void*))smpp_tlv_destroy);
dict_destroy(tlvs_by_tag);
dict_destroy(tlvs_by_name);
return -1;
}
mCfg *mms_cfg_read(Octstr *file)
{
Octstr *sf;
List *lines;
int i, n;
mCfg *cfg;
mCfgGrp *grp = NULL;
int skip = 0;
gw_assert(file);
if ((sf = octstr_read_file(octstr_get_cstr(file))) == NULL) {
mms_error(errno, "mms_cfg", NULL, "failed to read config from `%s'", octstr_get_cstr(file));
return NULL;
}
cfg = gw_malloc(sizeof *cfg);
cfg->file = octstr_duplicate(file);
cfg->grps = dict_create(7, NULL);
cfg->xcfg = NULL;
cfg->cfg_funcs = NULL;
lines = octstr_split(sf, octstr_imm("\n"));
for (i = 0, n = gwlist_len(lines); i < n; i++) {
Octstr *current = gwlist_get(lines,i);
int pos;
octstr_strip_blanks(current);
if (octstr_len(current) == 0) { /* end of group. */
grp = NULL;
skip = 0;
continue;
} else if (skip || octstr_get_char(current, 0) == '#')
continue;
if ((pos = octstr_search_char(current, '=',0)) > 0) {
/* a field name. first see if start of grp */
Octstr *field = octstr_copy(current,0,pos);
Octstr *value = octstr_copy(current,pos+1,octstr_len(current));
octstr_strip_blanks(field);
fixup_value(value, i+1);
#if 0
mms_info(0, "mms_cfg", NULL, "field/value: [%s - %s]", octstr_get_cstr(field),
octstr_get_cstr(value));
#endif
if (octstr_str_case_compare(field, "group") == 0)
if (grp == NULL) { /* grp name. */
int ismulti = is_multigroup(value);
if (ismulti < 0) {
mms_info(0, "mms_cfg", NULL, "Skipping unknown group `%s' at line %d of conf file",
octstr_get_cstr(value), i+1);
skip = 1;
} else {
grp = gw_malloc(sizeof *grp);
grp->name = octstr_duplicate(value);
grp->fields = dict_create(23, (void (*)(void *))octstr_destroy);
if (ismulti) {
List *l = dict_get(cfg->grps, value);
if (l == NULL) {
l = gwlist_create();
dict_put(cfg->grps, value, l);
}
gwlist_append(l, grp);
} else if (dict_put_once(cfg->grps, value, grp) == 0)
panic(0, "Group `%s' [at line %d] cannot appear more "
"than once in config!",
octstr_get_cstr(value), i+1);
}
} else
panic(0,"`group' is an illegal field name "
"within a group at line %d in config file!",
i+1);
else if (grp) /* an ordinary field name. */
check_and_add_field(grp, field, value,i+1);
else
panic(0, "A group must begin with a `group = group_name' "
"clause [at line %d in config file]", i+1);
octstr_destroy(field);
octstr_destroy(value);
} else
panic(0, "mal-formed entry in conf file at line %d!", i+1);
}
gwlist_destroy(lines, (gwlist_item_destructor_t *)octstr_destroy);
octstr_destroy(sf);
/* Now check if config-source is set, use that. */
if ((grp = mms_cfg_get_single(cfg, octstr_imm("config-source"))) != NULL) {
Octstr *init = mms_cfg_get(cfg, grp, octstr_imm("config-library-init-param"));
cfg->cfg_funcs = _mms_load_module(cfg, grp, "config-library", "cfg_funcs", NULL);
if (cfg->cfg_funcs == NULL ||
cfg->cfg_funcs->read == NULL ||
(cfg->xcfg = cfg->cfg_funcs->read(init)) == NULL) {
mms_error(0, "mms_cfg", NULL, "Failed to load cfg reader library from conf!");
mms_cfg_destroy(cfg);
cfg = NULL;
}
octstr_destroy(init);
}
return cfg;
}
