}
/* Lee y devuelve un registro de un archivo del Tipo 2. */
-void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID id_reg, EMUFS_REG_SIZE* reg_size, int *err)
+void *emufs_tipo2_leer_registro(EMUFS* efs, CLAVE clave, EMUFS_REG_SIZE* reg_size, int *err)
{
FILE* f_data;
char *registro; /* registro a leer */
char name_f[255];
EMUFS_OFFSET reg_offset; /* offset donde se encuentra el registro */
-
+ EMUFS_REG_ID id_reg;
+ INDICE_DATO dato;
+
strcpy(name_f,efs->nombre);
strcat(name_f,".dat");
/* Obtenemos la posicion del registro en el .dat */
- reg_offset = emufs_idx_buscar_registro(efs, id_reg);
+ /*si existe, lo busco en el archivo de bloques*/
+ /* TODO VER COMO SACAR EL ERROR!=1 por otra cosa!! XXX */
+ if ((efs->indices != NULL) && (*err != 1)) {
+ /* TODO : Verificar donde esta el indice primario */
+ dato = efs->indices->existe_entrada(efs->indices, clave);
+ reg_offset = dato.bloque;
+ id_reg = dato.id;
+ } else {
+ id_reg = clave.i_clave;
+ reg_offset = emufs_idx_buscar_registro(efs, id_reg);
+ (*err) = 0;
+ }
if (reg_offset == EMUFS_NOT_FOUND) {
PERR("Registro no encontrado");
*err = EMUFS_NOT_FOUND;
*err = EMUFS_ERROR_CANT_OPEN_FILE;
return NULL;
}
- fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID),0);
+ fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID),SEEK_SET);
fread(reg_size,sizeof(EMUFS_REG_SIZE),1,f_data);
registro = (char*)malloc(*reg_size);
fread(registro,*reg_size,1,f_data);
/* Grabar un registro en un archivo del Tipo 2. */
EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE reg_size, int* err)
{
+ INDICE_DATO idx_data;
EMUFS_REG_ID id_reg;
EMUFS_FREE freespace;
EMUFS_OFFSET wrt_offset,reg_offset;
strcpy(name_f,efs->nombre);
strcat(name_f,".dat");
- if ( (f_data = fopen(name_f,"r+"))==NULL ) return -1; /*ERROR*/
+ if ( (f_data = fopen(name_f,"r+"))==NULL ) {
+ PERR("ERROR AL ABRIR EL ARCHIVO");
+ return -1; /*ERROR*/
+ }
/* Obtengo un offset en donde iniciar la escritura de mi registro */
/* de manera segura (habra espacio suficiente) */
fisic_size = sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+reg_size;
wrt_offset = emufs_fsc_buscar_lugar(efs,fisic_size,&freespace);
- /*printf("tipo2.c >> Recording Reg > Searching FSC: Offset = %lu FSpace: %lu\n", n_WrtOffset, n_FreeSpace);*/
/* Si no encontre un gap, entonces escribo el registro al final */
if (wrt_offset == -1) {
/* Finalmente, actualizamos el indice de registros (offsets) */
emufs_idx_agregar(efs,id_reg,reg_offset);
-
+ idx_data.id = id_reg;
+ idx_data.bloque = reg_offset;
+ emufs_indice_agregar(efs->indices, (char *)ptr, idx_data);
+
return id_reg;
}
/* Borra un registro determinado y actualiza los archivos de Posicion Relativa (Indice-Offset) y el de Gaps */
-int emufs_tipo2_borrar_registro(EMUFS *efs, EMUFS_REG_ID id_reg)
+int emufs_tipo2_borrar_registro(EMUFS *efs, CLAVE k, INDICE_DATO dato1)
{
EMUFS_OFFSET reg_offset,reg_size;
-
- /* Obtenemos el offset donde arranca el registro */
- if ((reg_offset = emufs_idx_buscar_registro(efs,id_reg)) == EMUFS_NOT_FOUND) {
- /* TODO Manejo de errores */
- PERR("Registro no encontrado");
+ EMUFS_REG_ID id_reg;
+ INDICE_DATO dato;
+
+ if (efs->indices != NULL) {
+ dato = efs->indices->existe_entrada(efs->indices, k);
+ id_reg = dato.id;
+ reg_offset = dato.bloque;
+ } else {
+ /* Obtenemos el offset donde arranca el registro */
+ id_reg = k.i_clave;
+ if ((reg_offset = emufs_idx_buscar_registro(efs,id_reg)) == EMUFS_NOT_FOUND) {
+ PERR("Registro no encontrado");
return EMUFS_NOT_FOUND;
+ }
}
+
+ if (id_reg == -1) return EMUFS_NOT_FOUND;
+ emufs_indice_borrar(efs->indices, k, dato1);
/* Obtenemos el Size del Registro en cuestion y hacemos un dummyfill*/
emufs_tipo2_get_regsize(efs,reg_offset,®_size);
emufs_tipo2_dummyfill(efs,reg_offset,reg_size);
}
/* Realiza la actualizacin de un registro ya existente */
-EMUFS_REG_ID emufs_tipo2_modificar_registro(EMUFS *efs, EMUFS_REG_ID id, void *data, EMUFS_REG_SIZE size, int *error)
+EMUFS_REG_ID emufs_tipo2_modificar_registro(EMUFS *efs, CLAVE k, void *data, EMUFS_REG_SIZE size, int *error, INDICE_DATO dato)
{
- emufs_tipo2_borrar_registro(efs, id);
+ emufs_tipo2_borrar_registro(efs, k, dato);
return emufs_tipo2_grabar_registro(efs, data, size, error);
}
/* Obtengo la cantidad de gaps */
if ( (fscfile = fopen(name_ffsc,"rb")) == NULL){
PERR("No se pudo abrir el archivo");
+ fclose(datfile);
return;
}
fseek(fscfile,0,SEEK_END);
return 0;
}
-void* emufs_tipo2_leer_registro_raw(EMUFS *emu, EMUFS_REG_ID id, EMUFS_REG_SIZE *size, int *pos)
+void* emufs_tipo2_leer_registro_raw(EMUFS *efs, EMUFS_REG_ID id, EMUFS_REG_SIZE *size, int *pos)
{
- (*size) = 0;
- (*pos) = 0;
- PERR("IMPLEMENTAME CABRON");
- return NULL;
+ FILE* f_data;
+ char *registro; /* registro a leer */
+ char name_f[255];
+ EMUFS_OFFSET reg_offset; /* offset donde se encuentra el registro */
+
+ strcpy(name_f,efs->nombre);
+ strcat(name_f,".dat");
+
+ /* Obtenemos la posicion del registro en el .dat */
+ reg_offset = emufs_idx_buscar_registro(efs, id);
+ if (reg_offset == EMUFS_NOT_FOUND) {
+ PERR("Registro no encontrado");
+ return NULL;
+ }
+
+ /* Levantamos el registro */
+ if ((f_data = fopen(name_f, "rb")) == NULL) {
+ PERR("No se puede abrir archivo");
+ return NULL;
+ }
+ fseek(f_data,reg_offset+sizeof(EMUFS_REG_ID), SEEK_SET);
+ fread(size,sizeof(EMUFS_REG_SIZE),1,f_data);
+ registro = (char*)malloc(*size+sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+100);
+ if (reg_offset >= 50) {
+ fseek(f_data, reg_offset - 50, SEEK_SET);
+ (*pos) = 50;
+ } else {
+ /* Si no hay 50 antes mio, estoy cerca del 0! */
+ (*pos) = reg_offset;
+ fseek(f_data, 0, SEEK_SET);
+ }
+ (*size) += sizeof(EMUFS_REG_ID)+sizeof(EMUFS_REG_SIZE)+100;
+ fread(registro,*size, 1,f_data);
+ fclose(f_data);
+
+ return registro;
}