Subversion Repositories igor

#include <stdio.h>

#include <err.h>

#include <stdlib.h>

void

bindump(char *infile, char *outfile, int line_length, int size)

{

        FILE *in, *out;

        int c;

        int i, j;

        char patterns[256][9];

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

                for (j = 0; j < 8; j++) {

                        patterns[i][j] = ((i>>(7-j))&1)+'0';

                }

                patterns[i][8] = '\0';

        }

        if (line_length % 8 != 0)

                errx(1, "Line length %d is not a multiple of 8\n", line_length);

        line_length /= 8;

        if ((in = fopen(infile, "r")) == NULL)

                err(1, "could not open %s for reading", infile);

        if ((out = fopen(outfile, "w")) == NULL)

                err(1, "could not open %s for writing", outfile);

        i = 0;

        while (1) {

                c = fgetc(in);

                if (feof(in)) break;

                if (ferror(in))

                        err(1, "error reading from %s", infile);

                if (fputs(patterns[c], out) == EOF)

                        err(1, "error writing to %s", outfile);

                if ((++i) % line_length == 0) {

                        if (fputc('\n', out) == EOF)

                                err(1, "error writing to %s", outfile);

                }

        }

        if (i % line_length != 0) {

                if (fputc('\n', out) == EOF)

                        err(1, "error writing to %s", outfile);

                warn("file length not multiple of line length (%d bits)", line_length*8);

        }

        if (size != 0) {

                int remaining = size-i/line_length;

                if (remaining < 0)

                        errx(1, "too long file, length is %d\n", i/line_length);

                if (remaining > 0) {

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

                                for (j = 0; j < line_length; j++)

                                        fputs("00000000", out);

                                fputc('\n', out);

                        }

                }

        }

        fclose(in);

        fclose(out);

}

int

main(int argc, char **argv)

{

        int size;

        if (argc < 4) {

                fprintf(stderr,

                        "usage: %s INFILE OUTFILE LINE-LENGTH [SIZE]\n"

                        "Writes each bit from INFILE as ASCII '1' or '0' in OUTFILE,\n"

                        "with a newline after every LINE-LENGTH bits.\n",

                        argv[0]);

                return 1;

        }

        size = (argc == 4) ? 0 : atoi(argv[4]);

        bindump(argv[1], argv[2], atoi(argv[3]), size);

}