X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/c831082edc6038351f9ec6c2e55b85ef41d213f4..8bc5985288b46b993316b85bf2e13899c1a09292:/emufs/emufs.c?ds=inline diff --git a/emufs/emufs.c b/emufs/emufs.c index 5ea76a1..76260ac 100644 --- a/emufs/emufs.c +++ b/emufs/emufs.c @@ -39,6 +39,7 @@ */ #include "emufs.h" +#include "common.h" #include "tipo1.h" #include "tipo2.h" #include "tipo3.h" @@ -48,7 +49,6 @@ char *str_dup(const char *s); -/* Duplica una cadena de caracteres y devuelve la copia. */ char *str_dup(const char *s) { char *tmp; @@ -58,7 +58,6 @@ char *str_dup(const char *s) return tmp; } -/* Objetivo: Crea un archivo de nombre y extension dadas. */ int emufs_crear_archivo_auxiliar(const char* name, const char* ext) { FILE* f; @@ -81,13 +80,12 @@ int emufs_crear_archivo_auxiliar(const char* name, const char* ext) return 0; } -/* Crea un archivo de tipo dado y devuelve una estructura con las rutinas de handling de dicho archivo. */ -EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, - EMUFS_BLOCK_SIZE tam_bloque, EMUFS_REG_SIZE tam_reg) +EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_bloque, EMUFS_REG_SIZE tam_reg) { char name[255]; FILE *fp; EMUFS *efs; + int err = 0; /* Si no es un tipo conocido, sale. */ if ((tipo != T1) && (tipo != T2) && (tipo != T3)) { @@ -103,6 +101,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, efs->tam_bloque = tam_bloque; efs->tam_reg = tam_reg; efs->nombre = str_dup(filename); + efs->indices = NULL; /* Abre archivo de datos. */ strcpy(name, filename); @@ -116,11 +115,12 @@ EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, } /* Guarda cabecera común. */ - fwrite(&tipo, sizeof(EMUFS_TYPE), 1, fp); + fwrite(&tipo, sizeof(EMUFS_Tipo), 1, fp); /* Crea archivo de índice. */ if (emufs_idx_crear(efs)) { /* TODO ERROR */ + fclose(fp); free(efs->nombre); free(efs); return NULL; @@ -129,6 +129,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, /* Crea archivo de control de espacio libre. */ if (emufs_fsc_crear(efs)) { /* TODO ERROR */ + fclose(fp); free(efs->nombre); free(efs); return NULL; @@ -137,6 +138,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, /* Crea archivo de identificadores borrados (recuperables). */ if (emufs_did_crear(efs)) { /* TODO ERROR */ + fclose(fp); free(efs->nombre); free(efs); return NULL; @@ -146,7 +148,15 @@ EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, switch (tipo) { case T1: - emufs_tipo1_inicializar(efs); + /* Asigna punteros a funciones. */ + if ((err = emufs_tipo1_inicializar(efs))) { + /* TODO ERROR */ + PERR("No se pudo inicializar el EMUFS de tipo1"); + fclose(fp); + free(efs->nombre); + free(efs); + return NULL; + } /* Guarda cabeceras propias. */ fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp); @@ -155,19 +165,20 @@ EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, case T2: /* Asigna punteros a funciones. */ - efs->grabar_registro = emufs_tipo2_grabar_registro; - efs->borrar_registro = emufs_tipo2_borrar_registro; - efs->nombre = str_dup(filename); - /*efs->leer_registro = emufs_tipo2_leer_registro;*/ + emufs_tipo2_inicializar(efs); break; case T3: /* Asigna punteros a funciones. */ - efs->leer_bloque = emufs_tipo3_leer_bloque; - efs->leer_registro = emufs_tipo3_leer_registro; + efs->leer_bloque = emufs_tipo3_leer_bloque; + efs->leer_registro = emufs_tipo3_leer_registro; + efs->leer_registro_raw = emufs_tipo3_leer_registro_raw; efs->grabar_registro = emufs_tipo3_grabar_registro; - /*efs->borrar_registro = emufs_tipo3_borrar_registro;*/ - + efs->borrar_registro = emufs_tipo3_borrar_registro; + efs->leer_estadisticas = emufs_tipo3_leer_estadisticas; + efs->modificar_registro = emufs_tipo3_modificar_registro; + efs->compactar = emufs_tipo3_compactar; + efs->leer_bloque_raw = emufs_tipo3_leer_bloque_raw; /* Guarda cabeceras propias. */ fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp); fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp); @@ -179,13 +190,13 @@ EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, return efs; } -/* Realiza la apertura de un archivo dado, identifica el tipo de archivo y devuelve la estructura de handling. */ EMUFS *emufs_abrir(const char *filename) { EMUFS *efs; char name[255]; char tipo; FILE *fp; + int err = 0; strcpy(name, filename); strcat(name, ".dat"); @@ -193,7 +204,7 @@ EMUFS *emufs_abrir(const char *filename) /* Trato de determinar el tipo de archivo */ fp = fopen(name, "r"); if (fp == NULL) return NULL; - fread(&tipo, sizeof(EMUFS_TYPE), 1, fp); + fread(&tipo, sizeof(EMUFS_Tipo), 1, fp); /* Si no es un tipo conocido, sale. */ if ((tipo != T1) && (tipo != T2) && (tipo != T3)) { @@ -209,10 +220,9 @@ EMUFS *emufs_abrir(const char *filename) } efs->tipo = tipo; efs->nombre = str_dup(filename); - + switch (tipo) { case T1: - emufs_tipo1_inicializar(efs); /* Lee cabeceras propias. */ if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) { free(efs->nombre); @@ -220,8 +230,16 @@ EMUFS *emufs_abrir(const char *filename) fclose(fp); return NULL; } + /* Asigna punteros a funciones. */ + if ((err = emufs_tipo1_inicializar(efs))) { + PERR("No se pudo inicializar el EMUFS de tipo1"); + fclose(fp); + return NULL; + } break; case T2: + /* Asigna punteros a funciones. */ + emufs_tipo2_inicializar(efs); break; case T3: if ((!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) || @@ -232,10 +250,16 @@ EMUFS *emufs_abrir(const char *filename) fclose(fp); return NULL; } + /* Asigna punteros a funciones. */ efs->leer_bloque = emufs_tipo3_leer_bloque; + efs->leer_registro_raw = emufs_tipo3_leer_registro_raw; efs->leer_registro = emufs_tipo3_leer_registro; efs->grabar_registro = emufs_tipo3_grabar_registro; - /*efs->borrar_registro = emufs_tipo3_borrar_registro;*/ + efs->borrar_registro = emufs_tipo3_borrar_registro; + efs->leer_estadisticas = emufs_tipo3_leer_estadisticas; + efs->modificar_registro = emufs_tipo3_modificar_registro; + efs->compactar = emufs_tipo3_compactar; + efs->leer_bloque_raw = emufs_tipo3_leer_bloque_raw; break; } @@ -243,7 +267,6 @@ EMUFS *emufs_abrir(const char *filename) return efs; } -/* Objetivo: Rutina llamada al destruir la aplicacion para librerar */ int emufs_destruir(EMUFS *e) { if (e == NULL) return 1; @@ -252,7 +275,6 @@ int emufs_destruir(EMUFS *e) return 0; } -/* Visualiza espacios libres de un archivo?? */ int ver_archivo_FS(EMUFS *emu) { FILE *f_block_free; @@ -263,32 +285,123 @@ int ver_archivo_FS(EMUFS *emu) strcat(name_f_block_free,".fsc"); if ( (f_block_free = fopen(name_f_block_free,"r"))==NULL ){ - printf("no pude abrir el archivo %s\n",name_f_block_free); + fprintf(stderr, "no pude abrir el archivo %s\n",name_f_block_free); return -1; } + fprintf(stderr,"BOQUES Y ESPACIO LIBRE\n"); fread(®,sizeof(reg),1,f_block_free); while ( !feof(f_block_free) ){ - printf(" Bloque = %li Espacio libre = %li\n",reg.n_marker, reg.n_freespace); + fprintf(stderr, "Bloque = %li Espacio libre = %li\n",reg.marker, reg.freespace); fread(®,sizeof(reg),1,f_block_free); } fclose(f_block_free); /* Imprimo la lista de bloques/registros */ - printf("BLOQUES Y REGISTROS\n"); + fprintf(stderr, "BLOQUES Y REGISTROS\n"); strcpy(name_f_block_free,emu->nombre); strcat(name_f_block_free,".idx"); + f_block_free = fopen(name_f_block_free, "r"); { EMUFS_IDX r; - f_block_free = fopen(name_f_block_free, "r"); - fread(&r, sizeof(EMUFS_IDX), 1, f_block_free); while (!feof(f_block_free)) { - printf("ID %li en bloque %li\n", r.n_idreg, r.n_location); - fread(&r, sizeof(EMUFS_IDX), 1, f_block_free); + if (fread(&r, sizeof(EMUFS_IDX), 1, f_block_free) != 1) continue; + fprintf(stderr, "ID %li en bloque %li\n", r.id_reg, r.location); } - fclose(f_block_free); } + fclose(f_block_free); - return 0; } + +int debug_ver_estadisticas(EMUFS* efs) +{ + EMUFS_Estadisticas s = efs->leer_estadisticas(efs); + + printf("ESTADISTICAS:\n"); + printf("=============\n"); + printf("Tamaño del archivo: %lu bytes\n", s.tam_archivo); + printf("Tamaño de datos (incluye espacio libre): %lu bytes (%.2f %%)\n", + s.tam_archivo - s.tam_info_control_dat, + (s.tam_archivo - s.tam_info_control_dat) * 100.0 + / (float) s.tam_archivo); + printf("Tamaño de info de control total: %lu bytes (%.2f %%)\n", + s.tam_info_control_dat + s.tam_archivos_aux, + (s.tam_info_control_dat + s.tam_archivos_aux) * 100.0 + / (float) s.tam_archivo); + printf("Tamaño de los archivos auxiliares: %lu bytes\n", + s.tam_archivos_aux); + printf("Tamaño de la información de control en el .dat: %lu bytes\n", + s.tam_info_control_dat); + printf("Total de espacio libre: %lu bytes\n", s.total_fs); + printf("Máximo espacio libre en bloque: %lu bytes\n", s.max_fs); + printf("Mínimo espacio libre en bloque: %lu bytes\n", s.min_fs); + printf("Media del espacio libre por bloque: %lu bytes\n", s.media_fs); + printf("Cantidad de registros: %lu\n", s.cant_registros); + printf("Cantidad de bloques: %lu\n", s.cant_bloques); + return 0; +} + +int emufs_agregar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO tipo, INDICE_TIPO_DATO tipo_dato, unsigned int offset, unsigned int tam_bloque) +{ + INDICE *tmp; + int error=0; + + /* Verifico que no existe un indice con el mismo nombre */ + /* y que no exista un indice primario */ + PERR("Agregando indice"); + tmp = emu->indices; + while (tmp) { + if (strcmp(tmp->nombre, nombre)==0) { + error = 1; + break; + } + if ((funcion == IND_PRIMARIO) && (tmp->funcion == funcion)) { + error = 2; + break; + } + } + + if (tmp != NULL) { + switch (error) { + case 1: + PERR("Ya existe un indice con el mismo nombre!"); + break; + case 2: + PERR("EMUFS ya tiene indice primario!!"); + } + return 0; + } + + /* Creo el nuevo indice */ + PERR("Creando indice\n"); + tmp = emufs_indice_crear(emu, nombre, funcion, tipo, tipo_dato, offset, tam_bloque); + + if (tmp == NULL) return 0; + + if (emu->indices==NULL) + emu->indices = tmp; + else { + tmp->sig = emu->indices; + emu->indices = tmp; + } + return 1; +} + +INDICE_DATO *emufs_buscar_registros(EMUFS *emu, char *indice, CLAVE clave, int *cant) +{ + INDICE *tmp; + tmp = emu->indices; + while (tmp) { + if (strcmp(tmp->nombre, indice) == 0) break; + } + + if (tmp == NULL) { + PERR("NO EXISTE EL INDICE"); + cant = 0; + return NULL; + } + + return tmp->buscar_entradas(tmp, clave, cant); +} +