X-Git-Url: https://git.llucax.com/z.facultad/75.06/emufs.git/blobdiff_plain/6c5fe1e15e441c27ba01b22b91bf1e5843ae53f2..10489d7d1d8a0ac50fae58e622eb0b8f8ef6c6b1:/emufs/emufs.c

diff --git a/emufs/emufs.c b/emufs/emufs.c
index 9934374..8f68f82 100644
--- a/emufs/emufs.c
+++ b/emufs/emufs.c
@@ -39,10 +39,12 @@
  */
 
 #include "emufs.h"
+#include "tipo1.h"
+#include "tipo2.h"
 #include "tipo3.h"
-
-/* Defino las extenciones que usan cada tipo de archivo */
-#define EXT_TIPO3_DATA ".dat"
+#include "did.h"
+#include "fsc.h"
+#include "idx.h"
 
 char *str_dup(const char *s);
 
@@ -55,108 +57,185 @@ char *str_dup(const char *s)
 	return tmp;
 }
 
+int emufs_crear_archivo_auxiliar(const char* name, const char* ext)
+{
+	FILE* f;
+	char* filename;
+
+	filename = (char*) malloc(sizeof(char) * (strlen(name) + strlen(ext) + 1));
+	if (filename == NULL) {
+		/* TODO Manejo de errores */
+		return -1;
+	}
+	strcpy(filename, name);
+	strcat(filename, ext);
+	f = fopen(filename, "w");
+	free(filename);
+	if (f == NULL) {
+		/* TODO Manejo de errores */
+		return -1;
+	}
+	fclose(f);
+	return 0;
+}
 
-EMUFS *emufs_crear(const char *filename, char tipo, unsigned int tam_bloque, unsigned int tam_reg)
+EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo, EMUFS_BLOCK_SIZE tam_bloque, EMUFS_REG_SIZE tam_reg)
 {
 	char name[255];
 	FILE *fp;
-	EMUFS *tmp = (EMUFS *)malloc(sizeof(EMUFS));
+	EMUFS *efs;
+
+	/* Si no es un tipo conocido, sale. */
+	if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
+		return NULL;
+	}
+
+	/* Inicializa parámetros comunes. */
+	efs = (EMUFS*) malloc(sizeof(EMUFS));
+	if (efs == NULL) {
+		return NULL;
+	}
+	efs->tipo = tipo;
+	efs->tam_bloque = tam_bloque;
+	efs->tam_reg = tam_reg;
+	efs->nombre = str_dup(filename);
+
+	/* Abre archivo de datos. */
+	strcpy(name, filename);
+	strcat(name, ".dat");
+	fp = fopen(name, "w");
+	if (fp == NULL) {
+		/* TODO ERROR */
+		free(efs->nombre);
+		free(efs);
+		return NULL;
+	}
+
+	/* Guarda cabecera común. */
+	fwrite(&tipo, sizeof(EMUFS_TYPE), 1, fp);
+
+	/* Crea archivo de índice. */
+	if (emufs_idx_crear(efs)) {
+		/* TODO ERROR */
+		free(efs->nombre);
+		free(efs);
+		return NULL;
+	}
 
+	/* Crea archivo de control de espacio libre. */
+	if (emufs_fsc_crear(efs)) {
+		/* TODO ERROR */
+		free(efs->nombre);
+		free(efs);
+		return NULL;
+	}
+
+	/* Crea archivo de identificadores borrados (recuperables). */
+	if (emufs_did_crear(efs)) {
+		/* TODO ERROR */
+		free(efs->nombre);
+		free(efs);
+		return NULL;
+	}
+
+	/* Termina de realizar el trabajo según el tipo de archivo. */
 	switch (tipo) {
+
 		case T1:
-		break;
+			emufs_tipo1_inicializar(efs);
+
+			/* Guarda cabeceras propias. */
+			fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
+
+			break;
+
 		case T2:
-		break;
+			/* Asigna punteros a funciones. */
+			efs->grabar_registro = emufs_tipo2_grabar_registro;           
+            efs->borrar_registro = emufs_tipo2_borrar_registro;
+			efs->nombre = str_dup(filename);
+		    /*efs->leer_registro = emufs_tipo2_leer_registro;*/						
+			break;
+
 		case T3:
-			tmp->tipo = T3;
-			tmp->tam_bloque = tam_bloque;
-			tmp->leer_bloque = emufs_tipo3_leer_bloque;
-			tmp->leer_registro = emufs_tipo3_leer_registro;
-			tmp->grabar_registro = emufs_tipo3_grabar_registro;
-			tmp->borrar_registro = emufs_tipo3_borrar_registro;
-			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);
-			return NULL;
+			/* Asigna punteros a funciones. */
+			efs->leer_bloque     = emufs_tipo3_leer_bloque;
+			efs->leer_registro   = emufs_tipo3_leer_registro;
+			efs->grabar_registro = emufs_tipo3_grabar_registro;
+			efs->borrar_registro = emufs_tipo3_borrar_registro;
+
+			/* Guarda cabeceras propias. */
+			fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
+			fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);			
+			break;
+
 	}
 
-	return tmp;
+	fclose(fp);
+	return efs;
 }
 
 EMUFS *emufs_abrir(const char *filename)
 {
-	EMUFS *tmp;
+	EMUFS *efs;
 	char name[255];
 	char tipo;
 	FILE *fp;
 
 	strcpy(name, filename);
-	strcat(name, EXT_TIPO3_DATA);
+	strcat(name, ".dat");
 
 	/* Trato de determinar el tipo de archivo */
 	fp = fopen(name, "r");
 	if (fp == NULL) return NULL;
-	fread(&tipo, sizeof(char), 1, fp);
-	if ((tipo < 0) || (tipo > 2)) {
+	fread(&tipo, sizeof(EMUFS_TYPE), 1, fp);
+
+	/* Si no es un tipo conocido, sale. */
+	if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
 		fclose(fp);
 		return NULL;
 	}
 	
-	tmp = (EMUFS *)malloc(sizeof(EMUFS));
-	if (tmp == NULL) {
+	/* Inicializa parámetros comunes. */
+	efs = (EMUFS*) malloc(sizeof(EMUFS));
+	if (efs == NULL) {
 		fclose(fp);
 		return NULL;
 	}
+	efs->tipo = tipo;
+	efs->nombre = str_dup(filename);
 
 	switch (tipo) {
 		case T1:
-		break;
+			emufs_tipo1_inicializar(efs);
+			/* Lee cabeceras propias. */
+			if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) {
+				free(efs->nombre);
+				free(efs);
+				fclose(fp);
+				return NULL;
+			}
+			break;
 		case T2:
-		break;
+			break;
 		case T3:
-			tmp->tipo = tipo;
-			fread(&tmp->tam_bloque, sizeof(int), 1, fp);
-			tmp->leer_bloque = emufs_tipo3_leer_bloque;
-			tmp->leer_registro = emufs_tipo3_leer_registro;
-			tmp->grabar_registro = emufs_tipo3_grabar_registro;
-			tmp->borrar_registro = emufs_tipo3_borrar_registro;
-			tmp->nombre = str_dup(filename);
+			if ((!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) ||
+			   (!fread(&(efs->tam_reg), sizeof(EMUFS_REG_SIZE), 1, fp)))
+				{
+				free(efs->nombre);
+				free(efs);
+				fclose(fp);
+				return NULL;
+			}			
+			efs->leer_bloque = emufs_tipo3_leer_bloque;
+			efs->leer_registro = emufs_tipo3_leer_registro;
+			efs->grabar_registro = emufs_tipo3_grabar_registro;
+			/*efs->borrar_registro = emufs_tipo3_borrar_registro;*/
+			break;
 	}
 
 	fclose(fp);
-	return tmp;
+	return efs;
 }
 
 int emufs_destruir(EMUFS *e)
@@ -170,7 +249,7 @@ int emufs_destruir(EMUFS *e)
 int ver_archivo_FS(EMUFS *emu)
 {
 	FILE *f_block_free;
-	BLOCK_FREE_T reg;
+	EMUFS_FSC reg;
 	char name_f_block_free[255];
 	
 	strcpy(name_f_block_free,emu->nombre);
@@ -182,22 +261,23 @@ int ver_archivo_FS(EMUFS *emu)
 	}
 	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);
+		fprintf(stderr, " Bloque = %li   Espacio libre = %li\n",reg.n_marker, reg.n_freespace);
 		fread(&reg,sizeof(reg),1,f_block_free);
 	}
 	
 	fclose(f_block_free);
 
 	/* Imprimo la lista de bloques/registros */
+	fprintf(stderr, "BLOQUES Y REGISTROS\n");
 	strcpy(name_f_block_free,emu->nombre);
 	strcat(name_f_block_free,".idx");
 	{
-		BLOCK_REG_T r;
+		EMUFS_IDX r;
 		f_block_free = fopen(name_f_block_free, "r");
-		fread(&r, sizeof(BLOCK_REG_T), 1, f_block_free);
+		fread(&r, sizeof(EMUFS_IDX), 1, f_block_free);
 		while (!feof(f_block_free)) {
-			printf("ID %ld en bloque %d\n", r.id_reg, r.block);
-			fread(&r, sizeof(BLOCK_REG_T), 1, f_block_free);
+			fprintf(stderr, "ID %li en bloque %li\n", r.n_idreg, r.n_location);
+			fread(&r, sizeof(EMUFS_IDX), 1, f_block_free);
 		}
 		fclose(f_block_free);
 	}