| /*- |
| * Copyright (c) 1990 The Regents of the University of California. |
| * All rights reserved. |
| * |
| * Redistribution and use in source and binary forms, with or without |
| * modification, are permitted provided that the following conditions |
| * are met: |
| * 1. Redistributions of source code must retain the above copyright |
| * notice, this list of conditions and the following disclaimer. |
| * 2. Redistributions in binary form must reproduce the above copyright |
| * notice, this list of conditions and the following disclaimer in the |
| * documentation and/or other materials provided with the distribution. |
| * 3. All advertising materials mentioning features or use of this software |
| * must display the following acknowledgement: |
| * This product includes software developed by the University of |
| * California, Berkeley and its contributors. |
| * 4. Neither the name of the University nor the names of its contributors |
| * may be used to endorse or promote products derived from this software |
| * without specific prior written permission. |
| * |
| * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND |
| * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE |
| * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
| * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
| * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
| * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
| * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
| * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| * SUCH DAMAGE. |
| */ |
| |
| /* 1999-02-22 Arkadiusz Mi¶kiewicz <misiek@pld.ORG.PL> |
| * - added Native Language Support |
| */ |
| |
| #include <sys/types.h> |
| #include <stdlib.h> |
| #include <stdio.h> |
| #include <ctype.h> /* for isdigit() */ |
| #include <unistd.h> /* for getopt() */ |
| #include "hexdump.h" |
| #include "nls.h" |
| |
| static void odoffset(int, char ***); |
| static void odprecede(void); |
| |
| int deprecated; |
| |
| void |
| oldsyntax(int argc, char ***argvp) |
| { |
| int ch; |
| char **argv; |
| |
| deprecated = 1; |
| argv = *argvp; |
| while ((ch = getopt(argc, argv, "aBbcDdeFfHhIiLlOoPpswvXx")) != -1) |
| switch (ch) { |
| case 'a': |
| odprecede(); |
| add("16/1 \"%3_u \" \"\\n\""); |
| break; |
| case 'B': |
| case 'o': |
| odprecede(); |
| add("8/2 \" %06o \" \"\\n\""); |
| break; |
| case 'b': |
| odprecede(); |
| add("16/1 \"%03o \" \"\\n\""); |
| break; |
| case 'c': |
| odprecede(); |
| add("16/1 \"%3_c \" \"\\n\""); |
| break; |
| case 'd': |
| odprecede(); |
| add("8/2 \" %05u \" \"\\n\""); |
| break; |
| case 'D': |
| odprecede(); |
| add("4/4 \" %010u \" \"\\n\""); |
| break; |
| case 'e': /* undocumented in od */ |
| case 'F': |
| odprecede(); |
| add("2/8 \" %21.14e \" \"\\n\""); |
| break; |
| |
| case 'f': |
| odprecede(); |
| add("4/4 \" %14.7e \" \"\\n\""); |
| break; |
| case 'H': |
| case 'X': |
| odprecede(); |
| add("4/4 \" %08x \" \"\\n\""); |
| break; |
| case 'h': |
| case 'x': |
| odprecede(); |
| add("8/2 \" %04x \" \"\\n\""); |
| break; |
| case 'I': |
| case 'L': |
| case 'l': |
| odprecede(); |
| add("4/4 \" %11d \" \"\\n\""); |
| break; |
| case 'i': |
| odprecede(); |
| add("8/2 \" %6d \" \"\\n\""); |
| break; |
| case 'O': |
| odprecede(); |
| add("4/4 \" %011o \" \"\\n\""); |
| break; |
| case 'v': |
| vflag = ALL; |
| break; |
| case 'P': |
| case 'p': |
| case 's': |
| case 'w': |
| case '?': |
| default: |
| fprintf(stderr, |
| _("od: od(1) has been deprecated for hexdump(1).\n")); |
| if (ch != '?') |
| fprintf(stderr, |
| _("od: hexdump(1) compatibility doesn't support the -%c option%s\n"), |
| ch, ch == 's' ? _("; see strings(1).") : "."); |
| usage(); |
| } |
| |
| if (!fshead) { |
| add("\"%07.7_Ao\n\""); |
| add("\"%07.7_ao \" 8/2 \"%06o \" \"\\n\""); |
| } |
| |
| argc -= optind; |
| *argvp += optind; |
| |
| if (argc) |
| odoffset(argc, argvp); |
| } |
| |
| #define ishexdigit(c) \ |
| ((c >= '0' && c <= '9') || (c >= 'a' && c <= 'f') || (c >= 'A' && c <= 'F')) |
| |
| static void |
| odoffset(int argc, char ***argvp) |
| { |
| char *num, *p; |
| int base; |
| char *end; |
| |
| /* |
| * The offset syntax of od(1) was genuinely bizarre. First, if |
| * it started with a plus it had to be an offset. Otherwise, if |
| * there were at least two arguments, a number or lower-case 'x' |
| * followed by a number makes it an offset. By default it was |
| * octal; if it started with 'x' or '0x' it was hex. If it ended |
| * in a '.', it was decimal. If a 'b' or 'B' was appended, it |
| * multiplied the number by 512 or 1024 byte units. There was |
| * no way to assign a block count to a hex offset. |
| * |
| * We assume it's a file if the offset is bad. |
| */ |
| p = argc == 1 ? (*argvp)[0] : (*argvp)[1]; |
| if (!p) |
| return; |
| |
| if (*p != '+' && (argc < 2 || |
| (!isdigit((unsigned char)p[0]) && |
| (p[0] != 'x' || !ishexdigit(p[1]))))) |
| return; |
| |
| base = 0; |
| /* |
| * skip over leading '+', 'x[0-9a-fA-f]' or '0x', and |
| * set base. |
| */ |
| if (p[0] == '+') |
| ++p; |
| if (p[0] == 'x' && ishexdigit(p[1])) { |
| ++p; |
| base = 16; |
| } else if (p[0] == '0' && p[1] == 'x') { |
| p += 2; |
| base = 16; |
| } |
| |
| /* skip over the number */ |
| if (base == 16) |
| for (num = p; ishexdigit(*p); ++p); |
| else |
| for (num = p; isdigit((unsigned char)*p); ++p); |
| |
| /* check for no number */ |
| if (num == p) |
| return; |
| |
| /* if terminates with a '.', base is decimal */ |
| if (*p == '.') { |
| if (base) |
| return; |
| base = 10; |
| } |
| |
| skip = strtol(num, &end, base ? base : 8); |
| |
| /* if end isn't the same as p, we got a non-octal digit */ |
| if (end != p) { |
| skip = 0; |
| return; |
| } |
| |
| if (*p) { |
| if (*p == 'B') { |
| skip *= 1024; |
| p++; |
| } else if (*p == 'b') { |
| skip *= 512; |
| p++; |
| } |
| } |
| |
| if (*p) { |
| skip = 0; |
| return; |
| } |
| |
| /* |
| * If the offset uses a non-octal base, the base of |
| * the offset is changed as well. This isn't pretty, |
| * but it's easy. |
| */ |
| #define TYPE_OFFSET 7 |
| if (base == 16) { |
| fshead->nextfu->fmt[TYPE_OFFSET] = 'x'; |
| fshead->nextfs->nextfu->fmt[TYPE_OFFSET] = 'x'; |
| } else if (base == 10) { |
| fshead->nextfu->fmt[TYPE_OFFSET] = 'd'; |
| fshead->nextfs->nextfu->fmt[TYPE_OFFSET] = 'd'; |
| } |
| |
| /* Terminate file list. */ |
| (*argvp)[1] = NULL; |
| } |
| |
| static void |
| odprecede(void) |
| { |
| static int first = 1; |
| |
| if (first) { |
| first = 0; |
| add("\"%07.7_Ao\n\""); |
| add("\"%07.7_ao \""); |
| } else |
| add("\" \""); |
| } |