Adding lm32 demo to SAKC project

lm32/logic/sakc/firmware/hw-test/main.c

@@ -0,0 +1,151 @@
+/**
+ * 
+ */
+
+#include "soc-hw.h"
+
+inline void writeint(uint32_t val)
+{
+	uint32_t i, digit;
+
+	for (i=0; i<8; i++) {
+		digit = (val & 0xf0000000) >> 28;
+		if (digit >= 0xA) 
+			uart_putchar('A'+digit-10);
+		else
+			uart_putchar('0'+digit);
+		val <<= 4;
+	}
+}
+
+void test2() {
+    uart_putchar('b');   
+}
+
+void test() {
+    uart_putchar('a');
+    test2();
+    uart_putchar('c');
+} 
+
+char glob[] = "Global";
+
+volatile uint32_t *p;
+volatile uint8_t *p2;
+
+extern uint32_t tic_msec;
+
+int main()
+{
+    char test2[] = "Lokalerstr";
+    char *str = test2;
+    uint32_t i;
+    
+//    for (i = 0; i < 4; i++)
+ //       test2[i] = 'l';
+  //  glob[0]  = 'g';
+    
+ 	// Initialize stuff
+	uart_init();
+
+	// Say Hello!
+	uart_putstr( "** Spike Test Firmware **\n" );
+
+	// Initialize TIC
+	isr_init();
+	tic_init();
+	irq_set_mask( 0x00000002 );
+	irq_enable();
+
+	// Say Hello!
+	uart_putstr( "Timer Interrupt instelled.\n" );
+
+	// Do some trivial tests
+	uart_putstr( "Subroutine-Return Test: " );
+	test();
+	uart_putchar('\n');    
+
+	uart_putstr( "Local-Pointer Test:" );
+	for (;*str; str++) {
+	   uart_putchar(*str);
+	}
+	uart_putchar('\n');    
+	
+	uart_putstr( "Global-Pointer Test:" );
+	str = glob;
+	for (;*str; str++) {
+	   uart_putchar(*str);
+	}
+	uart_putchar('\n');    
+
+	uart_putstr( "Stack Pointer : " );
+	writeint(get_sp());
+	uart_putchar('\n');    
+
+	uart_putstr( "Global Pointer: " );
+	writeint(get_gp());
+	uart_putchar('\n');    
+
+	uart_putstr( "Timer Test (1s): " );
+	for(i=0; i<4; i++) {
+		uart_putstr("tic...");    
+		msleep(1000);
+	}
+	uart_putchar('\n');    
+
+	uart_putstr( "Timer Interrupt counter: " );
+	writeint( tic_msec );
+	uart_putchar('\n');    
+
+	int val = tic_msec;
+	uart_putstr( "Shift: " );
+	writeint( val );
+	uart_putstr(" <-> ");    
+	for(i=0; i<32; i++) {
+		if (val & 0x80000000)
+			uart_putchar( '1' );
+		else
+			uart_putchar( '0' );
+			
+		val <<= 1;
+	}
+	uart_putstr("\r\n");
+	
+	uart_putstr( "GPIO Test..." );
+	gpio0->oe = 0x000000ff;
+	for(;;) {
+		for(i=0; i<8; i++) {
+			uint32_t out1, out2;
+
+			out1 = 0x01 << i;
+			out2 = 0x80 >> i;
+			gpio0->out = out1 | out2;
+
+			msleep(100);
+		}
+	}
+
+
+/*
+	uart_putstr( "Memory Dump: " );
+	uint32_t *start = (uint32_t *)0x40000000;
+	uint32_t *end   = (uint32_t *)0x40000100;
+	uint32_t *p;
+	for (p=start; p<end; p++) {
+		if (((uint32_t)p & 12) == 0) {
+			uart_putstr("\r\n[");
+			writeint((uint32_t) p);
+			uart_putchar(']');    
+		}
+
+		uart_putchar(' ');    
+		writeint(*p);
+	}
+*/
+
+	uart_putstr("Entering Echo Test...\n");
+	while (1) {
+	   uart_putchar(uart_getchar());
+	}
+}
+