123 lines
2.3 KiB
C++
123 lines
2.3 KiB
C++
|
/*-
|
||
|
|
* 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);
|
||
|
|
}
|
||
|
|
}
|