se cuelga

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

diff --git a/tipo3/emufs.c b/tipo3/emufs.c
index a19ded7980b1b3803eff5129d12ffd4d8ae6b524..49cb4b402d925a6f5e33ff5b89b55538cc841314 100644 (file)
--- a/tipo3/emufs.c
+++ b/tipo3/emufs.c
@@ -1,8 +1,25 @@
-
 #include "emufs.h"
+#include "param_cte.h"
+
+/* Defino las extenciones que usan cada tipo de archivo */
+#define EXT_TIPO3_ID ".idx"
+#define EXT_TIPO3_DATA ".dat"
+#define EXT_TIPO3_DISP ".fsc"
+#define EXT_TIPO3_IDS ".ids"
 
-EMUFS *emufs_crear(const char *filename, int tipo)
+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) {
@@ -11,6 +28,44 @@ EMUFS *emufs_crear(const char *filename, int tipo)
                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);
+
                break;
                default:
                        free(tmp);
@@ -20,4 +75,88 @@ EMUFS *emufs_crear(const char *filename, int tipo)
        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;
+}
+
+int ver_archivo_FS(EMUFS *emu)
+{
+       FILE *f_block_free;
+       BLOCK_FREE_T reg;
+       char name_f_block_free[255];
+       
+       strcpy(name_f_block_free,emu->nombre);
+       strcat(name_f_block_free,".fsc");
+
+       if ( (f_block_free = fopen(name_f_block_free,"r"))==NULL ){
+               printf("no pude abrir el archivo %s\n",name_f_block_free);
+               return -1;
+       }
+       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);
+               fread(&reg,sizeof(reg),1,f_block_free);
+       }
+       
+       fclose(f_block_free);
+
+       /* Imprimo la lista de bloques/registros */
+       strcpy(name_f_block_free,emu->nombre);
+       strcat(name_f_block_free,".id3");
+       {
+               BLOCK_REG_T r;
+               f_block_free = fopen(name_f_block_free, "r");
+               fread(&r, sizeof(BLOCK_REG_T), 1, f_block_free);
+               while (!feof(f_block_free)) {
+                       printf("ID %d en bloque %d\n", r.id_reg, r.block);
+                       fread(&r, sizeof(BLOCK_REG_T), 1, f_block_free);
+               }
+               fclose(f_block_free);
+       }
+       
+       
+       return 0;
+}