Reemplazo printf() por fprintf(stderr) para hacer pruebas.

[z.facultad/75.06/jacu.git] / otros / mtf / mtf.c

diff --git a/otros/mtf/mtf.c b/otros/mtf/mtf.c
index dd0c8ab4b2b29c769bfde728ff0ee72c0bc29b48..993b9dabe858b01e337e25d1907e376621740ff5 100644 (file)
--- a/otros/mtf/mtf.c
+++ b/otros/mtf/mtf.c
@@ -1,7 +1,7 @@
 #include "mtf.h"
 
 /****privadas*****/
 #include "mtf.h"
 
 /****privadas*****/

-int no_pertenece(char *z, char c);
+int no_pertenece(char *z, char c, int len);

 
 void pop_front(char *z, int pos);
 
 
 void pop_front(char *z, int pos);
 


@@ -12,10 +12,19 @@ void print_z(char *z, int len)
 {
        int i;
        for(i=0; i<len; i++)
 {
        int i;
        for(i=0; i<len; i++)

-               printf("%c", z[i]);
-       printf("\n");
+               fprintf(stderr, "%c", z[i]);
+       fprintf(stderr, "\n");

 }
 
 }
 

+int comparar(const void *d1, const void *d2)
+{
+       char *c1, *c2;
+
+       c1 = (char *)d1;
+       c2 = (char *)d2;
+
+       return (*c1) - (*c2);
+}

 
 int *jacu_mtf(char *datos, int len)
 {
 
 int *jacu_mtf(char *datos, int len)
 {


@@ -25,13 +34,18 @@ int *jacu_mtf(char *datos, int len)
        
        pos = (int*)malloc(len*sizeof(int));
        z = jacu_buscar_z(datos, len, &size);
        
        pos = (int*)malloc(len*sizeof(int));
        z = jacu_buscar_z(datos, len, &size);

-       printf("Z original = ");
+       fprintf(stderr, "Z original = ");

        print_z(z, size);
        print_z(z, size);

-       printf("SIZE = %d\n", size);
-       z[0]='A';z[1]='B';z[2]='C';z[3]='D';z[4]='R';
+       fprintf(stderr, "SIZE = %d\n", size);
+       /*z[0]='A';z[1]='B';z[2]='C';z[3]='D';z[4]='R';*/
+       /* Ordeno */
+       qsort(z, size, 1, comparar);
+       fprintf(stderr, "Z ordenado = ");
+       print_z(z, size);
+

        for(i=0; i<len; i++){
                pos[i] = get_pos(z, size, datos[i]);
        for(i=0; i<len; i++){
                pos[i] = get_pos(z, size, datos[i]);

-               printf("vino %c emiti: %d\n",datos[i], pos[i]);
+               fprintf(stderr, "vino %c emiti: %d\n",datos[i], pos[i]);

                if (pos[i] != 0) 
                        pop_front(z,pos[i]);
                print_z(z, size);
                if (pos[i] != 0) 
                        pop_front(z,pos[i]);
                print_z(z, size);


@@ -43,15 +57,15 @@ int *jacu_mtf(char *datos, int len)
 char *jacu_buscar_z(char* datos, int len, int *size)
 {
        char *z;
 char *jacu_buscar_z(char* datos, int len, int *size)
 {
        char *z;

-       int i, j=1;
+       int i, j=0;

        
        

-       z = (char*)malloc(1);
-       if (z==NULL) return NULL;
+       z = NULL; /*(char*)malloc(1);*/
+       /*if (z==NULL) return NULL;*/

        for(i=0; i<len; i++){
        for(i=0; i<len; i++){

-               if( no_pertenece(z, datos[i]) ){
+               if( no_pertenece(z, datos[i], j) == -1 ){

                        j++;
                        z = realloc(z, j*sizeof(char));
                        j++;
                        z = realloc(z, j*sizeof(char));

-                       z[j]=datos[i];
+                       z[j-1]=datos[i];

                        *size = j;
                }
        }
                        *size = j;
                }
        }


@@ -59,12 +73,12 @@ char *jacu_buscar_z(char* datos, int len, int *size)
 }
        
 
 }
        
 

-int no_pertenece(char *z, char c)
+int no_pertenece(char *z, char c, int len)

 {
        int i;
        
        /* XXX Z NO TIENE 255 POSICIONES XXX */
 {
        int i;
        
        /* XXX Z NO TIENE 255 POSICIONES XXX */

-       for(i=0; i<255; i++)
+       for(i=0; i<len; i++)

                if (z[i] == c)
                        return 0;
        return -1;
                if (z[i] == c)
                        return 0;
        return -1;


@@ -84,6 +98,8 @@ void pop_front(char *z, int pos)
 int get_pos(char *z, int len, char c)
 {
        int pos;
 int get_pos(char *z, int len, char c)
 {
        int pos;

+       if (z==NULL) return -1;
+

        for(pos=0; pos<len; pos++)
                if ( z[pos] == c )
                        return pos;
        for(pos=0; pos<len; pos++)
                if ( z[pos] == c )
                        return pos;