VZTECH / Mbed 2 deprecated main_src

Modularizando o src

Dependencies:   EALib EthernetInterface_vz mbed-rtos mbed

Fork of header_main_colinas_V0-20-09-14 by VZTECH

sip.cpp@77:e8c0253b57bc, 2014-11-25 (annotated)

Committer:
klauss
Date:
Tue Nov 25 18:43:01 2014 +0000
Revision:
77:e8c0253b57bc
Parent:
76:9f5f99dd895a
Child:
78:1353744f01e1
versao estavel @bugfix setgateway

Who changed what in which revision?

UserRevisionLine numberNew contents of line
klauss 0:4d17cd9c8f9d 1 #include "sip.h"
klauss 0:4d17cd9c8f9d 2
klauss 0:4d17cd9c8f9d 3 void Sip::__init_sock__( void ){
klauss 0:4d17cd9c8f9d 4 sip_server.set_address( this->server_ip , this->server_port );
klauss 0:4d17cd9c8f9d 5 sock.set_blocking( false, 1 ); // verificar isso com mais cuidado depois
klauss 0:4d17cd9c8f9d 6 sock.bind( this->my_port );
klauss 74:81c47fff88a5 7 //sock.init();
klauss 0:4d17cd9c8f9d 8 sock.init();
klauss 0:4d17cd9c8f9d 9 }
klauss 0:4d17cd9c8f9d 10
klauss 48:195c97f12e8e 11 void Sip::__end_sock__( void ){
klauss 0:4d17cd9c8f9d 12 sock.close();
klauss 0:4d17cd9c8f9d 13 }
klauss 0:4d17cd9c8f9d 14
klauss 48:195c97f12e8e 15 void Sip::__reconnect__( void ){
klauss 48:195c97f12e8e 16 sock.close();
klauss 48:195c97f12e8e 17 sock.init();
klauss 48:195c97f12e8e 18 }
klauss 48:195c97f12e8e 19
klauss 0:4d17cd9c8f9d 20 Sip::Sip( char * server_ip, int server_port, char * my_ip, int my_port, int my_ext, int peer_ext, int id ){
klauss 0:4d17cd9c8f9d 21 this->id = id;
klauss 0:4d17cd9c8f9d 22 strncpy( this->server_ip, server_ip, 20 );
klauss 0:4d17cd9c8f9d 23 this->server_ip[19] = 0;
klauss 0:4d17cd9c8f9d 24 this->server_port = server_port;
klauss 28:94aec56c6329 25 strncpy( this->my_ip, my_ip, 20 );
klauss 0:4d17cd9c8f9d 26 this->my_ip[19] = 0;
klauss 0:4d17cd9c8f9d 27 this->my_port = my_port;
klauss 0:4d17cd9c8f9d 28 this->my_rtp_port = fill_random_rtp_port();
klauss 0:4d17cd9c8f9d 29 this->my_ext = my_ext;
klauss 0:4d17cd9c8f9d 30 itoa( this->my_ext, this->my_display, 10 );
klauss 0:4d17cd9c8f9d 31 this->peer_ext = peer_ext;
klauss 0:4d17cd9c8f9d 32
klauss 0:4d17cd9c8f9d 33 strcpy( this->fill_random_aux, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789pP" );
klauss 0:4d17cd9c8f9d 34 strcpy( this->last_invite_tag, "" );
klauss 0:4d17cd9c8f9d 35 strcpy( this->last_invite_callid, "");
klauss 0:4d17cd9c8f9d 36 strcpy( this->SVNREV, "COLA" );
klauss 0:4d17cd9c8f9d 37 status = sip_idle;
klauss 0:4d17cd9c8f9d 38
klauss 0:4d17cd9c8f9d 39 __init_sock__();
klauss 0:4d17cd9c8f9d 40 }
klauss 29:7246460b73f8 41
klauss 29:7246460b73f8 42 Sip::Sip( int id, uint16_t my_port ){
klauss 29:7246460b73f8 43 FILE * fp = NULL;
klauss 29:7246460b73f8 44 char inner_tmp[ 20 ];
klauss 28:94aec56c6329 45
klauss 29:7246460b73f8 46 if( debug_sip ) debug_msg("Building SIP ext :: %d | Port :: %d", id, my_port );
klauss 27:98f824719d1c 47
klauss 29:7246460b73f8 48 this->id = id;
klauss 29:7246460b73f8 49
klauss 28:94aec56c6329 50 fp = fopen( "/qspi/serverip.txt", "r");
klauss 28:94aec56c6329 51 if( fp == NULL){
klauss 29:7246460b73f8 52 if( debug_sip ) debug_msg("Failed to open /qspi/serverip.txt" );
klauss 28:94aec56c6329 53 strncpy( this->server_ip, __SERVER_IP__, 20 );
klauss 28:94aec56c6329 54 }else{
klauss 50:d9b6577a70f5 55 char tmp[ 16 ] = "\0";
klauss 46:a670f187a704 56 int read = fread( tmp, 1, 15, fp );
klauss 46:a670f187a704 57 if( read > 0 ){
klauss 46:a670f187a704 58 for( int i = 0; i < read; i++ )
klauss 46:a670f187a704 59 if( tmp[ i ] == '\n' || tmp[ i ] == '\r' ){
klauss 46:a670f187a704 60 tmp[ i ] = '\0';
klauss 46:a670f187a704 61 break;
klauss 46:a670f187a704 62 }
klauss 43:455522f98de5 63 strcpy( this->server_ip, tmp );
klauss 50:d9b6577a70f5 64 if( debug_sip ) debug_msg("Objeto SIP fixado no server ip %s( read %d chars ), valid %d", this->server_ip, read, strlen( this->server_ip ) );
klauss 28:94aec56c6329 65 }else{
klauss 29:7246460b73f8 66 if( debug_sip ) debug_msg("Failed to read /qspi/serverip.txt" );
klauss 28:94aec56c6329 67 strncpy( this->server_ip, __SERVER_IP__, 20 );
klauss 28:94aec56c6329 68 }
klauss 28:94aec56c6329 69 }
klauss 28:94aec56c6329 70 fclose( fp );
klauss 50:d9b6577a70f5 71 this->server_ip[ 15 ] = '\0';
klauss 28:94aec56c6329 72
klauss 28:94aec56c6329 73 fp = fopen( "/qspi/serverport.txt", "r");
klauss 28:94aec56c6329 74 if( fp == NULL ){
klauss 29:7246460b73f8 75 if( debug_sip ) debug_msg("Failed to open /qspi/serverport.txt" );
klauss 28:94aec56c6329 76 this->server_port = __SERVER_PORT__;
klauss 28:94aec56c6329 77 }else{
klauss 29:7246460b73f8 78 if( fread( (void *)inner_tmp, 1, 20, fp ) > 0 ){
klauss 29:7246460b73f8 79 server_port = atoi( inner_tmp );
klauss 29:7246460b73f8 80 if( debug_sip ) debug_msg("Objeto SIP fixado no server port %d", this->server_port );
klauss 28:94aec56c6329 81 }else{
klauss 29:7246460b73f8 82 if( debug_sip ) debug_msg("Failed to read /qspi/serverport.txt" );
klauss 28:94aec56c6329 83 this->server_port = __SERVER_PORT__;
klauss 28:94aec56c6329 84 }
klauss 28:94aec56c6329 85 }
klauss 28:94aec56c6329 86 fclose( fp );
klauss 28:94aec56c6329 87
klauss 28:94aec56c6329 88 fp = fopen( "/qspi/myip.txt", "r");
klauss 27:98f824719d1c 89 if (fp == NULL){
klauss 29:7246460b73f8 90 if( debug_sip ) debug_msg("Failed to open /qspi/myip.txt" );
klauss 27:98f824719d1c 91 strncpy( this->my_ip, __MY_IP__, 20 );
klauss 27:98f824719d1c 92 }else{
klauss 50:d9b6577a70f5 93 char tmp[ 16 ] = "\0";
klauss 46:a670f187a704 94 int read = fread( tmp, 1, 15, fp );
klauss 46:a670f187a704 95 if( read > 0 ){
klauss 46:a670f187a704 96 for( int i = 0; i < read; i++ )
klauss 46:a670f187a704 97 if( tmp[ i ] == '\n' || tmp[ i ] == '\r' ){
klauss 46:a670f187a704 98 tmp[ i ] = '\0';
klauss 46:a670f187a704 99 break;
klauss 46:a670f187a704 100 }
klauss 43:455522f98de5 101 strcpy( this->my_ip, tmp );
klauss 50:d9b6577a70f5 102 if( debug_sip ) debug_msg("Objeto SIP fixado no ip %s( lidos %d chars ), valid %d", this->my_ip, read, strlen( this->my_ip ) );
klauss 27:98f824719d1c 103 }else{
klauss 29:7246460b73f8 104 if( debug_sip ) debug_msg("Failed to read /qspi/myip.txt" );
klauss 27:98f824719d1c 105 strncpy( this->my_ip, __MY_IP__, 20 );
klauss 27:98f824719d1c 106 }
klauss 27:98f824719d1c 107 }
klauss 27:98f824719d1c 108 fclose( fp );
klauss 46:a670f187a704 109
klauss 50:d9b6577a70f5 110 this->my_ip[ 15 ] = '\0';
klauss 28:94aec56c6329 111
klauss 28:94aec56c6329 112 this->my_port = my_port;
klauss 28:94aec56c6329 113 this->my_rtp_port = fill_random_rtp_port();
klauss 28:94aec56c6329 114 this->my_ext = id;
klauss 28:94aec56c6329 115 itoa( this->my_ext, this->my_display, 10 );
klauss 46:a670f187a704 116
klauss 28:94aec56c6329 117 fp = fopen( "/qspi/peerext.txt", "r");
klauss 29:7246460b73f8 118 if( fp == NULL ) {
klauss 29:7246460b73f8 119 if( debug_sip ) debug_msg("Failed to open /qspi/peerext.txt" );
klauss 28:94aec56c6329 120 this->peer_ext = __PEER_EXT__;
klauss 29:7246460b73f8 121 } else {
klauss 29:7246460b73f8 122 if( fread( (void *)inner_tmp, 1, 32, fp ) > 0 ) {
klauss 29:7246460b73f8 123 this->peer_ext = atoi( inner_tmp );
klauss 29:7246460b73f8 124 if( debug_sip ) debug_msg("Objeto SIP fixado no server ext %d", this->peer_ext );
klauss 29:7246460b73f8 125 } else {
klauss 29:7246460b73f8 126 if( debug_sip ) debug_msg("Failed to read /qspi/peerext.txt" );
klauss 28:94aec56c6329 127 this->peer_ext = __PEER_EXT__;
klauss 28:94aec56c6329 128 }
klauss 28:94aec56c6329 129 }
klauss 28:94aec56c6329 130 fclose( fp );
klauss 27:98f824719d1c 131
klauss 48:195c97f12e8e 132 /*
klauss 29:7246460b73f8 133 this->my_port = my_port;
klauss 29:7246460b73f8 134 this->my_rtp_port = fill_random_rtp_port();
klauss 29:7246460b73f8 135 this->my_ext = id;
klauss 29:7246460b73f8 136 itoa( this->my_ext, this->my_display, 10 );
klauss 48:195c97f12e8e 137 */
klauss 0:4d17cd9c8f9d 138 strcpy( this->fill_random_aux, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789pP" );
klauss 0:4d17cd9c8f9d 139 strcpy( this->last_invite_tag, "" );
klauss 0:4d17cd9c8f9d 140 strcpy( this->last_invite_callid, "");
klauss 0:4d17cd9c8f9d 141 strcpy( this->SVNREV, "COLA" );
klauss 0:4d17cd9c8f9d 142 status = sip_idle;
klauss 0:4d17cd9c8f9d 143
klauss 0:4d17cd9c8f9d 144 __init_sock__();
klauss 0:4d17cd9c8f9d 145 }
klauss 29:7246460b73f8 146
klauss 0:4d17cd9c8f9d 147 Sip::~Sip(){
klauss 0:4d17cd9c8f9d 148 __end_sock__();
klauss 0:4d17cd9c8f9d 149 }
klauss 0:4d17cd9c8f9d 150
klauss 0:4d17cd9c8f9d 151 void Sip::registry(){
klauss 13:ae278302dffe 152 char out[ 1000 ];
klauss 28:94aec56c6329 153 if( debug_sip ) debug_msg("Registry %d", this->my_ext );
klauss 0:4d17cd9c8f9d 154 build_registry_package( buffer );
klauss 29:7246460b73f8 155 int sent = sock.sendTo( sip_server, buffer, 512 ); // > 400
klauss 48:195c97f12e8e 156 int rcv = sock.receiveFrom( sip_server, buffer, sizeof( buffer ) );
klauss 48:195c97f12e8e 157 /*
klauss 48:195c97f12e8e 158 if( sent == -1 || rcv == -1 ){
klauss 48:195c97f12e8e 159 debug_msg("");
klauss 48:195c97f12e8e 160 __init_eth__();
klauss 48:195c97f12e8e 161 debug_msg("");
klauss 48:195c97f12e8e 162 }
klauss 48:195c97f12e8e 163 */
klauss 48:195c97f12e8e 164 if( sent == -1 || rcv == -1 ){
klauss 48:195c97f12e8e 165 __reconnect__();
klauss 48:195c97f12e8e 166 }
klauss 28:94aec56c6329 167 if( debug_sip ) debug_msg("Received %i bytes to ext %d", sent, my_ext );
klauss 0:4d17cd9c8f9d 168 if( decode_gettag( (unsigned char *)buffer, "cseq: ", out ) ){
klauss 0:4d17cd9c8f9d 169 if(strlen( out ) > 7){
klauss 0:4d17cd9c8f9d 170 if(strcasecmp("options",out+strlen(out)-7) == 0){
klauss 13:ae278302dffe 171 char ans[ 2000 ];
klauss 0:4d17cd9c8f9d 172 build_reply_package( ans, (unsigned char*)buffer );
klauss 33:735fd60e96d8 173 sock.sendTo( sip_server, ans, sizeof( 512 ) );
klauss 0:4d17cd9c8f9d 174 }
klauss 0:4d17cd9c8f9d 175 }
klauss 0:4d17cd9c8f9d 176 }
klauss 0:4d17cd9c8f9d 177 }
klauss 0:4d17cd9c8f9d 178
klauss 0:4d17cd9c8f9d 179 VZ_call * Sip::invite(){
klauss 0:4d17cd9c8f9d 180 Timer t;
klauss 0:4d17cd9c8f9d 181 char callbox_string[ 32 ];
klauss 0:4d17cd9c8f9d 182 itoa( get_id(), callbox_string, 10 );
klauss 0:4d17cd9c8f9d 183
klauss 14:22a35f575502 184 if( status != sip_on_call ){
klauss 77:e8c0253b57bc 185 set_status( status, sip_waiting_trying );
klauss 77:e8c0253b57bc 186 }else return( NULL );
klauss 77:e8c0253b57bc 187
klauss 77:e8c0253b57bc 188 int cseq = 0;
klauss 0:4d17cd9c8f9d 189
klauss 77:e8c0253b57bc 190 build_invite_package( buffer, callbox_string, &cseq );
klauss 77:e8c0253b57bc 191 sock.sendTo( sip_server, buffer, sizeof( buffer ) );
klauss 77:e8c0253b57bc 192
klauss 77:e8c0253b57bc 193 if( debug_sip ) debug_msg( "Inviting" );
klauss 77:e8c0253b57bc 194 if( debug_sip ) debug_msg( "Sip::status::%d", status );
klauss 77:e8c0253b57bc 195 t.start();
klauss 77:e8c0253b57bc 196
klauss 77:e8c0253b57bc 197 sock.set_blocking( false, 5 );
klauss 0:4d17cd9c8f9d 198
klauss 0:4d17cd9c8f9d 199 int loop_times = 0;
klauss 0:4d17cd9c8f9d 200 int received_loop_times = 0;
klauss 0:4d17cd9c8f9d 201 Timer reconnect;
klauss 0:4d17cd9c8f9d 202 reconnect.start();
klauss 29:7246460b73f8 203 //static int id_ = 0;
klauss 0:4d17cd9c8f9d 204 int length = 0;
klauss 3:cd9148672e25 205 bool waiting = false;
klauss 3:cd9148672e25 206 VZ_call * call = NULL;
klauss 77:e8c0253b57bc 207 while( t.read() < __INVITE_MAX_WAITING_TIME__ ){
klauss 77:e8c0253b57bc 208 loop_times++;
klauss 77:e8c0253b57bc 209 length = sock.receiveFrom( sip_server, buffer, sizeof( buffer ) );
klauss 77:e8c0253b57bc 210 if( length > 0 ){
klauss 77:e8c0253b57bc 211 reconnect.reset();
klauss 77:e8c0253b57bc 212 //debug_msg("Pacotes recebidos :: %d", id_ );
klauss 77:e8c0253b57bc 213 buffer[ length ] = 0;
klauss 77:e8c0253b57bc 214 received_loop_times++;
klauss 77:e8c0253b57bc 215 if( ( status == sip_trying ) || ( status == sip_ringing ) || ( status == sip_waiting_trying ) ){
klauss 77:e8c0253b57bc 216 if( !( strncasecmp( buffer + 12, "ok", strlen("ok") ) ) ){
klauss 77:e8c0253b57bc 217 // tratar depois o esquema do Cseq ::
klauss 77:e8c0253b57bc 218 //debug_msg( "Cseq == %d", cseq );
klauss 77:e8c0253b57bc 219 set_status(status, sip_on_call);
klauss 77:e8c0253b57bc 220 char *ref = strstr( buffer, "audio" );
klauss 77:e8c0253b57bc 221 if( debug_sip ) debug_msg("ok");
klauss 77:e8c0253b57bc 222 if( ref != NULL ){
klauss 77:e8c0253b57bc 223 ref += 6; // audio
klauss 77:e8c0253b57bc 224 ref = strtok( ref, " ");
klauss 77:e8c0253b57bc 225 if( call == NULL ) call = new VZ_call( this->my_ext, this->my_rtp_port, this->peer_ext, atoi( ref ) );
klauss 77:e8c0253b57bc 226 char ans[ 1024 ];
klauss 77:e8c0253b57bc 227 build_ack_package( ans, ( unsigned char *)buffer );
klauss 77:e8c0253b57bc 228 sock.sendTo( sip_server, ans, sizeof( ans ) );
klauss 77:e8c0253b57bc 229 if( debug_sip ) debug_msg("Call alocada -- Sip::status::%d -- loop_times :: %d :: received_loop_times :: %d", status, loop_times, received_loop_times );
klauss 77:e8c0253b57bc 230 set_status( status, sip_on_call );
klauss 77:e8c0253b57bc 231 return( call );
klauss 77:e8c0253b57bc 232 }
klauss 77:e8c0253b57bc 233 }
klauss 77:e8c0253b57bc 234 }
klauss 77:e8c0253b57bc 235 if( ( status == sip_trying ) || ( status == sip_ringing ) ){
klauss 77:e8c0253b57bc 236 if( !( strncasecmp( buffer + 12, "Busy Here", strlen("Busy Here") ) ) ){
klauss 77:e8c0253b57bc 237 if( debug_sip ) debug_msg("Busy Here");
klauss 77:e8c0253b57bc 238 send_bye();
klauss 77:e8c0253b57bc 239 delete( call );
klauss 77:e8c0253b57bc 240 set_status( status, sip_busy );
klauss 77:e8c0253b57bc 241 return( NULL );
klauss 25:2cf5e8dd4035 242 }
klauss 25:2cf5e8dd4035 243 }
klauss 77:e8c0253b57bc 244 if( ( status == sip_trying ) || ( status == sip_ringing ) ){
klauss 77:e8c0253b57bc 245 if( !( strncasecmp( buffer + 12, "Session Progress", strlen("Session Progress") ) ) ){
klauss 77:e8c0253b57bc 246 //debug_msg( "Trocando dados de audio -- musica de espera com o CBx" );
klauss 77:e8c0253b57bc 247 char *ref = strstr( buffer, "audio" );
klauss 77:e8c0253b57bc 248 if( ref != NULL ){
klauss 77:e8c0253b57bc 249 ref += 6; // audio
klauss 77:e8c0253b57bc 250 ref = strtok( ref, " ");
klauss 77:e8c0253b57bc 251 if( call == NULL ) call = new VZ_call( this->my_ext, this->my_rtp_port, this->peer_ext, atoi( ref ) );
klauss 77:e8c0253b57bc 252 waiting = true;
klauss 77:e8c0253b57bc 253 }
klauss 77:e8c0253b57bc 254 }
klauss 77:e8c0253b57bc 255 }
klauss 77:e8c0253b57bc 256 if( status == sip_trying ){
klauss 77:e8c0253b57bc 257 if( !( strncasecmp( buffer + 12, "ringing", strlen("ringing") ) ) ){
klauss 77:e8c0253b57bc 258 if( debug_sip ) debug_msg("ringing");
klauss 77:e8c0253b57bc 259 t.reset();
klauss 77:e8c0253b57bc 260 set_status( status, sip_ringing );
klauss 77:e8c0253b57bc 261 }
klauss 77:e8c0253b57bc 262 }
klauss 77:e8c0253b57bc 263 if( status == sip_waiting_trying ){
klauss 77:e8c0253b57bc 264 if( !( strncasecmp( buffer + 12, "trying", strlen("trying") ) ) ){
klauss 77:e8c0253b57bc 265 if( debug_sip ) debug_msg("trying")
klauss 77:e8c0253b57bc 266 t.reset();
klauss 77:e8c0253b57bc 267 set_status( status, sip_trying );
klauss 77:e8c0253b57bc 268 }
klauss 77:e8c0253b57bc 269 }
klauss 77:e8c0253b57bc 270 }else if( reconnect.read() > 4 ){
klauss 77:e8c0253b57bc 271 //sock.close();
klauss 77:e8c0253b57bc 272 //sock.bind( this->my_port );
klauss 77:e8c0253b57bc 273 //sock.init();
klauss 77:e8c0253b57bc 274 //sock.set_blocking( false, 1 );
klauss 77:e8c0253b57bc 275 //if( debug_sip ) debug_msg("Reconnect");
klauss 77:e8c0253b57bc 276 if( received_loop_times != 0 ){
klauss 77:e8c0253b57bc 277 if( debug_sip ) send_msg(" %d bytes lidos ", length );
klauss 77:e8c0253b57bc 278 reconnect.reset();
klauss 77:e8c0253b57bc 279 }
klauss 77:e8c0253b57bc 280 //sock.sendTo( sip_server, buffer, sizeof( buffer ) );
klauss 77:e8c0253b57bc 281 //led4 = !led4;
klauss 77:e8c0253b57bc 282 }
klauss 77:e8c0253b57bc 283 if( waiting == true ){
klauss 77:e8c0253b57bc 284 char * tmp = call->get_eth_message( &length );
klauss 77:e8c0253b57bc 285 if( tmp != NULL ){
klauss 77:e8c0253b57bc 286 uint8_t * pkg2cb = __build_cb_package__( this->my_ext, this->my_port, __AUDIO__,
klauss 77:e8c0253b57bc 287 tmp, __AUDIO__, length, (uint8_t *)buffer );
klauss 77:e8c0253b57bc 288 send2callboxes( pkg2cb );
klauss 77:e8c0253b57bc 289 }
klauss 76:9f5f99dd895a 290 }
klauss 0:4d17cd9c8f9d 291 }
klauss 77:e8c0253b57bc 292
klauss 77:e8c0253b57bc 293 if( debug_sip ) debug_msg("Call nao alocada -- Sip::status::%d -- loop_times :: %d :: received_loop_times :: %d", status, loop_times, received_loop_times );
klauss 77:e8c0253b57bc 294 if( t.read() > __INVITE_MAX_WAITING_TIME__ ){
klauss 77:e8c0253b57bc 295 set_status(status, sip_denied);
klauss 77:e8c0253b57bc 296 send_bye();
klauss 0:4d17cd9c8f9d 297 }
klauss 77:e8c0253b57bc 298 delete( call );
klauss 0:4d17cd9c8f9d 299 return( NULL );
klauss 0:4d17cd9c8f9d 300 }
klauss 0:4d17cd9c8f9d 301
klauss 0:4d17cd9c8f9d 302 char * Sip::build_registry_package( char * buffer ){
klauss 0:4d17cd9c8f9d 303 char branch[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 304 char tag[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 305 char callid[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 306 fill_random16h( branch );
klauss 0:4d17cd9c8f9d 307 fill_random( tag, 18 );
klauss 0:4d17cd9c8f9d 308 fill_random16h( callid );
klauss 0:4d17cd9c8f9d 309 char itoa_buffer[ 65 ];
klauss 0:4d17cd9c8f9d 310 strcpy( buffer, "REGISTER sip:" );
klauss 0:4d17cd9c8f9d 311 strcat( buffer, server_ip );
klauss 0:4d17cd9c8f9d 312 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 313 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 314 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 315 strcat( buffer, " SIP/2.0\r\nVia: SIP/2.0/UDP " );
klauss 0:4d17cd9c8f9d 316 strcat( buffer, my_ip );
klauss 0:4d17cd9c8f9d 317 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 318 itoa( my_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 319 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 320 strcat( buffer, ";branch=" );
klauss 0:4d17cd9c8f9d 321 strcat( buffer, branch );
klauss 0:4d17cd9c8f9d 322 strcat( buffer, "\r\nFrom: " );
klauss 4:de46f0d9b14d 323 // mudar isso aqui pra algo mais compreensivel pra cc
klauss 0:4d17cd9c8f9d 324 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 325 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 326 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 327 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 328 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 329 strcat( buffer, server_ip );
klauss 0:4d17cd9c8f9d 330 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 331 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 332 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 333 strcat( buffer, ">;tag=" );
klauss 0:4d17cd9c8f9d 334 strcat( buffer, tag );
klauss 0:4d17cd9c8f9d 335 strcat( buffer, "\r\nTo: " );
klauss 0:4d17cd9c8f9d 336 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 337 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 338 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 339 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 340 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 341 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 342 strcat( buffer, server_ip );
klauss 0:4d17cd9c8f9d 343 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 344 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 345 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 346 strcat( buffer, ">\r\nCall-ID: " );
klauss 0:4d17cd9c8f9d 347 strcat( buffer, callid );
klauss 0:4d17cd9c8f9d 348 strcat( buffer, "\r\nCSeq: " );
klauss 0:4d17cd9c8f9d 349 itoa( get_cseq(), itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 350 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 351 strcat( buffer, " REGISTER\r\n" );
klauss 0:4d17cd9c8f9d 352 strcat( buffer, "Max-Forwards: " );
klauss 0:4d17cd9c8f9d 353 itoa( 70, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 354 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 355 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 356
klauss 0:4d17cd9c8f9d 357 strcat( buffer, "Contact: " );
klauss 0:4d17cd9c8f9d 358 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 359 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 360 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 361 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 362 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 363 strcat( buffer, my_ip );
klauss 0:4d17cd9c8f9d 364 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 365 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 366 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 367 strcat( buffer, ">;expires=120" );
klauss 0:4d17cd9c8f9d 368 //itoa( 1200, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 369 //strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 370 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 371
klauss 0:4d17cd9c8f9d 372 strcat( buffer, "User-Agent: VZtech/pabxdriver-" );
klauss 0:4d17cd9c8f9d 373 strcat( buffer, SVNREV );
klauss 0:4d17cd9c8f9d 374 strcat( buffer, "\r\nContent-Length: 0\r\n" );
klauss 0:4d17cd9c8f9d 375 strcat( buffer, SIP_ALLOW );
klauss 0:4d17cd9c8f9d 376 strcat( buffer, "\r\n\r\n" );
klauss 0:4d17cd9c8f9d 377 buffer[ SIP_MAXMSGSIZE - 1 ] = 0;
klauss 0:4d17cd9c8f9d 378 return buffer;
klauss 0:4d17cd9c8f9d 379 }
klauss 0:4d17cd9c8f9d 380
klauss 0:4d17cd9c8f9d 381 char * Sip::build_invite_package( char * pkg, char * callbox_string, int * cseq ){
klauss 0:4d17cd9c8f9d 382 char header[ SIP_MAXMSGSIZE ], body[ SIP_MAXMSGSIZE ];
klauss 0:4d17cd9c8f9d 383 char branch[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 384 char tag[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 385 char callid[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 386 char itoa_buffer[ 65 ];
klauss 0:4d17cd9c8f9d 387 *cseq = get_cseq();
klauss 0:4d17cd9c8f9d 388 fill_random16h( branch );
klauss 0:4d17cd9c8f9d 389 fill_random( tag,18 );
klauss 0:4d17cd9c8f9d 390 fill_random16h( callid );
klauss 0:4d17cd9c8f9d 391
klauss 0:4d17cd9c8f9d 392 strcpy( last_invite_tag,tag );
klauss 0:4d17cd9c8f9d 393 strcpy( last_invite_callid, callid );
klauss 0:4d17cd9c8f9d 394
klauss 0:4d17cd9c8f9d 395 strcpy( header, "INVITE sip:" );
klauss 0:4d17cd9c8f9d 396 itoa( this->peer_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 397 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 398 strcat( header, "@" );
klauss 0:4d17cd9c8f9d 399 strcat( header, this->server_ip );
klauss 0:4d17cd9c8f9d 400 strcat( header, ":" );
klauss 0:4d17cd9c8f9d 401 itoa( this->server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 402 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 403 strcat( header, " SIP/" );
klauss 0:4d17cd9c8f9d 404 itoa( 2, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 405 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 406 strcat( header, "." );
klauss 0:4d17cd9c8f9d 407 itoa( 0, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 408 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 409 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 410 strcat( header, "Via: SIP/" );
klauss 0:4d17cd9c8f9d 411 itoa( 2, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 412 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 413 strcat( header, "." );
klauss 0:4d17cd9c8f9d 414 itoa( 0, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 415 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 416 strcat( header, "/UDP" );
klauss 0:4d17cd9c8f9d 417 strcat( header, this->my_ip );
klauss 0:4d17cd9c8f9d 418 strcat( header, ":" );
klauss 0:4d17cd9c8f9d 419 itoa( this->my_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 420 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 421 strcat( header, ";branch=" );
klauss 0:4d17cd9c8f9d 422 strcat( header, branch );
klauss 0:4d17cd9c8f9d 423 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 424 strcat( header, "From: " );
klauss 0:4d17cd9c8f9d 425 strcat( header, callbox_string );
klauss 0:4d17cd9c8f9d 426 strcat( header, " <sip:" );
klauss 0:4d17cd9c8f9d 427 itoa( this->my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 428 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 429 strcat( header, "@" );
klauss 0:4d17cd9c8f9d 430 strcat( header, this->server_ip );
klauss 0:4d17cd9c8f9d 431 strcat( header, ":" );
klauss 0:4d17cd9c8f9d 432 itoa( this->server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 433 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 434 strcat( header, ">;tag=" );
klauss 0:4d17cd9c8f9d 435 strcat( header, tag );
klauss 0:4d17cd9c8f9d 436 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 437 strcat( header, "To: <sip:" );
klauss 0:4d17cd9c8f9d 438 itoa( this->peer_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 439 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 440 strcat( header, "@" );
klauss 0:4d17cd9c8f9d 441 strcat( header, this->server_ip );
klauss 0:4d17cd9c8f9d 442 strcat( header, ":" );
klauss 0:4d17cd9c8f9d 443 itoa( this->server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 444 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 445 strcat( header, ">\r\n" );
klauss 0:4d17cd9c8f9d 446 strcat( header, "Call-ID: " );
klauss 0:4d17cd9c8f9d 447 strcat( header, callid );
klauss 0:4d17cd9c8f9d 448 strcat( header, "@" );
klauss 0:4d17cd9c8f9d 449 strcat( header, this->my_ip );
klauss 0:4d17cd9c8f9d 450 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 451 strcat( header, "CSeq: " );
klauss 0:4d17cd9c8f9d 452 itoa( *cseq, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 453 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 454 strcat( header, " INVITE\r\n" );
klauss 0:4d17cd9c8f9d 455 strcat( header, "Contact: " );
klauss 0:4d17cd9c8f9d 456 itoa( this->my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 457 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 458 strcat( header, " <sip:" );
klauss 0:4d17cd9c8f9d 459 itoa( this->my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 460 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 461 strcat( header, "@" );
klauss 0:4d17cd9c8f9d 462 strcat( header, this->my_ip );
klauss 0:4d17cd9c8f9d 463 strcat( header, ":" );
klauss 0:4d17cd9c8f9d 464 itoa( this->my_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 465 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 466 strcat( header, ">\r\n" );
klauss 0:4d17cd9c8f9d 467 strcat( header, "Max-Forwards: " );
klauss 0:4d17cd9c8f9d 468 itoa( 20, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 469 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 470 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 471 strcat( header, "User-Agent: VZtech/pabxdriver-" );
klauss 0:4d17cd9c8f9d 472 strcat( header, SVNREV );
klauss 0:4d17cd9c8f9d 473 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 474 strcat( header, "Expires: " );
klauss 0:4d17cd9c8f9d 475 itoa( 70, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 476 strcat( header, itoa_buffer );
klauss 0:4d17cd9c8f9d 477 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 478 strcat( header, SIP_ALLOW );
klauss 0:4d17cd9c8f9d 479 strcat( header, "\r\n" );
klauss 0:4d17cd9c8f9d 480 strcat( header, "Content-Type: application/sdp\r\n" );
klauss 0:4d17cd9c8f9d 481 header[ SIP_MAXMSGSIZE - 1 ] = 0;
klauss 0:4d17cd9c8f9d 482
klauss 0:4d17cd9c8f9d 483 strcpy( body, "v=0\r\n" );
klauss 0:4d17cd9c8f9d 484 strcat( body, "o=- " );
klauss 0:4d17cd9c8f9d 485 itoa( 7377, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 486 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 487 strcat( body, " " );
klauss 0:4d17cd9c8f9d 488 itoa( 18176, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 489 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 490 strcat( body, " IN IP" );
klauss 0:4d17cd9c8f9d 491 itoa( 4, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 492 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 493 strcat( body, " " );
klauss 0:4d17cd9c8f9d 494 strcat( body, this->my_ip );
klauss 0:4d17cd9c8f9d 495 strcat( body, "\r\n" );
klauss 0:4d17cd9c8f9d 496 strcat( body, "s=-\r\n" );
klauss 0:4d17cd9c8f9d 497 strcat( body, "c=IN IP" );
klauss 0:4d17cd9c8f9d 498 itoa( 4, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 499 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 500 strcat( body, " " );
klauss 0:4d17cd9c8f9d 501 strcat( body, this->my_ip );
klauss 0:4d17cd9c8f9d 502 strcat( body, "\r\n" );
klauss 0:4d17cd9c8f9d 503 strcat( body, "t=" );
klauss 0:4d17cd9c8f9d 504 itoa( 0, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 505 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 506 strcat( body, " " );
klauss 0:4d17cd9c8f9d 507 itoa( 0, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 508 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 509 strcat( body, "\r\n" );
klauss 0:4d17cd9c8f9d 510 strcat( body, "m=audio " );
klauss 0:4d17cd9c8f9d 511 itoa( this->my_rtp_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 512 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 513 strcat( body, " RTP/AVP " );
klauss 0:4d17cd9c8f9d 514 itoa( 8, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 515 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 516 strcat( body, " " );
klauss 0:4d17cd9c8f9d 517 itoa( 101, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 518 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 519 strcat( body, "\r\n" );
klauss 0:4d17cd9c8f9d 520 strcat( body, "a=rtpmap:" );
klauss 0:4d17cd9c8f9d 521 itoa( 8, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 522 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 523 strcat( body, " PCMA/" );
klauss 0:4d17cd9c8f9d 524 itoa( 8000, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 525 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 526 strcat( body, "/" );
klauss 0:4d17cd9c8f9d 527 itoa( 1, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 528 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 529 strcat( body, "\r\n" );
klauss 0:4d17cd9c8f9d 530 strcat( body, "a=rtpmap:" );
klauss 0:4d17cd9c8f9d 531 itoa( 101, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 532 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 533 strcat( body, " telephone-event/" );
klauss 0:4d17cd9c8f9d 534 itoa( 8000, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 535 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 536 strcat( body, "\r\n" );
klauss 0:4d17cd9c8f9d 537 strcat( body, "a=fmtp: " );
klauss 0:4d17cd9c8f9d 538 itoa( 101, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 539 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 540 strcat( body, " " );
klauss 0:4d17cd9c8f9d 541 itoa( 0, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 542 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 543 strcat( body, "-" );
klauss 0:4d17cd9c8f9d 544 itoa( 11, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 545 strcat( body, itoa_buffer );
klauss 0:4d17cd9c8f9d 546 body[ SIP_MAXMSGSIZE - 1 ] = 0;
klauss 0:4d17cd9c8f9d 547
klauss 0:4d17cd9c8f9d 548 make_content_length( header, body, pkg );
klauss 0:4d17cd9c8f9d 549 return( pkg );
klauss 0:4d17cd9c8f9d 550 }
klauss 0:4d17cd9c8f9d 551
klauss 0:4d17cd9c8f9d 552 char * Sip::make_content_length( char * header, char * body, char * pkg ){
klauss 0:4d17cd9c8f9d 553 int size;
klauss 0:4d17cd9c8f9d 554 char itoa_buffer[ 65 ];
klauss 0:4d17cd9c8f9d 555 size = strlen( body );
klauss 0:4d17cd9c8f9d 556 strcpy( pkg, header );
klauss 0:4d17cd9c8f9d 557 strcat( pkg, "Content-Length: " );
klauss 0:4d17cd9c8f9d 558 itoa( size, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 559 strcat( pkg, itoa_buffer );
klauss 0:4d17cd9c8f9d 560 strcat( pkg, "\r\n\r\n" );
klauss 0:4d17cd9c8f9d 561 strcat( pkg, body );
klauss 0:4d17cd9c8f9d 562 pkg[ SIP_MAXMSGSIZE - 1 ] = 0;
klauss 0:4d17cd9c8f9d 563 return pkg;
klauss 0:4d17cd9c8f9d 564 }
klauss 0:4d17cd9c8f9d 565
klauss 0:4d17cd9c8f9d 566 char * Sip::build_bye_package( char * buffer ){
klauss 0:4d17cd9c8f9d 567 char branch[SIP_MAXFIELDSIZE];
klauss 0:4d17cd9c8f9d 568 char tag[SIP_MAXFIELDSIZE];
klauss 0:4d17cd9c8f9d 569 char itoa_buffer[ 65 ];
klauss 0:4d17cd9c8f9d 570 fill_random16h(branch);
klauss 0:4d17cd9c8f9d 571 fill_random(tag,18);
klauss 0:4d17cd9c8f9d 572
klauss 0:4d17cd9c8f9d 573 strcpy( buffer, "BYE sip:" );
klauss 0:4d17cd9c8f9d 574 itoa( this->peer_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 575 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 576 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 577 strcat( buffer, this->server_ip );
klauss 0:4d17cd9c8f9d 578 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 579 itoa( this->server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 580 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 581 strcat( buffer, " SIP/2.0\r\n" );
klauss 0:4d17cd9c8f9d 582 strcat( buffer, "Via: SIP/2.0/UDP " );
klauss 0:4d17cd9c8f9d 583 strcat( buffer, this->my_ip );
klauss 0:4d17cd9c8f9d 584 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 585 itoa( this->my_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 586 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 587 strcat( buffer, ";branch=" );
klauss 0:4d17cd9c8f9d 588 strcat( buffer, branch );
klauss 0:4d17cd9c8f9d 589 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 590 strcat( buffer, "From: " );
klauss 0:4d17cd9c8f9d 591 itoa( this->my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 592 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 593 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 594 itoa( this->my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 595 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 596 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 597 strcat( buffer, this->server_ip );
klauss 0:4d17cd9c8f9d 598 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 599 itoa( this->server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 600 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 601 strcat( buffer, ">;tag=" );
klauss 0:4d17cd9c8f9d 602 strcat( buffer, last_invite_tag );
klauss 0:4d17cd9c8f9d 603 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 604 strcat( buffer, "To: <sip:" );
klauss 0:4d17cd9c8f9d 605 itoa( this->peer_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 606 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 607 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 608 strcat( buffer, this->server_ip );
klauss 0:4d17cd9c8f9d 609 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 610 itoa( this->server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 611 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 612 strcat( buffer, ">;tag=" );
klauss 0:4d17cd9c8f9d 613 strcat( buffer, tag );
klauss 0:4d17cd9c8f9d 614 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 615 strcat( buffer, "Call-ID: " );
klauss 0:4d17cd9c8f9d 616 strcat( buffer, last_invite_callid );
klauss 0:4d17cd9c8f9d 617 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 618 strcat( buffer, this->my_ip );
klauss 0:4d17cd9c8f9d 619 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 620 strcat( buffer, "CSeq: " );
klauss 0:4d17cd9c8f9d 621 itoa( get_cseq(), itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 622 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 623 strcat( buffer, " BYE\r\n" );
klauss 0:4d17cd9c8f9d 624 strcat( buffer, "Max-Forwards: 70\r\n" );
klauss 0:4d17cd9c8f9d 625 strcat( buffer, "User-Agent: VZtech/pabxdriver-" );
klauss 0:4d17cd9c8f9d 626 strcat( buffer, SVNREV );
klauss 0:4d17cd9c8f9d 627 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 628 strcat( buffer, "Content-Length: 0\r\n\r\n" );
klauss 0:4d17cd9c8f9d 629 return( buffer );
klauss 0:4d17cd9c8f9d 630 }
klauss 0:4d17cd9c8f9d 631 char * Sip::build_ack_package( char * buffer, unsigned char * orig ){
klauss 0:4d17cd9c8f9d 632 char to[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 633 char from[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 634 char callid[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 635 char via[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 636 char branch[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 637 char cseq[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 638 char itoa_buffer[ 65 ];
klauss 0:4d17cd9c8f9d 639 // FIXME confirmar se nao preciso converter todos os ints com itoa
klauss 0:4d17cd9c8f9d 640 if( decode_gettag( orig, "to: ", to ) == 0) {
klauss 0:4d17cd9c8f9d 641 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 642 return NULL;
klauss 0:4d17cd9c8f9d 643 }
klauss 0:4d17cd9c8f9d 644 if( decode_gettag( orig, "from: ", from ) == 0) {
klauss 0:4d17cd9c8f9d 645 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 646 return NULL;
klauss 0:4d17cd9c8f9d 647 }
klauss 0:4d17cd9c8f9d 648 if( decode_gettag( orig, "call-id: ", callid ) == 0) {
klauss 0:4d17cd9c8f9d 649 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 650 return NULL;
klauss 0:4d17cd9c8f9d 651 }
klauss 0:4d17cd9c8f9d 652 decode_branch( orig, branch );
klauss 0:4d17cd9c8f9d 653 decode_cseq( orig, cseq );
klauss 0:4d17cd9c8f9d 654
klauss 0:4d17cd9c8f9d 655 if( strlen( via ) > 6 ) {
klauss 0:4d17cd9c8f9d 656 if( strcasecmp( ";rport", via+strlen( via )-6) == 0) {
klauss 0:4d17cd9c8f9d 657 via[strlen(via)-6] = 0;
klauss 0:4d17cd9c8f9d 658 }
klauss 0:4d17cd9c8f9d 659 }
klauss 0:4d17cd9c8f9d 660 strcpy( buffer, "ACK sip:" );
klauss 0:4d17cd9c8f9d 661 itoa( this->peer_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 662 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 663 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 664 strcat( buffer, this->server_ip );
klauss 0:4d17cd9c8f9d 665 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 666 itoa( this->server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 667 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 668 strcat( buffer, " SIP/2.0\r\n" );
klauss 0:4d17cd9c8f9d 669 strcat( buffer, "Via: SIP/2.0/UDP " );
klauss 0:4d17cd9c8f9d 670 strcat( buffer, this->my_ip );
klauss 0:4d17cd9c8f9d 671 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 672 itoa( this->my_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 673 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 674 strcat( buffer, ";branch=" );
klauss 0:4d17cd9c8f9d 675 strcat( buffer, branch );
klauss 0:4d17cd9c8f9d 676 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 677 strcat( buffer, "From: " );
klauss 0:4d17cd9c8f9d 678 strcat( buffer, from );
klauss 0:4d17cd9c8f9d 679 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 680 strcat( buffer, "To: " );
klauss 0:4d17cd9c8f9d 681 strcat( buffer, to );
klauss 0:4d17cd9c8f9d 682 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 683 strcat( buffer, "Call-ID: " );
klauss 0:4d17cd9c8f9d 684 strcat( buffer, callid );
klauss 0:4d17cd9c8f9d 685 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 686 strcat( buffer, "CSeq: " );
klauss 0:4d17cd9c8f9d 687 strcat( buffer, cseq );
klauss 0:4d17cd9c8f9d 688 strcat( buffer, " ACK\r\n" );
klauss 0:4d17cd9c8f9d 689 strcat( buffer, "Max-Forwards: 70\r\n" );
klauss 0:4d17cd9c8f9d 690 strcat( buffer, "Contact: " );
klauss 0:4d17cd9c8f9d 691 itoa( this->my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 692 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 693 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 694 itoa( this->my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 695 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 696 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 697 strcat( buffer, this->my_ip );
klauss 0:4d17cd9c8f9d 698 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 699 itoa( this->my_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 700 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 701 strcat( buffer, ">\r\n" );
klauss 0:4d17cd9c8f9d 702 strcat( buffer, "User-Agent: VZtech/pabxdriver-" );
klauss 0:4d17cd9c8f9d 703 strcat( buffer, SVNREV );
klauss 0:4d17cd9c8f9d 704 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 705 strcat( buffer, "Content-Length: 0\r\n\r\n" );
klauss 0:4d17cd9c8f9d 706 buffer[SIP_MAXMSGSIZE-1] = 0;
klauss 0:4d17cd9c8f9d 707 return( buffer );
klauss 0:4d17cd9c8f9d 708 }
klauss 0:4d17cd9c8f9d 709
klauss 0:4d17cd9c8f9d 710 int Sip::get_return_code( char * buffer ){
klauss 0:4d17cd9c8f9d 711 char a[32];
klauss 0:4d17cd9c8f9d 712 int i = 0, j;
klauss 0:4d17cd9c8f9d 713 if( strncmp( "SIP/", buffer, 4 ) != 0 ) return 0;
klauss 0:4d17cd9c8f9d 714 if( strlen( buffer ) < 32) return 0;
klauss 0:4d17cd9c8f9d 715 strncpy( a, buffer, 31 );
klauss 0:4d17cd9c8f9d 716 a[ 31 ] = 0;
klauss 0:4d17cd9c8f9d 717 while ( a[ i ] > ' ') i++;
klauss 0:4d17cd9c8f9d 718 j = i+i;
klauss 0:4d17cd9c8f9d 719 while( (a[ j ] >= '0') && ( a[ j ] <= '9') ) j++;
klauss 0:4d17cd9c8f9d 720 a[ j ] = 0;
klauss 0:4d17cd9c8f9d 721 return atoi( a + i + 1 );
klauss 0:4d17cd9c8f9d 722 }
klauss 0:4d17cd9c8f9d 723
klauss 0:4d17cd9c8f9d 724 char * Sip::build_generic_reply_package(char * buffer, unsigned char * orig, char * tag){
klauss 0:4d17cd9c8f9d 725 char to[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 726 char from[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 727 char callid[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 728 char cseq[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 729 char via[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 730
klauss 0:4d17cd9c8f9d 731 if( decode_gettag( orig, "to: ", to ) == 0) {
klauss 0:4d17cd9c8f9d 732 buffer[0] = 0;
klauss 0:4d17cd9c8f9d 733 return NULL;
klauss 0:4d17cd9c8f9d 734 }
klauss 0:4d17cd9c8f9d 735 if( decode_gettag( orig, "from: ", from ) == 0) {
klauss 0:4d17cd9c8f9d 736 buffer[0] = 0;
klauss 0:4d17cd9c8f9d 737 return NULL;
klauss 0:4d17cd9c8f9d 738 }
klauss 0:4d17cd9c8f9d 739 if( decode_gettag( orig, "call-id: ", callid ) == 0) {
klauss 0:4d17cd9c8f9d 740 buffer[0] = 0;
klauss 0:4d17cd9c8f9d 741 return NULL;
klauss 0:4d17cd9c8f9d 742 }
klauss 0:4d17cd9c8f9d 743 if( decode_gettag( orig, "cseq: ", cseq ) == 0) {
klauss 0:4d17cd9c8f9d 744 buffer[0] = 0;
klauss 0:4d17cd9c8f9d 745 return NULL;
klauss 0:4d17cd9c8f9d 746 }
klauss 0:4d17cd9c8f9d 747 if( decode_gettag( orig, "via: ", via ) == 0) {
klauss 0:4d17cd9c8f9d 748 buffer[0] = 0;
klauss 0:4d17cd9c8f9d 749 return NULL;
klauss 0:4d17cd9c8f9d 750 }
klauss 0:4d17cd9c8f9d 751
klauss 0:4d17cd9c8f9d 752 if (strlen(via) > 6) {
klauss 0:4d17cd9c8f9d 753 if (strcasecmp(";rport",via+strlen(via)-6)==0) {
klauss 0:4d17cd9c8f9d 754 via[strlen(via)-6] = 0;
klauss 0:4d17cd9c8f9d 755 }
klauss 0:4d17cd9c8f9d 756 }
klauss 0:4d17cd9c8f9d 757
klauss 0:4d17cd9c8f9d 758 strcpy( buffer, "SIP/2.0 " );
klauss 0:4d17cd9c8f9d 759 strcat( buffer, tag );
klauss 0:4d17cd9c8f9d 760 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 761 strcat( buffer, "To: " );
klauss 0:4d17cd9c8f9d 762 strcat( buffer, to );
klauss 0:4d17cd9c8f9d 763 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 764 strcat( buffer, "From: " );
klauss 0:4d17cd9c8f9d 765 strcat( buffer, from );
klauss 0:4d17cd9c8f9d 766 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 767 strcat( buffer, "Call-ID: " );
klauss 0:4d17cd9c8f9d 768 strcat( buffer, callid );
klauss 0:4d17cd9c8f9d 769 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 770 strcat( buffer, "CSeq: " );
klauss 0:4d17cd9c8f9d 771 strcat( buffer, cseq );
klauss 0:4d17cd9c8f9d 772 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 773 strcat( buffer, "Via: " );
klauss 0:4d17cd9c8f9d 774 strcat( buffer, via );
klauss 0:4d17cd9c8f9d 775 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 776 strcat( buffer, "Server: VZtech/pabxdriver-" );
klauss 0:4d17cd9c8f9d 777 strcat( buffer, SVNREV );
klauss 0:4d17cd9c8f9d 778 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 779 strcat( buffer, "Content-Length: 0\r\n\r\n" );
klauss 0:4d17cd9c8f9d 780 buffer[ SIP_MAXMSGSIZE - 1 ] = 0;
klauss 0:4d17cd9c8f9d 781 return( buffer );
klauss 0:4d17cd9c8f9d 782 }
klauss 0:4d17cd9c8f9d 783 char * Sip::build_trying_package( char * buffer, unsigned char * orig ){
klauss 0:4d17cd9c8f9d 784 // FIXME trocar 100 para itoa( 100 ... )
klauss 0:4d17cd9c8f9d 785 build_generic_reply_package( buffer, orig, "100 Trying" );
klauss 0:4d17cd9c8f9d 786 return( buffer );
klauss 0:4d17cd9c8f9d 787 }
klauss 0:4d17cd9c8f9d 788
klauss 0:4d17cd9c8f9d 789 char * Sip::build_busy_package( char * buffer, unsigned char * orig ){
klauss 0:4d17cd9c8f9d 790 // FIXME trocar 100 para itoa( 100 ... )
klauss 0:4d17cd9c8f9d 791 build_generic_reply_package( buffer, orig, "486 Busy Here");
klauss 0:4d17cd9c8f9d 792 return( buffer );
klauss 0:4d17cd9c8f9d 793 }
klauss 0:4d17cd9c8f9d 794 char * Sip::build_reply_package( char * buffer, unsigned char * orig ){
klauss 0:4d17cd9c8f9d 795 char to[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 796 char from[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 797 char callid[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 798 char cseq[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 799 char via[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 800 char tag[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 801
klauss 0:4d17cd9c8f9d 802 if( decode_gettag( orig, "to: ", to ) == 0) {
klauss 0:4d17cd9c8f9d 803 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 804 return NULL;
klauss 0:4d17cd9c8f9d 805 }
klauss 0:4d17cd9c8f9d 806 if( decode_gettag( orig, "from: ", from ) == 0) {
klauss 0:4d17cd9c8f9d 807 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 808 return NULL;
klauss 0:4d17cd9c8f9d 809 }
klauss 0:4d17cd9c8f9d 810 if( decode_gettag( orig, "call-id: ", callid ) == 0 ) {
klauss 0:4d17cd9c8f9d 811 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 812 return NULL;
klauss 0:4d17cd9c8f9d 813 }
klauss 0:4d17cd9c8f9d 814 if( decode_gettag( orig, "cseq: ", cseq) == 0 ) {
klauss 0:4d17cd9c8f9d 815 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 816 return NULL;
klauss 0:4d17cd9c8f9d 817 }
klauss 0:4d17cd9c8f9d 818 if( decode_gettag( orig, "via: ", via) == 0 ) {
klauss 0:4d17cd9c8f9d 819 buffer[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 820 return NULL;
klauss 0:4d17cd9c8f9d 821 }
klauss 0:4d17cd9c8f9d 822
klauss 0:4d17cd9c8f9d 823 if (strlen(via) > 6) {
klauss 0:4d17cd9c8f9d 824 if (strcasecmp(";rport",via+strlen(via)-6)==0) {
klauss 0:4d17cd9c8f9d 825 via[strlen(via)-6] = 0;
klauss 0:4d17cd9c8f9d 826 }
klauss 0:4d17cd9c8f9d 827 }
klauss 0:4d17cd9c8f9d 828 fill_random(tag,18);
klauss 0:4d17cd9c8f9d 829
klauss 0:4d17cd9c8f9d 830 strcpy( buffer, "SIP/2.0 200 OK\r\n" );
klauss 0:4d17cd9c8f9d 831 strcat( buffer, "To: " );
klauss 0:4d17cd9c8f9d 832 strcat( buffer, to );
klauss 0:4d17cd9c8f9d 833 strcat( buffer, ";tag=" );
klauss 0:4d17cd9c8f9d 834 strcat( buffer, tag );
klauss 0:4d17cd9c8f9d 835 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 836
klauss 0:4d17cd9c8f9d 837 strcat( buffer, "From: " );
klauss 0:4d17cd9c8f9d 838 strcat( buffer, from );
klauss 0:4d17cd9c8f9d 839 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 840
klauss 0:4d17cd9c8f9d 841 strcat( buffer, "Call-ID: " );
klauss 0:4d17cd9c8f9d 842 strcat( buffer, callid );
klauss 0:4d17cd9c8f9d 843 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 844
klauss 0:4d17cd9c8f9d 845 strcat( buffer, "CSeq: " );
klauss 0:4d17cd9c8f9d 846 strcat( buffer, cseq );
klauss 0:4d17cd9c8f9d 847 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 848
klauss 0:4d17cd9c8f9d 849 strcat( buffer, "Via: " );
klauss 0:4d17cd9c8f9d 850 strcat( buffer, via );
klauss 0:4d17cd9c8f9d 851 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 852
klauss 0:4d17cd9c8f9d 853 strcat( buffer, "Server: VZtech/pabxdriver-" );
klauss 0:4d17cd9c8f9d 854 strcat( buffer, SVNREV );
klauss 0:4d17cd9c8f9d 855 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 856 strcat( buffer, "Content-Length: 0\r\n" );
klauss 0:4d17cd9c8f9d 857 strcat( buffer, SIP_ALLOW );
klauss 0:4d17cd9c8f9d 858 strcat( buffer, "\r\n\r\n" );
klauss 0:4d17cd9c8f9d 859
klauss 0:4d17cd9c8f9d 860 buffer[ SIP_MAXMSGSIZE - 1 ] = 0;
klauss 0:4d17cd9c8f9d 861 return( buffer );
klauss 0:4d17cd9c8f9d 862 }
klauss 0:4d17cd9c8f9d 863 char * Sip::fill_random16h(char * buffer ){
klauss 0:4d17cd9c8f9d 864 fill_random( buffer, 16 );
klauss 0:4d17cd9c8f9d 865 buffer[ 7 ] = '-';
klauss 0:4d17cd9c8f9d 866 return( buffer );
klauss 0:4d17cd9c8f9d 867 }
klauss 0:4d17cd9c8f9d 868
klauss 0:4d17cd9c8f9d 869 char * Sip::fill_random( char * buffer, int size ){
klauss 0:4d17cd9c8f9d 870 static uint16_t seed = time( NULL );
klauss 0:4d17cd9c8f9d 871 seed += 1;
klauss 0:4d17cd9c8f9d 872 srand( seed );
klauss 0:4d17cd9c8f9d 873
klauss 0:4d17cd9c8f9d 874 int i;
klauss 0:4d17cd9c8f9d 875 for (i=0; i<size; i++) {
klauss 0:4d17cd9c8f9d 876 buffer[ i ] = fill_random_aux[ rand() & 0x3f ];
klauss 0:4d17cd9c8f9d 877 }
klauss 0:4d17cd9c8f9d 878 buffer[ size ] = 0;
klauss 0:4d17cd9c8f9d 879 return( buffer );
klauss 0:4d17cd9c8f9d 880 }
klauss 0:4d17cd9c8f9d 881
klauss 0:4d17cd9c8f9d 882 int Sip::get_cseq( void ){
klauss 0:4d17cd9c8f9d 883 static unsigned int cseq = 0;
klauss 0:4d17cd9c8f9d 884 if( cseq == 0 ) {
klauss 0:4d17cd9c8f9d 885 /* initial value, random number */
klauss 0:4d17cd9c8f9d 886 cseq = rand();
klauss 0:4d17cd9c8f9d 887 cseq &= 0x7fff;
klauss 0:4d17cd9c8f9d 888 }
klauss 0:4d17cd9c8f9d 889 cseq++;
klauss 0:4d17cd9c8f9d 890 cseq &= 0x7fff;
klauss 0:4d17cd9c8f9d 891 if( cseq == 0 ) cseq++;
klauss 0:4d17cd9c8f9d 892 return cseq;
klauss 0:4d17cd9c8f9d 893 }
klauss 0:4d17cd9c8f9d 894
klauss 0:4d17cd9c8f9d 895 char * Sip::decode_cseq( unsigned char * package, char * cseq ){
klauss 0:4d17cd9c8f9d 896 char pkg[ 2048 ], cs[ 2048 ];
klauss 0:4d17cd9c8f9d 897 if( decode_gettag( package, "cseq: ", pkg ) != 0) {
klauss 0:4d17cd9c8f9d 898 int i = 0;
klauss 0:4d17cd9c8f9d 899 strcpy( cs, pkg );
klauss 0:4d17cd9c8f9d 900 while( ( cs[ i ] != 0 ) && ( cs[ i ] != ' ' ) ) i++;
klauss 0:4d17cd9c8f9d 901 cs[ i ] = 0;
klauss 0:4d17cd9c8f9d 902 strcpy( cseq, cs );
klauss 0:4d17cd9c8f9d 903 } else {
klauss 0:4d17cd9c8f9d 904 cseq[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 905 }
klauss 0:4d17cd9c8f9d 906 return( cseq );
klauss 0:4d17cd9c8f9d 907 }
klauss 0:4d17cd9c8f9d 908
klauss 0:4d17cd9c8f9d 909 char * Sip::decode_branch( unsigned char * package, char * branch ){
klauss 0:4d17cd9c8f9d 910 char pkg[ 2048 ];
klauss 0:4d17cd9c8f9d 911 if( decode_gettag( package, "branch=", pkg ) != 0 ) {
klauss 0:4d17cd9c8f9d 912 int i = 0;
klauss 0:4d17cd9c8f9d 913 strcpy( branch, pkg );
klauss 0:4d17cd9c8f9d 914 while( ( branch[ i ] != 0 ) && ( branch[ i ] != ';' ) ) i++;
klauss 0:4d17cd9c8f9d 915 branch[ i ] = 0;
klauss 0:4d17cd9c8f9d 916 } else {
klauss 0:4d17cd9c8f9d 917 branch[ 0 ] = 0;
klauss 0:4d17cd9c8f9d 918 }
klauss 0:4d17cd9c8f9d 919 return( branch );
klauss 0:4d17cd9c8f9d 920 }
klauss 0:4d17cd9c8f9d 921 int Sip::decode_gettag( unsigned char * package, char * tag, char * out ){
klauss 0:4d17cd9c8f9d 922 int size, i, cmpsize;
klauss 0:4d17cd9c8f9d 923 cmpsize = strlen( tag );
klauss 0:4d17cd9c8f9d 924 size = strlen( ( char * )package )-cmpsize;
klauss 0:4d17cd9c8f9d 925 for ( i=0; i<size; i++) {
klauss 0:4d17cd9c8f9d 926 if( strncasecmp( tag, (char*)package+i, cmpsize ) == 0) {
klauss 0:4d17cd9c8f9d 927 char * s;
klauss 0:4d17cd9c8f9d 928 s = (char*)package+i+cmpsize;
klauss 0:4d17cd9c8f9d 929 register int j = 0;
klauss 0:4d17cd9c8f9d 930 while ((s[ j ] != '\r') && (s[ j ] != '\n')) j++;
klauss 0:4d17cd9c8f9d 931 strncpy( out, s, j ); // copy string to output
klauss 0:4d17cd9c8f9d 932 out[ j ] = 0; // terminate string
klauss 0:4d17cd9c8f9d 933 return 1; // found
klauss 0:4d17cd9c8f9d 934 }
klauss 0:4d17cd9c8f9d 935 }
klauss 0:4d17cd9c8f9d 936 return 0; // not found
klauss 0:4d17cd9c8f9d 937 }
klauss 0:4d17cd9c8f9d 938
klauss 0:4d17cd9c8f9d 939 int Sip::get_id( void ){
klauss 0:4d17cd9c8f9d 940 return this->id;
klauss 0:4d17cd9c8f9d 941 }
klauss 0:4d17cd9c8f9d 942 int Sip::get_my_rtp_port( void ){
klauss 0:4d17cd9c8f9d 943 return this->my_rtp_port;
klauss 0:4d17cd9c8f9d 944 }
klauss 0:4d17cd9c8f9d 945 inline int Sip::fill_random_rtp_port(){
klauss 0:4d17cd9c8f9d 946 // o range [ 16384 - 32767 ] eh configuravel no server
klauss 4:de46f0d9b14d 947 return ( ( this->my_ext + 16384 ) );
klauss 0:4d17cd9c8f9d 948 }
klauss 0:4d17cd9c8f9d 949
klauss 0:4d17cd9c8f9d 950 void Sip::change_sip_server(){
klauss 0:4d17cd9c8f9d 951 // just in case sip server don't answer, invite another server
klauss 0:4d17cd9c8f9d 952 // mudar para os sets
klauss 0:4d17cd9c8f9d 953 set_server_ip( get_next_server_ip( this->buffer) );
klauss 0:4d17cd9c8f9d 954 set_server_ext( get_next_server_ext() );
klauss 0:4d17cd9c8f9d 955 set_server_port( get_next_server_port() );
klauss 0:4d17cd9c8f9d 956 registry();
klauss 0:4d17cd9c8f9d 957 }
klauss 0:4d17cd9c8f9d 958
klauss 0:4d17cd9c8f9d 959 char * Sip::get_next_server_ip( char * server_ip ){
klauss 0:4d17cd9c8f9d 960 strcpy( server_ip, this->server_ip );
klauss 0:4d17cd9c8f9d 961 return server_ip;
klauss 0:4d17cd9c8f9d 962 }
klauss 0:4d17cd9c8f9d 963 int Sip::get_next_server_port(){
klauss 0:4d17cd9c8f9d 964 return this->server_port;
klauss 0:4d17cd9c8f9d 965 }
klauss 0:4d17cd9c8f9d 966 int Sip::get_next_server_ext(){
klauss 0:4d17cd9c8f9d 967 return this->peer_ext;
klauss 0:4d17cd9c8f9d 968 }
klauss 0:4d17cd9c8f9d 969 void Sip::set_server_port( int new_server_port ){
klauss 0:4d17cd9c8f9d 970 this->server_port = new_server_port;
klauss 0:4d17cd9c8f9d 971 }
klauss 0:4d17cd9c8f9d 972 void Sip::set_server_ext( int new_server_ext ){
klauss 0:4d17cd9c8f9d 973 this->peer_ext = new_server_ext;
klauss 0:4d17cd9c8f9d 974 }
klauss 0:4d17cd9c8f9d 975 void Sip::set_server_ip( char * new_server_ip ){
klauss 0:4d17cd9c8f9d 976 strcpy( this->server_ip, new_server_ip );
klauss 0:4d17cd9c8f9d 977 this->server_ip[19] = 0;
klauss 0:4d17cd9c8f9d 978 }
klauss 0:4d17cd9c8f9d 979
klauss 0:4d17cd9c8f9d 980 /* Retorna
klauss 0:4d17cd9c8f9d 981 = 0 :: ok
klauss 0:4d17cd9c8f9d 982 < 0 :: tive problemas
klauss 0:4d17cd9c8f9d 983 > 0 :: devo remover essa call do vetor de calls
klauss 0:4d17cd9c8f9d 984 */
klauss 0:4d17cd9c8f9d 985 int Sip::listen_SIP_server( void ){
klauss 14:22a35f575502 986 sock.set_blocking( false, 1 );
klauss 15:9c7456c1b6f4 987 //debug_msg("");
klauss 33:735fd60e96d8 988 //uint8_t read = sock.receiveFrom( sip_server, this->buffer, sizeof( this->buffer ) );
klauss 0:4d17cd9c8f9d 989 uint8_t read = sock.receiveFrom( sip_server, this->buffer, sizeof( this->buffer ) );
klauss 9:ffa64f38ef9c 990 if( read > 0 ){
klauss 13:ae278302dffe 991 //debug_msg( "-- SIP recebeu algo --" );
klauss 0:4d17cd9c8f9d 992 if( !( strncasecmp( buffer, "bye", strlen("bye") ) ) ){
klauss 13:ae278302dffe 993 char ans[ 2000 ];
klauss 0:4d17cd9c8f9d 994 build_reply_package( ans, (unsigned char*)buffer );
klauss 33:735fd60e96d8 995 //sock.sendTo( sip_server, ans, sizeof( ans ) );
klauss 38:af5ecd6997ab 996 sock.sendTo( sip_server, ans, 768 );
klauss 33:735fd60e96d8 997 if( debug_sip ) debug_msg("Server request BYE to %d ext", my_ext );
klauss 0:4d17cd9c8f9d 998 return( this->my_ext );
klauss 0:4d17cd9c8f9d 999 }else if( !( strncasecmp( buffer, "options", strlen("options") ) ) ){
klauss 13:ae278302dffe 1000 char ans[ 2000 ];
klauss 33:735fd60e96d8 1001 if( debug_sip ) debug_msg("Options received ");
klauss 0:4d17cd9c8f9d 1002 build_reply_package( ans, (unsigned char*)buffer );
klauss 33:735fd60e96d8 1003 //sock.sendTo( sip_server, ans, sizeof( ans ) );
klauss 33:735fd60e96d8 1004 sock.sendTo( sip_server, ans, 512 );
klauss 0:4d17cd9c8f9d 1005 }
klauss 0:4d17cd9c8f9d 1006 }
klauss 0:4d17cd9c8f9d 1007 return( 0 );
klauss 0:4d17cd9c8f9d 1008 }
klauss 0:4d17cd9c8f9d 1009
klauss 0:4d17cd9c8f9d 1010 void Sip::set_ext( int ext ){
klauss 0:4d17cd9c8f9d 1011 my_ext = ext;
klauss 0:4d17cd9c8f9d 1012 }
klauss 0:4d17cd9c8f9d 1013
klauss 0:4d17cd9c8f9d 1014 void Sip::set_port( int port ){
klauss 0:4d17cd9c8f9d 1015 my_port = port;
klauss 0:4d17cd9c8f9d 1016 }
klauss 0:4d17cd9c8f9d 1017
klauss 0:4d17cd9c8f9d 1018 void Sip::send_bye( void ){
klauss 0:4d17cd9c8f9d 1019 build_bye_package( this->buffer );
klauss 0:4d17cd9c8f9d 1020 sock.sendTo( sip_server, build_bye_package( this->buffer ), sizeof( this->buffer ) );
klauss 0:4d17cd9c8f9d 1021 }
klauss 0:4d17cd9c8f9d 1022
klauss 0:4d17cd9c8f9d 1023 void Sip::send_unregistry_pkg(){
klauss 0:4d17cd9c8f9d 1024 build_unregistry_package( this->buffer );
klauss 0:4d17cd9c8f9d 1025 for( register int i = 0; i < 7; i++ )
klauss 0:4d17cd9c8f9d 1026 sock.sendTo( sip_server, build_bye_package( this->buffer ), sizeof( this->buffer ) );
klauss 0:4d17cd9c8f9d 1027 }
klauss 0:4d17cd9c8f9d 1028
klauss 0:4d17cd9c8f9d 1029 char * Sip::build_unregistry_package( char * buffer ){
klauss 0:4d17cd9c8f9d 1030 char branch[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 1031 char tag[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 1032 char callid[ SIP_MAXFIELDSIZE ];
klauss 0:4d17cd9c8f9d 1033 fill_random16h( branch );
klauss 0:4d17cd9c8f9d 1034 fill_random( tag, 18 );
klauss 0:4d17cd9c8f9d 1035 fill_random16h( callid );
klauss 0:4d17cd9c8f9d 1036 char itoa_buffer[ 65 ];
klauss 0:4d17cd9c8f9d 1037 strcpy( buffer, "REGISTER sip:" );
klauss 0:4d17cd9c8f9d 1038 strcat( buffer, server_ip );
klauss 0:4d17cd9c8f9d 1039 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 1040 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1041 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1042 strcat( buffer, " SIP/2.0\r\nVia: SIP/2.0/UDP " );
klauss 0:4d17cd9c8f9d 1043 strcat( buffer, my_ip );
klauss 0:4d17cd9c8f9d 1044 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 1045 itoa( my_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1046 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1047 strcat( buffer, ";branch=" );
klauss 0:4d17cd9c8f9d 1048 strcat( buffer, branch );
klauss 0:4d17cd9c8f9d 1049 strcat( buffer, "\r\nFrom: " );
klauss 0:4d17cd9c8f9d 1050 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1051 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1052 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 1053 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1054 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 1055 strcat( buffer, server_ip );
klauss 0:4d17cd9c8f9d 1056 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 1057 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1058 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1059 strcat( buffer, ">;tag=" );
klauss 0:4d17cd9c8f9d 1060 strcat( buffer, tag );
klauss 0:4d17cd9c8f9d 1061 strcat( buffer, "\r\nTo: " );
klauss 0:4d17cd9c8f9d 1062 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1063 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1064 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 1065 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1066 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1067 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 1068 strcat( buffer, server_ip );
klauss 0:4d17cd9c8f9d 1069 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 1070 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1071 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1072 strcat( buffer, ">\r\nCall-ID: " );
klauss 0:4d17cd9c8f9d 1073 strcat( buffer, callid );
klauss 0:4d17cd9c8f9d 1074 strcat( buffer, "\r\nCSeq: " );
klauss 0:4d17cd9c8f9d 1075 itoa( get_cseq(), itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1076 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1077 strcat( buffer, " REGISTER\r\n" );
klauss 0:4d17cd9c8f9d 1078 strcat( buffer, "Max-Forwards: " );
klauss 0:4d17cd9c8f9d 1079 itoa( 70, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1080 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1081 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 1082
klauss 0:4d17cd9c8f9d 1083 strcat( buffer, "Contact: " );
klauss 0:4d17cd9c8f9d 1084 itoa( my_ext, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1085 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1086 strcat( buffer, " <sip:" );
klauss 0:4d17cd9c8f9d 1087 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1088 strcat( buffer, "@" );
klauss 0:4d17cd9c8f9d 1089 strcat( buffer, my_ip );
klauss 0:4d17cd9c8f9d 1090 strcat( buffer, ":" );
klauss 0:4d17cd9c8f9d 1091 itoa( server_port, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1092 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1093 strcat( buffer, ">;expires=0\r\n" );
klauss 0:4d17cd9c8f9d 1094 /*
klauss 0:4d17cd9c8f9d 1095 strcat( buffer, ">;expires=" );
klauss 0:4d17cd9c8f9d 1096 itoa( 0, itoa_buffer, 10 );
klauss 0:4d17cd9c8f9d 1097 strcat( buffer, itoa_buffer );
klauss 0:4d17cd9c8f9d 1098 strcat( buffer, "\r\n" );
klauss 0:4d17cd9c8f9d 1099 */
klauss 0:4d17cd9c8f9d 1100
klauss 0:4d17cd9c8f9d 1101 strcat( buffer, "User-Agent: VZtech/pabxdriver-" );
klauss 0:4d17cd9c8f9d 1102 strcat( buffer, SVNREV );
klauss 0:4d17cd9c8f9d 1103 strcat( buffer, "\r\nContent-Length: 0\r\n" );
klauss 0:4d17cd9c8f9d 1104 strcat( buffer, SIP_ALLOW );
klauss 0:4d17cd9c8f9d 1105 strcat( buffer, "\r\n\r\n" );
klauss 0:4d17cd9c8f9d 1106 buffer[ SIP_MAXMSGSIZE - 1 ] = 0;
klauss 0:4d17cd9c8f9d 1107 return buffer;
klauss 0:4d17cd9c8f9d 1108 }