1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
|
/* PDCurses */
#include <curspriv.h>
/*man-start**************************************************************
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.
The environment variable PDC_TRACE_FLUSH controls whether the trace
file contents are fflushed after each write. The default is not. Set
it to enable this (may affect performance).
### Portability
X/Open ncurses NetBSD
traceon - - -
traceoff - - -
PDC_debug - - -
**man-end****************************************************************/
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <time.h>
static bool want_fflush = FALSE;
void PDC_debug(const char *fmt, ...)
{
va_list args;
char hms[9];
time_t now;
if (!SP || !SP->dbfp)
return;
time(&now);
strftime(hms, 9, "%H:%M:%S", localtime(&now));
fprintf(SP->dbfp, "At: %8.8ld - %s ", (long) clock(), hms);
va_start(args, fmt);
vfprintf(SP->dbfp, fmt, args);
va_end(args);
/* If you are crashing and losing debugging information, enable this
by setting the environment variable PDC_TRACE_FLUSH. This may
impact performance. */
if (want_fflush)
fflush(SP->dbfp);
/* If with PDC_TRACE_FLUSH enabled you are still losing logging in
crashes, you may need to add a platform-dependent mechanism to
flush the OS buffers as well (such as fsync() on POSIX) -- but
expect terrible performance. */
}
void traceon(void)
{
if (!SP)
return;
if (SP->dbfp)
fclose(SP->dbfp);
/* open debug log file append */
SP->dbfp = fopen("trace", "a");
if (!SP->dbfp)
{
fprintf(stderr, "PDC_debug(): Unable to open debug log file\n");
return;
}
if (getenv("PDC_TRACE_FLUSH"))
want_fflush = TRUE;
PDC_LOG(("traceon() - called\n"));
}
void traceoff(void)
{
if (!SP || !SP->dbfp)
return;
PDC_LOG(("traceoff() - called\n"));
fclose(SP->dbfp);
SP->dbfp = NULL;
want_fflush = FALSE;
}
|
