Fixed leak en MTF

[z.facultad/75.06/jacu.git] / src / blocksorting / bs.c

diff --git a/src/blocksorting/bs.c b/src/blocksorting/bs.c
index ddd6aef86a89e989fb5b7bd200b99bebb4f13be8..a1e14a252cb3e476088a2633e704da95c5d4fc80 100644 (file)
--- a/src/blocksorting/bs.c
+++ b/src/blocksorting/bs.c
@@ -1,6 +1,7 @@
 
 #include "bs.h"
 #include <stdlib.h>
 
 #include "bs.h"
 #include <stdlib.h>

+#include <ctype.h>

 
 /* Block Sorting Optimizado en memoria! */
 
 
 /* Block Sorting Optimizado en memoria! */
 


@@ -27,18 +28,11 @@ int _compare(const void *d1, const void *d2) {
 
 int __compare(const void *d1, const void *d2) {
        t_BlockSortData *s1, *s2;
 
 int __compare(const void *d1, const void *d2) {
        t_BlockSortData *s1, *s2;

-       char i;

 
        s1 = (t_BlockSortData *)d1;
        s2 = (t_BlockSortData *)d2;
 
 
        s1 = (t_BlockSortData *)d1;
        s2 = (t_BlockSortData *)d2;
 

-       i = es_menor(s1->bs->data, s1->bs, s1->pos_inicial, s2->pos_inicial);
-
-/*     if (i == 0) {*/
-               /* si ambos strings son iguales, fuerzo a que d1 quede primero */
-               /*return -1;
-       }*/
-       return i;
+       return  es_menor(s1->bs->data, s1->bs, s1->pos_inicial, s2->pos_inicial);

 }
 
 char es_menor(char *data, t_BlockSort *bs, int i, int j)
 }
 
 char es_menor(char *data, t_BlockSort *bs, int i, int j)


@@ -73,26 +67,16 @@ void ordenar_array(char *data, t_BlockSort *bs)
        qsort(bs->array, bs->len, sizeof(t_BlockSortData), __compare);
 }
 
        qsort(bs->array, bs->len, sizeof(t_BlockSortData), __compare);
 }
 

-void print_(char *data, Uint32 pos, Uint32 len)
-{
-       Uint32 i;
-
-       for(i=0; i<len; i++)
-               fprintf(stderr, "%c", data[(pos+i)%len]);
-       fprintf(stderr, "\n");
-}
-

 int generar_salida(char *data, t_BlockSort *bs, char *salida)
 {
        Uint32 i, k;
        char *out;
 
 int generar_salida(char *data, t_BlockSort *bs, char *salida)
 {
        Uint32 i, k;
        char *out;
 

-       /* Dejo lugar para guardar el k y el tamaño de este bloque */
-       out = salida + sizeof(Uint32)*2;
+       /* Dejo lugar para guardar el K */
+       out = salida + sizeof(Uint32);

 
        k=-1;
        for(i=0; i<bs->len; i++) {
 
        k=-1;
        for(i=0; i<bs->len; i++) {

-               /* print_(data, bs->array[i].pos_inicial, bs->len); */

                out[i] = data[bs->array[i].pos_final];
                if (bs->array[i].ord == 1) k = i;
        }
                out[i] = data[bs->array[i].pos_final];
                if (bs->array[i].ord == 1) k = i;
        }


@@ -111,24 +95,11 @@ void bs_solve(char *in, char *out, t_BlockSort *bs, Uint32 *k, Uint32 leido)
        ordenar_array(in, bs);
        (*k) = generar_salida(in, bs, out);
 
        ordenar_array(in, bs);
        (*k) = generar_salida(in, bs, out);
 

-       /* Guardo el k y el tamaño en el array */
-       memcpy(out, &leido, sizeof(Uint32));
-       memcpy(out+sizeof(Uint32), k, sizeof(Uint32));
+       /* Guardo el k y el tamaño en el array */       
+       memcpy(out, k, sizeof(Uint32));

        bs->len = l;
 }
 
        bs->len = l;
 }
 

-void print_v(t_BlockSortDecode *d, size_t len)
-{
-       size_t i;
-       
-       for(i=0; i<len; i++)
-               printf("(%ld)", d[i].sig);
-       printf("\n");
-       for(i=0; i<len; i++)
-               printf("(%d)", d[i].c);
-       printf("\n");
-}
-

 void bs_restore(char *dst, char *c, Uint32 k, Uint32 len)
 {
        Uint32 i, current;
 void bs_restore(char *dst, char *c, Uint32 k, Uint32 len)
 {
        Uint32 i, current;


@@ -141,11 +112,7 @@ void bs_restore(char *dst, char *c, Uint32 k, Uint32 len)
                in[i].sig = i;
        }
 
                in[i].sig = i;
        }
 

-       /*printf("Antes de QSort\n");
-       print_v(in, len);*/

        qsort(in, len, sizeof(t_BlockSortDecode), _compare);
        qsort(in, len, sizeof(t_BlockSortDecode), _compare);

-       /*printf("Despues de QSort\n");
-       print_v(in, len);*/

        
        current = k;
        i=0;
        
        current = k;
        i=0;


@@ -154,8 +121,6 @@ void bs_restore(char *dst, char *c, Uint32 k, Uint32 len)
                current = in[current].sig;
        } while (current != k);
        free(in);
                current = in[current].sig;
        } while (current != k);
        free(in);

-
-       if (i < len) printf("Noo %ld != %ld\n", i, len);

 }
 
 t_BlockSort *bs_create(Uint32 len)
 }
 
 t_BlockSort *bs_create(Uint32 len)


@@ -176,3 +141,53 @@ void bs_destroy(t_BlockSort *bs)
        free(bs);
 }
 
        free(bs);
 }
 

+
+void bs_EOL(char *data, Uint32 pagesize, Uint32 *j)
+{
+       /* Trato de agregar 4 espacios antes y 4 despues de un \n */
+       int i = (*j);
+
+       /* Verifico poder hacerlo */
+       if ((i+9) >= pagesize) return; /* No pude! */
+       
+       data[i++] = ' ';
+       data[i++] = ' ';
+       data[i++] = ' ';
+       data[i++] = ' ';
+       data[i++] = ' ';
+       data[i++] = ' ';
+       data[i++] = ' ';
+       data[i++] = ' ';
+       data[i++] = ' ';
+
+       (*j) += 9;
+}
+
+int bs_readblock(FILE *fp, char *data, Uint32 pagesize)
+{
+       Uint32 i=0;
+       char c;
+       while ((!feof(fp)) && (i < pagesize)) {
+               c = fgetc(fp);
+/*             if (c != '\n')*/
+               if (c == '\0') {
+                       /* Debo encodear el \0 para que no complique */
+                       data[i++] = 0x00;
+                       data[i++] = 0xFF;
+               }
+               if (isupper(c)) {
+                       data[i++] = '\0';
+                       data[i++] = tolower(c);
+               } else {
+                       data[i++] = c;
+               }
+/*             else
+                       bs_EOL(data, pagesize, &i);*/
+       }
+
+       /* Saco un EOF que lee de mas */
+       if (i<pagesize) i--;
+
+       return i;
+}
+