]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - emufs/emufs.c
* BUGFIX : procesar_guardar_factura grababa mal
[z.facultad/75.06/emufs.git] / emufs / emufs.c
index de97f219409fa58d5596ea5d4f322f929bd481b7..ebd43371950763cf1a5a61f5c358c5dbbf09dbc6 100644 (file)
@@ -48,7 +48,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 +57,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 +79,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)) {
@@ -116,7 +113,7 @@ 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)) {
@@ -146,7 +143,13 @@ 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))) {
+                               PERR("No se pudo inicializar el EMUFS de tipo1");
+                               free(efs->nombre);
+                               free(efs);
+                               return NULL;
+                       }
 
                        /* Guarda cabeceras propias. */
                        fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
@@ -155,19 +158,19 @@ 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->leer_estadisticas = emufs_tipo3_leer_estadisticas;
+                       efs->modificar_registro = emufs_tipo3_modificar_registro;
+                       efs->compactar = emufs_tipo3_compactar;
                        /* Guarda cabeceras propias. */
                        fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
                        fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);                        
@@ -179,13 +182,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 +196,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 +212,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 +222,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 +242,15 @@ 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;
                        break;
        }
 
@@ -243,7 +258,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 +266,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 +276,31 @@ 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(&reg,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(&reg,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;
 }