* BUGFIX : le pifie a una constante al generar los registros!

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

diff --git a/tipo3/emufs.c b/tipo3/emufs.c
index a06ad13015063c9a2c0318a624e447e6f6d46760..a76974116286e2ef87a5ee299858db12722518ac 100644 (file)
--- a/tipo3/emufs.c
+++ b/tipo3/emufs.c
@@ -7,6 +7,7 @@
 #define EXT_TIPO3_DATA ".dat"
 #define EXT_TIPO3_DISP ".fsc"
 #define EXT_TIPO3_IDS ".idc"
+#define EXT_TIPO3_EXTRA ".ids"
 
 char *str_dup(const char *s)
 {
@@ -66,6 +67,11 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, uns
                        strcat(name, EXT_TIPO3_IDS);
                        fp = fopen(name, "w");
                        fclose(fp);
+                       
+                       strcpy(name, filename);
+                       strcat(name, EXT_TIPO3_EXTRA);
+                       fp = fopen(name, "w");
+                       fclose(fp);
                break;
                default:
                        free(tmp);
@@ -75,6 +81,44 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, uns
        return tmp;
 }
 
+EMUFS *emufs_abrir(const char *filename)
+{
+       EMUFS *tmp;
+       char name[255];
+       char tipo;
+       FILE *fp;
+
+       strcpy(name, filename);
+       strcat(name, EXT_TIPO3_DATA);
+       fp = fopen(name, "r");
+       if (fp == NULL) return NULL;
+       fread(&tipo, sizeof(char), 1, fp);
+       if ((tipo < 0) || (tipo > 2)) {
+               fclose(fp);
+               return NULL;
+       }
+       
+       tmp = (EMUFS *)malloc(sizeof(EMUFS));
+       if (tmp == NULL) return NULL;
+
+       switch (tipo) {
+               case T1:
+               break;
+               case T2:
+               break;
+               case T3:
+                       tmp->tipo = tipo;
+                       fread(&tmp->tam_bloque, sizeof(int), 1, fp);
+                       tmp->leer_bloque = leer_bloque;
+                       tmp->leer_registro = leer_registro;
+                       tmp->grabar_registro = grabar_registro;
+                       tmp->borrar_registro = NULL;
+                       tmp->nombre = str_dup(filename);
+       }
+
+       fclose(fp);
+       return tmp;
+}
 
 int emufs_destruir(EMUFS *e)
 {