269 lines
9.4 KiB
C
Executable File
269 lines
9.4 KiB
C
Executable File
/*
|
|
* Copyright (C) 2009 Mamadou Diop.
|
|
*
|
|
* Contact: Mamadou Diop <diopmamadou(at)doubango.org>
|
|
*
|
|
* This file is part of Open Source Doubango Framework.
|
|
*
|
|
* DOUBANGO is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* DOUBANGO is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with DOUBANGO.
|
|
*
|
|
*/
|
|
#include "message.h"
|
|
|
|
#include "tinysms.h" /* Binary SMS API*/
|
|
|
|
#include <ctype.h>
|
|
|
|
extern ctx_t* ctx;
|
|
extern const session_t* session_handle_cmd(cmd_type_t , const opts_L_t*);
|
|
|
|
tsk_bool_t is_valid_telnum(const tsip_uri_t* uri);
|
|
tsk_buffer_t* sms_submit(const tsip_uri_t* smsc, const tsip_uri_t* dest, const char* ascii_pay);
|
|
|
|
int message_handle_event(const tsip_event_t *_event)
|
|
{
|
|
const tsip_message_event_t* msg_event = TSIP_MESSAGE_EVENT(_event);
|
|
const session_t* session = tsk_null;
|
|
tsip_ssession_id_t sid;
|
|
int ret = 0;
|
|
|
|
/* Find associated session */
|
|
sid = tsip_ssession_get_id(_event->ss);
|
|
if(!(session = session_get_by_sid(ctx->sessions, sid))) {
|
|
if(tsip_ssession_have_ownership(_event->ss)) {
|
|
/* it's or own session and we fail to match it ==> should never happen */
|
|
TSK_DEBUG_ERROR("Failed to match session event.");
|
|
ret = -2;
|
|
goto bail;
|
|
}
|
|
else {
|
|
/* it's a "server-side-session" (incoming MESSAGE) */
|
|
session_t* _session;
|
|
if((_session = session_server_create(st_message, _event->ss)) && (session = _session)) {
|
|
tsk_list_push_back_data(ctx->sessions, (void**)&_session);
|
|
}
|
|
else {
|
|
TSK_DEBUG_ERROR("Failed to create \"sever-side-session\".");
|
|
ret = -3;
|
|
goto bail;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
switch(msg_event->type) {
|
|
case tsip_ao_message: { /* Answer to outgoing MESSAGE */
|
|
TSK_DEBUG_INFO("Event: Answer to outgoing MESSAGE. Code=%d", TSIP_RESPONSE_CODE(_event->sipmessage));
|
|
if(TSIP_RESPONSE_IS_2XX(_event->sipmessage)) {
|
|
TSK_DEBUG_INFO("Message successfully sent.");
|
|
}
|
|
break;
|
|
}
|
|
|
|
case tsip_i_message: { /* Incoming MESSAGE */
|
|
const char* content_type = TSIP_MESSAGE_CONTENT_TYPE(_event->sipmessage);
|
|
|
|
TSK_DEBUG_INFO("Event: Incoming MESSAGE.");
|
|
if(TSIP_MESSAGE_HAS_CONTENT(_event->sipmessage)) {
|
|
const tsk_buffer_t* content = TSIP_MESSAGE_CONTENT(_event->sipmessage);
|
|
TSK_DEBUG_INFO("MESSAGE Content-Type: %s", content_type);
|
|
TSK_DEBUG_INFO("MESSAGE Content: %s", content->data);
|
|
}
|
|
/* accept() the MESSAGE to terminate the dialog */
|
|
if(tsk_striequals("plain/text", content_type) || tsk_striequals("text/html", content_type)) {
|
|
tsip_api_common_accept(session->handle,
|
|
TSIP_ACTION_SET_HEADER("Info", "I've accept()ed your message"),// just for test
|
|
TSIP_ACTION_SET_NULL());
|
|
}
|
|
/* reject() the MESSAGE to terminate the dialog */
|
|
else {
|
|
tsip_api_common_reject(session->handle,
|
|
TSIP_ACTION_SET_HEADER("Info", "I've reject()ed your message"),// just for test
|
|
TSIP_ACTION_SET_HEADER("In-Reply-To", "apb03a0s09dkjdfglkj49112"),// just for test
|
|
TSIP_ACTION_SET_NULL());
|
|
}
|
|
break;
|
|
}
|
|
|
|
default: {
|
|
/* Any other event */
|
|
TSK_DEBUG_WARN("%d not a valid SIP Messaging event.", msg_event->type);
|
|
break;
|
|
}
|
|
}
|
|
|
|
bail:
|
|
return ret;
|
|
}
|
|
|
|
tsip_ssession_id_t message_handle_cmd(cmd_type_t cmd, const opts_L_t* opts)
|
|
{
|
|
const session_t* session = tsk_null;
|
|
const opt_t* opt;
|
|
tsip_ssession_id_t id = TSIP_SSESSION_INVALID_ID;
|
|
|
|
if(!(session = session_handle_cmd(cmd, opts))) {
|
|
goto bail;
|
|
}
|
|
else {
|
|
id = tsip_ssession_get_id(session->handle);
|
|
}
|
|
|
|
switch(cmd) {
|
|
case cmd_message: {
|
|
/* Send SIP MESSAGE */
|
|
tsip_action_handle_t* action_config = action_get_config(opts);
|
|
tsip_api_message_send_message(session->handle,
|
|
TSIP_ACTION_SET_CONFIG(action_config),
|
|
/* Any other TSIP_ACTION_SET_*() macros */
|
|
TSIP_ACTION_SET_NULL());
|
|
TSK_OBJECT_SAFE_FREE(action_config);
|
|
break;
|
|
}
|
|
case cmd_sms: {
|
|
/* Binary SMS (RP-DATA) */
|
|
const char* ascii_pay = tsk_null;
|
|
tsk_buffer_t* binary_pay = tsk_null;
|
|
if((opt = opt_get_by_type(opts, opt_smsc)) && !tsk_strnullORempty(opt->value)) {
|
|
tsip_uri_t* smsc = tsip_uri_parse(opt->value, tsk_strlen(opt->value));
|
|
tsip_uri_t* dest = tsk_null;
|
|
if(smsc) {
|
|
/* Valid phone number for the SMSC address? */
|
|
if(!is_valid_telnum(smsc)) {
|
|
TSK_DEBUG_ERROR("[%s] contains invalid telephone number", opt->value);
|
|
goto done;
|
|
}
|
|
tsip_ssession_set(session->handle,
|
|
TSIP_SSESSION_SET_TO(opt->value),
|
|
TSIP_SSESSION_SET_NULL());
|
|
|
|
/* Destination URI */
|
|
if((opt = opt_get_by_type(opts, opt_to)) && !tsk_strnullORempty(opt->value)) {
|
|
if((dest = tsip_uri_parse(opt->value, tsk_strlen(opt->value)))) {
|
|
if(!is_valid_telnum(dest)) {
|
|
TSK_DEBUG_ERROR("[%s] contains invalid telephone number", opt->value);
|
|
goto done;
|
|
}
|
|
}
|
|
else {
|
|
TSK_DEBUG_ERROR("[%s] is an invalid SIP/tel uri", opt->value);
|
|
goto done;
|
|
}
|
|
}
|
|
else {
|
|
TSK_DEBUG_ERROR("++sms command need --to");
|
|
goto done;
|
|
}
|
|
|
|
/* Payload? */
|
|
if((opt = opt_get_by_type(opts, opt_payload)) && !tsk_strnullORempty(opt->value)) {
|
|
ascii_pay = opt->value;
|
|
}
|
|
else {
|
|
TSK_DEBUG_ERROR("++sms command need --to");
|
|
goto done;
|
|
}
|
|
|
|
/* Create the binary content */
|
|
if(!(binary_pay = sms_submit(smsc, dest, ascii_pay))) {
|
|
TSK_DEBUG_ERROR("Failed to encode RP-DATA(SMS-SUBMIT) message.");
|
|
goto done;
|
|
}
|
|
|
|
/* Send the message */
|
|
tsip_api_message_send_message(session->handle,
|
|
/* TSIP_ACTION_SET_HEADER("Content-Type", "application/vnd.3gpp.sms"), */
|
|
/* TSIP_ACTION_SET_HEADER("Transfer-Encoding", "binary"),*/
|
|
TSIP_ACTION_SET_PAYLOAD(binary_pay->data, binary_pay->size),
|
|
TSIP_ACTION_SET_NULL());
|
|
|
|
done:
|
|
TSK_OBJECT_SAFE_FREE(binary_pay);
|
|
TSK_OBJECT_SAFE_FREE(dest);
|
|
TSK_OBJECT_SAFE_FREE(smsc);
|
|
}
|
|
else {
|
|
TSK_DEBUG_ERROR("[%s] is an invalid SIP/tel uri", opt->value);
|
|
break;
|
|
}
|
|
}
|
|
else {
|
|
TSK_DEBUG_ERROR("++sms command need --smsc");
|
|
break;
|
|
}
|
|
break;
|
|
}
|
|
default:
|
|
/* already handled by session_handle_cmd() */
|
|
break;
|
|
}
|
|
|
|
bail:
|
|
return id;
|
|
}
|
|
|
|
|
|
tsk_bool_t is_valid_telnum(const tsip_uri_t* uri)
|
|
{
|
|
tsk_size_t i;
|
|
tsk_size_t len;
|
|
|
|
if(!uri || tsk_strnullORempty(uri->user_name)) {
|
|
return tsk_false;
|
|
}
|
|
|
|
for(i = 0, len = tsk_strlen(uri->user_name); i<len; i++) {
|
|
if(uri->user_name[i] != '+' && !isdigit(uri->user_name[i])) {
|
|
return tsk_false;
|
|
}
|
|
}
|
|
return tsk_true;
|
|
}
|
|
|
|
tsk_buffer_t* sms_submit(const tsip_uri_t* smsc, const tsip_uri_t* dest, const char* ascii_pay)
|
|
{
|
|
static uint8_t mr = 0x00;
|
|
|
|
int ret;
|
|
tsk_buffer_t* buffer = tsk_null;
|
|
tsms_tpdu_submit_t* sms_submit = tsk_null;
|
|
tsms_rpdu_data_t* rp_data = tsk_null;
|
|
|
|
// create SMS-SUBMIT message
|
|
sms_submit = tsms_tpdu_submit_create(++mr, (const uint8_t*)smsc->user_name, (const uint8_t*)dest->user_name);
|
|
// Set content for SMS-SUBMIT
|
|
if((buffer = tsms_pack_to_7bit(ascii_pay))) {
|
|
if((ret = tsms_tpdu_submit_set_userdata(sms_submit, buffer, tsms_alpha_7bit))) {
|
|
goto bail;
|
|
}
|
|
TSK_OBJECT_SAFE_FREE(buffer);
|
|
}
|
|
// create Mobile Originated (MO) RP-DATA message
|
|
if((rp_data = tsms_rpdu_data_create_mo(mr, (const uint8_t*)smsc->user_name, TSMS_TPDU_MESSAGE(sms_submit)))) {
|
|
// serialize into a buffer
|
|
if((buffer = tsk_buffer_create_null())) {
|
|
ret = tsms_rpdu_data_serialize(rp_data, buffer);
|
|
}
|
|
}
|
|
|
|
bail:
|
|
if(ret) { /* Failed? */
|
|
TSK_OBJECT_SAFE_FREE(buffer);
|
|
}
|
|
TSK_OBJECT_SAFE_FREE(sms_submit);
|
|
TSK_OBJECT_SAFE_FREE(rp_data);
|
|
|
|
return buffer;
|
|
}
|