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

file_system_manager.cpp@133:3d136f5ffd66, 2015-09-01 (annotated)

Committer:
klauss
Date:
Tue Sep 01 19:33:11 2015 +0000
Revision:
133:3d136f5ffd66
Parent:
132:05cd37f7e007
Child:
135:2f4290590e51
Implementando a fun??o que pareia os pings de mestre e escravo, contemplando do bug da radio. Vers?o com o comando de teste.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
klauss 74:81c47fff88a5 1 #include "file_system_manager.h"
klauss 74:81c47fff88a5 2
klauss 81:3656f00ab3db 3 QSPIFileSystem qspifs("qspi");
klauss 81:3656f00ab3db 4
klauss 132:05cd37f7e007 5 extern Serial pc;
klauss 132:05cd37f7e007 6
klauss 121:ee02790d00b7 7 char file_buffer [ FILE_BUFFER_SIZE ];
klauss 121:ee02790d00b7 8
klauss 132:05cd37f7e007 9 int fset_header_ip ( const char * new_header_ip )
klauss 121:ee02790d00b7 10 {
klauss 81:3656f00ab3db 11 FILE * fip = fopen("/qspi/myip.txt", "w");
klauss 119:ee6a53069455 12 if ( fip )
klauss 119:ee6a53069455 13 {
klauss 119:ee6a53069455 14 fprintf( fip, "%s\n\r", new_header_ip );
klauss 119:ee6a53069455 15 fclose( fip );
klauss 132:05cd37f7e007 16 return ( 0 );
klauss 132:05cd37f7e007 17 }
klauss 132:05cd37f7e007 18 else
klauss 132:05cd37f7e007 19 {
klauss 132:05cd37f7e007 20 return ( -1 );
klauss 132:05cd37f7e007 21 }
klauss 81:3656f00ab3db 22 }
klauss 81:3656f00ab3db 23
klauss 132:05cd37f7e007 24 int fget_ip ( char * header_ip, const size_t length )
klauss 121:ee02790d00b7 25 {
klauss 122:480c44b0e205 26 FILE * fip = fopen ("/qspi/myip.txt", "r" );
klauss 121:ee02790d00b7 27 if ( fip != NULL )
klauss 121:ee02790d00b7 28 {
klauss 121:ee02790d00b7 29 int read = fread ( header_ip, 1, length, fip );
klauss 121:ee02790d00b7 30 if( read > 0 )
klauss 121:ee02790d00b7 31 {
klauss 121:ee02790d00b7 32 for ( register int i = 0; i < read; i++ )
klauss 121:ee02790d00b7 33 {
klauss 121:ee02790d00b7 34 if( header_ip [ i ] == '\n' || header_ip [ i ] == '\r' )
klauss 121:ee02790d00b7 35 {
klauss 121:ee02790d00b7 36 header_ip [ i ] = '\0';
klauss 121:ee02790d00b7 37 break;
klauss 121:ee02790d00b7 38 }
klauss 121:ee02790d00b7 39 }
klauss 121:ee02790d00b7 40 } else {
klauss 122:480c44b0e205 41 if ( fip ) fclose ( fip );
klauss 121:ee02790d00b7 42 return ( -3 );
klauss 121:ee02790d00b7 43 }
klauss 121:ee02790d00b7 44
klauss 121:ee02790d00b7 45 header_ip [ length ] = 0;
klauss 121:ee02790d00b7 46
klauss 122:480c44b0e205 47 if ( fip ) fclose ( fip );
klauss 121:ee02790d00b7 48
klauss 121:ee02790d00b7 49 return ( read );
klauss 121:ee02790d00b7 50 }
klauss 121:ee02790d00b7 51
klauss 122:480c44b0e205 52 return ( -1 );
klauss 122:480c44b0e205 53 }
klauss 122:480c44b0e205 54
klauss 132:05cd37f7e007 55 int fget_fw_ip ( char * fw_ip, const size_t length )
klauss 122:480c44b0e205 56 {
klauss 132:05cd37f7e007 57 FILE *ffw_ip = fopen( "/qspi/fw_ip.txt", "r");
klauss 132:05cd37f7e007 58 if( ffw_ip == NULL ){
klauss 132:05cd37f7e007 59 return ( -1 );
klauss 132:05cd37f7e007 60 }else{
klauss 132:05cd37f7e007 61 int read = fread( fw_ip, 1, 512, ffw_ip );
klauss 132:05cd37f7e007 62 if( read > 0 ){
klauss 132:05cd37f7e007 63 for( int i = 0; i < read; i++ )
klauss 132:05cd37f7e007 64 if( fw_ip[ i ] == '\n' || fw_ip[ i ] == '\r' ){
klauss 132:05cd37f7e007 65 fw_ip[ i ] = '\0';
klauss 132:05cd37f7e007 66 break;
klauss 132:05cd37f7e007 67 }
klauss 132:05cd37f7e007 68 }else{
klauss 132:05cd37f7e007 69 if ( ffw_ip ) fclose ( ffw_ip );
klauss 132:05cd37f7e007 70 return ( -3 );
klauss 132:05cd37f7e007 71 }
klauss 132:05cd37f7e007 72
klauss 132:05cd37f7e007 73 if ( ffw_ip ) fclose ( ffw_ip );
klauss 132:05cd37f7e007 74
klauss 132:05cd37f7e007 75 fw_ip [ length ] = 0;
klauss 132:05cd37f7e007 76
klauss 132:05cd37f7e007 77 return ( read );
klauss 132:05cd37f7e007 78 }
klauss 132:05cd37f7e007 79 }
klauss 132:05cd37f7e007 80
klauss 132:05cd37f7e007 81
klauss 132:05cd37f7e007 82 int fget_clock_server_ip ( char * clock_server_ip, const size_t length )
klauss 132:05cd37f7e007 83 {
klauss 132:05cd37f7e007 84 return ( fget_server_ip ( clock_server_ip, length ) );
klauss 122:480c44b0e205 85 }
klauss 122:480c44b0e205 86
klauss 132:05cd37f7e007 87 int fget_server_ip ( char * server_ip, const size_t length )
klauss 122:480c44b0e205 88 {
klauss 122:480c44b0e205 89 FILE * fsip = fopen ("/qspi/serverip.txt", "r" );
klauss 122:480c44b0e205 90 if ( fsip != NULL )
klauss 122:480c44b0e205 91 {
klauss 122:480c44b0e205 92 int read = fread ( server_ip, 1, length, fsip );
klauss 122:480c44b0e205 93 if( read > 0 )
klauss 122:480c44b0e205 94 {
klauss 122:480c44b0e205 95 for ( register int i = 0; i < read; i++ )
klauss 122:480c44b0e205 96 {
klauss 122:480c44b0e205 97 if( server_ip [ i ] == '\n' || server_ip [ i ] == '\r' )
klauss 122:480c44b0e205 98 {
klauss 122:480c44b0e205 99 server_ip [ i ] = '\0';
klauss 122:480c44b0e205 100 break;
klauss 122:480c44b0e205 101 }
klauss 122:480c44b0e205 102 }
klauss 122:480c44b0e205 103 } else {
klauss 122:480c44b0e205 104 if ( fsip ) fclose ( fsip );
klauss 122:480c44b0e205 105 return ( -3 );
klauss 122:480c44b0e205 106 }
klauss 122:480c44b0e205 107
klauss 122:480c44b0e205 108 server_ip [ length ] = 0;
klauss 122:480c44b0e205 109
klauss 122:480c44b0e205 110 fclose ( fsip );
klauss 122:480c44b0e205 111
klauss 122:480c44b0e205 112 return ( read );
klauss 122:480c44b0e205 113 }
klauss 122:480c44b0e205 114
klauss 122:480c44b0e205 115 return ( -1 );
klauss 122:480c44b0e205 116 }
klauss 122:480c44b0e205 117
klauss 132:05cd37f7e007 118 int fget_mask ( char * eth_mask, const size_t length )
klauss 122:480c44b0e205 119 {
klauss 122:480c44b0e205 120 FILE * fmsk = fopen("/qspi/mymask.txt", "r");
klauss 122:480c44b0e205 121 if ( fmsk != NULL )
klauss 122:480c44b0e205 122 {
klauss 122:480c44b0e205 123 int read = fread ( eth_mask, 1, length, fmsk );
klauss 122:480c44b0e205 124 if( read > 0 )
klauss 122:480c44b0e205 125 {
klauss 122:480c44b0e205 126 for ( register int i = 0; i < read; i++ )
klauss 122:480c44b0e205 127 {
klauss 122:480c44b0e205 128 if( eth_mask [ i ] == '\n' || eth_mask [ i ] == '\r' )
klauss 122:480c44b0e205 129 {
klauss 122:480c44b0e205 130 eth_mask [ i ] = '\0';
klauss 122:480c44b0e205 131 break;
klauss 122:480c44b0e205 132 }
klauss 122:480c44b0e205 133 }
klauss 122:480c44b0e205 134 } else {
klauss 122:480c44b0e205 135 if ( fmsk ) fclose ( fmsk );
klauss 122:480c44b0e205 136 return ( -3 );
klauss 122:480c44b0e205 137 }
klauss 122:480c44b0e205 138
klauss 122:480c44b0e205 139 eth_mask [ length ] = 0;
klauss 122:480c44b0e205 140
klauss 122:480c44b0e205 141 if ( fmsk ) fclose ( fmsk );
klauss 122:480c44b0e205 142
klauss 122:480c44b0e205 143 return ( read );
klauss 122:480c44b0e205 144 }
klauss 122:480c44b0e205 145
klauss 121:ee02790d00b7 146 return ( -1 );
klauss 121:ee02790d00b7 147 }
klauss 132:05cd37f7e007 148
klauss 132:05cd37f7e007 149 int fget_gateway ( char * eth_gw, const size_t length )
klauss 122:480c44b0e205 150 {
klauss 122:480c44b0e205 151 FILE * fgw = fopen("/qspi/mygateway.txt", "r");
klauss 122:480c44b0e205 152 if ( fgw != NULL )
klauss 122:480c44b0e205 153 {
klauss 122:480c44b0e205 154 int read = fread ( eth_gw, 1, length, fgw );
klauss 122:480c44b0e205 155 if( read > 0 )
klauss 122:480c44b0e205 156 {
klauss 122:480c44b0e205 157 for ( register int i = 0; i < read; i++ )
klauss 122:480c44b0e205 158 {
klauss 122:480c44b0e205 159 if( eth_gw [ i ] == '\n' || eth_gw [ i ] == '\r' )
klauss 122:480c44b0e205 160 {
klauss 122:480c44b0e205 161 eth_gw [ i ] = '\0';
klauss 122:480c44b0e205 162 break;
klauss 122:480c44b0e205 163 }
klauss 122:480c44b0e205 164 }
klauss 122:480c44b0e205 165 } else {
klauss 122:480c44b0e205 166 if ( fgw ) fclose ( fgw );
klauss 122:480c44b0e205 167 return ( -3 );
klauss 122:480c44b0e205 168 }
klauss 122:480c44b0e205 169
klauss 122:480c44b0e205 170 eth_gw [ length ] = 0;
klauss 122:480c44b0e205 171
klauss 122:480c44b0e205 172 if ( fgw ) fclose ( fgw );
klauss 122:480c44b0e205 173
klauss 122:480c44b0e205 174 return ( read );
klauss 122:480c44b0e205 175 }
klauss 122:480c44b0e205 176
klauss 122:480c44b0e205 177 return ( -1 );
klauss 122:480c44b0e205 178 }
klauss 122:480c44b0e205 179
klauss 132:05cd37f7e007 180 int fset_clock_server_ip ( const char * new_server_ip ) { return ( 0 ); }
klauss 121:ee02790d00b7 181
klauss 132:05cd37f7e007 182 int fset_header_ext ( const int new_header_ext )
klauss 121:ee02790d00b7 183 {
klauss 81:3656f00ab3db 184 FILE * fext = fopen( "/qspi/myext.txt", "w" );
klauss 119:ee6a53069455 185 if ( fext )
klauss 119:ee6a53069455 186 {
klauss 119:ee6a53069455 187 fprintf( fext, "%i\n\r", new_header_ext );
klauss 119:ee6a53069455 188 fclose( fext );
klauss 132:05cd37f7e007 189 return ( 0 );
klauss 132:05cd37f7e007 190 }
klauss 132:05cd37f7e007 191 else
klauss 132:05cd37f7e007 192 {
klauss 132:05cd37f7e007 193 return ( -1 );
klauss 119:ee6a53069455 194 }
klauss 81:3656f00ab3db 195 }
klauss 81:3656f00ab3db 196
klauss 133:3d136f5ffd66 197 int fset_acceptable_delay ( const int new_acceptable_delay )
klauss 133:3d136f5ffd66 198 {
klauss 133:3d136f5ffd66 199 FILE * fad = fopen( "/qspi/acceptable_delay.txt", "w" );
klauss 133:3d136f5ffd66 200 if ( fad )
klauss 133:3d136f5ffd66 201 {
klauss 133:3d136f5ffd66 202 fprintf ( fad, "%i\n\r", new_acceptable_delay );
klauss 133:3d136f5ffd66 203 fclose ( fad );
klauss 133:3d136f5ffd66 204 return ( 0 );
klauss 133:3d136f5ffd66 205 }
klauss 133:3d136f5ffd66 206 else
klauss 133:3d136f5ffd66 207 {
klauss 133:3d136f5ffd66 208 return ( -1 );
klauss 133:3d136f5ffd66 209 }
klauss 133:3d136f5ffd66 210 }
klauss 133:3d136f5ffd66 211
klauss 133:3d136f5ffd66 212 int fget_acceptable_delay ( void )
klauss 133:3d136f5ffd66 213 {
klauss 133:3d136f5ffd66 214 char get_acceptable_delay_buffer [ 32 ] = "";
klauss 133:3d136f5ffd66 215
klauss 133:3d136f5ffd66 216 FILE * fad = fopen ( "/qspi/acceptable_delay.txt", "r" );
klauss 133:3d136f5ffd66 217 if ( fad == NULL )
klauss 133:3d136f5ffd66 218 {
klauss 133:3d136f5ffd66 219 return ( -3 );
klauss 133:3d136f5ffd66 220 } else {
klauss 133:3d136f5ffd66 221 if( fread ( ( void * ) get_acceptable_delay_buffer, 1, sizeof ( get_acceptable_delay_buffer ) - 1, fad ) > 0 )
klauss 133:3d136f5ffd66 222 {
klauss 133:3d136f5ffd66 223 if ( fad ) fclose ( fad );
klauss 133:3d136f5ffd66 224 return ( atoi ( get_acceptable_delay_buffer ) );
klauss 133:3d136f5ffd66 225 } else {
klauss 133:3d136f5ffd66 226 if ( fad ) fclose ( fad );
klauss 133:3d136f5ffd66 227 return ( -5 );
klauss 133:3d136f5ffd66 228 }
klauss 133:3d136f5ffd66 229 }
klauss 133:3d136f5ffd66 230 }
klauss 122:480c44b0e205 231
klauss 132:05cd37f7e007 232 int fget_header_ext ( void )
klauss 122:480c44b0e205 233 {
klauss 122:480c44b0e205 234 char get_header_ext_buffer [ 32 ] = "";
klauss 122:480c44b0e205 235
klauss 122:480c44b0e205 236 FILE * fext = fopen ( "/qspi/myext.txt", "r" );
klauss 122:480c44b0e205 237 if ( fext == NULL )
klauss 132:05cd37f7e007 238 {
klauss 132:05cd37f7e007 239 return ( -3 );
klauss 122:480c44b0e205 240 } else {
klauss 122:480c44b0e205 241 if( fread ( ( void * ) get_header_ext_buffer, 1, sizeof ( get_header_ext_buffer ) - 1, fext ) > 0 )
klauss 122:480c44b0e205 242 {
klauss 122:480c44b0e205 243 if ( fext ) fclose ( fext );
klauss 122:480c44b0e205 244 return ( atoi ( get_header_ext_buffer ) );
klauss 122:480c44b0e205 245 } else {
klauss 122:480c44b0e205 246 if ( fext ) fclose ( fext );
klauss 132:05cd37f7e007 247 return ( -5 );
klauss 122:480c44b0e205 248 }
klauss 122:480c44b0e205 249 }
klauss 122:480c44b0e205 250 }
klauss 122:480c44b0e205 251
klauss 132:05cd37f7e007 252 int fset_header_sip_port ( const int new_header_sip_port )
klauss 121:ee02790d00b7 253 {
klauss 119:ee6a53069455 254 FILE * fport = fopen("/qspi/mysipport.txt", "w");
klauss 119:ee6a53069455 255 if ( fport )
klauss 119:ee6a53069455 256 {
klauss 119:ee6a53069455 257 fprintf( fport,"%i\n\r", new_header_sip_port );
klauss 119:ee6a53069455 258 fclose( fport );
klauss 132:05cd37f7e007 259 return ( 0 );
klauss 132:05cd37f7e007 260 }
klauss 132:05cd37f7e007 261 else
klauss 132:05cd37f7e007 262 {
klauss 132:05cd37f7e007 263 return ( -1 );
klauss 119:ee6a53069455 264 }
klauss 117:e9facba9db27 265 }
klauss 117:e9facba9db27 266
klauss 132:05cd37f7e007 267 int fget_header_sip_port ( void )
klauss 122:480c44b0e205 268 {
klauss 122:480c44b0e205 269 char get_header_sip_port_buffer [ 32 ] = "";
klauss 122:480c44b0e205 270
klauss 122:480c44b0e205 271 FILE * fport = fopen ( "/qspi/mysipport.txt", "r" );
klauss 122:480c44b0e205 272 if ( fport == NULL )
klauss 122:480c44b0e205 273 {
klauss 132:05cd37f7e007 274 return ( -1 );
klauss 122:480c44b0e205 275 } else {
klauss 122:480c44b0e205 276 if( fread ( ( void * ) get_header_sip_port_buffer, 1, sizeof ( get_header_sip_port_buffer ) - 1, fport ) > 0 )
klauss 122:480c44b0e205 277 {
klauss 122:480c44b0e205 278 if ( fport ) fclose ( fport );
klauss 122:480c44b0e205 279 return ( atoi ( get_header_sip_port_buffer ) );
klauss 122:480c44b0e205 280 } else {
klauss 122:480c44b0e205 281 if ( fport ) fclose ( fport );
klauss 132:05cd37f7e007 282 return ( -3 );
klauss 122:480c44b0e205 283 }
klauss 122:480c44b0e205 284 }
klauss 122:480c44b0e205 285 }
klauss 122:480c44b0e205 286
klauss 132:05cd37f7e007 287 int fset_server_ip ( const char * new_server_ip )
klauss 121:ee02790d00b7 288 {
klauss 119:ee6a53069455 289 FILE * fsip = fopen("/qspi/serverip.txt", "w");
klauss 119:ee6a53069455 290 if ( fsip )
klauss 119:ee6a53069455 291 {
klauss 119:ee6a53069455 292 fprintf( fsip,"%s\n\r", new_server_ip );
klauss 119:ee6a53069455 293 fclose( fsip );
klauss 132:05cd37f7e007 294 return ( 0 );
klauss 132:05cd37f7e007 295 }
klauss 132:05cd37f7e007 296 else
klauss 132:05cd37f7e007 297 {
klauss 132:05cd37f7e007 298 return ( -1 );
klauss 119:ee6a53069455 299 }
klauss 81:3656f00ab3db 300 }
klauss 81:3656f00ab3db 301
klauss 132:05cd37f7e007 302 int fset_server_ext ( const int new_server_ext )
klauss 121:ee02790d00b7 303 {
klauss 119:ee6a53069455 304 FILE * fserext = fopen("/qspi/peerext.txt", "w");
klauss 119:ee6a53069455 305 if ( fserext )
klauss 119:ee6a53069455 306 {
klauss 119:ee6a53069455 307 fprintf( fserext , "%i\n\r", new_server_ext );
klauss 119:ee6a53069455 308 fclose( fserext );
klauss 132:05cd37f7e007 309 return ( 0 );
klauss 132:05cd37f7e007 310 }
klauss 132:05cd37f7e007 311 else
klauss 132:05cd37f7e007 312 {
klauss 132:05cd37f7e007 313 return ( -1 );
klauss 119:ee6a53069455 314 }
klauss 117:e9facba9db27 315 }
klauss 117:e9facba9db27 316
klauss 132:05cd37f7e007 317 int fget_server_ext ( void )
klauss 132:05cd37f7e007 318 {
klauss 132:05cd37f7e007 319 char get_server_ext_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 320
klauss 132:05cd37f7e007 321 FILE * fserver_ext = fopen ( "/qspi/peerext.txt", "r" );
klauss 132:05cd37f7e007 322 if ( fserver_ext == NULL )
klauss 132:05cd37f7e007 323 {
klauss 132:05cd37f7e007 324 return ( -3 );
klauss 132:05cd37f7e007 325 } else {
klauss 132:05cd37f7e007 326 if( fread ( ( void * ) get_server_ext_buffer, 1, sizeof ( get_server_ext_buffer ) - 1, fserver_ext ) > 0 )
klauss 132:05cd37f7e007 327 {
klauss 132:05cd37f7e007 328 if ( fserver_ext ) fclose ( fserver_ext );
klauss 132:05cd37f7e007 329 return ( atoi ( get_server_ext_buffer ) );
klauss 132:05cd37f7e007 330 } else {
klauss 132:05cd37f7e007 331 if ( fserver_ext ) fclose ( fserver_ext );
klauss 132:05cd37f7e007 332 return ( -5 );
klauss 132:05cd37f7e007 333 }
klauss 132:05cd37f7e007 334 }
klauss 132:05cd37f7e007 335 }
klauss 132:05cd37f7e007 336
klauss 132:05cd37f7e007 337 int fset_server_port ( const int new_server_port )
klauss 121:ee02790d00b7 338 {
klauss 119:ee6a53069455 339 FILE * fsport = fopen("/qspi/serverport.txt", "w");
klauss 119:ee6a53069455 340 if ( fsport )
klauss 119:ee6a53069455 341 {
klauss 119:ee6a53069455 342 fprintf(fsport,"%i\n\r", new_server_port );
klauss 119:ee6a53069455 343 fclose( fsport );
klauss 132:05cd37f7e007 344 return ( 0 );
klauss 132:05cd37f7e007 345 }
klauss 132:05cd37f7e007 346 else
klauss 132:05cd37f7e007 347 {
klauss 132:05cd37f7e007 348 return ( -1 );
klauss 99:e80850c51106 349 }
klauss 81:3656f00ab3db 350 }
klauss 81:3656f00ab3db 351
klauss 132:05cd37f7e007 352 int fget_server_port ( void )
klauss 132:05cd37f7e007 353 {
klauss 132:05cd37f7e007 354 char get_server_sip_port_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 355
klauss 132:05cd37f7e007 356 FILE * fserver_port = fopen ( "/qspi/serverport.txt", "r" );
klauss 132:05cd37f7e007 357 if ( fserver_port == NULL )
klauss 132:05cd37f7e007 358 {
klauss 132:05cd37f7e007 359 return ( -1 );
klauss 132:05cd37f7e007 360 } else {
klauss 132:05cd37f7e007 361 if( fread ( ( void * ) get_server_sip_port_buffer, 1, sizeof ( get_server_sip_port_buffer ) - 1, fserver_port ) > 0 )
klauss 132:05cd37f7e007 362 {
klauss 132:05cd37f7e007 363 if ( fserver_port ) fclose ( fserver_port );
klauss 132:05cd37f7e007 364 return ( atoi ( get_server_sip_port_buffer ) );
klauss 132:05cd37f7e007 365 } else {
klauss 132:05cd37f7e007 366 if ( fserver_port ) fclose ( fserver_port );
klauss 132:05cd37f7e007 367 return ( -3 );
klauss 132:05cd37f7e007 368 }
klauss 132:05cd37f7e007 369 }
klauss 132:05cd37f7e007 370 }
klauss 132:05cd37f7e007 371
klauss 132:05cd37f7e007 372 int fset_mask ( const char * new_mask )
klauss 121:ee02790d00b7 373 {
klauss 119:ee6a53069455 374 FILE * fmask = fopen("/qspi/mymask.txt", "w");
klauss 119:ee6a53069455 375 if ( fmask )
klauss 119:ee6a53069455 376 {
klauss 119:ee6a53069455 377 fprintf(fmask,"%s\n\r",new_mask );
klauss 119:ee6a53069455 378 fclose( fmask );
klauss 132:05cd37f7e007 379 return ( 0 );
klauss 132:05cd37f7e007 380 }
klauss 132:05cd37f7e007 381 else
klauss 132:05cd37f7e007 382 {
klauss 132:05cd37f7e007 383 return ( -1 );
klauss 119:ee6a53069455 384 }
klauss 119:ee6a53069455 385 }
klauss 119:ee6a53069455 386
klauss 132:05cd37f7e007 387 int fset_gateway ( const char * new_gateway )
klauss 121:ee02790d00b7 388 {
klauss 119:ee6a53069455 389 FILE * fgate = fopen("/qspi/mygateway.txt", "w");
klauss 119:ee6a53069455 390 if ( fgate )
klauss 119:ee6a53069455 391 {
klauss 119:ee6a53069455 392 fprintf(fgate,"%s\n\r", new_gateway );
klauss 119:ee6a53069455 393 fclose( fgate );
klauss 132:05cd37f7e007 394 return ( 0 );
klauss 132:05cd37f7e007 395 }
klauss 132:05cd37f7e007 396 else
klauss 132:05cd37f7e007 397 {
klauss 132:05cd37f7e007 398 return ( -1 );
klauss 119:ee6a53069455 399 }
klauss 119:ee6a53069455 400 }
klauss 119:ee6a53069455 401
klauss 132:05cd37f7e007 402 int set_udp_port_listener ( const int new_udp_port_listener )
klauss 121:ee02790d00b7 403 {
klauss 119:ee6a53069455 404 FILE * fudpport = fopen( "/qspi/udpport.txt", "w" );
klauss 119:ee6a53069455 405 if ( fudpport )
klauss 119:ee6a53069455 406 {
klauss 119:ee6a53069455 407 fprintf( fudpport, "%i\n\r",new_udp_port_listener );
klauss 119:ee6a53069455 408 fclose( fudpport );
klauss 132:05cd37f7e007 409 return ( 0 );
klauss 132:05cd37f7e007 410 }
klauss 132:05cd37f7e007 411 else
klauss 132:05cd37f7e007 412 {
klauss 132:05cd37f7e007 413 return ( -1 );
klauss 119:ee6a53069455 414 }
klauss 119:ee6a53069455 415 }
klauss 119:ee6a53069455 416
klauss 132:05cd37f7e007 417 int fget_udp_port_listener ( void )
klauss 132:05cd37f7e007 418 {
klauss 132:05cd37f7e007 419 char get_udp_port_listener_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 420
klauss 132:05cd37f7e007 421 FILE * fudp_port_listener = fopen ( "/qspi/udpport.txt", "r" );
klauss 132:05cd37f7e007 422 if ( fudp_port_listener == NULL )
klauss 132:05cd37f7e007 423 {
klauss 132:05cd37f7e007 424 return ( -1 );
klauss 132:05cd37f7e007 425 } else {
klauss 132:05cd37f7e007 426 if( fread ( ( void * ) get_udp_port_listener_buffer, 1, sizeof ( get_udp_port_listener_buffer ) - 1, fudp_port_listener ) > 0 )
klauss 132:05cd37f7e007 427 {
klauss 132:05cd37f7e007 428 if ( fudp_port_listener ) fclose ( fudp_port_listener );
klauss 132:05cd37f7e007 429 return ( atoi ( get_udp_port_listener_buffer ) );
klauss 132:05cd37f7e007 430 } else {
klauss 132:05cd37f7e007 431 if ( fudp_port_listener ) fclose ( fudp_port_listener );
klauss 132:05cd37f7e007 432 return ( -3 );
klauss 132:05cd37f7e007 433 }
klauss 132:05cd37f7e007 434 }
klauss 132:05cd37f7e007 435 }
klauss 132:05cd37f7e007 436
klauss 132:05cd37f7e007 437 int set_tcp_port_listener ( const int new_tcp_port_listener )
klauss 121:ee02790d00b7 438 {
klauss 119:ee6a53069455 439 FILE * ftcpport = fopen( "/qspi/tcpport.txt", "w" );
klauss 119:ee6a53069455 440 if ( ftcpport )
klauss 119:ee6a53069455 441 {
klauss 119:ee6a53069455 442 fprintf( ftcpport, "%i\n\r",new_tcp_port_listener );
klauss 119:ee6a53069455 443 fclose( ftcpport );
klauss 132:05cd37f7e007 444 return ( 0 );
klauss 132:05cd37f7e007 445 }
klauss 132:05cd37f7e007 446 else
klauss 132:05cd37f7e007 447 {
klauss 132:05cd37f7e007 448 return ( -1 );
klauss 119:ee6a53069455 449 }
klauss 119:ee6a53069455 450 }
klauss 119:ee6a53069455 451
klauss 132:05cd37f7e007 452 int fget_tcp_port_listener ( void )
klauss 132:05cd37f7e007 453 {
klauss 132:05cd37f7e007 454 char get_tcp_port_listener_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 455
klauss 132:05cd37f7e007 456 FILE * ftcp_port_listener = fopen ( "/qspi/tcpport.txt", "r" );
klauss 132:05cd37f7e007 457 if ( ftcp_port_listener == NULL )
klauss 132:05cd37f7e007 458 {
klauss 132:05cd37f7e007 459 return ( -1 );
klauss 132:05cd37f7e007 460 } else {
klauss 132:05cd37f7e007 461 if( fread ( ( void * ) get_tcp_port_listener_buffer, 1, sizeof ( get_tcp_port_listener_buffer ) - 1, ftcp_port_listener ) > 0 )
klauss 132:05cd37f7e007 462 {
klauss 132:05cd37f7e007 463 if ( ftcp_port_listener ) fclose ( ftcp_port_listener );
klauss 132:05cd37f7e007 464 return ( atoi ( get_tcp_port_listener_buffer ) );
klauss 132:05cd37f7e007 465 } else {
klauss 132:05cd37f7e007 466 if ( ftcp_port_listener ) fclose ( ftcp_port_listener );
klauss 132:05cd37f7e007 467 return ( -3 );
klauss 132:05cd37f7e007 468 }
klauss 132:05cd37f7e007 469 }
klauss 132:05cd37f7e007 470 }
klauss 132:05cd37f7e007 471
klauss 132:05cd37f7e007 472 int fset_fw_ip ( const char * new_fw_ip )
klauss 121:ee02790d00b7 473 {
klauss 119:ee6a53069455 474 FILE * ffwip = fopen("/qspi/fw_ip.txt", "w" );
klauss 119:ee6a53069455 475 if ( ffwip )
klauss 119:ee6a53069455 476 {
klauss 119:ee6a53069455 477 fprintf(ffwip,"%s\n\r", new_fw_ip );
klauss 119:ee6a53069455 478 fclose( ffwip );
klauss 132:05cd37f7e007 479 return ( 0 );
klauss 132:05cd37f7e007 480 }
klauss 132:05cd37f7e007 481 else
klauss 132:05cd37f7e007 482 {
klauss 132:05cd37f7e007 483 return ( -1 );
klauss 119:ee6a53069455 484 }
klauss 119:ee6a53069455 485 }
klauss 119:ee6a53069455 486
klauss 132:05cd37f7e007 487 int fset_fw_port ( const int new_fw_port )
klauss 121:ee02790d00b7 488 {
klauss 119:ee6a53069455 489 FILE * ffwport = fopen("/qspi/fw_port.txt", "w" );
klauss 119:ee6a53069455 490 if ( ffwport )
klauss 119:ee6a53069455 491 {
klauss 119:ee6a53069455 492 fprintf(ffwport,"%i\n\r", new_fw_port );
klauss 119:ee6a53069455 493 fclose( ffwport );
klauss 132:05cd37f7e007 494 return ( 0 );
klauss 132:05cd37f7e007 495 }
klauss 132:05cd37f7e007 496 else
klauss 132:05cd37f7e007 497 {
klauss 132:05cd37f7e007 498 return ( -1 );
klauss 119:ee6a53069455 499 }
klauss 119:ee6a53069455 500 }
klauss 119:ee6a53069455 501
klauss 132:05cd37f7e007 502 int fget_fw_port ( void )
klauss 132:05cd37f7e007 503 {
klauss 132:05cd37f7e007 504 char get_fw_server_port_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 505
klauss 132:05cd37f7e007 506 FILE * ffw_server_port = fopen ( "/qspi/fw_port.txt", "r" );
klauss 132:05cd37f7e007 507 if ( ffw_server_port == NULL )
klauss 132:05cd37f7e007 508 {
klauss 132:05cd37f7e007 509 return ( -1 );
klauss 132:05cd37f7e007 510 } else {
klauss 132:05cd37f7e007 511 if( fread ( ( void * ) get_fw_server_port_buffer, 1, sizeof ( get_fw_server_port_buffer ) - 1, ffw_server_port ) > 0 )
klauss 132:05cd37f7e007 512 {
klauss 132:05cd37f7e007 513 if ( ffw_server_port ) fclose ( ffw_server_port );
klauss 132:05cd37f7e007 514 return ( atoi ( get_fw_server_port_buffer ) );
klauss 132:05cd37f7e007 515 } else {
klauss 132:05cd37f7e007 516 if ( ffw_server_port ) fclose ( ffw_server_port );
klauss 132:05cd37f7e007 517 return ( -3 );
klauss 132:05cd37f7e007 518 }
klauss 132:05cd37f7e007 519 }
klauss 132:05cd37f7e007 520 }
klauss 132:05cd37f7e007 521
klauss 132:05cd37f7e007 522 int fset_max_ext ( const int new_max_ext )
klauss 121:ee02790d00b7 523 {
klauss 119:ee6a53069455 524 FILE * fmex = fopen( "/qspi/maxext.txt", "w" );
klauss 119:ee6a53069455 525 if ( fmex ){
klauss 119:ee6a53069455 526 fprintf( fmex, "%i\n\r", new_max_ext );
klauss 119:ee6a53069455 527 fclose( fmex );
klauss 132:05cd37f7e007 528 return ( 0 );
klauss 132:05cd37f7e007 529 }
klauss 132:05cd37f7e007 530 else
klauss 132:05cd37f7e007 531 {
klauss 132:05cd37f7e007 532 return ( -1 );
klauss 119:ee6a53069455 533 }
klauss 119:ee6a53069455 534 }
klauss 119:ee6a53069455 535
klauss 132:05cd37f7e007 536 int fget_max_ext ( void )
klauss 132:05cd37f7e007 537 {
klauss 132:05cd37f7e007 538 char get_max_ext_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 539
klauss 132:05cd37f7e007 540 FILE * fmax_ext = fopen ( "/qspi/maxext.txt", "r" );
klauss 132:05cd37f7e007 541 if ( fmax_ext == NULL )
klauss 132:05cd37f7e007 542 {
klauss 132:05cd37f7e007 543 return ( -1 );
klauss 132:05cd37f7e007 544 } else {
klauss 132:05cd37f7e007 545 if( fread ( ( void * ) get_max_ext_buffer, 1, sizeof ( get_max_ext_buffer ) - 1, fmax_ext ) > 0 )
klauss 132:05cd37f7e007 546 {
klauss 132:05cd37f7e007 547 if ( fmax_ext ) fclose ( fmax_ext );
klauss 132:05cd37f7e007 548 return ( atoi ( get_max_ext_buffer ) );
klauss 132:05cd37f7e007 549 } else {
klauss 132:05cd37f7e007 550 if ( fmax_ext ) fclose ( fmax_ext );
klauss 132:05cd37f7e007 551 return ( -3 );
klauss 132:05cd37f7e007 552 }
klauss 132:05cd37f7e007 553 }
klauss 132:05cd37f7e007 554 }
klauss 132:05cd37f7e007 555
klauss 132:05cd37f7e007 556 int fset_min_ext ( const int new_min_ext )
klauss 121:ee02790d00b7 557 {
klauss 81:3656f00ab3db 558 FILE * fmin = fopen( "/qspi/minext.txt", "w" );
klauss 119:ee6a53069455 559 if ( fmin ){
klauss 99:e80850c51106 560 fprintf( fmin, "%i\n\r", new_min_ext );
klauss 99:e80850c51106 561 fclose( fmin );
klauss 132:05cd37f7e007 562 return ( 0 );
klauss 132:05cd37f7e007 563 }
klauss 132:05cd37f7e007 564 else
klauss 132:05cd37f7e007 565 {
klauss 132:05cd37f7e007 566 return ( -1 );
klauss 132:05cd37f7e007 567 }
klauss 132:05cd37f7e007 568 }
klauss 132:05cd37f7e007 569
klauss 132:05cd37f7e007 570 int fget_min_ext ( void )
klauss 132:05cd37f7e007 571 {
klauss 132:05cd37f7e007 572 char get_min_ext_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 573
klauss 132:05cd37f7e007 574 FILE * fmin_ext = fopen ( "/qspi/minext.txt", "r" );
klauss 132:05cd37f7e007 575 if ( fmin_ext == NULL )
klauss 132:05cd37f7e007 576 {
klauss 132:05cd37f7e007 577 return ( -1 );
klauss 132:05cd37f7e007 578 } else {
klauss 132:05cd37f7e007 579 if( fread ( ( void * ) get_min_ext_buffer, 1, sizeof ( get_min_ext_buffer ) - 1, fmin_ext ) > 0 )
klauss 132:05cd37f7e007 580 {
klauss 132:05cd37f7e007 581 if ( fmin_ext ) fclose ( fmin_ext );
klauss 132:05cd37f7e007 582 return ( atoi ( get_min_ext_buffer ) );
klauss 132:05cd37f7e007 583 } else {
klauss 132:05cd37f7e007 584 if ( fmin_ext ) fclose ( fmin_ext );
klauss 132:05cd37f7e007 585 return ( -3 );
klauss 132:05cd37f7e007 586 }
klauss 99:e80850c51106 587 }
klauss 81:3656f00ab3db 588 }
klauss 81:3656f00ab3db 589
klauss 81:3656f00ab3db 590 // Print the content of a given file
klauss 132:05cd37f7e007 591 int cat ( const char * fname )
klauss 121:ee02790d00b7 592 {
klauss 81:3656f00ab3db 593 char buff[513];
klauss 81:3656f00ab3db 594 int num;
klauss 81:3656f00ab3db 595
klauss 124:c1b6c893e1c3 596 FILE * fp = fopen( fname, "r" );
klauss 132:05cd37f7e007 597 if ( fp == NULL )
klauss 132:05cd37f7e007 598 {
klauss 132:05cd37f7e007 599 pc.printf( "Failed to open %s", fname);
klauss 132:05cd37f7e007 600 return ( -3 );
klauss 81:3656f00ab3db 601 }
klauss 81:3656f00ab3db 602
klauss 132:05cd37f7e007 603 while( ( num = fread( buff, 1, 512, fp ) ) > 0 )
klauss 132:05cd37f7e007 604 {
klauss 81:3656f00ab3db 605 buff[ num ] = '\0';
klauss 132:05cd37f7e007 606 pc.printf( "%s", buff );
klauss 81:3656f00ab3db 607 }
klauss 124:c1b6c893e1c3 608
klauss 124:c1b6c893e1c3 609 if ( fp ) fclose ( fp );
klauss 132:05cd37f7e007 610
klauss 132:05cd37f7e007 611 return ( 0 );
klauss 114:472502b31a12 612 }
klauss 114:472502b31a12 613
klauss 132:05cd37f7e007 614 int fset_shift_port ( const int new_shift_port )
klauss 121:ee02790d00b7 615 {
klauss 119:ee6a53069455 616 FILE * shift_port = fopen("/qspi/shift_port.txt", "w" );
klauss 119:ee6a53069455 617 if( shift_port )
klauss 119:ee6a53069455 618 {
klauss 119:ee6a53069455 619 fprintf( shift_port,"%i\n\r", new_shift_port );
klauss 119:ee6a53069455 620 fclose( shift_port );
klauss 132:05cd37f7e007 621 return ( 0 );
klauss 114:472502b31a12 622 }
klauss 119:ee6a53069455 623 else
klauss 119:ee6a53069455 624 {
klauss 132:05cd37f7e007 625 return ( -1 );
klauss 132:05cd37f7e007 626 }
klauss 132:05cd37f7e007 627 }
klauss 132:05cd37f7e007 628
klauss 132:05cd37f7e007 629
klauss 132:05cd37f7e007 630 int fget_shift_port ( void )
klauss 132:05cd37f7e007 631 {
klauss 132:05cd37f7e007 632 char get_shift_port_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 633
klauss 132:05cd37f7e007 634 FILE * fshift_port = fopen ( "/qspi/shift_port.txt", "r" );
klauss 132:05cd37f7e007 635 if ( fshift_port == NULL )
klauss 132:05cd37f7e007 636 {
klauss 132:05cd37f7e007 637 return ( -1 );
klauss 132:05cd37f7e007 638 } else {
klauss 132:05cd37f7e007 639 if( fread ( ( void * ) get_shift_port_buffer, 1, sizeof ( get_shift_port_buffer ) - 1, fshift_port ) > 0 )
klauss 132:05cd37f7e007 640 {
klauss 132:05cd37f7e007 641 if ( fshift_port ) fclose ( fshift_port );
klauss 132:05cd37f7e007 642 return ( atoi ( get_shift_port_buffer ) );
klauss 132:05cd37f7e007 643 } else {
klauss 132:05cd37f7e007 644 if ( fshift_port ) fclose ( fshift_port );
klauss 132:05cd37f7e007 645 return ( -3 );
klauss 132:05cd37f7e007 646 }
klauss 119:ee6a53069455 647 }
klauss 121:ee02790d00b7 648 }
klauss 121:ee02790d00b7 649
klauss 132:05cd37f7e007 650 int files ( const char type )
klauss 132:05cd37f7e007 651 {
klauss 132:05cd37f7e007 652 if ( type == 's' ) {
klauss 132:05cd37f7e007 653 pc.printf("Header IP " );
klauss 121:ee02790d00b7 654 cat ("/qspi/myip.txt");
klauss 121:ee02790d00b7 655
klauss 132:05cd37f7e007 656 pc.printf("Header ext ");
klauss 121:ee02790d00b7 657 cat("/qspi/myext.txt");
klauss 121:ee02790d00b7 658
klauss 132:05cd37f7e007 659 pc.printf("Header port ");
klauss 121:ee02790d00b7 660 cat("/qspi/mysipport.txt");
klauss 121:ee02790d00b7 661
klauss 132:05cd37f7e007 662 pc.printf("Server IP ");
klauss 121:ee02790d00b7 663 cat("/qspi/serverip.txt");
klauss 121:ee02790d00b7 664
klauss 132:05cd37f7e007 665 pc.printf("Server ext ");
klauss 121:ee02790d00b7 666 cat("/qspi/peerext.txt");
klauss 121:ee02790d00b7 667
klauss 132:05cd37f7e007 668 pc.printf("Server port ");
klauss 121:ee02790d00b7 669 cat("/qspi/serverport.txt");
klauss 121:ee02790d00b7 670
klauss 132:05cd37f7e007 671 pc.printf("Mascara de rede ");
klauss 121:ee02790d00b7 672 cat("/qspi/mymask.txt");
klauss 121:ee02790d00b7 673
klauss 132:05cd37f7e007 674 pc.printf("Gateway IP ");
klauss 121:ee02790d00b7 675 cat("/qspi/mygateway.txt");
klauss 121:ee02790d00b7 676
klauss 132:05cd37f7e007 677 pc.printf("UDP Port ");
klauss 121:ee02790d00b7 678 cat("/qspi/udpport.txt");
klauss 121:ee02790d00b7 679
klauss 132:05cd37f7e007 680 pc.printf("TCP Port ");
klauss 121:ee02790d00b7 681 cat("/qspi/tcpport.txt");
klauss 121:ee02790d00b7 682
klauss 132:05cd37f7e007 683 pc.printf("FW Server IP ");
klauss 121:ee02790d00b7 684 cat("/qspi/fw_ip.txt");
klauss 121:ee02790d00b7 685
klauss 132:05cd37f7e007 686 pc.printf("FW Server Port ");
klauss 121:ee02790d00b7 687 cat("/qspi/fw_port.txt");
klauss 121:ee02790d00b7 688
klauss 132:05cd37f7e007 689 pc.printf("Max Ext ");
klauss 121:ee02790d00b7 690 cat("/qspi/maxext.txt");
klauss 121:ee02790d00b7 691
klauss 132:05cd37f7e007 692 pc.printf("Min Ext ");
klauss 121:ee02790d00b7 693 cat("/qspi/minext.txt");
klauss 121:ee02790d00b7 694
klauss 132:05cd37f7e007 695 pc.printf("Shift Port ");
klauss 121:ee02790d00b7 696 cat("/qspi/shift_port.txt");
klauss 121:ee02790d00b7 697
klauss 132:05cd37f7e007 698 pc.printf("Clock Server IP ");
klauss 121:ee02790d00b7 699 cat("/qspi/serverip.txt");
klauss 132:05cd37f7e007 700
klauss 132:05cd37f7e007 701 return ( 0 );
klauss 121:ee02790d00b7 702 }
klauss 121:ee02790d00b7 703
klauss 132:05cd37f7e007 704 return ( -1 );
klauss 121:ee02790d00b7 705 }
klauss 121:ee02790d00b7 706
klauss 121:ee02790d00b7 707 int init_fsystem ( void )
klauss 121:ee02790d00b7 708 {
klauss 121:ee02790d00b7 709 // init file system and check if files exist
klauss 121:ee02790d00b7 710 int return_value = 0;
klauss 121:ee02790d00b7 711
klauss 121:ee02790d00b7 712 if (!qspifs.isformatted()) {
klauss 121:ee02790d00b7 713 qspifs.format();
klauss 121:ee02790d00b7 714 return_value |= BIT0;
klauss 121:ee02790d00b7 715 }
klauss 121:ee02790d00b7 716
klauss 121:ee02790d00b7 717 return ( return_value |= BIT1 );
klauss 119:ee6a53069455 718 }