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@132:05cd37f7e007, 2015-09-01 (annotated)

Committer:
klauss
Date:
Tue Sep 01 17:21:11 2015 +0000
Revision:
132:05cd37f7e007
Parent:
125:8ff4dc96ad58
Child:
133:3d136f5ffd66
Substitui??o de; send_msg -> vz_printf; debug_msg -> vz_debug

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 122:480c44b0e205 197
klauss 132:05cd37f7e007 198 int fget_header_ext ( void )
klauss 122:480c44b0e205 199 {
klauss 122:480c44b0e205 200 char get_header_ext_buffer [ 32 ] = "";
klauss 122:480c44b0e205 201
klauss 122:480c44b0e205 202 FILE * fext = fopen ( "/qspi/myext.txt", "r" );
klauss 122:480c44b0e205 203 if ( fext == NULL )
klauss 132:05cd37f7e007 204 {
klauss 132:05cd37f7e007 205 return ( -3 );
klauss 122:480c44b0e205 206 } else {
klauss 122:480c44b0e205 207 if( fread ( ( void * ) get_header_ext_buffer, 1, sizeof ( get_header_ext_buffer ) - 1, fext ) > 0 )
klauss 122:480c44b0e205 208 {
klauss 122:480c44b0e205 209 if ( fext ) fclose ( fext );
klauss 122:480c44b0e205 210 return ( atoi ( get_header_ext_buffer ) );
klauss 122:480c44b0e205 211 } else {
klauss 122:480c44b0e205 212 if ( fext ) fclose ( fext );
klauss 132:05cd37f7e007 213 return ( -5 );
klauss 122:480c44b0e205 214 }
klauss 122:480c44b0e205 215 }
klauss 122:480c44b0e205 216 }
klauss 122:480c44b0e205 217
klauss 132:05cd37f7e007 218 int fset_header_sip_port ( const int new_header_sip_port )
klauss 121:ee02790d00b7 219 {
klauss 119:ee6a53069455 220 FILE * fport = fopen("/qspi/mysipport.txt", "w");
klauss 119:ee6a53069455 221 if ( fport )
klauss 119:ee6a53069455 222 {
klauss 119:ee6a53069455 223 fprintf( fport,"%i\n\r", new_header_sip_port );
klauss 119:ee6a53069455 224 fclose( fport );
klauss 132:05cd37f7e007 225 return ( 0 );
klauss 132:05cd37f7e007 226 }
klauss 132:05cd37f7e007 227 else
klauss 132:05cd37f7e007 228 {
klauss 132:05cd37f7e007 229 return ( -1 );
klauss 119:ee6a53069455 230 }
klauss 117:e9facba9db27 231 }
klauss 117:e9facba9db27 232
klauss 132:05cd37f7e007 233 int fget_header_sip_port ( void )
klauss 122:480c44b0e205 234 {
klauss 122:480c44b0e205 235 char get_header_sip_port_buffer [ 32 ] = "";
klauss 122:480c44b0e205 236
klauss 122:480c44b0e205 237 FILE * fport = fopen ( "/qspi/mysipport.txt", "r" );
klauss 122:480c44b0e205 238 if ( fport == NULL )
klauss 122:480c44b0e205 239 {
klauss 132:05cd37f7e007 240 return ( -1 );
klauss 122:480c44b0e205 241 } else {
klauss 122:480c44b0e205 242 if( fread ( ( void * ) get_header_sip_port_buffer, 1, sizeof ( get_header_sip_port_buffer ) - 1, fport ) > 0 )
klauss 122:480c44b0e205 243 {
klauss 122:480c44b0e205 244 if ( fport ) fclose ( fport );
klauss 122:480c44b0e205 245 return ( atoi ( get_header_sip_port_buffer ) );
klauss 122:480c44b0e205 246 } else {
klauss 122:480c44b0e205 247 if ( fport ) fclose ( fport );
klauss 132:05cd37f7e007 248 return ( -3 );
klauss 122:480c44b0e205 249 }
klauss 122:480c44b0e205 250 }
klauss 122:480c44b0e205 251 }
klauss 122:480c44b0e205 252
klauss 132:05cd37f7e007 253 int fset_server_ip ( const char * new_server_ip )
klauss 121:ee02790d00b7 254 {
klauss 119:ee6a53069455 255 FILE * fsip = fopen("/qspi/serverip.txt", "w");
klauss 119:ee6a53069455 256 if ( fsip )
klauss 119:ee6a53069455 257 {
klauss 119:ee6a53069455 258 fprintf( fsip,"%s\n\r", new_server_ip );
klauss 119:ee6a53069455 259 fclose( fsip );
klauss 132:05cd37f7e007 260 return ( 0 );
klauss 132:05cd37f7e007 261 }
klauss 132:05cd37f7e007 262 else
klauss 132:05cd37f7e007 263 {
klauss 132:05cd37f7e007 264 return ( -1 );
klauss 119:ee6a53069455 265 }
klauss 81:3656f00ab3db 266 }
klauss 81:3656f00ab3db 267
klauss 132:05cd37f7e007 268 int fset_server_ext ( const int new_server_ext )
klauss 121:ee02790d00b7 269 {
klauss 119:ee6a53069455 270 FILE * fserext = fopen("/qspi/peerext.txt", "w");
klauss 119:ee6a53069455 271 if ( fserext )
klauss 119:ee6a53069455 272 {
klauss 119:ee6a53069455 273 fprintf( fserext , "%i\n\r", new_server_ext );
klauss 119:ee6a53069455 274 fclose( fserext );
klauss 132:05cd37f7e007 275 return ( 0 );
klauss 132:05cd37f7e007 276 }
klauss 132:05cd37f7e007 277 else
klauss 132:05cd37f7e007 278 {
klauss 132:05cd37f7e007 279 return ( -1 );
klauss 119:ee6a53069455 280 }
klauss 117:e9facba9db27 281 }
klauss 117:e9facba9db27 282
klauss 132:05cd37f7e007 283 int fget_server_ext ( void )
klauss 132:05cd37f7e007 284 {
klauss 132:05cd37f7e007 285 char get_server_ext_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 286
klauss 132:05cd37f7e007 287 FILE * fserver_ext = fopen ( "/qspi/peerext.txt", "r" );
klauss 132:05cd37f7e007 288 if ( fserver_ext == NULL )
klauss 132:05cd37f7e007 289 {
klauss 132:05cd37f7e007 290 return ( -3 );
klauss 132:05cd37f7e007 291 } else {
klauss 132:05cd37f7e007 292 if( fread ( ( void * ) get_server_ext_buffer, 1, sizeof ( get_server_ext_buffer ) - 1, fserver_ext ) > 0 )
klauss 132:05cd37f7e007 293 {
klauss 132:05cd37f7e007 294 if ( fserver_ext ) fclose ( fserver_ext );
klauss 132:05cd37f7e007 295 return ( atoi ( get_server_ext_buffer ) );
klauss 132:05cd37f7e007 296 } else {
klauss 132:05cd37f7e007 297 if ( fserver_ext ) fclose ( fserver_ext );
klauss 132:05cd37f7e007 298 return ( -5 );
klauss 132:05cd37f7e007 299 }
klauss 132:05cd37f7e007 300 }
klauss 132:05cd37f7e007 301 }
klauss 132:05cd37f7e007 302
klauss 132:05cd37f7e007 303 int fset_server_port ( const int new_server_port )
klauss 121:ee02790d00b7 304 {
klauss 119:ee6a53069455 305 FILE * fsport = fopen("/qspi/serverport.txt", "w");
klauss 119:ee6a53069455 306 if ( fsport )
klauss 119:ee6a53069455 307 {
klauss 119:ee6a53069455 308 fprintf(fsport,"%i\n\r", new_server_port );
klauss 119:ee6a53069455 309 fclose( fsport );
klauss 132:05cd37f7e007 310 return ( 0 );
klauss 132:05cd37f7e007 311 }
klauss 132:05cd37f7e007 312 else
klauss 132:05cd37f7e007 313 {
klauss 132:05cd37f7e007 314 return ( -1 );
klauss 99:e80850c51106 315 }
klauss 81:3656f00ab3db 316 }
klauss 81:3656f00ab3db 317
klauss 132:05cd37f7e007 318 int fget_server_port ( void )
klauss 132:05cd37f7e007 319 {
klauss 132:05cd37f7e007 320 char get_server_sip_port_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 321
klauss 132:05cd37f7e007 322 FILE * fserver_port = fopen ( "/qspi/serverport.txt", "r" );
klauss 132:05cd37f7e007 323 if ( fserver_port == NULL )
klauss 132:05cd37f7e007 324 {
klauss 132:05cd37f7e007 325 return ( -1 );
klauss 132:05cd37f7e007 326 } else {
klauss 132:05cd37f7e007 327 if( fread ( ( void * ) get_server_sip_port_buffer, 1, sizeof ( get_server_sip_port_buffer ) - 1, fserver_port ) > 0 )
klauss 132:05cd37f7e007 328 {
klauss 132:05cd37f7e007 329 if ( fserver_port ) fclose ( fserver_port );
klauss 132:05cd37f7e007 330 return ( atoi ( get_server_sip_port_buffer ) );
klauss 132:05cd37f7e007 331 } else {
klauss 132:05cd37f7e007 332 if ( fserver_port ) fclose ( fserver_port );
klauss 132:05cd37f7e007 333 return ( -3 );
klauss 132:05cd37f7e007 334 }
klauss 132:05cd37f7e007 335 }
klauss 132:05cd37f7e007 336 }
klauss 132:05cd37f7e007 337
klauss 132:05cd37f7e007 338 int fset_mask ( const char * new_mask )
klauss 121:ee02790d00b7 339 {
klauss 119:ee6a53069455 340 FILE * fmask = fopen("/qspi/mymask.txt", "w");
klauss 119:ee6a53069455 341 if ( fmask )
klauss 119:ee6a53069455 342 {
klauss 119:ee6a53069455 343 fprintf(fmask,"%s\n\r",new_mask );
klauss 119:ee6a53069455 344 fclose( fmask );
klauss 132:05cd37f7e007 345 return ( 0 );
klauss 132:05cd37f7e007 346 }
klauss 132:05cd37f7e007 347 else
klauss 132:05cd37f7e007 348 {
klauss 132:05cd37f7e007 349 return ( -1 );
klauss 119:ee6a53069455 350 }
klauss 119:ee6a53069455 351 }
klauss 119:ee6a53069455 352
klauss 132:05cd37f7e007 353 int fset_gateway ( const char * new_gateway )
klauss 121:ee02790d00b7 354 {
klauss 119:ee6a53069455 355 FILE * fgate = fopen("/qspi/mygateway.txt", "w");
klauss 119:ee6a53069455 356 if ( fgate )
klauss 119:ee6a53069455 357 {
klauss 119:ee6a53069455 358 fprintf(fgate,"%s\n\r", new_gateway );
klauss 119:ee6a53069455 359 fclose( fgate );
klauss 132:05cd37f7e007 360 return ( 0 );
klauss 132:05cd37f7e007 361 }
klauss 132:05cd37f7e007 362 else
klauss 132:05cd37f7e007 363 {
klauss 132:05cd37f7e007 364 return ( -1 );
klauss 119:ee6a53069455 365 }
klauss 119:ee6a53069455 366 }
klauss 119:ee6a53069455 367
klauss 132:05cd37f7e007 368 int set_udp_port_listener ( const int new_udp_port_listener )
klauss 121:ee02790d00b7 369 {
klauss 119:ee6a53069455 370 FILE * fudpport = fopen( "/qspi/udpport.txt", "w" );
klauss 119:ee6a53069455 371 if ( fudpport )
klauss 119:ee6a53069455 372 {
klauss 119:ee6a53069455 373 fprintf( fudpport, "%i\n\r",new_udp_port_listener );
klauss 119:ee6a53069455 374 fclose( fudpport );
klauss 132:05cd37f7e007 375 return ( 0 );
klauss 132:05cd37f7e007 376 }
klauss 132:05cd37f7e007 377 else
klauss 132:05cd37f7e007 378 {
klauss 132:05cd37f7e007 379 return ( -1 );
klauss 119:ee6a53069455 380 }
klauss 119:ee6a53069455 381 }
klauss 119:ee6a53069455 382
klauss 132:05cd37f7e007 383 int fget_udp_port_listener ( void )
klauss 132:05cd37f7e007 384 {
klauss 132:05cd37f7e007 385 char get_udp_port_listener_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 386
klauss 132:05cd37f7e007 387 FILE * fudp_port_listener = fopen ( "/qspi/udpport.txt", "r" );
klauss 132:05cd37f7e007 388 if ( fudp_port_listener == NULL )
klauss 132:05cd37f7e007 389 {
klauss 132:05cd37f7e007 390 return ( -1 );
klauss 132:05cd37f7e007 391 } else {
klauss 132:05cd37f7e007 392 if( fread ( ( void * ) get_udp_port_listener_buffer, 1, sizeof ( get_udp_port_listener_buffer ) - 1, fudp_port_listener ) > 0 )
klauss 132:05cd37f7e007 393 {
klauss 132:05cd37f7e007 394 if ( fudp_port_listener ) fclose ( fudp_port_listener );
klauss 132:05cd37f7e007 395 return ( atoi ( get_udp_port_listener_buffer ) );
klauss 132:05cd37f7e007 396 } else {
klauss 132:05cd37f7e007 397 if ( fudp_port_listener ) fclose ( fudp_port_listener );
klauss 132:05cd37f7e007 398 return ( -3 );
klauss 132:05cd37f7e007 399 }
klauss 132:05cd37f7e007 400 }
klauss 132:05cd37f7e007 401 }
klauss 132:05cd37f7e007 402
klauss 132:05cd37f7e007 403 int set_tcp_port_listener ( const int new_tcp_port_listener )
klauss 121:ee02790d00b7 404 {
klauss 119:ee6a53069455 405 FILE * ftcpport = fopen( "/qspi/tcpport.txt", "w" );
klauss 119:ee6a53069455 406 if ( ftcpport )
klauss 119:ee6a53069455 407 {
klauss 119:ee6a53069455 408 fprintf( ftcpport, "%i\n\r",new_tcp_port_listener );
klauss 119:ee6a53069455 409 fclose( ftcpport );
klauss 132:05cd37f7e007 410 return ( 0 );
klauss 132:05cd37f7e007 411 }
klauss 132:05cd37f7e007 412 else
klauss 132:05cd37f7e007 413 {
klauss 132:05cd37f7e007 414 return ( -1 );
klauss 119:ee6a53069455 415 }
klauss 119:ee6a53069455 416 }
klauss 119:ee6a53069455 417
klauss 132:05cd37f7e007 418 int fget_tcp_port_listener ( void )
klauss 132:05cd37f7e007 419 {
klauss 132:05cd37f7e007 420 char get_tcp_port_listener_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 421
klauss 132:05cd37f7e007 422 FILE * ftcp_port_listener = fopen ( "/qspi/tcpport.txt", "r" );
klauss 132:05cd37f7e007 423 if ( ftcp_port_listener == NULL )
klauss 132:05cd37f7e007 424 {
klauss 132:05cd37f7e007 425 return ( -1 );
klauss 132:05cd37f7e007 426 } else {
klauss 132:05cd37f7e007 427 if( fread ( ( void * ) get_tcp_port_listener_buffer, 1, sizeof ( get_tcp_port_listener_buffer ) - 1, ftcp_port_listener ) > 0 )
klauss 132:05cd37f7e007 428 {
klauss 132:05cd37f7e007 429 if ( ftcp_port_listener ) fclose ( ftcp_port_listener );
klauss 132:05cd37f7e007 430 return ( atoi ( get_tcp_port_listener_buffer ) );
klauss 132:05cd37f7e007 431 } else {
klauss 132:05cd37f7e007 432 if ( ftcp_port_listener ) fclose ( ftcp_port_listener );
klauss 132:05cd37f7e007 433 return ( -3 );
klauss 132:05cd37f7e007 434 }
klauss 132:05cd37f7e007 435 }
klauss 132:05cd37f7e007 436 }
klauss 132:05cd37f7e007 437
klauss 132:05cd37f7e007 438 int fset_fw_ip ( const char * new_fw_ip )
klauss 121:ee02790d00b7 439 {
klauss 119:ee6a53069455 440 FILE * ffwip = fopen("/qspi/fw_ip.txt", "w" );
klauss 119:ee6a53069455 441 if ( ffwip )
klauss 119:ee6a53069455 442 {
klauss 119:ee6a53069455 443 fprintf(ffwip,"%s\n\r", new_fw_ip );
klauss 119:ee6a53069455 444 fclose( ffwip );
klauss 132:05cd37f7e007 445 return ( 0 );
klauss 132:05cd37f7e007 446 }
klauss 132:05cd37f7e007 447 else
klauss 132:05cd37f7e007 448 {
klauss 132:05cd37f7e007 449 return ( -1 );
klauss 119:ee6a53069455 450 }
klauss 119:ee6a53069455 451 }
klauss 119:ee6a53069455 452
klauss 132:05cd37f7e007 453 int fset_fw_port ( const int new_fw_port )
klauss 121:ee02790d00b7 454 {
klauss 119:ee6a53069455 455 FILE * ffwport = fopen("/qspi/fw_port.txt", "w" );
klauss 119:ee6a53069455 456 if ( ffwport )
klauss 119:ee6a53069455 457 {
klauss 119:ee6a53069455 458 fprintf(ffwport,"%i\n\r", new_fw_port );
klauss 119:ee6a53069455 459 fclose( ffwport );
klauss 132:05cd37f7e007 460 return ( 0 );
klauss 132:05cd37f7e007 461 }
klauss 132:05cd37f7e007 462 else
klauss 132:05cd37f7e007 463 {
klauss 132:05cd37f7e007 464 return ( -1 );
klauss 119:ee6a53069455 465 }
klauss 119:ee6a53069455 466 }
klauss 119:ee6a53069455 467
klauss 132:05cd37f7e007 468 int fget_fw_port ( void )
klauss 132:05cd37f7e007 469 {
klauss 132:05cd37f7e007 470 char get_fw_server_port_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 471
klauss 132:05cd37f7e007 472 FILE * ffw_server_port = fopen ( "/qspi/fw_port.txt", "r" );
klauss 132:05cd37f7e007 473 if ( ffw_server_port == NULL )
klauss 132:05cd37f7e007 474 {
klauss 132:05cd37f7e007 475 return ( -1 );
klauss 132:05cd37f7e007 476 } else {
klauss 132:05cd37f7e007 477 if( fread ( ( void * ) get_fw_server_port_buffer, 1, sizeof ( get_fw_server_port_buffer ) - 1, ffw_server_port ) > 0 )
klauss 132:05cd37f7e007 478 {
klauss 132:05cd37f7e007 479 if ( ffw_server_port ) fclose ( ffw_server_port );
klauss 132:05cd37f7e007 480 return ( atoi ( get_fw_server_port_buffer ) );
klauss 132:05cd37f7e007 481 } else {
klauss 132:05cd37f7e007 482 if ( ffw_server_port ) fclose ( ffw_server_port );
klauss 132:05cd37f7e007 483 return ( -3 );
klauss 132:05cd37f7e007 484 }
klauss 132:05cd37f7e007 485 }
klauss 132:05cd37f7e007 486 }
klauss 132:05cd37f7e007 487
klauss 132:05cd37f7e007 488 int fset_max_ext ( const int new_max_ext )
klauss 121:ee02790d00b7 489 {
klauss 119:ee6a53069455 490 FILE * fmex = fopen( "/qspi/maxext.txt", "w" );
klauss 119:ee6a53069455 491 if ( fmex ){
klauss 119:ee6a53069455 492 fprintf( fmex, "%i\n\r", new_max_ext );
klauss 119:ee6a53069455 493 fclose( fmex );
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_max_ext ( void )
klauss 132:05cd37f7e007 503 {
klauss 132:05cd37f7e007 504 char get_max_ext_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 505
klauss 132:05cd37f7e007 506 FILE * fmax_ext = fopen ( "/qspi/maxext.txt", "r" );
klauss 132:05cd37f7e007 507 if ( fmax_ext == NULL )
klauss 132:05cd37f7e007 508 {
klauss 132:05cd37f7e007 509 return ( -1 );
klauss 132:05cd37f7e007 510 } else {
klauss 132:05cd37f7e007 511 if( fread ( ( void * ) get_max_ext_buffer, 1, sizeof ( get_max_ext_buffer ) - 1, fmax_ext ) > 0 )
klauss 132:05cd37f7e007 512 {
klauss 132:05cd37f7e007 513 if ( fmax_ext ) fclose ( fmax_ext );
klauss 132:05cd37f7e007 514 return ( atoi ( get_max_ext_buffer ) );
klauss 132:05cd37f7e007 515 } else {
klauss 132:05cd37f7e007 516 if ( fmax_ext ) fclose ( fmax_ext );
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_min_ext ( const int new_min_ext )
klauss 121:ee02790d00b7 523 {
klauss 81:3656f00ab3db 524 FILE * fmin = fopen( "/qspi/minext.txt", "w" );
klauss 119:ee6a53069455 525 if ( fmin ){
klauss 99:e80850c51106 526 fprintf( fmin, "%i\n\r", new_min_ext );
klauss 99:e80850c51106 527 fclose( fmin );
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 132:05cd37f7e007 533 }
klauss 132:05cd37f7e007 534 }
klauss 132:05cd37f7e007 535
klauss 132:05cd37f7e007 536 int fget_min_ext ( void )
klauss 132:05cd37f7e007 537 {
klauss 132:05cd37f7e007 538 char get_min_ext_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 539
klauss 132:05cd37f7e007 540 FILE * fmin_ext = fopen ( "/qspi/minext.txt", "r" );
klauss 132:05cd37f7e007 541 if ( fmin_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_min_ext_buffer, 1, sizeof ( get_min_ext_buffer ) - 1, fmin_ext ) > 0 )
klauss 132:05cd37f7e007 546 {
klauss 132:05cd37f7e007 547 if ( fmin_ext ) fclose ( fmin_ext );
klauss 132:05cd37f7e007 548 return ( atoi ( get_min_ext_buffer ) );
klauss 132:05cd37f7e007 549 } else {
klauss 132:05cd37f7e007 550 if ( fmin_ext ) fclose ( fmin_ext );
klauss 132:05cd37f7e007 551 return ( -3 );
klauss 132:05cd37f7e007 552 }
klauss 99:e80850c51106 553 }
klauss 81:3656f00ab3db 554 }
klauss 81:3656f00ab3db 555
klauss 81:3656f00ab3db 556 // Print the content of a given file
klauss 132:05cd37f7e007 557 int cat ( const char * fname )
klauss 121:ee02790d00b7 558 {
klauss 81:3656f00ab3db 559 char buff[513];
klauss 81:3656f00ab3db 560 int num;
klauss 81:3656f00ab3db 561
klauss 124:c1b6c893e1c3 562 FILE * fp = fopen( fname, "r" );
klauss 132:05cd37f7e007 563 if ( fp == NULL )
klauss 132:05cd37f7e007 564 {
klauss 132:05cd37f7e007 565 pc.printf( "Failed to open %s", fname);
klauss 132:05cd37f7e007 566 return ( -3 );
klauss 81:3656f00ab3db 567 }
klauss 81:3656f00ab3db 568
klauss 132:05cd37f7e007 569 while( ( num = fread( buff, 1, 512, fp ) ) > 0 )
klauss 132:05cd37f7e007 570 {
klauss 81:3656f00ab3db 571 buff[ num ] = '\0';
klauss 132:05cd37f7e007 572 pc.printf( "%s", buff );
klauss 81:3656f00ab3db 573 }
klauss 124:c1b6c893e1c3 574
klauss 124:c1b6c893e1c3 575 if ( fp ) fclose ( fp );
klauss 132:05cd37f7e007 576
klauss 132:05cd37f7e007 577 return ( 0 );
klauss 114:472502b31a12 578 }
klauss 114:472502b31a12 579
klauss 132:05cd37f7e007 580 int fset_shift_port ( const int new_shift_port )
klauss 121:ee02790d00b7 581 {
klauss 119:ee6a53069455 582 FILE * shift_port = fopen("/qspi/shift_port.txt", "w" );
klauss 119:ee6a53069455 583 if( shift_port )
klauss 119:ee6a53069455 584 {
klauss 119:ee6a53069455 585 fprintf( shift_port,"%i\n\r", new_shift_port );
klauss 119:ee6a53069455 586 fclose( shift_port );
klauss 132:05cd37f7e007 587 return ( 0 );
klauss 114:472502b31a12 588 }
klauss 119:ee6a53069455 589 else
klauss 119:ee6a53069455 590 {
klauss 132:05cd37f7e007 591 return ( -1 );
klauss 132:05cd37f7e007 592 }
klauss 132:05cd37f7e007 593 }
klauss 132:05cd37f7e007 594
klauss 132:05cd37f7e007 595
klauss 132:05cd37f7e007 596 int fget_shift_port ( void )
klauss 132:05cd37f7e007 597 {
klauss 132:05cd37f7e007 598 char get_shift_port_buffer [ 32 ] = "";
klauss 132:05cd37f7e007 599
klauss 132:05cd37f7e007 600 FILE * fshift_port = fopen ( "/qspi/shift_port.txt", "r" );
klauss 132:05cd37f7e007 601 if ( fshift_port == NULL )
klauss 132:05cd37f7e007 602 {
klauss 132:05cd37f7e007 603 return ( -1 );
klauss 132:05cd37f7e007 604 } else {
klauss 132:05cd37f7e007 605 if( fread ( ( void * ) get_shift_port_buffer, 1, sizeof ( get_shift_port_buffer ) - 1, fshift_port ) > 0 )
klauss 132:05cd37f7e007 606 {
klauss 132:05cd37f7e007 607 if ( fshift_port ) fclose ( fshift_port );
klauss 132:05cd37f7e007 608 return ( atoi ( get_shift_port_buffer ) );
klauss 132:05cd37f7e007 609 } else {
klauss 132:05cd37f7e007 610 if ( fshift_port ) fclose ( fshift_port );
klauss 132:05cd37f7e007 611 return ( -3 );
klauss 132:05cd37f7e007 612 }
klauss 119:ee6a53069455 613 }
klauss 121:ee02790d00b7 614 }
klauss 121:ee02790d00b7 615
klauss 132:05cd37f7e007 616 int files ( const char type )
klauss 132:05cd37f7e007 617 {
klauss 132:05cd37f7e007 618 if ( type == 's' ) {
klauss 132:05cd37f7e007 619 pc.printf("Header IP " );
klauss 121:ee02790d00b7 620 cat ("/qspi/myip.txt");
klauss 121:ee02790d00b7 621
klauss 132:05cd37f7e007 622 pc.printf("Header ext ");
klauss 121:ee02790d00b7 623 cat("/qspi/myext.txt");
klauss 121:ee02790d00b7 624
klauss 132:05cd37f7e007 625 pc.printf("Header port ");
klauss 121:ee02790d00b7 626 cat("/qspi/mysipport.txt");
klauss 121:ee02790d00b7 627
klauss 132:05cd37f7e007 628 pc.printf("Server IP ");
klauss 121:ee02790d00b7 629 cat("/qspi/serverip.txt");
klauss 121:ee02790d00b7 630
klauss 132:05cd37f7e007 631 pc.printf("Server ext ");
klauss 121:ee02790d00b7 632 cat("/qspi/peerext.txt");
klauss 121:ee02790d00b7 633
klauss 132:05cd37f7e007 634 pc.printf("Server port ");
klauss 121:ee02790d00b7 635 cat("/qspi/serverport.txt");
klauss 121:ee02790d00b7 636
klauss 132:05cd37f7e007 637 pc.printf("Mascara de rede ");
klauss 121:ee02790d00b7 638 cat("/qspi/mymask.txt");
klauss 121:ee02790d00b7 639
klauss 132:05cd37f7e007 640 pc.printf("Gateway IP ");
klauss 121:ee02790d00b7 641 cat("/qspi/mygateway.txt");
klauss 121:ee02790d00b7 642
klauss 132:05cd37f7e007 643 pc.printf("UDP Port ");
klauss 121:ee02790d00b7 644 cat("/qspi/udpport.txt");
klauss 121:ee02790d00b7 645
klauss 132:05cd37f7e007 646 pc.printf("TCP Port ");
klauss 121:ee02790d00b7 647 cat("/qspi/tcpport.txt");
klauss 121:ee02790d00b7 648
klauss 132:05cd37f7e007 649 pc.printf("FW Server IP ");
klauss 121:ee02790d00b7 650 cat("/qspi/fw_ip.txt");
klauss 121:ee02790d00b7 651
klauss 132:05cd37f7e007 652 pc.printf("FW Server Port ");
klauss 121:ee02790d00b7 653 cat("/qspi/fw_port.txt");
klauss 121:ee02790d00b7 654
klauss 132:05cd37f7e007 655 pc.printf("Max Ext ");
klauss 121:ee02790d00b7 656 cat("/qspi/maxext.txt");
klauss 121:ee02790d00b7 657
klauss 132:05cd37f7e007 658 pc.printf("Min Ext ");
klauss 121:ee02790d00b7 659 cat("/qspi/minext.txt");
klauss 121:ee02790d00b7 660
klauss 132:05cd37f7e007 661 pc.printf("Shift Port ");
klauss 121:ee02790d00b7 662 cat("/qspi/shift_port.txt");
klauss 121:ee02790d00b7 663
klauss 132:05cd37f7e007 664 pc.printf("Clock Server IP ");
klauss 121:ee02790d00b7 665 cat("/qspi/serverip.txt");
klauss 132:05cd37f7e007 666
klauss 132:05cd37f7e007 667 return ( 0 );
klauss 121:ee02790d00b7 668 }
klauss 121:ee02790d00b7 669
klauss 132:05cd37f7e007 670 return ( -1 );
klauss 121:ee02790d00b7 671 }
klauss 121:ee02790d00b7 672
klauss 121:ee02790d00b7 673 int init_fsystem ( void )
klauss 121:ee02790d00b7 674 {
klauss 121:ee02790d00b7 675 // init file system and check if files exist
klauss 121:ee02790d00b7 676 int return_value = 0;
klauss 121:ee02790d00b7 677
klauss 121:ee02790d00b7 678 if (!qspifs.isformatted()) {
klauss 121:ee02790d00b7 679 qspifs.format();
klauss 121:ee02790d00b7 680 return_value |= BIT0;
klauss 121:ee02790d00b7 681 }
klauss 121:ee02790d00b7 682
klauss 121:ee02790d00b7 683 return ( return_value |= BIT1 );
klauss 119:ee6a53069455 684 }