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@87:679ee0d594a9, 2015-01-06 (annotated)

Committer:
klauss
Date:
Tue Jan 06 16:37:03 2015 +0000
Revision:
87:679ee0d594a9
Parent:
86:bf7b0d4c3232
Child:
89:0fe315117b00
rx buffer resized

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