X-Git-Url: https://git.ucc.asn.au/?a=blobdiff_plain;f=Kernel%2Fdebug.c;h=1fe332ccde72d4e26c437fd7c0cde9ab79826e02;hb=30e30d7bc325852a8677819d11a47373b08d6271;hp=be9371691f6ba16caecb8dc83562e62db21fd9d8;hpb=f2fd50e797e6a3b3590e4c2e13b6782dd87c25a2;p=tpg%2Facess2.git

diff --git a/Kernel/debug.c b/Kernel/debug.c
index be937169..1fe332cc 100644
--- a/Kernel/debug.c
+++ b/Kernel/debug.c
@@ -1,6 +1,8 @@
 /*
  * AcessOS Microkernel Version
  * debug.c
+ * 
+ * TODO: Move the Debug_putchar methods out to the arch/ tree
  */
 #include <acess.h>
 #include <stdarg.h>
@@ -9,15 +11,27 @@
 #define DEBUG_TO_SERIAL	1
 #define	SERIAL_PORT	0x3F8
 #define	GDB_SERIAL_PORT	0x2F8
+#define	DEBUG_MAX_LINE_LEN	256
 
 // === IMPORTS ===
-extern void Threads_Dump();
+extern void Threads_Dump(void);
+extern void	KernelPanic_SetMode(void);
+extern void	KernelPanic_PutChar(char Ch);
+
+// === PROTOTYPES ===
+ int	putDebugChar(char ch);
+ int	getDebugChar(void);
+static void	Debug_Putchar(char ch);
+static void	Debug_Puts(int DbgOnly, char *Str);
+void	Debug_Fmt(const char *format, va_list args);
 
 // === GLOBALS ===
  int	gDebug_Level = 0;
  int	giDebug_KTerm = -1;
  int	gbDebug_SerialSetup = 0;
  int	gbGDB_SerialSetup = 0;
+ int	gbDebug_IsKPanic = 0;
+volatile int	gbInPutChar = 0;
 
 // === CODE ===
 int putDebugChar(char ch)
@@ -25,9 +39,9 @@ int putDebugChar(char ch)
 	if(!gbGDB_SerialSetup) {
 		outb(GDB_SERIAL_PORT + 1, 0x00);    // Disable all interrupts
 		outb(GDB_SERIAL_PORT + 3, 0x80);    // Enable DLAB (set baud rate divisor)
-		outb(GDB_SERIAL_PORT + 0, 0x03);    // Set divisor to 3 (lo byte) 38400 baud
-		outb(GDB_SERIAL_PORT + 1, 0x00);    //                  (hi byte)
-		outb(GDB_SERIAL_PORT + 3, 0x03);    // 8 bits, no parity, one stop bit
+		outb(GDB_SERIAL_PORT + 0, 0x0C);    // Set divisor to 12 (lo byte) 9600 baud
+		outb(GDB_SERIAL_PORT + 1, 0x00);    //  (base is         (hi byte)
+		outb(GDB_SERIAL_PORT + 3, 0x03);    // 8 bits, no parity, one stop bit (8N1)
 		outb(GDB_SERIAL_PORT + 2, 0xC7);    // Enable FIFO with 14-byte threshold and clear it
 		outb(GDB_SERIAL_PORT + 4, 0x0B);    // IRQs enabled, RTS/DSR set
 		gbDebug_SerialSetup = 1;
@@ -36,13 +50,13 @@ int putDebugChar(char ch)
 	outb(GDB_SERIAL_PORT, ch);
 	return 0;
 }
-int getDebugChar()
+int getDebugChar(void)
 {
 	if(!gbGDB_SerialSetup) {
 		outb(GDB_SERIAL_PORT + 1, 0x00);    // Disable all interrupts
 		outb(GDB_SERIAL_PORT + 3, 0x80);    // Enable DLAB (set baud rate divisor)
-		outb(GDB_SERIAL_PORT + 0, 0x03);    // Set divisor to 3 (lo byte) 38400 baud
-		outb(GDB_SERIAL_PORT + 1, 0x00);    //                  (hi byte)
+		outb(GDB_SERIAL_PORT + 0, 0x0C);    // Set divisor to 12 (lo byte) 9600 baud
+		outb(GDB_SERIAL_PORT + 1, 0x00);    //                   (hi byte)
 		outb(GDB_SERIAL_PORT + 3, 0x03);    // 8 bits, no parity, one stop bit
 		outb(GDB_SERIAL_PORT + 2, 0xC7);    // Enable FIFO with 14-byte threshold and clear it
 		outb(GDB_SERIAL_PORT + 4, 0x0B);    // IRQs enabled, RTS/DSR set
@@ -52,17 +66,18 @@ int getDebugChar()
 	return inb(GDB_SERIAL_PORT);
 }
 
-static void E9(char ch)
+static void Debug_PutCharDebug(char ch)
 {
-	if(giDebug_KTerm != -1)
-		VFS_Write(giDebug_KTerm, 1, &ch);
-
+	#if DEBUG_TO_E9
+	__asm__ __volatile__ ( "outb %%al, $0xe9" :: "a"(((Uint8)ch)) );
+	#endif
+	
 	#if DEBUG_TO_SERIAL
 	if(!gbDebug_SerialSetup) {
 		outb(SERIAL_PORT + 1, 0x00);	// Disable all interrupts
 		outb(SERIAL_PORT + 3, 0x80);	// Enable DLAB (set baud rate divisor)
-		outb(SERIAL_PORT + 0, 0x03);	// Set divisor to 3 (lo byte) 38400 baud
-		outb(SERIAL_PORT + 1, 0x00);	//                  (hi byte)
+		outb(SERIAL_PORT + 0, 0x0C);	// Set divisor to 12 (lo byte) 9600 baud
+		outb(SERIAL_PORT + 1, 0x00);	//                   (hi byte)
 		outb(SERIAL_PORT + 3, 0x03);	// 8 bits, no parity, one stop bit
 		outb(SERIAL_PORT + 2, 0xC7);	// Enable FIFO with 14-byte threshold and clear it
 		outb(SERIAL_PORT + 4, 0x0B);	// IRQs enabled, RTS/DSR set
@@ -71,147 +86,76 @@ static void E9(char ch)
 	while( (inb(SERIAL_PORT + 5) & 0x20) == 0 );
 	outb(SERIAL_PORT, ch);
 	#endif
-
-	#if DEBUG_TO_E9
-	__asm__ __volatile__ ( "outb %%al, $0xe9" :: "a"(((Uint8)ch)) );
-	#endif
 }
 
-static void E9_Str(char *Str)
-{
-	while(*Str)	E9(*Str++);
+static void Debug_Putchar(char ch)
+{	
+	Debug_PutCharDebug(ch);
+	if( !gbDebug_IsKPanic )
+	{
+		if(gbInPutChar)	return ;
+		gbInPutChar = 1;
+		if(giDebug_KTerm != -1)
+			VFS_Write(giDebug_KTerm, 1, &ch);
+		gbInPutChar = 0;
+	}
+	else
+		KernelPanic_PutChar(ch);
 }
 
-void E9_Fmt(const char *format, va_list *args)
+static void Debug_Puts(int UseKTerm, char *Str)
 {
-	char	c, pad = ' ';
-	 int	minSize = 0;
-	char	tmpBuf[34];	// For Integers
-	char	*p = NULL;
-	 int	isLongLong = 0;
-	Uint64	arg;
-
-	while((c = *format++) != 0)
+	 int	len = 0;
+	while( *Str )
 	{
-		// Non control character
-		if( c != '%' ) {
-			E9(c);
-			continue;
-		}
-
-		c = *format++;
-
-		// Literal %
-		if(c == '%') {
-			E9('%');
-			continue;
-		}
-
-		// Pointer
-		if(c == 'p') {
-			Uint	ptr = va_arg(*args, Uint);
-			E9('*');	E9('0');	E9('x');
-			p = tmpBuf;
-			itoa(p, ptr, 16, BITS/4, '0');
-			goto printString;
-		}
-
-		// Get Argument
-		arg = va_arg(*args, Uint);
-
-		// Padding
-		if(c == '0') {
-			pad = '0';
-			c = *format++;
-		} else
-			pad = ' ';
-
-		// Minimum length
-		minSize = 1;
-		if('1' <= c && c <= '9')
-		{
-			minSize = 0;
-			while('0' <= c && c <= '9')
-			{
-				minSize *= 10;
-				minSize += c - '0';
-				c = *format++;
-			}
-		}
+		Debug_PutCharDebug( *Str );
+		
+		if( gbDebug_IsKPanic )
+			KernelPanic_PutChar(*Str);
+		len ++;
+		Str ++;
+	}
+	
+	Str -= len;
+	
+	if( UseKTerm && !gbDebug_IsKPanic && giDebug_KTerm != -1)
+	{
+		if(gbInPutChar)	return ;
+		gbInPutChar = 1;
+		VFS_Write(giDebug_KTerm, len, Str);
+		gbInPutChar = 0;
+	}
+}
 
-		// Long (default)
-		isLongLong = 0;
-		if(c == 'l') {
-			c = *format++;
-			if(c == 'l') {
-				#if BITS == 32
-				arg |= va_arg(*args, Uint);
-				#endif
-				c = *format++;
-				isLongLong = 1;
-			}
-		}
+void Debug_DbgOnlyFmt(const char *format, va_list args)
+{
+	char	buf[DEBUG_MAX_LINE_LEN];
+	 int	len;
+	buf[DEBUG_MAX_LINE_LEN-1] = 0;
+	len = vsnprintf(buf, DEBUG_MAX_LINE_LEN-1, format, args);
+	//if( len < DEBUG_MAX_LINE )
+		// do something
+	Debug_Puts(0, buf);
+}
 
-		p = tmpBuf;
-		switch (c) {
-		case 'd':
-		case 'i':
-			if( (isLongLong && arg >> 63) || (!isLongLong && arg >> 31) ) {
-				E9('-');
-				arg = -arg;
-			}
-			itoa(p, arg, 10, minSize, pad);
-			goto printString;
-		case 'u':
-			itoa(p, arg, 10, minSize, pad);
-			goto printString;
-		case 'x':
-			itoa(p, arg, 16, minSize, pad);
-			goto printString;
-		case 'o':
-			itoa(p, arg, 8, minSize, pad);
-			goto printString;
-		case 'b':
-			itoa(p, arg, 2, minSize, pad);
-			goto printString;
-
-		case 'B':	//Boolean
-			if(arg)	E9_Str("True");
-			else	E9_Str("False");
-			break;
-
-		case 's':
-			p = (char*)(Uint)arg;
-		printString:
-			if(!p)		p = "(null)";
-			while(*p)	E9(*p++);
-			break;
-
-		// Single Character / Array
-		case 'c':
-			if(minSize == 1) {
-				E9(arg);
-				break;
-			}
-			p = (char*)(Uint)arg;
-			if(!p)	goto printString;
-			while(minSize--)	E9(*p++);
-			break;
-
-		default:	E9(arg);	break;
-		}
-    }
+void Debug_Fmt(const char *format, va_list args)
+{
+	char	buf[DEBUG_MAX_LINE_LEN];
+	 int	len;
+	buf[DEBUG_MAX_LINE_LEN-1] = 0;
+	len = vsnprintf(buf, DEBUG_MAX_LINE_LEN-1, format, args);
+	//if( len < DEBUG_MAX_LINE )
+		// do something
+	Debug_Puts(1, buf);
+	return ;
 }
 
-/**
- * \fn void LogV(char *Fmt, va_list Args)
- */
-void LogV(char *Fmt, va_list Args)
+void Debug_KernelPanic()
 {
-	E9_Str("Log: ");
-	E9_Fmt(Fmt, &Args);
-	E9('\n');
+	gbDebug_IsKPanic = 1;
+	KernelPanic_SetMode();
 }
+
 /**
  * \fn void LogF(char *Msg, ...)
  */
@@ -221,10 +165,24 @@ void LogF(char *Fmt, ...)
 
 	va_start(args, Fmt);
 
-	E9_Fmt(Fmt, &args);
+	Debug_Fmt(Fmt, args);
 
 	va_end(args);
 }
+/**
+ * \fn void Debug(char *Msg, ...)
+ * \brief Print only to the debug channel
+ */
+void Debug(char *Fmt, ...)
+{
+	va_list	args;
+
+	Debug_Puts(0, "Debug: ");
+	va_start(args, Fmt);
+	Debug_DbgOnlyFmt(Fmt, args);
+	va_end(args);
+	Debug_PutCharDebug('\n');
+}
 /**
  * \fn void Log(char *Msg, ...)
  */
@@ -232,29 +190,32 @@ void Log(char *Fmt, ...)
 {
 	va_list	args;
 
-	E9_Str("Log: ");
+	Debug_Puts(1, "Log: ");
 	va_start(args, Fmt);
-	E9_Fmt(Fmt, &args);
+	Debug_Fmt(Fmt, args);
 	va_end(args);
-	E9('\n');
+	Debug_Putchar('\n');
 }
 void Warning(char *Fmt, ...)
 {
 	va_list	args;
-	E9_Str("Warning: ");
+	Debug_Puts(1, "Warning: ");
 	va_start(args, Fmt);
-	E9_Fmt(Fmt, &args);
+	Debug_Fmt(Fmt, args);
 	va_end(args);
-	E9('\n');
+	Debug_Putchar('\n');
 }
 void Panic(char *Fmt, ...)
 {
 	va_list	args;
-	E9_Str("Panic: ");
+	
+	Debug_KernelPanic();
+	
+	Debug_Puts(1, "Panic: ");
 	va_start(args, Fmt);
-	E9_Fmt(Fmt, &args);
+	Debug_Fmt(Fmt, args);
 	va_end(args);
-	E9('\n');
+	Debug_Putchar('\n');
 
 	Threads_Dump();
 
@@ -265,10 +226,16 @@ void Panic(char *Fmt, ...)
 
 void Debug_SetKTerminal(char *File)
 {
-	if(giDebug_KTerm != -1)
-		VFS_Close(giDebug_KTerm);
-	giDebug_KTerm = VFS_Open(File, VFS_OPENFLAG_WRITE);
-	Log("Opened '%s' as 0x%x", File, giDebug_KTerm);
+	 int	tmp;
+	if(giDebug_KTerm != -1) {
+		tmp = giDebug_KTerm;
+		giDebug_KTerm = -1;
+		VFS_Close(tmp);
+	}
+	tmp = VFS_Open(File, VFS_OPENFLAG_WRITE);
+	Log_Log("Debug", "Opened '%s' as 0x%x", File, tmp);
+	giDebug_KTerm = tmp;
+	Log_Log("Debug", "Returning to %p", __builtin_return_address(0));
 }
 
 void Debug_Enter(char *FuncName, char *ArgTypes, ...)
@@ -279,33 +246,32 @@ void Debug_Enter(char *FuncName, char *ArgTypes, ...)
 
 	va_start(args, ArgTypes);
 
-	while(i--)	E9(' ');
+	while(i--)	Debug_Putchar(' ');
 
-	E9_Str(FuncName);	E9_Str(": (");
+	Debug_Puts(1, FuncName);	Debug_Puts(1, ": (");
 
 	while(*ArgTypes)
 	{
 		pos = strpos(ArgTypes, ' ');
 		if(pos != -1)	ArgTypes[pos] = '\0';
 		if(pos == -1 || pos > 1) {
-			E9_Str(ArgTypes+1);
-			E9('=');
+			Debug_Puts(1, ArgTypes+1);
+			Debug_Putchar('=');
 		}
 		if(pos != -1)	ArgTypes[pos] = ' ';
 		switch(*ArgTypes)
 		{
-		case 'p':	E9_Fmt("%p", &args);	break;
-		case 's':	E9_Fmt("'%s'", &args);	break;
-		case 'i':	E9_Fmt("%i", &args);	break;
-		case 'u':	E9_Fmt("%u", &args);	break;
-		case 'x':	E9_Fmt("0x%x", &args);	break;
-		case 'b':	E9_Fmt("0b%b", &args);	break;
-		// Extended (64-Bit)
-		case 'X':	E9_Fmt("0x%llx", &args);	break;
-		case 'B':	E9_Fmt("0b%llb", &args);	break;
+		case 'p':	LogF("%p", va_arg(args, void*));	break;
+		case 's':	LogF("'%s'", va_arg(args, char*));	break;
+		case 'i':	LogF("%i", va_arg(args, int));	break;
+		case 'u':	LogF("%u", va_arg(args, Uint));	break;
+		case 'x':	LogF("0x%x", va_arg(args, Uint));	break;
+		case 'b':	LogF("0b%b", va_arg(args, Uint));	break;
+		case 'X':	LogF("0x%llx", va_arg(args, Uint64));	break;	// Extended (64-Bit)
+		case 'B':	LogF("0b%llb", va_arg(args, Uint64));	break;	// Extended (64-Bit)
 		}
 		if(pos != -1) {
-			E9(',');	E9(' ');
+			Debug_Putchar(',');	Debug_Putchar(' ');
 		}
 
 		if(pos == -1)	break;
@@ -313,7 +279,7 @@ void Debug_Enter(char *FuncName, char *ArgTypes, ...)
 	}
 
 	va_end(args);
-	E9(')');	E9('\n');
+	Debug_Putchar(')');	Debug_Putchar('\n');
 }
 
 void Debug_Log(char *FuncName, char *Fmt, ...)
@@ -323,13 +289,13 @@ void Debug_Log(char *FuncName, char *Fmt, ...)
 
 	va_start(args, Fmt);
 
-	while(i--)	E9(' ');
+	while(i--)	Debug_Putchar(' ');
 
-	E9_Str(FuncName);	E9_Str(": ");
-	E9_Fmt(Fmt, &args);
+	Debug_Puts(1, FuncName);	Debug_Puts(1, ": ");
+	Debug_Fmt(Fmt, args);
 
 	va_end(args);
-	E9('\n');
+	Debug_Putchar('\n');
 }
 
 void Debug_Leave(char *FuncName, char RetType, ...)
@@ -344,29 +310,29 @@ void Debug_Leave(char *FuncName, char RetType, ...)
 		i = 0;
 	}
 	// Indenting
-	while(i--)	E9(' ');
+	while(i--)	Debug_Putchar(' ');
 
-	E9_Str(FuncName);	E9_Str(": RETURN");
+	Debug_Puts(1, FuncName);	Debug_Puts(1, ": RETURN");
 
 	// No Return
 	if(RetType == '-') {
-		E9('\n');
+		Debug_Putchar('\n');
 		return;
 	}
 
-	E9(' ');
+	Debug_Putchar(' ');
 	switch(RetType)
 	{
-	case 'n':	E9_Str("NULL");	break;
-	case 'p':	E9_Fmt("%p", &args);	break;
-	case 's':	E9_Fmt("'%s'", &args);	break;
-	case 'i':	E9_Fmt("%i", &args);	break;
-	case 'u':	E9_Fmt("%u", &args);	break;
-	case 'x':	E9_Fmt("0x%x", &args);	break;
+	case 'n':	Debug_Puts(1, "NULL");	break;
+	case 'p':	Debug_Fmt("%p", args);	break;
+	case 's':	Debug_Fmt("'%s'", args);	break;
+	case 'i':	Debug_Fmt("%i", args);	break;
+	case 'u':	Debug_Fmt("%u", args);	break;
+	case 'x':	Debug_Fmt("0x%x", args);	break;
 	// Extended (64-Bit)
-	case 'X':	E9_Fmt("0x%llx", &args);	break;
+	case 'X':	Debug_Fmt("0x%llx", args);	break;
 	}
-	E9('\n');
+	Debug_Putchar('\n');
 
 	va_end(args);
 }
@@ -375,7 +341,7 @@ void Debug_HexDump(char *Header, void *Data, Uint Length)
 {
 	Uint8	*cdat = Data;
 	Uint	pos = 0;
-	E9_Str(Header);
+	Debug_Puts(1, Header);
 	LogF(" (Hexdump of %p)\n", Data);
 
 	while(Length >= 16)
@@ -403,10 +369,11 @@ void Debug_HexDump(char *Header, void *Data, Uint Length)
 		Length--;
 		cdat ++;
 	}
-	E9('\n');
+	Debug_Putchar('\n');
 }
 
 // --- EXPORTS ---
+EXPORT(Debug);
 EXPORT(Log);
 EXPORT(Warning);
 EXPORT(Debug_Enter);