tron@2186: /* $Id$ */
tron@2186: 
tron@1302: #include "stdafx.h"
tron@1302: #include <stdio.h>
tron@1299: #include <stdarg.h>
Darkvater@1891: #include "openttd.h"
tron@1299: #include "console.h"
tron@1299: #include "debug.h"
tron@2163: #include "functions.h"
Darkvater@1847: #include "string.h"
tron@1299: 
tron@1299: int _debug_ai_level;
tron@2210: int _debug_driver_level;
tron@1299: int _debug_grf_level;
tron@1299: int _debug_map_level;
tron@1299: int _debug_misc_level;
tron@1299: int _debug_ms_level;
tron@1299: int _debug_net_level;
Darkvater@5568: int _debug_sprite_level;
truelight@1322: int _debug_oldloader_level;
ludde@2125: int _debug_ntp_level;
matthijs@1678: int _debug_npf_level;
KUDr@3900: int _debug_yapf_level;
peter1138@5108: int _debug_freetype_level;
Darkvater@5568: int _debug_sl_level;
tron@1299: 
tron@1299: 
Darkvater@1847: typedef struct DebugLevel {
Darkvater@1847: 	const char *name;
Darkvater@1847: 	int *level;
Darkvater@1847: } DebugLevel;
Darkvater@1847: 
Darkvater@1847: #define DEBUG_LEVEL(x) { #x, &_debug_##x##_level }
Darkvater@1847: 	static const DebugLevel debug_level[] = {
Darkvater@1847: 	DEBUG_LEVEL(ai),
tron@2210: 	DEBUG_LEVEL(driver),
Darkvater@1847: 	DEBUG_LEVEL(grf),
Darkvater@1847: 	DEBUG_LEVEL(map),
Darkvater@1847: 	DEBUG_LEVEL(misc),
Darkvater@1847: 	DEBUG_LEVEL(ms),
Darkvater@1847: 	DEBUG_LEVEL(net),
Darkvater@5568: 	DEBUG_LEVEL(sprite),
Darkvater@1847: 	DEBUG_LEVEL(oldloader),
ludde@2125: 	DEBUG_LEVEL(ntp),
KUDr@3900: 	DEBUG_LEVEL(npf),
peter1138@5108: 	DEBUG_LEVEL(yapf),
Darkvater@5568: 	DEBUG_LEVEL(freetype),
Darkvater@5568: 	DEBUG_LEVEL(sl),
Darkvater@1847: 	};
Darkvater@1847: #undef DEBUG_LEVEL
tron@1299: 
celestar@5592: #if !defined(NO_DEBUG_MESSAGES)
celestar@5592: 
celestar@5592: /** Functionized DEBUG macro for compilers that don't support
celestar@5592:  * variadic macros (__VA_ARGS__) such as...yes MSVC2003 and lower */
celestar@5592: #if defined(NO_VARARG_MACRO)
celestar@5592: void CDECL DEBUG(int name, int level, ...)
celestar@5592: {
celestar@5592: 	va_list va;
celestar@5592: 	const char *dbg;
celestar@5592: 	const DebugLevel *dl = &debug_level[name];
celestar@5592: 
celestar@5592: 	if (level != 0 && *dl->level < level) return;
celestar@5592: 	dbg = dl->name;
celestar@5592: 	va_start(va, level);
celestar@5592: #else
celestar@5592: void CDECL debug(const char *dbg, ...)
celestar@5592: {
celestar@5592: 	va_list va;
celestar@5592: 	va_start(va, dbg);
celestar@5592: #endif /* NO_VARARG_MACRO */
celestar@5592: 	{
celestar@5592: 		const char *s;
celestar@5592: 		char buf[1024];
celestar@5592: 
celestar@5592: 		s = va_arg(va, const char*);
celestar@5592: 		vsnprintf(buf, lengthof(buf), s, va);
celestar@5592: 		va_end(va);
celestar@5592: 		fprintf(stderr, "dbg: [%s] %s\n", dbg, buf);
celestar@5592: 		IConsoleDebug(dbg, buf);
celestar@5592: 	}
celestar@5592: }
celestar@5592: #endif /* NO_DEBUG_MESSAGES */
celestar@5592: 
tron@1299: void SetDebugString(const char *s)
tron@1299: {
tron@1299: 	int v;
tron@1299: 	char *end;
tron@1299: 	const char *t;
tron@1299: 
tron@1299: 	// global debugging level?
tron@1299: 	if (*s >= '0' && *s <= '9') {
tron@1299: 		const DebugLevel *i;
tron@1299: 
tron@1299: 		v = strtoul(s, &end, 0);
tron@1299: 		s = end;
tron@1299: 
tron@2639: 		for (i = debug_level; i != endof(debug_level); ++i) *i->level = v;
tron@1299: 	}
tron@1299: 
tron@1299: 	// individual levels
tron@2639: 	for (;;) {
tron@1299: 		const DebugLevel *i;
tron@1299: 		int *p;
tron@1299: 
tron@1299: 		// skip delimiters
tron@1299: 		while (*s == ' ' || *s == ',' || *s == '\t') s++;
tron@1299: 		if (*s == '\0') break;
tron@1299: 
tron@1299: 		t = s;
tron@1299: 		while (*s >= 'a' && *s <= 'z') s++;
tron@1299: 
tron@1299: 		// check debugging levels
tron@1299: 		p = NULL;
tron@1299: 		for (i = debug_level; i != endof(debug_level); ++i)
tron@1299: 			if (s == t + strlen(i->name) && strncmp(t, i->name, s - t) == 0) {
tron@1299: 				p = i->level;
tron@1299: 				break;
tron@1299: 			}
tron@1299: 
tron@1299: 		if (*s == '=') s++;
tron@1299: 		v = strtoul(s, &end, 0);
tron@1299: 		s = end;
tron@2639: 		if (p != NULL) {
tron@1299: 			*p = v;
tron@2639: 		} else {
tron@1299: 			ShowInfoF("Unknown debug level '%.*s'", s - t, t);
tron@1299: 			return;
tron@1299: 		}
tron@1299: 	}
tron@1299: }
Darkvater@1847: 
Darkvater@1847: /** Print out the current debug-level
Darkvater@1847:  * Just return a string with the values of all the debug categorites
Darkvater@1847:  * @return string with debug-levels
Darkvater@1847:  */
Darkvater@1847: const char *GetDebugString(void)
Darkvater@1847: {
Darkvater@1847: 	const DebugLevel *i;
Darkvater@1847: 	static char dbgstr[100];
Darkvater@1847: 	char dbgval[20];
Darkvater@1847: 
Darkvater@1847: 	memset(dbgstr, 0, sizeof(dbgstr));
Darkvater@1847: 	i = debug_level;
Darkvater@1847: 	snprintf(dbgstr, sizeof(dbgstr), "%s=%d", i->name, *i->level);
Darkvater@1847: 
Darkvater@1847: 	for (i++; i != endof(debug_level); i++) {
Darkvater@1847: 		snprintf(dbgval, sizeof(dbgval), ", %s=%d", i->name, *i->level);
Darkvater@1847: 		ttd_strlcat(dbgstr, dbgval, sizeof(dbgstr));
Darkvater@1847: 	}
Darkvater@1847: 
Darkvater@1847: 	return dbgstr;
Darkvater@1847: }