Se agrega una razon más para elegir algoritmo de external sort.

[z.facultad/75.06/emufs.git] / emufs / emufs.c

diff --git a/emufs/emufs.c b/emufs/emufs.c
index 4b78a7dfa239fb32f2a94f91699c9da1e3a3e467..3adab5e630eb4842eab88767ca70d2fa1cef5e5f 100644 (file)
--- a/emufs/emufs.c
+++ b/emufs/emufs.c
@@ -54,9 +54,11 @@ typedef struct _data_indices_ {
        INDICE_TIPO_DATO tipo_dato;
        unsigned int offset;
        unsigned int tam_bloque;
        INDICE_TIPO_DATO tipo_dato;
        unsigned int offset;
        unsigned int tam_bloque;

+       int str_offset;

 } t_Indice;
 
 } t_Indice;
 

-int guardar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO tipo, INDICE_TIPO_DATO tipo_dato,  unsigned int offset, unsigned int tam_bloque);
+int guardar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO tipo, INDICE_TIPO_DATO tipo_dato,  unsigned int offset, unsigned int tam_bloque, int str_offset);
+int cargar_indices(EMUFS *emu);

 
 char *str_dup(const char *s);
 
 
 char *str_dup(const char *s);
 


@@ -99,7 +101,7 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
        int err = 0;
 
        /* Si no es un tipo conocido, sale. */
        int err = 0;
 
        /* Si no es un tipo conocido, sale. */

-       if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
+       if ((tipo != T1) && (tipo != T2) && (tipo != T3) && (tipo != T4) && (tipo != T5)) {

                return NULL;
        }
 
                return NULL;
        }
 


@@ -191,20 +193,47 @@ EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_b
 
                case T3:
                        /* Asigna punteros a funciones. */
 
                case T3:
                        /* Asigna punteros a funciones. */

-                       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->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;
+                       if ((err = emufs_tipo3_inicializar(efs))) {
+                               /* TODO ERROR */
+                               PERR("No se pudo inicializar el EMUFS de tipo3");
+                               fclose(fp);
+                               free(efs->nombre);
+                               free(efs);
+                               return NULL;
+                       }

                        /* Guarda cabeceras propias. */
                        fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
                        fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);                        
                        break;
                        /* Guarda cabeceras propias. */
                        fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
                        fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);                        
                        break;

-
+               
+               case T4:
+                       /* Asigna punteros a funciones. */
+                       if ((err = emufs_tipo4_inicializar(efs))) {
+                               /* TODO ERROR */
+                               PERR("No se pudo inicializar el EMUFS de tipo4");
+                               fclose(fp);
+                               free(efs->nombre);
+                               free(efs);
+                               return NULL;
+                       }
+                       /* Guarda cabeceras propias. */
+                       fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
+                       break;
+               
+               case T5:
+                       /* Asigna punteros a funciones. */
+                       if ((err = emufs_tipo5_inicializar(efs))) {
+                               /* TODO ERROR */
+                               PERR("No se pudo inicializar el EMUFS de tipo5");
+                               fclose(fp);
+                               free(efs->nombre);
+                               free(efs);
+                               return NULL;
+                       }
+                       /* Guarda cabeceras propias. */                 
+                       fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
+                       fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);                        
+                       break;

        }
 
        fclose(fp);
        }
 
        fclose(fp);


@@ -228,7 +257,7 @@ EMUFS *emufs_abrir(const char *filename)
        fread(&tipo, sizeof(EMUFS_Tipo), 1, fp);
 
        /* Si no es un tipo conocido, sale. */
        fread(&tipo, sizeof(EMUFS_Tipo), 1, fp);
 
        /* Si no es un tipo conocido, sale. */

-       if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
+       if ((tipo != T1) && (tipo != T2) && (tipo != T3) && (tipo != T4) && (tipo != T5)) {

                fclose(fp);
                return NULL;
        }
                fclose(fp);
                return NULL;
        }


@@ -246,6 +275,7 @@ EMUFS *emufs_abrir(const char *filename)
                case T1:
                        /* Lee cabeceras propias. */
                        if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) {
                case T1:
                        /* Lee cabeceras propias. */
                        if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) {

+                               PERR("ERROR Tipo1 no se pudo leer cabecera");

                                free(efs->nombre);
                                free(efs);
                                fclose(fp);
                                free(efs->nombre);
                                free(efs);
                                fclose(fp);


@@ -266,24 +296,44 @@ EMUFS *emufs_abrir(const char *filename)
                        if ((!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) ||
                           (!fread(&(efs->tam_reg), sizeof(EMUFS_REG_SIZE), 1, fp)))
                                {
                        if ((!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) ||
                           (!fread(&(efs->tam_reg), sizeof(EMUFS_REG_SIZE), 1, fp)))
                                {

+                               PERR("ERROR Tipo3 no se pudo leer header");

                                free(efs->nombre);
                                free(efs);
                                fclose(fp);
                                return NULL;
                        }                       
                        /* Asigna punteros a funciones. */                      
                                free(efs->nombre);
                                free(efs);
                                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->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;
+                       emufs_tipo3_inicializar(efs);
+                       break;
+       
+               case T4:
+                       /* Lee cabeceras propias. */
+                       if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) {
+                               free(efs->nombre);
+                               free(efs);
+                               fclose(fp);
+                               return NULL;
+                       }
+                       emufs_tipo4_inicializar(efs);

                        break;
                        break;

-       }

 
 

+               case T5:
+                       if ((!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) ||
+                          (!fread(&(efs->tam_reg), sizeof(EMUFS_REG_SIZE), 1, fp)))
+                               {
+                               free(efs->nombre);
+                               free(efs);
+                               fclose(fp);
+                               return NULL;
+                       }                       
+                       /* Asigna punteros a funciones. */
+                       emufs_tipo5_inicializar(efs);
+               default:
+                       PERR("EMUFS TIPO NO SOPORTADO");
+       }       
+
+       /* finalmente cargo la data de los indices */
+       cargar_indices(efs);

        fclose(fp);
        return efs;
 }
        fclose(fp);
        return efs;
 }


@@ -299,7 +349,7 @@ int emufs_destruir(EMUFS *e)
        while (cur) {
                del = cur;
                cur = cur->sig;
        while (cur) {
                del = cur;
                cur = cur->sig;

-               emufs_indice_destruir(e, cur);
+               emufs_indice_destruir(e, del);

        }
 
        free(e->nombre);
        }
 
        free(e->nombre);


@@ -374,7 +424,7 @@ int debug_ver_estadisticas(EMUFS* efs)
        return 0;
 }
 
        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)
+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, int str_offset)

 {
        INDICE *tmp;
        int error=0;
 {
        INDICE *tmp;
        int error=0;


@@ -408,16 +458,17 @@ int emufs_agregar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDIC
 
        /* Creo el nuevo indice */
        PERR("Creando indice\n");
 
        /* Creo el nuevo indice */
        PERR("Creando indice\n");

-       tmp = emufs_indice_crear(emu, nombre, funcion, tipo, tipo_dato, offset, tam_bloque);
+       tmp = emufs_indice_crear(emu, nombre, funcion, tipo, tipo_dato, offset, tam_bloque, str_offset);

 
        /* Guardo la info del indice para poder abrir despues el archivo */
 
        /* Guardo la info del indice para poder abrir despues el archivo */

-       guardar_indice(emu, nombre, funcion, tipo, tipo_dato, offset, tam_bloque);
+       guardar_indice(emu, nombre, funcion, tipo, tipo_dato, offset, tam_bloque, str_offset);

 
        if (tmp == NULL) {
                PERR("NO SE PUDO CREAR INDICE!!!");
                return 0;
        }
 
 
        if (tmp == NULL) {
                PERR("NO SE PUDO CREAR INDICE!!!");
                return 0;
        }
 

+       tmp->sig = NULL;

        if (emu->indices==NULL)
                emu->indices = tmp;
        else {
        if (emu->indices==NULL)
                emu->indices = tmp;
        else {


@@ -451,7 +502,7 @@ INDICE_DATO *emufs_buscar_registros(EMUFS *emu, char *indice, char *data, int *c
        return tmp->buscar_entradas(tmp, k, cant);
 }
 
        return tmp->buscar_entradas(tmp, k, cant);
 }
 

-int guardar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO tipo, INDICE_TIPO_DATO tipo_dato,  unsigned int offset, unsigned int tam_bloque)
+int guardar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO tipo, INDICE_TIPO_DATO tipo_dato,  unsigned int offset, unsigned int tam_bloque, int str_offset)

 {
        char filename[100];
        FILE *fp;
 {
        char filename[100];
        FILE *fp;


@@ -477,6 +528,7 @@ int guardar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO
        indices[cant].tipo_dato = tipo_dato;
        indices[cant].offset = offset;
        indices[cant].tam_bloque = tam_bloque;
        indices[cant].tipo_dato = tipo_dato;
        indices[cant].offset = offset;
        indices[cant].tam_bloque = tam_bloque;

+       indices[cant].str_offset = str_offset;

 
        fseek(fp, SEEK_SET, 0);
        cant++;
 
        fseek(fp, SEEK_SET, 0);
        cant++;


@@ -487,6 +539,57 @@ int guardar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO
        return 1;
 }
 
        return 1;
 }
 

+int cargar_indices(EMUFS *emu)
+{
+       char filename[100];
+       FILE *fp;
+       int cant, i; /* cantidad de indices hasta el momento */
+       t_Indice *indices;
+
+       sprintf(filename, "%s.info", emu->nombre);
+       fp = fopen(filename, "r");
+       PERR("Abri info");
+       PERR(filename);
+       if (fp == NULL) {
+               PERR("No se pudo");
+               return 0;
+       }
+
+       emu->indices = NULL;
+       fread(&cant, 1, sizeof(int), fp);
+       if (cant == 0) {
+               PERR("NO HAY INDICES EN ESTE ARCHIVO");
+               return 1;
+       }
+       indices = malloc(cant*sizeof(t_Indice));
+       fread(indices, cant, sizeof(t_Indice), fp);
+       fclose(fp);
+       
+       /* Leo  */
+       for(i=0; i<cant; i++) {
+               INDICE *tmp;
+               tmp = emufs_indice_abrir(emu,
+                               indices[i].nombre,
+                               indices[i].funcion,
+                               indices[i].tipo,
+                               indices[i].tipo_dato,
+                               indices[i].offset,
+                               indices[i].tam_bloque,
+                               indices[i].str_offset
+                       );
+               PERR(indices[i].nombre);
+               if (emu->indices==NULL)
+                       emu->indices = tmp;
+               else {
+                       tmp->sig = emu->indices;
+                       emu->indices = tmp;
+               }
+       }
+       
+       free(indices);
+       return 1;
+}
+

 /*crea un bloque y devuelve en numero del mismo*/
 EMUFS_BLOCK_ID emufs_create_new_block(EMUFS *emu)
 {
 /*crea un bloque y devuelve en numero del mismo*/
 EMUFS_BLOCK_ID emufs_create_new_block(EMUFS *emu)
 {


@@ -507,14 +610,12 @@ EMUFS_BLOCK_ID emufs_create_new_block(EMUFS *emu)
        dummy = (char*)malloc(emu->tam_bloque);
        memset(dummy, 0, emu->tam_bloque);
        fwrite(dummy, emu->tam_bloque, 1, fp);
        dummy = (char*)malloc(emu->tam_bloque);
        memset(dummy, 0, emu->tam_bloque);
        fwrite(dummy, emu->tam_bloque, 1, fp);

-<<<<<<< .mine
-       fprintf(stderr, "new_block ftell = %ld\n", ftell(fp));
-=======
->>>>>>> .r552

        switch(emu->tipo){
        switch(emu->tipo){

-               case T1: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE))/emu->tam_bloque;
+               case T4: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE))/emu->tam_bloque;

                        break;
                        break;

-               case T3: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE)-sizeof(EMUFS_REG_SIZE))/emu->tam_bloque;
+               case T5: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE)-sizeof(EMUFS_REG_SIZE))/emu->tam_bloque;
+                       break;
+               default: num = 0;               

        }
        fclose(fp);
        free(dummy);
        }
        fclose(fp);
        free(dummy);


@@ -540,12 +641,13 @@ EMUFS_BLOCK_ID emufs_get_new_block_number(EMUFS *emu)
                return -1;
        }
        switch(emu->tipo){
                return -1;
        }
        switch(emu->tipo){

-               case T1: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE))/emu->tam_bloque;
+               case T4: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE))/emu->tam_bloque;

                        if (ftell(fp) ==  sizeof(EMUFS_Tipo)+sizeof(EMUFS_BLOCK_SIZE)) num = 0;
                        if (ftell(fp) ==  sizeof(EMUFS_Tipo)+sizeof(EMUFS_BLOCK_SIZE)) num = 0;

-                               PERR("PASE");

                        break;
                        break;

-               case T3: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE)-sizeof(EMUFS_REG_SIZE))/emu->tam_bloque;
+               case T5: num = (ftell(fp)-sizeof(EMUFS_Tipo)-sizeof(EMUFS_BLOCK_SIZE)-sizeof(EMUFS_REG_SIZE))/emu->tam_bloque;

                        if (ftell(fp) ==  sizeof(EMUFS_Tipo)+sizeof(EMUFS_BLOCK_SIZE)+sizeof(EMUFS_REG_SIZE)) num = 0;
                        if (ftell(fp) ==  sizeof(EMUFS_Tipo)+sizeof(EMUFS_BLOCK_SIZE)+sizeof(EMUFS_REG_SIZE)) num = 0;

+                       break;
+               default: num = 0;

        }
        fclose(fp);
        return num;
        }
        fclose(fp);
        return num;