fp = fopen(argv[optind], "rb");
fp_out = fopen("tmp.comp", "wb");
- c = fgetc(fp);
+ /*c = fgetc(fp);*/
total = 0;
while (!feof(fp)) {
i = 0;
while ((!feof(fp)) && (i < pagesize)) {
- data[i++] = c;
- c = fgetc(fp);
+ data[i++] = fgetc(fp);
total++;
}
+ /* Saco un EOF que lee de mas */
+ if (i<pagesize) i--;
+
/* Hago el BS */
bs_solve(data, salida, bs, &k, i);
- printf("BS k=%ld\n", *(Uint32 *)(salida+sizeof(Uint32)));
+ /*printf("BS k=%ld\n", *(Uint32 *)(salida+sizeof(Uint32)));
printf("PageSize = %ld\n", *(Uint32 *)salida);
printf("Antes de MTF = %ld [", i);
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);
-
+/*
printf("MTF Z (len=%d) = [", z_len);
{
int ii;
printf("(%c)", z[ii]);
printf("]\n");
- }
+ }*/
/* Si me lo piden, aplico ZG. */
if (zflag) {
size_t len;
fwrite(z, z_len, sizeof(char), fp_out);
/* Guardo la salida del MTF */
- printf("Despues de MTF : [");
+ /*printf("Despues de MTF : [");*/
for(j=0; j<(i+sizeof(Uint32)); j++) {
fputc(mtf[j], fp_out);
- putchar('(');
+ /* putchar('(');
fputc(mtf[j], stdout);
- putchar(')');
+ putchar(')');*/
}
- printf("]\n");
+ /*printf("]\n");*/
}
free(mtf);
free(z);
}
+ printf("Total Bytes read = %ld\n", total);
/* Limpiando */
fclose(fp);
fclose(fp_out);
while (!feof(fp_in)) {
block_size = 0;
- PERR("Leo bloque");
fread(&block_size, sizeof(Uint32), 1, fp_in);
- printf("PageSize = %ld\n", block_size);
if (block_size > 0) {
+ printf("PageSize = %ld\n", block_size);
fread(&z_len, sizeof(int), 1, fp_in);
z = malloc(sizeof(char)*z_len);
fread(z, z_len, sizeof(char), fp_in);
- printf("MTF Z (len=%d) = [", z_len);
+ /*printf("MTF Z (len=%d) = [", z_len);
{
int ii;
for(ii=0; ii<z_len; ii++)
printf("(%c)", z[ii]);
printf("]\n");
- }
+ }*/
block = malloc(block_size*sizeof(char)+sizeof(Uint32));
orig = malloc(block_size*sizeof(char));
fread(block, block_size+sizeof(Uint32), sizeof(char), fp_in);
- printf("Antes MTF_inv = [");
+ /*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*sizeof(char)+sizeof(Uint32));
- printf("Luego de MTF Inv= [");
+ /*printf("Luego de MTF Inv= [");
{
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, mtf, sizeof(Uint32));
- printf("Restored : k=%ld\n", k);
- PERR("BS_Restore");
+ /*printf("Restored : k=%ld\n", k);*/
bs_restore(orig, mtf+sizeof(Uint32), k, block_size);
- PERR("Saving Data");
fwrite(orig, block_size, sizeof(char), fp_out);
free(block);
free(orig);