* 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 b55948967628b0699b7122cbc102bc6f3034bb19..a76974116286e2ef87a5ee299858db12722518ac 100644 (file)
--- a/tipo3/emufs.c
+++ b/tipo3/emufs.c
@@ -6,6 +6,8 @@
 #define EXT_TIPO3_ID ".id3"
 #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)
 {
@@ -50,6 +52,26 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, uns
                        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);
+                       
+                       strcpy(name, filename);
+                       strcat(name, EXT_TIPO3_EXTRA);
+                       fp = fopen(name, "w");
+                       fclose(fp);
                break;
                default:
                        free(tmp);
@@ -59,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)
 {