Se agregan los correspondientes xxx_get_file_size().

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

diff --git a/emufs/emufs.c b/emufs/emufs.c
index a6a774c32dff5cb6aff9661a808a1075b2256ca9..9000fd652ec09c28f42680f9ebd377bf5adeda61 100644 (file)
--- a/emufs/emufs.c
+++ b/emufs/emufs.c
@@ -39,7 +39,9 @@
  */
 
 #include "emufs.h"
  */
 
 #include "emufs.h"

+#include "common.h"

 #include "tipo1.h"
 #include "tipo1.h"

+#include "tipo2.h"

 #include "tipo3.h"
 #include "did.h"
 #include "fsc.h"
 #include "tipo3.h"
 #include "did.h"
 #include "fsc.h"


@@ -78,22 +80,26 @@ int emufs_crear_archivo_auxiliar(const char* name, const char* ext)
        return 0;
 }
 
        return 0;
 }
 

-
-EMUFS *emufs_crear(const char *filename, char tipo, unsigned long tam_bloque, unsigned long 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;
 {
        char name[255];
        FILE *fp;
        EMUFS *efs;

+       int err = 0;

 
 

-       /* Si no es un tipo conocido, sale */
+       /* Si no es un tipo conocido, sale. */

        if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
                return NULL;
        }
 
        /* Inicializa parámetros comunes. */
        efs = (EMUFS*) malloc(sizeof(EMUFS));
        if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
                return NULL;
        }
 
        /* Inicializa parámetros comunes. */
        efs = (EMUFS*) malloc(sizeof(EMUFS));

+       if (efs == NULL) {
+               return NULL;
+       }

        efs->tipo = tipo;
        efs->tam_bloque = tam_bloque;
        efs->tipo = tipo;
        efs->tam_bloque = tam_bloque;

+       efs->tam_reg = tam_reg;

        efs->nombre = str_dup(filename);
 
        /* Abre archivo de datos. */
        efs->nombre = str_dup(filename);
 
        /* Abre archivo de datos. */


@@ -108,7 +114,7 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned long tam_bloque, un
        }
 
        /* Guarda cabecera común. */
        }
 
        /* Guarda cabecera común. */

-       fwrite(&tipo, sizeof(char), 1, fp); /* FIXME no debería ser sizeof(EMUFS_TYPE) ? */
+       fwrite(&tipo, sizeof(EMUFS_Tipo), 1, fp);

 
        /* Crea archivo de índice. */
        if (emufs_idx_crear(efs)) {
 
        /* Crea archivo de índice. */
        if (emufs_idx_crear(efs)) {


@@ -139,30 +145,38 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned long tam_bloque, un
 
                case T1:
                        /* Asigna punteros a funciones. */
 
                case T1:
                        /* Asigna punteros a funciones. */

-                       efs->leer_bloque     = emufs_tipo1_leer_bloque;
-                       efs->leer_registro   = emufs_tipo1_leer_registro;
-                       efs->grabar_registro = emufs_tipo1_grabar_registro;
-                       efs->borrar_registro = emufs_tipo1_borrar_registro;
+                       if ((err = emufs_tipo1_inicializar(efs))) {
+                               /* TODO ERROR */
+                               PERR("No se pudo inicializar el EMUFS de tipo1");
+                               free(efs->nombre);
+                               free(efs);
+                               return NULL;
+                       }

 
                        /* Guarda cabeceras propias. */
 
                        /* Guarda cabeceras propias. */

-                       fwrite(&tam_bloque, sizeof(unsigned long), 1, fp);
+                       fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);

 
                        break;
 
                case T2:
 
                        break;
 
                case T2:

+                       /* Asigna punteros a funciones. */
+                       emufs_tipo2_inicializar(efs);

                        break;
 
                case T3:
                        /* Asigna punteros a funciones. */
                        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->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;

                        /* Guarda cabeceras propias. */
                        /* Guarda cabeceras propias. */

-                       fwrite(&tam_bloque, sizeof(unsigned int), 1, fp);
-                       fwrite(&tam_reg, sizeof(unsigned int), 1, fp);
-                       
+                       fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
+                       fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);                        

                        break;
 
        }
                        break;
 
        }


@@ -173,10 +187,11 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned long tam_bloque, un
 
 EMUFS *emufs_abrir(const char *filename)
 {
 
 EMUFS *emufs_abrir(const char *filename)
 {

-       EMUFS *tmp;
+       EMUFS *efs;

        char name[255];
        char tipo;
        FILE *fp;
        char name[255];
        char tipo;
        FILE *fp;

+       int err = 0;

 
        strcpy(name, filename);
        strcat(name, ".dat");
 
        strcpy(name, filename);
        strcat(name, ".dat");


@@ -184,35 +199,67 @@ EMUFS *emufs_abrir(const char *filename)
        /* Trato de determinar el tipo de archivo */
        fp = fopen(name, "r");
        if (fp == NULL) return NULL;
        /* Trato de determinar el tipo de archivo */
        fp = fopen(name, "r");
        if (fp == NULL) return NULL;

-       fread(&tipo, sizeof(char), 1, fp);
-       if ((tipo < 0) || (tipo > 2)) {
+       fread(&tipo, sizeof(EMUFS_Tipo), 1, fp);
+
+       /* Si no es un tipo conocido, sale. */
+       if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {

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

-       tmp = (EMUFS *)malloc(sizeof(EMUFS));
-       if (tmp == NULL) {
+       /* Inicializa parámetros comunes. */
+       efs = (EMUFS*) malloc(sizeof(EMUFS));
+       if (efs == NULL) {

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

-
+       efs->tipo = tipo;
+       efs->nombre = str_dup(filename);
+       

        switch (tipo) {
                case T1:
        switch (tipo) {
                case T1:

-               break;
+                       /* Lee cabeceras propias. */
+                       if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) {
+                               free(efs->nombre);
+                               free(efs);
+                               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:
                case T2:

-               break;
+                       /* Asigna punteros a funciones. */
+                       emufs_tipo2_inicializar(efs);                   
+                       break;

                case T3:
                case T3:

-                       tmp->tipo = tipo;
-                       fread(&tmp->tam_bloque, sizeof(int), 1, fp);
-                       tmp->leer_bloque = emufs_tipo3_leer_bloque;
-                       tmp->leer_registro = emufs_tipo3_leer_registro;
-                       tmp->grabar_registro = emufs_tipo3_grabar_registro;
-                       tmp->borrar_registro = emufs_tipo3_borrar_registro;
-                       tmp->nombre = str_dup(filename);
+                       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. */                      
+                       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;
+                       break;

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

-       return tmp;
+       return efs;

 }
 
 int emufs_destruir(EMUFS *e)
 }
 
 int emufs_destruir(EMUFS *e)


@@ -233,32 +280,31 @@ int ver_archivo_FS(EMUFS *emu)
        strcat(name_f_block_free,".fsc");
 
        if ( (f_block_free = fopen(name_f_block_free,"r"))==NULL ){
        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;
        }
                return -1;
        }

+       fprintf(stderr,"BOQUES Y ESPACIO LIBRE\n");

        fread(&reg,sizeof(reg),1,f_block_free);
        while ( !feof(f_block_free) ){
        fread(&reg,sizeof(reg),1,f_block_free);
        while ( !feof(f_block_free) ){

-               printf(" Bloque = %d   Espacio libre = %d\n",reg.block, reg.free_space);
+               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 */
                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");
        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;
        {
                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)) {
                while (!feof(f_block_free)) {

-                       printf("ID %ld en bloque %d\n", r.id_reg, r.block);
-                       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;
 }
        
        return 0;
 }