File: trace.c

package info (click to toggle)
universal-ctags 0%2Bgit20181215-2
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 17,444 kB
  • sloc: ansic: 84,242; vhdl: 5,924; sh: 5,830; perl: 1,743; cpp: 1,599; cs: 1,193; python: 812; sql: 572; f90: 534; php: 479; yacc: 459; fortran: 341; makefile: 325; asm: 311; objc: 284; ruby: 261; xml: 245; java: 157; tcl: 133; cobol: 122; lisp: 113; erlang: 61; ada: 55; ml: 49; awk: 43
file content (119 lines) | stat: -rw-r--r-- 1,899 bytes parent folder | download
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
107
108
109
110
111
112
113
114
115
116
117
118
119
/*
*   Copyright (c) 2016, Szymon Tomasz Stefanek
*
*   This source code is released for free distribution under the terms of the
*   GNU General Public License version 2 or (at your option) any later version.
*
*   Tracing facility.
*/

#include "trace.h"

#ifdef DO_TRACING

#include "options.h"
#include "read.h"

#include <stdio.h>
#include <stdarg.h>

void traceEnter(const char * szFunction,const char * szFormat,...)
{
	if (!isTraced())
		return;

	debugIndent ();

	fprintf(stderr,"[>> %s][at %lu] ",szFunction,getInputLineNumber());

	va_list va;
	va_start(va,szFormat);
	vfprintf(stderr,szFormat,va);
	va_end(va);

	fprintf(stderr,"\n");

	debugInc();
}

void traceLeave(const char * szFunction,const char * szFormat,...)
{
	if (!isTraced())
		return;

	debugDec();
	debugIndent ();

	fprintf(stderr,"[<< %s][at %lu] ",szFunction,getInputLineNumber());

	va_list va;
	va_start(va,szFormat);
	vfprintf(stderr,szFormat,va);
	va_end(va);

	fprintf(stderr,"\n");
}

static void tracePrintFmtVa(const char * szFormat, va_list va)
{
	if (!isTraced())
		return;

	vfprintf(stderr,szFormat,va);
}

void tracePrint(const char * szFunction, const char * szFormat,...)
{
	if (!isTraced())
		return;

	tracePrintPrefix(szFunction);

	va_list va;
	va_start(va,szFormat);
	tracePrintFmtVa (szFormat,va);
	va_end(va);

	tracePrintNewline();
}

void tracePrintFmt(const char * szFormat,...)
{
	va_list va;
	va_start(va,szFormat);
	tracePrintFmtVa (szFormat,va);
	va_end(va);
}

void tracePrintPrefix(const char * szFunction)
{
	if (!isTraced())
		return;

	debugIndent();

	fprintf(stderr,"[%s][at %lu] ",szFunction,getInputLineNumber());
}

void tracePrintNewline(void)
{
	if (!isTraced())
		return;

	fprintf(stderr,"\n");
}

static bool tracingMain;

void traceMain(void)
{
	verbose("Tracing main part\n");
	tracingMain = true;
}

bool isMainTraced(void)
{
	return tracingMain;
}

#endif // DO_TRACING