* Ahora la GUI maneja los articulos con tipo1 y las facturas con t3. Aun queda un...

[z.facultad/75.06/emufs.git] / emufs / fsc.c

diff --git a/emufs/fsc.c b/emufs/fsc.c
index 1cf873f481b9981df215fc06bcedb6520e36e4db..43dc627552949b1cb33341c812d1c82a56473947 100644 (file)
--- a/emufs/fsc.c
+++ b/emufs/fsc.c
@@ -45,8 +45,8 @@ int emufs_fsc_crear(EMUFS* efs)
        return emufs_crear_archivo_auxiliar(efs->nombre, EMUFS_FSC_EXT);
 }
 
        return emufs_crear_archivo_auxiliar(efs->nombre, EMUFS_FSC_EXT);
 }
 

-/* Agrega un registro al archivo de espacios libres. */
-int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID n_Marker, EMUFS_FREE n_FreeSpace)
+/* Agrega un registro al archivo de espacio libre en bloque. */
+int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID n_marker, EMUFS_FREE n_freespace)

 {
        FILE *f_fsc;
        EMUFS_FSC reg;
 {
        FILE *f_fsc;
        EMUFS_FSC reg;


@@ -56,8 +56,8 @@ int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID n_Marker, EMUFS_FREE n_FreeSpac
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        
        /* Cargo el registro */
        strcat(name_f_fsc, EMUFS_FSC_EXT);
        
        /* Cargo el registro */

-       reg.n_Marker = n_Marker;
-       reg.n_FreeSpace = n_FreeSpace;
+       reg.n_marker = n_marker;
+       reg.n_freespace = n_freespace;

 
        /* Lo guardo en el archivo al final "a+"*/
        if ( (f_fsc = fopen(name_f_fsc,"a+"))==NULL ) return -1;
 
        /* Lo guardo en el archivo al final "a+"*/
        if ( (f_fsc = fopen(name_f_fsc,"a+"))==NULL ) return -1;


@@ -66,8 +66,161 @@ int emufs_fsc_agregar(EMUFS *emu, EMUFS_BLOCK_ID n_Marker, EMUFS_FREE n_FreeSpac
        return 0;
 }
 
        return 0;
 }
 

+/* Agrega un GAP en el archivo de Gaps para Filetype 2 */
+int emufs_fsc_agregar_gap(EMUFS *emu, EMUFS_OFFSET n_marker, EMUFS_FREE n_freespace)
+{
+       FILE *f_fsc;
+       EMUFS_FSC gap_aux,gap_before,gap_after,gap_new;
+       char name_f_fsc[255];
+       EMUFS_REG_ID n_gap_before = 0, n_gap_after = 0;
+       unsigned long n_source,n_destination,n_filesize,n_reg_count = 0,n_moved = 0;
+               
+       strcpy(name_f_fsc,emu->nombre);
+       strcat(name_f_fsc, EMUFS_FSC_EXT);
+       
+       gap_before.n_marker = -1;
+       gap_after.n_marker = -1;
+       
+       /* Busco si hay un GAP por delante y/o por detras del que se esta por crear */
+       /* para en dicho caso realizar un merge! */
+       if ( (f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1; 
+       while ( !feof(f_fsc) ){
+               if ( fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
+               
+               /* Chequeo si es un gap justo anterior al nuestro */
+               if (gap_aux.n_marker+gap_aux.n_freespace == n_marker) {
+                       gap_before.n_marker = gap_aux.n_marker;
+                       gap_before.n_freespace = gap_aux.n_freespace;
+                       n_gap_before = n_reg_count;
+               }
+               
+               /* Chequeo si es un gap justo posterior al nuestro */           
+               if (gap_aux.n_marker == n_marker+n_freespace) {
+                       gap_after.n_marker = gap_aux.n_marker;
+                       gap_after.n_freespace = gap_aux.n_freespace;
+                       n_gap_after = n_reg_count;
+               }               
+               n_reg_count += 1;
+       }
+       
+       /* Si no encontre gaps ni por delante ni por detras */
+       if ((gap_before.n_marker == -1) && (gap_after.n_marker == -1)) {
+               /* Lo guardo en el archivo al final */
+               gap_new.n_marker = n_marker;
+               gap_new.n_freespace = n_freespace;
+               fseek(f_fsc,0,SEEK_END);
+               fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               fclose(f_fsc);          
+       }
+       
+       /* Si encuentro un GAP Justo por delante pero no por detras */
+       if ((gap_before.n_marker != -1) && (gap_after.n_marker == -1))
+       {
+         printf("fsc.c >> Found GAP justo por Delante pero no por Detras!!\n");
+         printf("fsc.c >> Gap found is reg number %lu in .fsc file\n",n_gap_before);
+         /* Me posiciono en el registro que indica dicho gap y lo reescribo con */
+         /* la suma de los espacios libres */    
+         fseek(f_fsc,sizeof(EMUFS_FSC)*n_gap_before,0);
+      gap_new.n_marker = gap_before.n_marker;
+         gap_new.n_freespace = gap_before.n_freespace + n_freespace;
+         fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+         fclose(f_fsc);
+       }
+       
+       /* Si encuentro un GAP Justo por detras pero no por delante */
+       if ((gap_before.n_marker == -1) && (gap_after.n_marker != -1))
+       {
+         printf("fsc.c >> Found GAP justo por Detras pero no por Delante!!\n");
+      printf("fsc.c >> Gap found is reg number %lu in .fsc file\n",n_gap_after);               
+         /* Me posiciono en el registro que indica dicho gap y lo reescribo con */
+         /* los datos actualizados de offset y espacio */
+         fseek(f_fsc,sizeof(EMUFS_FSC)*n_gap_after,0);
+      gap_new.n_marker = gap_after.n_marker - n_freespace;
+         gap_new.n_freespace = gap_after.n_freespace + n_freespace;
+         fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+         fclose(f_fsc);
+       }
+       
+       /* Finalmente, si encuentro Justo por delante y por detras..*/
+       if ((gap_before.n_marker != -1) && (gap_after.n_marker != -1))
+       {
+         printf("fsc.c >> Found GAP justo por Delante y por Detras!!\n");
+         printf("fsc.c >> Pre Gap found is reg number %lu in .fsc file\n",n_gap_before);       
+         printf("fsc.c >> Post Gap found is reg number %lu in .fsc file\n",n_gap_after);               
+         /* Guardo el nuevo GAP que posee los tres espacios sumados */
+         fseek(f_fsc,sizeof(EMUFS_FSC)*n_gap_before,0);
+      gap_new.n_marker = gap_before.n_marker;
+         gap_new.n_freespace = gap_before.n_freespace + n_freespace + gap_after.n_freespace;
+         fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               
+         /* Preparo el escenario para la movida de registros */
+         n_destination = sizeof(EMUFS_FSC)*n_gap_after;
+         n_source = n_destination+sizeof(EMUFS_FSC); /* Salteo el gap_after! */
+         fseek(f_fsc,0,SEEK_END);
+         n_filesize = ftell(f_fsc);
+         n_reg_count = (n_filesize - n_source) / sizeof(EMUFS_FSC);
+         printf("Destination: %lu  Source: %lu  Cant Regs a Mover: %lu\n",n_destination,n_source,n_reg_count);
+               
+         /* Comienzo a mover */
+         while (n_moved < n_reg_count) {
+        fseek(f_fsc,n_source,0);
+        fread(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               fseek(f_fsc,-sizeof(EMUFS_FSC)*2,SEEK_CUR);
+               fwrite(&gap_new,sizeof(EMUFS_FSC),1,f_fsc);
+               n_source += sizeof(EMUFS_FSC);          
+               ++n_moved;
+         }
+         fclose(f_fsc);
+         truncate(name_f_fsc, n_filesize - sizeof(EMUFS_FSC)); 
+       }       
+       
+    return 0;
+}
+
+/* Elimina un registro GAP del archivo de espacios libres (gaps) */
+int emufs_fsc_remove_gap(EMUFS *emu, EMUFS_OFFSET n_marker)
+{
+       FILE *f_fsc;
+       EMUFS_FSC gap_aux;
+       char name_f_fsc[255];
+    unsigned long n_source,n_destination,n_filesize,n_reg_count = 0,n_moved = 0;       
+               
+       strcpy(name_f_fsc,emu->nombre);
+       strcat(name_f_fsc, EMUFS_FSC_EXT);
+       
+       /* Busco el Gap en el .fsc */
+    if ((f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1; 
+       while ( !feof(f_fsc) ){
+               if ( fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
+               if ( gap_aux.n_marker == n_marker ) break;
+       }
+       
+       /* Preparo el escenario para la movida de registros */
+       fseek(f_fsc,-sizeof(EMUFS_FSC),SEEK_CUR);
+       n_destination = ftell(f_fsc);
+       n_source = n_destination+sizeof(EMUFS_FSC); /* Salteo el gap a eliminar! */
+       fseek(f_fsc,0,SEEK_END);
+       n_filesize = ftell(f_fsc);
+       n_reg_count = (n_filesize - n_source) / sizeof(EMUFS_FSC);
+       printf("Destination: %lu  Source: %lu  Cant Regs a Mover: %lu\n",n_destination,n_source,n_reg_count);
+               
+       /* Comienzo a mover */
+       while (n_moved < n_reg_count) {
+         fseek(f_fsc,n_source,0);
+      fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc);
+         fseek(f_fsc,-sizeof(EMUFS_FSC)*2,SEEK_CUR);
+         fwrite(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc);
+         n_source += sizeof(EMUFS_FSC);                
+         ++n_moved;
+       }
+       fclose(f_fsc);
+       truncate(name_f_fsc, n_filesize - sizeof(EMUFS_FSC));
+       
+       return 0;
+}
+

 /* Objetivo: Actualiza un registro de espacio libre de acorde al FType */
 /* Objetivo: Actualiza un registro de espacio libre de acorde al FType */

-int emufs_fsc_actualizar(EMUFS *emu, EMUFS_BLOCK_ID n_Marker, EMUFS_FREE n_FreeSpace)
+int emufs_fsc_actualizar(EMUFS *emu, EMUFS_BLOCK_ID n_marker, EMUFS_FREE n_freespace)

 {
        FILE *f_fsc;
        EMUFS_FSC reg;
 {
        FILE *f_fsc;
        EMUFS_FSC reg;


@@ -77,11 +230,11 @@ int emufs_fsc_actualizar(EMUFS *emu, EMUFS_BLOCK_ID n_Marker, EMUFS_FREE n_FreeS
        strcat(name_f_fsc, EMUFS_FSC_EXT);
 
        /*busco el bloque o gap que modifique*/
        strcat(name_f_fsc, EMUFS_FSC_EXT);
 
        /*busco el bloque o gap que modifique*/

-    if ( (f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1; 
+       if ( (f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1; 

        while ( !feof(f_fsc) ){
                if ( fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
        while ( !feof(f_fsc) ){
                if ( fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;

-               if ( reg.n_Marker == n_Marker ){
-                       reg.n_FreeSpace = n_FreeSpace;
+               if ( reg.n_marker == n_marker ){
+                       reg.n_freespace = n_freespace;

                        fseek(f_fsc,-sizeof(EMUFS_FSC),SEEK_CUR);
                        fwrite(&reg,sizeof(EMUFS_FSC),1,f_fsc);
                        break;
                        fseek(f_fsc,-sizeof(EMUFS_FSC),SEEK_CUR);
                        fwrite(&reg,sizeof(EMUFS_FSC),1,f_fsc);
                        break;


@@ -91,39 +244,68 @@ int emufs_fsc_actualizar(EMUFS *emu, EMUFS_BLOCK_ID n_Marker, EMUFS_FREE n_FreeS
        return 0;
 }
 
        return 0;
 }
 

-/* Me devuelve el ID del bloque u Offset del Gap donde quepa un registro, y guarda en n_FreeSpace el espacio libre actualizado */
-EMUFS_BLOCK_ID emufs_fsc_buscar_lugar(EMUFS *emu, EMUFS_FREE n_RegSize, EMUFS_FREE *n_FreeSpace)
+/* Actualiza un registro de gap, en el archivo de Gaps en Disco */
+int emufs_fsc_actualizar_gap(EMUFS *emu, EMUFS_OFFSET n_marker, EMUFS_FREE n_freespace)
+{
+       FILE *f_fsc;
+       EMUFS_FSC gap_aux;
+       char name_f_fsc[255];
+       
+       strcpy(name_f_fsc,emu->nombre);
+       strcat(name_f_fsc, EMUFS_FSC_EXT);
+
+       /*busco el bloque o gap que modifique*/
+       if ( (f_fsc = fopen(name_f_fsc,"r+")) == NULL) return -1; 
+       while ( !feof(f_fsc) ){
+               if ( fread(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
+               if ( gap_aux.n_marker == n_marker ){
+                       gap_aux.n_marker = n_marker + gap_aux.n_freespace - n_freespace;
+                       gap_aux.n_freespace = n_freespace;
+                       fseek(f_fsc,-sizeof(EMUFS_FSC),SEEK_CUR);
+                       fwrite(&gap_aux,sizeof(EMUFS_FSC),1,f_fsc);
+                       break;
+               }
+       }
+       fclose(f_fsc);
+       return 0;
+}
+
+/* Me devuelve el ID del bloque u Offset del Gap donde quepa un registro, y guarda en n_freespace el espacio libre actualizado */
+EMUFS_BLOCK_ID emufs_fsc_buscar_lugar(EMUFS *emu, EMUFS_FREE n_regsize, EMUFS_FREE *n_freespace)

 {
        FILE *f_fsc;
        EMUFS_FSC reg;
        char name_f_fsc[255];
 {
        FILE *f_fsc;
        EMUFS_FSC reg;
        char name_f_fsc[255];

-       unsigned short int b_Found = 0;
+       char found = 0;

        
        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);
 
        
        strcpy(name_f_fsc,emu->nombre);
        strcat(name_f_fsc, EMUFS_FSC_EXT);
 

-       if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return -1;
+       if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return EMUFS_NOT_FOUND;

 
        /* Inicializamos la estructura para devolver algun valor en concreto */
        /* en caso de que no se halle un espacio libre apropiado */
 
        /* Inicializamos la estructura para devolver algun valor en concreto */
        /* en caso de que no se halle un espacio libre apropiado */

-       while(!feof(f_fsc) && !b_Found){
+       while(!feof(f_fsc)){

                if (fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;
                if (fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1) continue;

-               if (reg.n_FreeSpace >= n_RegSize) b_Found = 1;
+               if (reg.n_freespace >= n_regsize) {
+                       found = 1;
+                       break;
+               }

        }
        
        /* Si salio por error o por fin de archivo y no encontro space... */
        }
        
        /* Si salio por error o por fin de archivo y no encontro space... */

-       if (!b_Found) {
-         reg.n_Marker = -1;
-         *n_FreeSpace = emu->tam_bloque; 
+       if (!found) {
+         reg.n_marker = EMUFS_NOT_FOUND;
+         *n_freespace = emu->tam_bloque; 

        }
        }

-       else *n_FreeSpace = reg.n_FreeSpace;
+       else *n_freespace = reg.n_freespace;

        
        fclose(f_fsc);
        
        fclose(f_fsc);

-       return reg.n_Marker;
+       return reg.n_marker;

 }
 
 /* Devuelve el espacio libre de un Bloque o Gap dado */
 }
 
 /* Devuelve el espacio libre de un Bloque o Gap dado */

-EMUFS_FREE emufs_fsc_get_fs(EMUFS *emu, EMUFS_BLOCK_ID n_Marker)
+EMUFS_FREE emufs_fsc_get_fs(EMUFS *emu, EMUFS_BLOCK_ID n_marker)

 {
        FILE *f_fsc;
        EMUFS_FSC reg;
 {
        FILE *f_fsc;
        EMUFS_FSC reg;


@@ -136,10 +318,10 @@ EMUFS_FREE emufs_fsc_get_fs(EMUFS *emu, EMUFS_BLOCK_ID n_Marker)
        if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return -1;
        while ( !feof(f_fsc) ){
                if ( fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1 ) continue;
        if ( (f_fsc = fopen(name_f_fsc,"r"))==NULL ) return -1;
        while ( !feof(f_fsc) ){
                if ( fread(&reg,sizeof(EMUFS_FSC),1,f_fsc) != 1 ) continue;

-               if ( reg.n_Marker == n_Marker )
+               if ( reg.n_marker == n_marker )

                        break;
        }
                
        fclose(f_fsc);
                        break;
        }
                
        fclose(f_fsc);

-       return reg.n_FreeSpace;
+       return reg.n_freespace;

 }
 }