* Agrego funciones para castear los tipos de datos los widgets

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

diff --git a/tipo3/emufs.c b/tipo3/emufs.c
index 0cdd43df30ce34591aaadcc5299b9132ca7a6cbc..53ba5055c9923cd81e8986ef67513d7e25adce06 100644 (file)
--- a/tipo3/emufs.c
+++ b/tipo3/emufs.c
@@ -5,12 +5,15 @@
 #define EXT_TIPO3_ID ".idx"
 #define EXT_TIPO3_DATA ".dat"
 #define EXT_TIPO3_DISP ".fsc"
-#define EXT_TIPO3_IDS ".ids"
+#define EXT_TIPO3_IDS ".did"
+
+char *str_dup(const char *s);
 
 char *str_dup(const char *s)
 {
+       char *tmp;
        if (s == NULL) return NULL;
-       char *tmp = (char *)malloc(sizeof(char)*(strlen(s)+1));
+       tmp = (char *)malloc(sizeof(char)*(strlen(s)+1));
        strcpy(tmp, s);
        return tmp;
 }
@@ -33,7 +36,7 @@ EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, uns
                        tmp->leer_bloque = leer_bloque;
                        tmp->leer_registro = leer_registro;
                        tmp->grabar_registro = grabar_registro;
-                       tmp->borrar_registro = NULL;
+                       tmp->borrar_registro = borrar_registro;
                        tmp->nombre = str_dup(filename);
 
                        strcpy(name, filename);
@@ -84,6 +87,8 @@ EMUFS *emufs_abrir(const char *filename)
 
        strcpy(name, filename);
        strcat(name, EXT_TIPO3_DATA);
+
+       /* Trato de determinar el tipo de archivo */
        fp = fopen(name, "r");
        if (fp == NULL) return NULL;
        fread(&tipo, sizeof(char), 1, fp);
@@ -93,7 +98,10 @@ EMUFS *emufs_abrir(const char *filename)
        }
        
        tmp = (EMUFS *)malloc(sizeof(EMUFS));
-       if (tmp == NULL) return NULL;
+       if (tmp == NULL) {
+               fclose(fp);
+               return NULL;
+       }
 
        switch (tipo) {
                case T1:
@@ -106,7 +114,7 @@ EMUFS *emufs_abrir(const char *filename)
                        tmp->leer_bloque = leer_bloque;
                        tmp->leer_registro = leer_registro;
                        tmp->grabar_registro = grabar_registro;
-                       tmp->borrar_registro = NULL;
+                       tmp->borrar_registro = borrar_registro;
                        tmp->nombre = str_dup(filename);
        }