/*      $NetBSD: conv.c,v 1.14 2013/02/09 02:49:36 jakllsch Exp $       */

/*
* Copyright (c) 1989, 1993
*      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. 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.
*/

#if HAVE_NBTOOL_CONFIG_H
#include "nbtool_config.h"
#endif

#include <sys/cdefs.h>
#if !defined(lint)
#if 0
static char sccsid[] = "@(#)conv.c      8.1 (Berkeley) 6/6/93";
#else
__RCSID("$NetBSD: conv.c,v 1.14 2013/02/09 02:49:36 jakllsch Exp $");
#endif
#endif /* not lint */

#include <sys/types.h>

#include <stdio.h>
#include <ctype.h>

#include "hexdump.h"

void
conv_c(PR *pr, u_char *p)
{
       char buf[10];
       char const *str;

       switch(*p) {
       case '\0':
               str = "\\0";
               goto strpr;
       /* case '\a': */
       case '\007':
               if (odmode)             /* od doesn't know about \a */
                       break;
               str = "\\a";
               goto strpr;
       case '\b':
               str = "\\b";
               goto strpr;
       case '\f':
               str = "\\f";
               goto strpr;
       case '\n':
               str = "\\n";
               goto strpr;
       case '\r':
               str = "\\r";
               goto strpr;
       case '\t':
               str = "\\t";
               goto strpr;
       case '\v':
               if (odmode)
                       break;
               str = "\\v";
               goto strpr;
       default:
               break;
       }
       if (isprint(*p)) {
               *pr->cchar = 'c';
               (void)printf(pr->fmt, *p);
       } else {
               (void)sprintf(buf, "%03o", (int)*p);
               str = buf;
strpr:          *pr->cchar = 's';
               (void)printf(pr->fmt, str);
       }
}

void
conv_u(PR *pr, u_char *p)
{
       static const char *list[] = {
               "nul", "soh", "stx", "etx", "eot", "enq", "ack", "bel",
                "bs",  "ht",  "lf",  "vt",  "ff",  "cr",  "so",  "si",
               "dle", "dc1", "dc2", "dc3", "dc4", "nak", "syn", "etb",
               "can",  "em", "sub", "esc",  "fs",  "gs",  "rs",  "us",
       };

                                               /* od used nl, not lf */
       if (*p <= 0x1f) {
               *pr->cchar = 's';
               if (odmode && *p == 0x0a)
                       (void)printf(pr->fmt, "nl");
               else
                       (void)printf(pr->fmt, list[*p]);
       } else if (*p == 0x7f) {
               *pr->cchar = 's';
               (void)printf(pr->fmt, "del");
       } else if (odmode && *p == 0x20) {      /* od replaces space with sp */
               *pr->cchar = 's';
               (void)printf(pr->fmt, " sp");
       } else if (isprint(*p)) {
               *pr->cchar = 'c';
               (void)printf(pr->fmt, *p);
       } else {
               *pr->cchar = 'x';
               (void)printf(pr->fmt, (int)*p);
       }
}