reporter.cc File Reference

#include "misc/auxiliary.h"
#include "reporter/reporter.h"
#include "resources/feResource.h"
#include "resources/feFopen.h"
#include "omalloc/omalloc.h"
#include <stdlib.h>
#include <stdio.h>
#include "misc/mylimits.h"
#include <stdarg.h>
#include <sys/stat.h>
#include <ctype.h>
#include <unistd.h>

Go to the source code of this file.

Macros
#define	fePutChar(c)   fputc((unsigned char)(c),stdout)
#define	INITIAL_PRINT_BUFFER   24*1024L
#define	MAX_FILE_BUFFER   4*4096
#define	warn_str   "// ** "

Functions
void	StringAppend (const char *fmt,...)
void	StringAppendS (const char *st)
void	StringSetS (const char *st)
char *	StringEndS ()
void	WerrorS_batch (const char *s)
void	Werror (const char *fmt,...)
void	WarnS (const char *s)
void	Warn (const char *fmt,...)
void	SPrintStart ()
static void	SPrintS (const char *s)
char *	SPrintEnd ()
void	PrintS (const char *s)
void	PrintLn ()
void	Print (const char *fmt,...)
void	PrintNSpaces (const int n)
const char *	eati (const char *s, int *i)
void	feStringAppendResources (int warn)

Variables
STATIC_VAR long	feBufferLength =0
STATIC_VAR char *	feBuffer =NULL
STATIC_VAR long	feBufferLength_save [8]
STATIC_VAR char *	feBuffer_save [8]
STATIC_VAR int	feBuffer_cnt =0
STATIC_VAR char *	feBufferStart_save [8]
VAR char *	feErrors =NULL
VAR int	feErrorsLen =0
VAR BOOLEAN	feWarn = TRUE
VAR BOOLEAN	feOut = TRUE
const char	feNotImplemented [] ="not implemented"
VAR int	feProt = FALSE
VAR FILE *	feProtFile
STATIC_VAR char *	feBufferStart
VAR void(*	WarnS_callback )(const char *s) = NULL
STATIC_VAR char *	sprint = NULL
STATIC_VAR char *	sprint_backup = NULL

Macro Definition Documentation

fePutChar

#define fePutChar

(

c

)

fputc((unsigned char)(c),stdout)

Definition at line 30 of file reporter.cc.

INITIAL_PRINT_BUFFER

#define INITIAL_PRINT_BUFFER   24*1024L

Definition at line 34 of file reporter.cc.

MAX_FILE_BUFFER

#define MAX_FILE_BUFFER   4*4096

Definition at line 38 of file reporter.cc.

warn_str

#define warn_str   "// ** "

Function Documentation

eati()

const char * eati	(	const char *	s,
		int *	i
	)

Definition at line 377 of file reporter.cc.

{
  int l=0;
 
  if    (*s >= '0' && *s <= '9')
  {
    *i = 0;
    while (*s >= '0' && *s <= '9')
    {
      *i *= 10;
      *i += *s++ - '0';
      l++;
      if ((l>=MAX_INT_LEN)||((*i) <0))
      {
        s-=l;
        Werror("`%s` greater than %d(max. integer representation)",
                s,MAX_INT_VAL);
        return s;
      }
    }
  }
  else *i = 1;
  return s;
}

feStringAppendResources()

void feStringAppendResources

(

int

warn

)

Definition at line 402 of file reporter.cc.

{
  int i = 0;
  char* r;
  StringAppend("%-10s:\t%s\n", "argv[0]", feArgv0);
  while (feResourceConfigs[i].key != NULL)
  {
    r = feResource(feResourceConfigs[i].key, warn);
    StringAppend("%-10s:\t%s\n", feResourceConfigs[i].key,
                 (r != NULL ? r : ""));
    i++;
  }
}

Print()

void Print	(	const char *	fmt,
			...
	)

Definition at line 319 of file reporter.cc.

{
  if (sprint != NULL)
  {
    va_list ap;
    va_start(ap, fmt);
    omCheckAddr(sprint);
    int ls = strlen(fmt);
    if (fmt != NULL && ls > 0)
    {
      char* ns;
      int l = strlen(sprint);
      ns = (char*) omAlloc(sizeof(char)*(ls + l + 512));
      if (l > 0)  strcpy(ns, sprint);
 
#ifdef HAVE_VSNPRINTF
      l = vsnprintf(&(ns[l]), ls+511, fmt, ap);
      assume(l != -1);
#else
      vsprintf(&(ns[l]), fmt, ap);
#endif
      omCheckAddr(ns);
      omFree(sprint);
      sprint = ns;
    }
    va_end(ap);
    return;
  }
  else if (feOut)
  {
    va_list ap;
    va_start(ap, fmt);
    int l=0;
    long ls=strlen(fmt);
    char *s=(char *)omAlloc0(ls+512);
#ifdef HAVE_VSNPRINTF
    l = vsnprintf(s, ls+511, fmt, ap);
    if ((l==-1)||(s[l]!='\0')||(l!=(int)strlen(s)))
    {
      printf("Print problem: l=%d, fmt=>>%s<<\n",l,fmt);
    }
#else
    vsprintf(s, fmt, ap);
#endif
    PrintS(s);
    omFree(s);
    va_end(ap);
  }
}

PrintLn()

void PrintLn

(

)

Definition at line 314 of file reporter.cc.

{
  PrintS("\n");
}

PrintNSpaces()

void PrintNSpaces

(

const int

n

)

Definition at line 368 of file reporter.cc.

{
  int l=n-1;
  while(l>=0) { PrintS(" "); l--; }
}

PrintS()

void PrintS

(

const char *

s

)

Definition at line 288 of file reporter.cc.

{
  if (sprint != NULL)
  {
    SPrintS(s);
    return;
  }
  else if (feOut) /* do not print when option --no-out was given */
  {
 
    if (PrintS_callback!=NULL)
    {
      PrintS_callback(s);
    }
    else
    {
      fwrite(s,1,strlen(s),stdout);
      fflush(stdout);
      if (feProt&SI_PROT_O)
      {
        fwrite(s,1,strlen(s),feProtFile);
      }
    }
  }
}

SPrintEnd()

char * SPrintEnd

(

)

Definition at line 277 of file reporter.cc.

{
  char* ns = sprint;
  sprint = sprint_backup;
  sprint_backup=NULL;
  omCheckAddr(ns);
  return ns;
}

SPrintS()

static void SPrintS ( const char *  s )

inlinestatic

Definition at line 260 of file reporter.cc.

{
  omCheckAddr(sprint);
  if ((s == NULL)||(*s == '\0')) return;
  int ls = strlen(s);
 
  char* ns;
  int l = strlen(sprint);
  ns = (char*) omAlloc((l + ls + 1)*sizeof(char));
  if (l > 0) strcpy(ns, sprint);
 
  strcpy(&(ns[l]), s);
  omFree(sprint);
  sprint = ns;
  omCheckAddr(sprint);
}

SPrintStart()

void SPrintStart

(

)

Definition at line 250 of file reporter.cc.

{
  if (sprint!=NULL)
  {
    if (sprint_backup!=NULL) WerrorS("internal error: SPrintStart");
    else sprint_backup=sprint;
  }
  sprint = omStrDup("");
}

StringAppend()

void StringAppend	(	const char *	fmt,
			...
	)

Definition at line 61 of file reporter.cc.

{
  va_list ap;
  char *s = feBufferStart; /*feBuffer + strlen(feBuffer);*/
  int vs;
  long more;
  va_start(ap, fmt);
  if ((more=feBufferStart-feBuffer+strlen(fmt)+100)>feBufferLength)
  {
    more = ((more + (8*1024-1))/(8*1024))*(8*1024);
    int l=s-feBuffer;
    feBuffer=(char *)omReallocSize((void *)feBuffer,feBufferLength,
                                                     more);
#if (!defined(SING_NDEBUG)) && (!defined(OM_NDEBUG))
    omMarkAsStaticAddr(feBuffer);
#endif
    feBufferLength=more;
    s=feBuffer+l;
#ifndef BSD_SPRINTF
    feBufferStart=s;
#endif
  }
//#ifdef BSD_SPRINTF
//  vsprintf(s, fmt, ap);
//  while (*s!='\0') s++;
//  feBufferStart =s;
//#else
#ifdef HAVE_VSNPRINTF
  vs = vsnprintf(s, feBufferLength - (feBufferStart - feBuffer), fmt, ap);
  if (vs == -1)
  {
    assume(0);
    feBufferStart = feBuffer + feBufferLength -1;
  }
  else
  {
    feBufferStart += vs;
  }
#else
  feBufferStart += vsprintf(s, fmt, ap);
#endif
//#endif
  omCheckAddrSize(feBuffer, feBufferLength);
  va_end(ap);
}

StringAppendS()

void StringAppendS

(

const char *

st

)

Definition at line 107 of file reporter.cc.

{
  if (*st!='\0')
  {
    /* feBufferStart is feBuffer + strlen(feBuffer);*/
    int l=strlen(st);
    long more;
    int ll=feBufferStart-feBuffer;
    if ((more=ll+2+l)>feBufferLength)
    {
      more = ((more + (8*1024-1))/(8*1024))*(8*1024);
      feBuffer=(char *)omreallocSize((void *)feBuffer,feBufferLength,
                                                       more);
      feBufferLength=more;
      feBufferStart=feBuffer+ll;
    }
    strncat(feBufferStart, st,l);
    feBufferStart +=l;
  }
}

StringEndS()

char * StringEndS

(

)

Definition at line 151 of file reporter.cc.

{
  char *r=feBuffer;
  feBuffer_cnt--;
  assume(feBuffer_cnt >=0);
  feBuffer=feBuffer_save[feBuffer_cnt];
  feBufferLength=feBufferLength_save[feBuffer_cnt];
  feBufferStart=feBufferStart_save[feBuffer_cnt];
  if (strlen(r)<1024)
  {
    // if the used buffer is a "small block",
    // substitute the "large" initial block by a small one
    char *s=omStrDup(r); omFree(r); r=s;
  }
  return r;
}

StringSetS()

void StringSetS

(

const char *

st

)

Definition at line 128 of file reporter.cc.

{
  feBuffer_save[feBuffer_cnt]=feBuffer;
  feBuffer=(char*)omAlloc0(INITIAL_PRINT_BUFFER);
  feBufferLength_save[feBuffer_cnt]=feBufferLength;
  feBufferLength=INITIAL_PRINT_BUFFER;
  feBufferStart_save[feBuffer_cnt]=feBufferStart;
  feBufferStart=feBuffer;
  feBuffer_cnt++;
  assume(feBuffer_cnt<8);
  int l=strlen(st);
  long more;
  if (l>feBufferLength)
  {
    more = ((l + (4*1024-1))/(4*1024))*(4*1024);
    feBuffer=(char *)omReallocSize((ADDRESS)feBuffer,feBufferLength,
                                                     more);
    feBufferLength=more;
  }
  strcpy(feBuffer,st);
  feBufferStart=feBuffer+l;
}

Warn()

void Warn	(	const char *	fmt,
			...
	)

Definition at line 231 of file reporter.cc.

{
  va_list ap;
  va_start(ap, fmt);
  char *s=(char *)omAlloc(256);
#ifdef HAVE_VSNPRINTF
  vsnprintf(s, 256, fmt, ap);
#else
  vsprintf(s, fmt, ap);
#endif
  WarnS(s);
  omFreeSize(s,256);
  va_end(ap);
}

WarnS()

void WarnS

(

const char *

s

)

Definition at line 206 of file reporter.cc.

{
  #define warn_str "// ** "
  if (feWarn) /* ignore warnings if option --no-warn was given */
  {
    if (WarnS_callback==NULL)
    {
      fwrite(warn_str,1,6,stdout);
      fwrite(s,1,strlen(s),stdout);
      fwrite("\n",1,1,stdout);
      fflush(stdout);
      if (feProt&SI_PROT_O)
      {
        fwrite(warn_str,1,6,feProtFile);
        fwrite(s,1,strlen(s),feProtFile);
        fwrite("\n",1,1,feProtFile);
      }
    }
    else
    {
      WarnS_callback(s);
    }
  }
}

Werror()

void Werror	(	const char *	fmt,
			...
	)

Definition at line 189 of file reporter.cc.

{
  va_list ap;
  va_start(ap, fmt);
  char *s=(char *)omAlloc(256);
#ifdef HAVE_VSNPRINTF
  vsnprintf(s,256, fmt, ap);
#else
  vsprintf(s, fmt, ap);
#endif  
  WerrorS(s);
  omFreeSize(s,256);
  va_end(ap);
}

WerrorS_batch()

void WerrorS_batch

(

const char *

s

)

Definition at line 168 of file reporter.cc.

{
  if (feErrors==NULL)
  {
    feErrors=(char *)omAlloc(256);
    feErrorsLen=256;
    *feErrors = '\0';
  }
  else
  {
    if (((int)(strlen((char *)s)+ 20 +strlen(feErrors)))>=feErrorsLen)
    {
      feErrors=(char *)omReallocSize(feErrors,feErrorsLen,feErrorsLen+256);
      feErrorsLen+=256;
    }
  }
  strcat(feErrors, "Singular error: ");
  strcat(feErrors, (char *)s);
  errorreported = TRUE;
}

Variable Documentation

feBuffer

STATIC_VAR char* feBuffer =NULL

Definition at line 40 of file reporter.cc.

feBuffer_cnt

STATIC_VAR int feBuffer_cnt =0

Definition at line 43 of file reporter.cc.

feBuffer_save

STATIC_VAR char* feBuffer_save[8]

Definition at line 42 of file reporter.cc.

feBufferLength

STATIC_VAR long feBufferLength =0

Definition at line 39 of file reporter.cc.

feBufferLength_save

STATIC_VAR long feBufferLength_save[8]

Definition at line 41 of file reporter.cc.

feBufferStart

STATIC_VAR char* feBufferStart

Definition at line 59 of file reporter.cc.

feBufferStart_save

STATIC_VAR char* feBufferStart_save[8]

Definition at line 44 of file reporter.cc.

feErrors

VAR char* feErrors =NULL

Definition at line 47 of file reporter.cc.

feErrorsLen

VAR int feErrorsLen =0

Definition at line 48 of file reporter.cc.

feNotImplemented

const char feNotImplemented[] ="not implemented"

Definition at line 54 of file reporter.cc.

feOut

VAR BOOLEAN feOut = TRUE

Definition at line 50 of file reporter.cc.

feProt

VAR int feProt = FALSE

Definition at line 56 of file reporter.cc.

feProtFile

VAR FILE* feProtFile

Definition at line 57 of file reporter.cc.

feWarn

VAR BOOLEAN feWarn = TRUE

Definition at line 49 of file reporter.cc.

sprint

STATIC_VAR char* sprint = NULL

Definition at line 248 of file reporter.cc.

sprint_backup

STATIC_VAR char* sprint_backup = NULL

Definition at line 249 of file reporter.cc.

WarnS_callback

VAR void(* WarnS_callback) (const char *s)

(

const char *

s

)

= NULL

Definition at line 204 of file reporter.cc.