static void smsbox_thread(void *arg)
{
Connection *conn;
Msg *msg;
Octstr *os;
Octstr *reply_msg;
unsigned long count;
msg = msg_create(sms);
msg->sms.sender = octstr_create("123");
msg->sms.receiver = octstr_create("456");
msg->sms.msgdata = octstr_create("hello world");
reply_msg = msg_pack(msg);
msg_destroy(msg);
gwthread_sleep(1.0);
conn = conn_open_tcp(bearerbox_host, port_for_smsbox, NULL);
if (conn == NULL) {
gwthread_sleep(2.0);
conn = conn_open_tcp(bearerbox_host, port_for_smsbox, NULL);
if (conn == NULL)
panic(0, "Couldn't connect to bearerbox as smsbox");
}
while (!quitting && conn_wait(conn, -1.0) != -1) {
for (;;) {
os = conn_read_withlen(conn);
if (os == NULL) {
if (conn_eof(conn) || conn_error(conn))
goto error;
break;
}
msg = msg_unpack(os);
if (msg == NULL || msg->type == wdp_datagram)
error(0, "Bearerbox sent garbage to smsbox");
if (msg->type == sms) {
if (first_from_bb == (time_t) -1)
time(&first_from_bb);
count = counter_increase(num_from_bearerbox) + 1;
debug("test.smpp", 0,
"Bearerbox sent sms #%ld <%s> to smsbox, sending reply.",
count, octstr_get_cstr(msg->sms.msgdata));
if (count == max_to_esme)
info(0, "Bearerbox has sent all messages to smsbox.");
conn_write_withlen(conn, reply_msg);
counter_increase(num_to_bearerbox);
}
msg_destroy(msg);
octstr_destroy(os);
time(&last_to_bb);
}
}
error:
conn_destroy(conn);
octstr_destroy(reply_msg);
debug("test.smpp", 0, "%s terminates.", __func__);
}
int main(int argc, char **argv)
{
Connection *conn;
Octstr *host = NULL;
int port, i;
gwlib_init();
get_and_set_debugs(argc, argv, NULL);
host = octstr_create(argv[1]);
port = atoi(argv[2]);
i = 50;
debug("",0,"Connecting to host '%s', port %d, looping %i times.",
octstr_get_cstr(host), port, i);
for (i = 0; i <= 50; i++) {
conn = conn_open_tcp(host, port, NULL);
if (conn == NULL) {
panic(0, "Couldn't connect.");
}
debug("",0,"%d: connected.", i);
gwthread_sleep(0.2);
debug("",0,"%d: closing.", i);
conn_destroy(conn);
}
octstr_destroy(host);
gwlib_shutdown();
return 0;
}
Connection *conn_open_ssl(Octstr *host, int port, Octstr *certkeyfile,
Octstr *our_host)
{
Connection *ret;
/* open the TCP connection */
if (!(ret = conn_open_tcp(host, port, our_host))) {
return NULL;
}
if (conn_init_client_ssl(ret, certkeyfile) == -1) {
conn_destroy(ret);
return NULL;
}
return ret;
}
Connection *connect_to_bearerbox_real(Octstr *host, int port, int ssl, Octstr *our_host)
{
Connection *conn;
#ifdef HAVE_LIBSSL
if (ssl)
conn = conn_open_ssl(host, port, NULL, our_host);
/* XXX add certkeyfile to be given to conn_open_ssl */
else
#endif /* HAVE_LIBSSL */
conn = conn_open_tcp(host, port, our_host);
if (conn == NULL)
return NULL;
if (ssl)
info(0, "Connected to bearerbox at %s port %d using SSL.",
octstr_get_cstr(host), port);
else
info(0, "Connected to bearerbox at %s port %d.",
octstr_get_cstr(host), port);
return conn;
}
/* The main program. */
int main(int argc, char **argv)
{
Connection *server;
Octstr *line;
Octstr **msgs;
int i;
int mptr, num_msgs;
long num_received, num_sent;
double first_received_at, last_received_at;
double first_sent_at, last_sent_at;
double start_time, end_time;
double delta;
int interactive, maxfd;
char *cptr;
char buffer[IN_BUFSIZE];
fd_set rset;
struct timeval alarm;
FILE *fp;
gwlib_init();
setup_signal_handlers();
host = octstr_create("localhost");
start_time = get_current_time();
mptr = get_and_set_debugs(argc, argv, check_args);
num_msgs = argc - mptr;
interactive = 0;
msgs = NULL;
fp = NULL;
if (num_msgs <= 0) {
interactive = 1;
num_msgs = 0;
info(0, "Entering interactive mode. Type your message on the command line");
/* set up file pointer to stdin */
fp = stdin;
/* initialize set for select */
FD_ZERO(&rset);
} else {
msgs = gw_malloc(sizeof(Octstr *) * num_msgs);
for (i = 0; i < num_msgs; i ++) {
msgs[i] = octstr_create(argv[mptr + i]);
octstr_append_char(msgs[i], 10); /* End of line */
}
info(0, "Host %s Port %d interval %.3f max-messages %ld",
octstr_get_cstr(host), port, interval, max_send);
srand((unsigned int) time(NULL));
}
info(0, "fakesmsc starting");
server = conn_open_tcp(host, port, NULL);
if (server == NULL)
panic(0, "Failed to open connection");
num_sent = 0;
num_received = 0;
first_received_at = 0;
first_sent_at = 0;
last_received_at = 0;
last_sent_at = 0;
/* infinitely loop */
while (1) {
/* Are we on interactive mode? */
if (interactive == 1) {
/* Check if we need to clean things up beforehand */
if ( num_msgs > 0 ) {
for (i = 0; i < num_msgs; i ++)
octstr_destroy(msgs[i]);
gw_free(msgs);
num_msgs = 0;
}
/* we want either the file pointer or timer */
FD_SET(fileno(fp), &rset);
/* get the largest file descriptor */
maxfd = fileno(fp) + 1;
/* set timer to go off in 3 seconds */
alarm.tv_sec = IN_TIMEOUT;
alarm.tv_usec = 0;
if (select(maxfd, &rset, NULL, NULL, &alarm) == -1)
goto over;
/* something went off, let's see if it's stdin */
if (FD_ISSET(fileno(fp), &rset)) { /* stdin is readable */
cptr = fgets(buffer, IN_BUFSIZE, stdin);
if( strlen( cptr ) < 2 )
goto rcv;
} else { /* timer kicked in */
goto rcv;
}
num_msgs = 1;
msgs = gw_malloc(sizeof(Octstr*));
msgs[0] = octstr_create(cptr);
}
/* if we still have something to send as MO message */
if (num_sent < max_send) {
Octstr *os = choose_message(msgs, num_msgs);
Octstr *msg = rnd > 0 ? randomize(os) : os;
if (conn_write(server, msg) == -1)
panic(0, "write failed");
++num_sent;
if (num_sent == max_send)
info(0, "fakesmsc: sent message %ld", num_sent);
else
debug("send", 0, "fakesmsc: sent message %ld", num_sent);
if (rnd > 0)
octstr_destroy(msg);
last_sent_at = get_current_time();
if (first_sent_at == 0)
first_sent_at = last_sent_at;
}
rcv:
do {
delta = interval * num_sent - (get_current_time() - first_sent_at);
if (delta < 0)
delta = 0;
if (num_sent >= max_send)
delta = -1;
conn_wait(server, delta);
if (conn_error(server) || conn_eof(server) || sigint_received)
goto over;
/* read as much as the smsc module provides us */
while ((line = conn_read_line(server))) {
last_received_at = get_current_time();
if (first_received_at == 0)
first_received_at = last_received_at;
++num_received;
if (num_received == max_send) {
info(0, "Got message %ld: <%s>", num_received,
octstr_get_cstr(line));
} else {
debug("receive", 0, "Got message %ld: <%s>", num_received,
octstr_get_cstr(line));
}
octstr_destroy(line);
}
} while (delta > 0 || num_sent >= max_send);
}
over:
conn_destroy(server);
/* destroy the MO messages */
for (i = 0; i < num_msgs; i ++)
octstr_destroy(msgs[i]);
gw_free(msgs);
end_time = get_current_time();
info(0, "fakesmsc: %ld messages sent and %ld received", num_sent, num_received);
info(0, "fakesmsc: total running time %.1f seconds", end_time - start_time);
delta = last_sent_at - first_sent_at;
if (delta == 0)
delta = .01;
if (num_sent > 1)
info(0, "fakesmsc: from first to last sent message %.1f s, "
"%.1f msgs/s", delta, (num_sent - 1) / delta);
delta = last_received_at - first_received_at;
if (delta == 0)
delta = .01;
if (num_received > 1)
info(0, "fakesmsc: from first to last received message %.1f s, "
"%.1f msgs/s", delta, (num_received - 1) / delta);
info(0, "fakesmsc: terminating");
return 0;
}
