2 * Copyright (c) 1989, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * @(#)display.c 8.1 (Berkeley) 6/6/93
34 * $FreeBSD: src/usr.bin/hexdump/display.c,v 1.4.2.2 2002/07/23 14:27:06 tjr Exp $
35 * $DragonFly: src/usr.bin/hexdump/display.c,v 1.5 2005/02/05 01:05:12 cpressey Exp $
38 #include <sys/param.h>
49 enum _vflag vflag = FIRST;
51 static off_t address; /* address/offset in stream */
52 static off_t eaddress; /* end address */
54 static __inline void print(PR *, u_char *);
57 print(PR *pr, u_char *bp)
71 (void)printf(pr->fmt, (quad_t)address);
74 (void)printf(pr->fmt, "");
80 (void)printf(pr->fmt, *bp);
85 bcopy(bp, &f4, sizeof(f4));
86 (void)printf(pr->fmt, f4);
89 bcopy(bp, &f8, sizeof(f8));
90 (void)printf(pr->fmt, f8);
93 if (pr->bcnt == sizeof(long double)) {
94 bcopy(bp, &ldbl, sizeof(ldbl));
95 (void)printf(pr->fmt, ldbl);
103 (void)printf(pr->fmt, (quad_t)(signed char)*bp);
106 bcopy(bp, &s2, sizeof(s2));
107 (void)printf(pr->fmt, (quad_t)s2);
110 bcopy(bp, &s4, sizeof(s4));
111 (void)printf(pr->fmt, (quad_t)s4);
114 bcopy(bp, &s8, sizeof(s8));
115 (void)printf(pr->fmt, s8);
120 (void)printf(pr->fmt, isprint(*bp) ? *bp : '.');
123 (void)printf(pr->fmt, (char *)bp);
126 (void)printf("%s", pr->fmt);
134 (void)printf(pr->fmt, (u_quad_t)*bp);
137 bcopy(bp, &u2, sizeof(u2));
138 (void)printf(pr->fmt, (u_quad_t)u2);
141 bcopy(bp, &u4, sizeof(u4));
142 (void)printf(pr->fmt, (u_quad_t)u4);
145 bcopy(bp, &u8, sizeof(u8));
146 (void)printf(pr->fmt, u8);
163 u_char savech = '\0', *savebp;
166 for (fs = fshead, savebp = bp, saveaddress = address; fs;
167 fs = fs->nextfs, bp = savebp, address = saveaddress)
168 for (fu = fs->nextfu; fu; fu = fu->nextfu) {
169 if (fu->flags&F_IGNORE)
171 for (cnt = fu->reps; cnt; --cnt)
172 for (pr = fu->nextpr; pr; address += pr->bcnt,
173 bp += pr->bcnt, pr = pr->nextpr) {
174 if (eaddress && address >= eaddress &&
175 !(pr->flags & (F_TEXT|F_BPAD)))
177 if (cnt == 1 && pr->nospace) {
178 savech = *pr->nospace;
182 if (cnt == 1 && pr->nospace)
183 *pr->nospace = savech;
188 * If eaddress not set, error or file size was multiple of
189 * blocksize, and no partial block ever found.
196 for (pr = endfu->nextpr; pr; pr = pr->nextpr)
199 (void)printf(pr->fmt, (quad_t)eaddress);
202 (void)printf("%s", pr->fmt);
211 static char const *spec = " -0+#";
212 register char *p1, *p2;
215 * Remove all conversion flags; '-' is the only one valid
216 * with %s, and it's not useful here.
221 for (p1 = pr->fmt; *p1 != '%'; ++p1);
222 for (p2 = ++p1; *p1 && strchr(spec, *p1); ++p1);
223 while ((*p2++ = *p1++));
231 static int ateof = 1;
232 static u_char *curp, *savp;
239 if ((curp = calloc(1, blocksize)) == NULL)
241 if ((savp = calloc(1, blocksize)) == NULL)
247 address += blocksize;
250 for (need = blocksize, nread = 0;;) {
252 * if read the right number of bytes, or at EOF for one file,
253 * and no other files are available, zero-pad the rest of the
254 * block and set the end flag.
256 if (!length || (ateof && !next((char **)NULL))) {
257 if (odmode && address < skip)
258 errx(1, "cannot skip past end of input");
259 if (need == blocksize)
260 return((u_char *)NULL);
263 bcmp(curp, savp, nread) == 0) {
266 return((u_char *)NULL);
268 bzero((char *)curp + nread, need);
269 eaddress = address + nread;
272 n = fread((char *)curp + nread, sizeof(u_char),
273 length == -1 ? need : MIN(length, need), stdin);
276 warn("%s", _argv[-1]);
284 if (vflag == ALL || vflag == FIRST ||
286 bcmp(curp, savp, blocksize) != 0) {
287 if (vflag == DUP || vflag == FIRST)
294 address += blocksize;
315 if (!(freopen(*_argv, "r", stdin))) {
328 doskip(statok ? *_argv : "stdin", statok);
338 doskip(const char *fname, int statok)
344 if (fstat(fileno(stdin), &sb))
346 if (S_ISREG(sb.st_mode) && skip >= sb.st_size) {
347 address += sb.st_size;
352 if (S_ISREG(sb.st_mode)) {
353 if (fseeko(stdin, skip, SEEK_SET))
358 for (cnt = 0; cnt < skip; ++cnt)
359 if (getchar() == EOF)