*/
#include "emufs.h"
+#include "common.h"
#include "tipo1.h"
#include "tipo2.h"
#include "tipo3.h"
char *str_dup(const char *s);
-/* Duplica una cadena de caracteres y devuelve la copia. */
char *str_dup(const char *s)
{
char *tmp;
return tmp;
}
-/* Objetivo: Crea un archivo de nombre y extension dadas. */
int emufs_crear_archivo_auxiliar(const char* name, const char* ext)
{
FILE* f;
return 0;
}
-/* Crea un archivo de tipo dado y devuelve una estructura con las rutinas de handling de dicho archivo. */
-EMUFS *emufs_crear(const char *filename, EMUFS_TYPE tipo,
- EMUFS_BLOCK_SIZE tam_bloque, EMUFS_REG_SIZE tam_reg)
+EMUFS *emufs_crear(const char *filename, EMUFS_Tipo tipo, EMUFS_BLOCK_SIZE tam_bloque, EMUFS_REG_SIZE tam_reg)
{
char name[255];
FILE *fp;
EMUFS *efs;
+ int err = 0;
/* Si no es un tipo conocido, sale. */
if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
efs->tam_bloque = tam_bloque;
efs->tam_reg = tam_reg;
efs->nombre = str_dup(filename);
+ efs->indices = NULL;
/* Abre archivo de datos. */
strcpy(name, filename);
}
/* Guarda cabecera común. */
- fwrite(&tipo, sizeof(EMUFS_TYPE), 1, fp);
+ fwrite(&tipo, sizeof(EMUFS_Tipo), 1, fp);
/* Crea archivo de índice. */
if (emufs_idx_crear(efs)) {
/* TODO ERROR */
+ fclose(fp);
free(efs->nombre);
free(efs);
return NULL;
/* Crea archivo de control de espacio libre. */
if (emufs_fsc_crear(efs)) {
/* TODO ERROR */
+ fclose(fp);
free(efs->nombre);
free(efs);
return NULL;
/* Crea archivo de identificadores borrados (recuperables). */
if (emufs_did_crear(efs)) {
/* TODO ERROR */
+ fclose(fp);
free(efs->nombre);
free(efs);
return NULL;
switch (tipo) {
case T1:
- emufs_tipo1_inicializar(efs);
+ /* Asigna punteros a funciones. */
+ if ((err = emufs_tipo1_inicializar(efs))) {
+ /* TODO ERROR */
+ PERR("No se pudo inicializar el EMUFS de tipo1");
+ fclose(fp);
+ free(efs->nombre);
+ free(efs);
+ return NULL;
+ }
/* Guarda cabeceras propias. */
fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
case T2:
/* 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;*/
+ emufs_tipo2_inicializar(efs);
break;
case T3:
/* Asigna punteros a funciones. */
- efs->leer_bloque = emufs_tipo3_leer_bloque;
- efs->leer_registro = emufs_tipo3_leer_registro;
+ efs->leer_bloque = emufs_tipo3_leer_bloque;
+ efs->leer_registro = emufs_tipo3_leer_registro;
+ efs->leer_registro_raw = emufs_tipo3_leer_registro_raw;
efs->grabar_registro = emufs_tipo3_grabar_registro;
efs->borrar_registro = emufs_tipo3_borrar_registro;
-
+ efs->leer_estadisticas = emufs_tipo3_leer_estadisticas;
+ efs->modificar_registro = emufs_tipo3_modificar_registro;
+ efs->compactar = emufs_tipo3_compactar;
+ efs->leer_bloque_raw = emufs_tipo3_leer_bloque_raw;
/* Guarda cabeceras propias. */
fwrite(&tam_bloque, sizeof(EMUFS_BLOCK_SIZE), 1, fp);
fwrite(&tam_reg, sizeof(EMUFS_REG_SIZE), 1, fp);
return efs;
}
-/* Realiza la apertura de un archivo dado, identifica el tipo de archivo y devuelve la estructura de handling. */
EMUFS *emufs_abrir(const char *filename)
{
EMUFS *efs;
char name[255];
char tipo;
FILE *fp;
+ int err = 0;
strcpy(name, filename);
strcat(name, ".dat");
/* Trato de determinar el tipo de archivo */
fp = fopen(name, "r");
if (fp == NULL) return NULL;
- fread(&tipo, sizeof(EMUFS_TYPE), 1, fp);
+ fread(&tipo, sizeof(EMUFS_Tipo), 1, fp);
/* Si no es un tipo conocido, sale. */
if ((tipo != T1) && (tipo != T2) && (tipo != T3)) {
}
efs->tipo = tipo;
efs->nombre = str_dup(filename);
-
+
switch (tipo) {
case T1:
- emufs_tipo1_inicializar(efs);
/* Lee cabeceras propias. */
if (!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) {
free(efs->nombre);
fclose(fp);
return NULL;
}
+ /* Asigna punteros a funciones. */
+ if ((err = emufs_tipo1_inicializar(efs))) {
+ PERR("No se pudo inicializar el EMUFS de tipo1");
+ fclose(fp);
+ return NULL;
+ }
break;
case T2:
+ /* Asigna punteros a funciones. */
+ emufs_tipo2_inicializar(efs);
break;
case T3:
if ((!fread(&(efs->tam_bloque), sizeof(EMUFS_BLOCK_SIZE), 1, fp)) ||
fclose(fp);
return NULL;
}
+ /* Asigna punteros a funciones. */
efs->leer_bloque = emufs_tipo3_leer_bloque;
+ efs->leer_registro_raw = emufs_tipo3_leer_registro_raw;
efs->leer_registro = emufs_tipo3_leer_registro;
efs->grabar_registro = emufs_tipo3_grabar_registro;
- /*efs->borrar_registro = emufs_tipo3_borrar_registro;*/
+ efs->borrar_registro = emufs_tipo3_borrar_registro;
+ efs->leer_estadisticas = emufs_tipo3_leer_estadisticas;
+ efs->modificar_registro = emufs_tipo3_modificar_registro;
+ efs->compactar = emufs_tipo3_compactar;
+ efs->leer_bloque_raw = emufs_tipo3_leer_bloque_raw;
break;
}
return efs;
}
-/* Objetivo: Rutina llamada al destruir la aplicacion para librerar */
int emufs_destruir(EMUFS *e)
{
if (e == NULL) return 1;
return 0;
}
-/* Visualiza espacios libres de un archivo?? */
int ver_archivo_FS(EMUFS *emu)
{
FILE *f_block_free;
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);
+ fprintf(stderr, "no pude abrir el archivo %s\n",name_f_block_free);
return -1;
}
+ fprintf(stderr,"BOQUES Y ESPACIO LIBRE\n");
fread(®,sizeof(reg),1,f_block_free);
while ( !feof(f_block_free) ){
- printf(" Bloque = %li Espacio libre = %li\n",reg.n_marker, reg.n_freespace);
+ fprintf(stderr, "Bloque = %li Espacio libre = %li\n",reg.marker, reg.freespace);
fread(®,sizeof(reg),1,f_block_free);
}
fclose(f_block_free);
/* Imprimo la lista de bloques/registros */
- printf("BLOQUES Y REGISTROS\n");
+ fprintf(stderr, "BLOQUES Y REGISTROS\n");
strcpy(name_f_block_free,emu->nombre);
strcat(name_f_block_free,".idx");
+ f_block_free = fopen(name_f_block_free, "r");
{
EMUFS_IDX r;
- f_block_free = fopen(name_f_block_free, "r");
- fread(&r, sizeof(EMUFS_IDX), 1, f_block_free);
while (!feof(f_block_free)) {
- printf("ID %li en bloque %li\n", r.n_idreg, r.n_location);
- fread(&r, sizeof(EMUFS_IDX), 1, f_block_free);
+ if (fread(&r, sizeof(EMUFS_IDX), 1, f_block_free) != 1) continue;
+ fprintf(stderr, "ID %li en bloque %li\n", r.id_reg, r.location);
}
- fclose(f_block_free);
}
+ fclose(f_block_free);
-
return 0;
}
+
+int debug_ver_estadisticas(EMUFS* efs)
+{
+ EMUFS_Estadisticas s = efs->leer_estadisticas(efs);
+
+ printf("ESTADISTICAS:\n");
+ printf("=============\n");
+ printf("Tamaño del archivo: %lu bytes\n", s.tam_archivo);
+ printf("Tamaño de datos (incluye espacio libre): %lu bytes (%.2f %%)\n",
+ s.tam_archivo - s.tam_info_control_dat,
+ (s.tam_archivo - s.tam_info_control_dat) * 100.0
+ / (float) s.tam_archivo);
+ printf("Tamaño de info de control total: %lu bytes (%.2f %%)\n",
+ s.tam_info_control_dat + s.tam_archivos_aux,
+ (s.tam_info_control_dat + s.tam_archivos_aux) * 100.0
+ / (float) s.tam_archivo);
+ printf("Tamaño de los archivos auxiliares: %lu bytes\n",
+ s.tam_archivos_aux);
+ printf("Tamaño de la información de control en el .dat: %lu bytes\n",
+ s.tam_info_control_dat);
+ printf("Total de espacio libre: %lu bytes\n", s.total_fs);
+ printf("Máximo espacio libre en bloque: %lu bytes\n", s.max_fs);
+ printf("Mínimo espacio libre en bloque: %lu bytes\n", s.min_fs);
+ printf("Media del espacio libre por bloque: %lu bytes\n", s.media_fs);
+ printf("Cantidad de registros: %lu\n", s.cant_registros);
+ printf("Cantidad de bloques: %lu\n", s.cant_bloques);
+ return 0;
+}
+
+int emufs_agregar_indice(EMUFS *emu, char *nombre, INDICE_FUNCION funcion, INDICE_TIPO tipo, INDICE_TIPO_DATO tipo_dato, unsigned int offset, unsigned int tam_bloque)
+{
+ INDICE *tmp;
+ int error=0;
+
+ /* Verifico que no existe un indice con el mismo nombre */
+ /* y que no exista un indice primario */
+ PERR("Agregando indice");
+ tmp = emu->indices;
+ while (tmp) {
+ if (strcmp(tmp->nombre, nombre)==0) {
+ error = 1;
+ break;
+ }
+ if ((funcion == IND_PRIMARIO) && (tmp->funcion == funcion)) {
+ error = 2;
+ break;
+ }
+ tmp = tmp->sig;
+ }
+
+ if (tmp != NULL) {
+ switch (error) {
+ case 1:
+ PERR("Ya existe un indice con el mismo nombre!");
+ break;
+ case 2:
+ PERR("EMUFS ya tiene indice primario!!");
+ }
+ return 0;
+ }
+
+ /* Creo el nuevo indice */
+ PERR("Creando indice\n");
+ tmp = emufs_indice_crear(emu, nombre, funcion, tipo, tipo_dato, offset, tam_bloque);
+
+ if (tmp == NULL) {
+ PERR("NO SE PUDO CREAR INDICE!!!");
+ return 0;
+ }
+
+ if (emu->indices==NULL)
+ emu->indices = tmp;
+ else {
+ tmp->sig = emu->indices;
+ emu->indices = tmp;
+ }
+ return 1;
+}
+
+INDICE_DATO *emufs_buscar_registros(EMUFS *emu, char *indice, CLAVE clave, int *cant)
+{
+ INDICE *tmp;
+ tmp = emu->indices;
+ while (tmp) {
+ if (strcmp(tmp->nombre, indice) == 0) break;
+ }
+
+ if (tmp == NULL) {
+ PERR("NO EXISTE EL INDICE");
+ cant = 0;
+ return NULL;
+ }
+
+ return tmp->buscar_entradas(tmp, clave, cant);
+}
+
projects / z.facultad / 75.06 / emufs.git / blobdiff