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;
tron@1299: int _debug_spritecache_level;
truelight@1322: int _debug_oldloader_level;
hackykid@2008: int _debug_pbs_level;
ludde@2125: int _debug_ntp_level;
truelight@2033: #ifdef GPMI
truelight@2033: int _debug_gpmi_level;
truelight@2033: #endif /* GPMI */
matthijs@1678: int _debug_npf_level;
tron@1299: 
tron@1299: 
tron@1299: void CDECL debug(const char *s, ...)
tron@1299: {
tron@1299: 	va_list va;
tron@1299: 	char buf[1024];
tron@1299: 
tron@1299: 	va_start(va, s);
tron@1299: 	vsnprintf(buf, lengthof(buf), s, va);
tron@1299: 	va_end(va);
tron@1299: 	fprintf(stderr, "dbg: %s\n", buf);
tron@1299: 	IConsoleDebug(buf);
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@1847: 	DEBUG_LEVEL(spritecache),
Darkvater@1847: 	DEBUG_LEVEL(oldloader),
hackykid@2008: 	DEBUG_LEVEL(pbs),
ludde@2125: 	DEBUG_LEVEL(ntp),
truelight@2033: #ifdef GPMI
truelight@2033: 	DEBUG_LEVEL(gpmi),
celestar@2066: #endif
Darkvater@1847: 	DEBUG_LEVEL(npf)
Darkvater@1847: 	};
Darkvater@1847: #undef DEBUG_LEVEL
tron@1299: 
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@1299: 		for (i = debug_level; i != endof(debug_level); ++i)
tron@1299: 			*i->level = v;
tron@1299: 	}
tron@1299: 
tron@1299: 	// individual levels
tron@1299: 	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@1299: 		if (p != NULL)
tron@1299: 			*p = v;
tron@1299: 		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: }
truelight@2033: 
truelight@2033: #ifdef GPMI
truelight@2033: void gpmi_debug_openttd(int level, char *s)
truelight@2033: {
truelight@2033: 	DEBUG(gpmi, level)("[GPMI] %s", s);
truelight@2033: }
truelight@2033: #endif /* GPMI */