BSD 4_3_Net_2 release

[unix-history] / usr / src / usr.bin / groff / libgroff / errarg.cc

/*-
* This code is derived from software copyrighted by the Free Software
* Foundation.
*
* Modified 1991 by Donn Seeley at UUNET Technologies, Inc.
*/

#ifndef lint
static char sccsid[] = "@(#)errarg.cc   6.3 (Berkeley) 5/8/91";
#endif /* not lint */

// -*- C++ -*-
/* Copyright (C) 1989, 1990 Free Software Foundation, Inc.
    Written by James Clark (jjc@jclark.uucp)

This file is part of groff.

groff is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 1, or (at your option) any later
version.

groff is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.

You should have received a copy of the GNU General Public License along
with groff; see the file LICENSE.  If not, write to the Free Software
Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */

#include <stdio.h>
#include "assert.h"
#include "errarg.h"
#include "lib.h"

errarg::errarg(const char *p) : s(p == 0 ? "(null)" : p), type(STRING)
{
}

errarg::errarg() : type(EMPTY)
{
}

errarg::errarg(unsigned char cc) : type(CHAR)
{
 c = cc;
}

errarg::errarg(int nn) : type(INTEGER), n(nn)
{
}

errarg::errarg(char cc) : type(CHAR), c(cc)
{
}

errarg::errarg(double dd) : type(DOUBLE), d(dd)
{
}

int errarg::empty() const
{
 return type == EMPTY;
}

void errarg::print() const
{
 switch (type) {
 case INTEGER:
   fputs(itoa(n), stderr);
   break;
 case CHAR:
   putc(c, stderr);
   break;
 case STRING:
   fputs(s, stderr);
   break;
 case DOUBLE:
   fprintf(stderr, "%g", d);
   break;
 case EMPTY:
   break;
 }
}

errarg empty_errarg;

void errprint(const char *format, 
             const errarg &arg1,
             const errarg &arg2,
             const errarg &arg3)
{
 assert(format != 0);
 char c;
 while ((c = *format++) != '\0') {
   if (c == '%') {
     c = *format++;
     switch(c) {
     case '%':
       fputc('%', stderr);
       break;
     case '1':
       assert(!arg1.empty());
       arg1.print();
       break;
     case '2':
       assert(!arg2.empty());
       arg2.print();
       break;
     case '3':
       assert(!arg3.empty());
       arg3.print();
       break;
     default:
       assert(0);
     }
   }
   else
     putc(c, stderr);
 }
}