Cambios minimos, no se si entraran en la impresion :(

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

diff --git a/src/mtf/mtf.c b/src/mtf/mtf.c
index efc3700ab08611ea7f0a8322e1777348d5dbf359..4f69bc92d0f0c5216bc9a2ef14eff62f209c0935 100644 (file)
--- a/src/mtf/mtf.c
+++ b/src/mtf/mtf.c
@@ -1,9 +1,30 @@
+/*----------------------------------------------------------------------------
+ *                   jacu - Just Another Compression Utility
+ *----------------------------------------------------------------------------
+ * This file is part of jacu.
+ *
+ * jacu is free software; you can redistribute it and/or modify it under the
+ * terms of the GNU General Public License as published by the Free Software
+ * Foundation; either version 2 of the License, or (at your option) any later
+ * version.
+ *
+ * jacu is distributed in the hope that it will be useful, but WITHOUT ANY
+ * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
+ * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
+ * details.
+ *
+ * You should have received a copy of the GNU General Public License along
+ * with jacu; if not, write to the Free Software Foundation, Inc., 59 Temple
+ * Place, Suite 330, Boston, MA  02111-1307  USA
+ *----------------------------------------------------------------------------
+ */
+

 #include "mtf.h"
 
 /****privadas*****/
 int no_pertenece(char *z, char c, int len);
 
 #include "mtf.h"
 
 /****privadas*****/
 int no_pertenece(char *z, char c, int len);
 

-void pop_front(char *z, int pos);
+void pop_front(char *z, unsigned int pos);

 
 int get_pos(char *z, int len, char c);
 /****fin privadas******/
 
 int get_pos(char *z, int len, char c);
 /****fin privadas******/


@@ -16,39 +37,41 @@ void print_z(char *z, int len)
        fprintf(stderr, "\n");
 }
 
        fprintf(stderr, "\n");
 }
 

-char *jacu_mtf(char *datos, int len, char **_z, int *z_len)
+unsigned char *jacu_mtf(unsigned char *datos, int len, unsigned char **_z, int *z_len)

 {
 {

-       char *z;
-       char *pos;
+       unsigned char *z;
+       unsigned char *pos;

        int i, size;
        
        int i, size;
        

-       pos = (char *)malloc(len*sizeof(char));
+       pos = (unsigned char *)malloc(len*sizeof(unsigned char));

        z = jacu_buscar_z(datos, len, &size);
        z = jacu_buscar_z(datos, len, &size);

+       *_z = (unsigned char*)malloc(size*sizeof(unsigned char));
+       memcpy(*_z, z, size*sizeof(unsigned char));

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

-                       pop_front(z,pos[i]);
+                       pop_front(z, pos[i]);

        }
        }

-
-       (*_z) = z;

        (*z_len) = size;
        (*z_len) = size;

+       free(z);

        return pos;
 }
 
        return pos;
 }
 

-char *jacu_mtf_inv(char *z, char *pos, int len)
+unsigned char *jacu_mtf_inv(unsigned char *z, unsigned char *pos, int len)

 {
        char *datos;
        int i;
        
        datos = (char*)malloc(sizeof(char)*len);
        for(i=0; i<len; i++){
 {
        char *datos;
        int i;
        
        datos = (char*)malloc(sizeof(char)*len);
        for(i=0; i<len; i++){

-               datos[i] = z[(size_t)pos[i]];
-               pop_front(z,pos[i]);
+               datos[i] = z[(unsigned int)pos[i]];
+               if (pos[i] != 0)
+                       pop_front(z, (unsigned int)pos[i]);

        }
        return datos;
 }
 
        }
        return datos;
 }
 

-char *jacu_buscar_z(char* datos, int len, int *size)
+unsigned char *jacu_buscar_z(unsigned char* datos, int len, int *size)

 {
        char *z;
        int i, j=0;
 {
        char *z;
        int i, j=0;


@@ -70,18 +93,19 @@ int no_pertenece(char *z, char c, int len)
 {
        int i;
        
 {
        int i;
        

-       /* XXX Z NO TIENE 255 POSICIONES XXX */

        for(i=0; i<len; i++)
                if (z[i] == c)
                        return 0;
        return -1;
 }
                        
        for(i=0; i<len; i++)
                if (z[i] == c)
                        return 0;
        return -1;
 }
                        

-void pop_front(char *z, int pos)
+void pop_front(char *z, unsigned int pos)

 {
        char aux;
        int i=0;
 {
        char aux;
        int i=0;

-       
+
+       if (pos > 255) printf("pos > = %u\n", pos);
+       if (pos < 0u) printf("pos < = %d\n", pos);

        aux = z[pos];
        for(i=pos; i>0; i--)
                z[i]=z[i-1];
        aux = z[pos];
        for(i=pos; i>0; i--)
                z[i]=z[i-1];