annotate src/xxd/xxd.c @ 33509:e083de1ef4b4 v9.0.2003

patch 9.0.2003: xxd: compilation warning Commit: https://github.com/vim/vim/commit/7879bc5c13311c1fb6497776ed7804400852460a Author: Christian Brabandt <cb@256bit.org> Date: Sun Oct 8 20:36:44 2023 +0200 patch 9.0.2003: xxd: compilation warning Problem: xxd: compilation warning Solution: initialize variables Signed-off-by: Christian Brabandt <cb@256bit.org>
author Christian Brabandt <cb@256bit.org>
date Sun, 08 Oct 2023 20:45:05 +0200
parents 33cbd544dc46
children a3616b5f5b25
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1 /* xxd: my hexdump facility. jw
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
2 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
3 * 2.10.90 changed to word output
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
4 * 3.03.93 new indent style, dumb bug inserted and fixed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
5 * -c option, mls
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
6 * 26.04.94 better option parser, -ps, -l, -s added.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
7 * 1.07.94 -r badly needs - as input file. Per default autoskip over
1197
b7ad1c609161 updated for version 7.1b
vimboss
parents: 856
diff changeset
8 * consecutive lines of zeroes, as unix od does.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
9 * -a shows them too.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
10 * -i dump as c-style #include "file.h"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
11 * 1.11.95 if "xxd -i" knows the filename, an 'unsigned char filename_bits[]'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
12 * array is written in correct c-syntax.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
13 * -s improved, now defaults to absolute seek, relative requires a '+'.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
14 * -r improved, now -r -s -0x... is supported.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
15 * change/suppress leading '\0' bytes.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
16 * -l n improved: stops exactly after n bytes.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
17 * -r improved, better handling of partial lines with trailing garbage.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
18 * -r improved, now -r -p works again!
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
19 * -r improved, less flushing, much faster now! (that was silly)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
20 * 3.04.96 Per repeated request of a single person: autoskip defaults to off.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
21 * 15.05.96 -v added. They want to know the version.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
22 * -a fixed, to show last line inf file ends in all zeros.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
23 * -u added: Print upper case hex-letters, as preferred by unix bc.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
24 * -h added to usage message. Usage message extended.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
25 * Now using outfile if specified even in normal mode, aehem.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
26 * No longer mixing of ints and longs. May help doze people.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
27 * Added binify ioctl for same reason. (Enough Doze stress for 1996!)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
28 * 16.05.96 -p improved, removed occasional superfluous linefeed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
29 * 20.05.96 -l 0 fixed. tried to read anyway.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
30 * 21.05.96 -i fixed. now honours -u, and prepends __ to numeric filenames.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
31 * compile -DWIN32 for NT or W95. George V. Reilly, * -v improved :-)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
32 * support --gnuish-longhorn-options
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
33 * 25.05.96 MAC support added: CodeWarrior already uses ``outline'' in Types.h
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
34 * which is included by MacHeaders (Axel Kielhorn). Renamed to
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
35 * xxdline().
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
36 * 7.06.96 -i printed 'int' instead of 'char'. *blush*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
37 * added Bram's OS2 ifdefs...
19195
2ef19eed524a patch 8.2.0156: various typos in source files and tests
Bram Moolenaar <Bram@vim.org>
parents: 16606
diff changeset
38 * 18.07.96 gcc -Wall @ SunOS4 is now silent.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
39 * Added osver for MSDOS/DJGPP/WIN32.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
40 * 29.08.96 Added size_t to strncmp() for Amiga.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
41 * 24.03.97 Windows NT support (Phil Hanna). Clean exit for Amiga WB (Bram)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
42 * 02.04.97 Added -E option, to have EBCDIC translation instead of ASCII
216
da182deebec7 updated for version 7.0061
vimboss
parents: 7
diff changeset
43 * (azc10@yahoo.com)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
44 * 22.05.97 added -g (group octets) option (jcook@namerica.kla.com).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
45 * 23.09.98 nasty -p -r misfeature fixed: slightly wrong output, when -c was
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
46 * missing or wrong.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
47 * 26.09.98 Fixed: 'xxd -i infile outfile' did not truncate outfile.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
48 * 27.10.98 Fixed: -g option parser required blank.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
49 * option -b added: 01000101 binary output in normal format.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
50 * 16.05.00 Added VAXC changes by Stephen P. Wall
1197
b7ad1c609161 updated for version 7.1b
vimboss
parents: 856
diff changeset
51 * 16.05.00 Improved MMS file and merge for VMS by Zoltan Arpadffy
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
52 * 2011 March Better error handling by Florian Zumbiehl.
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
53 * 2011 April Formatting by Bram Moolenaar
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
54 * 08.06.2013 Little-endian hexdump (-e) and offset (-o) by Vadim Vygonets.
15693
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
55 * 11.01.2019 Add full 64/32 bit range to -o and output by Christer Jensen.
20601
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
56 * 04.02.2020 Add -d for decimal offsets by Aapo Rantalainen
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
57 * 14.01.2022 Disable extra newlines with -c0 -p by Erik Auerswald.
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
58 * 20.06.2022 Permit setting the variable names used by -i by David Gow
33094
e1a219f47e3a patch 9.0.1832: xxd: reporting wrong version
Christian Brabandt <cb@256bit.org>
parents: 33083
diff changeset
59 * 31.08.2023 -R never/auto/always prints colored output
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
60 * 06.10.2023 enable -r -b to reverse bit dumps
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
61 *
25076
5690cf66ee07 patch 8.2.3075: xxd always reports an old version string
Bram Moolenaar <Bram@vim.org>
parents: 20601
diff changeset
62 * (c) 1990-1998 by Juergen Weigert (jnweiger@gmail.com)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
63 *
6973
7b35ee02b3c5 patch 7.4.804
Bram Moolenaar <bram@vim.org>
parents: 6655
diff changeset
64 * I hereby grant permission to distribute and use xxd
7b35ee02b3c5 patch 7.4.804
Bram Moolenaar <bram@vim.org>
parents: 6655
diff changeset
65 * under X11-MIT or GPL-2.0 (at the user's choice).
7b35ee02b3c5 patch 7.4.804
Bram Moolenaar <bram@vim.org>
parents: 6655
diff changeset
66 *
25076
5690cf66ee07 patch 8.2.3075: xxd always reports an old version string
Bram Moolenaar <Bram@vim.org>
parents: 20601
diff changeset
67 * Contributions by Bram Moolenaar et al.
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
68 */
714
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 602
diff changeset
69
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 602
diff changeset
70 /* Visual Studio 2005 has 'deprecated' many of the standard CRT functions */
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 602
diff changeset
71 #if _MSC_VER >= 1400
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 602
diff changeset
72 # define _CRT_SECURE_NO_DEPRECATE
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 602
diff changeset
73 # define _CRT_NONSTDC_NO_DEPRECATE
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 602
diff changeset
74 #endif
15963
2d8fa45b341d patch 8.1.0987: unnecessary condition in #ifdef
Bram Moolenaar <Bram@vim.org>
parents: 15695
diff changeset
75 #if !defined(CYGWIN) && defined(__CYGWIN__)
1912
fcf44bf1218f updated for version 7.2-209
vimboss
parents: 1452
diff changeset
76 # define CYGWIN
fcf44bf1218f updated for version 7.2-209
vimboss
parents: 1452
diff changeset
77 #endif
714
0f9f4761ad9c updated for version 7.0216
vimboss
parents: 602
diff changeset
78
26859
b9ede1952107 patch 8.2.3958: build failure compiling xxd with "-std=c2x"
Bram Moolenaar <Bram@vim.org>
parents: 26366
diff changeset
79 #if (defined(__linux__) && !defined(__ANDROID__)) || defined(__CYGWIN__)
b9ede1952107 patch 8.2.3958: build failure compiling xxd with "-std=c2x"
Bram Moolenaar <Bram@vim.org>
parents: 26366
diff changeset
80 # define _XOPEN_SOURCE 700 /* for fdopen() */
b9ede1952107 patch 8.2.3958: build failure compiling xxd with "-std=c2x"
Bram Moolenaar <Bram@vim.org>
parents: 26366
diff changeset
81 #endif
b9ede1952107 patch 8.2.3958: build failure compiling xxd with "-std=c2x"
Bram Moolenaar <Bram@vim.org>
parents: 26366
diff changeset
82
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
83 #include <stdio.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
84 #ifdef VAXC
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
85 # include <file.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
86 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
87 # include <fcntl.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
88 #endif
16606
7e733046db1d patch 8.1.1306: Borland support is outdated and doesn't work
Bram Moolenaar <Bram@vim.org>
parents: 15963
diff changeset
89 #if defined(WIN32) || defined(CYGWIN)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
90 # include <io.h> /* for setmode() */
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
91 # include <windows.h>
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
92 #endif
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
93 #ifdef UNIX
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
94 # include <unistd.h>
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
95 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
96 #include <stdlib.h>
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
97 #include <string.h> /* for strncmp() */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
98 #include <ctype.h> /* for isalnum() */
15693
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
99 #include <limits.h>
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
100 #if __MWERKS__ && !defined(BEBOX)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
101 # include <unix.h> /* for fdopen() on MAC */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
102 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
103
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
104
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
105 /* This corrects the problem of missing prototypes for certain functions
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
106 * in some GNU installations (e.g. SunOS 4.1.x).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
107 * Darren Hiebert <darren@hmi.com> (sparc-sun-sunos4.1.3_U1/2.7.2.2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
108 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
109 #if defined(__GNUC__) && defined(__STDC__)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
110 # ifndef __USE_FIXED_PROTOTYPES__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
111 # define __USE_FIXED_PROTOTYPES__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
112 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
113 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
114
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
115 #ifndef __USE_FIXED_PROTOTYPES__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
116 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
117 * This is historic and works only if the compiler really has no prototypes:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
118 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
119 * Include prototypes for Sun OS 4.x, when using an ANSI compiler.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
120 * FILE is defined on OS 4.x, not on 5.x (Solaris).
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
121 * if __SVR4 is defined (some Solaris versions), don't include this.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
122 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
123 #if defined(sun) && defined(FILE) && !defined(__SVR4) && defined(__STDC__)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
124 # define __P(a) a
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
125 /* excerpt from my sun_stdlib.h */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
126 extern int fprintf __P((FILE *, char *, ...));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
127 extern int fputs __P((char *, FILE *));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
128 extern int _flsbuf __P((unsigned char, FILE *));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
129 extern int _filbuf __P((FILE *));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
130 extern int fflush __P((FILE *));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
131 extern int fclose __P((FILE *));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
132 extern int fseek __P((FILE *, long, int));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
133 extern int rewind __P((FILE *));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
134
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
135 extern void perror __P((char *));
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
136 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
137 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
138
33509
e083de1ef4b4 patch 9.0.2003: xxd: compilation warning
Christian Brabandt <cb@256bit.org>
parents: 33496
diff changeset
139 char version[] = "xxd 2023-10-08 by Juergen Weigert et al.";
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
140 #ifdef WIN32
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
141 char osver[] = " (Win32)";
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
142 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
143 char osver[] = "";
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
144 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
145
9536
b2aada04d84e commit https://github.com/vim/vim/commit/a06ecab7a5159e744448ace731036f0dc5f87dd4
Christian Brabandt <cb@256bit.org>
parents: 7837
diff changeset
146 #if defined(WIN32)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
147 # define BIN_READ(yes) ((yes) ? "rb" : "rt")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
148 # define BIN_WRITE(yes) ((yes) ? "wb" : "wt")
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
149 # define BIN_CREAT(yes) ((yes) ? (O_CREAT|O_BINARY) : O_CREAT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
150 # define BIN_ASSIGN(fp, yes) setmode(fileno(fp), (yes) ? O_BINARY : O_TEXT)
602
111509d2767a updated for version 7.0171
vimboss
parents: 216
diff changeset
151 # define PATH_SEP '\\'
111509d2767a updated for version 7.0171
vimboss
parents: 216
diff changeset
152 #elif defined(CYGWIN)
111509d2767a updated for version 7.0171
vimboss
parents: 216
diff changeset
153 # define BIN_READ(yes) ((yes) ? "rb" : "rt")
111509d2767a updated for version 7.0171
vimboss
parents: 216
diff changeset
154 # define BIN_WRITE(yes) ((yes) ? "wb" : "w")
111509d2767a updated for version 7.0171
vimboss
parents: 216
diff changeset
155 # define BIN_CREAT(yes) ((yes) ? (O_CREAT|O_BINARY) : O_CREAT)
111509d2767a updated for version 7.0171
vimboss
parents: 216
diff changeset
156 # define BIN_ASSIGN(fp, yes) ((yes) ? (void) setmode(fileno(fp), O_BINARY) : (void) (fp))
111509d2767a updated for version 7.0171
vimboss
parents: 216
diff changeset
157 # define PATH_SEP '/'
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
158 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
159 # ifdef VMS
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
160 # define BIN_READ(dummy) "r"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
161 # define BIN_WRITE(dummy) "w"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
162 # define BIN_CREAT(dummy) O_CREAT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
163 # define BIN_ASSIGN(fp, dummy) fp
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
164 # define PATH_SEP ']'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
165 # define FILE_SEP '.'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
166 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
167 # define BIN_READ(dummy) "r"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
168 # define BIN_WRITE(dummy) "w"
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
169 # define BIN_CREAT(dummy) O_CREAT
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
170 # define BIN_ASSIGN(fp, dummy) fp
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
171 # define PATH_SEP '/'
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
172 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
173 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
174
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
175 /* open has only to arguments on the Mac */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
176 #if __MWERKS__
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
177 # define OPEN(name, mode, umask) open(name, mode)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
178 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
179 # define OPEN(name, mode, umask) open(name, mode, umask)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
180 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
181
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
182 #ifdef AMIGA
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
183 # define STRNCMP(s1, s2, l) strncmp(s1, s2, (size_t)l)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
184 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
185 # define STRNCMP(s1, s2, l) strncmp(s1, s2, l)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
186 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
187
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
188 #ifndef __P
16606
7e733046db1d patch 8.1.1306: Borland support is outdated and doesn't work
Bram Moolenaar <Bram@vim.org>
parents: 15963
diff changeset
189 # if defined(__STDC__) || defined(WIN32)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
190 # define __P(a) a
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
191 # else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
192 # define __P(a) ()
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
193 # endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
194 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
195
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
196 #define TRY_SEEK /* attempt to use lseek, or skip forward by reading */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
197 #define COLS 256 /* change here, if you ever need more columns */
15693
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
198 #define LLEN ((2*(int)sizeof(unsigned long)) + 4 + (9*COLS-1) + COLS + 2)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
199
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
200 char hexxa[] = "0123456789abcdef0123456789ABCDEF", *hexx = hexxa;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
201
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
202 /* the different hextypes known by this program: */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
203 #define HEX_NORMAL 0
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
204 #define HEX_POSTSCRIPT 1
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
205 #define HEX_CINCLUDE 2
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
206 #define HEX_BITS 3 /* not hex a dump, but bits: 01111001 */
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
207 #define HEX_LITTLEENDIAN 4
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
208
13567
4f2acb6a10b6 patch 8.0.1656: no option to have xxd produce upper case variable names
Christian Brabandt <cb@256bit.org>
parents: 13326
diff changeset
209 #define CONDITIONAL_CAPITALIZE(c) (capitalize ? toupper((int)c) : c)
4f2acb6a10b6 patch 8.0.1656: no option to have xxd produce upper case variable names
Christian Brabandt <cb@256bit.org>
parents: 13326
diff changeset
210
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
211 #define COLOR_PROLOGUE \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
212 l[c++] = '\033'; \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
213 l[c++] = '['; \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
214 l[c++] = '1'; \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
215 l[c++] = ';'; \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
216 l[c++] = '3';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
217
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
218 #define COLOR_EPILOGUE \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
219 l[c++] = '\033'; \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
220 l[c++] = '['; \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
221 l[c++] = '0'; \
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
222 l[c++] = 'm';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
223 #define COLOR_RED '1'
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
224 #define COLOR_GREEN '2'
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
225 #define COLOR_YELLOW '3'
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
226 #define COLOR_BLUE '4'
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
227 #define COLOR_WHITE '7'
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
228
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
229 static char *pname;
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
230
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
231 static void
7837
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
232 exit_with_usage(void)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
233 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
234 fprintf(stderr, "Usage:\n %s [options] [infile [outfile]]\n", pname);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
235 fprintf(stderr, " or\n %s -r [-s [-]offset] [-c cols] [-ps] [infile [outfile]]\n", pname);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
236 fprintf(stderr, "Options:\n");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
237 fprintf(stderr, " -a toggle autoskip: A single '*' replaces nul-lines. Default off.\n");
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
238 fprintf(stderr, " -b binary digit dump (incompatible with -ps,-i). Default hex.\n");
13567
4f2acb6a10b6 patch 8.0.1656: no option to have xxd produce upper case variable names
Christian Brabandt <cb@256bit.org>
parents: 13326
diff changeset
239 fprintf(stderr, " -C capitalize variable names in C include file style (-i).\n");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
240 fprintf(stderr, " -c cols format <cols> octets per line. Default 16 (-i: 12, -ps: 30).\n");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
241 fprintf(stderr, " -E show characters in EBCDIC. Default ASCII.\n");
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
242 fprintf(stderr, " -e little-endian dump (incompatible with -ps,-i,-r).\n");
25992
2294ed638906 patch 8.2.3529: xxd usage output is incomplete
Bram Moolenaar <Bram@vim.org>
parents: 25980
diff changeset
243 fprintf(stderr, " -g bytes number of octets per group in normal output. Default 2 (-e: 4).\n");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
244 fprintf(stderr, " -h print this summary.\n");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
245 fprintf(stderr, " -i output in C include file style.\n");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
246 fprintf(stderr, " -l len stop after <len> octets.\n");
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
247 fprintf(stderr, " -n name set the variable name used in C include output (-i).\n");
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
248 fprintf(stderr, " -o off add <off> to the displayed file position.\n");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
249 fprintf(stderr, " -ps output in postscript plain hexdump style.\n");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
250 fprintf(stderr, " -r reverse operation: convert (or patch) hexdump into binary.\n");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
251 fprintf(stderr, " -r -s off revert with <off> added to file positions found in hexdump.\n");
20601
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
252 fprintf(stderr, " -d show offset in decimal instead of hex.\n");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
253 fprintf(stderr, " -s %sseek start at <seek> bytes abs. %sinfile offset.\n",
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
254 #ifdef TRY_SEEK
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
255 "[+][-]", "(or +: rel.) ");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
256 #else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
257 "", "");
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
258 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
259 fprintf(stderr, " -u use upper case hex letters.\n");
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
260 fprintf(stderr, " -R when colorize the output; <when> can be 'always', 'auto' or 'never'. Default: 'auto'.\n"),
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
261 fprintf(stderr, " -v show version: \"%s%s\".\n", version, osver);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
262 exit(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
263 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
264
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
265 static void
26040
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
266 perror_exit(int ret)
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
267 {
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
268 fprintf(stderr, "%s: ", pname);
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
269 perror(NULL);
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
270 exit(ret);
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
271 }
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
272
26040
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
273 static void
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
274 error_exit(int ret, char *msg)
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
275 {
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
276 fprintf(stderr, "%s: %s\n", pname, msg);
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
277 exit(ret);
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
278 }
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
279
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
280 static int
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
281 getc_or_die(FILE *fpi)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
282 {
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
283 int c = getc(fpi);
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
284 if (c == EOF && ferror(fpi))
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
285 perror_exit(2);
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
286 return c;
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
287 }
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
288
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
289 static void
26282
71bdede8afd8 patch 8.2.3672: build failure with unsigned char
Bram Moolenaar <Bram@vim.org>
parents: 26278
diff changeset
290 putc_or_die(int c, FILE *fpo)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
291 {
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
292 if (putc(c, fpo) == EOF)
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
293 perror_exit(3);
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
294 }
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
295
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
296 static void
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
297 fputs_or_die(char *s, FILE *fpo)
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
298 {
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
299 if (fputs(s, fpo) == EOF)
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
300 perror_exit(3);
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
301 }
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
302
26366
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
303 /* Use a macro to allow for different arguments. */
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
304 #define FPRINTF_OR_DIE(args) if (fprintf args < 0) perror_exit(3)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
305
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
306 static void
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
307 fclose_or_die(FILE *fpi, FILE *fpo)
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
308 {
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
309 if (fclose(fpo) != 0)
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
310 perror_exit(3);
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
311 if (fclose(fpi) != 0)
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
312 perror_exit(2);
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
313 }
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
314
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
315 /*
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
316 * If "c" is a hex digit, return the value.
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
317 * Otherwise return -1.
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
318 */
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
319 static int
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
320 parse_hex_digit(int c)
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
321 {
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
322 return (c >= '0' && c <= '9') ? c - '0'
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
323 : (c >= 'a' && c <= 'f') ? c - 'a' + 10
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
324 : (c >= 'A' && c <= 'F') ? c - 'A' + 10
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
325 : -1;
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
326 }
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
327
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
328 /*
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
329 * If "c" is a bin digit, return the value.
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
330 * Otherwise return -1.
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
331 */
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
332 static int
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
333 parse_bin_digit(int c)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
334 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
335 return (c >= '0' && c <= '1') ? c - '0'
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
336 : -1;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
337 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
338
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
339 /*
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
340 * Ignore text on "fpi" until end-of-line or end-of-file.
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
341 * Return the '\n' or EOF character.
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
342 * When an error is encountered exit with an error message.
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
343 */
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
344 static int
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
345 skip_to_eol(FILE *fpi, int c)
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
346 {
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
347 while (c != '\n' && c != EOF)
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
348 c = getc_or_die(fpi);
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
349 return c;
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
350 }
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
351
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
352 /*
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
353 * Max. cols binary characters are decoded from the input stream per line.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
354 * Two adjacent garbage characters after evaluated data delimit valid data.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
355 * Everything up to the next newline is discarded.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
356 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
357 * The name is historic and came from 'undo type opt h'.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
358 */
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
359 static int
7837
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
360 huntype(
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
361 FILE *fpi,
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
362 FILE *fpo,
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
363 int cols,
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
364 int hextype,
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
365 long base_off)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
366 {
33509
e083de1ef4b4 patch 9.0.2003: xxd: compilation warning
Christian Brabandt <cb@256bit.org>
parents: 33496
diff changeset
367 int c, ign_garb = 1, n1 = -1, n2 = 0, n3 = 0, p = cols, bt = 0, b = 0, bcnt = 0;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
368 long have_off = 0, want_off = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
369
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
370 rewind(fpi);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
371
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
372 while ((c = getc(fpi)) != EOF)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
373 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
374 if (c == '\r') /* Doze style input file? */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
375 continue;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
376
2083
24eb7921b8f0 updated for version 7.2.367
Bram Moolenaar <bram@zimbu.org>
parents: 1912
diff changeset
377 /* Allow multiple spaces. This doesn't work when there is normal text
24eb7921b8f0 updated for version 7.2.367
Bram Moolenaar <bram@zimbu.org>
parents: 1912
diff changeset
378 * after the hex codes in the last line that looks like hex, thus only
24eb7921b8f0 updated for version 7.2.367
Bram Moolenaar <bram@zimbu.org>
parents: 1912
diff changeset
379 * use it for PostScript format. */
24eb7921b8f0 updated for version 7.2.367
Bram Moolenaar <bram@zimbu.org>
parents: 1912
diff changeset
380 if (hextype == HEX_POSTSCRIPT && (c == ' ' || c == '\n' || c == '\t'))
856
8cd729851562 updated for version 7.0g
vimboss
parents: 819
diff changeset
381 continue;
809
4f1b94b51e99 updated for version 7.0b02
vimboss
parents: 714
diff changeset
382
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
383 if (hextype == HEX_NORMAL || hextype == HEX_POSTSCRIPT)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
384 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
385 n3 = n2;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
386 n2 = n1;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
387
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
388 n1 = parse_hex_digit(c);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
389 if (n1 == -1 && ign_garb)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
390 continue;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
391 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
392 else /* HEX_BITS */
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
393 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
394 n1 = parse_hex_digit(c);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
395 if (n1 == -1 && ign_garb)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
396 continue;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
397
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
398 bt = parse_bin_digit(c);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
399 if (bt != -1)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
400 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
401 b = ((b << 1) | bt);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
402 ++bcnt;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
403 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
404 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
405
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
406 ign_garb = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
407
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
408 if ((hextype != HEX_POSTSCRIPT) && (p >= cols))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
409 {
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
410 if (hextype == HEX_NORMAL)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
411 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
412 if (n1 < 0)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
413 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
414 p = 0;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
415 continue;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
416 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
417 want_off = (want_off << 4) | n1;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
418 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
419 else /* HEX_BITS */
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
420 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
421 n1 = parse_hex_digit(c);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
422 if (n1 >= 0)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
423 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
424 want_off = (want_off << 4) | n1;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
425 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
426
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
427 if (bt < 0)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
428 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
429 p = 0;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
430 bcnt = 0;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
431 b = 0;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
432 continue;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
433 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
434 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
435 continue;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
436 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
437
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
438 if (base_off + want_off != have_off)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
439 {
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
440 if (fflush(fpo) != 0)
26040
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
441 perror_exit(3);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
442 #ifdef TRY_SEEK
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
443 if (fseek(fpo, base_off + want_off - have_off, SEEK_CUR) >= 0)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
444 have_off = base_off + want_off;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
445 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
446 if (base_off + want_off < have_off)
26366
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
447 error_exit(5, "Sorry, cannot seek backwards.");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
448 for (; have_off < base_off + want_off; have_off++)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
449 putc_or_die(0, fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
450 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
451
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
452 if (hextype == HEX_NORMAL || hextype == HEX_POSTSCRIPT)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
453 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
454 if (n2 >= 0 && n1 >= 0)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
455 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
456 putc_or_die((n2 << 4) | n1, fpo);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
457 have_off++;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
458 want_off++;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
459 n1 = -1;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
460 if (!hextype && (++p >= cols))
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
461 /* skip the rest of the line as garbage */
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
462 c = skip_to_eol(fpi, c);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
463 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
464 else if (n1 < 0 && n2 < 0 && n3 < 0)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
465 /* already stumbled into garbage, skip line, wait and see */
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
466 c = skip_to_eol(fpi, c);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
467 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
468 else /* HEX_BITS */
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
469 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
470 if (bcnt == 8)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
471 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
472 putc_or_die(b, fpo);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
473 have_off++;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
474 want_off++;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
475 b = 0;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
476 bcnt = 0;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
477 if (++p >= cols)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
478 /* skip the rest of the line as garbage */
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
479 c = skip_to_eol(fpi, c);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
480 }
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
481 }
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
482
26036
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly
Bram Moolenaar <Bram@vim.org>
parents: 26000
diff changeset
483 if (c == '\n')
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly
Bram Moolenaar <Bram@vim.org>
parents: 26000
diff changeset
484 {
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
485 if (hextype == HEX_NORMAL || hextype == HEX_BITS)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
486 want_off = 0;
26036
c8165ec9dcad patch 8.2.3552: xxd revert does not handle end of line correctly
Bram Moolenaar <Bram@vim.org>
parents: 26000
diff changeset
487 p = cols;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
488 ign_garb = 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
489 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
490 }
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
491 if (fflush(fpo) != 0)
26040
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
492 perror_exit(3);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
493 #ifdef TRY_SEEK
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
494 fseek(fpo, 0L, SEEK_END);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
495 #endif
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
496 fclose_or_die(fpi, fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
497 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
498 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
499
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
500 /*
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
501 * Print line l. If nz is false, xxdline regards the line a line of
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
502 * zeroes. If there are three or more consecutive lines of zeroes,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
503 * they are replaced by a single '*' character.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
504 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
505 * If the output ends with more than two lines of zeroes, you
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
506 * should call xxdline again with l being the last line and nz
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
507 * negative. This ensures that the last line is shown even when
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
508 * it is all zeroes.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
509 *
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
510 * If nz is always positive, lines are never suppressed.
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
511 */
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
512 static void
7837
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
513 xxdline(FILE *fp, char *l, int nz)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
514 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
515 static char z[LLEN+1];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
516 static int zero_seen = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
517
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
518 if (!nz && zero_seen == 1)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
519 strcpy(z, l);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
520
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
521 if (nz || !zero_seen++)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
522 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
523 if (nz)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
524 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
525 if (nz < 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
526 zero_seen--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
527 if (zero_seen == 2)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
528 fputs_or_die(z, fp);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
529 if (zero_seen > 2)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
530 fputs_or_die("*\n", fp);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
531 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
532 if (nz >= 0 || zero_seen > 0)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
533 fputs_or_die(l, fp);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
534 if (nz)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
535 zero_seen = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
536 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
537 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
538
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
539 /* This is an EBCDIC to ASCII conversion table */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
540 /* from a proposed BTL standard April 16, 1979 */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
541 static unsigned char etoa64[] =
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
542 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
543 0040,0240,0241,0242,0243,0244,0245,0246,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
544 0247,0250,0325,0056,0074,0050,0053,0174,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
545 0046,0251,0252,0253,0254,0255,0256,0257,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
546 0260,0261,0041,0044,0052,0051,0073,0176,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
547 0055,0057,0262,0263,0264,0265,0266,0267,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
548 0270,0271,0313,0054,0045,0137,0076,0077,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
549 0272,0273,0274,0275,0276,0277,0300,0301,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
550 0302,0140,0072,0043,0100,0047,0075,0042,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
551 0303,0141,0142,0143,0144,0145,0146,0147,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
552 0150,0151,0304,0305,0306,0307,0310,0311,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
553 0312,0152,0153,0154,0155,0156,0157,0160,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
554 0161,0162,0136,0314,0315,0316,0317,0320,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
555 0321,0345,0163,0164,0165,0166,0167,0170,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
556 0171,0172,0322,0323,0324,0133,0326,0327,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
557 0330,0331,0332,0333,0334,0335,0336,0337,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
558 0340,0341,0342,0343,0344,0135,0346,0347,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
559 0173,0101,0102,0103,0104,0105,0106,0107,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
560 0110,0111,0350,0351,0352,0353,0354,0355,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
561 0175,0112,0113,0114,0115,0116,0117,0120,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
562 0121,0122,0356,0357,0360,0361,0362,0363,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
563 0134,0237,0123,0124,0125,0126,0127,0130,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
564 0131,0132,0364,0365,0366,0367,0370,0371,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
565 0060,0061,0062,0063,0064,0065,0066,0067,
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
566 0070,0071,0372,0373,0374,0375,0376,0377
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
567 };
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
568
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
569 static void
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
570 begin_coloring_char (char *l, int *c, int e, int ebcdic)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
571 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
572 if (ebcdic)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
573 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
574 if ((e >= 75 && e <= 80) || (e >= 90 && e <= 97) ||
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
575 (e >= 107 && e <= 111) || (e >= 121 && e <= 127) ||
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
576 (e >= 129 && e <= 137) || (e >= 145 && e <= 154) ||
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
577 (e >= 162 && e <= 169) || (e >= 192 && e <= 201) ||
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
578 (e >= 208 && e <= 217) || (e >= 226 && e <= 233) ||
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
579 (e >= 240 && e <= 249) || (e == 189) || (e == 64) ||
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
580 (e == 173) || (e == 224) )
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
581 l[(*c)++] = COLOR_GREEN;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
582
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
583 else if (e == 37 || e == 13 || e == 5)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
584 l[(*c)++] = COLOR_YELLOW;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
585 else if (e == 0)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
586 l[(*c)++] = COLOR_WHITE;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
587 else if (e == 255)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
588 l[(*c)++] = COLOR_BLUE;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
589 else
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
590 l[(*c)++] = COLOR_RED;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
591 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
592 else /* ASCII */
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
593 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
594 #ifdef __MVS__
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
595 if (e >= 64)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
596 l[(*c)++] = COLOR_GREEN;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
597 #else
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
598 if (e > 31 && e < 127)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
599 l[(*c)++] = COLOR_GREEN;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
600 #endif
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
601
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
602 else if (e == 9 || e == 10 || e == 13)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
603 l[(*c)++] = COLOR_YELLOW;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
604 else if (e == 0)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
605 l[(*c)++] = COLOR_WHITE;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
606 else if (e == 255)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
607 l[(*c)++] = COLOR_BLUE;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
608 else
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
609 l[(*c)++] = COLOR_RED;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
610 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
611 l[(*c)++] = 'm';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
612 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
613
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
614 static int
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
615 enable_color(void)
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
616 {
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
617 #ifdef WIN32
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
618 DWORD mode;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
619 HANDLE out;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
620
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
621 if (!isatty(1))
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
622 return 0;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
623
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
624 out = GetStdHandle(STD_OUTPUT_HANDLE);
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
625 GetConsoleMode(out, &mode);
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
626 mode |= ENABLE_VIRTUAL_TERMINAL_PROCESSING;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
627 return (int)SetConsoleMode(out, mode);
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
628 #elif defined(UNIX)
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
629 return isatty(STDOUT_FILENO);
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
630 #else
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
631 return 0;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
632 #endif
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
633 }
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
634
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
635 int
7837
33ba2adb6065 commit https://github.com/vim/vim/commit/b638a7be952544ceb03052c25b84224577a6494b
Christian Brabandt <cb@256bit.org>
parents: 6973
diff changeset
636 main(int argc, char *argv[])
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
637 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
638 FILE *fp, *fpo;
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
639 int c, e, p = 0, relseek = 1, negseek = 0, revert = 0, i, x;
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
640 int cols = 0, colsgiven = 0, nonzero = 0, autoskip = 0, hextype = HEX_NORMAL;
20601
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
641 int capitalize = 0, decimal_offset = 0;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
642 int ebcdic = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
643 int octspergrp = -1; /* number of octets grouped in output */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
644 int grplen; /* total chars per octet group */
15693
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
645 long length = -1, n = 0, seekoff = 0;
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
646 unsigned long displayoff = 0;
2770
25672ad7f377 updated for version 7.3.161
Bram Moolenaar <bram@vim.org>
parents: 2754
diff changeset
647 static char l[LLEN+1]; /* static because it may be too big for stack */
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
648 char *pp;
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
649 char *varname = NULL;
15695
ac05f8fb4200 patch 8.1.0855: cannot build xxd with MSVC 10
Bram Moolenaar <Bram@vim.org>
parents: 15693
diff changeset
650 int addrlen = 9;
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
651 int color = 0;
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
652 char *no_color;
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
653
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
654 no_color = getenv("NO_COLOR");
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
655 if (no_color == NULL || no_color[0] == '\0')
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
656 color = enable_color();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
657
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
658 #ifdef AMIGA
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
659 /* This program doesn't work when started from the Workbench */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
660 if (argc == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
661 exit(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
662 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
663
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
664 pname = argv[0];
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
665 for (pp = pname; *pp; )
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
666 if (*pp++ == PATH_SEP)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
667 pname = pp;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
668 #ifdef FILE_SEP
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
669 for (pp = pname; *pp; pp++)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
670 if (*pp == FILE_SEP)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
671 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
672 *pp = '\0';
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
673 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
674 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
675 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
676
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
677 while (argc >= 2)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
678 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
679 pp = argv[1] + (!STRNCMP(argv[1], "--", 2) && argv[1][2]);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
680 if (!STRNCMP(pp, "-a", 2)) autoskip = 1 - autoskip;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
681 else if (!STRNCMP(pp, "-b", 2)) hextype = HEX_BITS;
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
682 else if (!STRNCMP(pp, "-e", 2)) hextype = HEX_LITTLEENDIAN;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
683 else if (!STRNCMP(pp, "-u", 2)) hexx = hexxa + 16;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
684 else if (!STRNCMP(pp, "-p", 2)) hextype = HEX_POSTSCRIPT;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
685 else if (!STRNCMP(pp, "-i", 2)) hextype = HEX_CINCLUDE;
13567
4f2acb6a10b6 patch 8.0.1656: no option to have xxd produce upper case variable names
Christian Brabandt <cb@256bit.org>
parents: 13326
diff changeset
686 else if (!STRNCMP(pp, "-C", 2)) capitalize = 1;
20601
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
687 else if (!STRNCMP(pp, "-d", 2)) decimal_offset = 1;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
688 else if (!STRNCMP(pp, "-r", 2)) revert++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
689 else if (!STRNCMP(pp, "-E", 2)) ebcdic++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
690 else if (!STRNCMP(pp, "-v", 2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
691 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
692 fprintf(stderr, "%s%s\n", version, osver);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
693 exit(0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
694 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
695 else if (!STRNCMP(pp, "-c", 2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
696 {
15627
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested
Bram Moolenaar <Bram@vim.org>
parents: 13571
diff changeset
697 if (pp[2] && !STRNCMP("apitalize", pp + 2, 9))
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested
Bram Moolenaar <Bram@vim.org>
parents: 13571
diff changeset
698 capitalize = 1;
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested
Bram Moolenaar <Bram@vim.org>
parents: 13571
diff changeset
699 else if (pp[2] && STRNCMP("ols", pp + 2, 3))
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
700 {
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
701 colsgiven = 1;
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
702 cols = (int)strtol(pp + 2, NULL, 0);
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
703 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
704 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
705 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
706 if (!argv[2])
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
707 exit_with_usage();
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
708 colsgiven = 1;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
709 cols = (int)strtol(argv[2], NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
710 argv++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
711 argc--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
712 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
713 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
714 else if (!STRNCMP(pp, "-g", 2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
715 {
15627
11879b89bb69 patch 8.1.0821: xxd "usage" output and other arguments not tested
Bram Moolenaar <Bram@vim.org>
parents: 13571
diff changeset
716 if (pp[2] && STRNCMP("roup", pp + 2, 4))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
717 octspergrp = (int)strtol(pp + 2, NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
718 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
719 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
720 if (!argv[2])
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
721 exit_with_usage();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
722 octspergrp = (int)strtol(argv[2], NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
723 argv++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
724 argc--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
725 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
726 }
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
727 else if (!STRNCMP(pp, "-o", 2))
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
728 {
15693
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
729 int reloffset = 0;
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
730 int negoffset = 0;
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
731 if (pp[2] && STRNCMP("ffset", pp + 2, 5))
15693
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
732 displayoff = strtoul(pp + 2, NULL, 0);
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
733 else
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
734 {
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
735 if (!argv[2])
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
736 exit_with_usage();
15693
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
737
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
738 if (argv[2][0] == '+')
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
739 reloffset++;
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
740 if (argv[2][reloffset] == '-')
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
741 negoffset++;
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
742
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
743 if (negoffset)
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
744 displayoff = ULONG_MAX - strtoul(argv[2] + reloffset+negoffset, NULL, 0) + 1;
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
745 else
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
746 displayoff = strtoul(argv[2] + reloffset+negoffset, NULL, 0);
e00983850550 patch 8.1.0854: xxd does not work with more than 32 bit addresses
Bram Moolenaar <Bram@vim.org>
parents: 15627
diff changeset
747
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
748 argv++;
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
749 argc--;
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
750 }
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
751 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
752 else if (!STRNCMP(pp, "-s", 2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
753 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
754 relseek = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
755 negseek = 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
756 if (pp[2] && STRNCMP("kip", pp+2, 3) && STRNCMP("eek", pp+2, 3))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
757 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
758 #ifdef TRY_SEEK
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
759 if (pp[2] == '+')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
760 relseek++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
761 if (pp[2+relseek] == '-')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
762 negseek++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
763 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
764 seekoff = strtol(pp + 2+relseek+negseek, (char **)NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
765 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
766 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
767 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
768 if (!argv[2])
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
769 exit_with_usage();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
770 #ifdef TRY_SEEK
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
771 if (argv[2][0] == '+')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
772 relseek++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
773 if (argv[2][relseek] == '-')
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
774 negseek++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
775 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
776 seekoff = strtol(argv[2] + relseek+negseek, (char **)NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
777 argv++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
778 argc--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
779 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
780 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
781 else if (!STRNCMP(pp, "-l", 2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
782 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
783 if (pp[2] && STRNCMP("en", pp + 2, 2))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
784 length = strtol(pp + 2, (char **)NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
785 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
786 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
787 if (!argv[2])
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
788 exit_with_usage();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
789 length = strtol(argv[2], (char **)NULL, 0);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
790 argv++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
791 argc--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
792 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
793 }
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
794 else if (!STRNCMP(pp, "-n", 2))
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
795 {
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
796 if (pp[2] && STRNCMP("ame", pp + 2, 3))
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
797 varname = pp + 2;
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
798 else
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
799 {
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
800 if (!argv[2])
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
801 exit_with_usage();
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
802 varname = argv[2];
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
803 argv++;
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
804 argc--;
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
805 }
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
806 }
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
807 else if (!STRNCMP(pp, "-R", 2))
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
808 {
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
809 char *pw = pp + 2;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
810 if (!pw[0])
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
811 {
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
812 pw = argv[2];
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
813 argv++;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
814 argc--;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
815 }
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
816 if (!pw)
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
817 exit_with_usage();
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
818 if (!STRNCMP(pw, "always", 6))
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
819 {
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
820 (void)enable_color();
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
821 color = 1;
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
822 }
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
823 else if (!STRNCMP(pw, "never", 5))
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
824 color = 0;
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
825 else if (!STRNCMP(pw, "auto", 4))
33158
e8805650fec1 patch 9.0.1861: xxd: issue when -R is specified several times
Christian Brabandt <cb@256bit.org>
parents: 33099
diff changeset
826 color = enable_color();
33099
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
827 else
49f317597430 patch 9.0.1834: Some problems with xxd coloring
Christian Brabandt <cb@256bit.org>
parents: 33094
diff changeset
828 exit_with_usage();
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
829 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
830 else if (!strcmp(pp, "--")) /* end of options */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
831 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
832 argv++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
833 argc--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
834 break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
835 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
836 else if (pp[0] == '-' && pp[1]) /* unknown option */
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
837 exit_with_usage();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
838 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
839 break; /* not an option */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
840
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
841 argv++; /* advance to next argument */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
842 argc--;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
843 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
844
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
845 if (!colsgiven || (!cols && hextype != HEX_POSTSCRIPT))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
846 switch (hextype)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
847 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
848 case HEX_POSTSCRIPT: cols = 30; break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
849 case HEX_CINCLUDE: cols = 12; break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
850 case HEX_BITS: cols = 6; break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
851 case HEX_NORMAL:
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
852 case HEX_LITTLEENDIAN:
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
853 default: cols = 16; break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
854 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
855
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
856 if (octspergrp < 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
857 switch (hextype)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
858 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
859 case HEX_BITS: octspergrp = 1; break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
860 case HEX_NORMAL: octspergrp = 2; break;
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
861 case HEX_LITTLEENDIAN: octspergrp = 4; break;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
862 case HEX_POSTSCRIPT:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
863 case HEX_CINCLUDE:
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
864 default: octspergrp = 0; break;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
865 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
866
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
867 if ((hextype == HEX_POSTSCRIPT && cols < 0) ||
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
868 (hextype != HEX_POSTSCRIPT && cols < 1) ||
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
869 ((hextype == HEX_NORMAL || hextype == HEX_BITS || hextype == HEX_LITTLEENDIAN)
1452
1bc46149d919 updated for version 7.1-167
vimboss
parents: 1197
diff changeset
870 && (cols > COLS)))
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
871 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
872 fprintf(stderr, "%s: invalid number of columns (max. %d).\n", pname, COLS);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
873 exit(1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
874 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
875
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
876 if (octspergrp < 1 || octspergrp > cols)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
877 octspergrp = cols;
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
878 else if (hextype == HEX_LITTLEENDIAN && (octspergrp & (octspergrp-1)))
26040
3c36cc7bd7a8 patch 8.2.3554: xxd has various way to exit
Bram Moolenaar <Bram@vim.org>
parents: 26036
diff changeset
879 error_exit(1, "number of octets per group must be a power of 2 with -e.");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
880
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
881 if (argc > 3)
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
882 exit_with_usage();
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
883
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
884 if (argc == 1 || (argv[1][0] == '-' && !argv[1][1]))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
885 BIN_ASSIGN(fp = stdin, !revert);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
886 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
887 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
888 if ((fp = fopen(argv[1], BIN_READ(!revert))) == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
889 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
890 fprintf(stderr,"%s: ", pname);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
891 perror(argv[1]);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
892 return 2;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
893 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
894 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
895
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
896 if (argc < 3 || (argv[2][0] == '-' && !argv[2][1]))
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
897 BIN_ASSIGN(fpo = stdout, revert);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
898 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
899 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
900 int fd;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
901 int mode = revert ? O_WRONLY : (O_TRUNC|O_WRONLY);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
902
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
903 if (((fd = OPEN(argv[2], mode | BIN_CREAT(revert), 0666)) < 0) ||
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
904 (fpo = fdopen(fd, BIN_WRITE(revert))) == NULL)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
905 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
906 fprintf(stderr, "%s: ", pname);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
907 perror(argv[2]);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
908 return 3;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
909 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
910 rewind(fpo);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
911 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
912
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
913 if (revert)
33496
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
914 switch (hextype)
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
915 {
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
916 case HEX_NORMAL:
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
917 case HEX_POSTSCRIPT:
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
918 case HEX_BITS:
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
919 return huntype(fp, fpo, cols, hextype,
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
920 negseek ? -seekoff : seekoff);
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
921 break;
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
922 default:
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
923 error_exit(-1, "Sorry, cannot revert this type of hexdump");
33cbd544dc46 patch 9.0.1998: xxd: cannot reverse a bit dump
Christian Brabandt <cb@256bit.org>
parents: 33158
diff changeset
924 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
925
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
926 if (seekoff || negseek || !relseek)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
927 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
928 #ifdef TRY_SEEK
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
929 if (relseek)
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
930 e = fseek(fp, negseek ? -seekoff : seekoff, SEEK_CUR);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
931 else
26123
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
932 e = fseek(fp, negseek ? -seekoff : seekoff,
56d1d2cb4ad5 patch 8.2.3594: xxd code is a bit difficult to understand
Bram Moolenaar <Bram@vim.org>
parents: 26040
diff changeset
933 negseek ? SEEK_END : SEEK_SET);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
934 if (e < 0 && negseek)
26366
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
935 error_exit(4, "Sorry, cannot seek.");
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
936 if (e >= 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
937 seekoff = ftell(fp);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
938 else
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
939 #endif
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
940 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
941 long s = seekoff;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
942
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
943 while (s--)
26366
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
944 if (getc_or_die(fp) == EOF)
2754
d0cae5983609 updated for version 7.3.153
Bram Moolenaar <bram@vim.org>
parents: 2752
diff changeset
945 {
26366
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
946 error_exit(4, "Sorry, cannot seek.");
2754
d0cae5983609 updated for version 7.3.153
Bram Moolenaar <bram@vim.org>
parents: 2752
diff changeset
947 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
948 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
949 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
950
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
951 if (hextype == HEX_CINCLUDE)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
952 {
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
953 /* A user-set variable name overrides fp == stdin */
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
954 if (varname == NULL && fp != stdin)
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
955 varname = argv[1];
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
956
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
957 if (varname != NULL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
958 {
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
959 FPRINTF_OR_DIE((fpo, "unsigned char %s", isdigit((int)varname[0]) ? "__" : ""));
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
960 for (e = 0; (c = varname[e]) != 0; e++)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
961 putc_or_die(isalnum(c) ? CONDITIONAL_CAPITALIZE(c) : '_', fpo);
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
962 fputs_or_die("[] = {\n", fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
963 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
964
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
965 p = 0;
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
966 while ((length < 0 || p < length) && (c = getc_or_die(fp)) != EOF)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
967 {
26366
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
968 FPRINTF_OR_DIE((fpo, (hexx == hexxa) ? "%s0x%02x" : "%s0X%02X",
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
969 (p % cols) ? ", " : (!p ? " " : ",\n "), c));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
970 p++;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
971 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
972
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
973 if (p)
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
974 fputs_or_die("\n", fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
975
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
976 if (varname != NULL)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
977 {
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
978 fputs_or_die("};\n", fpo);
29330
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
979 FPRINTF_OR_DIE((fpo, "unsigned int %s", isdigit((int)varname[0]) ? "__" : ""));
948c947cb1ed patch 9.0.0008: cannot specify the variable name for "xxd -i"
Bram Moolenaar <Bram@vim.org>
parents: 27118
diff changeset
980 for (e = 0; (c = varname[e]) != 0; e++)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
981 putc_or_die(isalnum(c) ? CONDITIONAL_CAPITALIZE(c) : '_', fpo);
26366
d227481dbe8e patch 8.2.3714: some unused assignments and ugly code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26298
diff changeset
982 FPRINTF_OR_DIE((fpo, "_%s = %d;\n", capitalize ? "LEN" : "len", p));
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
983 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
984
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
985 fclose_or_die(fp, fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
986 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
987 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
988
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
989 if (hextype == HEX_POSTSCRIPT)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
990 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
991 p = cols;
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
992 while ((length < 0 || n < length) && (e = getc_or_die(fp)) != EOF)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
993 {
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
994 putc_or_die(hexx[(e >> 4) & 0xf], fpo);
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
995 putc_or_die(hexx[e & 0xf], fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
996 n++;
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
997 if (cols > 0 && !--p)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
998 {
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
999 putc_or_die('\n', fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1000 p = cols;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1001 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1002 }
27118
2f854597399f patch 8.2.4088: xxd cannot output everything in one line
Bram Moolenaar <Bram@vim.org>
parents: 26859
diff changeset
1003 if (cols == 0 || p < cols)
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
1004 putc_or_die('\n', fpo);
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
1005 fclose_or_die(fp, fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1006 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1007 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1008
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
1009 /* hextype: HEX_NORMAL or HEX_BITS or HEX_LITTLEENDIAN */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1010
6655
6c94cedccda4 updated for version 7.4.652
Bram Moolenaar <bram@vim.org>
parents: 4958
diff changeset
1011 if (hextype != HEX_BITS)
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1012 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1013 grplen = octspergrp + octspergrp + 1; /* chars per octet group */
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1014 if (color)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1015 grplen += 11 * octspergrp; /* color-code needs 11 extra characters */
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1016 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1017 else /* hextype == HEX_BITS */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1018 grplen = 8 * octspergrp + 1;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1019
26298
bb58c4530851 patch 8.2.3680: repeated code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26282
diff changeset
1020 while ((length < 0 || n < length) && (e = getc_or_die(fp)) != EOF)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1021 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1022 if (p == 0)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1023 {
26220
d757c9c87a58 patch 8.2.3641: xxd code has duplicate expressions
Bram Moolenaar <Bram@vim.org>
parents: 26123
diff changeset
1024 addrlen = sprintf(l, decimal_offset ? "%08ld:" : "%08lx:",
20601
75ef263d09d6 patch 8.2.0854: xxd cannot show offset as a decimal number
Bram Moolenaar <Bram@vim.org>
parents: 19195
diff changeset
1025 ((unsigned long)(n + seekoff + displayoff)));
32104
5a1113ece237 patch 9.0.1383: xxd: combination of little endian and cols fails
Bram Moolenaar <Bram@vim.org>
parents: 30118
diff changeset
1026 for (c = addrlen; c < LLEN; l[c++] = ' ')
5a1113ece237 patch 9.0.1383: xxd: combination of little endian and cols fails
Bram Moolenaar <Bram@vim.org>
parents: 30118
diff changeset
1027 ;
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1028 }
26254
3a13efec0016 patch 8.2.3658: duplicate code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26220
diff changeset
1029 x = hextype == HEX_LITTLEENDIAN ? p ^ (octspergrp-1) : p;
3a13efec0016 patch 8.2.3658: duplicate code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26220
diff changeset
1030 c = addrlen + 1 + (grplen * x) / octspergrp;
26220
d757c9c87a58 patch 8.2.3641: xxd code has duplicate expressions
Bram Moolenaar <Bram@vim.org>
parents: 26123
diff changeset
1031 if (hextype == HEX_NORMAL || hextype == HEX_LITTLEENDIAN)
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1032 {
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1033 if (color)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1034 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1035 COLOR_PROLOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1036 begin_coloring_char(l,&c,e,ebcdic);
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1037 l[c++] = hexx[(e >> 4) & 0xf];
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1038 l[c++] = hexx[e & 0xf];
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1039 COLOR_EPILOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1040 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1041 else /*No colors*/
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1042 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1043 l[c] = hexx[(e >> 4) & 0xf];
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1044 l[++c] = hexx[e & 0xf];
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1045 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1046 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1047 else /* hextype == HEX_BITS */
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1048 {
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1049 for (i = 7; i >= 0; i--)
26254
3a13efec0016 patch 8.2.3658: duplicate code in xxd
Bram Moolenaar <Bram@vim.org>
parents: 26220
diff changeset
1050 l[c++] = (e & (1 << i)) ? '1' : '0';
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1051 }
13326
7f1a5e8d8289 patch 8.0.1537: xxd does not skip NUL lines when using ebcdic
Christian Brabandt <cb@256bit.org>
parents: 9536
diff changeset
1052 if (e)
7f1a5e8d8289 patch 8.0.1537: xxd does not skip NUL lines when using ebcdic
Christian Brabandt <cb@256bit.org>
parents: 9536
diff changeset
1053 nonzero++;
1452
1bc46149d919 updated for version 7.1-167
vimboss
parents: 1197
diff changeset
1054 /* When changing this update definition of LLEN above. */
32104
5a1113ece237 patch 9.0.1383: xxd: combination of little endian and cols fails
Bram Moolenaar <Bram@vim.org>
parents: 30118
diff changeset
1055 if (hextype == HEX_LITTLEENDIAN)
5a1113ece237 patch 9.0.1383: xxd: combination of little endian and cols fails
Bram Moolenaar <Bram@vim.org>
parents: 30118
diff changeset
1056 /* last group will be fully used, round up */
5a1113ece237 patch 9.0.1383: xxd: combination of little endian and cols fails
Bram Moolenaar <Bram@vim.org>
parents: 30118
diff changeset
1057 c = grplen * ((cols + octspergrp - 1) / octspergrp);
5a1113ece237 patch 9.0.1383: xxd: combination of little endian and cols fails
Bram Moolenaar <Bram@vim.org>
parents: 30118
diff changeset
1058 else
5a1113ece237 patch 9.0.1383: xxd: combination of little endian and cols fails
Bram Moolenaar <Bram@vim.org>
parents: 30118
diff changeset
1059 c = (grplen * cols - 1) / octspergrp;
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1060
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1061 if (color)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1062 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1063 if (hextype == HEX_BITS)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1064 c += addrlen + 3 + p*12;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1065 else
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1066 c = addrlen + 3 + (grplen * cols - 1)/octspergrp + p*12;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1067
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1068 if (hextype == HEX_LITTLEENDIAN)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1069 c += 1;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1070
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1071 COLOR_PROLOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1072 begin_coloring_char(l,&c,e,ebcdic);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1073 #ifdef __MVS__
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1074 if (e >= 64)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1075 l[c++] = e;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1076 else
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1077 l[c++] = '.';
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1078 #else
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1079 if (ebcdic)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1080 e = (e < 64) ? '.' : etoa64[e-64];
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1081 l[c++] = (e > 31 && e < 127) ? e : '.';
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1082 #endif
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1083 COLOR_EPILOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1084 n++;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1085 if (++p == cols)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1086 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1087 l[c++] = '\n';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1088 l[c++] = '\0';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1089 xxdline(fpo, l, autoskip ? nonzero : 1);
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1090 nonzero = 0;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1091 p = 0;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1092 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1093 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1094 else /*no colors*/
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1095 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1096 if (ebcdic)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1097 e = (e < 64) ? '.' : etoa64[e-64];
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1098
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1099 c += addrlen + 3 + p;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1100 l[c++] =
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1101 #ifdef __MVS__
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1102 (e >= 64)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1103 #else
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1104 (e > 31 && e < 127)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1105 #endif
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1106 ? e : '.';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1107 n++;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1108 if (++p == cols)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1109 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1110 l[c++] = '\n';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1111 l[c] = '\0';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1112 xxdline(fpo, l, autoskip ? nonzero : 1);
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1113 nonzero = 0;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1114 p = 0;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1115 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1116 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1117 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1118 if (p)
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1119 {
33083
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1120 l[c++] = '\n';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1121 l[c] = '\0';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1122 if (color)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1123 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1124 c++;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1125
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1126 x = p;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1127 if (hextype == HEX_LITTLEENDIAN)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1128 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1129 int fill = octspergrp - (p % octspergrp);
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1130 if (fill == octspergrp) fill = 0;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1131
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1132 c = addrlen + 1 + (grplen * (x - (octspergrp-fill))) / octspergrp;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1133
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1134 for (i = 0; i < fill;i++)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1135 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1136 COLOR_PROLOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1137 l[c++] = COLOR_RED;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1138 l[c++] = 'm';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1139 l[c++] = ' '; /* empty space */
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1140 COLOR_EPILOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1141 x++;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1142 p++;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1143 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1144 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1145
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1146 if (hextype != HEX_BITS)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1147 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1148 c = addrlen + 1 + (grplen * x) / octspergrp;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1149 c += cols - p;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1150 c += (cols - p) / octspergrp;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1151
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1152 for (i = cols - p; i > 0;i--)
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1153 {
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1154 COLOR_PROLOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1155 l[c++] = COLOR_RED;
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1156 l[c++] = 'm';
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1157 l[c++] = ' '; /* empty space */
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1158 COLOR_EPILOGUE
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1159 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1160 }
79b2eb83f2df patch 9.0.1827: xxd: no color support
Christian Brabandt <cb@256bit.org>
parents: 32104
diff changeset
1161 }
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1162 xxdline(fpo, l, 1);
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1163 }
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1164 else if (autoskip)
1197
b7ad1c609161 updated for version 7.1b
vimboss
parents: 856
diff changeset
1165 xxdline(fpo, l, -1); /* last chance to flush out suppressed lines */
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1166
26278
3061c07855ce patch 8.2.3670: error checks repeated several times
Bram Moolenaar <Bram@vim.org>
parents: 26254
diff changeset
1167 fclose_or_die(fp, fpo);
7
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1168 return 0;
3fc0f57ecb91 updated for version 7.0001
vimboss
parents:
diff changeset
1169 }
2752
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
1170
0f7f66682a55 updated for version 7.3.152
Bram Moolenaar <bram@vim.org>
parents: 2083
diff changeset
1171 /* vi:set ts=8 sw=4 sts=2 cino+={2 cino+=n-2 : */