int
Node::SndUserRegisterRequest(REG_TYPE type,
uinfo_t *user_info,
const char *registrar,
int expires)
{
char *message1;
unsigned int len = 0;
osip_message_t *request;
osip_event_t *sipevent;
osip_transaction_t *transaction;
osip_uri_t *uri;
char *tmp_uri;
int i;
i=osip_message_init(&request);
if(i!=0)
goto si2perror1;
osip_message_set_method(request,strdup("REGISTER"));
osip_message_set_version(request,strdup("SIP/2.0"));
osip_message_set_status_code(request,0);
osip_message_set_reason_phrase(request,NULL);
i=osip_uri_init(&uri);
if(i!=0)
goto si2perror2;
i=osip_uri_parse(uri,osip_strdup(registrar));
osip_message_set_uri(request,uri);
//*set to,from and header
if(type==USER_REGISTRATION)
{
char *dest1;
char *dest2;
osip_uri_to_str(user_info->aor->uri,&dest1);
i=osip_message_set_to(request,dest1);
i=osip_message_set_from(request,dest1);
if(dest1) osip_free(dest1) ;
osip_from_param_add (request->from, osip_strdup ("user"), osip_strdup("user_registration"));
osip_contact_to_str(user_info->bindings->contact,&dest2);
i=osip_message_set_contact(request,osip_strdup(dest2));
if(dest2) osip_free(dest2) ;
}
if(type == RED_REGISTER)
{
char *dest1;
char *dest2;
osip_uri_to_str(user_info->aor->uri,&dest1);
i=osip_message_set_to(request,dest1);
i=osip_message_set_from(request,dest1);
if(dest1) osip_free(dest1) ;
osip_from_param_add (request->from, osip_strdup ("user"), osip_strdup("red_register"));
osip_contact_to_str(user_info->bindings->contact,&dest2);
i=osip_message_set_contact(request,osip_strdup(dest2));
if(dest2) osip_free(dest2) ;
}
if(type==TRANSFER_REGISTRATION)
{
char *dest1;
char *dest2;
//string tmp_uri;
osip_uri_to_str(user_info->aor->uri,&dest1);
osip_message_set_to(request,dest1);
if(dest1) osip_free(dest1) ;
tmp_uri = ChordId2Uri(chordId,false);
osip_message_set_from(request,tmp_uri);
osip_from_param_add (request->from, osip_strdup ("user"), osip_strdup("transfer_registration"));
if(tmp_uri) osip_free(tmp_uri) ;
osip_contact_to_str(user_info->bindings->contact,&dest2);
osip_message_set_contact(request,dest2);
if(dest2) osip_free(dest2) ;
}
if(type==THIRD_PARTY)
{
//todo
}
//---set call_id and cseq
osip_call_id_t *callid;
osip_cseq_t *cseq;
char *num;
char *cidrand;
char *register_callid_number ;
//* call-id is always the same for REGISTRATIONS
i = osip_call_id_init(&callid);
if (i!=0)
goto si2perror2;
cidrand = osip_strdup("BF9598C48B184EBBAFADFE527EED8186") ;
osip_call_id_set_number(callid, cidrand);
register_callid_number = cidrand;
osip_call_id_set_host(callid, osip_strdup("SI2P.COM"));
request->call_id = callid;
//cseq
i = osip_cseq_init(&cseq);
if (i!=0)
goto si2perror2 ;
num = osip_strdup("1");
osip_cseq_set_number(cseq, num);
osip_cseq_set_method(cseq, osip_strdup("REGISTER"));
request->cseq = cseq;
//*the Max-Forward header
osip_message_set_max_forwards(request, "5"); //* a UA should start a request with 70
//* the via header
char tmp[200];
snprintf(tmp, 200, "SIP/2.0/%s %s:%s;rport;branch=z9hG4bK%u", "UDP",
localip,
localport,
via_branch_new_random() );
osip_message_set_via(request, tmp);
//* the UA header
osip_message_set_user_agent(request, user_agent);
//* the expires header
char exp[10]; //* MUST never be ouside 1 and 3600
snprintf(exp, 9, "%i", expires);
osip_message_set_expires(request, exp);
osip_message_set_content_length(request, "0");
//*** then must wake up osip
i = osip_transaction_init(&transaction,
NICT,
adosip->j_osip,
request);
if (i!=0)
goto si2perror3 ;
//* send REGISTER
i = osip_message_to_str(request, &message1, &len);
LogStream("SEND======================================>>\n") ;
LogStream(message1) ;
if(message1) osip_free(message1) ;
// printf("SEND======================================>>\n") ;
// printf(message1) ;
sipevent = osip_new_outgoing_sipmessage(request);
sipevent->transactionid = transaction->transactionid;
osip_message_force_update(request);
osip_transaction_add_event(transaction, sipevent);
adosip->ThreadWakeUp();
return 0;
si2perror1:
return -1;
si2perror2:
if(request!=NULL)
osip_message_free(request);
return -1;
si2perror3:
if(transaction!=NULL)
osip_message_free(request);
return -1;
}
/*
* SIP_REWRITE_CONTACT
*
* rewrite the Contact header
*
* RETURNS
* STS_SUCCESS on success
* STS_FAILURE on error
*/
int sip_rewrite_contact (sip_ticket_t *ticket, int direction,
struct in_addr *local_ip) {
osip_message_t *sip_msg=ticket->sipmsg;
osip_contact_t *contact;
int i;
#if UNREG_WITHOUT_REG_HG522
char tmpUserName[128] = {0};
char tmpPort[6] = {0};
#endif
if (sip_msg == NULL) return STS_FAILURE;
osip_message_get_contact(sip_msg, 0, &contact);
if (contact == NULL)
{
printsip("sip: rewrite_contact contact is NULL \r\n");
return STS_FAILURE;
}
for (i=0;i<URLMAP_SIZE;i++){
if (urlmap[i].active == 0) continue;
if ((direction == DIR_OUTGOING) &&
(compare_url(contact->url, urlmap[i].true_url)==STS_SUCCESS)) break;
if ((direction == DIR_INCOMING) &&
(compare_url(contact->url, urlmap[i].masq_url)==STS_SUCCESS)) break;
#if UNREG_WITHOUT_REG_HG522
if ((direction == DIR_OUTGOING) && (NULL != contact->url) && (NULL != urlmap[i].true_url)
&& (NULL != contact->url->host) && (NULL != urlmap[i].true_url->host)
&& (strcmp(contact->url->host, urlmap[i].true_url->host) == 0))
{
strcpy(tmpUserName, contact->url->username);
if (NULL != contact->url->port)
{
strncpy(tmpPort, contact->url->port, 6);
}
break;
}
#endif
}
/* found a mapping entry */
if (i<URLMAP_SIZE) {
char *tmp;
if (NULL != contact->url)
{
printsip("************* sip: rewrote Contact header %s@%s:%s -> %s@%s:%s \r\n",
(contact->url->username)? contact->url->username : "******",
(contact->url->host)? contact->url->host : "*NULL*",
(contact->url->port)? contact->url->port : "NULL port",
urlmap[i].masq_url->username, urlmap[i].masq_url->host,
(urlmap[i].masq_url->port)? urlmap[i].masq_url->port : "NULL port");
}
/* remove old entry */
osip_list_remove(sip_msg->contacts,0);
osip_contact_to_str(contact, &tmp);
osip_contact_free(contact);
/* clone the url from urlmap */
osip_contact_init(&contact);
osip_contact_parse(contact,tmp);
osip_free(tmp);
osip_uri_free(contact->url);
if (direction == DIR_OUTGOING) {
/* outgoing, use masqueraded url */
osip_uri_clone(urlmap[i].masq_url, &contact->url);
if (local_ip != NULL) {
char *ip = malloc(20);
strncpy(ip, inet_ntoa(*local_ip), 20);
free(contact->url->host);
contact->url->host = ip;
}
#if UNREG_WITHOUT_REG_HG522
if ('\0' != tmpUserName[0])
{
char *username = malloc(strlen(tmpUserName)+1);
strncpy(username, tmpUserName, strlen(tmpUserName)+1);
free(contact->url->username);
contact->url->username = username;
}
if ((NULL == urlmap[i].masq_url->port) && ('\0' != tmpPort[0]))
{
char *port = malloc(strlen(tmpPort)+1);
strncpy(port, tmpPort, strlen(tmpPort)+1);
contact->url->port = port;
}
#endif
} else {
/* incoming, use true url */
osip_uri_clone(urlmap[i].true_url, &contact->url);
printsip("incoming: osip_uri_clone from %s \r\n",
urlmap[i].true_url->host);
}
osip_list_add(sip_msg->contacts,contact,-1);
} else {
return STS_FAILURE;
}
return STS_SUCCESS;
}
int Node::SndResponse(int status ,
osip_message_t *request ,
osip_transaction_t *tr,
REG_TYPE type ,
ChordId contact,
BOOL IncludeSuccList)
{
char *message1;
size_t length = 0;
//
osip_generic_param_t *tag;
osip_message_t *response;
osip_event_t *evt ;
char *tmp;
char * tmp_uri;
int pos;
int i;
i = osip_message_init (&response);
if (i != 0)
return -1;
osip_message_set_version (response, osip_strdup ("SIP/2.0"));
osip_message_set_status_code (response, status);
tmp = osip_strdup(osip_message_get_reason (status));
if (tmp == NULL)
osip_message_set_reason_phrase (response, osip_strdup ("Unknown status code"));
else
osip_message_set_reason_phrase (response, tmp);
osip_message_set_method (response, NULL);
osip_message_set_uri (response, NULL);
i = osip_to_clone (request->to, &(response->to));
if (i != 0)
goto si2perror1;
i = osip_to_get_tag (response->to, &tag);
if (i != 0)
{ /* we only add a tag if it does not already contains one! */
if (status == 200 && MSG_IS_REGISTER (request))
{
osip_to_set_tag (response->to, osip_to_tag_new_random ());
}
else if (status >= 200)
{
osip_to_set_tag (response->to, osip_to_tag_new_random ());
}
}
i = osip_from_clone (request->from, &(response->from));
if (i != 0)
goto si2perror1;
pos = 0;
while (!osip_list_eol (request->vias, pos))
{
osip_via_t *via;
osip_via_t *via2;
via = (osip_via_t *) osip_list_get (request->vias, pos);
i = osip_via_clone (via, &via2);
if (i != -0)
goto si2perror1;
osip_list_add (response->vias, via2, -1);
pos++;
}
i = osip_call_id_clone (request->call_id, &(response->call_id));
if (i != 0)
goto si2perror1;
i = osip_cseq_clone (request->cseq, &(response->cseq));
if (i != 0)
goto si2perror1;
//set server
osip_message_set_server (response, osip_strdup ("SI2P"));
/*add contact*/
//predecessor
if(status == 200)
{
if(type == USER_REGISTRATION || type == TRANSFER_REGISTRATION || type == THIRD_PARTY)
{
osip_contact_t *tmp;
char *dest;
int pos=0;
while(pos<osip_list_size(request->contacts))
{
pos=osip_message_get_contact(request,0,&tmp);
osip_contact_to_str(tmp,&dest);
osip_message_set_contact(response,dest);
if(dest) osip_free(dest) ;
pos++;
}
}
else
{
tmp_uri = ChordId2Uri(chordId,false);
char * pre_uri = ChordId2Uri(getFingerTable()->getPredecessor(),false) ;
char *ctt = (char *) osip_malloc(strlen(tmp_uri) + strlen(";predecessor=") + strlen(pre_uri) +1) ;
if (ctt == NULL)
return NULL;
sprintf (ctt, "%s;predecessor=%s", tmp_uri,pre_uri);
osip_free(tmp_uri) ; osip_free(pre_uri) ;
osip_message_set_contact(response, ctt );
osip_free(ctt) ;
}
}
else//302
{
if(type == USER_REGISTRATION || type == TRANSFER_REGISTRATION || type == THIRD_PARTY)
{
tmp_uri = ChordId2Uri(contact,false);
osip_message_set_contact(response,tmp_uri );
osip_free(tmp_uri) ;
}
else
{
tmp_uri = ChordId2Uri(contact,false) ;
char *ctt = (char *) osip_malloc(strlen(tmp_uri) + strlen(";predecessor=notprovided") +1) ;
if (ctt == NULL)
return NULL;
sprintf (ctt, "%s;predecessor=notprovided", tmp_uri);
if(tmp_uri) osip_free(tmp_uri) ;
osip_message_set_contact(response, ctt );
if(tmp_uri) osip_free(ctt) ;
}
}
if(IncludeSuccList)
{
for(i = 0 ; i < getFingerTable()->getSuccNum() ; i++)
{
tmp_uri = ChordId2Uri(getFingerTable()->getSuccessor(i),false) ;
osip_message_set_contact(response, tmp_uri );
osip_free(tmp_uri) ;
}
}
i = osip_message_to_str(response, &message1, &length);
LogStream("SEND======================================>>\n") ;
LogStream(message1) ;
if(message1) osip_free(message1) ;
// printf("SEND======================================>>\n") ;
// printf(message1) ;
evt = osip_new_outgoing_sipmessage (response);
evt->transactionid = tr->transactionid;
osip_transaction_add_event(tr, evt);
adosip->ThreadWakeUp();
return 0;
si2perror1:
osip_message_free (response);
return -1;
}
/*
* SIP_REWRITE_CONTACT
*
* rewrite the Contact header
*
* RETURNS
* STS_SUCCESS on success
* STS_FAILURE on error
*/
int sip_rewrite_contact (sip_ticket_t *ticket, int direction) {
osip_message_t *sip_msg=ticket->sipmsg;
osip_contact_t *contact;
int i, j;
int replaced=0;
if (sip_msg == NULL) return STS_FAILURE;
/* at least one contact header present? */
osip_message_get_contact(sip_msg, 0, &contact);
if (contact == NULL) return STS_FAILURE;
/* loop for all existing contact headers in message */
for (j=0; contact != NULL; j++) {
osip_message_get_contact(sip_msg, j, &contact);
if (contact == NULL) break;
if (contact->url == NULL) continue;
/* search for an entry */
for (i=0;i<URLMAP_SIZE;i++){
if (urlmap[i].active == 0) continue;
if ((direction == DIR_OUTGOING) &&
(compare_url(contact->url, urlmap[i].true_url)==STS_SUCCESS)) break;
if ((direction == DIR_INCOMING) &&
(compare_url(contact->url, urlmap[i].masq_url)==STS_SUCCESS)) break;
}
/* found a mapping entry */
if (i<URLMAP_SIZE) {
char *tmp;
if (direction == DIR_OUTGOING) {
DEBUGC(DBCLASS_PROXY, "rewriting Contact header %s@%s -> %s@%s",
(contact->url->username)? contact->url->username : "******",
(contact->url->host)? contact->url->host : "*NULL*",
urlmap[i].masq_url->username, urlmap[i].masq_url->host);
} else {
DEBUGC(DBCLASS_PROXY, "rewriting Contact header %s@%s -> %s@%s",
(contact->url->username)? contact->url->username : "******",
(contact->url->host)? contact->url->host : "*NULL*",
urlmap[i].true_url->username, urlmap[i].true_url->host);
}
/* remove old entry */
osip_list_remove(sip_msg->contacts,j);
osip_contact_to_str(contact, &tmp);
osip_contact_free(contact);
/* clone the url from urlmap*/
osip_contact_init(&contact);
osip_contact_parse(contact,tmp);
osip_free(tmp);
osip_uri_free(contact->url);
if (direction == DIR_OUTGOING) {
/* outgoing, use masqueraded url */
osip_uri_clone(urlmap[i].masq_url, &contact->url);
} else {
/* incoming, use true url */
osip_uri_clone(urlmap[i].true_url, &contact->url);
}
osip_list_add(sip_msg->contacts,contact,j);
replaced=1;
}
}
if (replaced == 0) {
DEBUGC(DBCLASS_PROXY, "no Contact header rewritten");
return STS_FAILURE;
}
return STS_SUCCESS;
}
