Mercurial > emacs
changeset 5445:44e193cc8f49
Fix up whitespace. Get rid of spurious casts to void.
[MSDOS]: Use binary file modes for non-text side of pipe.
(main): Use fclose to close file opened by fopen.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Thu, 06 Jan 1994 03:56:59 +0000 |
parents | e65b4acb9e6a |
children | 726a3dc867a6 |
files | lib-src/hexl.c |
diffstat | 1 files changed, 159 insertions(+), 138 deletions(-) [+] |
line wrap: on
line diff
--- a/lib-src/hexl.c Wed Jan 05 23:56:57 1994 +0000 +++ b/lib-src/hexl.c Thu Jan 06 03:56:59 1994 +0000 @@ -1,5 +1,8 @@ #include <stdio.h> #include <ctype.h> +#ifdef MSDOS +#include <fcntl.h> +#endif #define DEFAULT_GROUPING 0x01 #define DEFAULT_BASE 16 @@ -9,211 +12,229 @@ #define TRUE (1) #define FALSE (0) -extern void exit(), perror(); +extern void exit (), perror (); int base = DEFAULT_BASE, un_flag = FALSE, iso_flag = FALSE, endian = 1; int group_by = DEFAULT_GROUPING; char *progname; -main(argc, argv) -int argc; -char *argv[]; +main (argc, argv) + int argc; + char *argv[]; { - register long address; - char string[18]; - FILE *fp; + register long address; + char string[18]; + FILE *fp; - progname = *argv++; --argc; + progname = *argv++; --argc; - /* - ** -hex hex dump - ** -oct Octal dump - ** -group-by-8-bits - ** -group-by-16-bits - ** -group-by-32-bits - ** -group-by-64-bits - ** -iso iso character set. - ** -big-endian Big Endian - ** -little-endian Little Endian - ** -un || -de from hexl format to binary. - ** -- End switch list. - ** <filename> dump filename - ** - (as filename == stdin) - */ + /* + ** -hex hex dump + ** -oct Octal dump + ** -group-by-8-bits + ** -group-by-16-bits + ** -group-by-32-bits + ** -group-by-64-bits + ** -iso iso character set. + ** -big-endian Big Endian + ** -little-endian Little Endian + ** -un || -de from hexl format to binary. + ** -- End switch list. + ** <filename> dump filename + ** - (as filename == stdin) + */ - while (*argv && *argv[0] == '-' && (*argv)[1]) + while (*argv && *argv[0] == '-' && (*argv)[1]) { - /* A switch! */ - if (!strcmp(*argv, "--")) + /* A switch! */ + if (!strcmp (*argv, "--")) { - --argc; argv++; - break; - } else if (!strcmp(*argv, "-un") || !strcmp(*argv, "-de")) + --argc; argv++; + break; + } + else if (!strcmp (*argv, "-un") || !strcmp (*argv, "-de")) { - un_flag = TRUE; - --argc; argv++; - } else if (!strcmp(*argv, "-hex")) + un_flag = TRUE; + --argc; argv++; + } + else if (!strcmp (*argv, "-hex")) { - base = 16; - --argc; argv++; - } else if (!strcmp(*argv, "-iso")) + base = 16; + --argc; argv++; + } + else if (!strcmp (*argv, "-iso")) { - iso_flag = TRUE; - --argc; argv++; - } else if (!strcmp(*argv, "-oct")) + iso_flag = TRUE; + --argc; argv++; + } + else if (!strcmp (*argv, "-oct")) { - base = 8; - --argc; argv++; - } else if (!strcmp(*argv, "-big-endian")) + base = 8; + --argc; argv++; + } + else if (!strcmp (*argv, "-big-endian")) { - endian = 1; - --argc; argv++; - } else if (!strcmp(*argv, "-little-endian")) + endian = 1; + --argc; argv++; + } + else if (!strcmp (*argv, "-little-endian")) { - endian = 0; - --argc; argv++; - } else if (!strcmp(*argv, "-group-by-8-bits")) + endian = 0; + --argc; argv++; + } + else if (!strcmp (*argv, "-group-by-8-bits")) { - group_by = 0x00; - --argc; argv++; - } else if (!strcmp(*argv, "-group-by-16-bits")) + group_by = 0x00; + --argc; argv++; + } + else if (!strcmp (*argv, "-group-by-16-bits")) { - group_by = 0x01; - --argc; argv++; - } else if (!strcmp(*argv, "-group-by-32-bits")) + group_by = 0x01; + --argc; argv++; + } + else if (!strcmp (*argv, "-group-by-32-bits")) { - group_by = 0x03; - --argc; argv++; - } else if (!strcmp(*argv, "-group-by-64-bits")) + group_by = 0x03; + --argc; argv++; + } + else if (!strcmp (*argv, "-group-by-64-bits")) { - group_by = 0x07; - endian = 0; - --argc; argv++; - } else + group_by = 0x07; + endian = 0; + --argc; argv++; + } + else { - (void) fprintf(stderr, "%s: invalid switch: \"%s\".\n", progname, - *argv); - usage(); + fprintf (stderr, "%s: invalid switch: \"%s\".\n", progname, + *argv); + usage (); } } - do + do { - if (*argv == NULL) - fp = stdin; - else + if (*argv == NULL) + fp = stdin; + else { - char *filename = *argv++; + char *filename = *argv++; - if (!strcmp(filename, "-")) - fp = stdin; - else - if ((fp = fopen(filename, "r")) == NULL) - { - perror(filename); - continue; - } + if (!strcmp (filename, "-")) + fp = stdin; + else if ((fp = fopen (filename, "r")) == NULL) + { + perror (filename); + continue; + } } - if (un_flag) + if (un_flag) { - char buf[18]; + char buf[18]; - for (;;) +#ifdef MSDOS + (stdout)->_flag &= ~_IOTEXT; /* print binary */ + _setmode (fileno (stdout), O_BINARY); +#endif + for (;;) { - register int i, c, d; + register int i, c, d; -#define hexchar(x) (isdigit(x) ? x - '0' : x - 'a' + 10) - - (void) fread(buf, 1, 10, fp); /* skip 10 bytes */ +#define hexchar(x) (isdigit (x) ? x - '0' : x - 'a' + 10) - for (i=0; i < 16; ++i) + fread (buf, 1, 10, fp); /* skip 10 bytes */ + + for (i=0; i < 16; ++i) { - if ((c = getc(fp)) == ' ' || c == EOF) - break; + if ((c = getc (fp)) == ' ' || c == EOF) + break; - d = getc(fp); - c = hexchar(c) * 0x10 + hexchar(d); - (void) putchar(c); + d = getc (fp); + c = hexchar (c) * 0x10 + hexchar (d); + putchar (c); - if ((i&group_by) == group_by) - (void) getc(fp); + if ((i&group_by) == group_by) + getc (fp); } - if (c == ' ') + if (c == ' ') { - while ((c = getc(fp)) != '\n' && c != EOF) - ; + while ((c = getc (fp)) != '\n' && c != EOF) + ; - if (c == EOF) - break; + if (c == EOF) + break; } - else + else { - if (i < 16) - break; + if (i < 16) + break; - (void) fread(buf, 1, 18, fp); /* skip 18 bytes */ + fread (buf, 1, 18, fp); /* skip 18 bytes */ } } } - else + else { - address = 0; - string[0] = ' '; - string[17] = '\0'; - for (;;) +#ifdef MSDOS + (fp)->_flag &= ~_IOTEXT; /* read binary */ + _setmode (fileno (fp), O_BINARY); +#endif + address = 0; + string[0] = ' '; + string[17] = '\0'; + for (;;) { - register int i, c; - - for (i=0; i < 16; ++i) - { - if ((c = getc(fp)) == EOF) - { - if (!i) - break; + register int i, c; - (void) fputs(" ", stdout); - string[i+1] = '\0'; - } - else + for (i=0; i < 16; ++i) + { + if ((c = getc (fp)) == EOF) { - if (!i) - (void) printf("%08x: ", address); + if (!i) + break; - if (iso_flag) - string[i+1] = - (c < 0x20 || (c >= 0x7F && c < 0xa0)) ? '.' :c; - else - string[i+1] = (c < 0x20 || c >= 0x7F) ? '.' : c; + fputs (" ", stdout); + string[i+1] = '\0'; + } + else + { + if (!i) + printf ("%08x: ", address); - (void) printf("%02x", c); + if (iso_flag) + string[i+1] = + (c < 0x20 || (c >= 0x7F && c < 0xa0)) ? '.' :c; + else + string[i+1] = (c < 0x20 || c >= 0x7F) ? '.' : c; + + printf ("%02x", c); } - if ((i&group_by) == group_by) - (void) putchar(' '); + if ((i&group_by) == group_by) + putchar (' '); } - if (i) - (void) puts(string); + if (i) + puts (string); - if (c == EOF) - break; + if (c == EOF) + break; - address += 0x10; + address += 0x10; } } - if (fp != stdin) - (void) close(fp); + if (fp != stdin) + fclose (fp); } while (*argv != NULL); - return 0; + return 0; } -usage() +usage () { - (void) fprintf(stderr, "usage: %s [-de] [-iso]\n", progname); - exit(1); + fprintf (stderr, "usage: %s [-de] [-iso]\n", progname); + exit (1); }