]> git.llucax.com Git - z.facultad/75.06/emufs.git/blobdiff - emufs/tipo3.c
* Agrego arboles B sobre archivos (TEST MODE, no se integra con indice aun).
[z.facultad/75.06/emufs.git] / emufs / tipo3.c
index 8e4011300e7a375c19a61cf143a8dedd2c91f118..a1d0f193928742e938f0492ebee2f817118b9d7d 100644 (file)
@@ -54,6 +54,8 @@ void* emufs_tipo3_leer_registro(EMUFS *emu, EMUFS_REG_ID ID,
        int cant_bloques = 0, resto, i, copiado=0;
        
        cant_bloques = (emu->tam_reg / (emu->tam_bloque-sizeof(EMUFS_REG_ID))) + 1;
+       if ( emu->tam_reg+sizeof(EMUFS_REG_ID) == emu->tam_bloque ) 
+               cant_bloques = 1;
        
        /*si existe, lo busco en el archivo de bloques*/
        block = emufs_idx_buscar_registro(emu,ID); /*me devuelve el nro de bloque al que pertenece el registro*/
@@ -160,14 +162,22 @@ EMUFS_REG_ID emufs_tipo3_grabar_registro(EMUFS *emu, void *ptr, EMUFS_REG_SIZE t
        strcat(name_f,".dat");
        
        cant_bloques = (emu->tam_reg / (emu->tam_bloque-sizeof(EMUFS_REG_ID))) + 1;
+       if ( emu->tam_reg+sizeof(EMUFS_REG_ID) == emu->tam_bloque ) 
+               cant_bloques = 1;
+       
        resto = emu->tam_bloque - sizeof(EMUFS_REG_ID);
-       lugar = emu->tam_reg + sizeof(EMUFS_REG_ID);
-       if ( emu->tam_bloque < emu->tam_reg - sizeof(EMUFS_REG_ID) )
-               lugar = emu->tam_bloque;
-       /* me devuelve el ID del bloque donde quepa un registro y el espacio libre en "fs"*/
-       num_bloque = emufs_fsc_buscar_lugar(emu, lugar, &fs);
+
+
+       
+       if ( cant_bloques == 1 ) 
+               /* me devuelve el ID del bloque donde quepa un registro y el espacio libre en "fs"*/
+               num_bloque = emufs_fsc_buscar_lugar(emu, emu->tam_reg+sizeof(EMUFS_REG_ID), &fs);
+       else 
+               /* me devuelve el ID del bloque donde quepan n registros y el espacio libre en "fs"*/
+               num_bloque = emufs_fsc_buscar_n_lugares(emu, cant_bloques, emu->tam_bloque, &fs, err);
+
        /*si no hay bloques con suficiente espacio creo un bloque nuevo */
-       if (num_bloque == -1) {
+       if (num_bloque == EMUFS_NOT_FOUND) {
                if ( (file = fopen(name_f,"a+"))==NULL ) return -1; /*ERROR*/
                /*tengo que buscar un ID valido para el nuevo registro*/
                ID_aux = emufs_idx_get_new_id(emu, err);
@@ -204,11 +214,11 @@ EMUFS_REG_ID emufs_tipo3_grabar_registro(EMUFS *emu, void *ptr, EMUFS_REG_SIZE t
                                        return -1;
                                }
                        }
-
+               
                        /* grabo el nuevo registro en el archivo de espacios libres */
-                       if ( emu->tam_bloque-sizeof(EMUFS_REG_ID) >= emu->tam_reg ) 
-                               new_fs = emu->tam_bloque - emu->tam_reg - sizeof(EMUFS_REG_ID);
-                       else new_fs = emu->tam_bloque - resto - sizeof(EMUFS_REG_ID);
+                       if ( emu->tam_bloque-sizeof(EMUFS_REG_ID) < emu->tam_reg ) 
+                               new_fs = emu->tam_bloque - sizeof(EMUFS_REG_ID) - resto ;
+                       else new_fs = emu->tam_bloque - sizeof(EMUFS_REG_ID) - emu->tam_reg ;
                        if ( emufs_fsc_agregar(emu, num_bloque+i, new_fs) ) {
                                fclose(file);
                                free(bloque);
@@ -220,6 +230,7 @@ EMUFS_REG_ID emufs_tipo3_grabar_registro(EMUFS *emu, void *ptr, EMUFS_REG_SIZE t
                /*tengo que buscar un ID valido para el nuevo registro*/
                ID_aux = emufs_idx_get_new_id(emu, err);
                for (i=0; i<cant_bloques; i++){
+                       resto = emu->tam_bloque-sizeof(EMUFS_REG_ID);
                        /*cargo el bloque en "bloque"*/
                        if (!(bloque = emufs_tipo3_leer_bloque(emu, num_bloque+i, err))) {
                                /* TODO Manejo de errores */
@@ -252,18 +263,22 @@ EMUFS_REG_ID emufs_tipo3_grabar_registro(EMUFS *emu, void *ptr, EMUFS_REG_SIZE t
                        }
                        
                        /*actualizo el archivo de espacios libres*/
-                       if ( emu->tam_bloque-sizeof(EMUFS_REG_ID) > emu->tam_reg ){
-                               resto = emu->tam_reg;
-                               if ( emufs_fsc_agregar(emu, num_bloque, fs - resto - sizeof(EMUFS_REG_ID) ) != 0 ) {
+                       if ( emu->tam_bloque-sizeof(EMUFS_REG_ID) < emu->tam_reg ){
+                               /*Si el registro ocupa mas de un bloque  (original) resto = emu->tam_bloque-sizeof(EMUFS_REG_ID)*/
+                               resto += sizeof(EMUFS_REG_ID);
+                               /*resto = emu->tam_reg - i*(emu->tam_bloque - sizeof(EMUFS_REG_ID)) + sizeof(EMUFS_REG_ID);*/
+                               if ( cant_bloques-1 == i )
+                                       resto = emu->tam_reg - i*(emu->tam_bloque - sizeof(EMUFS_REG_ID))+sizeof(EMUFS_REG_ID);
+                               /*printf("fs-resto = %d\n", fs-resto);*/
+                               if ( emufs_fsc_agregar(emu, num_bloque+i, fs-resto) !=0 ){
                                        fclose(file);
                                        if (bloque) free(bloque);
                                        return -1;
                                }
                        } else {        
-                               resto += sizeof(EMUFS_REG_ID);
-                               if ( cant_bloques-1 == i )
-                                       resto = emu->tam_reg - i*(emu->tam_bloque - sizeof(EMUFS_REG_ID))+sizeof(EMUFS_REG_ID);
-                               if ( emufs_fsc_agregar(emu, num_bloque+i, fs-resto) !=0 ){
+                               /* si ocupa menos de un bloque*/
+                               resto = emu->tam_reg;
+                               if ( emufs_fsc_agregar(emu, num_bloque, fs - resto - sizeof(EMUFS_REG_ID) ) != 0 ) {
                                        fclose(file);
                                        if (bloque) free(bloque);
                                        return -1;
@@ -313,6 +328,8 @@ int emufs_tipo3_borrar_registro(EMUFS *emu, EMUFS_REG_ID ID)
 
        /*cantidad de bloques que ocupa un registro*/
        cant_bloques = emu->tam_reg/(emu->tam_bloque-sizeof(EMUFS_REG_ID))+1;
+       if ( emu->tam_reg+sizeof(EMUFS_REG_ID) == emu->tam_bloque ) 
+               cant_bloques = 1;
        
        num_bloque = emufs_idx_buscar_registro(emu, ID);
        if (!(bloque = emufs_tipo3_leer_bloque(emu, num_bloque, &err))) {
@@ -342,7 +359,7 @@ int emufs_tipo3_borrar_registro(EMUFS *emu, EMUFS_REG_ID ID)
        }
 
        /*grabo el bloque en el archivo*/       
-       if ( emu->tam_bloque < emu->tam_reg ) 
+       if ( emu->tam_bloque-sizeof(EMUFS_REG_ID) < emu->tam_reg ) 
                memset(bloque, 0, emu->tam_bloque);
        if ( emufs_tipo3_grabar_bloque(emu, bloque, num_bloque) == -1 ){
                free(bloque);
@@ -439,81 +456,38 @@ EMUFS_REG_ID emufs_tipo3_modificar_registro(EMUFS *emu, EMUFS_REG_ID id, void *d
 
 void* emufs_tipo3_leer_registro_raw(EMUFS *emu, EMUFS_REG_ID ID, EMUFS_REG_SIZE *size, int *pos)
 {
-       char* bloque, *tmp, *cur;
+       char* bloque;
        EMUFS_BLOCK_ID block;
        EMUFS_REG_ID ID_aux;
        EMUFS_BLOCK_SIZE iterador = 0;
-       int err, cant_bloques, i;
+       int err;
        
        bloque = NULL;
-       if (emu->tam_reg < emu->tam_bloque) {
-               /* Aca estoy en el caso de que 1 registro entra en 1 solo bloque */
-               block = emufs_idx_buscar_registro(emu,ID);
-               if ( block == EMUFS_NOT_FOUND ) {
-                       return NULL;
-               }
-               if ((bloque = emufs_tipo3_leer_bloque(emu, block, &err)) == NULL) {
-                       return NULL;
-               }
                
-               ID_aux = -1;
-               iterador = 0;
-       
-               /* Busco el offset desde el comienzo desde donde arranca el registro
-                * buscado, para luego resaltarlo en al GUI
-                */
-               while ( iterador < emu->tam_bloque ) {
-                       memcpy(&ID_aux, bloque+iterador, sizeof(EMUFS_REG_ID));
-                       if ( ID_aux == ID ){
-                               *pos = iterador; 
-                               *size = emu->tam_bloque;
-                               break;
-                       }
-                       iterador += sizeof(EMUFS_REG_ID);
-                       iterador += emu->tam_reg;
-               }
-       } else {
-               /* Junto todos los bloques que ocupa el registro y agrego un separador de bloques */
-               
-               /* Busco el primer bloque */
-               block = emufs_idx_buscar_registro(emu,ID);
-               if ( block == EMUFS_NOT_FOUND ){
-                       return NULL;
-               }
-               cant_bloques = emu->tam_reg / (emu->tam_bloque - sizeof(EMUFS_REG_ID))+1;
-               *size = emu->tam_bloque*cant_bloques /*+ cant_bloques*2*/ - sizeof(EMUFS_REG_ID)*(cant_bloques-1);
-               bloque = (char *)malloc(*size);
-               cur = bloque;
-               *pos = 0; 
-
-               /* El bloque 0 va completo */
-               err = 0;
-               if ((tmp = emufs_tipo3_leer_bloque(emu, block, &err)) == NULL) {
-                       /* Oops! ... un bloque no existe, todo mal! */
-                       free(bloque);
-                       return NULL;
-               }
-               memcpy(cur, tmp, emu->tam_bloque);
-               cur += emu->tam_bloque;
-/*             memcpy(cur, "<>", 2);
-               cur += 2;*/
-               free(tmp);
+       /* Aca estoy en el caso de que 1 registro entra en 1 solo bloque */
+       block = emufs_idx_buscar_registro(emu,ID);
+       if ( block == EMUFS_NOT_FOUND ) {
+               return NULL;
+       }
+       if ((bloque = emufs_tipo3_leer_bloque(emu, block, &err)) == NULL) {
+               return NULL;
+       }
                
-               /* En resto de los bloques no pongo el ID porque ya esta en el primero */
-               for(i=1; i<cant_bloques; i++) {
-                       err = 0;
-                       if ((tmp = emufs_tipo3_leer_bloque(emu, block+i, &err)) == NULL) {
-                               /* Oops! ... un bloque no existe, todo mal! */
-                               free(bloque);
-                               return NULL;
-                       }
-                       memcpy(cur, tmp+sizeof(EMUFS_REG_ID), emu->tam_bloque-sizeof(EMUFS_REG_ID));
-                       cur += emu->tam_bloque - sizeof(EMUFS_REG_ID);
-/*                     memcpy(cur, "<>", 2);
-                       cur += 2;*/
-                       free(tmp);
+       ID_aux = -1;
+       iterador = 0;
+       
+       /* Busco el offset desde el comienzo desde donde arranca el registro
+        * buscado, para luego resaltarlo en al GUI
+        */
+       while ( iterador < emu->tam_bloque ) {
+               memcpy(&ID_aux, bloque+iterador, sizeof(EMUFS_REG_ID));
+               if ( ID_aux == ID ){
+                       *pos = iterador; 
+                       *size = emu->tam_bloque;
+                       break;
                }
-               (*cur) = '\0';
+               iterador += sizeof(EMUFS_REG_ID);
+               iterador += emu->tam_reg;
        }
        return bloque;
 }
@@ -545,15 +519,13 @@ void emufs_tipo3_compactar(EMUFS *emu)
                ID_aux = emufs_tipo3_grabar_registro(emu, reg, emu->tam_reg, &err);
                free(reg);
        }
-       /*tengo que truncar el archivo*/
-       /*bloques_vacios = emufs_fsc_get_cant_bloques_vacios(emu)-1;
-       */
+       /*trunco el archivo sacando los bloques vacios*/
        block_id = emufs_fsc_buscar_lugar(emu, emu->tam_bloque, &fs);
        size = sizeof(EMUFS_Tipo)+sizeof(EMUFS_REG_SIZE)+sizeof(EMUFS_BLOCK_SIZE)+block_id*emu->tam_bloque;
        if (truncate(name, size)!=0)
                PERR("NO TRUNQUE NADA");
        /*hay que truncar el fsc!!!*/
-       if(emu->tam_bloque<emu->tam_reg-sizeof(EMUFS_REG_ID)) block_id = block_id/2;
+       if(emu->tam_bloque-sizeof(EMUFS_REG_ID) < emu->tam_reg) block_id = block_id/2;
        if (emufs_fsc_truncate(emu, block_id)!= 0)
                PERR("NO TURNQUE EL FSC");
 }