1

/* $Id$ */

     2

     3

/** @file debug.cpp */

     4

     5

#include "stdafx.h"

     6

#include <stdio.h>

     7

#include <stdarg.h>

     8

#include "openttd.h"

     9

#include "console.h"

    10

#include "debug.h"

    11

#include "functions.h"

    12

#include "string.h"

    13

#include "network/core/core.h"

    14

    15

#if defined(ENABLE_NETWORK)

    16

SOCKET _debug_socket = INVALID_SOCKET;

    17

#endif /* ENABLE_NETWORK */

    18

    19

int _debug_ai_level;

    20

int _debug_driver_level;

    21

int _debug_grf_level;

    22

int _debug_map_level;

    23

int _debug_misc_level;

    24

int _debug_ms_level;

    25

int _debug_net_level;

    26

int _debug_sprite_level;

    27

int _debug_oldloader_level;

    28

int _debug_ntp_level;

    29

int _debug_npf_level;

    30

int _debug_yapf_level;

    31

int _debug_freetype_level;

    32

int _debug_sl_level;

    33

int _debug_station_level;

    34

    35

    36

struct DebugLevel {

    37

	const char *name;

    38

	int *level;

    39

};

    40

    41

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

    42

	static const DebugLevel debug_level[] = {

    43

	DEBUG_LEVEL(ai),

    44

	DEBUG_LEVEL(driver),

    45

	DEBUG_LEVEL(grf),

    46

	DEBUG_LEVEL(map),

    47

	DEBUG_LEVEL(misc),

    48

	DEBUG_LEVEL(ms),

    49

	DEBUG_LEVEL(net),

    50

	DEBUG_LEVEL(sprite),

    51

	DEBUG_LEVEL(oldloader),

    52

	DEBUG_LEVEL(ntp),

    53

	DEBUG_LEVEL(npf),

    54

	DEBUG_LEVEL(yapf),

    55

	DEBUG_LEVEL(freetype),

    56

	DEBUG_LEVEL(sl),

    57

	DEBUG_LEVEL(station),

    58

	};

    59

#undef DEBUG_LEVEL

    60

    61

#if !defined(NO_DEBUG_MESSAGES)

    62

    63

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

    64

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

    65

#if defined(NO_VARARG_MACRO)

    66

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

    67

{

    68

	va_list va;

    69

	const char *dbg;

    70

	const DebugLevel *dl = &debug_level[name];

    71

    72

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

    73

	dbg = dl->name;

    74

	va_start(va, level);

    75

#else

    76

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

    77

{

    78

	va_list va;

    79

	va_start(va, dbg);

    80

#endif /* NO_VARARG_MACRO */

    81

	{

    82

		const char *s;

    83

		char buf[1024];

    84

    85

		s = va_arg(va, const char*);

    86

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

    87

		va_end(va);

    88

#if defined(ENABLE_NETWORK)

    89

		if (_debug_socket != INVALID_SOCKET) {

    90

			char buf2[lengthof(buf) + 32];

    91

    92

			snprintf(buf2, lengthof(buf2), "dbg: [%s] %s\n", dbg, buf);

    93

			send(_debug_socket, buf2, strlen(buf2), 0);

    94

		} else

    95

#endif /* ENABLE_NETWORK */

    96

		{

    97

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

    98

			IConsoleDebug(dbg, buf);

    99

		}

   100

	}

   101

}

   102

#endif /* NO_DEBUG_MESSAGES */

   103

   104

void SetDebugString(const char *s)

   105

{

   106

	int v;

   107

	char *end;

   108

	const char *t;

   109

   110

	/* global debugging level? */

   111

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

   112

		const DebugLevel *i;

   113

   114

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

   115

		s = end;

   116

   117

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

   118

	}

   119

   120

	/* individual levels */

   121

	for (;;) {

   122

		const DebugLevel *i;

   123

		int *p;

   124

   125

		/* skip delimiters */

   126

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

   127

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

   128

   129

		t = s;

   130

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

   131

   132

		/* check debugging levels */

   133

		p = NULL;

   134

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

   135

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

   136

				p = i->level;

   137

				break;

   138

			}

   139

   140

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

   141

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

   142

		s = end;

   143

		if (p != NULL) {

   144

			*p = v;

   145

		} else {

   146

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

   147

			return;

   148

		}

   149

	}

   150

}

   151

   152

/** Print out the current debug-level

   153

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

   154

 * @return string with debug-levels

   155

 */

   156

const char *GetDebugString()

   157

{

   158

	const DebugLevel *i;

   159

	static char dbgstr[100];

   160

	char dbgval[20];

   161

   162

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

   163

	i = debug_level;

   164

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

   165

   166

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

   167

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

   168

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

   169

	}

   170

   171

	return dbgstr;

   172

}