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 "string_func.h"

    12

#include "network/core/core.h"

    13

    14

#if defined(ENABLE_NETWORK)

    15

SOCKET _debug_socket = INVALID_SOCKET;

    16

#endif /* ENABLE_NETWORK */

    17

    18

int _debug_ai_level;

    19

int _debug_driver_level;

    20

int _debug_grf_level;

    21

int _debug_map_level;

    22

int _debug_misc_level;

    23

int _debug_ms_level;

    24

int _debug_net_level;

    25

int _debug_sprite_level;

    26

int _debug_oldloader_level;

    27

int _debug_ntp_level;

    28

int _debug_npf_level;

    29

int _debug_yapf_level;

    30

int _debug_freetype_level;

    31

int _debug_sl_level;

    32

int _debug_station_level;

    33

    34

    35

struct DebugLevel {

    36

	const char *name;

    37

	int *level;

    38

};

    39

    40

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

    41

	static const DebugLevel debug_level[] = {

    42

	DEBUG_LEVEL(ai),

    43

	DEBUG_LEVEL(driver),

    44

	DEBUG_LEVEL(grf),

    45

	DEBUG_LEVEL(map),

    46

	DEBUG_LEVEL(misc),

    47

	DEBUG_LEVEL(ms),

    48

	DEBUG_LEVEL(net),

    49

	DEBUG_LEVEL(sprite),

    50

	DEBUG_LEVEL(oldloader),

    51

	DEBUG_LEVEL(ntp),

    52

	DEBUG_LEVEL(npf),

    53

	DEBUG_LEVEL(yapf),

    54

	DEBUG_LEVEL(freetype),

    55

	DEBUG_LEVEL(sl),

    56

	DEBUG_LEVEL(station),

    57

	};

    58

#undef DEBUG_LEVEL

    59

    60

#if !defined(NO_DEBUG_MESSAGES)

    61

    62

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

    63

{

    64

	va_list va;

    65

	va_start(va, dbg);

    66

	const char *s;

    67

	char buf[1024];

    68

    69

	s = va_arg(va, const char*);

    70

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

    71

	va_end(va);

    72

#if defined(ENABLE_NETWORK)

    73

	if (_debug_socket != INVALID_SOCKET) {

    74

		char buf2[lengthof(buf) + 32];

    75

    76

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

    77

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

    78

	} else

    79

#endif /* ENABLE_NETWORK */

    80

	{

    81

#if defined(WINCE)

    82

		/* We need to do OTTD2FS twice, but as it uses a static buffer, we need to store one temporary */

    83

		TCHAR tbuf[512];

    84

		_sntprintf(tbuf, sizeof(tbuf), _T("%s"), OTTD2FS(dbg));

    85

		NKDbgPrintfW(_T("dbg: [%s] %s\n"), tbuf, OTTD2FS(buf));

    86

#else

    87

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

    88

#endif

    89

		IConsoleDebug(dbg, buf);

    90

	}

    91

}

    92

#endif /* NO_DEBUG_MESSAGES */

    93

    94

void SetDebugString(const char *s)

    95

{

    96

	int v;

    97

	char *end;

    98

	const char *t;

    99

   100

	/* global debugging level? */

   101

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

   102

		const DebugLevel *i;

   103

   104

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

   105

		s = end;

   106

   107

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

   108

	}

   109

   110

	/* individual levels */

   111

	for (;;) {

   112

		const DebugLevel *i;

   113

		int *p;

   114

   115

		/* skip delimiters */

   116

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

   117

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

   118

   119

		t = s;

   120

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

   121

   122

		/* check debugging levels */

   123

		p = NULL;

   124

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

   125

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

   126

				p = i->level;

   127

				break;

   128

			}

   129

   130

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

   131

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

   132

		s = end;

   133

		if (p != NULL) {

   134

			*p = v;

   135

		} else {

   136

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

   137

			return;

   138

		}

   139

	}

   140

}

   141

   142

/** Print out the current debug-level

   143

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

   144

 * @return string with debug-levels

   145

 */

   146

const char *GetDebugString()

   147

{

   148

	const DebugLevel *i;

   149

	static char dbgstr[150];

   150

	char dbgval[20];

   151

   152

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

   153

	i = debug_level;

   154

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

   155

   156

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

   157

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

   158

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

   159

	}

   160

   161

	return dbgstr;

   162

}

   163

   164

#ifdef DEBUG_DUMP_COMMANDS

   165

#include "fileio.h"

   166

   167

void CDECL DebugDumpCommands(const char *s, ...)

   168

{

   169

	static FILE *f = FioFOpenFile("commands-out.log", "wb", AUTOSAVE_DIR);

   170

	if (f == NULL) return;

   171

   172

	va_list va;

   173

	va_start(va, s);

   174

	vfprintf(f, s, va);

   175

	va_end(va);

   176

   177

	fflush(f);

   178

}

   179

#endif /* DEBUG_DUMP_COMMANDS */