/*Create cell to control Subscriber Dialog States
This cell save this information:
- Dialog Id:
.Callid
.rem_tag
.local_tag
- expires
- Local_uri
- Remote_uri
- Notifier_uri
- INVITE's Callid
- Event body
- State
*/
int create_subscriber_cell(struct sip_msg* reply, struct parms_cb* params_cb){
str* callid = NULL;
int expires= 0;
struct to_body *pto= NULL, *pfrom = NULL;
int size_subs_cell;
int vsp_addr_len;
char *vsp_addr = "@vsp.com";
time_t rawtime;
int time_now;
struct sm_subscriber *subs_cell = NULL;
char *p;
unsigned int hash_code;
callid= (str*) pkg_malloc (sizeof (str));
if (callid == NULL) {
LM_ERR("--------------------------------------------------no more pkg memory\n");
return 0;
}
/*Verify repĺy is OK and get callid and expires from response*/
if ( !extract_reply_headers(reply, callid, expires)){
LM_ERR("fail in extract headers\n");
pkg_free(callid);
return 0;
}
/*get From header fields */
pfrom = get_from(reply);
LM_DBG("PFROM: %.*s \n ", pfrom->uri.len, pfrom->uri.s );
if( pfrom->tag_value.s ==NULL || pfrom->tag_value.len == 0){
LM_ERR("reply without tag value \n");
pkg_free(callid);
return 0;
}
/*get To header fields */
pto = get_to(reply);
LM_DBG("PTO: %.*s \n ", pto->uri.len, pto->uri.s );
if (pto == NULL || pto->error != PARSE_OK) {
LM_ERR("failed to parse TO header\n");
pkg_free(callid);
return 0;
}
// get source ip address that send INVITE
vsp_addr = ip_addr2a(&reply->rcv.src_ip);
vsp_addr_len = strlen(vsp_addr);
time(&rawtime);
time_now = (int)rawtime;
LM_DBG("TIME : %d \n", (int)rawtime );
/* build subscriber cell */
size_subs_cell = sizeof (struct sm_subscriber) + (2 * sizeof(struct dialog_id))
+ callid->len + pfrom->tag_value.len + pto->tag_value.len + pfrom->uri.len + pto->uri.len
+ params_cb->callid_ori.len + params_cb->event.len + params_cb->from_tag.len + vsp_addr_len + 9 ;
subs_cell = pkg_malloc(size_subs_cell + 1);
if (!subs_cell) {
LM_ERR("no more shm\n");
return 0;
}
memset(subs_cell, 0, size_subs_cell + 1);
subs_cell->expires = expires;
subs_cell->timeout = TIMER_N + time_now;
LM_DBG("SUBS_TIMEOUT: %d \n ", subs_cell->timeout );
subs_cell->version = -1;
subs_cell->dlg_id = (struct dialog_id*)(subs_cell + 1);
subs_cell->dlg_id->callid.len = callid->len;
subs_cell->dlg_id->callid.s = (char *) (subs_cell->dlg_id + 1);
memcpy(subs_cell->dlg_id->callid.s, callid->s, callid->len);
LM_DBG("SUBS_CALLID: %.*s \n ", subs_cell->dlg_id->callid.len, subs_cell->dlg_id->callid.s );
subs_cell->dlg_id->local_tag.len = pfrom->tag_value.len;
subs_cell->dlg_id->local_tag.s = (char *) (subs_cell->dlg_id + 1) + callid->len;
memcpy(subs_cell->dlg_id->local_tag.s, pfrom->tag_value.s, pfrom->tag_value.len);
LM_DBG("SUBS_FROM_TAG: %.*s \n ", subs_cell->dlg_id->local_tag.len, subs_cell->dlg_id->local_tag.s );
subs_cell->dlg_id->rem_tag.len = pto->tag_value.len;
subs_cell->dlg_id->rem_tag.s = (char *) (subs_cell->dlg_id + 1) + callid->len + pfrom->tag_value.len;
memcpy(subs_cell->dlg_id->rem_tag.s, pto->tag_value.s, pto->tag_value.len);
LM_DBG("SUBS_TO_TAG: %.*s \n ", subs_cell->dlg_id->rem_tag.len, subs_cell->dlg_id->rem_tag.s );
p = (char *)(subs_cell->dlg_id + 1) + callid->len + pfrom->tag_value.len + pto->tag_value.len;
subs_cell->call_dlg_id = (struct dialog_id*)p;
subs_cell->call_dlg_id->callid.len= params_cb->callid_ori.len;
subs_cell->call_dlg_id->callid.s = (char *) (subs_cell->call_dlg_id + 1);
memcpy(subs_cell->call_dlg_id->callid.s, params_cb->callid_ori.s, params_cb->callid_ori.len);
LM_DBG("SUBS_CALLID_ORI: %.*s \n ", subs_cell->call_dlg_id->callid.len, subs_cell->call_dlg_id->callid.s );
subs_cell->call_dlg_id->local_tag.len= params_cb->from_tag.len;
subs_cell->call_dlg_id->local_tag.s = (char *) (subs_cell->call_dlg_id + 1) + params_cb->callid_ori.len;
memcpy(subs_cell->call_dlg_id->local_tag.s, params_cb->from_tag.s, params_cb->from_tag.len);
LM_DBG("SUBS_FROMTAG_event: %.*s \n ", subs_cell->call_dlg_id->local_tag.len, subs_cell->call_dlg_id->local_tag.s );
subs_cell->loc_uri.len = pfrom->uri.len;
subs_cell->loc_uri.s = (char *) (subs_cell->call_dlg_id + 1) + params_cb->callid_ori.len + params_cb->from_tag.len;
memcpy(subs_cell->loc_uri.s,pfrom->uri.s,pfrom->uri.len);
LM_DBG("SUBS_LOC_URI: %.*s \n ", subs_cell->loc_uri.len, subs_cell->loc_uri.s );
subs_cell->rem_uri.len= pto->uri.len;
subs_cell->rem_uri.s = (char *) (subs_cell->call_dlg_id + 1) + params_cb->callid_ori.len + params_cb->from_tag.len + pfrom->uri.len;
memcpy(subs_cell->rem_uri.s, pto->uri.s, pto->uri.len);
LM_DBG("SUBS_REM_URI: %.*s \n ", subs_cell->rem_uri.len, subs_cell->rem_uri.s );
subs_cell->event.len= params_cb->event.len;
subs_cell->event.s = (char *) (subs_cell->call_dlg_id + 1) + params_cb->callid_ori.len + params_cb->from_tag.len + pfrom->uri.len + pto->uri.len;
memcpy(subs_cell->event.s, params_cb->event.s, params_cb->event.len);
LM_DBG("SUBS_EVENT: %.*s \n ", subs_cell->event.len, subs_cell->event.s );
subs_cell->contact.len = vsp_addr_len + 9;
subs_cell->contact.s = (char *) (subs_cell->call_dlg_id + 1) + params_cb->callid_ori.len + params_cb->from_tag.len + pfrom->uri.len + pto->uri.len + params_cb->event.len;
memcpy(subs_cell->contact.s, "sip:test@", 9);
memcpy(subs_cell->contact.s + 9, vsp_addr, vsp_addr_len);
LM_DBG("SUBS_CONTACT: %.*s \n ", subs_cell->contact.len, subs_cell->contact.s );
subs_cell->dlg_id->status = NOTIFY_WAIT;
hash_code= core_hash(&subs_cell->dlg_id->callid, 0, subst_size);
LM_DBG("********************************************HASH_CODE%d\n", hash_code);
if(insert_shtable(subs_htable, hash_code,subs_cell) == NULL){
LM_ERR("inserting new record in subs_htable\n");
}
pkg_free(subs_cell);
pkg_free(callid);
return 1;
}
/*Create cell to control Subscriber Dialog States
This cell save this information:
- Dialog Id:
.Callid
.to_tag
.from_tag
- expires
- Local_uri
- Remote_uri
- Notifier_uri
- INVITE's Callid
- Event body
- State
*/
int create_subscriber_cell(struct sip_msg* reply, struct parms_cb* params_cb){
str* callid = NULL;
int expires= 0;
struct to_body *pto= NULL, *pfrom = NULL;
int size_subs_cell;
struct sm_subscriber *new_cell = NULL;
int vsp_addr_len;
char *vsp_addr = "@vsp.com";
time_t rawtime;
int time_now;
struct sm_subscriber *subs_cell = NULL;
callid= (str*) pkg_malloc (sizeof (str));
if (callid == NULL) {
LM_ERR("--------------------------------------------------no more pkg memory\n");
return 0;
}
/*Verify repĺy is OK and get callid and expires from response*/
if ( !extract_reply_headers(reply, callid, expires)){
LM_ERR("fail in extract headers\n");
return 0;
}
/*get From header fields */
pfrom = get_from(reply);
LM_INFO("PFROM: %.*s \n ", pfrom->uri.len, pfrom->uri.s );
if( pfrom->tag_value.s ==NULL || pfrom->tag_value.len == 0){
LM_ERR("reply without tag value \n");
return 0;
}
/*get To header fields */
pto = get_to(reply);
LM_INFO("PTO: %.*s \n ", pto->uri.len, pto->uri.s );
if (pto == NULL || pto->error != PARSE_OK) {
LM_ERR("failed to parse TO header\n");
return 0;
}
// get source ip address that send INVITE
vsp_addr = ip_addr2a(&reply->rcv.src_ip);
vsp_addr_len = strlen(vsp_addr);
time(&rawtime);
time_now = (int)rawtime;
LM_INFO("TIME : %d \n", (int)rawtime );
/* build subscriber cell */
size_subs_cell = sizeof (struct sm_subscriber) + callid->len + pfrom->tag_value.len + pto->tag_value.len + pfrom->uri.len + pto->uri.len + params_cb->callid_ori.len + params_cb->event.len + vsp_addr_len + 10 ;
subs_cell = shm_malloc(size_subs_cell + 1);
if (!subs_cell) {
LM_ERR("no more shm\n");
return 0;
}
memset(subs_cell, 0, size_subs_cell + 1);
subs_cell->expires = expires;
subs_cell->timeout = TIMER_B + time_now;
LM_INFO("SUBS_TIMEOUT: %d \n ", subs_cell->timeout );
subs_cell->dlg_id.callid.len = callid->len;
subs_cell->dlg_id.callid.s = (char *) (subs_cell + 1);
memcpy(subs_cell->dlg_id.callid.s, callid->s, callid->len);
LM_INFO("SUBS_CALLID: %.*s \n ", subs_cell->dlg_id.callid.len, subs_cell->dlg_id.callid.s );
subs_cell->dlg_id.from_tag.len = pfrom->tag_value.len;
subs_cell->dlg_id.from_tag.s = (char *) (subs_cell + 1) + callid->len;
memcpy(subs_cell->dlg_id.from_tag.s, pfrom->tag_value.s, pfrom->tag_value.len);
LM_INFO("SUBS_FROM_TAG: %.*s \n ", subs_cell->dlg_id.from_tag.len, subs_cell->dlg_id.from_tag.s );
subs_cell->dlg_id.to_tag.len = pto->tag_value.len;
subs_cell->dlg_id.to_tag.s = (char *) (subs_cell + 1) + callid->len + pfrom->tag_value.len;
memcpy(subs_cell->dlg_id.to_tag.s, pto->tag_value.s, pto->tag_value.len);
LM_INFO("SUBS_TO_TAG: %.*s \n ", subs_cell->dlg_id.to_tag.len, subs_cell->dlg_id.to_tag.s );
subs_cell->loc_uri.len = pfrom->uri.len;
subs_cell->loc_uri.s = (char *) (subs_cell + 1) + callid->len + pfrom->tag_value.len + pto->tag_value.len;
memcpy(subs_cell->loc_uri.s,pfrom->uri.s,pfrom->uri.len);
LM_INFO("SUBS_LOC_URI: %.*s \n ", subs_cell->loc_uri.len, subs_cell->loc_uri.s );
subs_cell->rem_uri.len= pto->uri.len;
subs_cell->rem_uri.s = (char *) (subs_cell + 1) + callid->len + pfrom->tag_value.len + pfrom->uri.len + pto->tag_value.len;
memcpy(subs_cell->rem_uri.s, pto->uri.s, pto->uri.len);
LM_INFO("SUBS_REM_URI: %.*s \n ", subs_cell->rem_uri.len, subs_cell->rem_uri.s );
subs_cell->callid_ori.len= params_cb->callid_ori.len;
subs_cell->callid_ori.s = (char *) (subs_cell + 1) + callid->len + pfrom->tag_value.len + pfrom->uri.len + pto->tag_value.len + pto->uri.len;
memcpy(subs_cell->callid_ori.s, params_cb->callid_ori.s, params_cb->callid_ori.len);
LM_INFO("SUBS_CALLID_ORI: %.*s \n ", subs_cell->callid_ori.len, subs_cell->callid_ori.s );
subs_cell->event.len= params_cb->event.len;
subs_cell->event.s = (char *) (subs_cell + 1) + callid->len + pfrom->tag_value.len + pfrom->uri.len + pto->tag_value.len + pto->uri.len + params_cb->callid_ori.len;
memcpy(subs_cell->event.s, params_cb->event.s, params_cb->event.len);
LM_INFO("SUBS_EVENT: %.*s \n ", subs_cell->event.len, subs_cell->event.s );
subs_cell->contact.len = vsp_addr_len + 10;
subs_cell->contact.s = (char *) (subs_cell + 1) + callid->len + pfrom->tag_value.len + pfrom->uri.len + pto->tag_value.len + pto->uri.len + params_cb->callid_ori.len + params_cb->event.len;
memcpy(subs_cell->contact.s, "sip:teste@", 10);
memcpy(subs_cell->contact.s + 10, vsp_addr, vsp_addr_len);
LM_INFO("SUBS_CONTACT: %.*s \n ", subs_cell->contact.len, subs_cell->contact.s );
subs_cell -> status = NOTIFY_WAIT;
/* push cell in Subscriber list linked */
if (new_cell != NULL) {
new_cell->next = subs_cell;
new_cell = subs_cell;
} else {
new_cell = subs_cell;
*subs_pt = new_cell;
}
pkg_free(callid);
return 1;
}
