Subversion Repositories openrisc

/* Public Domain Curses */
 
#include <curspriv.h>
 
RCSID("$Id: debug.c,v 1.1 2009/05/10 08:29:53 jld Exp $")
 
/*man-start**************************************************************
 
  Name:                                                         debug
 
  Synopsis:
        void traceon(void);
        void traceoff(void);
        void PDC_debug(const char *, ...);
 
  Description:
        traceon() and traceoff() toggle the recording of debugging 
        information to the file "trace". Although not standard, similar 
        functions are in some other curses implementations.
 
        PDC_debug() is the function that writes to the file, based on 
        whether traceon() has been called. It's used from the PDC_LOG() 
        macro.
 
  Portability                                X/Open    BSD    SYS V
        traceon                                 -       -       -
        traceoff                                -       -       -
        PDC_debug                               -       -       -
 
**man-end****************************************************************/
 
#include <string.h>
#include <sys/types.h>
#include <time.h>
 
bool pdc_trace_on = FALSE;
 
void PDC_debug(const char *fmt, ...)
{
    va_list args;
    FILE *dbfp;
    char hms[9];
    time_t now;
 
    if (!pdc_trace_on)
        return; 
 
    /* open debug log file append */
 
    dbfp = fopen("trace", "a");
    if (!dbfp)
    {
        fprintf(stderr,
            "PDC_debug(): Unable to open debug log file\n");
        return;
    }
 
    time(&now);
    strftime(hms, 9, "%H:%M:%S", localtime(&now));
    fprintf(dbfp, "At: %8.8ld - %s ", (long) clock(), hms);
 
    va_start(args, fmt);
    vfprintf(dbfp, fmt, args);
    va_end(args);
 
    fclose(dbfp);
}
 
void traceon(void)
{
    PDC_LOG(("traceon() - called\n"));
 
    pdc_trace_on = TRUE;
}
 
void traceoff(void)
{
    PDC_LOG(("traceoff() - called\n"));
 
    pdc_trace_on = FALSE;
}