blob: 2455d1f656739f5388ca89fe4f5a86eafa0defde [file] [log] [blame]
/*
* linux/arch/arm/kernel/arch_timer.c
*
* Copyright (C) 2011 ARM Ltd.
* All Rights Reserved
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License version 2 as
* published by the Free Software Foundation.
*/
#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/delay.h>
#include <linux/timex.h>
#include <linux/device.h>
#include <linux/smp.h>
#include <linux/cpu.h>
#include <linux/jiffies.h>
#include <linux/clockchips.h>
#include <linux/interrupt.h>
#include <linux/of_irq.h>
#include <linux/of_address.h>
#include <linux/io.h>
#include <linux/irq.h>
#include <linux/export.h>
#include <asm/cputype.h>
#include <asm/localtimer.h>
#include <asm/arch_timer.h>
#include <asm/sched_clock.h>
#include <asm/hardware/gic.h>
#include <asm/system_info.h>
static unsigned long arch_timer_rate;
static int arch_timer_ppi;
static int arch_timer_ppi2;
static int is_irq_percpu;
static struct clock_event_device __percpu **arch_timer_evt;
static void __iomem *timer_base;
static u32 timer_reg_read_cp15(int reg);
static void timer_reg_write_cp15(int reg, u32 val);
static inline cycle_t counter_get_cntpct_cp15(void);
static inline cycle_t counter_get_cntvct_cp15(void);
static u32 timer_reg_read_mem(int reg);
static void timer_reg_write_mem(int reg, u32 val);
static inline cycle_t counter_get_cntpct_mem(void);
static inline cycle_t counter_get_cntvct_mem(void);
struct arch_timer_operations {
void (*reg_write)(int, u32);
u32 (*reg_read)(int);
cycle_t (*get_cntpct)(void);
cycle_t (*get_cntvct)(void);
};
static struct arch_timer_operations arch_timer_ops_cp15 = {
.reg_read = &timer_reg_read_cp15,
.reg_write = &timer_reg_write_cp15,
.get_cntpct = &counter_get_cntpct_cp15,
.get_cntvct = &counter_get_cntvct_cp15,
};
static struct arch_timer_operations arch_timer_ops_mem = {
.reg_read = &timer_reg_read_mem,
.reg_write = &timer_reg_write_mem,
.get_cntpct = &counter_get_cntpct_mem,
.get_cntvct = &counter_get_cntvct_mem,
};
static struct arch_timer_operations *arch_specific_timer = &arch_timer_ops_cp15;
/*
* Architected system timer support.
*/
#define ARCH_TIMER_CTRL_ENABLE (1 << 0)
#define ARCH_TIMER_CTRL_IT_MASK (1 << 1)
#define ARCH_TIMER_CTRL_IT_STAT (1 << 2)
#define ARCH_TIMER_REG_CTRL 0
#define ARCH_TIMER_REG_FREQ 1
#define ARCH_TIMER_REG_TVAL 2
/* Iomapped Register Offsets */
#define QTIMER_CNTP_LOW_REG 0x000
#define QTIMER_CNTP_HIGH_REG 0x004
#define QTIMER_CNTV_LOW_REG 0x008
#define QTIMER_CNTV_HIGH_REG 0x00C
#define QTIMER_CTRL_REG 0x02C
#define QTIMER_FREQ_REG 0x010
#define QTIMER_CNTP_TVAL_REG 0x028
#define QTIMER_CNTV_TVAL_REG 0x038
static void timer_reg_write_mem(int reg, u32 val)
{
switch (reg) {
case ARCH_TIMER_REG_CTRL:
__raw_writel(val, timer_base + QTIMER_CTRL_REG);
break;
case ARCH_TIMER_REG_TVAL:
__raw_writel(val, timer_base + QTIMER_CNTP_TVAL_REG);
break;
}
}
static void timer_reg_write_cp15(int reg, u32 val)
{
switch (reg) {
case ARCH_TIMER_REG_CTRL:
asm volatile("mcr p15, 0, %0, c14, c2, 1" : : "r" (val));
break;
case ARCH_TIMER_REG_TVAL:
asm volatile("mcr p15, 0, %0, c14, c2, 0" : : "r" (val));
break;
}
isb();
}
static u32 timer_reg_read_mem(int reg)
{
u32 val;
switch (reg) {
case ARCH_TIMER_REG_CTRL:
val = __raw_readl(timer_base + QTIMER_CTRL_REG);
break;
case ARCH_TIMER_REG_FREQ:
val = __raw_readl(timer_base + QTIMER_FREQ_REG);
break;
case ARCH_TIMER_REG_TVAL:
val = __raw_readl(timer_base + QTIMER_CNTP_TVAL_REG);
break;
default:
BUG();
}
return val;
}
static u32 timer_reg_read_cp15(int reg)
{
u32 val;
switch (reg) {
case ARCH_TIMER_REG_CTRL:
asm volatile("mrc p15, 0, %0, c14, c2, 1" : "=r" (val));
break;
case ARCH_TIMER_REG_FREQ:
asm volatile("mrc p15, 0, %0, c14, c0, 0" : "=r" (val));
break;
case ARCH_TIMER_REG_TVAL:
asm volatile("mrc p15, 0, %0, c14, c2, 0" : "=r" (val));
break;
default:
BUG();
}
return val;
}
static irqreturn_t arch_timer_handler(int irq, void *dev_id)
{
struct clock_event_device *evt;
unsigned long ctrl;
ctrl = arch_specific_timer->reg_read(ARCH_TIMER_REG_CTRL);
if (ctrl & ARCH_TIMER_CTRL_IT_STAT) {
ctrl |= ARCH_TIMER_CTRL_IT_MASK;
arch_specific_timer->reg_write(ARCH_TIMER_REG_CTRL,
ctrl);
evt = *__this_cpu_ptr(arch_timer_evt);
evt->event_handler(evt);
return IRQ_HANDLED;
}
return IRQ_NONE;
}
static void arch_timer_disable(void)
{
unsigned long ctrl;
ctrl = arch_specific_timer->reg_read(ARCH_TIMER_REG_CTRL);
ctrl &= ~ARCH_TIMER_CTRL_ENABLE;
arch_specific_timer->reg_write(ARCH_TIMER_REG_CTRL, ctrl);
}
static void arch_timer_set_mode(enum clock_event_mode mode,
struct clock_event_device *clk)
{
unsigned long ctrl;
switch (mode) {
case CLOCK_EVT_MODE_UNUSED:
case CLOCK_EVT_MODE_SHUTDOWN:
arch_timer_disable();
break;
case CLOCK_EVT_MODE_ONESHOT:
ctrl = arch_specific_timer->reg_read(ARCH_TIMER_REG_CTRL);
ctrl |= ARCH_TIMER_CTRL_ENABLE;
arch_specific_timer->reg_write(ARCH_TIMER_REG_CTRL, ctrl);
default:
break;
}
}
static int arch_timer_set_next_event(unsigned long evt,
struct clock_event_device *unused)
{
unsigned long ctrl;
ctrl = arch_specific_timer->reg_read(ARCH_TIMER_REG_CTRL);
ctrl &= ~ARCH_TIMER_CTRL_IT_MASK;
arch_specific_timer->reg_write(ARCH_TIMER_REG_CTRL, ctrl);
arch_specific_timer->reg_write(ARCH_TIMER_REG_TVAL, evt);
return 0;
}
static int __cpuinit arch_timer_setup(struct clock_event_device *clk)
{
/* setup clock event only once for CPU 0 */
if (!smp_processor_id() && clk->irq == arch_timer_ppi)
return 0;
/* Be safe... */
arch_timer_disable();
clk->features = CLOCK_EVT_FEAT_ONESHOT;
clk->name = "arch_sys_timer";
clk->rating = 450;
clk->set_mode = arch_timer_set_mode;
clk->set_next_event = arch_timer_set_next_event;
clk->irq = arch_timer_ppi;
clockevents_config_and_register(clk, arch_timer_rate,
0xf, 0x7fffffff);
*__this_cpu_ptr(arch_timer_evt) = clk;
enable_percpu_irq(clk->irq, 0);
if (arch_timer_ppi2)
enable_percpu_irq(arch_timer_ppi2, 0);
return 0;
}
/* Is the optional system timer available? */
static int local_timer_is_architected(void)
{
return (cpu_architecture() >= CPU_ARCH_ARMv7) &&
((read_cpuid_ext(CPUID_EXT_PFR1) >> 16) & 0xf) == 1;
}
static int arch_timer_available(void)
{
unsigned long freq;
if (arch_timer_rate == 0) {
arch_specific_timer->reg_write(ARCH_TIMER_REG_CTRL, 0);
freq = arch_specific_timer->reg_read(ARCH_TIMER_REG_FREQ);
/* Check the timer frequency. */
if (freq == 0) {
pr_warn("Architected timer frequency not available\n");
return -EINVAL;
}
arch_timer_rate = freq;
pr_info("Architected local timer running at %lu.%02luMHz.\n",
freq / 1000000, (freq / 10000) % 100);
}
return 0;
}
static inline cycle_t counter_get_cntpct_mem(void)
{
u32 cvall, cvalh, thigh;
do {
cvalh = __raw_readl(timer_base + QTIMER_CNTP_HIGH_REG);
cvall = __raw_readl(timer_base + QTIMER_CNTP_LOW_REG);
thigh = __raw_readl(timer_base + QTIMER_CNTP_HIGH_REG);
} while (cvalh != thigh);
return ((cycle_t) cvalh << 32) | cvall;
}
static inline cycle_t counter_get_cntpct_cp15(void)
{
u32 cvall, cvalh;
asm volatile("mrrc p15, 0, %0, %1, c14" : "=r" (cvall), "=r" (cvalh));
return ((cycle_t) cvalh << 32) | cvall;
}
static inline cycle_t counter_get_cntvct_mem(void)
{
u32 cvall, cvalh, thigh;
do {
cvalh = __raw_readl(timer_base + QTIMER_CNTV_HIGH_REG);
cvall = __raw_readl(timer_base + QTIMER_CNTV_LOW_REG);
thigh = __raw_readl(timer_base + QTIMER_CNTV_HIGH_REG);
} while (cvalh != thigh);
return ((cycle_t) cvalh << 32) | cvall;
}
static inline cycle_t counter_get_cntvct_cp15(void)
{
u32 cvall, cvalh;
asm volatile("mrrc p15, 1, %0, %1, c14" : "=r" (cvall), "=r" (cvalh));
return ((cycle_t) cvalh << 32) | cvall;
}
cycle_t arch_counter_get_cntpct(void)
{
return arch_specific_timer->get_cntpct();
}
EXPORT_SYMBOL(arch_counter_get_cntpct);
static cycle_t arch_counter_read(struct clocksource *cs)
{
return arch_counter_get_cntpct();
}
#ifdef ARCH_HAS_READ_CURRENT_TIMER
int read_current_timer(unsigned long *timer_val)
{
*timer_val = (unsigned long)arch_specific_timer->get_cntpct();
return 0;
}
#endif
static struct clocksource clocksource_counter = {
.name = "arch_sys_counter",
.rating = 400,
.read = arch_counter_read,
.mask = CLOCKSOURCE_MASK(56),
.flags = CLOCK_SOURCE_IS_CONTINUOUS,
};
static u32 arch_counter_get_cntvct32(void)
{
cycle_t cntvct;
cntvct = arch_specific_timer->get_cntvct();
/*
* The sched_clock infrastructure only knows about counters
* with at most 32bits. Forget about the upper 24 bits for the
* time being...
*/
return (u32)(cntvct & (u32)~0);
}
static u32 notrace arch_timer_update_sched_clock(void)
{
return arch_counter_get_cntvct32();
}
static void __cpuinit arch_timer_stop(struct clock_event_device *clk)
{
pr_debug("arch_timer_teardown disable IRQ%d cpu #%d\n",
clk->irq, smp_processor_id());
disable_percpu_irq(clk->irq);
if (arch_timer_ppi2)
disable_percpu_irq(arch_timer_ppi2);
arch_timer_set_mode(CLOCK_EVT_MODE_UNUSED, clk);
}
static struct local_timer_ops arch_timer_ops __cpuinitdata = {
.setup = arch_timer_setup,
.stop = arch_timer_stop,
};
static int __init arch_timer_common_register(void)
{
int err;
if (timer_base)
arch_specific_timer = &arch_timer_ops_mem;
else if (!local_timer_is_architected())
return -ENXIO;
err = arch_timer_available();
if (err)
return err;
arch_timer_evt = alloc_percpu(struct clock_event_device *);
if (!arch_timer_evt)
return -ENOMEM;
clocksource_register_hz(&clocksource_counter, arch_timer_rate);
setup_sched_clock(arch_timer_update_sched_clock, 32, arch_timer_rate);
#ifdef ARCH_HAS_READ_CURRENT_TIMER
set_delay_fn(read_current_timer_delay_loop);
#endif
if (is_irq_percpu)
err = request_percpu_irq(arch_timer_ppi, arch_timer_handler,
"arch_timer", arch_timer_evt);
else
err = request_irq(arch_timer_ppi, arch_timer_handler, 0,
"arch_timer", arch_timer_evt);
if (err) {
pr_err("arch_timer: can't register interrupt %d (%d)\n",
arch_timer_ppi, err);
goto out_free;
}
if (arch_timer_ppi2) {
if (is_irq_percpu)
err = request_percpu_irq(arch_timer_ppi2,
arch_timer_handler, "arch_timer",
arch_timer_evt);
else
err = request_irq(arch_timer_ppi2, arch_timer_handler,
0, "arch_timer", arch_timer_evt);
if (err) {
pr_err("arch_timer: can't register interrupt %d (%d)\n",
arch_timer_ppi2, err);
arch_timer_ppi2 = 0;
goto out_free_irq;
}
}
err = local_timer_register(&arch_timer_ops);
if (err)
goto out_free_irq;
percpu_timer_setup();
return 0;
out_free_irq:
free_percpu_irq(arch_timer_ppi, arch_timer_evt);
if (arch_timer_ppi2)
free_percpu_irq(arch_timer_ppi2, arch_timer_evt);
out_free:
free_percpu(arch_timer_evt);
return err;
}
int __init arch_timer_register(struct arch_timer *at)
{
if (at->res[0].start <= 0 || !(at->res[0].flags & IORESOURCE_IRQ))
return -EINVAL;
arch_timer_ppi = at->res[0].start;
if (at->res[1].start > 0 && (at->res[1].flags & IORESOURCE_IRQ))
arch_timer_ppi2 = at->res[1].start;
if (at->res[2].start > 0 && at->res[2].end > 0 &&
(at->res[2].flags & IORESOURCE_MEM))
timer_base = ioremap(at->res[2].start,
resource_size(&at->res[2]));
if (!timer_base) {
pr_err("arch_timer: cant map timer base\n");
return -ENOMEM;
}
return arch_timer_common_register();
}
#ifdef CONFIG_OF
static const struct of_device_id arch_timer_of_match[] __initconst = {
{ .compatible = "arm,armv7-timer", },
{},
};
int __init arch_timer_of_register(void)
{
struct device_node *np;
u32 freq;
int ret;
np = of_find_matching_node(NULL, arch_timer_of_match);
if (!np) {
pr_err("arch_timer: can't find DT node\n");
return -ENODEV;
}
/* Try to determine the frequency from the device tree or CNTFRQ */
if (!of_property_read_u32(np, "clock-frequency", &freq))
arch_timer_rate = freq;
ret = irq_of_parse_and_map(np, 0);
if (ret <= 0) {
pr_err("arch_timer: interrupt not specified in timer node\n");
return -ENODEV;
}
if (of_get_address(np, 0, NULL, NULL)) {
timer_base = of_iomap(np, 0);
if (!timer_base) {
pr_err("arch_timer: cant map timer base\n");
return -ENOMEM;
}
}
if (of_get_property(np, "irq-is-not-percpu", NULL))
is_irq_percpu = 0;
else
is_irq_percpu = 1;
arch_timer_ppi = ret;
ret = irq_of_parse_and_map(np, 1);
if (ret > 0)
arch_timer_ppi2 = ret;
pr_info("arch_timer: found %s irqs %d %d\n",
np->name, arch_timer_ppi, arch_timer_ppi2);
return arch_timer_common_register();
}
#endif