1

/* $Id$ */

     2

     3

#include "stdafx.h"

     4

#include <stdio.h>

     5

#include <stdarg.h>

     6

#include "openttd.h"

     7

#include "console.h"

     8

#include "debug.h"

     9

#include "functions.h"

    10

#include "string.h"

    11

    12

int _debug_ai_level;

    13

int _debug_driver_level;

    14

int _debug_grf_level;

    15

int _debug_map_level;

    16

int _debug_misc_level;

    17

int _debug_ms_level;

    18

int _debug_net_level;

    19

int _debug_sprite_level;

    20

int _debug_oldloader_level;

    21

int _debug_ntp_level;

    22

int _debug_npf_level;

    23

int _debug_yapf_level;

    24

int _debug_freetype_level;

    25

int _debug_sl_level;

    26

int _debug_station_level;

    27

    28

    29

typedef struct DebugLevel {

    30

	const char *name;

    31

	int *level;

    32

} DebugLevel;

    33

    34

#define DEBUG_LEVEL(x) { #x, &_debug_##x##_level }

    35

	static const DebugLevel debug_level[] = {

    36

	DEBUG_LEVEL(ai),

    37

	DEBUG_LEVEL(driver),

    38

	DEBUG_LEVEL(grf),

    39

	DEBUG_LEVEL(map),

    40

	DEBUG_LEVEL(misc),

    41

	DEBUG_LEVEL(ms),

    42

	DEBUG_LEVEL(net),

    43

	DEBUG_LEVEL(sprite),

    44

	DEBUG_LEVEL(oldloader),

    45

	DEBUG_LEVEL(ntp),

    46

	DEBUG_LEVEL(npf),

    47

	DEBUG_LEVEL(yapf),

    48

	DEBUG_LEVEL(freetype),

    49

	DEBUG_LEVEL(sl),

    50

	DEBUG_LEVEL(station),

    51

	};

    52

#undef DEBUG_LEVEL

    53

    54

#if !defined(NO_DEBUG_MESSAGES)

    55

    56

/** Functionized DEBUG macro for compilers that don't support

    57

 * variadic macros (__VA_ARGS__) such as...yes MSVC2003 and lower */

    58

#if defined(NO_VARARG_MACRO)

    59

void CDECL DEBUG(int name, int level, ...)

    60

{

    61

	va_list va;

    62

	const char *dbg;

    63

	const DebugLevel *dl = &debug_level[name];

    64

    65

	if (level != 0 && *dl->level < level) return;

    66

	dbg = dl->name;

    67

	va_start(va, level);

    68

#else

    69

void CDECL debug(const char *dbg, ...)

    70

{

    71

	va_list va;

    72

	va_start(va, dbg);

    73

#endif /* NO_VARARG_MACRO */

    74

	{

    75

		const char *s;

    76

		char buf[1024];

    77

    78

		s = va_arg(va, const char*);

    79

		vsnprintf(buf, lengthof(buf), s, va);

    80

		va_end(va);

    81

		fprintf(stderr, "dbg: [%s] %s\n", dbg, buf);

    82

		IConsoleDebug(dbg, buf);

    83

	}

    84

}

    85

#endif /* NO_DEBUG_MESSAGES */

    86

    87

void SetDebugString(const char *s)

    88

{

    89

	int v;

    90

	char *end;

    91

	const char *t;

    92

    93

	// global debugging level?

    94

	if (*s >= '0' && *s <= '9') {

    95

		const DebugLevel *i;

    96

    97

		v = strtoul(s, &end, 0);

    98

		s = end;

    99

   100

		for (i = debug_level; i != endof(debug_level); ++i) *i->level = v;

   101

	}

   102

   103

	// individual levels

   104

	for (;;) {

   105

		const DebugLevel *i;

   106

		int *p;

   107

   108

		// skip delimiters

   109

		while (*s == ' ' || *s == ',' || *s == '\t') s++;

   110

		if (*s == '\0') break;

   111

   112

		t = s;

   113

		while (*s >= 'a' && *s <= 'z') s++;

   114

   115

		// check debugging levels

   116

		p = NULL;

   117

		for (i = debug_level; i != endof(debug_level); ++i)

   118

			if (s == t + strlen(i->name) && strncmp(t, i->name, s - t) == 0) {

   119

				p = i->level;

   120

				break;

   121

			}

   122

   123

		if (*s == '=') s++;

   124

		v = strtoul(s, &end, 0);

   125

		s = end;

   126

		if (p != NULL) {

   127

			*p = v;

   128

		} else {

   129

			ShowInfoF("Unknown debug level '%.*s'", s - t, t);

   130

			return;

   131

		}

   132

	}

   133

}

   134

   135

/** Print out the current debug-level

   136

 * Just return a string with the values of all the debug categorites

   137

 * @return string with debug-levels

   138

 */

   139

const char *GetDebugString(void)

   140

{

   141

	const DebugLevel *i;

   142

	static char dbgstr[100];

   143

	char dbgval[20];

   144

   145

	memset(dbgstr, 0, sizeof(dbgstr));

   146

	i = debug_level;

   147

	snprintf(dbgstr, sizeof(dbgstr), "%s=%d", i->name, *i->level);

   148

   149

	for (i++; i != endof(debug_level); i++) {

   150

		snprintf(dbgval, sizeof(dbgval), ", %s=%d", i->name, *i->level);

   151

		ttd_strlcat(dbgstr, dbgval, sizeof(dbgstr));

   152

	}

   153

   154

	return dbgstr;

   155

}