* Modifico el main para que acepte el modo Luca y el modo Gazer :-)

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

diff --git a/otros/blocksorting/bs.c b/otros/blocksorting/bs.c
index bf39971012a9e72b11718c2fe7b923d792104700..b7caa543106a13e3088c3b787aec23be9ffb51fe 100644 (file)
--- a/otros/blocksorting/bs.c
+++ b/otros/blocksorting/bs.c
@@ -8,6 +8,8 @@ typedef struct _bs_decode_t_ {
        unsigned long int pos;
 } t_BlockSortDecode;
 
+char es_menor(char *data, t_BlockSort *bs, int i, int j);
+
 int _compare(const void *d1, const void *d2) {
        t_BlockSortDecode *s1, *s2;
 
@@ -17,13 +19,22 @@ int _compare(const void *d1, const void *d2) {
        return (s1->c - s2->c);
 }
 
+int __compare(const void *d1, const void *d2) {
+       t_BlockSortData *s1, *s2;
+
+       s1 = (t_BlockSortData *)d1;
+       s2 = (t_BlockSortData *)d2;
+
+       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)
 {
        unsigned long int pi, pj, k;
 
        for(k=0; k<bs->len; k++) {
-               pi = (bs->array[i].pos_inicial+k)%bs->len;
-               pj = (bs->array[j].pos_inicial+k)%bs->len;
+               pi = (i+k)%bs->len;
+               pj = (j+k)%bs->len;
 
                if (data[pi] > data[pj]) return 0;
                if (data[pi] < data[pj]) return 1;
@@ -39,15 +50,16 @@ void generar_array(char *data, t_BlockSort *bs)
                bs->array[i].pos_inicial = i;
                bs->array[i].pos_final = (i+bs->len-1)%bs->len;
                bs->array[i].pos_orden = 0;
-               bs->array[i].ord = 0;
+               bs->array[i].ord = (i==1)?1:0;
+               bs->array[i].bs = bs;
        }
 }
 
 void ordenar_array(char *data, t_BlockSort *bs)
 {
-       unsigned long int i, j, min;
+       /*unsigned long int i, j, min;*/
 
-       for(i=0; i<bs->len; i++) {
+/*     for(i=0; i<bs->len; i++) {
                min = -1;
                for(j=0; j<bs->len; j++) {
                        if (bs->array[j].ord) continue;
@@ -59,7 +71,8 @@ void ordenar_array(char *data, t_BlockSort *bs)
                bs->array[min].pos_orden = i;
 
                bs->ord[i] = min;
-       }
+       }*/
+       qsort(bs->array, bs->len, sizeof(t_BlockSortData), __compare);
 }
 
 int generar_salida(char *data, t_BlockSort *bs, char *salida)
@@ -67,8 +80,8 @@ int generar_salida(char *data, t_BlockSort *bs, char *salida)
        unsigned long int i, k;
        k=-1;
        for(i=0; i<bs->len; i++) {
-               salida[i] = data[bs->array[bs->ord[i]].pos_final];
-               if (bs->array[bs->ord[i]].pos_inicial == 0) k = i;
+               salida[i] = data[bs->array[i].pos_final];
+               if (bs->array[i].ord == 1) k = i;
        }
        return k;
 }
@@ -79,7 +92,8 @@ void bs_solve(char *in, char *out, t_BlockSort *bs, unsigned long int *k, unsign
        l = bs->len;
        /* Hack para pedasos menores a la pagina */
        if (leido < bs->len) bs->len = leido;
-       
+       bs->data = in;
+
        generar_array(in, bs);
        ordenar_array(in, bs);
        (*k) = generar_salida(in, bs, out);