saco todos los parametros de tamaño de registro de las funciones porque ahora viene...

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

diff --git a/emufs/emufs.c b/emufs/emufs.c
index 9934374ee5b64c039a75540aa4d9dc4ecfb5f267..b67ffaa5f1be9459d4b7be61f1f487a42034bb6d 100644 (file)
--- a/emufs/emufs.c
+++ b/emufs/emufs.c
@@ -39,13 +39,16 @@
  */
 
 #include "emufs.h"
  */
 
 #include "emufs.h"

+#include "tipo1.h"
+#include "tipo2.h"

 #include "tipo3.h"
 #include "tipo3.h"

-
-/* Defino las extenciones que usan cada tipo de archivo */
-#define EXT_TIPO3_DATA ".dat"
+#include "did.h"
+#include "fsc.h"
+#include "idx.h"

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

+/* Duplica una cadena de caracteres y devuelve la copia.  */

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


@@ -55,110 +58,192 @@ char *str_dup(const char *s)
        return tmp;
 }
 
        return tmp;
 }
 

+/* Objetivo: Crea un archivo de nombre y extension dadas. */
+int emufs_crear_archivo_auxiliar(const char* name, const char* ext)
+{
+       FILE* f;
+       char* filename;
+
+       filename = (char*) malloc(sizeof(char) * (strlen(name) + strlen(ext) + 1));
+       if (filename == NULL) {
+               /* TODO Manejo de errores */
+               return -1;
+       }
+       strcpy(filename, name);
+       strcat(filename, ext);
+       f = fopen(filename, "w");
+       free(filename);
+       if (f == NULL) {
+               /* TODO Manejo de errores */
+               return -1;
+       }
+       fclose(f);
+       return 0;
+}

 
 

-EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, unsigned int tam_reg)
+/* 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)

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

-       EMUFS *tmp = (EMUFS *)malloc(sizeof(EMUFS));
+       EMUFS *efs;
+
+       /* 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 (efs == NULL) {
+               return NULL;
+       }
+       efs->tipo = tipo;
+       efs->tam_bloque = tam_bloque;
+       efs->tam_reg = tam_reg;
+       efs->nombre = str_dup(filename);
+
+       /* Abre archivo de datos. */
+       strcpy(name, filename);
+       strcat(name, ".dat");
+       fp = fopen(name, "w");
+       if (fp == NULL) {
+               /* TODO ERROR */
+               free(efs->nombre);
+               free(efs);
+               return NULL;
+       }
+
+       /* Guarda cabecera común. */
+       fwrite(&tipo, sizeof(EMUFS_TYPE), 1, fp);
+
+       /* Crea archivo de índice. */
+       if (emufs_idx_crear(efs)) {
+               /* TODO ERROR */
+               free(efs->nombre);
+               free(efs);
+               return NULL;
+       }

 
 

+       /* Crea archivo de control de espacio libre. */
+       if (emufs_fsc_crear(efs)) {
+               /* TODO ERROR */
+               free(efs->nombre);
+               free(efs);
+               return NULL;
+       }
+
+       /* Crea archivo de identificadores borrados (recuperables). */
+       if (emufs_did_crear(efs)) {
+               /* TODO ERROR */
+               free(efs->nombre);
+               free(efs);
+               return NULL;
+       }
+
+       /* Termina de realizar el trabajo según el tipo de archivo. */

        switch (tipo) {
        switch (tipo) {

+

                case T1:
                case T1:

-               break;
+                       emufs_tipo1_inicializar(efs);
+
+                       /* Guarda cabeceras propias. */
+                       fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
+
+                       break;
+

                case T2:
                case T2:

-               break;
+                       /* 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;*/                                         
+                       break;
+

                case T3:
                case T3:

-                       tmp->tipo = T3;
-                       tmp->tam_bloque = tam_bloque;
-                       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);
-
-                       strcpy(name, filename);
-                       strcat(name, EXT_TIPO3_DATA);
-                       fp = fopen(name, "w");
-                       if (fp == NULL) {
-                               /* ERROR */
-                               free(tmp->nombre);
-                               free(tmp);
-                               return NULL;
-                       }
-                       /* Guardo el Header */
-                       fwrite(&tipo, sizeof(char), 1, fp);
-                       fwrite(&tam_bloque, sizeof(unsigned int), 1, fp);
-                       fwrite(&tam_reg, sizeof(unsigned int), 1, fp);
-                       fclose(fp);
-                       
-                       strcpy(name, filename);
-                       strcat(name, EXT_TIPO3_ID);
-                       fp = fopen(name, "w");
-                       fclose(fp);
-
-                       strcpy(name, filename);
-                       strcat(name, EXT_TIPO3_DISP);
-                       fp = fopen(name, "w");
-                       fclose(fp);
-
-                       strcpy(name, filename);
-                       strcat(name, EXT_TIPO3_IDS);
-                       fp = fopen(name, "w");
-                       fclose(fp);
-
-               break;
-               default:
-                       free(tmp);
-                       return NULL;
+                       /* Asigna punteros a funciones. */
+                       efs->leer_bloque     = emufs_tipo3_leer_bloque;
+                       efs->leer_registro   = emufs_tipo3_leer_registro;
+                       efs->grabar_registro = emufs_tipo3_grabar_registro;
+                       /*efs->borrar_registro = emufs_tipo3_borrar_registro;*/
+
+                       /* Guarda cabeceras propias. */
+                       fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
+                       fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);                        
+                       break;
+

        }
 
        }
 

-       return tmp;
+       fclose(fp);
+       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 *emufs_abrir(const char *filename)
 {

-       EMUFS *tmp;
+       EMUFS *efs;

        char name[255];
        char tipo;
        FILE *fp;
 
        strcpy(name, filename);
        char name[255];
        char tipo;
        FILE *fp;
 
        strcpy(name, filename);

-       strcat(name, EXT_TIPO3_DATA);
+       strcat(name, ".dat");

 
        /* 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_TYPE), 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;
+                       emufs_tipo1_inicializar(efs);
+                       /* Lee cabeceras propias. */
+                       if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) {
+                               free(efs->nombre);
+                               free(efs);
+                               fclose(fp);
+                               return NULL;
+                       }
+                       break;

                case T2:
                case T2:

-               break;
+                       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;
+                       }                       
+                       efs->leer_bloque = emufs_tipo3_leer_bloque;
+                       efs->leer_registro = emufs_tipo3_leer_registro;
+                       efs->grabar_registro = emufs_tipo3_grabar_registro;
+                       /*efs->borrar_registro = emufs_tipo3_borrar_registro;*/
+                       break;

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

-       return tmp;
+       return efs;

 }
 
 }
 

+/* Objetivo: Rutina llamada al destruir la aplicacion para librerar  */

 int emufs_destruir(EMUFS *e)
 {
        if (e == NULL) return 1;
 int emufs_destruir(EMUFS *e)
 {
        if (e == NULL) return 1;


@@ -167,10 +252,11 @@ int emufs_destruir(EMUFS *e)
        return 0;
 }
 
        return 0;
 }
 

+/* Visualiza espacios libres de un archivo?? */

 int ver_archivo_FS(EMUFS *emu)
 {
        FILE *f_block_free;
 int ver_archivo_FS(EMUFS *emu)
 {
        FILE *f_block_free;

-       BLOCK_FREE_T reg;
+       EMUFS_FSC reg;

        char name_f_block_free[255];
        
        strcpy(name_f_block_free,emu->nombre);
        char name_f_block_free[255];
        
        strcpy(name_f_block_free,emu->nombre);


@@ -182,22 +268,23 @@ int ver_archivo_FS(EMUFS *emu)
        }
        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);
+               printf(" Bloque = %li   Espacio libre = %li\n",reg.n_Marker, reg.n_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");

        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");
        {

-               BLOCK_REG_T r;
+               EMUFS_IDX r;

                f_block_free = fopen(name_f_block_free, "r");
                f_block_free = fopen(name_f_block_free, "r");

-               fread(&r, sizeof(BLOCK_REG_T), 1, f_block_free);
+               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(BLOCK_REG_T), 1, 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);

                }
                fclose(f_block_free);
        }
                }
                fclose(f_block_free);
        }