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

#include <stdio.h>
#include <assert.h>
#include "errarg.h"
#include "lib.h"		// for our_itoa()

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

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(our_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)
{
  char c;

  assert(format != 0);
  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);
    }
}