static void httpadmin_run(void *arg)
{
HTTPClient *client;
Octstr *ip, *url, *body;
List *headers, *cgivars;
while(bb_status != BB_DEAD) {
if (bb_status == BB_SHUTDOWN)
bb_shutdown();
client = http_accept_request(ha_port, &ip, &url, &headers, &body,
&cgivars);
if (client == NULL)
break;
if (is_allowed_ip(ha_allow_ip, ha_deny_ip, ip) == 0) {
info(0, "HTTP admin tried from denied host <%s>, disconnected",
octstr_get_cstr(ip));
http_close_client(client);
continue;
}
httpd_serve(client, url, headers, body, cgivars);
octstr_destroy(ip);
}
httpadmin_running = 0;
}
int main(void)
{
Octstr *ip;
Octstr *allowed;
Octstr *denied;
int result;
int i;
static struct {
char *allowed;
char *denied;
char *ip;
int should_be_allowed;
} tab[] = {
{ "127.0.0.1", "", "127.0.0.1", 1 },
{ "127.0.0.1", "", "127.0.0.2", 1 },
{ "127.0.0.1", "*.*.*.*", "127.0.0.1", 1 },
{ "127.0.0.1", "*.*.*.*", "1.2.3.4", 0 },
{ "127.0.0.1", "127.0.0.*", "1.2.3.4", 1 },
{ "127.0.0.1", "127.0.0.*", "127.0.0.2", 0 },
};
gwlib_init();
log_set_output_level(GW_INFO);
for (i = 0; (size_t) i < sizeof(tab) / sizeof(tab[0]); ++i) {
allowed = octstr_imm(tab[i].allowed);
denied = octstr_imm(tab[i].denied);
ip = octstr_imm(tab[i].ip);
result = is_allowed_ip(allowed, denied, ip);
if (!!result != !!tab[i].should_be_allowed) {
panic(0, "is_allowed_ip did not work for "
"allowed=<%s> denied=<%s> ip=<%s>, "
"returned %d should be %d",
octstr_get_cstr(allowed),
octstr_get_cstr(denied),
octstr_get_cstr(ip),
result,
tab[i].should_be_allowed);
}
}
gwlib_shutdown();
return 0;
}
static Boxc *accept_boxc(int fd, int ssl)
{
Boxc *newconn;
Octstr *ip;
int newfd;
struct sockaddr_in client_addr;
socklen_t client_addr_len;
client_addr_len = sizeof(client_addr);
newfd = accept(fd, (struct sockaddr *)&client_addr, &client_addr_len);
if (newfd < 0)
return NULL;
ip = host_ip(client_addr);
if (is_allowed_ip(box_allow_ip, box_deny_ip, ip) == 0) {
info(0, "Box connection tried from denied host <%s>, disconnected",
octstr_get_cstr(ip));
octstr_destroy(ip);
close(newfd);
return NULL;
}
newconn = boxc_create(newfd, ip, ssl);
/*
* check if the SSL handshake was successfull, otherwise
* this is no valid box connection any more
*/
#ifdef HAVE_LIBSSL
if (ssl && !conn_get_ssl(newconn->conn))
return NULL;
#endif
info(0, "Client connected from <%s> %s", octstr_get_cstr(ip), ssl?"using SSL":"");
/* XXX TODO: do the hand-shake, baby, yeah-yeah! */
return newconn;
}
static void udp_receiver(void *arg)
{
Octstr *datagram, *cliaddr;
int ret;
Msg *msg;
Udpc *conn = arg;
Octstr *ip;
gwlist_add_producer(incoming_wdp);
gwlist_add_producer(flow_threads);
gwthread_wakeup(MAIN_THREAD_ID);
/* remove messages from socket until it is closed */
while (bb_status != BB_DEAD && bb_status != BB_SHUTDOWN) {
gwlist_consume(isolated); /* block here if suspended/isolated */
if (read_available(conn->fd, 100000) < 1)
continue;
ret = udp_recvfrom(conn->fd, &datagram, &cliaddr);
if (ret == -1) {
if (errno == EAGAIN)
/* No datagram available, don't block. */
continue;
error(errno, "Failed to receive an UDP");
/*
* just continue, or is there ANY error that would result
* in situation where it would be better to break; or even
* die off? - Kalle 28.2
*/
continue;
}
/* discard the message if the client is not allowed */
ip = udp_get_ip(cliaddr);
if (!is_allowed_ip(allow_ip, deny_ip, ip)) {
warning(0, "UDP: Discarding packet from %s, IP is denied.",
octstr_get_cstr(ip));
octstr_destroy(datagram);
} else {
debug("bb.udp", 0, "datagram received");
msg = msg_create(wdp_datagram);
msg->wdp_datagram.source_address = udp_get_ip(cliaddr);
msg->wdp_datagram.source_port = udp_get_port(cliaddr);
msg->wdp_datagram.destination_address = udp_get_ip(conn->addr);
msg->wdp_datagram.destination_port = udp_get_port(conn->addr);
msg->wdp_datagram.user_data = datagram;
gwlist_produce(incoming_wdp, msg);
counter_increase(incoming_wdp_counter);
}
octstr_destroy(cliaddr);
octstr_destroy(ip);
}
gwlist_remove_producer(incoming_wdp);
gwlist_remove_producer(flow_threads);
}
void mmsc_receive_func(MmscGrp *m)
{
int i;
MmsBoxHTTPClientInfo h = {NULL};
List *mmsc_incoming_reqs = gwlist_create();
long *thids = gw_malloc((maxthreads + 1)*sizeof thids[0]);
gwlist_add_producer(mmsc_incoming_reqs);
for (i = 0; i<maxthreads; i++)
thids[i] = gwthread_create((gwthread_func_t *)dispatch_mm7_recv, mmsc_incoming_reqs);
h.m = m;
while(rstop == 0 &&
(h.client = http_accept_request(m->incoming.port,
&h.ip, &h.url, &h.headers,
&h.body, &h.cgivars)) != NULL)
if (is_allowed_ip(m->incoming.allow_ip, m->incoming.deny_ip, h.ip)) {
MmsBoxHTTPClientInfo *hx = gw_malloc(sizeof hx[0]);
h.ua = http_header_value(h.headers, octstr_imm("User-Agent"));
*hx = h;
debug("mmsbox", 0,
" MM7 Incoming, IP=[%s], MMSC=[%s], dest_port=[%ld] ",
h.ip ? octstr_get_cstr(h.ip) : "",
octstr_get_cstr(m->id),
m->incoming.port);
/* Dump headers, url etc. */
#if 0
http_header_dump(h.headers);
if (h.body) octstr_dump(h.body, 0);
if (h.ip) octstr_dump(h.ip, 0);
#endif
gwlist_produce(mmsc_incoming_reqs, hx);
} else {
h.ua = http_header_value(h.headers, octstr_imm("User-Agent"));
mms_error_ex("auth",0, "MM7", m->id, "HTTP: Incoming IP denied MMSC[%s] ip=[%s], ua=[%s], disconnected",
m->id ? octstr_get_cstr(m->id) : "(none)",
h.ip ? octstr_get_cstr(h.ip) : "(none)",
h.ua ? octstr_get_cstr(h.ua) : "(none)");
http_send_reply(h.client, HTTP_FORBIDDEN, NULL,
octstr_imm("Access denied."));
free_mmsbox_http_clientInfo(&h, 0);
}
debug("proxy", 0, "MMSBox: MM7 receiver [mmc=%s] Shutting down...", octstr_get_cstr(m->id));
gwlist_remove_producer(mmsc_incoming_reqs);
for (i = 0; i<maxthreads; i++)
if (thids[i] >= 0)
gwthread_join(thids[i]);
gwlist_destroy(mmsc_incoming_reqs, NULL);
gw_free(thids);
debug("proxy", 0, "MMSBox: MM7 receiver [mmc=%s] Shutting down complete.", octstr_get_cstr(m->id));
}
static void cgw_listener(void *arg)
{
SMSCConn *conn = arg;
PrivData *privdata = conn->data;
struct sockaddr_in server_addr;
socklen_t server_addr_len;
Octstr *ip;
Connection *server;
int s, ret;
/* Make sure we log into our own log-file if defined */
log_thread_to(conn->log_idx);
while (!privdata->shutdown) {
server_addr_len = sizeof(server_addr);
ret = gwthread_pollfd(privdata->listening_socket, POLLIN, -1);
if (ret == -1) {
if (errno == EINTR)
continue;
error(0, "Poll for cgw smsc connections failed, shutting down");
break;
}
if (privdata->shutdown)
break;
if (ret == 0) /* This thread was woken up from elsewhere, but
* if we're not shutting down nothing to do here. */
continue;
s = accept(privdata->listening_socket, (struct sockaddr *) & server_addr,
&server_addr_len);
if (s == -1) {
warning(errno, "cgw_listener: accept() failed, retrying...");
continue;
}
ip = host_ip(server_addr);
if (!is_allowed_ip(privdata->allow_ip, privdata->deny_ip, ip)) {
info(0, "CGW smsc connection tried from denied host <%s>, disconnected", octstr_get_cstr(ip));
octstr_destroy(ip);
close(s);
continue;
}
server = conn_wrap_fd(s, 0);
if (server == NULL) {
error(0, "cgw_listener: conn_wrap_fd failed on accept()ed fd");
octstr_destroy(ip);
close(s);
continue;
}
conn_claim(server);
info(0, "cgw: smsc connected from %s", octstr_get_cstr(ip));
octstr_destroy(ip);
cgw_receiver(conn, server);
conn_destroy(server);
}
if (close(privdata->listening_socket) == -1)
warning(errno, "smsc_cgw: couldn't close listening socket at shutdown");
gwthread_wakeup(privdata->sender_thread);
}
static void fake_listener(void *arg)
{
SMSCConn *conn = arg;
PrivData *privdata = conn->data;
struct sockaddr_in client_addr;
socklen_t client_addr_len;
Octstr *ip;
Connection *client;
int s, ret;
Msg *msg;
/* Make sure we log into our own log-file if defined */
log_thread_to(conn->log_idx);
while (1) {
client_addr_len = sizeof(client_addr);
ret = gwthread_pollfd(privdata->listening_socket, POLLIN, -1);
if (ret == -1) {
if (errno == EINTR)
continue;
error(0, "Poll for fakesmsc connections failed, shutting down");
break;
}
if (privdata->shutdown)
break;
if (ret == 0)
/*
* This thread was woke up from elsewhere, but
* if we're not shutting down nothing to do here.
*/
continue;
s = accept(privdata->listening_socket, (struct sockaddr *)&client_addr,
&client_addr_len);
if (s == -1) {
warning(errno, "fake_listener: accept() failed, retrying...");
continue;
}
ip = host_ip(client_addr);
if (!is_allowed_ip(privdata->allow_ip, privdata->deny_ip, ip)) {
info(0, "Fakesmsc connection tried from denied host <%s>, "
"disconnected", octstr_get_cstr(ip));
octstr_destroy(ip);
close(s);
continue;
}
client = conn_wrap_fd(s, 0);
if (client == NULL) {
error(0, "fake_listener: conn_wrap_fd failed on accept()ed fd");
octstr_destroy(ip);
close(s);
continue;
}
conn_claim(client);
info(0, "Fakesmsc client connected from %s", octstr_get_cstr(ip));
octstr_destroy(ip);
mutex_lock(conn->flow_mutex);
conn->status = SMSCCONN_ACTIVE;
conn->connect_time = time(NULL);
mutex_unlock(conn->flow_mutex);
bb_smscconn_connected(conn);
main_connection_loop(conn, client);
if (privdata->shutdown)
break;
mutex_lock(conn->flow_mutex);
conn->status = SMSCCONN_RECONNECTING;
mutex_unlock(conn->flow_mutex);
while ((msg = gwlist_extract_first(privdata->outgoing_queue)) != NULL) {
bb_smscconn_send_failed(conn, msg, SMSCCONN_FAILED_TEMPORARILY, NULL);
}
}
if (close(privdata->listening_socket) == -1)
warning(errno, "smsc_fake: couldn't close listening socket at shutdown");
mutex_lock(conn->flow_mutex);
conn->status = SMSCCONN_DEAD;
while ((msg = gwlist_extract_first(privdata->outgoing_queue)) != NULL) {
bb_smscconn_send_failed(conn, msg, SMSCCONN_FAILED_SHUTDOWN, NULL);
}
gwlist_destroy(privdata->outgoing_queue, NULL);
octstr_destroy(privdata->allow_ip);
octstr_destroy(privdata->deny_ip);
gw_free(privdata);
conn->data = NULL;
mutex_unlock(conn->flow_mutex);
debug("bb.sms", 0, "smsc_fake connection has completed shutdown.");
bb_smscconn_killed();
}