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@119:ee6a53069455, 2015-04-30 (annotated)

Committer:
klauss
Date:
Thu Apr 30 15:42:41 2015 +0000
Revision:
119:ee6a53069455
Parent:
114:472502b31a12
Child:
121:ee02790d00b7
funcionalidade - clock "ogro" - implementada

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