]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - emufs/emufs.c
paso el test, inserta una clave ordenada en un nodo
[z.facultad/75.06/emufs.git] / emufs / emufs.c
index 7d0d87f4f49843b5ee3fdd6b2ca26216567140af..76260ac5531f3b434e1838147294c0001122c067 100644 (file)
@@ -39,6 +39,7 @@
  */
 
 #include "emufs.h"
+#include "common.h"
 #include "tipo1.h"
 #include "tipo2.h"
 #include "tipo3.h"
@@ -84,6 +85,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
        char name[255];
        FILE *fp;
        EMUFS *efs;
+       int err = 0;
 
        /* Si no es un tipo conocido, sale. */
        if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
@@ -99,6 +101,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
        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);
@@ -117,6 +120,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
        /* Crea archivo de índice. */
        if (emufs_idx_crear(efs)) {
                /* TODO ERROR */
+               fclose(fp);
                free(efs->nombre);
                free(efs);
                return NULL;
@@ -125,6 +129,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
        /* Crea archivo de control de espacio libre. */
        if (emufs_fsc_crear(efs)) {
                /* TODO ERROR */
+               fclose(fp);
                free(efs->nombre);
                free(efs);
                return NULL;
@@ -133,6 +138,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
        /* Crea archivo de identificadores borrados (recuperables). */
        if (emufs_did_crear(efs)) {
                /* TODO ERROR */
+               fclose(fp);
                free(efs->nombre);
                free(efs);
                return NULL;
@@ -143,10 +149,14 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
 
                case T1:
                        /* Asigna punteros a funciones. */
-                       /* TODO verificar que el tamaño de bloque sea como mínimo del
-                        * tamaño de la cabecera de un registro + N */
-                       fprintf(stderr, "tambloque = %d\n", efs->tam_bloque);
-                       emufs_tipo1_inicializar(efs);
+                       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);
@@ -168,6 +178,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
                        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);                        
@@ -185,6 +196,7 @@ EMUFS *emufs_abrir(const char *filename)
        char name[255];
        char tipo;
        FILE *fp;
+       int err = 0;
 
        strcpy(name, filename);
        strcat(name, ".dat");
@@ -219,7 +231,11 @@ EMUFS *emufs_abrir(const char *filename)
                                return NULL;
                        }
                        /* Asigna punteros a funciones. */
-                       emufs_tipo1_inicializar(efs);
+                       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. */
@@ -243,6 +259,7 @@ EMUFS *emufs_abrir(const char *filename)
                        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;
        }
 
@@ -296,3 +313,95 @@ int ver_archivo_FS(EMUFS *emu)
        
        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);
+}
+