Modularizando o src
Dependencies: EALib EthernetInterface_vz mbed-rtos mbed
Fork of header_main_colinas_V0-20-09-14 by
prompt.cpp
- Committer:
- klauss
- Date:
- 2014-09-25
- Revision:
- 31:bb5fb28a77df
- Parent:
- 30:8dfb6d8de53d
- Child:
- 33:735fd60e96d8
File content as of revision 31:bb5fb28a77df:
#include "mbed.h" #include "stdint.h" #include "configs.h" #include "vz_protocol.h" #include "parallelcpld.h" #include "flood.h" #include "debug.h" //#include "debug.h" uint8_t debug_alive = 0; uint8_t debug_sip = 0; uint8_t debug_vector = 0; uint8_t debug_cb = 0; uint8_t debug_main = 0; uint8_t debug_cks = 0; uint8_t pcks_s = 0; uint8_t pshowcb = 0; uint8_t debug_cb_rx = 0; uint8_t debug_cb_tx = 0; uint8_t debug_eth_rx = 0; uint8_t debug_eth_tx = 0; uint8_t debug_file = 0; uint8_t test_debug = 1; #define PVERSION 1.1 // Sempre atualizar a versao do prompt #define DEBUGBUFSIZE 50 char debug_buf[DEBUGBUFSIZE]; char last_debug_buf[ DEBUGBUFSIZE ] = "help"; FILE *fip, *fmask, *fgate, *fport, *fsip, *fsport, *fext, *fserext; uint8_t dog = 1; uint8_t debug_prompt = 0; uint8_t bufptr = 0; uint8_t xmemmatch(const uint8_t * s1, const uint8_t * s2, uint16_t size) { // presente da lib.h pode retirar da versao final while (size--) { if (*s1++ != *s2++) return 0; /* does not match */ } return 1; /* matches */ } uint8_t xstrmatch(const uint8_t * s1, const uint8_t * s2) { // presente na lib.h pode retirar da versao final while (*s1) { if (*s1++ != *s2++) return 0; /* does not match */ } if ( *s2 == 0 ) return 1; /* matches */ else return 0; /* does not match */ } void xmemcpy(uint8_t * dest, const uint8_t * src, uint16_t size) { // presente na lib.h pode retirar da versao final while (size--) *dest++ = *src++; } int str2uint (char * s, unsigned int * val) { int i = 0; unsigned int ret = 0; for (;;) { if (s[i] < '0') { *val = ret; return i; } ret *= 10; ret += s[i] - '0'; i++; } } void cat(const char* fname) // Print the content of a given file { char buff[513]; int num; FILE *fp = fopen(fname, "r"); if (fp == NULL) { pc.printf("Failed to open %s", fname); return; } while ((num = fread(buff, 1, 512, fp)) > 0) { buff[num] = '\0'; pc.printf(buff); } fclose(fp); } // operantion with the system config files void files (const char type) { if (type == 's' ){ // show files pc.printf("\n\r"); pc.printf("Header IP " ); cat("/qspi/myip.txt"); pc.printf("\n\rHeader ext "); cat("/qspi/myext.txt"); pc.printf("\n\rHeader port "); cat("/qspi/mysipport.txt"); pc.printf("\n\rServer ip "); cat("/qspi/serverip.txt"); pc.printf("\n\rServer ext "); cat("/qspi/peerext.txt"); pc.printf("\n\rServer port "); cat("/qspi/serverport.txt"); pc.printf("\n\rMascara de rede "); cat("/qspi/mymask.txt"); pc.printf("\n\rGateway IP "); cat("/qspi/mygate.txt"); } if (type == 'c' ){ // close all files fclose( fip ); fclose( fmask ); fclose( fgate ); fclose( fport ); fclose( fsip ); fclose( fsport ); fclose( fext ); fclose( fserext ); } if (type == 'i' ){ // Check if files exist, if not create the files fip = fopen("/qspi/myip.txt", "r"); if (fip == NULL){ fip = fopen("/qspi/myip.txt", "w"); //fprintf(fip, "%s\n\r",__MY_IP__); //myip fprintf(fip, "%s",__MY_IP__); //myip } fserext = fopen("/qspi/myext.txt", "r"); if ( fserext == NULL ){ fserext = fopen("/qspi/myext.txt", "w"); fprintf( fserext, "%i" ,__MY_EXT__ ); //asterisk ext } fport = fopen("/qspi/mysipport.txt", "r"); if (fport == NULL){ fport = fopen("/qspi/mysipport.txt", "w"); fprintf(fport, "%i",__MY_PORT__); //mysipport } fsip = fopen("/qspi/serverip.txt", "r"); if (fsip == NULL){ fsip = fopen("/qspi/serverip.txt", "w"); //fprintf(fsip, "%s\n\r",__SERVER_IP__ ); //asterisk ip fprintf(fsip, "%s",__SERVER_IP__ ); //asterisk ip } fext = fopen("/qspi/peerext.txt", "r"); if ( fext == NULL ){ fext = fopen("/qspi/peerext.txt", "w"); fprintf( fext, "%i",__PEER_EXT__ ); //asterisk ip } fsport = fopen("/qspi/serverport.txt", "r"); if (fsport == NULL){ fsport = fopen("/qspi/serverport.txt", "w"); fprintf(fsport, "%i",__SERVER_PORT__ ); //asterisk port } fmask = fopen("/qspi/mymask.txt", "r"); if (fmask == NULL){ fmask = fopen("/qspi/mymask.txt", "w"); fprintf(fmask, "%s",__MY_MSK__); //mymask } fgate = fopen("/qspi/mygateway.txt", "r"); if (fgate == NULL){ fgate = fopen("/qspi/mygate.txt", "w"); fprintf(fgate, "%s",__MY_GTW__); //mygateway } pc.printf("\n\r Default configurations set! \n\r"); } if (type == 'r' ){ // Just open for read fip = fopen("/qspi/myip.txt", "r"); fmask = fopen("/qspi/mymask.txt", "r"); fgate = fopen("/qspi/mygateway.txt", "r"); fport = fopen("/qspi/mysipport.txt", "r"); fsip = fopen("/qspi/serverip.txt", "r"); fsport = fopen("/qspi/serverport.txt", "r"); fext = fopen( "/qspi/myext.txt", "r" ); fserext = fopen( "/qspi/peerext.txt", "r" ); } if (type == 'w'){ // Create and write the default configs fip = fopen("/qspi/myip.txt", "w"); fmask = fopen("/qspi/mymask.txt", "w"); fgate = fopen("/qspi/mygateway.txt", "w"); fport = fopen("/qspi/mysipport.txt", "w"); fsip = fopen("/qspi/serverip.txt", "w"); fsport = fopen("/qspi/serverport.txt", "w"); fext = fopen( "/qspi/myext.txt", "w" ); fserext = fopen( "/qspi/peerext.txt", "w" ); //fprintf( fip, "%s\n\r", __MY_IP__ ); //myip fprintf( fip, "%s", __MY_IP__ ); //myip fprintf( fport, "%i", __MY_PORT__ ); //mysipport fprintf( fext, "%i", __MY_EXT__ ); //myext //fprintf( fsip, "%s\n\r", __SERVER_IP__ ); //asterisk ip fprintf( fsip, "%s", __SERVER_IP__ ); //asterisk ip fprintf( fserext, "%i",__PEER_EXT__ ); //asterisk port fprintf( fsport, "%i",__SERVER_PORT__ ); //asterisk port fprintf( fmask, "%s",__MY_MSK__ ); //mymask fprintf( fgate, "%i", __MY_GTW__ ); //mygateway files('c'); pc.printf("\n\r Default configurations set! \n\r"); } } void init_fsystem(){ // init file system and check if files exist if (!qspifs.isformatted()) { qspifs.format(); pc.printf("File system configured!!\n\r"); } files('i'); // check if the files are created files('c'); pc.printf("*******System Ready*******\n\r"); } // main prompt process void prompt_process(){ //FIXME dar flush na serial volatile char b = 0; static uint8_t bufret = 0; static Timer flood_timeout; if( flood_timeout.read() > 60 ){ pflood = 0; flood_timeout.stop(); flood_timeout.reset(); } if ( pc.readable() ){ // imput do teclado b = pc.getc(); if( b == 0x0D ){ // enter bufret = 1; }else{ //FIXME como mudar o contador quando eu aperto backspace pc.putc( b ); if( b == 0x08 || b == 0x7F ){ // BS | DEL if( bufptr > 0 ) debug_buf[ --bufptr ] = 0; //bufptr--; //pc.printf("."); }else if( b == 0x09 ){ // ignore tab }else{ debug_buf[bufptr] = b; //pc.printf("(%x)", (uint8_t)b ); bufptr++; } } } // Prompt commands here if ( bufret == 1 ) { bool miss_match = true; static unsigned int promptcb_last_ext = 0; static unsigned int promptcb_last_port = 0; if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) ".",1 )) { miss_match = false; //xmemcpy( (uint)debug_buf, last_debug_buf, 300); strcpy( debug_buf, last_debug_buf ); } if( !bufptr ){ miss_match = false; } if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "sconfig" )) { miss_match = false; pc.printf("\n\r"); files('s'); } if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "format" )) { miss_match = false; pc.printf("\n Formatando o sistema de arquivos... espere o sistema reiniciar \n\r"); //qspifs.format(); NVIC_SystemReset(); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "ipset ", 6 )) { miss_match = false; fip = fopen("/qspi/myip.txt", "w"); //fprintf(fip,"%s\n\r",(debug_buf+6)); fprintf(fip,"%s",(debug_buf+6)); fclose(fip); pc.printf("\n\r"); files('s'); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "extset ", 7 )) { miss_match = false; fip = fopen("/qspi/myext.txt", "w"); fprintf(fip, "%s" , ( debug_buf + 7) ); fclose(fip); pc.printf("\n\r"); files('s'); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "serextset ", 10 )) { miss_match = false; fip = fopen("/qspi/peerext.txt", "w"); fprintf(fip, "%s\n\r" , ( debug_buf + 10 ) ); fclose(fip); pc.printf("\n\r"); files('s'); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "maskset ",8 )) { miss_match = false; fmask = fopen("/qspi/mymask.txt", "w"); fprintf(fmask,"%s\n\r",(debug_buf+8)); fclose(fmask); pc.printf("\n\r"); files('s'); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "gatewayset ",11 )) { miss_match = false; fgate = fopen("/qspi/mygate.txt", "w"); fprintf(fgate,"%s\n\r",(debug_buf+11)); fclose(fgate); pc.printf("\n\r"); files('s'); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "msipport ",9 )) { miss_match = false; fport = fopen("/qspi/mysipport.txt", "w"); fprintf(fport,"%s\n\r",(debug_buf+9)); fclose(fport); pc.printf("\n\r"); files('s'); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "serverip ",9 )) { miss_match = false; fsip = fopen("/qspi/serverip.txt", "w"); //fprintf(fsip,"%s\n\r",(debug_buf+9)); fprintf(fsip,"%s",(debug_buf+9)); fclose(fsip); pc.printf("\n\r"); files('s'); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "ssport ",7 )) { miss_match = false; fsport = fopen("/qspi/serverport.txt", "w"); fprintf(fsport,"%s\n\r",(debug_buf+7)); fclose(fsport); pc.printf("\n\r"); files('s'); } if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "dconfig" )) { miss_match = false; files('w'); files('s'); } if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "reset" )) { miss_match = false; //pc.printf("\n\r reset!!! \n\r"); pc.printf("\n\rJob is done\n\r"); pc.putc(0x01); NVIC_SystemReset(); } if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "dog" )) { miss_match = false; pc.printf("\n\r MUUUUUUUuuuuUUUUUU - I'm not a dog!!!! \n\r"); dog = 0; } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "flood ",6 )) { if (xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "on",2 )) { miss_match = false; pc.printf("\n\r\t Flood ON\n\r\t"); tflood.start(); tflood.reset(); floodcount =0; pflood = 1; flood_timeout.start(); } if (xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "off",3 )) { miss_match = false; pc.printf("\n\r\t Flood OFF\n\r\t"); pflood = 0; tflood.stop(); flood_timeout.reset(); } } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug ",6 )) { if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "on",2 )) { miss_match = false; pc.printf("\n\r\tDebug ON\n\r\t"); debug_alive = 1; } if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "off",3 )) { miss_match = false; pc.printf("\n\r\tDebug OFF\n\r\t"); debug_alive = 0; } if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "show",4 )) { miss_match = false; pc.printf("\n\rdebug_sip"); pc.printf("\n\rdebug_alive"); pc.printf("\n\rdebug_prompt"); pc.printf("\n\rdebug_vector"); pc.printf("\n\rdebug_cb"); pc.printf("\n\rdebug_main"); pc.printf("\n\rdebug_cks"); pc.printf("\n\rdebug_cb_rx"); pc.printf("\n\rdebug_cb_tx*"); pc.printf("\n\rdebug_eth_rx*"); pc.printf("\n\rdebug_eth_tx*"); pc.printf("\n\rdebug_file"); } } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_sip ", 10 )) { if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "on",2 )) { miss_match = false; pc.printf( "\n\rSip Debug ON\n\r" ); debug_sip = 1; } if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "off",3 )) { miss_match = false; pc.printf( "\n\rSip Debug OFF\n\r" ); debug_sip = 0; } } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_cks ", 10 )) { if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "on",2 )) { miss_match = false; pc.printf( "\n\rCKS Debug ON\n\r" ); debug_cks = 1; } if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "off",3 )) { miss_match = false; pc.printf( "\n\rCKS Debug OFF\n\r" ); debug_cks = 0; } } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "promptcb ", 9)) { //promptcb ramal porta comando static int id_msg = 0x10; uint8_t write_buffer[300]; unsigned int ext,port; int ant1,ant2; debug_buf[bufptr++] = 0x0D; debug_buf[bufptr++] = 0x00; ant1 = str2uint( (debug_buf+9), &ext); ant2 = str2uint( ((debug_buf+9)+ant1+1), &port); promptcb_last_ext = ext; promptcb_last_port = port; pc.printf("\r\next=%d port=%d\r\ncmd=%s\r\n",ext, port, debug_buf+9+ant1+2+ant2); promptcb_last_ext = ext; __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 ) ); pc.printf("\n\rComando enviado\n\r"); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "pcb ",4 )) { static int id_msg = 0x30; uint8_t write_buffer[300]; debug_buf[bufptr++] = 0x0D; debug_buf[bufptr++] = 0x00; pc.printf("\r\next=%d port=%d\r\ncmd=%s\r\n",promptcb_last_ext, promptcb_last_port, debug_buf+4); __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 ) ); pc.printf("\n\rComando enviado\n\r"); } if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "cks",3 )) { miss_match = false; pcks_s = 1; } if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "showcb",6 )) { miss_match = false; pshowcb = 1; } if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debugsip ", 9 )) { if (xmemmatch( (uint8_t*)( debug_buf + 9 ), (uint8_t*) "on",2 )) { miss_match = false; pc.printf("\tDebug Sip ON"); debug_sip = 1; } if (xmemmatch( (uint8_t*)( debug_buf + 9 ), (uint8_t*) "off",3 )) { miss_match = false; pc.printf("Debug Sip OFF"); debug_sip = 0; } } if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_cb_rx ", 12 )) { if (xmemmatch( (uint8_t*)( debug_buf + 12 ), (uint8_t*) "on",2 )) { miss_match = false; pc.printf("\tDebug Cbx Rx ON"); debug_cb_rx = 1; } if (xmemmatch( (uint8_t*)( debug_buf + 12 ), (uint8_t*) "off",3 )) { miss_match = false; pc.printf("Debug Cbx Rx OFF"); debug_cb_rx = 0; } } if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_file ", 11 )) { if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "on",2 )) { miss_match = false; pc.printf("\tDebug File ON"); debug_cb_rx = 1; } if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "off",3 )) { miss_match = false; pc.printf("Debug File OFF"); debug_cb_rx = 0; } } if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "help" )) { miss_match = false; pc.printf("\n\r****************************PROMPT HELP******************\n\r"); pc.printf("sconfig - mostra o arquivo de configuracao do sistema\n\r"); pc.printf("dconfig - volta as configuracoes do sistema para o padrao de fabrica\n\r"); pc.printf("callme [ramal porta] - envia o pedido de ligacao para o callbox com o ramal e porta indicada\n\r"); pc.printf("promptcb ramal porta comando - envia o <comando> para o cbx <ramal> e <porta> executar\n\r"); pc.printf("format - formata o sistema de arquivos\n\r"); pc.printf("reset - resta o sistema\n\r"); pc.printf("ipset [ip] - Configura o IP da cabeceira\n\r"); pc.printf("extset [ext] - Configura a ext da cabeceira\n\r"); pc.printf("msipport [port] - Configura a porta SIP da cabeceira\n\r"); pc.printf("serverip [ip] - Configura o ip do servidor asterisk\n\r"); pc.printf("serextset [ext] - Configura a server ext da cabeceira\n\r"); pc.printf("ssport [port] - Configura a porta SIP do servidor asterisk\n\r"); pc.printf("maskset [mask] - Configura a mascara da cabeceira\n\r"); pc.printf("gatewayset [gateway] - Configura o gateway da cabeceira\n\r"); pc.printf("showcb - lista os Cbx registrados na header\n\r"); pc.printf("cks - exibe estatisticas de check sum\n\r"); pc.printf(". - executa o comando anterior novamente\n\r"); pc.printf("debug [on|off|show] - seleciona debugs gerais | lista de debugs \n\r"); pc.printf("flood [on|off] - simula envio de pacotes de audio\n\r"); pc.printf("PROMPT VERSION: V%d\n\r",PVERSION); } /* if ( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "callme ", 7 )) { if ( debug_buf[16] != 0 && debug_buf[11] != 0x20 ) pc.printf("\n\r Error: formato errado! ramal=xxxx porta=xxxx \n\r"); else { uint8_t data[300]; uint16_t cks=0; //data[0] = (uint8_t)( (debug_buf[7]&0xf0)<<4 + (debug_buf[8]&0x0f) ) ; //data[1] = (uint8_t)( (debug_buf[9]&0xf0)<<4 + (debug_buf[10]&0x0f) ) ; //data[2] = (uint8_t)( (debug_buf[12]&0xf0)<<4 + (debug_buf[13]&0x0f) ) ; /data[3] = (uint8_t)( (debug_buf[14]&0xf0)<<4 + (debug_buf[15]&0x0f) ) ; data[0] = (uint8_t)( debug_buf[ 7 ] & 0xFF00 >> 8 ); data[1] = (uint8_t)( debug_buf[ 9 ] & 0x00FF ); data[2] = (uint8_t)( debug_buf[ 12 ] & 0xFF00 >> 8 ); data[3] = (uint8_t)( debug_buf[ 14 ] & 0x00FF ); data[6] = 0x04; for (int i = 7; i < 300; i++) data[i] = 0x00; cks = __checksum__(data,300); data[4] = cks>>8; data[5] = cks&0xff; pc.printf("\n\r"); for( int i = 0; i < 300; i++ ) pc.printf("%x ", data[ i ] ); pc.printf("\n\r"); xmemcpy(TXBuffer,data,300); pc.printf("\n\r"); for( int i = 0; i < 300; i++ ) pc.printf("%x ", data[ i ] ); pc.printf("\n\r"); send2callboxes(); pc.printf("\n\r calling callbox %s \n\r",debug_buf+7); } } */ if( miss_match ) pc.printf("\n\r%s: command not found\n\r", debug_buf ); else strcpy( last_debug_buf, debug_buf ); } if ( b == 0x0D || bufret == 1 || bufptr > DEBUGBUFSIZE ) { bufptr = 0; for (uint8_t i =0; i < DEBUGBUFSIZE; i++) { debug_buf[i] = 0; } bufret = 0; pc.putc(0x0A); pc.putc(0x0D); pc.printf("> "); } }