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);
- 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);
- {
- int ii;
- for(ii=0; ii<z_len; ii++)
- printf("(%c)", z[ii]);
- printf("]\n");
-
- }
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);
+ {
+ 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");
- bs_restore(orig, block+sizeof(Uint32), k, block_size);
+ /*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);