Modularizando o src

Dependencies:   EALib EthernetInterface_vz mbed-rtos mbed

Fork of header_main_colinas_V0-20-09-14 by VZTECH

Committer:
klauss
Date:
Tue Sep 30 11:37:31 2014 +0000
Revision:
33:735fd60e96d8
Parent:
31:bb5fb28a77df
Child:
35:96885a7931f0
versao 1 do protocolo de comunicao udp pra comunicao externa com a header e consequentemente, criacao do bootloader

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 19:ab2088e0dec6 9 //#include "debug.h"
klauss 19:ab2088e0dec6 10
klauss 28:94aec56c6329 11 uint8_t debug_alive = 0;
klauss 28:94aec56c6329 12 uint8_t debug_sip = 0;
klauss 29:7246460b73f8 13 uint8_t debug_vector = 0;
klauss 29:7246460b73f8 14 uint8_t debug_cb = 0;
klauss 30:8dfb6d8de53d 15 uint8_t debug_main = 0;
klauss 31:bb5fb28a77df 16 uint8_t debug_cks = 0;
Cola 22:d2a4b5939115 17 uint8_t pcks_s = 0;
Cola 24:270b436a1bb0 18 uint8_t pshowcb = 0;
klauss 31:bb5fb28a77df 19 uint8_t debug_cb_rx = 0;
klauss 31:bb5fb28a77df 20 uint8_t debug_cb_tx = 0;
klauss 31:bb5fb28a77df 21 uint8_t debug_eth_rx = 0;
klauss 31:bb5fb28a77df 22 uint8_t debug_eth_tx = 0;
klauss 31:bb5fb28a77df 23 uint8_t debug_file = 0;
klauss 28:94aec56c6329 24
klauss 29:7246460b73f8 25 uint8_t test_debug = 1;
klauss 31:bb5fb28a77df 26 #define PVERSION 1.1 // Sempre atualizar a versao do prompt
klauss 19:ab2088e0dec6 27
Cola 21:0bd688722e81 28 #define DEBUGBUFSIZE 50
klauss 19:ab2088e0dec6 29 char debug_buf[DEBUGBUFSIZE];
klauss 30:8dfb6d8de53d 30 char last_debug_buf[ DEBUGBUFSIZE ] = "help";
klauss 28:94aec56c6329 31 FILE *fip, *fmask, *fgate, *fport, *fsip, *fsport, *fext, *fserext;
klauss 19:ab2088e0dec6 32 uint8_t dog = 1;
klauss 19:ab2088e0dec6 33 uint8_t debug_prompt = 0;
klauss 19:ab2088e0dec6 34 uint8_t bufptr = 0;
klauss 19:ab2088e0dec6 35
klauss 19:ab2088e0dec6 36 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 37 while (size--) {
klauss 19:ab2088e0dec6 38 if (*s1++ != *s2++) return 0; /* does not match */
klauss 19:ab2088e0dec6 39 }
klauss 19:ab2088e0dec6 40 return 1; /* matches */
klauss 19:ab2088e0dec6 41 }
klauss 19:ab2088e0dec6 42
klauss 19:ab2088e0dec6 43 uint8_t xstrmatch(const uint8_t * s1, const uint8_t * s2) { // presente na lib.h pode retirar da versao final
klauss 19:ab2088e0dec6 44 while (*s1) {
klauss 19:ab2088e0dec6 45 if (*s1++ != *s2++) return 0; /* does not match */
klauss 19:ab2088e0dec6 46 }
klauss 19:ab2088e0dec6 47 if ( *s2 == 0 )
klauss 19:ab2088e0dec6 48 return 1; /* matches */
klauss 19:ab2088e0dec6 49 else
klauss 19:ab2088e0dec6 50 return 0; /* does not match */
klauss 19:ab2088e0dec6 51 }
klauss 19:ab2088e0dec6 52
klauss 19:ab2088e0dec6 53 void xmemcpy(uint8_t * dest, const uint8_t * src, uint16_t size) { // presente na lib.h pode retirar da versao final
klauss 19:ab2088e0dec6 54 while (size--) *dest++ = *src++;
klauss 19:ab2088e0dec6 55 }
klauss 19:ab2088e0dec6 56
Cola 21:0bd688722e81 57 int str2uint (char * s, unsigned int * val) {
Cola 21:0bd688722e81 58 int i = 0;
Cola 21:0bd688722e81 59 unsigned int ret = 0;
Cola 21:0bd688722e81 60 for (;;) {
Cola 21:0bd688722e81 61 if (s[i] < '0') {
Cola 21:0bd688722e81 62 *val = ret;
Cola 21:0bd688722e81 63 return i;
Cola 21:0bd688722e81 64 }
Cola 21:0bd688722e81 65 ret *= 10;
Cola 21:0bd688722e81 66 ret += s[i] - '0';
Cola 21:0bd688722e81 67 i++;
Cola 21:0bd688722e81 68 }
Cola 21:0bd688722e81 69 }
klauss 19:ab2088e0dec6 70
klauss 19:ab2088e0dec6 71 void cat(const char* fname) // Print the content of a given file
klauss 19:ab2088e0dec6 72 {
klauss 19:ab2088e0dec6 73 char buff[513];
klauss 19:ab2088e0dec6 74 int num;
klauss 19:ab2088e0dec6 75
klauss 19:ab2088e0dec6 76 FILE *fp = fopen(fname, "r");
klauss 19:ab2088e0dec6 77 if (fp == NULL) {
klauss 28:94aec56c6329 78 pc.printf("Failed to open %s", fname);
klauss 19:ab2088e0dec6 79 return;
klauss 19:ab2088e0dec6 80 }
klauss 19:ab2088e0dec6 81
klauss 19:ab2088e0dec6 82 while ((num = fread(buff, 1, 512, fp)) > 0)
klauss 19:ab2088e0dec6 83 {
klauss 19:ab2088e0dec6 84 buff[num] = '\0';
klauss 19:ab2088e0dec6 85 pc.printf(buff);
klauss 19:ab2088e0dec6 86
klauss 19:ab2088e0dec6 87 }
klauss 19:ab2088e0dec6 88 fclose(fp);
klauss 19:ab2088e0dec6 89 }
klauss 19:ab2088e0dec6 90
klauss 28:94aec56c6329 91 // operantion with the system config files
klauss 28:94aec56c6329 92 void files (const char type) {
klauss 19:ab2088e0dec6 93 if (type == 's' ){ // show files
klauss 19:ab2088e0dec6 94 pc.printf("\n\r");
klauss 28:94aec56c6329 95 pc.printf("Header IP " );
klauss 19:ab2088e0dec6 96 cat("/qspi/myip.txt");
klauss 28:94aec56c6329 97 pc.printf("\n\rHeader ext ");
klauss 28:94aec56c6329 98 cat("/qspi/myext.txt");
klauss 28:94aec56c6329 99 pc.printf("\n\rHeader port ");
klauss 28:94aec56c6329 100 cat("/qspi/mysipport.txt");
klauss 28:94aec56c6329 101
klauss 28:94aec56c6329 102 pc.printf("\n\rServer ip ");
klauss 28:94aec56c6329 103 cat("/qspi/serverip.txt");
klauss 28:94aec56c6329 104 pc.printf("\n\rServer ext ");
klauss 28:94aec56c6329 105 cat("/qspi/peerext.txt");
klauss 28:94aec56c6329 106 pc.printf("\n\rServer port ");
klauss 28:94aec56c6329 107 cat("/qspi/serverport.txt");
klauss 28:94aec56c6329 108
klauss 28:94aec56c6329 109 pc.printf("\n\rMascara de rede ");
klauss 19:ab2088e0dec6 110 cat("/qspi/mymask.txt");
klauss 28:94aec56c6329 111 pc.printf("\n\rGateway IP ");
klauss 19:ab2088e0dec6 112 cat("/qspi/mygate.txt");
klauss 19:ab2088e0dec6 113 }
klauss 19:ab2088e0dec6 114
klauss 19:ab2088e0dec6 115 if (type == 'c' ){ // close all files
klauss 28:94aec56c6329 116 fclose( fip );
klauss 28:94aec56c6329 117 fclose( fmask );
klauss 28:94aec56c6329 118 fclose( fgate );
klauss 28:94aec56c6329 119 fclose( fport );
klauss 28:94aec56c6329 120 fclose( fsip );
klauss 28:94aec56c6329 121 fclose( fsport );
klauss 28:94aec56c6329 122 fclose( fext );
klauss 28:94aec56c6329 123 fclose( fserext );
klauss 19:ab2088e0dec6 124 }
klauss 19:ab2088e0dec6 125
klauss 19:ab2088e0dec6 126 if (type == 'i' ){ // Check if files exist, if not create the files
klauss 33:735fd60e96d8 127 bool exists = true;
klauss 19:ab2088e0dec6 128 fip = fopen("/qspi/myip.txt", "r");
klauss 19:ab2088e0dec6 129 if (fip == NULL){
klauss 19:ab2088e0dec6 130 fip = fopen("/qspi/myip.txt", "w");
klauss 29:7246460b73f8 131 //fprintf(fip, "%s\n\r",__MY_IP__); //myip
klauss 29:7246460b73f8 132 fprintf(fip, "%s",__MY_IP__); //myip
klauss 33:735fd60e96d8 133 exists = false;
klauss 19:ab2088e0dec6 134 }
klauss 28:94aec56c6329 135
klauss 28:94aec56c6329 136 fserext = fopen("/qspi/myext.txt", "r");
klauss 28:94aec56c6329 137 if ( fserext == NULL ){
klauss 28:94aec56c6329 138 fserext = fopen("/qspi/myext.txt", "w");
klauss 31:bb5fb28a77df 139 fprintf( fserext, "%i" ,__MY_EXT__ ); //asterisk ext
klauss 33:735fd60e96d8 140 exists = false;
klauss 28:94aec56c6329 141 }
klauss 28:94aec56c6329 142 fport = fopen("/qspi/mysipport.txt", "r");
klauss 28:94aec56c6329 143 if (fport == NULL){
klauss 28:94aec56c6329 144 fport = fopen("/qspi/mysipport.txt", "w");
klauss 31:bb5fb28a77df 145 fprintf(fport, "%i",__MY_PORT__); //mysipport
klauss 33:735fd60e96d8 146 exists = false;
klauss 28:94aec56c6329 147 }
klauss 28:94aec56c6329 148 fsip = fopen("/qspi/serverip.txt", "r");
klauss 28:94aec56c6329 149 if (fsip == NULL){
klauss 28:94aec56c6329 150 fsip = fopen("/qspi/serverip.txt", "w");
klauss 29:7246460b73f8 151 //fprintf(fsip, "%s\n\r",__SERVER_IP__ ); //asterisk ip
klauss 29:7246460b73f8 152 fprintf(fsip, "%s",__SERVER_IP__ ); //asterisk ip
klauss 33:735fd60e96d8 153 exists = false;
klauss 28:94aec56c6329 154 }
klauss 28:94aec56c6329 155
klauss 28:94aec56c6329 156 fext = fopen("/qspi/peerext.txt", "r");
klauss 28:94aec56c6329 157 if ( fext == NULL ){
klauss 28:94aec56c6329 158 fext = fopen("/qspi/peerext.txt", "w");
klauss 31:bb5fb28a77df 159 fprintf( fext, "%i",__PEER_EXT__ ); //asterisk ip
klauss 33:735fd60e96d8 160 exists = false;
klauss 28:94aec56c6329 161 }
klauss 28:94aec56c6329 162 fsport = fopen("/qspi/serverport.txt", "r");
klauss 28:94aec56c6329 163 if (fsport == NULL){
klauss 28:94aec56c6329 164 fsport = fopen("/qspi/serverport.txt", "w");
klauss 31:bb5fb28a77df 165 fprintf(fsport, "%i",__SERVER_PORT__ ); //asterisk port
klauss 33:735fd60e96d8 166 exists = false;
klauss 28:94aec56c6329 167 }
klauss 28:94aec56c6329 168
klauss 19:ab2088e0dec6 169 fmask = fopen("/qspi/mymask.txt", "r");
klauss 19:ab2088e0dec6 170 if (fmask == NULL){
klauss 19:ab2088e0dec6 171 fmask = fopen("/qspi/mymask.txt", "w");
klauss 31:bb5fb28a77df 172 fprintf(fmask, "%s",__MY_MSK__); //mymask
klauss 33:735fd60e96d8 173 exists = false;
klauss 19:ab2088e0dec6 174 }
klauss 19:ab2088e0dec6 175 fgate = fopen("/qspi/mygateway.txt", "r");
klauss 19:ab2088e0dec6 176 if (fgate == NULL){
klauss 19:ab2088e0dec6 177 fgate = fopen("/qspi/mygate.txt", "w");
klauss 31:bb5fb28a77df 178 fprintf(fgate, "%s",__MY_GTW__); //mygateway
klauss 33:735fd60e96d8 179 exists = false;
klauss 19:ab2088e0dec6 180 }
klauss 33:735fd60e96d8 181 if( !exists ) pc.printf("\n\r Default configurations set! \n\r");
klauss 19:ab2088e0dec6 182 }
klauss 19:ab2088e0dec6 183
klauss 19:ab2088e0dec6 184 if (type == 'r' ){ // Just open for read
klauss 19:ab2088e0dec6 185 fip = fopen("/qspi/myip.txt", "r");
klauss 19:ab2088e0dec6 186 fmask = fopen("/qspi/mymask.txt", "r");
klauss 19:ab2088e0dec6 187 fgate = fopen("/qspi/mygateway.txt", "r");
klauss 19:ab2088e0dec6 188 fport = fopen("/qspi/mysipport.txt", "r");
klauss 19:ab2088e0dec6 189 fsip = fopen("/qspi/serverip.txt", "r");
klauss 19:ab2088e0dec6 190 fsport = fopen("/qspi/serverport.txt", "r");
klauss 28:94aec56c6329 191 fext = fopen( "/qspi/myext.txt", "r" );
klauss 28:94aec56c6329 192 fserext = fopen( "/qspi/peerext.txt", "r" );
klauss 19:ab2088e0dec6 193 }
klauss 19:ab2088e0dec6 194
klauss 19:ab2088e0dec6 195 if (type == 'w'){ // Create and write the default configs
klauss 19:ab2088e0dec6 196 fip = fopen("/qspi/myip.txt", "w");
klauss 19:ab2088e0dec6 197 fmask = fopen("/qspi/mymask.txt", "w");
klauss 19:ab2088e0dec6 198 fgate = fopen("/qspi/mygateway.txt", "w");
klauss 19:ab2088e0dec6 199 fport = fopen("/qspi/mysipport.txt", "w");
klauss 19:ab2088e0dec6 200 fsip = fopen("/qspi/serverip.txt", "w");
klauss 19:ab2088e0dec6 201 fsport = fopen("/qspi/serverport.txt", "w");
klauss 28:94aec56c6329 202 fext = fopen( "/qspi/myext.txt", "w" );
klauss 28:94aec56c6329 203 fserext = fopen( "/qspi/peerext.txt", "w" );
klauss 19:ab2088e0dec6 204
klauss 29:7246460b73f8 205 //fprintf( fip, "%s\n\r", __MY_IP__ ); //myip
klauss 29:7246460b73f8 206 fprintf( fip, "%s", __MY_IP__ ); //myip
klauss 31:bb5fb28a77df 207 fprintf( fport, "%i", __MY_PORT__ ); //mysipport
klauss 31:bb5fb28a77df 208 fprintf( fext, "%i", __MY_EXT__ ); //myext
klauss 28:94aec56c6329 209
klauss 29:7246460b73f8 210 //fprintf( fsip, "%s\n\r", __SERVER_IP__ ); //asterisk ip
klauss 29:7246460b73f8 211 fprintf( fsip, "%s", __SERVER_IP__ ); //asterisk ip
klauss 31:bb5fb28a77df 212 fprintf( fserext, "%i",__PEER_EXT__ ); //asterisk port
klauss 31:bb5fb28a77df 213 fprintf( fsport, "%i",__SERVER_PORT__ ); //asterisk port
klauss 28:94aec56c6329 214
klauss 31:bb5fb28a77df 215 fprintf( fmask, "%s",__MY_MSK__ ); //mymask
klauss 31:bb5fb28a77df 216 fprintf( fgate, "%i", __MY_GTW__ ); //mygateway
klauss 19:ab2088e0dec6 217
klauss 19:ab2088e0dec6 218 files('c');
klauss 19:ab2088e0dec6 219
klauss 19:ab2088e0dec6 220 pc.printf("\n\r Default configurations set! \n\r");
klauss 19:ab2088e0dec6 221
klauss 19:ab2088e0dec6 222 }
klauss 19:ab2088e0dec6 223
klauss 19:ab2088e0dec6 224 }
klauss 26:725cbbedadd5 225 void init_fsystem(){
klauss 26:725cbbedadd5 226 // init file system and check if files exist
klauss 26:725cbbedadd5 227 if (!qspifs.isformatted()) {
klauss 26:725cbbedadd5 228 qspifs.format();
klauss 26:725cbbedadd5 229 pc.printf("File system configured!!\n\r");
klauss 26:725cbbedadd5 230 }
klauss 26:725cbbedadd5 231 files('i'); // check if the files are created
klauss 26:725cbbedadd5 232 files('c');
klauss 26:725cbbedadd5 233 pc.printf("*******System Ready*******\n\r");
klauss 19:ab2088e0dec6 234 }
klauss 19:ab2088e0dec6 235
klauss 28:94aec56c6329 236 // main prompt process
klauss 28:94aec56c6329 237 void prompt_process(){
klauss 28:94aec56c6329 238 //FIXME dar flush na serial
klauss 19:ab2088e0dec6 239 volatile char b = 0;
klauss 19:ab2088e0dec6 240 static uint8_t bufret = 0;
klauss 30:8dfb6d8de53d 241 static Timer flood_timeout;
klauss 30:8dfb6d8de53d 242
klauss 30:8dfb6d8de53d 243 if( flood_timeout.read() > 60 ){
klauss 30:8dfb6d8de53d 244 pflood = 0;
klauss 30:8dfb6d8de53d 245 flood_timeout.stop();
klauss 30:8dfb6d8de53d 246 flood_timeout.reset();
klauss 30:8dfb6d8de53d 247 }
klauss 30:8dfb6d8de53d 248
klauss 27:98f824719d1c 249 if ( pc.readable() ){
klauss 26:725cbbedadd5 250 // imput do teclado
klauss 19:ab2088e0dec6 251 b = pc.getc();
klauss 19:ab2088e0dec6 252
klauss 29:7246460b73f8 253 if( b == 0x0D ){ // enter
klauss 27:98f824719d1c 254 bufret = 1;
klauss 29:7246460b73f8 255 }else{
klauss 29:7246460b73f8 256 //FIXME como mudar o contador quando eu aperto backspace
klauss 29:7246460b73f8 257 pc.putc( b );
klauss 29:7246460b73f8 258 if( b == 0x08 || b == 0x7F ){ // BS | DEL
klauss 29:7246460b73f8 259 if( bufptr > 0 ) debug_buf[ --bufptr ] = 0;
klauss 29:7246460b73f8 260 //bufptr--;
klauss 29:7246460b73f8 261 //pc.printf(".");
klauss 31:bb5fb28a77df 262 }else if( b == 0x09 ){
klauss 31:bb5fb28a77df 263 // ignore tab
klauss 29:7246460b73f8 264 }else{
klauss 29:7246460b73f8 265 debug_buf[bufptr] = b;
klauss 29:7246460b73f8 266 //pc.printf("(%x)", (uint8_t)b );
klauss 29:7246460b73f8 267 bufptr++;
klauss 29:7246460b73f8 268 }
klauss 19:ab2088e0dec6 269 }
klauss 19:ab2088e0dec6 270 }
klauss 19:ab2088e0dec6 271
klauss 28:94aec56c6329 272 // Prompt commands here
klauss 29:7246460b73f8 273 if ( bufret == 1 ) {
klauss 28:94aec56c6329 274 bool miss_match = true;
klauss 29:7246460b73f8 275 static unsigned int promptcb_last_ext = 0;
klauss 29:7246460b73f8 276 static unsigned int promptcb_last_port = 0;
klauss 28:94aec56c6329 277
klauss 30:8dfb6d8de53d 278 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) ".",1 )) {
klauss 30:8dfb6d8de53d 279 miss_match = false;
klauss 30:8dfb6d8de53d 280 //xmemcpy( (uint)debug_buf, last_debug_buf, 300);
klauss 30:8dfb6d8de53d 281 strcpy( debug_buf, last_debug_buf );
klauss 30:8dfb6d8de53d 282 }
klauss 30:8dfb6d8de53d 283
klauss 28:94aec56c6329 284 if( !bufptr ){
klauss 28:94aec56c6329 285 miss_match = false;
klauss 28:94aec56c6329 286 }
klauss 27:98f824719d1c 287 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "sconfig" )) {
klauss 28:94aec56c6329 288 miss_match = false;
klauss 27:98f824719d1c 289 pc.printf("\n\r");
klauss 27:98f824719d1c 290 files('s');
klauss 27:98f824719d1c 291 }
klauss 27:98f824719d1c 292 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "format" )) {
klauss 28:94aec56c6329 293 miss_match = false;
klauss 27:98f824719d1c 294 pc.printf("\n Formatando o sistema de arquivos... espere o sistema reiniciar \n\r");
klauss 27:98f824719d1c 295 //qspifs.format();
klauss 27:98f824719d1c 296 NVIC_SystemReset();
klauss 27:98f824719d1c 297 }
klauss 27:98f824719d1c 298
klauss 28:94aec56c6329 299 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "ipset ", 6 )) {
klauss 28:94aec56c6329 300 miss_match = false;
klauss 27:98f824719d1c 301 fip = fopen("/qspi/myip.txt", "w");
klauss 29:7246460b73f8 302 //fprintf(fip,"%s\n\r",(debug_buf+6));
klauss 29:7246460b73f8 303 fprintf(fip,"%s",(debug_buf+6));
klauss 27:98f824719d1c 304 fclose(fip);
klauss 27:98f824719d1c 305 pc.printf("\n\r");
klauss 27:98f824719d1c 306 files('s');
klauss 27:98f824719d1c 307 }
klauss 28:94aec56c6329 308
klauss 28:94aec56c6329 309 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "extset ", 7 )) {
klauss 28:94aec56c6329 310 miss_match = false;
klauss 28:94aec56c6329 311 fip = fopen("/qspi/myext.txt", "w");
klauss 31:bb5fb28a77df 312 fprintf(fip, "%s" , ( debug_buf + 7) );
klauss 28:94aec56c6329 313 fclose(fip);
klauss 28:94aec56c6329 314 pc.printf("\n\r");
klauss 28:94aec56c6329 315 files('s');
klauss 28:94aec56c6329 316 }
klauss 28:94aec56c6329 317
klauss 28:94aec56c6329 318 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "serextset ", 10 )) {
klauss 28:94aec56c6329 319 miss_match = false;
klauss 28:94aec56c6329 320 fip = fopen("/qspi/peerext.txt", "w");
klauss 28:94aec56c6329 321 fprintf(fip, "%s\n\r" , ( debug_buf + 10 ) );
klauss 28:94aec56c6329 322 fclose(fip);
klauss 28:94aec56c6329 323 pc.printf("\n\r");
klauss 28:94aec56c6329 324 files('s');
klauss 28:94aec56c6329 325 }
klauss 27:98f824719d1c 326
klauss 19:ab2088e0dec6 327 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "maskset ",8 )) {
klauss 28:94aec56c6329 328 miss_match = false;
klauss 27:98f824719d1c 329 fmask = fopen("/qspi/mymask.txt", "w");
klauss 27:98f824719d1c 330 fprintf(fmask,"%s\n\r",(debug_buf+8));
klauss 27:98f824719d1c 331 fclose(fmask);
klauss 27:98f824719d1c 332 pc.printf("\n\r");
klauss 27:98f824719d1c 333 files('s');
klauss 27:98f824719d1c 334 }
klauss 27:98f824719d1c 335
klauss 19:ab2088e0dec6 336 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "gatewayset ",11 )) {
klauss 28:94aec56c6329 337 miss_match = false;
klauss 27:98f824719d1c 338 fgate = fopen("/qspi/mygate.txt", "w");
klauss 27:98f824719d1c 339 fprintf(fgate,"%s\n\r",(debug_buf+11));
klauss 27:98f824719d1c 340 fclose(fgate);
klauss 27:98f824719d1c 341 pc.printf("\n\r");
klauss 27:98f824719d1c 342 files('s');
klauss 27:98f824719d1c 343 }
klauss 27:98f824719d1c 344
klauss 27:98f824719d1c 345
klauss 27:98f824719d1c 346 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "msipport ",9 )) {
klauss 28:94aec56c6329 347 miss_match = false;
klauss 27:98f824719d1c 348 fport = fopen("/qspi/mysipport.txt", "w");
klauss 27:98f824719d1c 349 fprintf(fport,"%s\n\r",(debug_buf+9));
klauss 27:98f824719d1c 350 fclose(fport);
klauss 27:98f824719d1c 351 pc.printf("\n\r");
klauss 27:98f824719d1c 352 files('s');
klauss 27:98f824719d1c 353 }
klauss 27:98f824719d1c 354
klauss 27:98f824719d1c 355 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "serverip ",9 )) {
klauss 28:94aec56c6329 356 miss_match = false;
klauss 27:98f824719d1c 357 fsip = fopen("/qspi/serverip.txt", "w");
klauss 29:7246460b73f8 358 //fprintf(fsip,"%s\n\r",(debug_buf+9));
klauss 29:7246460b73f8 359 fprintf(fsip,"%s",(debug_buf+9));
klauss 27:98f824719d1c 360 fclose(fsip);
klauss 27:98f824719d1c 361 pc.printf("\n\r");
klauss 27:98f824719d1c 362 files('s');
klauss 27:98f824719d1c 363 }
klauss 27:98f824719d1c 364
klauss 27:98f824719d1c 365 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "ssport ",7 )) {
klauss 28:94aec56c6329 366 miss_match = false;
klauss 27:98f824719d1c 367 fsport = fopen("/qspi/serverport.txt", "w");
klauss 27:98f824719d1c 368 fprintf(fsport,"%s\n\r",(debug_buf+7));
klauss 27:98f824719d1c 369 fclose(fsport);
klauss 27:98f824719d1c 370 pc.printf("\n\r");
klauss 19:ab2088e0dec6 371 files('s');
klauss 27:98f824719d1c 372 }
klauss 27:98f824719d1c 373
klauss 27:98f824719d1c 374
klauss 27:98f824719d1c 375 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "dconfig" )) {
klauss 28:94aec56c6329 376 miss_match = false;
klauss 27:98f824719d1c 377 files('w');
klauss 27:98f824719d1c 378 files('s');
klauss 27:98f824719d1c 379 }
klauss 27:98f824719d1c 380
klauss 27:98f824719d1c 381 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "reset" )) {
klauss 28:94aec56c6329 382 miss_match = false;
klauss 28:94aec56c6329 383 //pc.printf("\n\r reset!!! \n\r");
klauss 28:94aec56c6329 384 pc.printf("\n\rJob is done\n\r");
klauss 27:98f824719d1c 385 pc.putc(0x01);
klauss 27:98f824719d1c 386 NVIC_SystemReset();
klauss 27:98f824719d1c 387 }
klauss 27:98f824719d1c 388
klauss 27:98f824719d1c 389 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "dog" )) {
klauss 28:94aec56c6329 390 miss_match = false;
klauss 27:98f824719d1c 391 pc.printf("\n\r MUUUUUUUuuuuUUUUUU - I'm not a dog!!!! \n\r");
klauss 27:98f824719d1c 392 dog = 0;
klauss 27:98f824719d1c 393 }
klauss 27:98f824719d1c 394
Cola 21:0bd688722e81 395 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "flood ",6 )) {
klauss 27:98f824719d1c 396 if (xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "on",2 )) {
klauss 28:94aec56c6329 397 miss_match = false;
klauss 27:98f824719d1c 398 pc.printf("\n\r\t Flood ON\n\r\t");
klauss 27:98f824719d1c 399 tflood.start();
klauss 27:98f824719d1c 400 tflood.reset();
klauss 27:98f824719d1c 401 floodcount =0;
klauss 27:98f824719d1c 402 pflood = 1;
klauss 30:8dfb6d8de53d 403 flood_timeout.start();
klauss 27:98f824719d1c 404 }
klauss 27:98f824719d1c 405 if (xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "off",3 )) {
klauss 28:94aec56c6329 406 miss_match = false;
klauss 27:98f824719d1c 407 pc.printf("\n\r\t Flood OFF\n\r\t");
klauss 27:98f824719d1c 408 pflood = 0;
klauss 27:98f824719d1c 409 tflood.stop();
klauss 30:8dfb6d8de53d 410 flood_timeout.reset();
klauss 27:98f824719d1c 411 }
klauss 27:98f824719d1c 412 }
klauss 30:8dfb6d8de53d 413
Cola 21:0bd688722e81 414 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug ",6 )) {
klauss 31:bb5fb28a77df 415 if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "on",2 )) {
klauss 28:94aec56c6329 416 miss_match = false;
Cola 21:0bd688722e81 417 pc.printf("\n\r\tDebug ON\n\r\t");
Cola 21:0bd688722e81 418 debug_alive = 1;
klauss 27:98f824719d1c 419 }
klauss 31:bb5fb28a77df 420 if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "off",3 )) {
klauss 28:94aec56c6329 421 miss_match = false;
klauss 27:98f824719d1c 422 pc.printf("\n\r\tDebug OFF\n\r\t");
Cola 21:0bd688722e81 423 debug_alive = 0;
klauss 27:98f824719d1c 424 }
klauss 31:bb5fb28a77df 425 if( xmemmatch( (uint8_t*)(debug_buf+6), (uint8_t*) "show",4 )) {
klauss 31:bb5fb28a77df 426 miss_match = false;
klauss 31:bb5fb28a77df 427 pc.printf("\n\rdebug_sip");
klauss 31:bb5fb28a77df 428 pc.printf("\n\rdebug_alive");
klauss 31:bb5fb28a77df 429 pc.printf("\n\rdebug_prompt");
klauss 31:bb5fb28a77df 430 pc.printf("\n\rdebug_vector");
klauss 31:bb5fb28a77df 431 pc.printf("\n\rdebug_cb");
klauss 31:bb5fb28a77df 432 pc.printf("\n\rdebug_main");
klauss 31:bb5fb28a77df 433 pc.printf("\n\rdebug_cks");
klauss 31:bb5fb28a77df 434 pc.printf("\n\rdebug_cb_rx");
klauss 31:bb5fb28a77df 435 pc.printf("\n\rdebug_cb_tx*");
klauss 31:bb5fb28a77df 436 pc.printf("\n\rdebug_eth_rx*");
klauss 31:bb5fb28a77df 437 pc.printf("\n\rdebug_eth_tx*");
klauss 31:bb5fb28a77df 438 pc.printf("\n\rdebug_file");
klauss 31:bb5fb28a77df 439 }
klauss 19:ab2088e0dec6 440 }
klauss 28:94aec56c6329 441
klauss 28:94aec56c6329 442 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_sip ", 10 )) {
klauss 28:94aec56c6329 443 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "on",2 )) {
klauss 28:94aec56c6329 444 miss_match = false;
klauss 29:7246460b73f8 445 pc.printf( "\n\rSip Debug ON\n\r" );
klauss 28:94aec56c6329 446 debug_sip = 1;
klauss 28:94aec56c6329 447 }
klauss 28:94aec56c6329 448 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "off",3 )) {
klauss 28:94aec56c6329 449 miss_match = false;
klauss 29:7246460b73f8 450 pc.printf( "\n\rSip Debug OFF\n\r" );
klauss 28:94aec56c6329 451 debug_sip = 0;
klauss 28:94aec56c6329 452 }
klauss 28:94aec56c6329 453 }
klauss 31:bb5fb28a77df 454
klauss 31:bb5fb28a77df 455 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_cks ", 10 )) {
klauss 31:bb5fb28a77df 456 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "on",2 )) {
klauss 31:bb5fb28a77df 457 miss_match = false;
klauss 31:bb5fb28a77df 458 pc.printf( "\n\rCKS Debug ON\n\r" );
klauss 31:bb5fb28a77df 459 debug_cks = 1;
klauss 31:bb5fb28a77df 460 }
klauss 31:bb5fb28a77df 461 if (xmemmatch( (uint8_t*)(debug_buf + 10 ), (uint8_t*) "off",3 )) {
klauss 31:bb5fb28a77df 462 miss_match = false;
klauss 31:bb5fb28a77df 463 pc.printf( "\n\rCKS Debug OFF\n\r" );
klauss 31:bb5fb28a77df 464 debug_cks = 0;
klauss 31:bb5fb28a77df 465 }
klauss 31:bb5fb28a77df 466 }
klauss 31:bb5fb28a77df 467
klauss 27:98f824719d1c 468 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "promptcb ", 9)) { //promptcb ramal porta comando
klauss 27:98f824719d1c 469 static int id_msg = 0x10;
Cola 21:0bd688722e81 470 uint8_t write_buffer[300];
Cola 21:0bd688722e81 471 unsigned int ext,port;
Cola 21:0bd688722e81 472 int ant1,ant2;
klauss 27:98f824719d1c 473
Cola 21:0bd688722e81 474 debug_buf[bufptr++] = 0x0D;
Cola 21:0bd688722e81 475 debug_buf[bufptr++] = 0x00;
klauss 27:98f824719d1c 476
Cola 21:0bd688722e81 477 ant1 = str2uint( (debug_buf+9), &ext);
Cola 21:0bd688722e81 478 ant2 = str2uint( ((debug_buf+9)+ant1+1), &port);
klauss 27:98f824719d1c 479
klauss 29:7246460b73f8 480 promptcb_last_ext = ext;
klauss 29:7246460b73f8 481 promptcb_last_port = port;
klauss 29:7246460b73f8 482 pc.printf("\r\next=%d port=%d\r\ncmd=%s\r\n",ext, port, debug_buf+9+ant1+2+ant2);
klauss 29:7246460b73f8 483 promptcb_last_ext = ext;
klauss 29:7246460b73f8 484 __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 29:7246460b73f8 485 pc.printf("\n\rComando enviado\n\r");
klauss 29:7246460b73f8 486 }
klauss 29:7246460b73f8 487 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "pcb ",4 )) {
klauss 29:7246460b73f8 488 static int id_msg = 0x30;
klauss 29:7246460b73f8 489 uint8_t write_buffer[300];
klauss 29:7246460b73f8 490 debug_buf[bufptr++] = 0x0D;
klauss 29:7246460b73f8 491 debug_buf[bufptr++] = 0x00;
klauss 27:98f824719d1c 492
klauss 29:7246460b73f8 493 pc.printf("\r\next=%d port=%d\r\ncmd=%s\r\n",promptcb_last_ext, promptcb_last_port, debug_buf+4);
klauss 29:7246460b73f8 494
klauss 29:7246460b73f8 495 __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 29:7246460b73f8 496 pc.printf("\n\rComando enviado\n\r");
klauss 19:ab2088e0dec6 497 }
klauss 27:98f824719d1c 498
Cola 22:d2a4b5939115 499 if( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "cks",3 )) {
klauss 28:94aec56c6329 500 miss_match = false;
klauss 27:98f824719d1c 501 pcks_s = 1;
Cola 22:d2a4b5939115 502 }
klauss 27:98f824719d1c 503
Cola 24:270b436a1bb0 504 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "showcb",6 )) {
klauss 28:94aec56c6329 505 miss_match = false;
Cola 24:270b436a1bb0 506 pshowcb = 1;
Cola 24:270b436a1bb0 507 }
klauss 27:98f824719d1c 508
klauss 27:98f824719d1c 509 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debugsip ", 9 )) {
klauss 27:98f824719d1c 510 if (xmemmatch( (uint8_t*)( debug_buf + 9 ), (uint8_t*) "on",2 )) {
klauss 28:94aec56c6329 511 miss_match = false;
klauss 28:94aec56c6329 512 pc.printf("\tDebug Sip ON");
klauss 27:98f824719d1c 513 debug_sip = 1;
klauss 27:98f824719d1c 514 }
klauss 27:98f824719d1c 515 if (xmemmatch( (uint8_t*)( debug_buf + 9 ), (uint8_t*) "off",3 )) {
klauss 28:94aec56c6329 516 miss_match = false;
klauss 28:94aec56c6329 517 pc.printf("Debug Sip OFF");
klauss 27:98f824719d1c 518 debug_sip = 0;
klauss 27:98f824719d1c 519 }
klauss 27:98f824719d1c 520 }
klauss 31:bb5fb28a77df 521
klauss 31:bb5fb28a77df 522 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_cb_rx ", 12 )) {
klauss 31:bb5fb28a77df 523 if (xmemmatch( (uint8_t*)( debug_buf + 12 ), (uint8_t*) "on",2 )) {
klauss 31:bb5fb28a77df 524 miss_match = false;
klauss 31:bb5fb28a77df 525 pc.printf("\tDebug Cbx Rx ON");
klauss 31:bb5fb28a77df 526 debug_cb_rx = 1;
klauss 31:bb5fb28a77df 527 }
klauss 31:bb5fb28a77df 528 if (xmemmatch( (uint8_t*)( debug_buf + 12 ), (uint8_t*) "off",3 )) {
klauss 31:bb5fb28a77df 529 miss_match = false;
klauss 31:bb5fb28a77df 530 pc.printf("Debug Cbx Rx OFF");
klauss 31:bb5fb28a77df 531 debug_cb_rx = 0;
klauss 31:bb5fb28a77df 532 }
klauss 31:bb5fb28a77df 533 }
klauss 31:bb5fb28a77df 534
klauss 31:bb5fb28a77df 535 if (xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "debug_file ", 11 )) {
klauss 31:bb5fb28a77df 536 if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "on",2 )) {
klauss 31:bb5fb28a77df 537 miss_match = false;
klauss 31:bb5fb28a77df 538 pc.printf("\tDebug File ON");
klauss 31:bb5fb28a77df 539 debug_cb_rx = 1;
klauss 31:bb5fb28a77df 540 }
klauss 31:bb5fb28a77df 541 if (xmemmatch( (uint8_t*)( debug_buf + 11 ), (uint8_t*) "off",3 )) {
klauss 31:bb5fb28a77df 542 miss_match = false;
klauss 31:bb5fb28a77df 543 pc.printf("Debug File OFF");
klauss 31:bb5fb28a77df 544 debug_cb_rx = 0;
klauss 31:bb5fb28a77df 545 }
klauss 31:bb5fb28a77df 546 }
klauss 31:bb5fb28a77df 547
klauss 19:ab2088e0dec6 548 if( xstrmatch( (uint8_t*)debug_buf, (uint8_t*) "help" )) {
klauss 28:94aec56c6329 549 miss_match = false;
klauss 27:98f824719d1c 550 pc.printf("\n\r****************************PROMPT HELP******************\n\r");
klauss 27:98f824719d1c 551 pc.printf("sconfig - mostra o arquivo de configuracao do sistema\n\r");
klauss 27:98f824719d1c 552 pc.printf("dconfig - volta as configuracoes do sistema para o padrao de fabrica\n\r");
klauss 27:98f824719d1c 553 pc.printf("callme [ramal porta] - envia o pedido de ligacao para o callbox com o ramal e porta indicada\n\r");
klauss 27:98f824719d1c 554 pc.printf("promptcb ramal porta comando - envia o <comando> para o cbx <ramal> e <porta> executar\n\r");
klauss 27:98f824719d1c 555 pc.printf("format - formata o sistema de arquivos\n\r");
klauss 27:98f824719d1c 556 pc.printf("reset - resta o sistema\n\r");
klauss 27:98f824719d1c 557 pc.printf("ipset [ip] - Configura o IP da cabeceira\n\r");
klauss 28:94aec56c6329 558 pc.printf("extset [ext] - Configura a ext da cabeceira\n\r");
klauss 28:94aec56c6329 559 pc.printf("msipport [port] - Configura a porta SIP da cabeceira\n\r");
klauss 28:94aec56c6329 560 pc.printf("serverip [ip] - Configura o ip do servidor asterisk\n\r");
klauss 28:94aec56c6329 561 pc.printf("serextset [ext] - Configura a server ext da cabeceira\n\r");
klauss 28:94aec56c6329 562 pc.printf("ssport [port] - Configura a porta SIP do servidor asterisk\n\r");
klauss 27:98f824719d1c 563 pc.printf("maskset [mask] - Configura a mascara da cabeceira\n\r");
klauss 27:98f824719d1c 564 pc.printf("gatewayset [gateway] - Configura o gateway da cabeceira\n\r");
klauss 27:98f824719d1c 565 pc.printf("showcb - lista os Cbx registrados na header\n\r");
klauss 27:98f824719d1c 566 pc.printf("cks - exibe estatisticas de check sum\n\r");
klauss 31:bb5fb28a77df 567 pc.printf(". - executa o comando anterior novamente\n\r");
klauss 31:bb5fb28a77df 568 pc.printf("debug [on|off|show] - seleciona debugs gerais | lista de debugs \n\r");
klauss 27:98f824719d1c 569 pc.printf("flood [on|off] - simula envio de pacotes de audio\n\r");
klauss 28:94aec56c6329 570 pc.printf("PROMPT VERSION: V%d\n\r",PVERSION);
klauss 27:98f824719d1c 571 }
klauss 27:98f824719d1c 572 /*
klauss 19:ab2088e0dec6 573 if ( xmemmatch( (uint8_t*)debug_buf, (uint8_t*) "callme ", 7 )) {
klauss 19:ab2088e0dec6 574 if ( debug_buf[16] != 0 && debug_buf[11] != 0x20 )
klauss 19:ab2088e0dec6 575 pc.printf("\n\r Error: formato errado! ramal=xxxx porta=xxxx \n\r");
klauss 19:ab2088e0dec6 576 else {
klauss 19:ab2088e0dec6 577 uint8_t data[300];
klauss 19:ab2088e0dec6 578 uint16_t cks=0;
klauss 27:98f824719d1c 579
klauss 19:ab2088e0dec6 580 //data[0] = (uint8_t)( (debug_buf[7]&0xf0)<<4 + (debug_buf[8]&0x0f) ) ;
klauss 19:ab2088e0dec6 581 //data[1] = (uint8_t)( (debug_buf[9]&0xf0)<<4 + (debug_buf[10]&0x0f) ) ;
klauss 19:ab2088e0dec6 582 //data[2] = (uint8_t)( (debug_buf[12]&0xf0)<<4 + (debug_buf[13]&0x0f) ) ;
klauss 19:ab2088e0dec6 583 /data[3] = (uint8_t)( (debug_buf[14]&0xf0)<<4 + (debug_buf[15]&0x0f) ) ;
klauss 27:98f824719d1c 584
klauss 19:ab2088e0dec6 585 data[0] = (uint8_t)( debug_buf[ 7 ] & 0xFF00 >> 8 );
klauss 19:ab2088e0dec6 586 data[1] = (uint8_t)( debug_buf[ 9 ] & 0x00FF );
klauss 19:ab2088e0dec6 587 data[2] = (uint8_t)( debug_buf[ 12 ] & 0xFF00 >> 8 );
klauss 19:ab2088e0dec6 588 data[3] = (uint8_t)( debug_buf[ 14 ] & 0x00FF );
klauss 27:98f824719d1c 589
klauss 19:ab2088e0dec6 590 data[6] = 0x04;
klauss 19:ab2088e0dec6 591 for (int i = 7; i < 300; i++) data[i] = 0x00;
klauss 19:ab2088e0dec6 592 cks = __checksum__(data,300);
klauss 19:ab2088e0dec6 593 data[4] = cks>>8;
klauss 19:ab2088e0dec6 594 data[5] = cks&0xff;
klauss 27:98f824719d1c 595
klauss 19:ab2088e0dec6 596 pc.printf("\n\r");
klauss 19:ab2088e0dec6 597 for( int i = 0; i < 300; i++ )
klauss 19:ab2088e0dec6 598 pc.printf("%x ", data[ i ] );
klauss 19:ab2088e0dec6 599 pc.printf("\n\r");
klauss 27:98f824719d1c 600
klauss 19:ab2088e0dec6 601 xmemcpy(TXBuffer,data,300);
klauss 27:98f824719d1c 602
klauss 19:ab2088e0dec6 603 pc.printf("\n\r");
klauss 19:ab2088e0dec6 604 for( int i = 0; i < 300; i++ )
klauss 19:ab2088e0dec6 605 pc.printf("%x ", data[ i ] );
klauss 19:ab2088e0dec6 606 pc.printf("\n\r");
klauss 27:98f824719d1c 607
klauss 19:ab2088e0dec6 608 send2callboxes();
klauss 27:98f824719d1c 609
klauss 19:ab2088e0dec6 610 pc.printf("\n\r calling callbox %s \n\r",debug_buf+7);
klauss 19:ab2088e0dec6 611 }
klauss 19:ab2088e0dec6 612
klauss 19:ab2088e0dec6 613 }
klauss 27:98f824719d1c 614 */
klauss 30:8dfb6d8de53d 615
klauss 29:7246460b73f8 616 if( miss_match ) pc.printf("\n\r%s: command not found\n\r", debug_buf );
klauss 30:8dfb6d8de53d 617
klauss 30:8dfb6d8de53d 618 else strcpy( last_debug_buf, debug_buf );
klauss 19:ab2088e0dec6 619 }
klauss 28:94aec56c6329 620
klauss 28:94aec56c6329 621 if ( b == 0x0D || bufret == 1 || bufptr > DEBUGBUFSIZE ) {
klauss 27:98f824719d1c 622 bufptr = 0;
klauss 27:98f824719d1c 623 for (uint8_t i =0; i < DEBUGBUFSIZE; i++) {
klauss 27:98f824719d1c 624 debug_buf[i] = 0;
klauss 19:ab2088e0dec6 625 }
klauss 27:98f824719d1c 626 bufret = 0;
klauss 27:98f824719d1c 627 pc.putc(0x0A);
klauss 27:98f824719d1c 628 pc.putc(0x0D);
klauss 29:7246460b73f8 629 pc.printf("> ");
klauss 19:ab2088e0dec6 630 }
klauss 28:94aec56c6329 631 }