]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - tipo3/param_cte.c
* Algunas cosas para que valgrind nos deje vivir.
[z.facultad/75.06/emufs.git] / tipo3 / param_cte.c
index 0683fc9f998b2e5d9d32fa67b21d79166a1f003a..5ef131f1bb0c7203c7570977aafcefa6db162e8e 100644 (file)
@@ -6,16 +6,14 @@
 int leer_registro(EMUFS *emu, int ID, void *ptr, unsigned long tam_reg)
 {
        FILE* f_block_reg;
-       //FILE* f_block_free;
-       //FILE* f_reg_exist;
        char* bloque;
        char name_f_block_reg[255];
        int block, ID_aux;
        int iterador = 0;
        strcpy(name_f_block_reg,emu->nombre);
-       strcat(name_f_block_reg,".id3");
+       strcat(name_f_block_reg,".idx");
+
 
-       /* tengo que crear los archivos de indice antes de usarlos!!!!!!!!!*/
        if ( (f_block_reg = fopen(name_f_block_reg,"a+")) == NULL )
                return -1; /*ERROR*/
        
@@ -27,13 +25,17 @@ int leer_registro(EMUFS *emu, int ID, void *ptr, unsigned long tam_reg)
                printf("No hay memoria.\n");
                return -1;
        }
+       
        if (leer_bloque(emu, block, bloque)==-1) {
                free(bloque);
+               printf("no se pudo leer el bloque\n");
                return -1; /*No se pudo leer el bloque*/
        }
-
+       printf("el bloque leido es: %s\n",bloque+sizeof(int));
+       
        while ( iterador < emu->tam_bloque ){ 
                memcpy(&ID_aux, bloque+iterador, sizeof(int));
+               printf("ID_aux = %d\n",ID_aux);
                iterador += sizeof(int);
                if ( ID_aux == ID ){
                        memcpy(ptr,bloque+iterador,tam_reg);
@@ -41,7 +43,8 @@ int leer_registro(EMUFS *emu, int ID, void *ptr, unsigned long tam_reg)
                }
                iterador += tam_reg;
        }
-
+       printf("reg leido = %s\n",(char*)ptr);
+       
        fclose(f_block_reg);
        free(bloque);
        return 0;
@@ -58,7 +61,7 @@ int existe_registro(EMUFS *emu, int ID)
        strcat(name_f_reg_exist,".ids");
        if ( (f_reg_exist = fopen(name_f_reg_exist,"r")) == NULL) return -1; /*ERROR*/
        while ( !feof(f_reg_exist) ){
-               fread(&reg,sizeof(reg),1,f_reg_exist);
+               fread(&reg,sizeof(int),1,f_reg_exist);
                if ( reg == ID ){
                        fclose(f_reg_exist);
                        return 0;
@@ -77,11 +80,11 @@ int buscar_registro(EMUFS *emu, int ID)
        BLOCK_REG_T reg;
        char name_f_block_reg[255];
        strcpy(name_f_block_reg,emu->nombre);
-       strcat(name_f_block_reg,".id3");
+       strcat(name_f_block_reg,".idx");
        
        if ( (f_block_reg = fopen(name_f_block_reg,"r")) == NULL) return -1; /*ERROR*/
        while ( !feof(f_block_reg) ){
-               if (fread(&reg,sizeof(reg),1,f_block_reg) != 1) continue;
+               if (fread(&reg,sizeof(BLOCK_REG_T),1,f_block_reg) != 1) continue;
                if ( reg.id_reg == ID ){
                        fclose(f_block_reg);
                        return reg.block;
@@ -116,32 +119,27 @@ int grabar_registro(EMUFS *emu, void *ptr, unsigned long tam)
 {
        int ID_aux, fs, num_bloque, cant;
        FILE *file;
-       FILE *f_id;
        FILE *f_block_reg;
        FILE *f_block_free;
        BLOCK_FREE_T reg;
        BLOCK_REG_T reg_b;
        char name_f[255];
        char name_f_block_reg[255];
-       char name_f_id[255];
        char name_f_free[255];
        char* bloque;
        strcpy(name_f,emu->nombre);
        strcat(name_f,".dat");
        
        strcpy(name_f_block_reg,emu->nombre);
-       strcat(name_f_block_reg,".id3");
-       
-       strcpy(name_f_id,emu->nombre);
-       strcat(name_f_id,".idc");
+       strcat(name_f_block_reg,".idx");
 
        strcpy(name_f_free,emu->nombre);
        strcat(name_f_free,".fsc");
        
-       
        if ( (file = fopen(name_f,"a+"))==NULL ) return -1; /*ERROR*/
        /* me devuelve el ID del bloque donde quepa un registro y el espacio libre en "fs"*/
        num_bloque = buscar_lugar(emu, tam, &fs);
+       /*printf("Lugar %d\n", fs);*/
        /*si no hay bloques con suficiente espacio creo un bloque nuevo */
        if (num_bloque == -1) {
                /*crear un nuevo bloque en memoria */
@@ -154,13 +152,30 @@ int grabar_registro(EMUFS *emu, void *ptr, unsigned long tam)
                /*grabo el registro en el bloque*/
                memcpy(bloque+sizeof(int),ptr,tam);
                /* me paro al final del archivo */
-       fseek(file, 0, SEEK_END); 
+               fseek(file, 0, SEEK_END); 
                /* grabo el bloque en el final del archivo */
                fwrite(bloque,emu->tam_bloque,1,file);
+               /*actualizo el archivo de espacios libres*/
+               /*tengo que buscar la cantidad de bloques que existen*/
+               /*me paro al principio salteando el encabezado del archivo*/
+               fseek(file, 0, SEEK_END); /* Me paro al final */
+               cant = (ftell(file)-(sizeof(int)*2+sizeof(char))) / emu->tam_bloque;
+               cant--; /* Resto uno porque el numero de bloque debe empezar en 0 */
+               fclose(file);
+               /*cargo el registro*/
+               reg.block = cant; /*no incremento cant, porque grabe el nuevo bloque antes y no lo conte!!*/
+               /* GAZER */
+               /*printf("FS = %d\n", fs);*/
+               reg.free_space = emu->tam_bloque - tam;
+               /*lo guardo en el archivo al final  "a+"*/
+               if ( (f_block_free = fopen(name_f_free,"a+"))==NULL ) return -1; /*ERROR*/              
+               fwrite(&reg,sizeof(BLOCK_FREE_T),1,f_block_free);
+               fclose(f_block_free);
        } else {
                /*cargo el bloque en "bloque"*/
                bloque = (char*)malloc(emu->tam_bloque);        
                if ( leer_bloque(emu,num_bloque,bloque)== -1) return -1; 
+                       /*printf("el bloque existe y tiene esto = %s\n", bloque +sizeof(int)); */
                /*El error puede haberse producido porque la funcion leer_bloque devolvio -1, el cual es un bloque invalido*/
                /*insertar el registro en el bloque*/
                /*tengo que buscar un ID valido para el nuevo registro*/
@@ -170,36 +185,37 @@ int grabar_registro(EMUFS *emu, void *ptr, unsigned long tam)
                /*grabo el registro en el bloque*/
                memcpy(bloque+emu->tam_bloque-fs+sizeof(int),ptr,tam);
                /*guardo el bloque en el archivo*/
-               if ( grabar_bloque(emu, bloque, num_bloque) != 0) return -1; /* se produjo un error */  
+               if ( grabar_bloque(emu, bloque, num_bloque) != 0) {
+                       printf("error al grabar bloque\n");
+                       return -1; /* se produjo un error */    
+               }
+               /*actualizo el archivo de espacios libres*/
+               /*busco el bloque que modifique*/
+               if ( (f_block_free = fopen(name_f_free,"r+")) == NULL) return -1; /*ERROR*/
+               while ( !feof(f_block_free) ){
+                       fread(&reg,sizeof(BLOCK_FREE_T),1,f_block_free);
+                       if ( reg.block == num_bloque ){
+                               reg.free_space -= tam;
+                               fseek(f_block_free,-sizeof(BLOCK_FREE_T),SEEK_CUR);
+                               fwrite(&reg,sizeof(BLOCK_FREE_T),1,f_block_free);
+                               break;
+                       }
+               }
+               fclose(f_block_free);
        }
 
-       /*actualizo el archivo de id`s*/
-       if ( (f_id = fopen(name_f_id,"a+"))==NULL ) return -1; /*ERROR*/
-       fwrite(&ID_aux,sizeof(ID_aux),1,f_id);
+       /*actualizo el archivo de id`s
+       if ( (f_id = fopen(name_f_id,"a+"))==NULL ) return -1;
+       fwrite(&ID_aux,sizeof(int),1,f_id);
        fclose(f_id);
-
-       /*actualizo el archivo de espacios libres*/
-       /*tengo que buscar la cantidad de bloques que existen*/
-       /*me paro al principio salteando el encabezado del archivo*/
-       fseek(file, 0, SEEK_END); /* Me paro al final */
-       cant = (ftell(file)-(sizeof(int)+sizeof(char))) / emu->tam_bloque;
-       cant--; /* Resto uno porque el numero de bloque debe empezar en 0 */
-       fclose(file);
-       /*cargo el registro*/
-       reg.block = cant; /*no incremento cant, porque grabe el nuevo bloque antes y no lo conte!!*/
-       reg.free_space = fs - tam;
-       /*lo guardo en el archivo al final  "a+"*/
-       if ( (f_block_free = fopen(name_f_free,"a+"))==NULL ) return -1; /*ERROR*/              
-       fwrite(&reg,sizeof(reg),1,f_block_free);
-       fclose(f_block_free);
-
+       */
        /*actualizo el archivo de bloques y registros*/
        if ( (f_block_reg = fopen(name_f_block_reg,"ab+"))==NULL ) return -1; /*ERROR*/
        reg_b.block = reg.block;
        reg_b.id_reg = ID_aux;
-       fwrite(&reg_b,sizeof(reg_b),1,f_block_reg); 
+       fwrite(&reg_b,sizeof(BLOCK_REG_T),1,f_block_reg); 
        fclose(f_block_reg);
-
+       
        free(bloque);
        return ID_aux;
 }
@@ -214,7 +230,8 @@ int grabar_bloque(EMUFS *emu, void *ptr, int num)
        strcat(name_f,".dat");
        
        if ( (file = fopen(name_f,"r+"))==NULL ) return -1; /*ERROR*/
-       fseek(file,num*emu->tam_bloque,SEEK_SET);       
+       fseek(file,sizeof(char)+sizeof(int)*2,SEEK_SET);
+       fseek(file,num*emu->tam_bloque,SEEK_CUR);       
        fwrite(ptr, emu->tam_bloque, 1, file);
        
        fclose(file);
@@ -228,19 +245,20 @@ int buscar_lugar(EMUFS *emu, unsigned long tam, int *fs)
 {
        FILE *f_block_free;
        BLOCK_FREE_T reg;
-       char name_f_block_reg[255];
+       char name_f_block_free[255];
        
-       strcpy(name_f_block_reg,emu->nombre);
-       strcat(name_f_block_reg,".fsc");
+       strcpy(name_f_block_free,emu->nombre);
+       strcat(name_f_block_free,".fsc");
 
-       if ( (f_block_free = fopen(name_f_block_reg,"r"))==NULL ) return -1;
+       if ( (f_block_free = fopen(name_f_block_free,"r"))==NULL ) return -1;
 
        /* Inicializo la estructura para evitar que si el archivo esta vacio
         * el resultado sea correcto
         */
        reg.block = -1;
+       *fs = emu->tam_bloque;
        while( !feof(f_block_free) ){
-               fread(&reg,sizeof(reg),1,f_block_free);
+               if (fread(&reg,sizeof(BLOCK_FREE_T),1,f_block_free) != 1) continue;
                if ( reg.free_space >= tam ) 
                        break;
                else {
@@ -250,7 +268,8 @@ int buscar_lugar(EMUFS *emu, unsigned long tam, int *fs)
        }
        
        fclose(f_block_free);
-       *fs = reg.free_space;
+       if (reg.block != -1)
+               *fs = reg.free_space;
        return reg.block;
 }
 
@@ -264,7 +283,7 @@ int get_id(EMUFS *emu)
        char name_f_block_reg[255];
 
        strcpy(name_f_block_reg,emu->nombre);
-       strcat(name_f_block_reg,".id3");
+       strcat(name_f_block_reg,".idx");
 
        strcpy(name_f_reg_exist,emu->nombre);
        strcat(name_f_reg_exist,".ids");
@@ -274,8 +293,8 @@ int get_id(EMUFS *emu)
 
        if (ftell(f_reg_exist) > 0){
                /* si el archivo no esta vacio es porque hay un nro disponible*/
-               fseek(f_reg_exist, -sizeof(id),SEEK_END);
-               fread(&id,sizeof(id),1,f_reg_exist);
+               fseek(f_reg_exist, -sizeof(int),SEEK_END);
+               fread(&id,sizeof(int),1,f_reg_exist);
                /* FIXME: tengo que truncar el archivo*/
                /* FIXME: tengo que truncar el archivo*/
                /* FIXME: tengo que truncar el archivo*/
@@ -288,7 +307,7 @@ int get_id(EMUFS *emu)
                if ( (f_block_reg = fopen(name_f_block_reg,"r")) == NULL) return -1; /*ERROR*/
                while ( !feof(f_block_reg) ){
                        /* Me aseguro de leer la cantidad de bytes correcta */
-                       if (fread(&reg,sizeof(reg),1,f_block_reg) != 1) continue;
+                       if (fread(&reg,sizeof(BLOCK_REG_T),1,f_block_reg) != 1) continue;
                        if ( reg.id_reg >= max ) 
                                max = reg.id_reg;
                }