]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - emufs/tipo2.c
* Modificacion parcial (porque no graba) de Facturas.
[z.facultad/75.06/emufs.git] / emufs / tipo2.c
index bf59bf0febc34250a5a5d0a8ca2f5904280be860..e1bdf868cfd85493293ce8832e4ae4e728034aca 100644 (file)
  *
  */
 
-/***************************************************************/
-/* Implementación del Tipo Archivo 2: Registros Variables, Sin */
-/* Bloques at all.                                             */
-/***************************************************************/
+/** \file
+ * Archivo con registros de longitud variable, sin bloques.
+ *
+ * <b>Implementacion del Archivo Tipo 2</b>
+ *
+ * La organizacion interna de un archivo de tipo 2, presenta registros de longitud variable,
+ * los cuales son grabados secuencialmente, o bien en gaps (espacios libres) que se presenten en
+ * el archivo de datos, pero no se encuentran contenidos por bloques.
+ *
+ */
 
 #include "tipo2.h"
 #include "idx.h"
@@ -42,21 +48,14 @@ int emufs_tipo2_inicializar(EMUFS* efs)
        efs->grabar_registro = emufs_tipo2_grabar_registro;           
     efs->borrar_registro = emufs_tipo2_borrar_registro;
        efs->leer_registro = emufs_tipo2_leer_registro;
+       efs->modificar_registro = emufs_tipo2_modificar_registro;
+       efs->leer_estadisticas = emufs_tipo2_leer_estadisticas;
        
        return 0;
 }
 
-/**********************************************************************/
-/* void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID reg_id,   */
-/*                     EMUFS_REG_SIZE* reg_size, int *err)                        */
-/* Objetivo: Lee un registro de un archivo del Tipo 2.                */
-/* Parametros: EMUFS *efs // Struct con handlers + info del openfile. */
-/*             EMUFS_REG_ID reg_id // Id del registro a cargar        */
-/*             EMUFS_REG_SIZE *reg_size // Size del reg en cuestion   */
-/*             int *err // Indicador de errores                       */
-/**********************************************************************/
-void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID reg_id,
-                       EMUFS_REG_SIZE* reg_size, int *err)
+/* 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)
 {
        FILE* f_data;
        char *registro; /* registro a leer */
@@ -67,7 +66,7 @@ void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID reg_id,
        strcat(name_f,".dat");
 
        /* Obtenemos la posicion del registro en el .dat */
-       reg_offset = emufs_idx_buscar_registro(efs, reg_id);
+       reg_offset = emufs_idx_buscar_registro(efs, id_reg);
        if (reg_offset == EMUFS_NOT_FOUND) {
                /* TODO Manejo de errores */
                PERR("Registro no encontrado");
@@ -90,14 +89,7 @@ void *emufs_tipo2_leer_registro(EMUFS* efs, EMUFS_REG_ID reg_id,
        return registro;
 }
 
-/**********************************************************************/
-/* EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr,    */
-/*                                 EMUFS_REG_SIZE n_RegSize)          */
-/* Objetivo: Grabar un registro en un archivo del Tipo 2.             */
-/* Parametros: EMUFS *efs // Struct con handlers + info del openfile. */
-/*             void *ptr // Puntero al buffer (registro) a guardar    */
-/*             EMUFS_REG_SIZE n_RegSize // Size del reg en cuestion   */
-/**********************************************************************/
+/* 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)
 {
        EMUFS_REG_ID id_reg;
@@ -163,13 +155,7 @@ EMUFS_REG_ID emufs_tipo2_grabar_registro(EMUFS *efs, void *ptr, EMUFS_REG_SIZE r
        return id_reg;
 }
 
-/**********************************************************************/
-/* int emufs_tipo2_borrar_registro(EMUFS *efs, EMUFS_REG_ID n_IdReg)  */
-/* Objetivo: Borra un registro determinado y actualiza los archivos   */
-/*           de Posicion Relativa (Indice-Offset) y el de Gaps        */
-/* Parametros: EMUFS *efs // Struct con handlers + info del openfile. */
-/*             EMUFS_REG_ID n_IdReg // Id del registro a eliminar.    */
-/**********************************************************************/
+/* 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)
 {      
        EMUFS_OFFSET reg_offset,reg_size;
@@ -198,14 +184,7 @@ int emufs_tipo2_borrar_registro(EMUFS *efs, EMUFS_REG_ID id_reg)
        return(0);
 }
 
-/**********************************************************************/
-/* int emufs_tipo2_get_regsize(EMUFS *efs, EMUFS_OFFSET n_RegPos,     */
-/*                             EMUFS_REG_SIZE *n_RegSize)             */
-/* Objetivo: Devuelve el tamanio de un registro, dado su init offset  */
-/* Parametros: EMUFS *efs // Struct con handlers + info del openfile. */
-/*             EMUFS_OFFSET n_RegPos // Offset al inicio del registro */
-/*             EMUFS_REG_SIZE *n_RegSize // Size to lookup and return */
-/**********************************************************************/
+/* Devuelve el tamanio de un registro, dado su init offset */
 int emufs_tipo2_get_regsize(EMUFS *efs, EMUFS_OFFSET reg_pos, EMUFS_REG_SIZE *reg_size)
 {
     FILE *f_data;
@@ -223,15 +202,8 @@ int emufs_tipo2_get_regsize(EMUFS *efs, EMUFS_OFFSET reg_pos, EMUFS_REG_SIZE *re
        return (0);
 }
 
-/**********************************************************************/
-/* int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET n_RegPos,       */
-/*                           EMUFS_REG_SIZE n_Amount                  */
-/* Objetivo: Pisa con basura lo que es hasta el momento un reg en     */
-/*           el disco para indicar su borrado (Debug Purposes Only).  */
-/* Parametros: EMUFS *efs // Struct con handlers + info del openfile. */
-/*             EMUFS_OFFSET n_RegPos // Offset al inicio del registro */
-/*             EMUFS_REG_SIZE *n_Amount // Size to lookup and return  */
-/**********************************************************************/
+
+/* Pisa con basura lo que es hasta el momento un reg en el disco para indicar su borrado (Debug Purposes Only) */
 int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET reg_pos, EMUFS_REG_SIZE amount)
 {
     FILE *f_data;
@@ -258,3 +230,75 @@ int emufs_tipo2_dummyfill(EMUFS *efs, EMUFS_OFFSET reg_pos, EMUFS_REG_SIZE amoun
        free(dummyfill);
        return (0);
 }
+
+/* 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_tipo2_borrar_registro(efs, id);
+       return emufs_tipo2_grabar_registro(efs, data, size, error);
+}
+
+/* Recompila y devuelve ciertas estadisticas del archivo indicado */
+EMUFS_Estadisticas emufs_tipo2_leer_estadisticas(EMUFS *efs)
+{
+    EMUFS_Estadisticas stats;
+       EMUFS_REG_ID *tmp;
+       unsigned long fsc_size = 0,idx_size = 0;
+       char name_f[255];
+       FILE *file;
+
+       strcpy(name_f,efs->nombre);
+       strcat(name_f,".dat");
+       
+       /* Inicializo las stats por si hay error somewhere */
+       stats.tam_archivo = 0;
+       stats.tam_archivo_bytes = 0;
+       stats.info_control = 0;
+       stats.media_fs = 0;
+       stats.total_fs = 0;
+       stats.max_fs = 0;
+       stats.min_fs = 0;
+       stats.cant_bloques = 0;
+       
+       /* Obtengo las stats de FSC */
+       stats.total_fs = emufs_fsc_get_total_fs(efs);
+       stats.media_fs = emufs_fsc_get_media_fs(efs);
+       emufs_fsc_get_max_min_fs(efs,&stats.min_fs,&stats.max_fs);
+       
+       /* Cant registros */
+       tmp = emufs_idx_get(efs,&stats.tam_archivo);
+       free(tmp);
+       
+       /* Size del archivo de datos */
+       if ( (file = fopen(name_f,"ab")) == NULL){
+                       PERR("No se pudo abrir el archivo");
+                       return stats;   
+       }
+       stats.tam_archivo_bytes = ftell(file);
+       fclose(file);
+
+       /* Size del archivo de Espacio Libre */ 
+       strcpy(name_f,efs->nombre);
+       strcat(name_f,EMUFS_FSC_EXT);
+       if ( (file = fopen(name_f,"ab")) == NULL){
+           PERR("No se pudo abrir el archivo");
+               return stats;   
+       }
+       fsc_size = ftell(file);
+       fclose(file);
+       
+       /* Size del archivo Indice */   
+       strcpy(name_f,efs->nombre);
+       strcat(name_f,EMUFS_IDX_EXT);
+       if ( (file = fopen(name_f,"ab")) == NULL){
+           PERR("No se pudo abrir el archivo");
+               return stats;   
+       }
+       idx_size = ftell(file);
+       fclose(file);
+       
+       /* Cantidad de Bytes en info de control */
+       stats.info_control = idx_size + fsc_size + sizeof(EMUFS_REG_ID)*stats.tam_archivo + sizeof(EMUFS_REG_SIZE)*stats.tam_archivo + sizeof(EMUFS_Tipo);
+       
+       return(stats);  
+}