- if ( (f_idx = fopen(name_f_idx,"a+"))==NULL ) return -1;
-
-
- while ( !feof(f_idx) ){
- /*busco cual tengo que borrar*/
- if ( fread(®, sizeof(EMUFS_IDX), 1, f_idx) != 1 ) continue;
- if ( reg.n_idreg == n_IdReg )
- break;
- }
-
- /* me paro en el que tengo que borrar */
- fseek(f_idx, -sizeof(EMUFS_IDX), SEEK_CUR);
- actual = ftell(f_idx); /* Guardo la posicion actual */
- printf(" actual = %ld\n",actual);
- fseek(f_idx, 0, SEEK_END); /* me voy al final */
- final = ftell(f_idx); /* veo cuando ocupa el archivo */
- fseek(f_idx, actual, SEEK_SET);/* vuelvo al lugar desde donde quiero justificar */
- /*calculo cuantos registros tengo que mover */
- cant = (final-actual)/sizeof(EMUFS_IDX);
- buffer = (EMUFS_IDX*)malloc((cant)*sizeof(EMUFS_IDX));
- printf("sizeof buffer = %ld\n",(cant-1)*sizeof(EMUFS_IDX));
- /*apunto al siguiente del que quiero borrar*/
- final = actual + sizeof(EMUFS_IDX);
- /*leo todos los que quedan*/
- fseek(f_idx,final,SEEK_SET);
- fread(buffer,sizeof(EMUFS_IDX),cant-1,f_idx) ;
-/* for( i=0; i<cant-1; i ++)
- printf("buffer[%ld] = %ld , %ld\n",i,*(buffer+i),*(buffer+2*i));*/
- /*apunto al lugar donde deben ser guardados*/
- fseek(f_idx,actual,SEEK_SET);
- printf(" actual = %ld\n",actual);
- /*los guardo*/
- fwrite(buffer,sizeof(EMUFS_IDX),cant-1,f_idx);
-