#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;
}
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);
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);
}
tmp = (EMUFS *)malloc(sizeof(EMUFS));
- if (tmp == NULL) return NULL;
+ if (tmp == NULL) {
+ fclose(fp);
+ return NULL;
+ }
switch (tipo) {
case T1:
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);
}
/* Imprimo la lista de bloques/registros */
strcpy(name_f_block_free,emu->nombre);
- strcat(name_f_block_free,".fsc");
+ strcat(name_f_block_free,".idx");
{
BLOCK_REG_T r;
f_block_free = fopen(name_f_block_free, "r");