libpayload: The initial chunk of code writen by AMD

This is the initial chunk of code written by me and copyrighted
by AMD.  Includes everything but a few files that we pulled from
outside sources.

Signed-off-by: Jordan Crouse <jordan.crouse@amd.com>
Acked-by: Uwe Hermann <uwe@hermann-uwe.de>


git-svn-id: svn://svn.coreboot.org/coreboot/trunk@3170 2b7e53f0-3cfb-0310-b3e9-8179ed1497e1

4 files changed, 453 insertions, 0 deletions

diff --git a/payloads/libpayload/drivers/Makefile.inc b/payloads/libpayload/drivers/Makefile.inc
new file mode 100644
index 0000000000..809e2e211e
--- /dev/null
+++ b/payloads/libpayload/drivers/Makefile.inc
@@ -0,0 +1,33 @@
+#
+# This file is part of the libpayload project.
+#
+# Copyright (C) 2007 Uwe Hermann <uwe@hermann-uwe.de>
+# Copyright (C) 2008 Advanced Micro Devices, Inc.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+# 1. Redistributions of source code must retain the above copyright
+#    notice, this list of conditions and the following disclaimer.
+# 2. Redistributions in binary form must reproduce the above copyright
+#    notice, this list of conditions and the following disclaimer in the
+#    documentation and/or other materials provided with the distribution.
+# 3. The name of the author may not be used to endorse or promote products
+#    derived from this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+# OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+# HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+# SUCH DAMAGE.
+#
+
+TARGETS-$(CONFIG_SERIAL_CONSOLE) += drivers/serial.o
+TARGETS-$(CONFIG_VGA_CONSOLE) += drivers/vga.o
+TARGETS-$(CONFIG_PC_KEYBOARD) += drivers/keyboard.o
diff --git a/payloads/libpayload/drivers/keyboard.c b/payloads/libpayload/drivers/keyboard.c
new file mode 100644
index 0000000000..0dc93713b8
--- /dev/null
+++ b/payloads/libpayload/drivers/keyboard.c
@@ -0,0 +1,126 @@
+/*
+ * This file is part of the libpayload project.
+ *
+ * Copyright (C) 2008 Advanced Micro Devices, Inc.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#include <arch/io.h>
+#include <libpayload.h>
+
+unsigned char map[2][0x57] = {
+  {
+    0x00, 0x1B, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36,
+    0x37, 0x38, 0x39, 0x30, 0x2D, 0x3D, 0x08, 0x09,
+    0x71, 0x77, 0x65, 0x72, 0x74, 0x79, 0x75, 0x69,
+    0x6F, 0x70, 0x5B, 0x5D, 0x0A, 0x00, 0x61, 0x73,
+    0x64, 0x66, 0x67, 0x68, 0x6A, 0x6B, 0x6C, 0x3B,
+    0x27, 0x60, 0x00, 0x5C, 0x7A, 0x78, 0x63, 0x76,
+    0x62, 0x6E, 0x6D, 0x2C, 0x2E, 0x2F, 0x00, 0x2A,
+    0x00, 0x20,
+  },
+  {
+    0x00, 0x1B, 0x21, 0x40, 0x23, 0x24, 0x25, 0x5E,
+    0x26, 0x2A, 0x28, 0x29, 0x5F, 0x2B, 0x08, 0x00,
+    0x51, 0x57, 0x45, 0x52, 0x54, 0x59, 0x55, 0x49,
+    0x4F, 0x50, 0x7B, 0x7D, 0x0A, 0x00, 0x41, 0x53,
+    0x44, 0x46, 0x47, 0x48, 0x4A, 0x4B, 0x4C, 0x3A,
+    0x22, 0x7E, 0x00, 0x7C, 0x5A, 0x58, 0x43, 0x56,
+    0x42, 0x4E, 0x4D, 0x3C, 0x3E, 0x3F, 0x00, 0x2A,
+    0x00, 0x20,
+  }
+};
+
+#define MOD_SHIFT    1
+#define MOD_CTRL     2
+#define MOD_CAPSLOCK 4
+
+int keyboard_havechar(void)
+{
+	unsigned char c = inb(0x64);
+	return c & 1;
+}
+
+unsigned char keyboard_get_scancode(void)
+{
+	unsigned char ch = 0;
+
+	if (keyboard_havechar())
+		ch = inb(0x60);
+
+	return ch;
+}
+
+int keyboard_getchar(void)
+{
+	static int modifier;
+	unsigned char ch;
+	int shift;
+
+	int ret = 0;
+
+	while(!keyboard_havechar())
+		;
+
+	ch = keyboard_get_scancode();
+
+	switch(ch) {
+	case 0x36:
+	case 0x2a:
+		modifier &= ~MOD_SHIFT;
+		break;
+
+	case 0x80 | 0x36:
+	case 0x80 | 0x2a:
+		modifier |= MOD_SHIFT;
+
+	case 0x1d:
+		modifier &= ~MOD_CTRL;
+		break;
+
+	case 0x80 | 0x1d:
+		modifier |= MOD_CTRL;
+		break;
+
+	case 0x3a:
+		if (modifier & MOD_CAPSLOCK)
+			modifier &= ~MOD_CAPSLOCK;
+		else
+			modifier |= MOD_CAPSLOCK;
+		break;
+	}
+
+	if (!(ch & 0x80) && ch <  0x57) {
+		shift = (modifier & MOD_SHIFT) ^ (modifier & MOD_CAPSLOCK) ? 1 : 0;
+		ret = map[shift][ch];
+
+		if (modifier & MOD_CTRL)
+		        ret = (ret >= 0x3F && ret <= 0x5F) ? ret & 0x1f : 0;
+
+		return ret;
+	}
+
+	return ret;
+}
diff --git a/payloads/libpayload/drivers/serial.c b/payloads/libpayload/drivers/serial.c
new file mode 100644
index 0000000000..bcf60df614
--- /dev/null
+++ b/payloads/libpayload/drivers/serial.c
@@ -0,0 +1,78 @@
+/*
+ * This file is part of the libpayload project.
+ *
+ * Copyright (C) 2008 Advanced Micro Devices, Inc.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#include <libpayload.h>
+#include <sysinfo.h>
+
+#define IOBASE lib_sysinfo.ser_ioport
+
+#ifdef CONFIG_SERIAL_SET_SPEED
+#define DIVISOR (115200 / CONFIG_SERIAL_BAUD_RATE)
+#endif
+
+void serial_init(void)
+{	
+#ifdef CONFIG_SERIAL_SET_SPEED
+	unsigned char reg;
+
+	/* Disable interrupts */
+	outb(0, IOBASE + 0x01);
+
+	/* Assert RTS and DTR */
+	outb(3, IOBASE + 0x04);
+
+	/* Set the divisor latch */
+	reg = inb(IOBASE + 0x03);
+	outb(reg | 0x80, IOBASE + 0x03);
+
+	/* Write the divisor */
+	outb(DIVISOR & 0xFF, IOBASE);
+	outb(DIVISOR >> 8 & 0xFF, IOBASE + 1);
+
+	/* Restore the previous value of the divisor */
+	outb(reg &= ~0x80, IOBASE + 0x03);
+#endif
+}
+			
+void serial_putchar(unsigned char c)
+{
+	while((inb(IOBASE + 0x05) & 0x20) == 0);
+	outb(c, IOBASE);
+}
+
+int serial_havechar(void)
+{
+	return inb(IOBASE + 0x05) & 0x01;
+}
+
+int serial_getchar(void)
+{
+	while (!serial_havechar());
+	return (int) inb(IOBASE);
+}
diff --git a/payloads/libpayload/drivers/vga.c b/payloads/libpayload/drivers/vga.c
new file mode 100644
index 0000000000..5e0e406f27
--- /dev/null
+++ b/payloads/libpayload/drivers/vga.c
@@ -0,0 +1,216 @@
+/*
+ * This file is part of the libpayload project.
+ *
+ * Copyright (C) 2008 Advanced Micro Devices, Inc.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#include <arch/types.h>
+#include <libpayload.h>
+
+#define WIDTH 80
+#define HEIGHT 25
+
+#define VGA_COLOR_WHITE 7
+
+#define CRTC_INDEX      0x3d4
+#define CRTC_DATA       0x3d5
+
+#define VIDEO(_r, _c)\
+  ((uint16_t *) (0xB8000 + ((_r) * (WIDTH * 2)) + ((_c) * 2)))
+
+static int cursor_enabled;
+static int cursorx;
+static int cursory;
+
+static void vga_scroll_up(void);
+
+static inline uint8_t crtc_read(uint8_t index)
+{
+        outb(index, CRTC_INDEX);
+        return inb(CRTC_DATA);
+}
+
+static inline void crtc_write(uint8_t data, uint8_t index)
+{
+        outb(index, CRTC_INDEX);
+        outb(data, CRTC_DATA);
+}
+
+static void vga_get_cursor_pos(void)
+{
+	unsigned int addr;
+	addr = ((unsigned int) crtc_read(0x0E)) << 8;
+	addr += crtc_read(0x0E);
+
+	cursorx = addr % WIDTH;
+	cursory = addr / WIDTH;       
+}
+
+static void vga_fixup_cursor(void)
+{
+	unsigned int addr;
+
+	if (!cursor_enabled)
+		return;
+
+	if (cursorx < 0)
+		cursorx = 0;
+	
+	if (cursory < 0)
+		cursory = 0;
+	
+	if (cursorx >= WIDTH) {
+		cursorx = 0;
+		cursory++;
+	}
+
+	while(cursory >= HEIGHT)
+		vga_scroll_up();
+
+	addr = cursorx + (WIDTH * cursory);
+	crtc_write(addr >> 8, 0x0E);
+	crtc_write(addr, 0x0E);
+}
+
+void vga_cursor_enable(int state)
+{
+	unsigned char tmp = crtc_read(0x0a);
+
+	if (state == 0) {
+		tmp |= (1 << 5);
+		cursor_enabled = 0;
+	}
+	else {
+		tmp &= ~(1 << 5);
+		cursor_enabled = 1;
+		vga_fixup_cursor();
+	}
+
+	crtc_write(tmp, 0x0a);
+}
+
+void vga_clear_line(uint8_t row, uint8_t ch, uint8_t attr)
+{
+	int col;
+	uint16_t *ptr = VIDEO(0, row);
+
+	for(col = 0; col < WIDTH; col++)
+		ptr[col] = ((attr & 0xFF) << 8) | (ch & 0xFF);
+}
+	
+static void vga_scroll_up(void)
+{
+	uint16_t *src = VIDEO(0,1);
+	uint16_t *dst = VIDEO(0,0);
+	int i;
+
+	for(i = 0; i < (HEIGHT - 1) * WIDTH; i++)
+		*dst++ = *src++;
+	
+	vga_clear_line(HEIGHT - 1, ' ', VGA_COLOR_WHITE);
+	cursory--;
+}
+
+void vga_fill(uint8_t ch, uint8_t attr)
+{
+	uint8_t row;
+	for(row = 0; row < HEIGHT; row++)
+		vga_clear_line(row, ch, attr);
+}
+
+void vga_clear(void)
+{
+	vga_fill(' ', VGA_COLOR_WHITE);
+	vga_move_cursor(0, 0);
+}
+
+void vga_putc(uint8_t row, uint8_t col, unsigned int c)
+{
+	uint16_t *ptr = VIDEO(row, col);
+	*ptr = (uint16_t) (c & 0xFFFF);
+}
+
+void vga_putchar(unsigned int ch) {
+	
+	uint16_t *ptr;
+
+	switch(ch & 0xFF) {
+	case '\r':
+		cursorx = 0;
+		break;
+	case '\n':
+		cursory++;
+		break;
+	case '\b':
+		cursorx--;
+		ptr = VIDEO(cursory, cursorx);
+		*ptr = (*ptr & 0xFF00) | ' ';
+		break;
+	case '\t':
+		cursorx = (cursorx + 8) & ~7;
+		break;
+
+	default:
+		ptr = VIDEO(cursory, cursorx);
+		*ptr = (uint16_t) (ch & 0xFFFF);
+		cursorx++;
+		break;
+	}
+
+	vga_fixup_cursor();
+}
+
+int vga_move_cursor(int x, int y)
+{
+	cursorx = x;
+	cursory = y;
+	
+	vga_fixup_cursor();
+}
+
+void vga_init(void)
+{
+	/* Get the position of the cursor */
+	vga_get_cursor_pos();
+
+	/* See if it us currently enabled or not */
+	cursor_enabled = !(crtc_read(0x0A) & (1 << 5));
+
+	/* If the cursor is enabled, get us to a sane point */
+
+	if (cursor_enabled) {
+
+		/* Go to the next line */
+
+		if (cursorx) {
+			cursorx = 0;
+			cursory++;
+		}
+
+		vga_fixup_cursor();
+	}
+}
+