/* archivo con bloques parametrizados y registro constante */
#include "param_cte.h"
-FILE* block_reg;
-FILE* block_free;
-FILE* reg_exist;
+FILE* f_block_reg;
+FILE* f_block_free;
+FILE* f_reg_exist;
/** Leo un registro del archivo, devuelve cero si no lo encuentra.**/
-int leer_registro(int ID, void *str, unsigned long tam)
+int leer_registro(EMUFS *emu, int ID, void *ptr, unsigned long tam_reg)
{
- /* FIXME : aca tam es el tamaño del registro, no del bloque!
- *
- * Aca deberias recibir una estructura EMUFS y de ahi sacar los datos
- * del tamaño del bloque a leer.
- *
- * leer_registro(EMUFS, int, void*, unsigned long);
- *
- * Tambien ver que siempre que hay un return se libere toda la memoria!
- */
- char* bloque = (char*)malloc(tam);
- int block, ID_aux, a, b, c, d, tamanio_registro;
+ char* bloque = (char*)malloc(emu->tam_bloque);
+ char name_f_block_reg[255];
+ int block, ID_aux, a, b, c, d;
int iterador = 0;
+ strcpy(name_f_block_reg,emu->nombre);
+ strcat(name_f_block_reg,"bloc_reg.tipo3");
+
/* tengo que crear los archivos de indice antes de usarlos!!!!!!!!!*/
- if ( (block_reg = fopen("block_reg.dat","a+")) == NULL )
- return -1; /*ERROR*/
-
- if ( (block_free = fopen("block_free.dat","a+")) == NULL )
+ if ( (f_block_reg = fopen(name_f_block_reg,"a+")) == NULL ){
+ free(bloque);
return -1; /*ERROR*/
+ }
- if ( (reg_exist = fopen("reg_exist.dat","a+")) == NULL )
- return -1; /*ERROR*/
+
/* si el registro no existe, retorno*/
- if ( existe_registro(ID) == -1 ) return -1;
+ if ( existe_registro(emu,ID) == -1 ){
+ free(bloque);
+ return -1;
+ }
/*si existe, lo busco en el archivo de bloques*/
- block = buscar_registro(ID); /*me devuelve el nro de bloque al que pertenece el registro*/
- if (leer_bloque(block,bloque,tam)==-1)
+ block = buscar_registro(emu,ID); /*me devuelve el nro de bloque al que pertenece el registro*/
+ if (leer_bloque(emu, block, bloque)==-1){
+ free(bloque);
return -1; /*No se pudo leer el bloque*/
+ }
- while ( iterador != (tam/tamanio_registro) ){
+ while ( iterador != emu->tam_bloque ){
a = bloque[0+iterador];
b = bloque[1+iterador];
c = bloque[2+iterador];
d = bloque[3+iterador];
+ iterador += 4;
ID_aux = (d << 0 ) | (c << 8) | ( b << 16) | (a << 24);
if ( ID_aux == ID ){
- /* TODO : la copia es byte a byte. Al archivo
- * no le importa que tipo de estructura es
- */
- //aca va el memcpy... HACER!!
- //copiar(dato, &str);
+ memcpy(ptr,bloque[iterador],tam_reg);
break;
}
- // FIXME : El tamaño del registro es lo que debo tener
- // aca, no el tamaño del tipo de dato.
- //
- // Cuando se crea el archivo se le da el tamaño de un registro
- iterador += tamanio_registro;
+ iterador += tam_reg;
}
- fclose(block_reg);
- fclose(block_free);
- fclose(reg_exist);
+
+ fclose(f_block_reg);
free(bloque);
return 0;
-
}
/*busco el registro ID en el archivo reg_exist.dat, para ver si existe.*/
-int existe_registro(int ID)
+int existe_registro(EMUFS *emu, int ID)
{
- int num;
- char ex;
- if ( (reg_exist = fopen("reg_exist.dat","r")) == NULL) return 0; /*ERROR*/
- while ( !feof(reg_exist) ){
- fscanf(reg_exist,"%i%c",&num,&ex);
- if ( num == ID && ex == 'S' ){
- fclose(reg_exist);
+ REG_EXIST_T reg;
+ char name_f_reg_exist[255];
+ strcpy(name_f_reg_exist,emu->nombre);
+ strcat(name_f_reg_exist,"_exist_reg.tipo3");
+ if ( (f_reg_exist = fopen(name_f_reg_exist,"r")) == NULL) return -1; /*ERROR*/
+ while ( !feof(f_reg_exist) ){
+ fread(®,sizeof(reg),1,f_reg_exist);
+ if ( reg.id_reg == ID && reg.existe == 'S' ){
+ fclose(f_reg_exist);
return 0;
}
}
- fclose(reg_exist);
+ fclose(f_reg_exist);
return -1;
}
/*busca el registro ID en el archivo "block_reg.dat" y devuelve el nro de bloque en el que se encuentra*/
-int buscar_registro(int ID)
+int buscar_registro(EMUFS *emu, int ID)
{
- int num_block, num_reg;
- if ( (block_reg = fopen("block_reg.dat","r")) == NULL) return 0; /*ERROR*/
- while ( !feof(block_reg) ){
- fscanf(block_reg,"%i%i",&num_block,&num_reg);
- if ( num_reg == ID ){
- fclose(block_reg);
- return num_block;
+ BLOCK_REG_T reg;
+ char name_f_block_reg[255];
+ strcpy(name_f_block_reg,emu->nombre);
+ strcat(name_f_block_reg,"_block_reg.tipo3");
+
+ if ( (f_block_reg = fopen(name_f_block_reg,"r")) == NULL) return -1; /*ERROR*/
+ while ( !feof(f_block_reg) ){
+ fread(®,sizeof(reg),1,f_block_reg);
+ if ( reg.id_reg == ID ){
+ fclose(f_block_reg);
+ return reg.block;
}
}
- fclose(block_reg);
+ fclose(f_block_reg);
return -1;
}
-int leer_bloque(int ID, void* str, unsigned long tam)
+int leer_bloque(EMUFS *emu, int ID, void* ptr)
{
+ FILE* file;
+ char name_f[255];
+
+ strcpy(name_f,emu->nombre);
+ strcat(name_f,".tipo3");
+
+ if ( (file = fopen(name_f,"r"))==NULL ) return -1; /*ERROR*/
+ fseek(file,ID*emu->tam_bloque,SEEK_SET);
+ fread(ptr,emu->tam_bloque,1,file);
+
return 0;
}