/* Hago el BS */
bs_solve(data, salida, bs, &k, i);
- printf("BS k=%ld\n", k);
- printf("PageSize = %ld\n", i);
+ printf("BS k=%ld\n", *(Uint32 *)(salida+sizeof(Uint32)));
+ printf("PageSize = %ld\n", *(Uint32 *)salida);
+ printf("Antes de MTF = %ld [", i);
+ {
+ int ii;
+ for(ii=0; ii<(i+sizeof(Uint32)); ii++)
+ printf("(%c)", salida[ii+sizeof(Uint32)]);
+ printf("]\n");
+ }
/* Le aplico el MTF, salteo el tamaño del bloque para que no se pierda. */
mtf = jacu_mtf(salida+sizeof(Uint32), i+sizeof(Uint32), &z, &z_len);
if ((len = zg_group(&zg, buff, mtf[j]))) fwrite(buff, 1, len, fp_out);
} else {
/* Guardo el PageSize */
- fwrite(&i, sizeof(Uint32), 1, fp_out);
+ fwrite(salida, sizeof(Uint32), 1, fp_out);
/* Guardo el Z len y el Z */
fwrite(&z_len, sizeof(int), 1, fp_out);
fwrite(z, z_len, sizeof(char), fp_out);
/* Guardo la salida del MTF */
- for(j=sizeof(Uint32); j<i; j++)
- fputc(mtf[j], fp_out);
+ printf("Despues de MTF : [");
+ for(j=0; j<(i+sizeof(Uint32)); j++) {
+ fputc(mtf[j+sizeof(Uint32)], fp_out);
+ putchar('(');
+ fputc(mtf[j+sizeof(Uint32)], stdout);
+ putchar(')');
+ }
+ printf("]\n");
}
free(mtf);
free(z);
if (block_size > 0) {
block = malloc(block_size*sizeof(char)+sizeof(Uint32));
orig = malloc(block_size*sizeof(char));
- fread(block, block_size, sizeof(char), fp_in);
+ fread(block, block_size+sizeof(Uint32), sizeof(char), fp_in);
+ printf("Antes MTF_inv = [");
+ {
+ int ii;
+ for(ii=0; ii<block_size+sizeof(Uint32); ii++)
+ printf("(%c)", block[ii]);
+ printf("]\n");
+ }
/* Hago el MTF inverso */
PERR("Haciendo MTF Inv");
- mtf = jacu_mtf_inv(z, block, block_size);
+ mtf = jacu_mtf_inv(z, block, block_size*sizeof(char)+sizeof(Uint32));
+
+ printf("Luego de MTF = [");
+ {
+ int ii;
+ for(ii=0; ii<block_size+sizeof(Uint32); ii++)
+ printf("%c", mtf[ii]);
+ printf("]\n");
+ }
/* Luego de hacer el MTF inverso ya puedo recuperar el k */
PERR("Recuperando K");
- memcpy(&k, block, sizeof(Uint32));
+ memcpy(&k, mtf, sizeof(Uint32));
printf("Restored : k=%ld\n", k);
PERR("BS_Restore");