114a43e69SBenjamin Herrenschmidt /* 214a43e69SBenjamin Herrenschmidt * PowerNV OPAL high level interfaces 314a43e69SBenjamin Herrenschmidt * 414a43e69SBenjamin Herrenschmidt * Copyright 2011 IBM Corp. 514a43e69SBenjamin Herrenschmidt * 614a43e69SBenjamin Herrenschmidt * This program is free software; you can redistribute it and/or 714a43e69SBenjamin Herrenschmidt * modify it under the terms of the GNU General Public License 814a43e69SBenjamin Herrenschmidt * as published by the Free Software Foundation; either version 914a43e69SBenjamin Herrenschmidt * 2 of the License, or (at your option) any later version. 1014a43e69SBenjamin Herrenschmidt */ 1114a43e69SBenjamin Herrenschmidt 1214a43e69SBenjamin Herrenschmidt #undef DEBUG 1314a43e69SBenjamin Herrenschmidt 1414a43e69SBenjamin Herrenschmidt #include <linux/types.h> 1514a43e69SBenjamin Herrenschmidt #include <linux/of.h> 1614a43e69SBenjamin Herrenschmidt #include <linux/of_platform.h> 1714a43e69SBenjamin Herrenschmidt #include <asm/opal.h> 1814a43e69SBenjamin Herrenschmidt #include <asm/firmware.h> 1914a43e69SBenjamin Herrenschmidt 2014a43e69SBenjamin Herrenschmidt #include "powernv.h" 2114a43e69SBenjamin Herrenschmidt 2214a43e69SBenjamin Herrenschmidt struct opal { 2314a43e69SBenjamin Herrenschmidt u64 base; 2414a43e69SBenjamin Herrenschmidt u64 entry; 2514a43e69SBenjamin Herrenschmidt } opal; 2614a43e69SBenjamin Herrenschmidt 2714a43e69SBenjamin Herrenschmidt static struct device_node *opal_node; 2814a43e69SBenjamin Herrenschmidt static DEFINE_SPINLOCK(opal_write_lock); 2914a43e69SBenjamin Herrenschmidt 3014a43e69SBenjamin Herrenschmidt int __init early_init_dt_scan_opal(unsigned long node, 3114a43e69SBenjamin Herrenschmidt const char *uname, int depth, void *data) 3214a43e69SBenjamin Herrenschmidt { 3314a43e69SBenjamin Herrenschmidt const void *basep, *entryp; 3414a43e69SBenjamin Herrenschmidt unsigned long basesz, entrysz; 3514a43e69SBenjamin Herrenschmidt 3614a43e69SBenjamin Herrenschmidt if (depth != 1 || strcmp(uname, "ibm,opal") != 0) 3714a43e69SBenjamin Herrenschmidt return 0; 3814a43e69SBenjamin Herrenschmidt 3914a43e69SBenjamin Herrenschmidt basep = of_get_flat_dt_prop(node, "opal-base-address", &basesz); 4014a43e69SBenjamin Herrenschmidt entryp = of_get_flat_dt_prop(node, "opal-entry-address", &entrysz); 4114a43e69SBenjamin Herrenschmidt 4214a43e69SBenjamin Herrenschmidt if (!basep || !entryp) 4314a43e69SBenjamin Herrenschmidt return 1; 4414a43e69SBenjamin Herrenschmidt 4514a43e69SBenjamin Herrenschmidt opal.base = of_read_number(basep, basesz/4); 4614a43e69SBenjamin Herrenschmidt opal.entry = of_read_number(entryp, entrysz/4); 4714a43e69SBenjamin Herrenschmidt 4814a43e69SBenjamin Herrenschmidt pr_debug("OPAL Base = 0x%llx (basep=%p basesz=%ld)\n", 4914a43e69SBenjamin Herrenschmidt opal.base, basep, basesz); 5014a43e69SBenjamin Herrenschmidt pr_debug("OPAL Entry = 0x%llx (entryp=%p basesz=%ld)\n", 5114a43e69SBenjamin Herrenschmidt opal.entry, entryp, entrysz); 5214a43e69SBenjamin Herrenschmidt 5314a43e69SBenjamin Herrenschmidt powerpc_firmware_features |= FW_FEATURE_OPAL; 5414a43e69SBenjamin Herrenschmidt if (of_flat_dt_is_compatible(node, "ibm,opal-v2")) { 5514a43e69SBenjamin Herrenschmidt powerpc_firmware_features |= FW_FEATURE_OPALv2; 5614a43e69SBenjamin Herrenschmidt printk("OPAL V2 detected !\n"); 5714a43e69SBenjamin Herrenschmidt } else { 5814a43e69SBenjamin Herrenschmidt printk("OPAL V1 detected !\n"); 5914a43e69SBenjamin Herrenschmidt } 6014a43e69SBenjamin Herrenschmidt 6114a43e69SBenjamin Herrenschmidt return 1; 6214a43e69SBenjamin Herrenschmidt } 6314a43e69SBenjamin Herrenschmidt 6414a43e69SBenjamin Herrenschmidt int opal_get_chars(uint32_t vtermno, char *buf, int count) 6514a43e69SBenjamin Herrenschmidt { 6614a43e69SBenjamin Herrenschmidt s64 len, rc; 6714a43e69SBenjamin Herrenschmidt u64 evt; 6814a43e69SBenjamin Herrenschmidt 6914a43e69SBenjamin Herrenschmidt if (!opal.entry) 7014a43e69SBenjamin Herrenschmidt return 0; 7114a43e69SBenjamin Herrenschmidt opal_poll_events(&evt); 7214a43e69SBenjamin Herrenschmidt if ((evt & OPAL_EVENT_CONSOLE_INPUT) == 0) 7314a43e69SBenjamin Herrenschmidt return 0; 7414a43e69SBenjamin Herrenschmidt len = count; 7514a43e69SBenjamin Herrenschmidt rc = opal_console_read(vtermno, &len, buf); 7614a43e69SBenjamin Herrenschmidt if (rc == OPAL_SUCCESS) 7714a43e69SBenjamin Herrenschmidt return len; 7814a43e69SBenjamin Herrenschmidt return 0; 7914a43e69SBenjamin Herrenschmidt } 8014a43e69SBenjamin Herrenschmidt 8114a43e69SBenjamin Herrenschmidt int opal_put_chars(uint32_t vtermno, const char *data, int total_len) 8214a43e69SBenjamin Herrenschmidt { 8314a43e69SBenjamin Herrenschmidt int written = 0; 8414a43e69SBenjamin Herrenschmidt s64 len, rc = OPAL_BUSY; 8514a43e69SBenjamin Herrenschmidt unsigned long flags; 8614a43e69SBenjamin Herrenschmidt u64 evt; 8714a43e69SBenjamin Herrenschmidt 8814a43e69SBenjamin Herrenschmidt if (!opal.entry) 8914a43e69SBenjamin Herrenschmidt return 0; 9014a43e69SBenjamin Herrenschmidt 9114a43e69SBenjamin Herrenschmidt /* We want put_chars to be atomic to avoid mangling of hvsi 9214a43e69SBenjamin Herrenschmidt * packets. To do that, we first test for room and return 9314a43e69SBenjamin Herrenschmidt * -EAGAIN if there isn't enough 9414a43e69SBenjamin Herrenschmidt */ 9514a43e69SBenjamin Herrenschmidt spin_lock_irqsave(&opal_write_lock, flags); 9614a43e69SBenjamin Herrenschmidt rc = opal_console_write_buffer_space(vtermno, &len); 9714a43e69SBenjamin Herrenschmidt if (rc || len < total_len) { 9814a43e69SBenjamin Herrenschmidt spin_unlock_irqrestore(&opal_write_lock, flags); 9914a43e69SBenjamin Herrenschmidt /* Closed -> drop characters */ 10014a43e69SBenjamin Herrenschmidt if (rc) 10114a43e69SBenjamin Herrenschmidt return total_len; 10214a43e69SBenjamin Herrenschmidt opal_poll_events(&evt); 10314a43e69SBenjamin Herrenschmidt return -EAGAIN; 10414a43e69SBenjamin Herrenschmidt } 10514a43e69SBenjamin Herrenschmidt 10614a43e69SBenjamin Herrenschmidt /* We still try to handle partial completions, though they 10714a43e69SBenjamin Herrenschmidt * should no longer happen. 10814a43e69SBenjamin Herrenschmidt */ 10914a43e69SBenjamin Herrenschmidt while(total_len > 0 && (rc == OPAL_BUSY || 11014a43e69SBenjamin Herrenschmidt rc == OPAL_BUSY_EVENT || rc == OPAL_SUCCESS)) { 11114a43e69SBenjamin Herrenschmidt len = total_len; 11214a43e69SBenjamin Herrenschmidt rc = opal_console_write(vtermno, &len, data); 11314a43e69SBenjamin Herrenschmidt if (rc == OPAL_SUCCESS) { 11414a43e69SBenjamin Herrenschmidt total_len -= len; 11514a43e69SBenjamin Herrenschmidt data += len; 11614a43e69SBenjamin Herrenschmidt written += len; 11714a43e69SBenjamin Herrenschmidt } 11814a43e69SBenjamin Herrenschmidt /* This is a bit nasty but we need that for the console to 11914a43e69SBenjamin Herrenschmidt * flush when there aren't any interrupts. We will clean 12014a43e69SBenjamin Herrenschmidt * things a bit later to limit that to synchronous path 12114a43e69SBenjamin Herrenschmidt * such as the kernel console and xmon/udbg 12214a43e69SBenjamin Herrenschmidt */ 12314a43e69SBenjamin Herrenschmidt do 12414a43e69SBenjamin Herrenschmidt opal_poll_events(&evt); 12514a43e69SBenjamin Herrenschmidt while(rc == OPAL_SUCCESS && (evt & OPAL_EVENT_CONSOLE_OUTPUT)); 12614a43e69SBenjamin Herrenschmidt } 12714a43e69SBenjamin Herrenschmidt spin_unlock_irqrestore(&opal_write_lock, flags); 12814a43e69SBenjamin Herrenschmidt return written; 12914a43e69SBenjamin Herrenschmidt } 13014a43e69SBenjamin Herrenschmidt 13114a43e69SBenjamin Herrenschmidt static int __init opal_init(void) 13214a43e69SBenjamin Herrenschmidt { 13314a43e69SBenjamin Herrenschmidt struct device_node *np, *consoles; 13414a43e69SBenjamin Herrenschmidt 13514a43e69SBenjamin Herrenschmidt opal_node = of_find_node_by_path("/ibm,opal"); 13614a43e69SBenjamin Herrenschmidt if (!opal_node) { 13714a43e69SBenjamin Herrenschmidt pr_warn("opal: Node not found\n"); 13814a43e69SBenjamin Herrenschmidt return -ENODEV; 13914a43e69SBenjamin Herrenschmidt } 14014a43e69SBenjamin Herrenschmidt if (firmware_has_feature(FW_FEATURE_OPALv2)) 14114a43e69SBenjamin Herrenschmidt consoles = of_find_node_by_path("/ibm,opal/consoles"); 14214a43e69SBenjamin Herrenschmidt else 14314a43e69SBenjamin Herrenschmidt consoles = of_node_get(opal_node); 14414a43e69SBenjamin Herrenschmidt 14514a43e69SBenjamin Herrenschmidt /* Register serial ports */ 14614a43e69SBenjamin Herrenschmidt for_each_child_of_node(consoles, np) { 14714a43e69SBenjamin Herrenschmidt if (strcmp(np->name, "serial")) 14814a43e69SBenjamin Herrenschmidt continue; 14914a43e69SBenjamin Herrenschmidt of_platform_device_create(np, NULL, NULL); 15014a43e69SBenjamin Herrenschmidt } 15114a43e69SBenjamin Herrenschmidt of_node_put(consoles); 15214a43e69SBenjamin Herrenschmidt return 0; 15314a43e69SBenjamin Herrenschmidt } 15414a43e69SBenjamin Herrenschmidt subsys_initcall(opal_init); 155