* 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 a19ded7980b1b3803eff5129d12ffd4d8ae6b524..a76974116286e2ef87a5ee299858db12722518ac 100644 (file)
--- a/tipo3/emufs.c
+++ b/tipo3/emufs.c
@@ -1,8 +1,27 @@
 
 #include "emufs.h"
 
 #include "emufs.h"

+#include "param_cte.h"

 
 

-EMUFS *emufs_crear(const char *filename, int tipo)
+/* Defino las extenciones que usan cada tipo de archivo */
+#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)

 {
 {

+       if (s == NULL) return NULL;
+       char *tmp = (char *)malloc(sizeof(char)*(strlen(s)+1));
+       strcpy(tmp, s);
+       return tmp;
+}
+
+
+EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, unsigned int tam_reg)
+{
+       char name[255];
+       FILE *fp;

        EMUFS *tmp = (EMUFS *)malloc(sizeof(EMUFS));
 
        switch (tipo) {
        EMUFS *tmp = (EMUFS *)malloc(sizeof(EMUFS));
 
        switch (tipo) {


@@ -11,6 +30,48 @@ EMUFS *emufs_crear(const char *filename, int tipo)
                case T2:
                break;
                case T3:
                case T2:
                break;
                case T3:

+                       tmp->tipo = T3;
+                       tmp->tam_bloque = tam_bloque;
+                       tmp->leer_bloque = leer_bloque;
+                       tmp->leer_registro = leer_registro;
+                       tmp->grabar_registro = grabar_registro;
+                       tmp->borrar_registro = NULL;
+                       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);
+                       
+                       strcpy(name, filename);
+                       strcat(name, EXT_TIPO3_EXTRA);
+                       fp = fopen(name, "w");
+                       fclose(fp);

                break;
                default:
                        free(tmp);
                break;
                default:
                        free(tmp);


@@ -20,4 +81,50 @@ EMUFS *emufs_crear(const char *filename, int tipo)
        return tmp;
 }
 
        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)
+{
+       if (e == NULL) return 1;
+       free(e->nombre);
+       free(e);
+       return 0;
+}