Add basic ipmi support

Implements support code for talking to IPMI hardware that uses
a KCS style interface.

Change-Id: I9895cc1bf29676115b167081b63b8a430e23eee5
Signed-off-by: Sven Schnelle <svens@stackframe.org>
Reviewed-on: http://review.coreboot.org/1190
Tested-by: build bot (Jenkins)

4 files changed, 273 insertions, 0 deletions

diff --git a/src/drivers/ipmi/Kconfig b/src/drivers/ipmi/Kconfig
new file mode 100644
index 0000000000..55c85ea459
--- /dev/null
+++ b/src/drivers/ipmi/Kconfig
@@ -0,0 +1,3 @@
+config IPMI_KCS
+    bool
+    default n
diff --git a/src/drivers/ipmi/Makefile.inc b/src/drivers/ipmi/Makefile.inc
new file mode 100644
index 0000000000..ecee28f384
--- /dev/null
+++ b/src/drivers/ipmi/Makefile.inc
@@ -0,0 +1 @@
+driver-$(CONFIG_IPMI_KCS) += ipmi_kcs.c
diff --git a/src/drivers/ipmi/ipmi_kcs.c b/src/drivers/ipmi/ipmi_kcs.c
new file mode 100644
index 0000000000..9be14331f2
--- /dev/null
+++ b/src/drivers/ipmi/ipmi_kcs.c
@@ -0,0 +1,232 @@
+/*
+ * This file is part of the coreboot project.
+ *
+ * Copyright (C) 2012 Sven Schnelle <svens@stackframe.org>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; version 2 of
+ * the License.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
+ * MA 02110-1301 USA
+ */
+
+#include <console/console.h>
+#include <device/device.h>
+#include <arch/io.h>
+#include <string.h>
+#include <delay.h>
+#include "ipmi_kcs.h"
+
+#define IPMI_KCS_STATE(_x)	((_x) >> 6)
+
+#define IPMI_KCS_GET_STATUS_ABORT
+#define IPMI_KCS_START_WRITE 0x61
+#define IPMI_KCS_END_WRITE 0x62
+#define IPMI_KCS_READ_BYTE 0x68
+
+#define IPMI_KCS_OBF 0x01
+#define IPMI_KCS_IBF 0x02
+#define IPMI_KCS_ATN 0x04
+
+#define IPMI_KCS_STATE_IDLE 0x00
+#define IPMI_KCS_STATE_READ 0x01
+#define IPMI_KCS_STATE_WRITE 0x02
+#define IPMI_KCS_STATE_ERROR 0x03
+
+#define IPMI_CMD(_x) ((_x) + 1)
+#define IPMI_DATA(_x) ((_x))
+#define IPMI_STAT(_x) ((_x) + 1)
+
+static unsigned char ipmi_kcs_status(int port)
+{
+	unsigned char status = inb(IPMI_STAT(port));
+	printk(BIOS_DEBUG, "%s: 0x%02x\n", __func__, status);
+	return status;
+}
+
+static int wait_ibf_timeout(int port)
+{
+	int timeout = 1000;
+	do {
+		if (!(ipmi_kcs_status(port) & IPMI_KCS_IBF))
+			return 0;
+		udelay(100);
+	} while(timeout--);
+	printk(BIOS_ERR, "wait_ibf timeout!\n");
+	return timeout;
+}
+
+static int wait_obf_timeout(int port)
+{
+	int timeout = 1000;
+	do {
+		if ((ipmi_kcs_status(port) & IPMI_KCS_OBF))
+			return 0;
+		udelay(100);
+	} while(timeout--);
+
+	printk(BIOS_ERR, "wait_obf timeout!\n");
+	return timeout;
+}
+
+
+static int ipmi_kcs_send_data_byte(int port, const unsigned char byte)
+{
+	unsigned char status;
+
+	printk(BIOS_DEBUG, "%s: %02x\n", __func__, byte);
+
+	outb(byte, IPMI_DATA(port));
+
+	if (wait_ibf_timeout(port))
+		return 1;
+
+        status = ipmi_kcs_status(port);
+	if ((status & IPMI_KCS_OBF) &&
+	    IPMI_KCS_STATE(status) != IPMI_KCS_STATE_WRITE) {
+		printk(BIOS_ERR, "%s: status %02x\n", __func__, status);
+		return 1;
+	}
+
+	if (ipmi_kcs_status(port) & IPMI_KCS_OBF)
+		inb(IPMI_DATA(port));
+	return 0;
+}
+
+static int ipmi_kcs_send_last_data_byte(int port, const unsigned char byte)
+{
+	unsigned char status;
+
+	printk(BIOS_DEBUG, "%s: %02x\n", __func__, byte);
+
+	if (wait_ibf_timeout(port))
+		return 1;
+
+        status = ipmi_kcs_status(port);
+	if ((status & IPMI_KCS_OBF) &&
+	    IPMI_KCS_STATE(status) != IPMI_KCS_STATE_WRITE) {
+		printk(BIOS_ERR, "%s: status %02x\n", __func__, status);
+		return 1;
+	}
+
+	if (ipmi_kcs_status(port) & IPMI_KCS_OBF)
+		inb(IPMI_DATA(port));
+
+	outb(byte, IPMI_DATA(port));
+	return 0;
+}
+
+static int ipmi_kcs_send_cmd_byte(int port, const unsigned char byte)
+{
+	printk(BIOS_DEBUG, "%s: 0x%02x\n", __func__, byte);
+
+	if (wait_ibf_timeout(port))
+		return 1;
+
+	if (ipmi_kcs_status(port) & IPMI_KCS_OBF)
+		inb(IPMI_DATA(port));
+	outb(byte, IPMI_CMD(port));
+
+	if (wait_ibf_timeout(port))
+		return 1;
+
+	if (ipmi_kcs_status(port) & IPMI_KCS_OBF)
+		inb(IPMI_DATA(port));
+
+	return 0;
+}
+
+static int ipmi_kcs_send_message(int port, int netfn, int lun, int cmd,
+				const unsigned char *msg, int len)
+{
+	int ret;
+
+	if ((ret = ipmi_kcs_send_cmd_byte(port, IPMI_KCS_START_WRITE))) {
+		printk(BIOS_ERR, "IPMI START WRITE failed\n");
+		return ret;
+	}
+
+	if ((ret = ipmi_kcs_send_data_byte(port, (netfn << 2) | (lun & 3)))) {
+		printk(BIOS_ERR, "IPMI NETFN failed\n");
+		return ret;
+	}
+
+	if ((ret = ipmi_kcs_send_data_byte(port, cmd))) {
+		printk(BIOS_ERR, "IPMI CMD failed\n");
+		return ret;
+	}
+
+	while(len-- > 1) {
+		if ((ret = ipmi_kcs_send_data_byte(port, *msg++))) {
+			printk(BIOS_ERR, "IPMI BYTE WRITE failed\n");
+			return ret;
+		}
+	}
+
+	if ((ret = ipmi_kcs_send_cmd_byte(port, IPMI_KCS_END_WRITE))) {
+		printk(BIOS_ERR, "IPMI END WRITE failed\n");
+		return ret;
+	}
+
+	if ((ret = ipmi_kcs_send_last_data_byte(port, *msg++))) {
+		printk(BIOS_ERR, "IPMI BYTE WRITE failed\n");
+		return ret;
+	}
+	return 0;
+}
+
+static int ipmi_kcs_read_message(int port, unsigned char *msg, int len)
+{
+	int status, ret = 0;
+
+	if (!msg)
+		return 0;
+
+	if (wait_ibf_timeout(port))
+		return 1;
+
+	for(;;) {
+		status = ipmi_kcs_status(port);
+
+		if (IPMI_KCS_STATE(status) == IPMI_KCS_STATE_IDLE)
+			return ret;
+
+		if (IPMI_KCS_STATE(status) != IPMI_KCS_STATE_READ) {
+			printk(BIOS_ERR, "%s: wrong state: 0x%02x\n", __func__, status);
+			return -1;
+		}
+
+		if (wait_obf_timeout(port))
+			return -1;
+
+		*msg++ = inb(IPMI_DATA(port));
+		ret++;
+
+		if (wait_ibf_timeout(port))
+			return -1;
+
+		outb(IPMI_KCS_READ_BYTE, IPMI_DATA(port));
+	}
+	return ret;
+}
+
+int ipmi_kcs_message(int port, int netfn, int lun, int cmd,
+			const unsigned char *inmsg, int inlen,
+			unsigned char *outmsg, int outlen)
+{
+	if (ipmi_kcs_send_message(port, netfn, lun, cmd, inmsg, inlen)) {
+		printk(BIOS_ERR, "ipmi_kcs_send_message failed\n");
+		return -1;
+	}
+
+	return ipmi_kcs_read_message(port, outmsg, outlen);
+}
diff --git a/src/drivers/ipmi/ipmi_kcs.h b/src/drivers/ipmi/ipmi_kcs.h
new file mode 100644
index 0000000000..cc4156acf0
--- /dev/null
+++ b/src/drivers/ipmi/ipmi_kcs.h
@@ -0,0 +1,37 @@
+#ifndef __IPMI_KCS_H
+#define __IPMI_KCS_H
+/*
+ * This file is part of the coreboot project.
+ *
+ * Copyright (C) 2012 Sven Schnelle <svens@stackframe.org>
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; version 2 of
+ * the License.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
+ * MA 02110-1301 USA
+ */
+
+#define IPMI_NETFN_CHASSIS 0x00
+#define IPMI_NETFN_BRIDGE 0x02
+#define IPMI_NETFN_SENSOREVENT 0x04
+#define IPMI_NETFN_APPLICATION 0x06
+#define IPMI_NETFN_FIRMWARE 0x08
+#define IPMI_NETFN_STORAGE 0x0a
+#define IPMI_NETFN_TRANSPORT 0x0c
+
+#define IPMI_CMD_ACPI_POWERON 0x06
+
+extern int ipmi_kcs_message(int port, int netfn, int lun, int cmd,
+			    const unsigned char *inmsg, int inlen,
+			    unsigned char *outmsg, int outlen);
+#endif