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

prompt.cpp@43:455522f98de5, 2014-10-06 (annotated)

Committer:
klauss
Date:
Mon Oct 06 14:31:54 2014 +0000
Revision:
43:455522f98de5
Parent:
42:480335bdde12
Child:
44:cc4996469404
prompt tcp ainda em validacao, conseguindo fazer ligacoes

Who changed what in which revision?

UserRevisionLine numberNew contents of line
klauss 19:ab2088e0dec6 1 #include "mbed.h"
klauss 19:ab2088e0dec6 2 #include "stdint.h"
klauss 19:ab2088e0dec6 3 #include "configs.h"
klauss 19:ab2088e0dec6 4 #include "vz_protocol.h"
klauss 19:ab2088e0dec6 5 #include "parallelcpld.h"
Cola 21:0bd688722e81 6 #include "flood.h"
klauss 28:94aec56c6329 7 #include "debug.h"
Cola 24:270b436a1bb0 8
klauss 41:69bf7091c2ca 9 TCPSocketServer server;
klauss 41:69bf7091c2ca 10 TCPSocketConnection client;
klauss 41:69bf7091c2ca 11 Timer tcp_timer;
klauss 41:69bf7091c2ca 12
klauss 28:94aec56c6329 13 uint8_t debug_alive = 0;
klauss 28:94aec56c6329 14 uint8_t debug_sip = 0;
klauss 29:7246460b73f8 15 uint8_t debug_vector = 0;
klauss 29:7246460b73f8 16 uint8_t debug_cb = 0;
klauss 30:8dfb6d8de53d 17 uint8_t debug_main = 0;
klauss 31:bb5fb28a77df 18 uint8_t debug_cks = 0;
Cola 22:d2a4b5939115 19 uint8_t pcks_s = 0;
Cola 24:270b436a1bb0 20 uint8_t pshowcb = 0;
klauss 31:bb5fb28a77df 21 uint8_t debug_cb_rx = 0;
klauss 31:bb5fb28a77df 22 uint8_t debug_cb_tx = 0;
klauss 31:bb5fb28a77df 23 uint8_t debug_eth_rx = 0;
klauss 31:bb5fb28a77df 24 uint8_t debug_eth_tx = 0;
klauss 43:455522f98de5 25 uint8_t debug_prompt_eth = 0;
klauss 31:bb5fb28a77df 26 uint8_t debug_file = 0;
klauss 38:af5ecd6997ab 27 bool from_eth = false;
klauss 42:480335bdde12 28 bool udp_request = false;
klauss 42:480335bdde12 29 bool tcp_session = false;
klauss 41:69bf7091c2ca 30 bool udp_pkg;
klauss 28:94aec56c6329 31
klauss 29:7246460b73f8 32 uint8_t test_debug = 1;
klauss 42:480335bdde12 33 #define PVERSION 3 // Sempre atualizar a versao do prompt
klauss 19:ab2088e0dec6 34
Cola 21:0bd688722e81 35 #define DEBUGBUFSIZE 50
klauss 35:96885a7931f0 36 char __debug_buf__[DEBUGBUFSIZE];
klauss 35:96885a7931f0 37 char * debug_buf = __debug_buf__;
klauss 30:8dfb6d8de53d 38 char last_debug_buf[ DEBUGBUFSIZE ] = "help";
klauss 28:94aec56c6329 39 FILE *fip, *fmask, *fgate, *fport, *fsip, *fsport, *fext, *fserext;
klauss 42:480335bdde12 40 //uint8_t dog = 1;
klauss 19:ab2088e0dec6 41 uint8_t debug_prompt = 0;
klauss 19:ab2088e0dec6 42 uint8_t bufptr = 0;
klauss 35:96885a7931f0 43 uint8_t last_bufptr = 0;
klauss 19:ab2088e0dec6 44
klauss 19:ab2088e0dec6 45 uint8_t xmemmatch(const uint8_t * s1, const uint8_t * s2, uint16_t size) { // presente da lib.h pode retirar da versao final
klauss 19:ab2088e0dec6 46 while (size--) {
klauss 19:ab2088e0dec6 47 if (*s1++ != *s2++) return 0; /* does not match */
klauss 19:ab2088e0dec6 48 }
klauss 19:ab2088e0dec6 49 return 1; /* matches */
klauss 19:ab2088e0dec6 50 }
klauss 19:ab2088e0dec6 51
klauss 19:ab2088e0dec6 52 uint8_t xstrmatch(const uint8_t * s1, const uint8_t * s2) { // presente na lib.h pode retirar da versao final
klauss 19:ab2088e0dec6 53 while (*s1) {
klauss 19:ab2088e0dec6 54 if (*s1++ != *s2++) return 0; /* does not match */
klauss 19:ab2088e0dec6 55 }
klauss 19:ab2088e0dec6 56 if ( *s2 == 0 )
klauss 19:ab2088e0dec6 57 return 1; /* matches */
klauss 19:ab2088e0dec6 58 else
klauss 19:ab2088e0dec6 59 return 0; /* does not match */
klauss 19:ab2088e0dec6 60 }
klauss 19:ab2088e0dec6 61
klauss 19:ab2088e0dec6 62 void xmemcpy(uint8_t * dest, const uint8_t * src, uint16_t size) { // presente na lib.h pode retirar da versao final
klauss 19:ab2088e0dec6 63 while (size--) *dest++ = *src++;
klauss 19:ab2088e0dec6 64 }
klauss 19:ab2088e0dec6 65
Cola 21:0bd688722e81 66 int str2uint (char * s, unsigned int * val) {
Cola 21:0bd688722e81 67 int i = 0;
Cola 21:0bd688722e81 68 unsigned int ret = 0;
Cola 21:0bd688722e81 69 for (;;) {
Cola 21:0bd688722e81 70 if (s[i] < '0') {
Cola 21:0bd688722e81 71 *val = ret;
Cola 21:0bd688722e81 72 return i;
Cola 21:0bd688722e81 73 }
Cola 21:0bd688722e81 74 ret *= 10;
Cola 21:0bd688722e81 75 ret += s[i] - '0';
Cola 21:0bd688722e81 76 i++;
Cola 21:0bd688722e81 77 }
Cola 21:0bd688722e81 78 }
klauss 19:ab2088e0dec6 79
klauss 38:af5ecd6997ab 80 // Print the content of a given file
klauss 38:af5ecd6997ab 81 void cat(const char* fname){
klauss 19:ab2088e0dec6 82 char buff[513];
klauss 19:ab2088e0dec6 83 int num;
klauss 19:ab2088e0dec6 84
klauss 19:ab2088e0dec6 85 FILE *fp = fopen(fname, "r");
klauss 19:ab2088e0dec6 86 if (fp == NULL) {
klauss 42:480335bdde12 87 if( debug_file ) pc.printf( "Failed to open %s", fname);
klauss 19:ab2088e0dec6 88 return;
klauss 19:ab2088e0dec6 89 }
klauss 19:ab2088e0dec6 90
klauss 42:480335bdde12 91 while( ( num = fread( buff, 1, 512, fp ) ) > 0 ){
klauss 42:480335bdde12 92 buff[ num ] = '\0';
klauss 42:480335bdde12 93 pc.printf( buff );
klauss 42:480335bdde12 94 if( from_eth ){
klauss 42:480335bdde12 95 if( tcp_session ) client.send_all( buff, strlen( buff ) );
klauss 42:480335bdde12 96 }
klauss 19:ab2088e0dec6 97 }
klauss 19:ab2088e0dec6 98 fclose(fp);
klauss 19:ab2088e0dec6 99 }
klauss 19:ab2088e0dec6 100
klauss 28:94aec56c6329 101 // operantion with the system config files
klauss 42:480335bdde12 102 void files( const char type ){
klauss 42:480335bdde12 103 // show files
klauss 42:480335bdde12 104 if (type == 's' ){
klauss 42:480335bdde12 105 pc.printf("\n\rHeader IP " );
klauss 42:480335bdde12 106 if( from_eth ){
klauss 42:480335bdde12 107 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rHeader IP " );
klauss 42:480335bdde12 108 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 109 }
klauss 19:ab2088e0dec6 110 cat("/qspi/myip.txt");
klauss 42:480335bdde12 111
klauss 28:94aec56c6329 112 pc.printf("\n\rHeader ext ");
klauss 42:480335bdde12 113 if( from_eth ){
klauss 42:480335bdde12 114 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rHeader ext " );
klauss 42:480335bdde12 115 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 116 }
klauss 28:94aec56c6329 117 cat("/qspi/myext.txt");
klauss 42:480335bdde12 118
klauss 28:94aec56c6329 119 pc.printf("\n\rHeader port ");
klauss 42:480335bdde12 120 if( from_eth ){
klauss 42:480335bdde12 121 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rHeader port " );
klauss 42:480335bdde12 122 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 123 }
klauss 28:94aec56c6329 124 cat("/qspi/mysipport.txt");
klauss 28:94aec56c6329 125
klauss 42:480335bdde12 126 pc.printf("\n\rServer IP ");
klauss 42:480335bdde12 127 if( from_eth ){
klauss 42:480335bdde12 128 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rServer IP " );
klauss 42:480335bdde12 129 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 130 }
klauss 28:94aec56c6329 131 cat("/qspi/serverip.txt");
klauss 42:480335bdde12 132
klauss 28:94aec56c6329 133 pc.printf("\n\rServer ext ");
klauss 42:480335bdde12 134 if( from_eth ){
klauss 42:480335bdde12 135 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rServer ext " );
klauss 42:480335bdde12 136 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 137 }
klauss 28:94aec56c6329 138 cat("/qspi/peerext.txt");
klauss 42:480335bdde12 139
klauss 28:94aec56c6329 140 pc.printf("\n\rServer port ");
klauss 42:480335bdde12 141 if( from_eth ){
klauss 42:480335bdde12 142 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rServer port " );
klauss 42:480335bdde12 143 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 144 }
klauss 28:94aec56c6329 145 cat("/qspi/serverport.txt");
klauss 28:94aec56c6329 146
klauss 28:94aec56c6329 147 pc.printf("\n\rMascara de rede ");
klauss 42:480335bdde12 148 if( from_eth ){
klauss 42:480335bdde12 149 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rMascara de rede " );
klauss 42:480335bdde12 150 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 151 }
klauss 19:ab2088e0dec6 152 cat("/qspi/mymask.txt");
klauss 42:480335bdde12 153
klauss 28:94aec56c6329 154 pc.printf("\n\rGateway IP ");
klauss 42:480335bdde12 155 if( from_eth ){
klauss 42:480335bdde12 156 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rGateway IP " );
klauss 42:480335bdde12 157 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 158 }
klauss 19:ab2088e0dec6 159 cat("/qspi/mygate.txt");
klauss 43:455522f98de5 160
klauss 43:455522f98de5 161 debug_buf[ 0 ] = 0;
klauss 43:455522f98de5 162 bufptr = 0;
klauss 19:ab2088e0dec6 163 }
klauss 19:ab2088e0dec6 164
klauss 19:ab2088e0dec6 165 if (type == 'c' ){ // close all files
klauss 28:94aec56c6329 166 fclose( fip );
klauss 28:94aec56c6329 167 fclose( fmask );
klauss 28:94aec56c6329 168 fclose( fgate );
klauss 28:94aec56c6329 169 fclose( fport );
klauss 28:94aec56c6329 170 fclose( fsip );
klauss 28:94aec56c6329 171 fclose( fsport );
klauss 28:94aec56c6329 172 fclose( fext );
klauss 28:94aec56c6329 173 fclose( fserext );
klauss 19:ab2088e0dec6 174 }
klauss 19:ab2088e0dec6 175
klauss 19:ab2088e0dec6 176 if (type == 'i' ){ // Check if files exist, if not create the files
klauss 33:735fd60e96d8 177 bool exists = true;
klauss 19:ab2088e0dec6 178 fip = fopen("/qspi/myip.txt", "r");
klauss 19:ab2088e0dec6 179 if (fip == NULL){
klauss 19:ab2088e0dec6 180 fip = fopen("/qspi/myip.txt", "w");
klauss 29:7246460b73f8 181 //fprintf(fip, "%s\n\r",__MY_IP__); //myip
klauss 43:455522f98de5 182 fprintf(fip, "%s\n\r",__MY_IP__); //myip
klauss 33:735fd60e96d8 183 exists = false;
klauss 19:ab2088e0dec6 184 }
klauss 28:94aec56c6329 185
klauss 28:94aec56c6329 186 fserext = fopen("/qspi/myext.txt", "r");
klauss 28:94aec56c6329 187 if ( fserext == NULL ){
klauss 28:94aec56c6329 188 fserext = fopen("/qspi/myext.txt", "w");
klauss 38:af5ecd6997ab 189 fprintf( fserext, "%i\n\r" ,__MY_EXT__ ); //asterisk ext
klauss 33:735fd60e96d8 190 exists = false;
klauss 28:94aec56c6329 191 }
klauss 28:94aec56c6329 192 fport = fopen("/qspi/mysipport.txt", "r");
klauss 28:94aec56c6329 193 if (fport == NULL){
klauss 28:94aec56c6329 194 fport = fopen("/qspi/mysipport.txt", "w");
klauss 38:af5ecd6997ab 195 fprintf(fport, "%i\n\r",__MY_PORT__); //mysipport
klauss 33:735fd60e96d8 196 exists = false;
klauss 28:94aec56c6329 197 }
klauss 28:94aec56c6329 198 fsip = fopen("/qspi/serverip.txt", "r");
klauss 28:94aec56c6329 199 if (fsip == NULL){
klauss 28:94aec56c6329 200 fsip = fopen("/qspi/serverip.txt", "w");
klauss 29:7246460b73f8 201 //fprintf(fsip, "%s\n\r",__SERVER_IP__ ); //asterisk ip
klauss 43:455522f98de5 202 fprintf(fsip, "%s\n\r",__SERVER_IP__ ); //asterisk ip
klauss 33:735fd60e96d8 203 exists = false;
klauss 28:94aec56c6329 204 }
klauss 28:94aec56c6329 205
klauss 28:94aec56c6329 206 fext = fopen("/qspi/peerext.txt", "r");
klauss 28:94aec56c6329 207 if ( fext == NULL ){
klauss 28:94aec56c6329 208 fext = fopen("/qspi/peerext.txt", "w");
klauss 38:af5ecd6997ab 209 fprintf( fext, "%i\n\r",__PEER_EXT__ ); //asterisk ip
klauss 33:735fd60e96d8 210 exists = false;
klauss 28:94aec56c6329 211 }
klauss 28:94aec56c6329 212 fsport = fopen("/qspi/serverport.txt", "r");
klauss 28:94aec56c6329 213 if (fsport == NULL){
klauss 28:94aec56c6329 214 fsport = fopen("/qspi/serverport.txt", "w");
klauss 38:af5ecd6997ab 215 fprintf(fsport, "%i\n\r",__SERVER_PORT__ ); //asterisk port
klauss 33:735fd60e96d8 216 exists = false;
klauss 28:94aec56c6329 217 }
klauss 28:94aec56c6329 218
klauss 19:ab2088e0dec6 219 fmask = fopen("/qspi/mymask.txt", "r");
klauss 19:ab2088e0dec6 220 if (fmask == NULL){
klauss 19:ab2088e0dec6 221 fmask = fopen("/qspi/mymask.txt", "w");
klauss 43:455522f98de5 222 fprintf(fmask, "%s\n\r",__MY_MSK__); //mymask
klauss 33:735fd60e96d8 223 exists = false;
klauss 19:ab2088e0dec6 224 }
klauss 19:ab2088e0dec6 225 fgate = fopen("/qspi/mygateway.txt", "r");
klauss 19:ab2088e0dec6 226 if (fgate == NULL){
klauss 19:ab2088e0dec6 227 fgate = fopen("/qspi/mygate.txt", "w");
klauss 43:455522f98de5 228 fprintf(fgate, "%s\n\r",__MY_GTW__); //mygateway
klauss 33:735fd60e96d8 229 exists = false;
klauss 19:ab2088e0dec6 230 }
klauss 33:735fd60e96d8 231 if( !exists ) pc.printf("\n\r Default configurations set! \n\r");
klauss 19:ab2088e0dec6 232 }
klauss 19:ab2088e0dec6 233
klauss 19:ab2088e0dec6 234 if (type == 'r' ){ // Just open for read
klauss 19:ab2088e0dec6 235 fip = fopen("/qspi/myip.txt", "r");
klauss 19:ab2088e0dec6 236 fmask = fopen("/qspi/mymask.txt", "r");
klauss 19:ab2088e0dec6 237 fgate = fopen("/qspi/mygateway.txt", "r");
klauss 19:ab2088e0dec6 238 fport = fopen("/qspi/mysipport.txt", "r");
klauss 19:ab2088e0dec6 239 fsip = fopen("/qspi/serverip.txt", "r");
klauss 19:ab2088e0dec6 240 fsport = fopen("/qspi/serverport.txt", "r");
klauss 28:94aec56c6329 241 fext = fopen( "/qspi/myext.txt", "r" );
klauss 28:94aec56c6329 242 fserext = fopen( "/qspi/peerext.txt", "r" );
klauss 19:ab2088e0dec6 243 }
klauss 19:ab2088e0dec6 244
klauss 19:ab2088e0dec6 245 if (type == 'w'){ // Create and write the default configs
klauss 19:ab2088e0dec6 246 fip = fopen("/qspi/myip.txt", "w");
klauss 19:ab2088e0dec6 247 fmask = fopen("/qspi/mymask.txt", "w");
klauss 19:ab2088e0dec6 248 fgate = fopen("/qspi/mygateway.txt", "w");
klauss 19:ab2088e0dec6 249 fport = fopen("/qspi/mysipport.txt", "w");
klauss 19:ab2088e0dec6 250 fsip = fopen("/qspi/serverip.txt", "w");
klauss 19:ab2088e0dec6 251 fsport = fopen("/qspi/serverport.txt", "w");
klauss 28:94aec56c6329 252 fext = fopen( "/qspi/myext.txt", "w" );
klauss 28:94aec56c6329 253 fserext = fopen( "/qspi/peerext.txt", "w" );
klauss 19:ab2088e0dec6 254
klauss 29:7246460b73f8 255 //fprintf( fip, "%s\n\r", __MY_IP__ ); //myip
klauss 29:7246460b73f8 256 fprintf( fip, "%s", __MY_IP__ ); //myip
klauss 43:455522f98de5 257 fprintf( fport, "%i", __MY_PORT__ ); //mysipport
klauss 38:af5ecd6997ab 258 fprintf( fext, "%i\n\r", __MY_EXT__ ); //myext
klauss 28:94aec56c6329 259
klauss 29:7246460b73f8 260 //fprintf( fsip, "%s\n\r", __SERVER_IP__ ); //asterisk ip
klauss 29:7246460b73f8 261 fprintf( fsip, "%s", __SERVER_IP__ ); //asterisk ip
klauss 38:af5ecd6997ab 262 fprintf( fserext, "%i\n\r",__PEER_EXT__ ); //asterisk port
klauss 38:af5ecd6997ab 263 fprintf( fsport, "%i\n\r",__SERVER_PORT__ ); //asterisk port
klauss 28:94aec56c6329 264
klauss 31:bb5fb28a77df 265 fprintf( fmask, "%s",__MY_MSK__ ); //mymask
klauss 43:455522f98de5 266 fprintf( fgate, "%i\n\r", __MY_GTW__ ); //mygateway
klauss 19:ab2088e0dec6 267
klauss 19:ab2088e0dec6 268 files('c');
klauss 19:ab2088e0dec6 269
klauss 19:ab2088e0dec6 270 pc.printf("\n\r Default configurations set! \n\r");
klauss 19:ab2088e0dec6 271
klauss 19:ab2088e0dec6 272 }
klauss 19:ab2088e0dec6 273
klauss 19:ab2088e0dec6 274 }
klauss 26:725cbbedadd5 275 void init_fsystem(){
klauss 26:725cbbedadd5 276 // init file system and check if files exist
klauss 26:725cbbedadd5 277 if (!qspifs.isformatted()) {
klauss 26:725cbbedadd5 278 qspifs.format();
klauss 26:725cbbedadd5 279 pc.printf("File system configured!!\n\r");
klauss 26:725cbbedadd5 280 }
klauss 26:725cbbedadd5 281 files('i'); // check if the files are created
klauss 26:725cbbedadd5 282 files('c');
klauss 43:455522f98de5 283 pc.printf("*******System Ready*******\n\r");
klauss 43:455522f98de5 284 }
klauss 43:455522f98de5 285
klauss 43:455522f98de5 286 void init_prompt(){
klauss 41:69bf7091c2ca 287 server.bind( TCP_PORT_LISTENER );
klauss 41:69bf7091c2ca 288 server.listen();
klauss 41:69bf7091c2ca 289 tcp_timer.start();
klauss 41:69bf7091c2ca 290 server.set_blocking( false, 1 );
klauss 43:455522f98de5 291 pc.printf("*******Prompt eth Ready*******\n\r");
klauss 19:ab2088e0dec6 292 }
klauss 19:ab2088e0dec6 293
klauss 28:94aec56c6329 294 // main prompt process
klauss 41:69bf7091c2ca 295 char * prompt_process( char * msg_to_eth ){
klauss 28:94aec56c6329 296 //FIXME dar flush na serial
klauss 19:ab2088e0dec6 297 volatile char b = 0;
klauss 19:ab2088e0dec6 298 static uint8_t bufret = 0;
klauss 30:8dfb6d8de53d 299 static Timer flood_timeout;
klauss 36:728498a78e1e 300 bool miss_match = true;
klauss 41:69bf7091c2ca 301 char buffer[ 1024 ];
klauss 42:480335bdde12 302 do{
klauss 42:480335bdde12 303 if( flood_timeout.read() > 60 ){
klauss 42:480335bdde12 304 pflood = 0;
klauss 42:480335bdde12 305 flood_timeout.stop();
klauss 42:480335bdde12 306 flood_timeout.reset();
klauss 42:480335bdde12 307 }
klauss 42:480335bdde12 308 if( tcp_timer.read() > 3 || tcp_session ){
klauss 42:480335bdde12 309 wdt.kick();
klauss 42:480335bdde12 310 tcp_timer.reset();
klauss 42:480335bdde12 311 if( tcp_session ){
klauss 42:480335bdde12 312 while( tcp_timer.read() < 30 ){
klauss 42:480335bdde12 313 client.set_blocking( false, 1 );
klauss 42:480335bdde12 314 int n = client.receive( buffer, sizeof( buffer ) );
klauss 42:480335bdde12 315 if( n > 0 ){
klauss 42:480335bdde12 316 wdt.kick();
klauss 42:480335bdde12 317 tcp_timer.reset();
klauss 42:480335bdde12 318 buffer[ n - 2 ] = 0;
klauss 42:480335bdde12 319 bufptr = n - 2;
klauss 42:480335bdde12 320 if( !( strcmp( buffer, "quit" ) ) ){
klauss 43:455522f98de5 321 if( debug_prompt_eth ) pc.printf( "\n\rquit request\n\r" );
klauss 42:480335bdde12 322 debug_buf = __debug_buf__;
klauss 42:480335bdde12 323 bufptr = last_bufptr;
klauss 42:480335bdde12 324 tcp_session = false;
klauss 42:480335bdde12 325 client.close();
klauss 42:480335bdde12 326 bufret = 0;
klauss 42:480335bdde12 327 return( NULL );
klauss 42:480335bdde12 328 }
klauss 42:480335bdde12 329 from_eth = true;
klauss 42:480335bdde12 330 bufret = 1;
klauss 42:480335bdde12 331 break;
klauss 42:480335bdde12 332 }
klauss 42:480335bdde12 333 }
klauss 42:480335bdde12 334 }else{
klauss 42:480335bdde12 335 if( !server.accept( client ) ){
klauss 42:480335bdde12 336 tcp_session = true;
klauss 42:480335bdde12 337 from_eth = true;
klauss 41:69bf7091c2ca 338 last_bufptr = bufptr;
klauss 42:480335bdde12 339 buffer[ 0 ] = '\0';
klauss 41:69bf7091c2ca 340 debug_buf = buffer;
klauss 42:480335bdde12 341 bufptr = 0;
klauss 42:480335bdde12 342 bufret = 0;
klauss 41:69bf7091c2ca 343 }
klauss 41:69bf7091c2ca 344 }
klauss 41:69bf7091c2ca 345 if( tcp_timer.read() >= 30 ){
klauss 41:69bf7091c2ca 346 tcp_timer.reset();
klauss 42:480335bdde12 347 tcp_session = false;
klauss 41:69bf7091c2ca 348 debug_buf = __debug_buf__;
klauss 41:69bf7091c2ca 349 bufptr = last_bufptr;
klauss 41:69bf7091c2ca 350 bufret = 0;
klauss 42:480335bdde12 351 from_eth = false;
klauss 42:480335bdde12 352 tcp_session = false;
klauss 41:69bf7091c2ca 353 return( NULL );
klauss 41:69bf7091c2ca 354 }
klauss 42:480335bdde12 355 }else if( !tcp_session ){
klauss 42:480335bdde12 356 if( msg_to_eth == NULL ){
klauss 42:480335bdde12 357 if ( pc.readable() ){
klauss 42:480335bdde12 358 // imput do teclado
klauss 42:480335bdde12 359 b = pc.getc();
klauss 42:480335bdde12 360
klauss 42:480335bdde12 361 if( b == 0x0D ){ // enter
klauss 42:480335bdde12 362 bufret = 1;
klauss 42:480335bdde12 363 }else{
klauss 42:480335bdde12 364 pc.putc( b );
klauss 42:480335bdde12 365 if( b == 0x08 || b == 0x7F ){ // BS | DEL
klauss 42:480335bdde12 366 if( bufptr > 0 ) debug_buf[ --bufptr ] = 0;
klauss 42:480335bdde12 367 }else if( b == 0x09 ){
klauss 42:480335bdde12 368 // ignore tab
klauss 42:480335bdde12 369 }else{
klauss 42:480335bdde12 370 debug_buf[bufptr] = b;
klauss 42:480335bdde12 371 bufptr++;
klauss 42:480335bdde12 372 }
klauss 42:480335bdde12 373 }
klauss 42:480335bdde12 374 }
klauss 29:7246460b73f8 375 }else{
klauss 42:480335bdde12 376 last_bufptr = bufptr;
klauss 42:480335bdde12 377 bufptr = strlen( msg_to_eth );
klauss 42:480335bdde12 378 debug_buf = msg_to_eth;
klauss 42:480335bdde12 379 from_eth = true;
klauss 42:480335bdde12 380 bufret = 1;
klauss 19:ab2088e0dec6 381 }
klauss 19:ab2088e0dec6 382 }
klauss 42:480335bdde12 383
klauss 42:480335bdde12 384 // Prompt commands here
klauss 42:480335bdde12 385 if ( bufret == 1 ) {
klauss 42:480335bdde12 386 static unsigned int promptcb_last_ext = 0;
klauss 42:480335bdde12 387 static unsigned int promptcb_last_port = 0;
klauss 42:480335bdde12 388 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) ".",1 )) {
klauss 42:480335bdde12 389 miss_match = false;
klauss 42:480335bdde12 390 strcpy( debug_buf, last_debug_buf );
klauss 42:480335bdde12 391 }
klauss 42:480335bdde12 392
klauss 42:480335bdde12 393 if( !bufptr ){
klauss 42:480335bdde12 394 miss_match = false;
klauss 42:480335bdde12 395 }
klauss 42:480335bdde12 396 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "ifconfig" ) ){
klauss 42:480335bdde12 397 miss_match = false;
klauss 42:480335bdde12 398 pc.printf("\n\r");
klauss 42:480335bdde12 399 files('s');
klauss 42:480335bdde12 400 }
klauss 42:480335bdde12 401 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "format" ) ){
klauss 42:480335bdde12 402 miss_match = false;
klauss 42:480335bdde12 403 pc.printf("\n Formatando o sistema de arquivos... espere o sistema reiniciar \n\r");
klauss 42:480335bdde12 404 if( from_eth ){
klauss 42:480335bdde12 405 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Formatando o sistema de arquivos... espere o sistema reiniciar\n\r");
klauss 42:480335bdde12 406 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 407 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 408 client.close();
klauss 42:480335bdde12 409 }
klauss 42:480335bdde12 410 NVIC_SystemReset();
klauss 42:480335bdde12 411 }
klauss 42:480335bdde12 412
klauss 42:480335bdde12 413 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "ipset ", 6 )) {
klauss 42:480335bdde12 414 miss_match = false;
klauss 42:480335bdde12 415 fip = fopen("/qspi/myip.txt", "w");
klauss 42:480335bdde12 416 fprintf(fip,"%s",(debug_buf+6));
klauss 42:480335bdde12 417 fclose(fip);
klauss 42:480335bdde12 418 pc.printf("\n\r");
klauss 42:480335bdde12 419 files('s');
klauss 42:480335bdde12 420 }
klauss 42:480335bdde12 421
klauss 42:480335bdde12 422 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "extset ", 7 ) ){
klauss 42:480335bdde12 423 miss_match = false;
klauss 42:480335bdde12 424 fip = fopen("/qspi/myext.txt", "w");
klauss 42:480335bdde12 425 fprintf(fip, "%s" , ( debug_buf + 7) );
klauss 42:480335bdde12 426 fclose(fip);
klauss 42:480335bdde12 427 pc.printf("\n\r");
klauss 42:480335bdde12 428 files('s');
klauss 42:480335bdde12 429 }
klauss 38:af5ecd6997ab 430
klauss 42:480335bdde12 431 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "serextset ", 10 ) ){
klauss 42:480335bdde12 432 miss_match = false;
klauss 42:480335bdde12 433 fip = fopen("/qspi/peerext.txt", "w");
klauss 42:480335bdde12 434 fprintf(fip, "%s\n\r" , ( debug_buf + 10 ) );
klauss 42:480335bdde12 435 fclose(fip);
klauss 42:480335bdde12 436 pc.printf("\n\r");
klauss 42:480335bdde12 437 files('s');
klauss 42:480335bdde12 438 }
klauss 42:480335bdde12 439
klauss 42:480335bdde12 440 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "maskset ",8 ) ){
klauss 42:480335bdde12 441 miss_match = false;
klauss 42:480335bdde12 442 fmask = fopen("/qspi/mymask.txt", "w");
klauss 42:480335bdde12 443 fprintf(fmask,"%s\n\r",(debug_buf+8));
klauss 42:480335bdde12 444 fclose(fmask);
klauss 42:480335bdde12 445 pc.printf("\n\r");
klauss 42:480335bdde12 446 files('s');
klauss 42:480335bdde12 447 }
klauss 42:480335bdde12 448
klauss 42:480335bdde12 449 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "gatewayset ",11 ) ){
klauss 42:480335bdde12 450 miss_match = false;
klauss 42:480335bdde12 451 fgate = fopen("/qspi/mygate.txt", "w");
klauss 42:480335bdde12 452 fprintf(fgate,"%s\n\r",(debug_buf+11));
klauss 42:480335bdde12 453 fclose(fgate);
klauss 42:480335bdde12 454 pc.printf("\n\r");
klauss 42:480335bdde12 455 files('s');
klauss 42:480335bdde12 456 }
klauss 42:480335bdde12 457
klauss 42:480335bdde12 458 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "msipport ",9 ) ){
klauss 42:480335bdde12 459 miss_match = false;
klauss 42:480335bdde12 460 fport = fopen("/qspi/mysipport.txt", "w");
klauss 42:480335bdde12 461 fprintf(fport,"%s\n\r",(debug_buf+9));
klauss 42:480335bdde12 462 fclose(fport);
klauss 42:480335bdde12 463 pc.printf("\n\r");
klauss 42:480335bdde12 464 files('s');
klauss 38:af5ecd6997ab 465 }
klauss 42:480335bdde12 466
klauss 42:480335bdde12 467 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "serverip ",9 ) ){
klauss 42:480335bdde12 468 miss_match = false;
klauss 42:480335bdde12 469 fsip = fopen("/qspi/serverip.txt", "w");
klauss 42:480335bdde12 470 fprintf(fsip,"%s",(debug_buf+9));
klauss 42:480335bdde12 471 fclose(fsip);
klauss 42:480335bdde12 472 pc.printf("\n\r");
klauss 42:480335bdde12 473 files('s');
klauss 36:728498a78e1e 474 }
klauss 42:480335bdde12 475
klauss 42:480335bdde12 476 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "ssport ",7 ) ){
klauss 28:94aec56c6329 477 miss_match = false;
klauss 42:480335bdde12 478 fsport = fopen("/qspi/serverport.txt", "w");
klauss 42:480335bdde12 479 fprintf(fsport,"%s\n\r",(debug_buf+7));
klauss 42:480335bdde12 480 fclose(fsport);
klauss 42:480335bdde12 481 pc.printf("\n\r");
klauss 42:480335bdde12 482 files('s');
klauss 27:98f824719d1c 483 }
klauss 42:480335bdde12 484
klauss 42:480335bdde12 485
klauss 42:480335bdde12 486 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "dconfig" ) ){
klauss 28:94aec56c6329 487 miss_match = false;
klauss 42:480335bdde12 488 files('w');
klauss 42:480335bdde12 489 files('s');
klauss 27:98f824719d1c 490 }
klauss 42:480335bdde12 491
klauss 42:480335bdde12 492 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "reset" ) ){
klauss 28:94aec56c6329 493 miss_match = false;
klauss 42:480335bdde12 494 pc.printf("\n\rJob is done\n\r");
klauss 38:af5ecd6997ab 495 if( from_eth ){
klauss 42:480335bdde12 496 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Job is done\n\r");
klauss 38:af5ecd6997ab 497 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 498 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 499 client.close();
klauss 38:af5ecd6997ab 500 }
klauss 42:480335bdde12 501 NVIC_SystemReset();
klauss 27:98f824719d1c 502 }
klauss 42:480335bdde12 503
klauss 42:480335bdde12 504 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "dog" ) ){
klauss 28:94aec56c6329 505 miss_match = false;
klauss 42:480335bdde12 506 pc.printf("\n\r MUUUUUUUuuuuUUUUUU - I'm not a dog!!!! \n\r");
klauss 38:af5ecd6997ab 507 if( from_eth ){
klauss 42:480335bdde12 508 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "MUUUUUUUuuuuUUUUUU - I'm not a dog!!!!\n\r");
klauss 38:af5ecd6997ab 509 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 38:af5ecd6997ab 510 }
klauss 42:480335bdde12 511 }
klauss 42:480335bdde12 512
klauss 42:480335bdde12 513 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "flood ",6 ) ){
klauss 42:480335bdde12 514 if (xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "on",2 ) ){
klauss 42:480335bdde12 515 miss_match = false;
klauss 42:480335bdde12 516 pc.printf("\n\r\t Flood ON\n\r\t");
klauss 42:480335bdde12 517 if( from_eth ){
klauss 42:480335bdde12 518 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Flood On\n\r" );
klauss 42:480335bdde12 519 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 520 }
klauss 42:480335bdde12 521 tflood.start();
klauss 42:480335bdde12 522 tflood.reset();
klauss 42:480335bdde12 523 floodcount =0;
klauss 42:480335bdde12 524 pflood = 1;
klauss 42:480335bdde12 525 flood_timeout.start();
klauss 42:480335bdde12 526 }
klauss 42:480335bdde12 527 if (xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "off",3 )) {
klauss 42:480335bdde12 528 miss_match = false;
klauss 42:480335bdde12 529 pc.printf("\n\r\t Flood OFF\n\r\t");
klauss 42:480335bdde12 530 if( from_eth ){
klauss 42:480335bdde12 531 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Flood Off\n\r" );
klauss 42:480335bdde12 532 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 533 }
klauss 42:480335bdde12 534 pflood = 0;
klauss 42:480335bdde12 535 tflood.stop();
klauss 42:480335bdde12 536 flood_timeout.reset();
klauss 42:480335bdde12 537 }
klauss 27:98f824719d1c 538 }
klauss 42:480335bdde12 539
klauss 42:480335bdde12 540 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug ",6 )) {
klauss 42:480335bdde12 541 if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "on",2 )) {
klauss 42:480335bdde12 542 miss_match = false;
klauss 42:480335bdde12 543 pc.printf("\n\r\tDebug ON\n\r\t");
klauss 42:480335bdde12 544 if( from_eth ){
klauss 42:480335bdde12 545 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug On\n\r" );
klauss 42:480335bdde12 546 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 547 }
klauss 42:480335bdde12 548 debug_alive = 1;
klauss 42:480335bdde12 549 }
klauss 42:480335bdde12 550 if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "off",3 )) {
klauss 42:480335bdde12 551 miss_match = false;
klauss 42:480335bdde12 552 pc.printf("\n\r\tDebug OFF\n\r\t");
klauss 42:480335bdde12 553 if( from_eth ){
klauss 42:480335bdde12 554 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug Off\n\r" );
klauss 42:480335bdde12 555 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 556 }
klauss 42:480335bdde12 557 debug_alive = 0;
klauss 42:480335bdde12 558 }
klauss 42:480335bdde12 559 if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "show",4 ) ){
klauss 42:480335bdde12 560 miss_match = false;
klauss 42:480335bdde12 561 pc.printf("\n\rdebug_sip");
klauss 42:480335bdde12 562 pc.printf("\n\rdebug_alive");
klauss 42:480335bdde12 563 pc.printf("\n\rdebug_prompt");
klauss 42:480335bdde12 564 pc.printf("\n\rdebug_vector");
klauss 42:480335bdde12 565 pc.printf("\n\rdebug_cb");
klauss 42:480335bdde12 566 pc.printf("\n\rdebug_main");
klauss 42:480335bdde12 567 pc.printf("\n\rdebug_cks");
klauss 42:480335bdde12 568 pc.printf("\n\rdebug_cb_rx");
klauss 42:480335bdde12 569 pc.printf("\n\rdebug_cb_tx*");
klauss 42:480335bdde12 570 pc.printf("\n\rdebug_eth_rx*");
klauss 42:480335bdde12 571 pc.printf("\n\rdebug_eth_tx*");
klauss 42:480335bdde12 572 pc.printf("\n\rdebug_file");
klauss 42:480335bdde12 573
klauss 42:480335bdde12 574 if( from_eth ){
klauss 42:480335bdde12 575 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "\n\rdebug_sip \n\rdebug_alive \n\rdebug_prompt \n\rdebug_vector \n\rdebug_cb \n\rdebug_main \n\rdebug_cks \n\rdebug_cb_rx \n\rdebug_cb_tx* \n\rdebug_eth_rx* \n\rdebug_eth_tx* \n\rdebug_file\n\r" );
klauss 42:480335bdde12 576 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 577 }
klauss 42:480335bdde12 578 }
klauss 31:bb5fb28a77df 579 }
klauss 42:480335bdde12 580
klauss 42:480335bdde12 581 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_sip ", 10 ) ){
klauss 42:480335bdde12 582 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "on",2 ) ){
klauss 42:480335bdde12 583 miss_match = false;
klauss 42:480335bdde12 584 pc.printf( "\n\rSip Debug ON\n\r" );
klauss 42:480335bdde12 585 if( from_eth ){
klauss 42:480335bdde12 586 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Sip Debug On\n\r" );
klauss 42:480335bdde12 587 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 588 }
klauss 42:480335bdde12 589 debug_sip = 1;
klauss 42:480335bdde12 590 }
klauss 42:480335bdde12 591 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "off",3 )) {
klauss 42:480335bdde12 592 miss_match = false;
klauss 42:480335bdde12 593 pc.printf( "\n\rSip Debug OFF\n\r" );
klauss 42:480335bdde12 594 if( from_eth ){
klauss 42:480335bdde12 595 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Sip Debug Off\n\r" );
klauss 42:480335bdde12 596 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 597 }
klauss 42:480335bdde12 598 debug_sip = 0;
klauss 42:480335bdde12 599 }
klauss 28:94aec56c6329 600 }
klauss 42:480335bdde12 601
klauss 42:480335bdde12 602 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_cks ", 10 )) {
klauss 42:480335bdde12 603 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "on",2 )) {
klauss 42:480335bdde12 604 miss_match = false;
klauss 42:480335bdde12 605 pc.printf( "\n\rCKS Debug ON\n\r" );
klauss 42:480335bdde12 606 if( from_eth ){
klauss 42:480335bdde12 607 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "CKS Debug On\n\r" );
klauss 42:480335bdde12 608 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 609 }
klauss 42:480335bdde12 610 debug_cks = 1;
klauss 42:480335bdde12 611 }
klauss 42:480335bdde12 612 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "off",3 )) {
klauss 42:480335bdde12 613 miss_match = false;
klauss 42:480335bdde12 614 pc.printf( "\n\rCKS Debug OFF\n\r" );
klauss 42:480335bdde12 615 if( from_eth ){
klauss 42:480335bdde12 616 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "CKS Debug Off\n\r" );
klauss 42:480335bdde12 617 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 618 }
klauss 42:480335bdde12 619 debug_cks = 0;
klauss 42:480335bdde12 620 }
klauss 28:94aec56c6329 621 }
klauss 42:480335bdde12 622
klauss 42:480335bdde12 623 //promptcb ramal porta comando
klauss 42:480335bdde12 624 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "promptcb ", 9)) {
klauss 42:480335bdde12 625 miss_match = false;
klauss 42:480335bdde12 626 static int id_msg = 0x10;
klauss 42:480335bdde12 627 uint8_t write_buffer[300];
klauss 42:480335bdde12 628 unsigned int ext,port;
klauss 42:480335bdde12 629 int ant1,ant2;
klauss 42:480335bdde12 630
klauss 42:480335bdde12 631 debug_buf[bufptr++] = 0x0D;
klauss 42:480335bdde12 632 debug_buf[bufptr++] = 0x00;
klauss 42:480335bdde12 633
klauss 42:480335bdde12 634 ant1 = str2uint( (debug_buf+9), &ext);
klauss 42:480335bdde12 635 ant2 = str2uint( ((debug_buf+9)+ant1+1), &port);
klauss 42:480335bdde12 636
klauss 42:480335bdde12 637 promptcb_last_ext = ext;
klauss 42:480335bdde12 638 promptcb_last_port = port;
klauss 42:480335bdde12 639 pc.printf("\r\next=%d port=%d\r\ncmd=%s\r\n",ext, port, debug_buf+9+ant1+2+ant2);
klauss 42:480335bdde12 640 promptcb_last_ext = ext;
klauss 42:480335bdde12 641 __send_to_cb__( __build_cb_package__( ext, port, __PROMPT__, debug_buf+9+ant1+2+ant2, id_msg++, __CB_BUFFER_SIZE__ - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 42:480335bdde12 642 pc.printf("\n\rComando enviado\n\r");
klauss 42:480335bdde12 643 }
klauss 42:480335bdde12 644 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "pcb ",4 )) {
klauss 31:bb5fb28a77df 645 miss_match = false;
klauss 42:480335bdde12 646 static int id_msg = 0x30;
klauss 42:480335bdde12 647 uint8_t write_buffer[300];
klauss 42:480335bdde12 648 debug_buf[bufptr++] = 0x0D;
klauss 42:480335bdde12 649 debug_buf[bufptr++] = 0x00;
klauss 42:480335bdde12 650
klauss 42:480335bdde12 651 pc.printf("\r\next=%d port=%d\r\ncmd=%s\r\n",promptcb_last_ext, promptcb_last_port, debug_buf+4);
klauss 42:480335bdde12 652
klauss 42:480335bdde12 653 __send_to_cb__( __build_cb_package__( promptcb_last_ext, promptcb_last_port, __PROMPT__, debug_buf+4, id_msg++, __CB_BUFFER_SIZE__ - __VZ_HEADER_OFFSET__, write_buffer ) );
klauss 42:480335bdde12 654 pc.printf("\n\rComando enviado\n\r");
klauss 42:480335bdde12 655 }
klauss 42:480335bdde12 656
klauss 42:480335bdde12 657 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "cks",3 )) {
klauss 42:480335bdde12 658 miss_match = false;
klauss 42:480335bdde12 659 pcks_s = 1;
klauss 42:480335bdde12 660 }
klauss 42:480335bdde12 661
klauss 42:480335bdde12 662 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "showcb",6 )) {
klauss 42:480335bdde12 663 miss_match = false;
klauss 42:480335bdde12 664 pshowcb = 1;
klauss 31:bb5fb28a77df 665 }
klauss 42:480335bdde12 666
klauss 42:480335bdde12 667 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_main ", 11 )) {
klauss 42:480335bdde12 668 if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "on",2 )) {
klauss 42:480335bdde12 669 miss_match = false;
klauss 42:480335bdde12 670 pc.printf("\r\nDebug Main ON");
klauss 42:480335bdde12 671 if( from_eth ){
klauss 42:480335bdde12 672 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug Main On\n\r" );
klauss 42:480335bdde12 673 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 674 }
klauss 42:480335bdde12 675 debug_main = 1;
klauss 42:480335bdde12 676 }
klauss 42:480335bdde12 677 if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "off",3 )) {
klauss 42:480335bdde12 678 miss_match = false;
klauss 42:480335bdde12 679 pc.printf("\r\nDebug Main OFF");
klauss 42:480335bdde12 680 if( from_eth ){
klauss 42:480335bdde12 681 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug Main Off\n\r" );
klauss 42:480335bdde12 682 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 683 }
klauss 42:480335bdde12 684 debug_main = 0;
klauss 42:480335bdde12 685 }
klauss 31:bb5fb28a77df 686 }
klauss 42:480335bdde12 687
klauss 42:480335bdde12 688 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_cb_rx ", 12 )) {
klauss 42:480335bdde12 689 if (xmemmatch( (uint8_t*)( debug_buf + 12 ), (uint8_t*) "on",2 )) {
klauss 42:480335bdde12 690 miss_match = false;
klauss 42:480335bdde12 691 pc.printf("\tDebug Cbx Rx ON");
klauss 42:480335bdde12 692 if( from_eth ){
klauss 42:480335bdde12 693 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug Cbx On Rx on\n\r" );
klauss 42:480335bdde12 694 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 695 }
klauss 42:480335bdde12 696 debug_cb_rx = 1;
klauss 42:480335bdde12 697 }
klauss 42:480335bdde12 698 if (xmemmatch( (uint8_t*)( debug_buf + 12 ), (uint8_t*) "off",3 )) {
klauss 42:480335bdde12 699 miss_match = false;
klauss 42:480335bdde12 700 pc.printf("Debug Cbx Rx OFF");
klauss 42:480335bdde12 701 if( from_eth ){
klauss 42:480335bdde12 702 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug Cbx Rx Off\n\r" );
klauss 42:480335bdde12 703 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 704 }
klauss 42:480335bdde12 705 debug_cb_rx = 0;
klauss 42:480335bdde12 706 }
klauss 27:98f824719d1c 707 }
klauss 42:480335bdde12 708
klauss 42:480335bdde12 709 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_file ", 11 )) {
klauss 42:480335bdde12 710 if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "on",2 )) {
klauss 42:480335bdde12 711 miss_match = false;
klauss 42:480335bdde12 712 pc.printf("\tDebug File ON");
klauss 42:480335bdde12 713 if( from_eth ){
klauss 42:480335bdde12 714 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug File On\n\r" );
klauss 42:480335bdde12 715 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 716 }
klauss 42:480335bdde12 717 debug_cb_rx = 1;
klauss 42:480335bdde12 718 }
klauss 42:480335bdde12 719 if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "off",3 )) {
klauss 42:480335bdde12 720 miss_match = false;
klauss 42:480335bdde12 721 pc.printf("Debug File OFF");
klauss 42:480335bdde12 722 if( from_eth ){
klauss 42:480335bdde12 723 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "Debug File Off\n\r" );
klauss 42:480335bdde12 724 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 725 }
klauss 42:480335bdde12 726 debug_cb_rx = 0;
klauss 42:480335bdde12 727 }
klauss 42:480335bdde12 728 }
klauss 42:480335bdde12 729
klauss 42:480335bdde12 730 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "help" )) {
klauss 28:94aec56c6329 731 miss_match = false;
klauss 42:480335bdde12 732 pc.printf("\n\r****************************PROMPT HELP******************\n\r");
klauss 42:480335bdde12 733 if( from_eth ){
klauss 42:480335bdde12 734 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "\n\r****************************PROMPT HELP******************\n\r" );
klauss 42:480335bdde12 735 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 736 }
klauss 42:480335bdde12 737 pc.printf("ifconfig - mostra o arquivo de configuracao do sistema\n\r");
klauss 42:480335bdde12 738 if( from_eth ){
klauss 42:480335bdde12 739 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "ifconfig - mostra o arquivo de configuracao do sistema\n\r" );
klauss 42:480335bdde12 740 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 741 }
klauss 42:480335bdde12 742 pc.printf("dconfig - volta as configuracoes do sistema para o padrao de fabrica\n\r");
klauss 42:480335bdde12 743 if( from_eth ){
klauss 42:480335bdde12 744 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "dconfig - volta as configuracoes do sistema para o padrao de fabrica\n\r" );
klauss 42:480335bdde12 745 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 746 }
klauss 42:480335bdde12 747 pc.printf("callme [ramal porta] - envia o pedido de ligacao para o callbox com o ramal e porta indicada\n\r");
klauss 42:480335bdde12 748 if( from_eth ){
klauss 42:480335bdde12 749 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "callme [ramal porta] - envia o pedido de ligacao para o callbox com o ramal e porta indicada\n\r" );
klauss 42:480335bdde12 750 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 751 }
klauss 42:480335bdde12 752 pc.printf("promptcb ramal porta comando - envia o <comando> para o cbx <ramal> e <porta> executar\n\r");
klauss 42:480335bdde12 753 if( from_eth ){
klauss 42:480335bdde12 754 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "promptcb ramal porta comando - envia o <comando> para o cbx <ramal> e <porta> executar\n\r" );
klauss 42:480335bdde12 755 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 756 }
klauss 42:480335bdde12 757 pc.printf("format - formata o sistema de arquivos\n\r");
klauss 42:480335bdde12 758 if( from_eth ){
klauss 42:480335bdde12 759 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "format - formata o sistema de arquivos\n\r" );
klauss 42:480335bdde12 760 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 761 }
klauss 42:480335bdde12 762 pc.printf("reset - resta o sistema\n\r");
klauss 42:480335bdde12 763 if( from_eth ){
klauss 42:480335bdde12 764 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "reset - resta o sistema\n\r" );
klauss 42:480335bdde12 765 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 766 }
klauss 42:480335bdde12 767 pc.printf("ipset [ip] - Configura o IP da cabeceira\n\r");
klauss 42:480335bdde12 768 if( from_eth ){
klauss 42:480335bdde12 769 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "ipset [ip] - Configura o IP da cabeceira\n\r" );
klauss 42:480335bdde12 770 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 771 }
klauss 42:480335bdde12 772 pc.printf("extset [ext] - Configura a ext da cabeceira\n\r");
klauss 42:480335bdde12 773 if( from_eth ){
klauss 42:480335bdde12 774 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "extset [ext] - Configura a ext da cabeceira\n\r" );
klauss 42:480335bdde12 775 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 776 }
klauss 42:480335bdde12 777 pc.printf("msipport [port] - Configura a porta SIP da cabeceira\n\r");
klauss 42:480335bdde12 778 if( from_eth ){
klauss 42:480335bdde12 779 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "msipport [port] - Configura a porta SIP da cabeceira\n\r" );
klauss 42:480335bdde12 780 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 781 }
klauss 42:480335bdde12 782 pc.printf("serverip [ip] - Configura o ip do servidor asterisk\n\r");
klauss 42:480335bdde12 783 if( from_eth ){
klauss 42:480335bdde12 784 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "serverip [ip] - Configura o ip do servidor asterisk\n\r" );
klauss 42:480335bdde12 785 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 786 }
klauss 42:480335bdde12 787 pc.printf("serextset [ext] - Configura a server ext da cabeceira\n\r");
klauss 42:480335bdde12 788 if( from_eth ){
klauss 42:480335bdde12 789 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "serextset [ext] - Configura a server ext da cabeceira\n\r" );
klauss 42:480335bdde12 790 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 791 }
klauss 42:480335bdde12 792 pc.printf("ssport [port] - Configura a porta SIP do servidor asterisk\n\r");
klauss 42:480335bdde12 793 if( from_eth ){
klauss 42:480335bdde12 794 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "ssport [port] - Configura a porta SIP do servidor asterisk\n\r" );
klauss 42:480335bdde12 795 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 796 }
klauss 42:480335bdde12 797 pc.printf("maskset [mask] - Configura a mascara da cabeceira\n\r");
klauss 42:480335bdde12 798 if( from_eth ){
klauss 42:480335bdde12 799 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "maskset [mask] - Configura a mascara da cabeceira\n\r" );
klauss 42:480335bdde12 800 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 801 }
klauss 42:480335bdde12 802 pc.printf("gatewayset [gateway] - Configura o gateway da cabeceira\n\r");
klauss 42:480335bdde12 803 if( from_eth ){
klauss 42:480335bdde12 804 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "gatewayset [gateway] - Configura o gateway da cabeceira\n\r" );
klauss 42:480335bdde12 805 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 806 }
klauss 42:480335bdde12 807 pc.printf("showcb - lista os Cbx registrados na header\n\r");
klauss 42:480335bdde12 808 if( from_eth ){
klauss 42:480335bdde12 809 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "showcb - lista os Cbx registrados na header\n\r" );
klauss 42:480335bdde12 810 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 811 }
klauss 42:480335bdde12 812 pc.printf("cks - exibe estatisticas de check sum\n\r");
klauss 42:480335bdde12 813 if( from_eth ){
klauss 42:480335bdde12 814 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "cks - exibe estatisticas de check sum\n\r" );
klauss 42:480335bdde12 815 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 816 }
klauss 42:480335bdde12 817 pc.printf(". - executa o comando anterior novamente\n\r");
klauss 42:480335bdde12 818 if( from_eth ){
klauss 42:480335bdde12 819 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, ". - executa o comando anterior novamente\n\r" );
klauss 42:480335bdde12 820 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 821 }
klauss 42:480335bdde12 822 pc.printf("debug [on|off|show] - seleciona debugs gerais | lista de debugs \n\r");
klauss 42:480335bdde12 823 if( from_eth ){
klauss 42:480335bdde12 824 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "debug [on|off|show] - seleciona debugs gerais | lista de debugs \n\r" );
klauss 42:480335bdde12 825 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 826 }
klauss 42:480335bdde12 827 pc.printf("flood [on|off] - simula envio de pacotes de audio\n\r");
klauss 42:480335bdde12 828 if( from_eth ){
klauss 42:480335bdde12 829 snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "flood [on|off] - simula envio de pacotes de audio\n\r");
klauss 42:480335bdde12 830 if( tcp_session ) client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 831 }
klauss 42:480335bdde12 832 pc.printf("PROMPT VERSION: V%d\n\r",PVERSION);
klauss 42:480335bdde12 833 //Obs :: a ultima linha nao mandamos direto pro tcp porque ela eh enviada fora desse escopo
klauss 42:480335bdde12 834 if( from_eth ) snprintf( debug_buf,__PROMPT_ETH_BUFFER_SIZE__, "PROMPT VERSION: V%d\n\r",PVERSION);
klauss 31:bb5fb28a77df 835 }
klauss 42:480335bdde12 836 /*
klauss 42:480335bdde12 837 if ( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "callme ", 7 )) {
klauss 42:480335bdde12 838 if ( debug_buf[16] != 0 && debug_buf[11] != 0x20 )
klauss 42:480335bdde12 839 pc.printf("\n\r Error: formato errado! ramal=xxxx porta=xxxx \n\r");
klauss 42:480335bdde12 840 else {
klauss 42:480335bdde12 841 uint8_t data[300];
klauss 42:480335bdde12 842 uint16_t cks=0;
klauss 42:480335bdde12 843
klauss 42:480335bdde12 844 //data[0] = (uint8_t)( (debug_buf[7]&0xf0)<<4 + (debug_buf[8]&0x0f) ) ;
klauss 42:480335bdde12 845 //data[1] = (uint8_t)( (debug_buf[9]&0xf0)<<4 + (debug_buf[10]&0x0f) ) ;
klauss 42:480335bdde12 846 //data[2] = (uint8_t)( (debug_buf[12]&0xf0)<<4 + (debug_buf[13]&0x0f) ) ;
klauss 42:480335bdde12 847 /data[3] = (uint8_t)( (debug_buf[14]&0xf0)<<4 + (debug_buf[15]&0x0f) ) ;
klauss 42:480335bdde12 848
klauss 42:480335bdde12 849 data[0] = (uint8_t)( debug_buf[ 7 ] & 0xFF00 >> 8 );
klauss 42:480335bdde12 850 data[1] = (uint8_t)( debug_buf[ 9 ] & 0x00FF );
klauss 42:480335bdde12 851 data[2] = (uint8_t)( debug_buf[ 12 ] & 0xFF00 >> 8 );
klauss 42:480335bdde12 852 data[3] = (uint8_t)( debug_buf[ 14 ] & 0x00FF );
klauss 42:480335bdde12 853
klauss 42:480335bdde12 854 data[6] = 0x04;
klauss 42:480335bdde12 855 for (int i = 7; i < 300; i++) data[i] = 0x00;
klauss 42:480335bdde12 856 cks = __checksum__(data,300);
klauss 42:480335bdde12 857 data[4] = cks>>8;
klauss 42:480335bdde12 858 data[5] = cks&0xff;
klauss 42:480335bdde12 859
klauss 42:480335bdde12 860 pc.printf("\n\r");
klauss 42:480335bdde12 861 for( int i = 0; i < 300; i++ )
klauss 42:480335bdde12 862 pc.printf("%x ", data[ i ] );
klauss 42:480335bdde12 863 pc.printf("\n\r");
klauss 42:480335bdde12 864
klauss 42:480335bdde12 865 xmemcpy(TXBuffer,data,300);
klauss 42:480335bdde12 866
klauss 42:480335bdde12 867 pc.printf("\n\r");
klauss 42:480335bdde12 868 for( int i = 0; i < 300; i++ )
klauss 42:480335bdde12 869 pc.printf("%x ", data[ i ] );
klauss 42:480335bdde12 870 pc.printf("\n\r");
klauss 42:480335bdde12 871
klauss 42:480335bdde12 872 send2callboxes();
klauss 42:480335bdde12 873
klauss 42:480335bdde12 874 pc.printf("\n\r calling callbox %s \n\r",debug_buf+7);
klauss 42:480335bdde12 875 }
klauss 42:480335bdde12 876
klauss 31:bb5fb28a77df 877 }
klauss 42:480335bdde12 878 */
klauss 42:480335bdde12 879
klauss 42:480335bdde12 880 if( miss_match ){
klauss 42:480335bdde12 881 pc.printf("\n\r%s: command not found\n\r", debug_buf );
klauss 42:480335bdde12 882 if( from_eth ){
klauss 42:480335bdde12 883 snprintf( debug_buf, __PROMPT_ETH_BUFFER_SIZE__, "%s: command not found\n", debug_buf );
klauss 42:480335bdde12 884 debug_buf[ strlen( debug_buf ) - 1 ] = '\0';
klauss 42:480335bdde12 885 }
klauss 42:480335bdde12 886 }
klauss 42:480335bdde12 887
klauss 42:480335bdde12 888 else strcpy( last_debug_buf, debug_buf );
klauss 27:98f824719d1c 889 }
klauss 27:98f824719d1c 890 /*
klauss 42:480335bdde12 891 if( from_eth ){
klauss 42:480335bdde12 892 if( tcp_session ){
klauss 42:480335bdde12 893 client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 894 tcp_timer.reset();
klauss 42:480335bdde12 895 bufret = 0;
klauss 42:480335bdde12 896 from_eth = false;
klauss 42:480335bdde12 897 }else{
klauss 42:480335bdde12 898 msg_to_eth = debug_buf;
klauss 42:480335bdde12 899 debug_buf = __debug_buf__;
klauss 42:480335bdde12 900 bufptr = last_bufptr;
klauss 42:480335bdde12 901 bufret = 0;
klauss 42:480335bdde12 902 from_eth = false;
klauss 42:480335bdde12 903
klauss 42:480335bdde12 904 if( miss_match ) return( NULL );
klauss 42:480335bdde12 905
klauss 42:480335bdde12 906 else return( msg_to_eth );
klauss 19:ab2088e0dec6 907 }
klauss 42:480335bdde12 908 }*/
klauss 41:69bf7091c2ca 909
klauss 42:480335bdde12 910 if( tcp_session ){
klauss 42:480335bdde12 911 strcat( debug_buf, "\n\r> " );
klauss 42:480335bdde12 912 client.send_all( debug_buf, strlen( debug_buf ) );
klauss 42:480335bdde12 913 tcp_timer.reset();
klauss 42:480335bdde12 914 bufret = 0;
klauss 42:480335bdde12 915 from_eth = false;
klauss 42:480335bdde12 916 }else if( udp_request ){
klauss 42:480335bdde12 917 msg_to_eth = debug_buf;
klauss 42:480335bdde12 918 debug_buf = __debug_buf__;
klauss 42:480335bdde12 919 bufptr = last_bufptr;
klauss 42:480335bdde12 920 bufret = 0;
klauss 42:480335bdde12 921 from_eth = false;
klauss 42:480335bdde12 922
klauss 42:480335bdde12 923 if( miss_match ) return( NULL );
klauss 42:480335bdde12 924
klauss 42:480335bdde12 925 else return( msg_to_eth );
klauss 42:480335bdde12 926 }
klauss 42:480335bdde12 927 if( b == 0x0D || bufret == 1 || bufptr > DEBUGBUFSIZE ){
klauss 42:480335bdde12 928 bufptr = 0;
klauss 42:480335bdde12 929 for (uint8_t i =0; i < DEBUGBUFSIZE; i++) {
klauss 42:480335bdde12 930 debug_buf[i] = 0;
klauss 42:480335bdde12 931 }
klauss 42:480335bdde12 932 bufret = 0;
klauss 42:480335bdde12 933 pc.putc(0x0A);
klauss 42:480335bdde12 934 pc.putc(0x0D);
klauss 42:480335bdde12 935 pc.printf("> ");
klauss 42:480335bdde12 936 }
klauss 42:480335bdde12 937 }while( tcp_session );
klauss 42:480335bdde12 938
klauss 36:728498a78e1e 939 return( NULL );
klauss 42:480335bdde12 940 }