SMSCConn *smscconn_create(CfgGroup *grp, int start_as_stopped)
{
SMSCConn *conn;
Octstr *smsc_type;
int ret;
Octstr *allowed_smsc_id_regex;
Octstr *denied_smsc_id_regex;
Octstr *allowed_prefix_regex;
Octstr *denied_prefix_regex;
Octstr *preferred_prefix_regex;
Octstr *tmp;
if (grp == NULL)
return NULL;
conn = gw_malloc(sizeof(*conn));
memset(conn, 0, sizeof(*conn));
conn->why_killed = SMSCCONN_ALIVE;
conn->status = SMSCCONN_CONNECTING;
conn->connect_time = -1;
conn->is_stopped = start_as_stopped;
conn->received = counter_create();
conn->received_dlr = counter_create();
conn->sent = counter_create();
conn->sent_dlr = counter_create();
conn->failed = counter_create();
conn->flow_mutex = mutex_create();
conn->outgoing_sms_load = load_create();
/* add 60,300,-1 entries */
load_add_interval(conn->outgoing_sms_load, 60);
load_add_interval(conn->outgoing_sms_load, 300);
load_add_interval(conn->outgoing_sms_load, -1);
conn->incoming_sms_load = load_create();
/* add 60,300,-1 entries */
load_add_interval(conn->incoming_sms_load, 60);
load_add_interval(conn->incoming_sms_load, 300);
load_add_interval(conn->incoming_sms_load, -1);
conn->incoming_dlr_load = load_create();
/* add 60,300,-1 entries to dlr */
load_add_interval(conn->incoming_dlr_load, 60);
load_add_interval(conn->incoming_dlr_load, 300);
load_add_interval(conn->incoming_dlr_load, -1);
conn->outgoing_dlr_load = load_create();
/* add 60,300,-1 entries to dlr */
load_add_interval(conn->outgoing_dlr_load, 60);
load_add_interval(conn->outgoing_dlr_load, 300);
load_add_interval(conn->outgoing_dlr_load, -1);
#define GET_OPTIONAL_VAL(x, n) x = cfg_get(grp, octstr_imm(n))
#define SPLIT_OPTIONAL_VAL(x, n) \
do { \
Octstr *tmp = cfg_get(grp, octstr_imm(n)); \
if (tmp) x = octstr_split(tmp, octstr_imm(";")); \
else x = NULL; \
octstr_destroy(tmp); \
}while(0)
GET_OPTIONAL_VAL(conn->id, "smsc-id");
SPLIT_OPTIONAL_VAL(conn->allowed_smsc_id, "allowed-smsc-id");
SPLIT_OPTIONAL_VAL(conn->denied_smsc_id, "denied-smsc-id");
SPLIT_OPTIONAL_VAL(conn->preferred_smsc_id, "preferred-smsc-id");
GET_OPTIONAL_VAL(conn->allowed_prefix, "allowed-prefix");
GET_OPTIONAL_VAL(conn->denied_prefix, "denied-prefix");
GET_OPTIONAL_VAL(conn->preferred_prefix, "preferred-prefix");
GET_OPTIONAL_VAL(conn->unified_prefix, "unified-prefix");
GET_OPTIONAL_VAL(conn->our_host, "our-host");
GET_OPTIONAL_VAL(conn->log_file, "log-file");
cfg_get_bool(&conn->alt_dcs, grp, octstr_imm("alt-dcs"));
GET_OPTIONAL_VAL(allowed_smsc_id_regex, "allowed-smsc-id-regex");
if (allowed_smsc_id_regex != NULL)
if ((conn->allowed_smsc_id_regex = gw_regex_comp(allowed_smsc_id_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_smsc_id_regex));
GET_OPTIONAL_VAL(denied_smsc_id_regex, "denied-smsc-id-regex");
if (denied_smsc_id_regex != NULL)
if ((conn->denied_smsc_id_regex = gw_regex_comp(denied_smsc_id_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(denied_smsc_id_regex));
GET_OPTIONAL_VAL(allowed_prefix_regex, "allowed-prefix-regex");
if (allowed_prefix_regex != NULL)
if ((conn->allowed_prefix_regex = gw_regex_comp(allowed_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_prefix_regex));
GET_OPTIONAL_VAL(denied_prefix_regex, "denied-prefix-regex");
if (denied_prefix_regex != NULL)
if ((conn->denied_prefix_regex = gw_regex_comp(denied_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(denied_prefix_regex));
GET_OPTIONAL_VAL(preferred_prefix_regex, "preferred-prefix-regex");
if (preferred_prefix_regex != NULL)
if ((conn->preferred_prefix_regex = gw_regex_comp(preferred_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(preferred_prefix_regex));
if ((tmp = cfg_get(grp, octstr_imm("throughput"))) != NULL) {
if (octstr_parse_double(&conn->throughput, tmp, 0) == -1)
conn->throughput = 0;
octstr_destroy(tmp);
info(0, "Set throughput to %.3f for smsc id <%s>", conn->throughput, octstr_get_cstr(conn->id));
}
/* Sets the admin_id. Equals to connection id if empty */
GET_OPTIONAL_VAL(conn->admin_id, "smsc-admin-id");
if (conn->admin_id == NULL)
conn->admin_id = octstr_duplicate(conn->id);
/* configure the internal rerouting rules for this smsc id */
init_reroute(conn, grp);
if (cfg_get_integer(&conn->log_level, grp, octstr_imm("log-level")) == -1)
conn->log_level = 0;
if (cfg_get_integer(&conn->max_sms_octets, grp, octstr_imm("max-sms-octets")) == -1)
conn->max_sms_octets = MAX_SMS_OCTETS;
if (cfg_get_bool(&conn->dead_start, grp, octstr_imm("dead-start")) == -1)
conn->dead_start = 0; /* default to connect at start-up time */
/* open a smsc-id specific log-file in exlusive mode */
if (conn->log_file)
conn->log_idx = log_open(octstr_get_cstr(conn->log_file),
conn->log_level, GW_EXCL);
#undef GET_OPTIONAL_VAL
#undef SPLIT_OPTIONAL_VAL
if (conn->allowed_smsc_id && conn->denied_smsc_id)
warning(0, "Both 'allowed-smsc-id' and 'denied-smsc-id' set, deny-list "
"automatically ignored");
if (conn->allowed_smsc_id_regex && conn->denied_smsc_id_regex)
warning(0, "Both 'allowed-smsc-id_regex' and 'denied-smsc-id_regex' set, deny-regex "
"automatically ignored");
if (cfg_get_integer(&conn->reconnect_delay, grp,
octstr_imm("reconnect-delay")) == -1)
conn->reconnect_delay = SMSCCONN_RECONNECT_DELAY;
smsc_type = cfg_get(grp, octstr_imm("smsc"));
if (smsc_type == NULL) {
error(0, "Required field 'smsc' missing for smsc group.");
smscconn_destroy(conn);
octstr_destroy(smsc_type);
return NULL;
}
if (octstr_compare(smsc_type, octstr_imm("fake")) == 0)
ret = smsc_fake_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("cimd2")) == 0)
ret = smsc_cimd2_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("emi")) == 0)
ret = smsc_emi2_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("http")) == 0)
ret = smsc_http_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("smpp")) == 0)
ret = smsc_smpp_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("at")) == 0)
ret = smsc_at2_create(conn,grp);
else if (octstr_compare(smsc_type, octstr_imm("cgw")) == 0)
ret = smsc_cgw_create(conn,grp);
else if (octstr_compare(smsc_type, octstr_imm("smasi")) == 0)
ret = smsc_smasi_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("oisd")) == 0)
ret = smsc_oisd_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("loopback")) == 0)
ret = smsc_loopback_create(conn, grp);
#ifdef HAVE_GSOAP
else if (octstr_compare(smsc_type, octstr_imm("parlayx")) == 0)
ret = smsc_soap_parlayx_create(conn, grp);
#endif
else
ret = smsc_wrapper_create(conn, grp);
octstr_destroy(smsc_type);
if (ret == -1) {
smscconn_destroy(conn);
return NULL;
}
gw_assert(conn->send_msg != NULL);
bb_smscconn_ready(conn);
return conn;
}
SMSCConn *smscconn_create(CfgGroup *grp, int start_as_stopped)
{
SMSCConn *conn;
Octstr *smsc_type;
int ret;
long throughput;
Octstr *allowed_smsc_id_regex;
Octstr *denied_smsc_id_regex;
Octstr *allowed_prefix_regex;
Octstr *denied_prefix_regex;
Octstr *preferred_prefix_regex;
if (grp == NULL)
return NULL;
conn = gw_malloc(sizeof(*conn));
memset(conn, 0, sizeof(*conn));
conn->why_killed = SMSCCONN_ALIVE;
conn->status = SMSCCONN_CONNECTING;
conn->connect_time = -1;
conn->is_stopped = start_as_stopped;
conn->received = counter_create();
conn->sent = counter_create();
conn->failed = counter_create();
conn->flow_mutex = mutex_create();
#define GET_OPTIONAL_VAL(x, n) x = cfg_get(grp, octstr_imm(n))
#define SPLIT_OPTIONAL_VAL(x, n) \
do { \
Octstr *tmp = cfg_get(grp, octstr_imm(n)); \
if (tmp) x = octstr_split(tmp, octstr_imm(";")); \
else x = NULL; \
octstr_destroy(tmp); \
}while(0)
GET_OPTIONAL_VAL(conn->id, "smsc-id");
SPLIT_OPTIONAL_VAL(conn->allowed_smsc_id, "allowed-smsc-id");
SPLIT_OPTIONAL_VAL(conn->denied_smsc_id, "denied-smsc-id");
SPLIT_OPTIONAL_VAL(conn->preferred_smsc_id, "preferred-smsc-id");
GET_OPTIONAL_VAL(conn->allowed_prefix, "allowed-prefix");
GET_OPTIONAL_VAL(conn->denied_prefix, "denied-prefix");
GET_OPTIONAL_VAL(conn->preferred_prefix, "preferred-prefix");
GET_OPTIONAL_VAL(conn->unified_prefix, "unified-prefix");
GET_OPTIONAL_VAL(conn->our_host, "our-host");
GET_OPTIONAL_VAL(conn->log_file, "log-file");
cfg_get_bool(&conn->alt_dcs, grp, octstr_imm("alt-dcs"));
GET_OPTIONAL_VAL(allowed_smsc_id_regex, "allowed-smsc-id-regex");
if (allowed_smsc_id_regex != NULL)
if ((conn->allowed_smsc_id_regex = gw_regex_comp(allowed_smsc_id_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_smsc_id_regex));
GET_OPTIONAL_VAL(denied_smsc_id_regex, "denied-smsc-id-regex");
if (denied_smsc_id_regex != NULL)
if ((conn->denied_smsc_id_regex = gw_regex_comp(denied_smsc_id_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(denied_smsc_id_regex));
GET_OPTIONAL_VAL(allowed_prefix_regex, "allowed-prefix-regex");
if (allowed_prefix_regex != NULL)
if ((conn->allowed_prefix_regex = gw_regex_comp(allowed_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_prefix_regex));
GET_OPTIONAL_VAL(denied_prefix_regex, "denied-prefix-regex");
if (denied_prefix_regex != NULL)
if ((conn->denied_prefix_regex = gw_regex_comp(denied_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(denied_prefix_regex));
GET_OPTIONAL_VAL(preferred_prefix_regex, "preferred-prefix-regex");
if (preferred_prefix_regex != NULL)
if ((conn->preferred_prefix_regex = gw_regex_comp(preferred_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(preferred_prefix_regex));
if (cfg_get_integer(&throughput, grp, octstr_imm("throughput")) == -1)
conn->throughput = 0; /* defaults to no throughtput limitation */
else
conn->throughput = (int) throughput;
/* configure the internal rerouting rules for this smsc id */
init_reroute(conn, grp);
if (cfg_get_integer(&conn->log_level, grp, octstr_imm("log-level")) == -1)
conn->log_level = 0;
/* open a smsc-id specific log-file in exlusive mode */
if (conn->log_file)
conn->log_idx = log_open(octstr_get_cstr(conn->log_file),
conn->log_level, GW_EXCL);
#undef GET_OPTIONAL_VAL
#undef SPLIT_OPTIONAL_VAL
if (conn->allowed_smsc_id && conn->denied_smsc_id)
warning(0, "Both 'allowed-smsc-id' and 'denied-smsc-id' set, deny-list "
"automatically ignored");
if (conn->allowed_smsc_id_regex && conn->denied_smsc_id_regex)
warning(0, "Both 'allowed-smsc-id_regex' and 'denied-smsc-id_regex' set, deny-regex "
"automatically ignored");
if (cfg_get_integer(&conn->reconnect_delay, grp,
octstr_imm("reconnect-delay")) == -1)
conn->reconnect_delay = SMSCCONN_RECONNECT_DELAY;
smsc_type = cfg_get(grp, octstr_imm("smsc"));
if (smsc_type == NULL) {
error(0, "Required field 'smsc' missing for smsc group.");
smscconn_destroy(conn);
octstr_destroy(smsc_type);
return NULL;
}
if (octstr_compare(smsc_type, octstr_imm("fake")) == 0)
ret = smsc_fake_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("cimd2")) == 0)
ret = smsc_cimd2_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("emi")) == 0)
ret = smsc_emi2_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("http")) == 0)
ret = smsc_http_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("smpp")) == 0)
ret = smsc_smpp_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("at")) == 0)
ret = smsc_at2_create(conn,grp);
else if (octstr_compare(smsc_type, octstr_imm("cgw")) == 0)
ret = smsc_cgw_create(conn,grp);
else if (octstr_compare(smsc_type, octstr_imm("smasi")) == 0)
ret = smsc_smasi_create(conn, grp);
else if (octstr_compare(smsc_type, octstr_imm("oisd")) == 0)
ret = smsc_oisd_create(conn, grp);
else
ret = smsc_wrapper_create(conn, grp);
octstr_destroy(smsc_type);
if (ret == -1) {
smscconn_destroy(conn);
return NULL;
}
gw_assert(conn->send_msg != NULL);
bb_smscconn_ready(conn);
return conn;
}
/*
* Create one URLTranslation. Return NULL for failure, pointer to it for OK.
*/
static URLTranslation *create_onetrans(CfgGroup *grp)
{
URLTranslation *ot;
Octstr *url, *post_url, *post_xml, *text, *file, *exec;
Octstr *accepted_smsc, *accepted_account, *forced_smsc, *default_smsc;
Octstr *grpname;
int is_sms_service, regex_flag = REG_EXTENDED;
Octstr *accepted_smsc_regex;
Octstr *accepted_account_regex;
Octstr *allowed_prefix_regex;
Octstr *denied_prefix_regex;
Octstr *allowed_receiver_prefix_regex;
Octstr *denied_receiver_prefix_regex;
Octstr *white_list_regex;
Octstr *black_list_regex;
Octstr *keyword_regex;
Octstr *os, *tmp;
grpname = cfg_get_group_name(grp);
if (grpname == NULL)
return NULL;
if (octstr_str_compare(grpname, "sms-service") == 0)
is_sms_service = 1;
else if (octstr_str_compare(grpname, "sendsms-user") == 0)
is_sms_service = 0;
else {
octstr_destroy(grpname);
return NULL;
}
octstr_destroy(grpname);
ot = gw_malloc(sizeof(URLTranslation));
memset(ot, 0, sizeof(*ot));
if (is_sms_service) {
cfg_get_bool(&ot->catch_all, grp, octstr_imm("catch-all"));
ot->dlr_url = cfg_get(grp, octstr_imm("dlr-url"));
if (cfg_get_integer(&ot->dlr_mask, grp, octstr_imm("dlr-mask")) == -1)
ot->dlr_mask = DLR_UNDEFINED;
ot->alt_charset = cfg_get(grp, octstr_imm("alt-charset"));
url = cfg_get(grp, octstr_imm("get-url"));
if (url == NULL)
url = cfg_get(grp, octstr_imm("url"));
post_url = cfg_get(grp, octstr_imm("post-url"));
post_xml = cfg_get(grp, octstr_imm("post-xml"));
file = cfg_get(grp, octstr_imm("file"));
text = cfg_get(grp, octstr_imm("text"));
exec = cfg_get(grp, octstr_imm("exec"));
if (url != NULL) {
ot->type = TRANSTYPE_GET_URL;
ot->pattern = octstr_duplicate(url);
} else if (post_url != NULL) {
ot->type = TRANSTYPE_POST_URL;
ot->pattern = octstr_duplicate(post_url);
ot->catch_all = 1;
} else if (post_xml != NULL) {
ot->type = TRANSTYPE_POST_XML;
ot->pattern = octstr_duplicate(post_xml);
ot->catch_all = 1;
} else if (file != NULL) {
ot->type = TRANSTYPE_FILE;
ot->pattern = octstr_duplicate(file);
} else if (text != NULL) {
ot->type = TRANSTYPE_TEXT;
ot->pattern = octstr_duplicate(text);
} else if (exec != NULL) {
ot->type = TRANSTYPE_EXECUTE;
ot->pattern = octstr_duplicate(exec);
} else {
octstr_destroy(url);
octstr_destroy(post_url);
octstr_destroy(post_xml);
octstr_destroy(file);
octstr_destroy(text);
octstr_destroy(exec);
error(0, "Configuration group `sms-service' "
"did not specify get-url, post-url, post-xml, file or text.");
goto error;
}
octstr_destroy(url);
octstr_destroy(post_url);
octstr_destroy(post_xml);
octstr_destroy(file);
octstr_destroy(text);
octstr_destroy(exec);
tmp = cfg_get(grp, octstr_imm("keyword"));
keyword_regex = cfg_get(grp, octstr_imm("keyword-regex"));
if (tmp == NULL && keyword_regex == NULL) {
error(0, "Group 'sms-service' must include either 'keyword' or 'keyword-regex'.");
goto error;
}
if (tmp != NULL && keyword_regex != NULL) {
error(0, "Group 'sms-service' may inlcude either 'keyword' or 'keyword-regex'.");
octstr_destroy(tmp);
octstr_destroy(keyword_regex);
goto error;
}
if (tmp != NULL && octstr_str_compare(tmp, "default") == 0) {
/* default sms-service */
ot->keyword_regex = NULL;
octstr_destroy(tmp);
} else if (tmp != NULL) {
Octstr *aliases;
/* convert to regex */
regex_flag |= REG_ICASE;
keyword_regex = octstr_format("^[ ]*(%S", tmp);
octstr_destroy(tmp);
aliases = cfg_get(grp, octstr_imm("aliases"));
if (aliases != NULL) {
long i;
List *l;
l = octstr_split(aliases, octstr_imm(";"));
octstr_destroy(aliases);
for (i = 0; i < gwlist_len(l); ++i) {
os = gwlist_get(l, i);
octstr_format_append(keyword_regex, "|%S", os);
}
gwlist_destroy(l, octstr_destroy_item);
}
octstr_append_cstr(keyword_regex, ")[ ]*");
}
if (keyword_regex != NULL && (ot->keyword_regex = gw_regex_comp(keyword_regex, regex_flag)) == NULL) {
error(0, "Could not compile pattern '%s'", octstr_get_cstr(keyword_regex));
octstr_destroy(keyword_regex);
goto error;
}
ot->name = cfg_get(grp, octstr_imm("name"));
if (ot->name == NULL)
ot->name = keyword_regex ? octstr_duplicate(keyword_regex) : octstr_create("default");
octstr_destroy(keyword_regex);
accepted_smsc = cfg_get(grp, octstr_imm("accepted-smsc"));
if (accepted_smsc != NULL) {
ot->accepted_smsc = octstr_split(accepted_smsc, octstr_imm(";"));
octstr_destroy(accepted_smsc);
}
accepted_account = cfg_get(grp, octstr_imm("accepted-account"));
if (accepted_account != NULL) {
ot->accepted_account = octstr_split(accepted_account, octstr_imm(";"));
octstr_destroy(accepted_account);
}
accepted_smsc_regex = cfg_get(grp, octstr_imm("accepted-smsc-regex"));
if (accepted_smsc_regex != NULL) {
if ( (ot->accepted_smsc_regex = gw_regex_comp(accepted_smsc_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(accepted_smsc_regex));
octstr_destroy(accepted_smsc_regex);
}
accepted_account_regex = cfg_get(grp, octstr_imm("accepted-account-regex"));
if (accepted_account_regex != NULL) {
if ( (ot->accepted_account_regex = gw_regex_comp(accepted_account_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(accepted_account_regex));
octstr_destroy(accepted_account_regex);
}
cfg_get_bool(&ot->assume_plain_text, grp,
octstr_imm("assume-plain-text"));
cfg_get_bool(&ot->accept_x_kannel_headers, grp,
octstr_imm("accept-x-kannel-headers"));
cfg_get_bool(&ot->strip_keyword, grp, octstr_imm("strip-keyword"));
cfg_get_bool(&ot->send_sender, grp, octstr_imm("send-sender"));
ot->prefix = cfg_get(grp, octstr_imm("prefix"));
ot->suffix = cfg_get(grp, octstr_imm("suffix"));
ot->allowed_recv_prefix = cfg_get(grp, octstr_imm("allowed-receiver-prefix"));
allowed_receiver_prefix_regex = cfg_get(grp, octstr_imm("allowed-receiver-prefix-regex"));
if (allowed_receiver_prefix_regex != NULL) {
if ((ot->allowed_receiver_prefix_regex = gw_regex_comp(allowed_receiver_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_receiver_prefix_regex));
octstr_destroy(allowed_receiver_prefix_regex);
}
ot->allowed_recv_prefix = cfg_get(grp, octstr_imm("allowed-receiver-prefix"));
ot->denied_recv_prefix = cfg_get(grp, octstr_imm("denied-receiver-prefix"));
denied_receiver_prefix_regex = cfg_get(grp, octstr_imm("denied-receiver-prefix-regex"));
if (denied_receiver_prefix_regex != NULL) {
if ((ot->denied_receiver_prefix_regex = gw_regex_comp(denied_receiver_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'",octstr_get_cstr(denied_receiver_prefix_regex));
octstr_destroy(denied_receiver_prefix_regex);
}
ot->args = count_occurences(ot->pattern, octstr_imm("%s"));
ot->args += count_occurences(ot->pattern, octstr_imm("%S"));
ot->has_catchall_arg =
(count_occurences(ot->pattern, octstr_imm("%r")) > 0) ||
(count_occurences(ot->pattern, octstr_imm("%a")) > 0);
} else {
ot->type = TRANSTYPE_SENDSMS;
ot->pattern = octstr_create("");
ot->args = 0;
ot->has_catchall_arg = 0;
ot->catch_all = 1;
ot->username = cfg_get(grp, octstr_imm("username"));
ot->password = cfg_get(grp, octstr_imm("password"));
ot->dlr_url = cfg_get(grp, octstr_imm("dlr-url"));
grp_dump(grp);
if (ot->password == NULL) {
error(0, "Password required for send-sms user");
goto error;
}
ot->name = cfg_get(grp, octstr_imm("name"));
if (ot->name == NULL)
ot->name = octstr_duplicate(ot->username);
forced_smsc = cfg_get(grp, octstr_imm("forced-smsc"));
default_smsc = cfg_get(grp, octstr_imm("default-smsc"));
if (forced_smsc != NULL) {
if (default_smsc != NULL) {
info(0, "Redundant default-smsc for send-sms user %s",
octstr_get_cstr(ot->username));
}
ot->forced_smsc = forced_smsc;
octstr_destroy(default_smsc);
} else if (default_smsc != NULL)
ot->default_smsc = default_smsc;
ot->deny_ip = cfg_get(grp, octstr_imm("user-deny-ip"));
ot->allow_ip = cfg_get(grp, octstr_imm("user-allow-ip"));
ot->default_sender = cfg_get(grp, octstr_imm("default-sender"));
}
ot->allowed_prefix = cfg_get(grp, octstr_imm("allowed-prefix"));
allowed_prefix_regex = cfg_get(grp, octstr_imm("allowed-prefix-regex"));
if (allowed_prefix_regex != NULL) {
if ((ot->allowed_prefix_regex = gw_regex_comp(allowed_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_prefix_regex));
octstr_destroy(allowed_prefix_regex);
}
ot->denied_prefix = cfg_get(grp, octstr_imm("denied-prefix"));
denied_prefix_regex = cfg_get(grp, octstr_imm("denied-prefix-regex"));
if (denied_prefix_regex != NULL) {
if ((ot->denied_prefix_regex = gw_regex_comp(denied_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(denied_prefix_regex));
octstr_destroy(denied_prefix_regex);
}
os = cfg_get(grp, octstr_imm("white-list"));
if (os != NULL) {
ot->white_list = numhash_create(octstr_get_cstr(os));
octstr_destroy(os);
}
white_list_regex = cfg_get(grp, octstr_imm("white-list-regex"));
if (white_list_regex != NULL) {
if ((ot->white_list_regex = gw_regex_comp(white_list_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(white_list_regex));
octstr_destroy(white_list_regex);
}
os = cfg_get(grp, octstr_imm("black-list"));
if (os != NULL) {
ot->black_list = numhash_create(octstr_get_cstr(os));
octstr_destroy(os);
}
black_list_regex = cfg_get(grp, octstr_imm("black-list-regex"));
if (black_list_regex != NULL) {
if ((ot->black_list_regex = gw_regex_comp(black_list_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(black_list_regex));
octstr_destroy(black_list_regex);
}
if (cfg_get_integer(&ot->max_messages, grp, octstr_imm("max-messages")) == -1)
ot->max_messages = 1;
cfg_get_bool(&ot->concatenation, grp, octstr_imm("concatenation"));
cfg_get_bool(&ot->omit_empty, grp, octstr_imm("omit-empty"));
ot->header = cfg_get(grp, octstr_imm("header"));
ot->footer = cfg_get(grp, octstr_imm("footer"));
ot->faked_sender = cfg_get(grp, octstr_imm("faked-sender"));
ot->split_chars = cfg_get(grp, octstr_imm("split-chars"));
ot->split_suffix = cfg_get(grp, octstr_imm("split-suffix"));
if ( (ot->prefix == NULL && ot->suffix != NULL) ||
(ot->prefix != NULL && ot->suffix == NULL) ) {
warning(0, "Service : suffix and prefix are only used"
" if both are set.");
}
if ((ot->prefix != NULL || ot->suffix != NULL) &&
ot->type != TRANSTYPE_GET_URL) {
warning(0, "Service : suffix and prefix are only used"
" if type is 'get-url'.");
}
return ot;
error:
error(0, "Couldn't create a URLTranslation.");
destroy_onetrans(ot);
return NULL;
}
/*
* Create one URLTranslation. Return NULL for failure, pointer to it for OK.
*/
static URLTranslation *create_onetrans(CfgGroup *grp)
{
URLTranslation *ot;
Octstr *aliases, *url, *post_url, *post_xml, *text, *file, *exec;
Octstr *accepted_smsc, *forced_smsc, *default_smsc;
Octstr *grpname, *sendsms_user, *sms_service;
int is_sms_service;
Octstr *accepted_smsc_regex;
Octstr *allowed_prefix_regex;
Octstr *denied_prefix_regex;
Octstr *allowed_receiver_prefix_regex;
Octstr *denied_receiver_prefix_regex;
Octstr *white_list_regex;
Octstr *black_list_regex;
Octstr *keyword_regex;
Octstr *os;
grpname = cfg_get_group_name(grp);
if (grpname == NULL)
return NULL;
sms_service = octstr_imm("sms-service");
sendsms_user = octstr_imm("sendsms-user");
if (octstr_compare(grpname, sms_service) == 0)
is_sms_service = 1;
else if (octstr_compare(grpname, sendsms_user) == 0)
is_sms_service = 0;
else {
octstr_destroy(grpname);
return NULL;
}
octstr_destroy(grpname);
ot = gw_malloc(sizeof(URLTranslation));
ot->keyword = NULL;
ot->aliases = NULL;
ot->pattern = NULL;
ot->prefix = NULL;
ot->suffix = NULL;
ot->faked_sender = NULL;
ot->default_sender = NULL;
ot->split_chars = NULL;
ot->split_suffix = NULL;
ot->footer = NULL;
ot->header = NULL;
ot->name = NULL;
ot->username = NULL;
ot->password = NULL;
ot->omit_empty = 0;
ot->accepted_smsc = NULL;
ot->forced_smsc = NULL;
ot->default_smsc = NULL;
ot->allow_ip = NULL;
ot->deny_ip = NULL;
ot->allowed_prefix = NULL;
ot->denied_prefix = NULL;
ot->allowed_recv_prefix = NULL;
ot->denied_recv_prefix = NULL;
ot->white_list = NULL;
ot->black_list = NULL;
ot->keyword_regex = NULL;
ot->accepted_smsc_regex = NULL;
ot->allowed_prefix_regex = NULL;
ot->denied_prefix_regex = NULL;
ot->allowed_receiver_prefix_regex = NULL;
ot->denied_receiver_prefix_regex = NULL;
ot->white_list_regex = NULL;
ot->black_list_regex = NULL;
if (is_sms_service) {
cfg_get_bool(&ot->catch_all, grp, octstr_imm("catch-all"));
ot->dlr_url = cfg_get(grp, octstr_imm("dlr-url"));
url = cfg_get(grp, octstr_imm("get-url"));
if (url == NULL)
url = cfg_get(grp, octstr_imm("url"));
post_url = cfg_get(grp, octstr_imm("post-url"));
post_xml = cfg_get(grp, octstr_imm("post-xml"));
file = cfg_get(grp, octstr_imm("file"));
text = cfg_get(grp, octstr_imm("text"));
exec = cfg_get(grp, octstr_imm("exec"));
if (url != NULL) {
ot->type = TRANSTYPE_GET_URL;
ot->pattern = url;
} else if (post_url != NULL) {
ot->type = TRANSTYPE_POST_URL;
ot->pattern = post_url;
ot->catch_all = 1;
} else if (post_xml != NULL) {
ot->type = TRANSTYPE_POST_XML;
ot->pattern = post_xml;
ot->catch_all = 1;
} else if (file != NULL) {
ot->type = TRANSTYPE_FILE;
ot->pattern = file;
} else if (text != NULL) {
ot->type = TRANSTYPE_TEXT;
ot->pattern = text;
} else if (exec != NULL) {
ot->type = TRANSTYPE_EXECUTE;
ot->pattern = exec;
} else {
error(0, "Configuration group `sms-service' "
"did not specify get-url, post-url, post-xml, file or text.");
goto error;
}
ot->keyword = cfg_get(grp, octstr_imm("keyword"));
if (ot->keyword == NULL) {
error(0, "Group 'sms-service' must include 'keyword'.");
goto error;
}
octstr_convert_range(ot->keyword, 0, octstr_len(ot->keyword),
tolower);
keyword_regex = cfg_get(grp, octstr_imm("keyword-regex"));
if (keyword_regex != NULL) {
if ((ot->keyword_regex = gw_regex_comp(keyword_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(keyword_regex));
octstr_destroy(keyword_regex);
}
ot->name = cfg_get(grp, octstr_imm("name"));
if (ot->name == NULL)
ot->name = octstr_duplicate(ot->keyword);
aliases = cfg_get(grp, octstr_imm("aliases"));
if (aliases == NULL)
ot->aliases = list_create();
else {
long i;
Octstr *os;
ot->aliases = octstr_split(aliases, octstr_imm(";"));
octstr_destroy(aliases);
for (i = 0; i < list_len(ot->aliases); ++i) {
os = list_get(ot->aliases, i);
octstr_convert_range(os, 0, octstr_len(os), tolower);
}
}
accepted_smsc = cfg_get(grp, octstr_imm("accepted-smsc"));
if (accepted_smsc != NULL) {
ot->accepted_smsc = octstr_split(accepted_smsc, octstr_imm(";"));
octstr_destroy(accepted_smsc);
}
accepted_smsc_regex = cfg_get(grp, octstr_imm("accepted-smsc-regex"));
if (accepted_smsc_regex != NULL) {
if ( (ot->accepted_smsc_regex = gw_regex_comp(accepted_smsc_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(accepted_smsc_regex));
octstr_destroy(accepted_smsc_regex);
}
cfg_get_bool(&ot->assume_plain_text, grp,
octstr_imm("assume-plain-text"));
cfg_get_bool(&ot->accept_x_kannel_headers, grp,
octstr_imm("accept-x-kannel-headers"));
cfg_get_bool(&ot->strip_keyword, grp, octstr_imm("strip-keyword"));
cfg_get_bool(&ot->send_sender, grp, octstr_imm("send-sender"));
ot->prefix = cfg_get(grp, octstr_imm("prefix"));
ot->suffix = cfg_get(grp, octstr_imm("suffix"));
ot->allowed_recv_prefix = cfg_get(grp, octstr_imm("allowed-receiver-prefix"));
allowed_receiver_prefix_regex = cfg_get(grp, octstr_imm("allowed-receiver-prefix-regex"));
if (allowed_receiver_prefix_regex != NULL) {
if ((ot->allowed_receiver_prefix_regex = gw_regex_comp(allowed_receiver_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_receiver_prefix_regex));
octstr_destroy(allowed_receiver_prefix_regex);
}
ot->allowed_recv_prefix = cfg_get(grp, octstr_imm("allowed-receiver-prefix"));
ot->denied_recv_prefix = cfg_get(grp, octstr_imm("denied-receiver-prefix"));
denied_receiver_prefix_regex = cfg_get(grp, octstr_imm("denied-receiver-prefix-regex"));
if (denied_receiver_prefix_regex != NULL) {
if ((ot->denied_receiver_prefix_regex = gw_regex_comp(denied_receiver_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'",octstr_get_cstr(denied_receiver_prefix_regex));
octstr_destroy(denied_receiver_prefix_regex);
}
ot->args = count_occurences(ot->pattern, octstr_imm("%s"));
ot->args += count_occurences(ot->pattern, octstr_imm("%S"));
ot->has_catchall_arg =
(count_occurences(ot->pattern, octstr_imm("%r")) > 0) ||
(count_occurences(ot->pattern, octstr_imm("%a")) > 0);
} else {
ot->type = TRANSTYPE_SENDSMS;
ot->pattern = octstr_create("");
ot->args = 0;
ot->has_catchall_arg = 0;
ot->catch_all = 1;
ot->username = cfg_get(grp, octstr_imm("username"));
ot->password = cfg_get(grp, octstr_imm("password"));
ot->dlr_url = cfg_get(grp, octstr_imm("dlr-url"));
if (ot->password == NULL) {
error(0, "Password required for send-sms user");
goto error;
}
ot->name = cfg_get(grp, octstr_imm("name"));
if (ot->name == NULL)
ot->name = octstr_duplicate(ot->username);
forced_smsc = cfg_get(grp, octstr_imm("forced-smsc"));
default_smsc = cfg_get(grp, octstr_imm("default-smsc"));
if (forced_smsc != NULL) {
if (default_smsc != NULL) {
info(0, "Redundant default-smsc for send-sms user %s",
octstr_get_cstr(ot->username));
}
ot->forced_smsc = forced_smsc;
octstr_destroy(default_smsc);
} else if (default_smsc != NULL)
ot->default_smsc = default_smsc;
ot->deny_ip = cfg_get(grp, octstr_imm("user-deny-ip"));
ot->allow_ip = cfg_get(grp, octstr_imm("user-allow-ip"));
ot->default_sender = cfg_get(grp, octstr_imm("default-sender"));
}
ot->allowed_prefix = cfg_get(grp, octstr_imm("allowed-prefix"));
allowed_prefix_regex = cfg_get(grp, octstr_imm("allowed-prefix-regex"));
if (allowed_prefix_regex != NULL) {
if ((ot->allowed_prefix_regex = gw_regex_comp(allowed_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(allowed_prefix_regex));
octstr_destroy(allowed_prefix_regex);
}
ot->denied_prefix = cfg_get(grp, octstr_imm("denied-prefix"));
denied_prefix_regex = cfg_get(grp, octstr_imm("denied-prefix-regex"));
if (denied_prefix_regex != NULL) {
if ((ot->denied_prefix_regex = gw_regex_comp(denied_prefix_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(denied_prefix_regex));
octstr_destroy(denied_prefix_regex);
}
os = cfg_get(grp, octstr_imm("white-list"));
if (os != NULL) {
ot->white_list = numhash_create(octstr_get_cstr(os));
octstr_destroy(os);
}
white_list_regex = cfg_get(grp, octstr_imm("white-list-regex"));
if (white_list_regex != NULL) {
if ((ot->white_list_regex = gw_regex_comp(white_list_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(white_list_regex));
octstr_destroy(white_list_regex);
}
os = cfg_get(grp, octstr_imm("black-list"));
if (os != NULL) {
ot->black_list = numhash_create(octstr_get_cstr(os));
octstr_destroy(os);
}
black_list_regex = cfg_get(grp, octstr_imm("black-list-regex"));
if (black_list_regex != NULL) {
if ((ot->black_list_regex = gw_regex_comp(black_list_regex, REG_EXTENDED)) == NULL)
panic(0, "Could not compile pattern '%s'", octstr_get_cstr(black_list_regex));
octstr_destroy(black_list_regex);
}
if (cfg_get_integer(&ot->max_messages, grp,
octstr_imm("max-messages")) == -1)
ot->max_messages = 1;
cfg_get_bool(&ot->concatenation, grp,
octstr_imm("concatenation"));
cfg_get_bool(&ot->omit_empty, grp,
octstr_imm("omit-empty"));
ot->header = cfg_get(grp, octstr_imm("header"));
ot->footer = cfg_get(grp, octstr_imm("footer"));
ot->faked_sender = cfg_get(grp, octstr_imm("faked-sender"));
ot->split_chars = cfg_get(grp, octstr_imm("split-chars"));
ot->split_suffix = cfg_get(grp, octstr_imm("split-suffix"));
if ( (ot->prefix == NULL && ot->suffix != NULL) ||
(ot->prefix != NULL && ot->suffix == NULL) ) {
warning(0, "Service <%s>: suffix and prefix are only used"
" if both are set.", octstr_get_cstr(ot->keyword));
}
if ((ot->prefix != NULL || ot->suffix != NULL) &&
ot->type != TRANSTYPE_GET_URL) {
warning(0, "Service <%s>: suffix and prefix are only used"
" if type is 'get-url'.", octstr_get_cstr(ot->keyword));
}
return ot;
error:
error(0, "Couldn't create a URLTranslation.");
destroy_onetrans(ot);
return NULL;
}
