mrst.c

Go to the documentation of this file.

/*
 * mrst.c: Intel Moorestown platform specific setup code
 *
 * (C) Copyright 2008 Intel Corporation
 * Author: Jacob Pan ([email protected])
 *
 * 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.
 */

#define pr_fmt(fmt) "mrst: " fmt

#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/interrupt.h>
#include <linux/scatterlist.h>
#include <linux/sfi.h>
#include <linux/intel_pmic_gpio.h>
#include <linux/spi/spi.h>
#include <linux/i2c.h>
#include <linux/i2c/pca953x.h>
#include <linux/gpio_keys.h>
#include <linux/input.h>
#include <linux/platform_device.h>
#include <linux/irq.h>
#include <linux/module.h>
#include <linux/notifier.h>
#include <linux/mfd/intel_msic.h>
#include <linux/gpio.h>
#include <linux/i2c/tc35876x.h>

#include <asm/setup.h>
#include <asm/mpspec_def.h>
#include <asm/hw_irq.h>
#include <asm/apic.h>
#include <asm/io_apic.h>
#include <asm/mrst.h>
#include <asm/mrst-vrtc.h>
#include <asm/io.h>
#include <asm/i8259.h>
#include <asm/intel_scu_ipc.h>
#include <asm/apb_timer.h>
#include <asm/reboot.h>

/*
 * the clockevent devices on Moorestown/Medfield can be APBT or LAPIC clock,
 * cmdline option x86_mrst_timer can be used to override the configuration
 * to prefer one or the other.
 * at runtime, there are basically three timer configurations:
 * 1. per cpu apbt clock only
 * 2. per cpu always-on lapic clocks only, this is Penwell/Medfield only
 * 3. per cpu lapic clock (C3STOP) and one apbt clock, with broadcast.
 *
 * by default (without cmdline option), platform code first detects cpu type
 * to see if we are on lincroft or penwell, then set up both lapic or apbt
 * clocks accordingly.
 * i.e. by default, medfield uses configuration #2, moorestown uses #1.
 * config #3 is supported but not recommended on medfield.
 *
 * rating and feature summary:
 * lapic (with C3STOP) --------- 100
 * apbt (always-on) ------------ 110
 * lapic (always-on,ARAT) ------ 150
 */

__cpuinitdata enum mrst_timer_options mrst_timer_options;

static u32 sfi_mtimer_usage[SFI_MTMR_MAX_NUM];
static struct sfi_timer_table_entry sfi_mtimer_array[SFI_MTMR_MAX_NUM];
enum mrst_cpu_type __mrst_cpu_chip;
EXPORT_SYMBOL_GPL(__mrst_cpu_chip);

int sfi_mtimer_num;

struct sfi_rtc_table_entry sfi_mrtc_array[SFI_MRTC_MAX];
EXPORT_SYMBOL_GPL(sfi_mrtc_array);
int sfi_mrtc_num;

static void mrst_power_off(void)
{
}

static void mrst_reboot(void)
{
    intel_scu_ipc_simple_command(IPCMSG_COLD_BOOT, 0);
}

/* parse all the mtimer info to a static mtimer array */
static int __init sfi_parse_mtmr(struct sfi_table_header *table)
{
    struct sfi_table_simple *sb;
    struct sfi_timer_table_entry *pentry;
    struct mpc_intsrc mp_irq;
    int totallen;

    sb = (struct sfi_table_simple *)table;
    if (!sfi_mtimer_num) {
        sfi_mtimer_num = SFI_GET_NUM_ENTRIES(sb,
                    struct sfi_timer_table_entry);
        pentry = (struct sfi_timer_table_entry *) sb->pentry;
        totallen = sfi_mtimer_num * sizeof(*pentry);
        memcpy(sfi_mtimer_array, pentry, totallen);
    }

    pr_debug("SFI MTIMER info (num = %d):\n", sfi_mtimer_num);
    pentry = sfi_mtimer_array;
    for (totallen = 0; totallen < sfi_mtimer_num; totallen++, pentry++) {
        pr_debug("timer[%d]: paddr = 0x%08x, freq = %dHz,"
            " irq = %d\n", totallen, (u32)pentry->phys_addr,
            pentry->freq_hz, pentry->irq);
            if (!pentry->irq)
                continue;
            mp_irq.type = MP_INTSRC;
            mp_irq.irqtype = mp_INT;
/* triggering mode edge bit 2-3, active high polarity bit 0-1 */
            mp_irq.irqflag = 5;
            mp_irq.srcbus = MP_BUS_ISA;
            mp_irq.srcbusirq = pentry->irq; /* IRQ */
            mp_irq.dstapic = MP_APIC_ALL;
            mp_irq.dstirq = pentry->irq;
            mp_save_irq(&mp_irq);
    }

    return 0;
}

struct sfi_timer_table_entry *sfi_get_mtmr(int hint)
{
    int i;
    if (hint < sfi_mtimer_num) {
        if (!sfi_mtimer_usage[hint]) {
            pr_debug("hint taken for timer %d irq %d\n",\
                hint, sfi_mtimer_array[hint].irq);
            sfi_mtimer_usage[hint] = 1;
            return &sfi_mtimer_array[hint];
        }
    }
    /* take the first timer available */
    for (i = 0; i < sfi_mtimer_num;) {
        if (!sfi_mtimer_usage[i]) {
            sfi_mtimer_usage[i] = 1;
            return &sfi_mtimer_array[i];
        }
        i++;
    }
    return NULL;
}

void sfi_free_mtmr(struct sfi_timer_table_entry *mtmr)
{
    int i;
    for (i = 0; i < sfi_mtimer_num;) {
        if (mtmr->irq == sfi_mtimer_array[i].irq) {
            sfi_mtimer_usage[i] = 0;
            return;
        }
        i++;
    }
}

/* parse all the mrtc info to a global mrtc array */
int __init sfi_parse_mrtc(struct sfi_table_header *table)
{
    struct sfi_table_simple *sb;
    struct sfi_rtc_table_entry *pentry;
    struct mpc_intsrc mp_irq;

    int totallen;

    sb = (struct sfi_table_simple *)table;
    if (!sfi_mrtc_num) {
        sfi_mrtc_num = SFI_GET_NUM_ENTRIES(sb,
                        struct sfi_rtc_table_entry);
        pentry = (struct sfi_rtc_table_entry *)sb->pentry;
        totallen = sfi_mrtc_num * sizeof(*pentry);
        memcpy(sfi_mrtc_array, pentry, totallen);
    }

    pr_debug("SFI RTC info (num = %d):\n", sfi_mrtc_num);
    pentry = sfi_mrtc_array;
    for (totallen = 0; totallen < sfi_mrtc_num; totallen++, pentry++) {
        pr_debug("RTC[%d]: paddr = 0x%08x, irq = %d\n",
            totallen, (u32)pentry->phys_addr, pentry->irq);
        mp_irq.type = MP_INTSRC;
        mp_irq.irqtype = mp_INT;
        mp_irq.irqflag = 0xf;   /* level trigger and active low */
        mp_irq.srcbus = MP_BUS_ISA;
        mp_irq.srcbusirq = pentry->irq; /* IRQ */
        mp_irq.dstapic = MP_APIC_ALL;
        mp_irq.dstirq = pentry->irq;
        mp_save_irq(&mp_irq);
    }
    return 0;
}

static unsigned long __init mrst_calibrate_tsc(void)
{
    unsigned long fast_calibrate;
    u32 lo, hi, ratio, fsb;

    rdmsr(MSR_IA32_PERF_STATUS, lo, hi);
    pr_debug("IA32 perf status is 0x%x, 0x%0x\n", lo, hi);
    ratio = (hi >> 8) & 0x1f;
    pr_debug("ratio is %d\n", ratio);
    if (!ratio) {
        pr_err("read a zero ratio, should be incorrect!\n");
        pr_err("force tsc ratio to 16 ...\n");
        ratio = 16;
    }
    rdmsr(MSR_FSB_FREQ, lo, hi);
    if ((lo & 0x7) == 0x7)
        fsb = PENWELL_FSB_FREQ_83SKU;
    else
        fsb = PENWELL_FSB_FREQ_100SKU;
    fast_calibrate = ratio * fsb;
    pr_debug("read penwell tsc %lu khz\n", fast_calibrate);
    lapic_timer_frequency = fsb * 1000 / HZ;
    /* mark tsc clocksource as reliable */
    set_cpu_cap(&boot_cpu_data, X86_FEATURE_TSC_RELIABLE);
    
    if (fast_calibrate)
        return fast_calibrate;

    return 0;
}

static void __init mrst_time_init(void)
{
    sfi_table_parse(SFI_SIG_MTMR, NULL, NULL, sfi_parse_mtmr);
    switch (mrst_timer_options) {
    case MRST_TIMER_APBT_ONLY:
        break;
    case MRST_TIMER_LAPIC_APBT:
        x86_init.timers.setup_percpu_clockev = setup_boot_APIC_clock;
        x86_cpuinit.setup_percpu_clockev = setup_secondary_APIC_clock;
        break;
    default:
        if (!boot_cpu_has(X86_FEATURE_ARAT))
            break;
        x86_init.timers.setup_percpu_clockev = setup_boot_APIC_clock;
        x86_cpuinit.setup_percpu_clockev = setup_secondary_APIC_clock;
        return;
    }
    /* we need at least one APB timer */
    pre_init_apic_IRQ0();
    apbt_time_init();
}

static void __cpuinit mrst_arch_setup(void)
{
    if (boot_cpu_data.x86 == 6 && boot_cpu_data.x86_model == 0x27)
        __mrst_cpu_chip = MRST_CPU_CHIP_PENWELL;
    else {
        pr_err("Unknown Intel MID CPU (%d:%d), default to Penwell\n",
            boot_cpu_data.x86, boot_cpu_data.x86_model);
        __mrst_cpu_chip = MRST_CPU_CHIP_PENWELL;
    }
}

/* MID systems don't have i8042 controller */
static int mrst_i8042_detect(void)
{
    return 0;
}

/*
 * Moorestown does not have external NMI source nor port 0x61 to report
 * NMI status. The possible NMI sources are from pmu as a result of NMI
 * watchdog or lock debug. Reading io port 0x61 results in 0xff which
 * misled NMI handler.
 */
static unsigned char mrst_get_nmi_reason(void)
{
    return 0;
}

/*
 * Moorestown specific x86_init function overrides and early setup
 * calls.
 */
void __init x86_mrst_early_setup(void)
{
    x86_init.resources.probe_roms = x86_init_noop;
    x86_init.resources.reserve_resources = x86_init_noop;

    x86_init.timers.timer_init = mrst_time_init;
    x86_init.timers.setup_percpu_clockev = x86_init_noop;

    x86_init.irqs.pre_vector_init = x86_init_noop;

    x86_init.oem.arch_setup = mrst_arch_setup;

    x86_cpuinit.setup_percpu_clockev = apbt_setup_secondary_clock;

    x86_platform.calibrate_tsc = mrst_calibrate_tsc;
    x86_platform.i8042_detect = mrst_i8042_detect;
    x86_init.timers.wallclock_init = mrst_rtc_init;
    x86_platform.get_nmi_reason = mrst_get_nmi_reason;

    x86_init.pci.init = pci_mrst_init;
    x86_init.pci.fixup_irqs = x86_init_noop;

    legacy_pic = &null_legacy_pic;

    /* Moorestown specific power_off/restart method */
    pm_power_off = mrst_power_off;
    machine_ops.emergency_restart  = mrst_reboot;

    /* Avoid searching for BIOS MP tables */
    x86_init.mpparse.find_smp_config = x86_init_noop;
    x86_init.mpparse.get_smp_config = x86_init_uint_noop;
    set_bit(MP_BUS_ISA, mp_bus_not_pci);
}

/*
 * if user does not want to use per CPU apb timer, just give it a lower rating
 * than local apic timer and skip the late per cpu timer init.
 */
static inline int __init setup_x86_mrst_timer(char *arg)
{
    if (!arg)
        return -EINVAL;

    if (strcmp("apbt_only", arg) == 0)
        mrst_timer_options = MRST_TIMER_APBT_ONLY;
    else if (strcmp("lapic_and_apbt", arg) == 0)
        mrst_timer_options = MRST_TIMER_LAPIC_APBT;
    else {
        pr_warning("X86 MRST timer option %s not recognised"
               " use x86_mrst_timer=apbt_only or lapic_and_apbt\n",
               arg);
        return -EINVAL;
    }
    return 0;
}
__setup("x86_mrst_timer=", setup_x86_mrst_timer);

/*
 * Parsing GPIO table first, since the DEVS table will need this table
 * to map the pin name to the actual pin.
 */
static struct sfi_gpio_table_entry *gpio_table;
static int gpio_num_entry;

static int __init sfi_parse_gpio(struct sfi_table_header *table)
{
    struct sfi_table_simple *sb;
    struct sfi_gpio_table_entry *pentry;
    int num, i;

    if (gpio_table)
        return 0;
    sb = (struct sfi_table_simple *)table;
    num = SFI_GET_NUM_ENTRIES(sb, struct sfi_gpio_table_entry);
    pentry = (struct sfi_gpio_table_entry *)sb->pentry;

    gpio_table = (struct sfi_gpio_table_entry *)
                kmalloc(num * sizeof(*pentry), GFP_KERNEL);
    if (!gpio_table)
        return -1;
    memcpy(gpio_table, pentry, num * sizeof(*pentry));
    gpio_num_entry = num;

    pr_debug("GPIO pin info:\n");
    for (i = 0; i < num; i++, pentry++)
        pr_debug("info[%2d]: controller = %16.16s, pin_name = %16.16s,"
        " pin = %d\n", i,
            pentry->controller_name,
            pentry->pin_name,
            pentry->pin_no);
    return 0;
}

static int get_gpio_by_name(const char *name)
{
    struct sfi_gpio_table_entry *pentry = gpio_table;
    int i;

    if (!pentry)
        return -1;
    for (i = 0; i < gpio_num_entry; i++, pentry++) {
        if (!strncmp(name, pentry->pin_name, SFI_NAME_LEN))
            return pentry->pin_no;
    }
    return -1;
}

/*
 * Here defines the array of devices platform data that IAFW would export
 * through SFI "DEVS" table, we use name and type to match the device and
 * its platform data.
 */
struct devs_id {
    char name[SFI_NAME_LEN + 1];
    u8 type;
    u8 delay;
    void *(*get_platform_data)(void *info);
};

/* the offset for the mapping of global gpio pin to irq */
#define MRST_IRQ_OFFSET 0x100

static void __init *pmic_gpio_platform_data(void *info)
{
    static struct intel_pmic_gpio_platform_data pmic_gpio_pdata;
    int gpio_base = get_gpio_by_name("pmic_gpio_base");

    if (gpio_base == -1)
        gpio_base = 64;
    pmic_gpio_pdata.gpio_base = gpio_base;
    pmic_gpio_pdata.irq_base = gpio_base + MRST_IRQ_OFFSET;
    pmic_gpio_pdata.gpiointr = 0xffffeff8;

    return &pmic_gpio_pdata;
}

static void __init *max3111_platform_data(void *info)
{
    struct spi_board_info *spi_info = info;
    int intr = get_gpio_by_name("max3111_int");

    spi_info->mode = SPI_MODE_0;
    if (intr == -1)
        return NULL;
    spi_info->irq = intr + MRST_IRQ_OFFSET;
    return NULL;
}

/* we have multiple max7315 on the board ... */
#define MAX7315_NUM 2
static void __init *max7315_platform_data(void *info)
{
    static struct pca953x_platform_data max7315_pdata[MAX7315_NUM];
    static int nr;
    struct pca953x_platform_data *max7315 = &max7315_pdata[nr];
    struct i2c_board_info *i2c_info = info;
    int gpio_base, intr;
    char base_pin_name[SFI_NAME_LEN + 1];
    char intr_pin_name[SFI_NAME_LEN + 1];

    if (nr == MAX7315_NUM) {
        pr_err("too many max7315s, we only support %d\n",
                MAX7315_NUM);
        return NULL;
    }
    /* we have several max7315 on the board, we only need load several
     * instances of the same pca953x driver to cover them
     */
    strcpy(i2c_info->type, "max7315");
    if (nr++) {
        sprintf(base_pin_name, "max7315_%d_base", nr);
        sprintf(intr_pin_name, "max7315_%d_int", nr);
    } else {
        strcpy(base_pin_name, "max7315_base");
        strcpy(intr_pin_name, "max7315_int");
    }

    gpio_base = get_gpio_by_name(base_pin_name);
    intr = get_gpio_by_name(intr_pin_name);

    if (gpio_base == -1)
        return NULL;
    max7315->gpio_base = gpio_base;
    if (intr != -1) {
        i2c_info->irq = intr + MRST_IRQ_OFFSET;
        max7315->irq_base = gpio_base + MRST_IRQ_OFFSET;
    } else {
        i2c_info->irq = -1;
        max7315->irq_base = -1;
    }
    return max7315;
}

static void *tca6416_platform_data(void *info)
{
    static struct pca953x_platform_data tca6416;
    struct i2c_board_info *i2c_info = info;
    int gpio_base, intr;
    char base_pin_name[SFI_NAME_LEN + 1];
    char intr_pin_name[SFI_NAME_LEN + 1];

    strcpy(i2c_info->type, "tca6416");
    strcpy(base_pin_name, "tca6416_base");
    strcpy(intr_pin_name, "tca6416_int");

    gpio_base = get_gpio_by_name(base_pin_name);
    intr = get_gpio_by_name(intr_pin_name);

    if (gpio_base == -1)
        return NULL;
    tca6416.gpio_base = gpio_base;
    if (intr != -1) {
        i2c_info->irq = intr + MRST_IRQ_OFFSET;
        tca6416.irq_base = gpio_base + MRST_IRQ_OFFSET;
    } else {
        i2c_info->irq = -1;
        tca6416.irq_base = -1;
    }
    return &tca6416;
}

static void *mpu3050_platform_data(void *info)
{
    struct i2c_board_info *i2c_info = info;
    int intr = get_gpio_by_name("mpu3050_int");

    if (intr == -1)
        return NULL;

    i2c_info->irq = intr + MRST_IRQ_OFFSET;
    return NULL;
}

static void __init *emc1403_platform_data(void *info)
{
    static short intr2nd_pdata;
    struct i2c_board_info *i2c_info = info;
    int intr = get_gpio_by_name("thermal_int");
    int intr2nd = get_gpio_by_name("thermal_alert");

    if (intr == -1 || intr2nd == -1)
        return NULL;

    i2c_info->irq = intr + MRST_IRQ_OFFSET;
    intr2nd_pdata = intr2nd + MRST_IRQ_OFFSET;

    return &intr2nd_pdata;
}

static void __init *lis331dl_platform_data(void *info)
{
    static short intr2nd_pdata;
    struct i2c_board_info *i2c_info = info;
    int intr = get_gpio_by_name("accel_int");
    int intr2nd = get_gpio_by_name("accel_2");

    if (intr == -1 || intr2nd == -1)
        return NULL;

    i2c_info->irq = intr + MRST_IRQ_OFFSET;
    intr2nd_pdata = intr2nd + MRST_IRQ_OFFSET;

    return &intr2nd_pdata;
}

static void __init *no_platform_data(void *info)
{
    return NULL;
}

static struct resource msic_resources[] = {
    {
        .start  = INTEL_MSIC_IRQ_PHYS_BASE,
        .end    = INTEL_MSIC_IRQ_PHYS_BASE + 64 - 1,
        .flags  = IORESOURCE_MEM,
    },
};

static struct intel_msic_platform_data msic_pdata;

static struct platform_device msic_device = {
    .name       = "intel_msic",
    .id     = -1,
    .dev        = {
        .platform_data  = &msic_pdata,
    },
    .num_resources  = ARRAY_SIZE(msic_resources),
    .resource   = msic_resources,
};

static inline bool mrst_has_msic(void)
{
    return mrst_identify_cpu() == MRST_CPU_CHIP_PENWELL;
}

static int msic_scu_status_change(struct notifier_block *nb,
                  unsigned long code, void *data)
{
    if (code == SCU_DOWN) {
        platform_device_unregister(&msic_device);
        return 0;
    }

    return platform_device_register(&msic_device);
}

static int __init msic_init(void)
{
    static struct notifier_block msic_scu_notifier = {
        .notifier_call  = msic_scu_status_change,
    };

    /*
     * We need to be sure that the SCU IPC is ready before MSIC device
     * can be registered.
     */
    if (mrst_has_msic())
        intel_scu_notifier_add(&msic_scu_notifier);

    return 0;
}
arch_initcall(msic_init);

/*
 * msic_generic_platform_data - sets generic platform data for the block
 * @info: pointer to the SFI device table entry for this block
 * @block: MSIC block
 *
 * Function sets IRQ number from the SFI table entry for given device to
 * the MSIC platform data.
 */
static void *msic_generic_platform_data(void *info, enum intel_msic_block block)
{
    struct sfi_device_table_entry *entry = info;

    BUG_ON(block < 0 || block >= INTEL_MSIC_BLOCK_LAST);
    msic_pdata.irq[block] = entry->irq;

    return no_platform_data(info);
}

static void *msic_battery_platform_data(void *info)
{
    return msic_generic_platform_data(info, INTEL_MSIC_BLOCK_BATTERY);
}

static void *msic_gpio_platform_data(void *info)
{
    static struct intel_msic_gpio_pdata pdata;
    int gpio = get_gpio_by_name("msic_gpio_base");

    if (gpio < 0)
        return NULL;

    pdata.gpio_base = gpio;
    msic_pdata.gpio = &pdata;

    return msic_generic_platform_data(info, INTEL_MSIC_BLOCK_GPIO);
}

static void *msic_audio_platform_data(void *info)
{
    struct platform_device *pdev;

    pdev = platform_device_register_simple("sst-platform", -1, NULL, 0);
    if (IS_ERR(pdev)) {
        pr_err("failed to create audio platform device\n");
        return NULL;
    }

    return msic_generic_platform_data(info, INTEL_MSIC_BLOCK_AUDIO);
}

static void *msic_power_btn_platform_data(void *info)
{
    return msic_generic_platform_data(info, INTEL_MSIC_BLOCK_POWER_BTN);
}

static void *msic_ocd_platform_data(void *info)
{
    static struct intel_msic_ocd_pdata pdata;
    int gpio = get_gpio_by_name("ocd_gpio");

    if (gpio < 0)
        return NULL;

    pdata.gpio = gpio;
    msic_pdata.ocd = &pdata;

    return msic_generic_platform_data(info, INTEL_MSIC_BLOCK_OCD);
}

static void *msic_thermal_platform_data(void *info)
{
    return msic_generic_platform_data(info, INTEL_MSIC_BLOCK_THERMAL);
}

/* tc35876x DSI-LVDS bridge chip and panel platform data */
static void *tc35876x_platform_data(void *data)
{
       static struct tc35876x_platform_data pdata;

       /* gpio pins set to -1 will not be used by the driver */
       pdata.gpio_bridge_reset = get_gpio_by_name("LCMB_RXEN");
       pdata.gpio_panel_bl_en = get_gpio_by_name("6S6P_BL_EN");
       pdata.gpio_panel_vadd = get_gpio_by_name("EN_VREG_LCD_V3P3");

       return &pdata;
}

static const struct devs_id __initconst device_ids[] = {
    {"bma023", SFI_DEV_TYPE_I2C, 1, &no_platform_data},
    {"pmic_gpio", SFI_DEV_TYPE_SPI, 1, &pmic_gpio_platform_data},
    {"pmic_gpio", SFI_DEV_TYPE_IPC, 1, &pmic_gpio_platform_data},
    {"spi_max3111", SFI_DEV_TYPE_SPI, 0, &max3111_platform_data},
    {"i2c_max7315", SFI_DEV_TYPE_I2C, 1, &max7315_platform_data},
    {"i2c_max7315_2", SFI_DEV_TYPE_I2C, 1, &max7315_platform_data},
    {"tca6416", SFI_DEV_TYPE_I2C, 1, &tca6416_platform_data},
    {"emc1403", SFI_DEV_TYPE_I2C, 1, &emc1403_platform_data},
    {"i2c_accel", SFI_DEV_TYPE_I2C, 0, &lis331dl_platform_data},
    {"pmic_audio", SFI_DEV_TYPE_IPC, 1, &no_platform_data},
    {"mpu3050", SFI_DEV_TYPE_I2C, 1, &mpu3050_platform_data},
    {"i2c_disp_brig", SFI_DEV_TYPE_I2C, 0, &tc35876x_platform_data},

    /* MSIC subdevices */
    {"msic_battery", SFI_DEV_TYPE_IPC, 1, &msic_battery_platform_data},
    {"msic_gpio", SFI_DEV_TYPE_IPC, 1, &msic_gpio_platform_data},
    {"msic_audio", SFI_DEV_TYPE_IPC, 1, &msic_audio_platform_data},
    {"msic_power_btn", SFI_DEV_TYPE_IPC, 1, &msic_power_btn_platform_data},
    {"msic_ocd", SFI_DEV_TYPE_IPC, 1, &msic_ocd_platform_data},
    {"msic_thermal", SFI_DEV_TYPE_IPC, 1, &msic_thermal_platform_data},

    {},
};

#define MAX_IPCDEVS 24
static struct platform_device *ipc_devs[MAX_IPCDEVS];
static int ipc_next_dev;

#define MAX_SCU_SPI 24
static struct spi_board_info *spi_devs[MAX_SCU_SPI];
static int spi_next_dev;

#define MAX_SCU_I2C 24
static struct i2c_board_info *i2c_devs[MAX_SCU_I2C];
static int i2c_bus[MAX_SCU_I2C];
static int i2c_next_dev;

static void __init intel_scu_device_register(struct platform_device *pdev)
{
    if(ipc_next_dev == MAX_IPCDEVS)
        pr_err("too many SCU IPC devices");
    else
        ipc_devs[ipc_next_dev++] = pdev;
}

static void __init intel_scu_spi_device_register(struct spi_board_info *sdev)
{
    struct spi_board_info *new_dev;

    if (spi_next_dev == MAX_SCU_SPI) {
        pr_err("too many SCU SPI devices");
        return;
    }

    new_dev = kzalloc(sizeof(*sdev), GFP_KERNEL);
    if (!new_dev) {
        pr_err("failed to alloc mem for delayed spi dev %s\n",
            sdev->modalias);
        return;
    }
    memcpy(new_dev, sdev, sizeof(*sdev));

    spi_devs[spi_next_dev++] = new_dev;
}

static void __init intel_scu_i2c_device_register(int bus,
                        struct i2c_board_info *idev)
{
    struct i2c_board_info *new_dev;

    if (i2c_next_dev == MAX_SCU_I2C) {
        pr_err("too many SCU I2C devices");
        return;
    }

    new_dev = kzalloc(sizeof(*idev), GFP_KERNEL);
    if (!new_dev) {
        pr_err("failed to alloc mem for delayed i2c dev %s\n",
            idev->type);
        return;
    }
    memcpy(new_dev, idev, sizeof(*idev));

    i2c_bus[i2c_next_dev] = bus;
    i2c_devs[i2c_next_dev++] = new_dev;
}

BLOCKING_NOTIFIER_HEAD(intel_scu_notifier);
EXPORT_SYMBOL_GPL(intel_scu_notifier);

/* Called by IPC driver */
void __devinit intel_scu_devices_create(void)
{
    int i;

    for (i = 0; i < ipc_next_dev; i++)
        platform_device_add(ipc_devs[i]);

    for (i = 0; i < spi_next_dev; i++)
        spi_register_board_info(spi_devs[i], 1);

    for (i = 0; i < i2c_next_dev; i++) {
        struct i2c_adapter *adapter;
        struct i2c_client *client;

        adapter = i2c_get_adapter(i2c_bus[i]);
        if (adapter) {
            client = i2c_new_device(adapter, i2c_devs[i]);
            if (!client)
                pr_err("can't create i2c device %s\n",
                    i2c_devs[i]->type);
        } else
            i2c_register_board_info(i2c_bus[i], i2c_devs[i], 1);
    }
    intel_scu_notifier_post(SCU_AVAILABLE, NULL);
}
EXPORT_SYMBOL_GPL(intel_scu_devices_create);

/* Called by IPC driver */
void intel_scu_devices_destroy(void)
{
    int i;

    intel_scu_notifier_post(SCU_DOWN, NULL);

    for (i = 0; i < ipc_next_dev; i++)
        platform_device_del(ipc_devs[i]);
}
EXPORT_SYMBOL_GPL(intel_scu_devices_destroy);

static void __init install_irq_resource(struct platform_device *pdev, int irq)
{
    /* Single threaded */
    static struct resource __initdata res = {
        .name = "IRQ",
        .flags = IORESOURCE_IRQ,
    };
    res.start = irq;
    platform_device_add_resources(pdev, &res, 1);
}

static void __init sfi_handle_ipc_dev(struct sfi_device_table_entry *entry)
{
    const struct devs_id *dev = device_ids;
    struct platform_device *pdev;
    void *pdata = NULL;

    while (dev->name[0]) {
        if (dev->type == SFI_DEV_TYPE_IPC &&
            !strncmp(dev->name, entry->name, SFI_NAME_LEN)) {
            pdata = dev->get_platform_data(entry);
            break;
        }
        dev++;
    }

    /*
     * On Medfield the platform device creation is handled by the MSIC
     * MFD driver so we don't need to do it here.
     */
    if (mrst_has_msic())
        return;

    pdev = platform_device_alloc(entry->name, 0);
    if (pdev == NULL) {
        pr_err("out of memory for SFI platform device '%s'.\n",
            entry->name);
        return;
    }
    install_irq_resource(pdev, entry->irq);

    pdev->dev.platform_data = pdata;
    intel_scu_device_register(pdev);
}

static void __init sfi_handle_spi_dev(struct spi_board_info *spi_info)
{
    const struct devs_id *dev = device_ids;
    void *pdata = NULL;

    while (dev->name[0]) {
        if (dev->type == SFI_DEV_TYPE_SPI &&
                !strncmp(dev->name, spi_info->modalias, SFI_NAME_LEN)) {
            pdata = dev->get_platform_data(spi_info);
            break;
        }
        dev++;
    }
    spi_info->platform_data = pdata;
    if (dev->delay)
        intel_scu_spi_device_register(spi_info);
    else
        spi_register_board_info(spi_info, 1);
}

static void __init sfi_handle_i2c_dev(int bus, struct i2c_board_info *i2c_info)
{
    const struct devs_id *dev = device_ids;
    void *pdata = NULL;

    while (dev->name[0]) {
        if (dev->type == SFI_DEV_TYPE_I2C &&
            !strncmp(dev->name, i2c_info->type, SFI_NAME_LEN)) {
            pdata = dev->get_platform_data(i2c_info);
            break;
        }
        dev++;
    }
    i2c_info->platform_data = pdata;

    if (dev->delay)
        intel_scu_i2c_device_register(bus, i2c_info);
    else
        i2c_register_board_info(bus, i2c_info, 1);
 }


static int __init sfi_parse_devs(struct sfi_table_header *table)
{
    struct sfi_table_simple *sb;
    struct sfi_device_table_entry *pentry;
    struct spi_board_info spi_info;
    struct i2c_board_info i2c_info;
    int num, i, bus;
    int ioapic;
    struct io_apic_irq_attr irq_attr;

    sb = (struct sfi_table_simple *)table;
    num = SFI_GET_NUM_ENTRIES(sb, struct sfi_device_table_entry);
    pentry = (struct sfi_device_table_entry *)sb->pentry;

    for (i = 0; i < num; i++, pentry++) {
        int irq = pentry->irq;

        if (irq != (u8)0xff) { /* native RTE case */
            /* these SPI2 devices are not exposed to system as PCI
             * devices, but they have separate RTE entry in IOAPIC
             * so we have to enable them one by one here
             */
            ioapic = mp_find_ioapic(irq);
            irq_attr.ioapic = ioapic;
            irq_attr.ioapic_pin = irq;
            irq_attr.trigger = 1;
            irq_attr.polarity = 1;
            io_apic_set_pci_routing(NULL, irq, &irq_attr);
        } else
            irq = 0; /* No irq */

        switch (pentry->type) {
        case SFI_DEV_TYPE_IPC:
            pr_debug("info[%2d]: IPC bus, name = %16.16s, "
                "irq = 0x%2x\n", i, pentry->name, pentry->irq);
            sfi_handle_ipc_dev(pentry);
            break;
        case SFI_DEV_TYPE_SPI:
            memset(&spi_info, 0, sizeof(spi_info));
            strncpy(spi_info.modalias, pentry->name, SFI_NAME_LEN);
            spi_info.irq = irq;
            spi_info.bus_num = pentry->host_num;
            spi_info.chip_select = pentry->addr;
            spi_info.max_speed_hz = pentry->max_freq;
            pr_debug("info[%2d]: SPI bus = %d, name = %16.16s, "
                "irq = 0x%2x, max_freq = %d, cs = %d\n", i,
                spi_info.bus_num,
                spi_info.modalias,
                spi_info.irq,
                spi_info.max_speed_hz,
                spi_info.chip_select);
            sfi_handle_spi_dev(&spi_info);
            break;
        case SFI_DEV_TYPE_I2C:
            memset(&i2c_info, 0, sizeof(i2c_info));
            bus = pentry->host_num;
            strncpy(i2c_info.type, pentry->name, SFI_NAME_LEN);
            i2c_info.irq = irq;
            i2c_info.addr = pentry->addr;
            pr_debug("info[%2d]: I2C bus = %d, name = %16.16s, "
                "irq = 0x%2x, addr = 0x%x\n", i, bus,
                i2c_info.type,
                i2c_info.irq,
                i2c_info.addr);
            sfi_handle_i2c_dev(bus, &i2c_info);
            break;
        case SFI_DEV_TYPE_UART:
        case SFI_DEV_TYPE_HSI:
        default:
            ;
        }
    }
    return 0;
}

static int __init mrst_platform_init(void)
{
    sfi_table_parse(SFI_SIG_GPIO, NULL, NULL, sfi_parse_gpio);
    sfi_table_parse(SFI_SIG_DEVS, NULL, NULL, sfi_parse_devs);
    return 0;
}
arch_initcall(mrst_platform_init);

/*
 * we will search these buttons in SFI GPIO table (by name)
 * and register them dynamically. Please add all possible
 * buttons here, we will shrink them if no GPIO found.
 */
static struct gpio_keys_button gpio_button[] = {
    {KEY_POWER,     -1, 1, "power_btn", EV_KEY, 0, 3000},
    {KEY_PROG1,     -1, 1, "prog_btn1", EV_KEY, 0, 20},
    {KEY_PROG2,     -1, 1, "prog_btn2", EV_KEY, 0, 20},
    {SW_LID,        -1, 1, "lid_switch",    EV_SW,  0, 20},
    {KEY_VOLUMEUP,      -1, 1, "vol_up",    EV_KEY, 0, 20},
    {KEY_VOLUMEDOWN,    -1, 1, "vol_down",  EV_KEY, 0, 20},
    {KEY_CAMERA,        -1, 1, "camera_full",   EV_KEY, 0, 20},
    {KEY_CAMERA_FOCUS,  -1, 1, "camera_half",   EV_KEY, 0, 20},
    {SW_KEYPAD_SLIDE,   -1, 1, "MagSw1",    EV_SW,  0, 20},
    {SW_KEYPAD_SLIDE,   -1, 1, "MagSw2",    EV_SW,  0, 20},
};

static struct gpio_keys_platform_data mrst_gpio_keys = {
    .buttons    = gpio_button,
    .rep        = 1,
    .nbuttons   = -1, /* will fill it after search */
};

static struct platform_device pb_device = {
    .name       = "gpio-keys",
    .id     = -1,
    .dev        = {
        .platform_data  = &mrst_gpio_keys,
    },
};

/*
 * Shrink the non-existent buttons, register the gpio button
 * device if there is some
 */
static int __init pb_keys_init(void)
{
    struct gpio_keys_button *gb = gpio_button;
    int i, num, good = 0;

    num = sizeof(gpio_button) / sizeof(struct gpio_keys_button);
    for (i = 0; i < num; i++) {
        gb[i].gpio = get_gpio_by_name(gb[i].desc);
        pr_debug("info[%2d]: name = %s, gpio = %d\n", i, gb[i].desc, gb[i].gpio);
        if (gb[i].gpio == -1)
            continue;

        if (i != good)
            gb[good] = gb[i];
        good++;
    }

    if (good) {
        mrst_gpio_keys.nbuttons = good;
        return platform_device_register(&pb_device);
    }
    return 0;
}
late_initcall(pb_keys_init);