552 lines
13 KiB
C
552 lines
13 KiB
C
/*
|
|
* This file is part of the coreboot project.
|
|
*
|
|
* Copyright 2013 Google Inc.
|
|
*
|
|
* 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 <arch/io.h>
|
|
#include <console/console.h>
|
|
#include <delay.h>
|
|
#include <device/device.h>
|
|
#include <device/resource.h>
|
|
#include <device/pci.h>
|
|
#include <stdint.h>
|
|
#include <reg_script.h>
|
|
|
|
#if CONFIG_ARCH_X86
|
|
#include <cpu/x86/msr.h>
|
|
#endif
|
|
|
|
#if CONFIG_SOC_INTEL_BAYTRAIL
|
|
#include <baytrail/iosf.h>
|
|
#endif
|
|
|
|
#define POLL_DELAY 100 /* 100us */
|
|
#if defined(__PRE_RAM__)
|
|
#define EMPTY_DEV 0
|
|
#else
|
|
#define EMPTY_DEV NULL
|
|
#endif
|
|
|
|
struct reg_script_context {
|
|
device_t dev;
|
|
struct resource *res;
|
|
const struct reg_script *step;
|
|
};
|
|
|
|
static inline void reg_script_set_dev(struct reg_script_context *ctx,
|
|
device_t dev)
|
|
{
|
|
ctx->dev = dev;
|
|
ctx->res = NULL;
|
|
}
|
|
|
|
static inline void reg_script_set_step(struct reg_script_context *ctx,
|
|
const struct reg_script *step)
|
|
{
|
|
ctx->step = step;
|
|
}
|
|
|
|
static inline const struct reg_script *
|
|
reg_script_get_step(struct reg_script_context *ctx)
|
|
{
|
|
return ctx->step;
|
|
}
|
|
|
|
static struct resource *reg_script_get_resource(struct reg_script_context *ctx)
|
|
{
|
|
#if defined(__PRE_RAM__)
|
|
return NULL;
|
|
#else
|
|
struct resource *res;
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
res = ctx->res;
|
|
|
|
if (res != NULL && res->index == step->res_index)
|
|
return res;
|
|
|
|
res = find_resource(ctx->dev, step->res_index);
|
|
ctx->res = res;
|
|
return res;
|
|
#endif
|
|
}
|
|
|
|
static uint32_t reg_script_read_pci(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->size) {
|
|
case REG_SCRIPT_SIZE_8:
|
|
return pci_read_config8(ctx->dev, step->reg);
|
|
case REG_SCRIPT_SIZE_16:
|
|
return pci_read_config16(ctx->dev, step->reg);
|
|
case REG_SCRIPT_SIZE_32:
|
|
return pci_read_config32(ctx->dev, step->reg);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static void reg_script_write_pci(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->size) {
|
|
case REG_SCRIPT_SIZE_8:
|
|
pci_write_config8(ctx->dev, step->reg, step->value);
|
|
break;
|
|
case REG_SCRIPT_SIZE_16:
|
|
pci_write_config16(ctx->dev, step->reg, step->value);
|
|
break;
|
|
case REG_SCRIPT_SIZE_32:
|
|
pci_write_config32(ctx->dev, step->reg, step->value);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static uint32_t reg_script_read_io(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->size) {
|
|
case REG_SCRIPT_SIZE_8:
|
|
return inb(step->reg);
|
|
case REG_SCRIPT_SIZE_16:
|
|
return inw(step->reg);
|
|
case REG_SCRIPT_SIZE_32:
|
|
return inl(step->reg);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static void reg_script_write_io(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->size) {
|
|
case REG_SCRIPT_SIZE_8:
|
|
outb(step->value, step->reg);
|
|
break;
|
|
case REG_SCRIPT_SIZE_16:
|
|
outw(step->value, step->reg);
|
|
break;
|
|
case REG_SCRIPT_SIZE_32:
|
|
outl(step->value, step->reg);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static uint32_t reg_script_read_mmio(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->size) {
|
|
case REG_SCRIPT_SIZE_8:
|
|
return read8(step->reg);
|
|
case REG_SCRIPT_SIZE_16:
|
|
return read16(step->reg);
|
|
case REG_SCRIPT_SIZE_32:
|
|
return read32(step->reg);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static void reg_script_write_mmio(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->size) {
|
|
case REG_SCRIPT_SIZE_8:
|
|
write8(step->reg, step->value);
|
|
break;
|
|
case REG_SCRIPT_SIZE_16:
|
|
write16(step->reg, step->value);
|
|
break;
|
|
case REG_SCRIPT_SIZE_32:
|
|
write32(step->reg, step->value);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static uint32_t reg_script_read_res(struct reg_script_context *ctx)
|
|
{
|
|
struct resource *res;
|
|
uint32_t val = 0;
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
res = reg_script_get_resource(ctx);
|
|
|
|
if (res == NULL)
|
|
return val;
|
|
|
|
if (res->flags & IORESOURCE_IO) {
|
|
const struct reg_script io_step = {
|
|
.size = step->size,
|
|
.reg = res->base + step->reg,
|
|
};
|
|
reg_script_set_step(ctx, &io_step);
|
|
val = reg_script_read_io(ctx);
|
|
}
|
|
else if (res->flags & IORESOURCE_MEM) {
|
|
const struct reg_script mmio_step = {
|
|
.size = step->size,
|
|
.reg = res->base + step->reg,
|
|
};
|
|
reg_script_set_step(ctx, &mmio_step);
|
|
val = reg_script_read_mmio(ctx);
|
|
}
|
|
reg_script_set_step(ctx, step);
|
|
return val;
|
|
}
|
|
|
|
static void reg_script_write_res(struct reg_script_context *ctx)
|
|
{
|
|
struct resource *res;
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
res = reg_script_get_resource(ctx);
|
|
|
|
if (res == NULL)
|
|
return;
|
|
|
|
if (res->flags & IORESOURCE_IO) {
|
|
const struct reg_script io_step = {
|
|
.size = step->size,
|
|
.reg = res->base + step->reg,
|
|
.value = step->value,
|
|
};
|
|
reg_script_set_step(ctx, &io_step);
|
|
reg_script_write_io(ctx);
|
|
}
|
|
else if (res->flags & IORESOURCE_MEM) {
|
|
const struct reg_script mmio_step = {
|
|
.size = step->size,
|
|
.reg = res->base + step->reg,
|
|
.value = step->value,
|
|
};
|
|
reg_script_set_step(ctx, &mmio_step);
|
|
reg_script_write_mmio(ctx);
|
|
}
|
|
reg_script_set_step(ctx, step);
|
|
}
|
|
|
|
static uint32_t reg_script_read_iosf(struct reg_script_context *ctx)
|
|
{
|
|
#if CONFIG_SOC_INTEL_BAYTRAIL
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->id) {
|
|
case IOSF_PORT_AUNIT:
|
|
return iosf_aunit_read(step->reg);
|
|
case IOSF_PORT_CPU_BUS:
|
|
return iosf_cpu_bus_read(step->reg);
|
|
case IOSF_PORT_BUNIT:
|
|
return iosf_bunit_read(step->reg);
|
|
case IOSF_PORT_DUNIT_CH0:
|
|
return iosf_dunit_ch0_read(step->reg);
|
|
case IOSF_PORT_PMC:
|
|
return iosf_punit_read(step->reg);
|
|
case IOSF_PORT_USBPHY:
|
|
return iosf_usbphy_read(step->reg);
|
|
case IOSF_PORT_SEC:
|
|
return iosf_sec_read(step->reg);
|
|
case IOSF_PORT_0x45:
|
|
return iosf_port45_read(step->reg);
|
|
case IOSF_PORT_0x46:
|
|
return iosf_port46_read(step->reg);
|
|
case IOSF_PORT_0x47:
|
|
return iosf_port47_read(step->reg);
|
|
case IOSF_PORT_SCORE:
|
|
return iosf_score_read(step->reg);
|
|
case IOSF_PORT_0x55:
|
|
return iosf_port55_read(step->reg);
|
|
case IOSF_PORT_0x58:
|
|
return iosf_port58_read(step->reg);
|
|
case IOSF_PORT_0x59:
|
|
return iosf_port59_read(step->reg);
|
|
case IOSF_PORT_0x5a:
|
|
return iosf_port5a_read(step->reg);
|
|
case IOSF_PORT_USHPHY:
|
|
return iosf_ushphy_read(step->reg);
|
|
case IOSF_PORT_SCC:
|
|
return iosf_scc_read(step->reg);
|
|
case IOSF_PORT_LPSS:
|
|
return iosf_lpss_read(step->reg);
|
|
case IOSF_PORT_0xa2:
|
|
return iosf_porta2_read(step->reg);
|
|
case IOSF_PORT_CCU:
|
|
return iosf_ccu_read(step->reg);
|
|
case IOSF_PORT_SSUS:
|
|
return iosf_ssus_read(step->reg);
|
|
default:
|
|
printk(BIOS_DEBUG, "No read support for IOSF port 0x%x.\n",
|
|
step->id);
|
|
break;
|
|
}
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
static void reg_script_write_iosf(struct reg_script_context *ctx)
|
|
{
|
|
#if CONFIG_SOC_INTEL_BAYTRAIL
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->id) {
|
|
case IOSF_PORT_AUNIT:
|
|
iosf_aunit_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_CPU_BUS:
|
|
iosf_cpu_bus_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_BUNIT:
|
|
iosf_bunit_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_DUNIT_CH0:
|
|
iosf_dunit_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_PMC:
|
|
iosf_punit_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_USBPHY:
|
|
iosf_usbphy_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_SEC:
|
|
iosf_sec_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0x45:
|
|
iosf_port45_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0x46:
|
|
iosf_port46_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0x47:
|
|
iosf_port47_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_SCORE:
|
|
iosf_score_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0x55:
|
|
iosf_port55_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0x58:
|
|
iosf_port58_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0x59:
|
|
iosf_port59_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0x5a:
|
|
iosf_port5a_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_USHPHY:
|
|
iosf_ushphy_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_SCC:
|
|
iosf_scc_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_LPSS:
|
|
iosf_lpss_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_0xa2:
|
|
iosf_porta2_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_CCU:
|
|
iosf_ccu_write(step->reg, step->value);
|
|
break;
|
|
case IOSF_PORT_SSUS:
|
|
iosf_ssus_write(step->reg, step->value);
|
|
break;
|
|
default:
|
|
printk(BIOS_DEBUG, "No write support for IOSF port 0x%x.\n",
|
|
step->id);
|
|
break;
|
|
}
|
|
#endif
|
|
}
|
|
|
|
static uint64_t reg_script_read_msr(struct reg_script_context *ctx)
|
|
{
|
|
#if CONFIG_ARCH_X86
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
msr_t msr = rdmsr(step->reg);
|
|
uint64_t value = msr.hi;
|
|
value = msr.hi;
|
|
value <<= 32;
|
|
value |= msr.lo;
|
|
return value;
|
|
#endif
|
|
}
|
|
|
|
static void reg_script_write_msr(struct reg_script_context *ctx)
|
|
{
|
|
#if CONFIG_ARCH_X86
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
msr_t msr;
|
|
msr.hi = step->value >> 32;
|
|
msr.lo = step->value & 0xffffffff;
|
|
wrmsr(step->reg, msr);
|
|
#endif
|
|
}
|
|
|
|
static uint64_t reg_script_read(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->type) {
|
|
case REG_SCRIPT_TYPE_PCI:
|
|
return reg_script_read_pci(ctx);
|
|
case REG_SCRIPT_TYPE_IO:
|
|
return reg_script_read_io(ctx);
|
|
case REG_SCRIPT_TYPE_MMIO:
|
|
return reg_script_read_mmio(ctx);
|
|
case REG_SCRIPT_TYPE_RES:
|
|
return reg_script_read_res(ctx);
|
|
case REG_SCRIPT_TYPE_IOSF:
|
|
return reg_script_read_iosf(ctx);
|
|
case REG_SCRIPT_TYPE_MSR:
|
|
return reg_script_read_msr(ctx);
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static void reg_script_write(struct reg_script_context *ctx)
|
|
{
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
switch (step->type) {
|
|
case REG_SCRIPT_TYPE_PCI:
|
|
reg_script_write_pci(ctx);
|
|
break;
|
|
case REG_SCRIPT_TYPE_IO:
|
|
reg_script_write_io(ctx);
|
|
break;
|
|
case REG_SCRIPT_TYPE_MMIO:
|
|
reg_script_write_mmio(ctx);
|
|
break;
|
|
case REG_SCRIPT_TYPE_RES:
|
|
reg_script_write_res(ctx);
|
|
break;
|
|
case REG_SCRIPT_TYPE_IOSF:
|
|
reg_script_write_iosf(ctx);
|
|
break;
|
|
case REG_SCRIPT_TYPE_MSR:
|
|
reg_script_write_msr(ctx);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void reg_script_rmw(struct reg_script_context *ctx)
|
|
{
|
|
uint64_t value;
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
struct reg_script write_step = *step;
|
|
|
|
value = reg_script_read(ctx);
|
|
value &= step->mask;
|
|
value |= step->value;
|
|
write_step.value = value;
|
|
reg_script_set_step(ctx, &write_step);
|
|
reg_script_write(ctx);
|
|
reg_script_set_step(ctx, step);
|
|
}
|
|
|
|
/* In order to easily chain scripts together handle the REG_SCRIPT_COMMAND_NEXT
|
|
* as recursive call with a new context that has the same dev and resource
|
|
* as the previous one. That will run to completion and then move on to the
|
|
* next step of the previous context. */
|
|
static void reg_script_run_next(struct reg_script_context *ctx,
|
|
const struct reg_script *step);
|
|
|
|
|
|
static void reg_script_run_step(struct reg_script_context *ctx,
|
|
const struct reg_script *step)
|
|
{
|
|
uint64_t value = 0, try;
|
|
|
|
switch (step->command) {
|
|
case REG_SCRIPT_COMMAND_READ:
|
|
(void)reg_script_read(ctx);
|
|
break;
|
|
case REG_SCRIPT_COMMAND_WRITE:
|
|
reg_script_write(ctx);
|
|
break;
|
|
case REG_SCRIPT_COMMAND_RMW:
|
|
reg_script_rmw(ctx);
|
|
break;
|
|
case REG_SCRIPT_COMMAND_POLL:
|
|
for (try = 0; try < step->timeout; try += POLL_DELAY) {
|
|
value = reg_script_read(ctx) & step->mask;
|
|
if (value == step->value)
|
|
break;
|
|
udelay(POLL_DELAY);
|
|
}
|
|
if (try >= step->timeout)
|
|
printk(BIOS_WARNING, "%s: POLL timeout waiting for "
|
|
"0x%x to be 0x%lx, got 0x%lx\n", __func__,
|
|
step->reg, (unsigned long)step->value,
|
|
(unsigned long)value);
|
|
break;
|
|
case REG_SCRIPT_COMMAND_SET_DEV:
|
|
reg_script_set_dev(ctx, step->dev);
|
|
break;
|
|
case REG_SCRIPT_COMMAND_NEXT:
|
|
reg_script_run_next(ctx, step->next);
|
|
break;
|
|
default:
|
|
printk(BIOS_WARNING, "Invalid command: %08x\n",
|
|
step->command);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void reg_script_run_with_context(struct reg_script_context *ctx)
|
|
{
|
|
while (1) {
|
|
const struct reg_script *step = reg_script_get_step(ctx);
|
|
|
|
if (step->command == REG_SCRIPT_COMMAND_END)
|
|
break;
|
|
|
|
reg_script_run_step(ctx, step);
|
|
reg_script_set_step(ctx, step + 1);
|
|
}
|
|
}
|
|
|
|
static void reg_script_run_next(struct reg_script_context *prev_ctx,
|
|
const struct reg_script *step)
|
|
{
|
|
struct reg_script_context ctx;
|
|
|
|
/* Use prev context as a basis but start at a new step. */
|
|
ctx = *prev_ctx;
|
|
reg_script_set_step(&ctx, step);
|
|
reg_script_run_with_context(&ctx);
|
|
}
|
|
|
|
void reg_script_run_on_dev(device_t dev, const struct reg_script *step)
|
|
{
|
|
struct reg_script_context ctx;
|
|
|
|
reg_script_set_dev(&ctx, dev);
|
|
reg_script_set_step(&ctx, step);
|
|
reg_script_run_with_context(&ctx);
|
|
}
|
|
|
|
void reg_script_run(const struct reg_script *step)
|
|
{
|
|
reg_script_run_on_dev(EMPTY_DEV, step);
|
|
}
|