[linux-block.git] / arch / mips / sgi-ip27 / ip27-timer.c

/*
 * Copytight (C) 1999, 2000, 05, 06 Ralf Baechle (ralf@linux-mips.org)
 * Copytight (C) 1999, 2000 Silicon Graphics, Inc.
 */
#include <linux/bcd.h>
#include <linux/clockchips.h>
#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/sched_clock.h>
#include <linux/interrupt.h>
#include <linux/kernel_stat.h>
#include <linux/param.h>
#include <linux/smp.h>
#include <linux/time.h>
#include <linux/timex.h>
#include <linux/mm.h>
#include <linux/platform_device.h>

#include <asm/time.h>
#include <asm/pgtable.h>
#include <asm/sgialib.h>
#include <asm/sn/ioc3.h>
#include <asm/sn/klconfig.h>
#include <asm/sn/arch.h>
#include <asm/sn/addrs.h>
#include <asm/sn/sn_private.h>
#include <asm/sn/sn0/ip27.h>
#include <asm/sn/sn0/hub.h>

#define TICK_SIZE (tick_nsec / 1000)

/* Includes for ioc3_init().  */
#include <asm/sn/types.h>
#include <asm/sn/sn0/addrs.h>
#include <asm/sn/sn0/hubni.h>
#include <asm/sn/sn0/hubio.h>
#include <asm/pci/bridge.h>

static void enable_rt_irq(struct irq_data *d)
{
}

static void disable_rt_irq(struct irq_data *d)
{
}

static struct irq_chip rt_irq_type = {
	.name		= "SN HUB RT timer",
	.irq_mask	= disable_rt_irq,
	.irq_unmask	= enable_rt_irq,
};

static int rt_next_event(unsigned long delta, struct clock_event_device *evt)
{
	unsigned int cpu = smp_processor_id();
	int slice = cputoslice(cpu);
	unsigned long cnt;

	cnt = LOCAL_HUB_L(PI_RT_COUNT);
	cnt += delta;
	LOCAL_HUB_S(PI_RT_COMPARE_A + PI_COUNT_OFFSET * slice, cnt);

	return LOCAL_HUB_L(PI_RT_COUNT) >= cnt ? -ETIME : 0;
}

unsigned int rt_timer_irq;

static DEFINE_PER_CPU(struct clock_event_device, hub_rt_clockevent);
static DEFINE_PER_CPU(char [11], hub_rt_name);

static irqreturn_t hub_rt_counter_handler(int irq, void *dev_id)
{
	unsigned int cpu = smp_processor_id();
	struct clock_event_device *cd = &per_cpu(hub_rt_clockevent, cpu);
	int slice = cputoslice(cpu);

	/*
	 * Ack
	 */
	LOCAL_HUB_S(PI_RT_PEND_A + PI_COUNT_OFFSET * slice, 0);
	cd->event_handler(cd);

	return IRQ_HANDLED;
}

struct irqaction hub_rt_irqaction = {
	.handler	= hub_rt_counter_handler,
	.flags		= IRQF_PERCPU | IRQF_TIMER,
	.name		= "hub-rt",
};

/*
 * This is a hack; we really need to figure these values out dynamically
 *
 * Since 800 ns works very well with various HUB frequencies, such as
 * 360, 380, 390 and 400 MHZ, we use 800 ns rtc cycle time.
 *
 * Ralf: which clock rate is used to feed the counter?
 */
#define NSEC_PER_CYCLE		800
#define CYCLES_PER_SEC		(NSEC_PER_SEC / NSEC_PER_CYCLE)

void hub_rt_clock_event_init(void)
{
	unsigned int cpu = smp_processor_id();
	struct clock_event_device *cd = &per_cpu(hub_rt_clockevent, cpu);
	unsigned char *name = per_cpu(hub_rt_name, cpu);
	int irq = rt_timer_irq;

	sprintf(name, "hub-rt %d", cpu);
	cd->name		= name;
	cd->features		= CLOCK_EVT_FEAT_ONESHOT;
	clockevent_set_clock(cd, CYCLES_PER_SEC);
	cd->max_delta_ns	= clockevent_delta2ns(0xfffffffffffff, cd);
	cd->min_delta_ns	= clockevent_delta2ns(0x300, cd);
	cd->rating		= 200;
	cd->irq			= irq;
	cd->cpumask		= cpumask_of(cpu);
	cd->set_next_event	= rt_next_event;
	clockevents_register_device(cd);
}

static void __init hub_rt_clock_event_global_init(void)
{
	int irq;

	do {
		smp_wmb();
		irq = rt_timer_irq;
		if (irq)
			break;

		irq = allocate_irqno();
		if (irq < 0)
			panic("Allocation of irq number for timer failed");
	} while (xchg(&rt_timer_irq, irq));

	irq_set_chip_and_handler(irq, &rt_irq_type, handle_percpu_irq);
	setup_irq(irq, &hub_rt_irqaction);
}

static u64 hub_rt_read(struct clocksource *cs)
{
	return REMOTE_HUB_L(cputonasid(0), PI_RT_COUNT);
}

struct clocksource hub_rt_clocksource = {
	.name	= "HUB-RT",
	.rating = 200,
	.read	= hub_rt_read,
	.mask	= CLOCKSOURCE_MASK(52),
	.flags	= CLOCK_SOURCE_IS_CONTINUOUS,
};

static u64 notrace hub_rt_read_sched_clock(void)
{
	return REMOTE_HUB_L(cputonasid(0), PI_RT_COUNT);
}

static void __init hub_rt_clocksource_init(void)
{
	struct clocksource *cs = &hub_rt_clocksource;

	clocksource_register_hz(cs, CYCLES_PER_SEC);

	sched_clock_register(hub_rt_read_sched_clock, 52, CYCLES_PER_SEC);
}

void __init plat_time_init(void)
{
	hub_rt_clocksource_init();
	hub_rt_clock_event_global_init();
	hub_rt_clock_event_init();
}

void cpu_time_init(void)
{
	lboard_t *board;
	klcpu_t *cpu;
	int cpuid;

	/* Don't use ARCS.  ARCS is fragile.  Klconfig is simple and sane.  */
	board = find_lboard(KL_CONFIG_INFO(get_nasid()), KLTYPE_IP27);
	if (!board)
		panic("Can't find board info for myself.");

	cpuid = LOCAL_HUB_L(PI_CPU_NUM) ? IP27_CPU0_INDEX : IP27_CPU1_INDEX;
	cpu = (klcpu_t *) KLCF_COMP(board, cpuid);
	if (!cpu)
		panic("No information about myself?");

	printk("CPU %d clock is %dMHz.\n", smp_processor_id(), cpu->cpu_speed);

	set_c0_status(SRB_TIMOCLK);
}

void hub_rtc_init(cnodeid_t cnode)
{

	/*
	 * We only need to initialize the current node.
	 * If this is not the current node then it is a cpuless
	 * node and timeouts will not happen there.
	 */
	if (get_compact_nodeid() == cnode) {
		LOCAL_HUB_S(PI_RT_EN_A, 1);
		LOCAL_HUB_S(PI_RT_EN_B, 1);
		LOCAL_HUB_S(PI_PROF_EN_A, 0);
		LOCAL_HUB_S(PI_PROF_EN_B, 0);
		LOCAL_HUB_S(PI_RT_COUNT, 0);
		LOCAL_HUB_S(PI_RT_PEND_A, 0);
		LOCAL_HUB_S(PI_RT_PEND_B, 0);
	}
}

static int __init sgi_ip27_rtc_devinit(void)
{
	struct resource res;

	memset(&res, 0, sizeof(res));
	res.start = XPHYSADDR(KL_CONFIG_CH_CONS_INFO(master_nasid)->memory_base +
			      IOC3_BYTEBUS_DEV0);
	res.end = res.start + 32767;
	res.flags = IORESOURCE_MEM;

	return IS_ERR(platform_device_register_simple("rtc-m48t35", -1,
						      &res, 1));
}

/*
 * kludge make this a device_initcall after ioc3 resource conflicts
 * are resolved
 */
late_initcall(sgi_ip27_rtc_devinit);
Commit	Line	Data
1da177e4	1	/*
54d0a216	2	* Copytight (C) 1999, 2000, 05, 06 Ralf Baechle (ralf@linux-mips.org)
1da177e4 LT	3	* Copytight (C) 1999, 2000 Silicon Graphics, Inc.
	4	*/
	5	#include <linux/bcd.h>
e887b245	6	#include <linux/clockchips.h>
1da177e4 LT	7	#include <linux/init.h>
	8	#include <linux/kernel.h>
	9	#include <linux/sched.h>
c41cef36	10	#include <linux/sched_clock.h>
1da177e4 LT	11	#include <linux/interrupt.h>
	12	#include <linux/kernel_stat.h>
	13	#include <linux/param.h>
631330f5	14	#include <linux/smp.h>
1da177e4 LT	15	#include <linux/time.h>
	16	#include <linux/timex.h>
	17	#include <linux/mm.h>
3ec066cd	18	#include <linux/platform_device.h>
1da177e4 LT	19
	20	#include <asm/time.h>
	21	#include <asm/pgtable.h>
	22	#include <asm/sgialib.h>
	23	#include <asm/sn/ioc3.h>
1da177e4 LT	24	#include <asm/sn/klconfig.h>
	25	#include <asm/sn/arch.h>
	26	#include <asm/sn/addrs.h>
	27	#include <asm/sn/sn_private.h>
	28	#include <asm/sn/sn0/ip27.h>
	29	#include <asm/sn/sn0/hub.h>
	30
1da177e4 LT	31	#define TICK_SIZE (tick_nsec / 1000)
1da177e4 LT	32
1da177e4 LT	33	/* Includes for ioc3_init(). */
	34	#include <asm/sn/types.h>
	35	#include <asm/sn/sn0/addrs.h>
	36	#include <asm/sn/sn0/hubni.h>
	37	#include <asm/sn/sn0/hubio.h>
	38	#include <asm/pci/bridge.h>
	39
301218df	40	static void enable_rt_irq(struct irq_data *d)
06d428d7 RB	41	{
	42	}
	43
301218df	44	static void disable_rt_irq(struct irq_data *d)
06d428d7 RB	45	{
	46	}
	47
	48	static struct irq_chip rt_irq_type = {
	49	.name = "SN HUB RT timer",
301218df TG	50	.irq_mask = disable_rt_irq,
301218df TG	51	.irq_unmask = enable_rt_irq,
06d428d7 RB	52	};
	53
	54	static int rt_next_event(unsigned long delta, struct clock_event_device *evt)
e887b245 RB	55	{
e887b245 RB	56	unsigned int cpu = smp_processor_id();
c8925297	57	int slice = cputoslice(cpu);
e887b245 RB	58	unsigned long cnt;
	59
	60	cnt = LOCAL_HUB_L(PI_RT_COUNT);
	61	cnt += delta;
725d7b36	62	LOCAL_HUB_S(PI_RT_COMPARE_A + PI_COUNT_OFFSET * slice, cnt);
e887b245 RB	63
	64	return LOCAL_HUB_L(PI_RT_COUNT) >= cnt ? -ETIME : 0;
	65	}
	66
9fcb7059	67	unsigned int rt_timer_irq;
e887b245	68
b32bb803 TB	69	static DEFINE_PER_CPU(struct clock_event_device, hub_rt_clockevent);
	70	static DEFINE_PER_CPU(char [11], hub_rt_name);
	71
06d428d7	72	static irqreturn_t hub_rt_counter_handler(int irq, void *dev_id)
e887b245	73	{
e887b245	74	unsigned int cpu = smp_processor_id();
b32bb803	75	struct clock_event_device *cd = &per_cpu(hub_rt_clockevent, cpu);
725d7b36	76	int slice = cputoslice(cpu);
e887b245	77
725d7b36 RB	78	/*
	79	* Ack
	80	*/
c8925297	81	LOCAL_HUB_S(PI_RT_PEND_A + PI_COUNT_OFFSET * slice, 0);
e887b245 RB	82	cd->event_handler(cd);
	83
	84	return IRQ_HANDLED;
	85	}
	86
06d428d7 RB	87	struct irqaction hub_rt_irqaction = {
06d428d7 RB	88	.handler = hub_rt_counter_handler,
8b5690f8	89	.flags = IRQF_PERCPU \| IRQF_TIMER,
06d428d7	90	.name = "hub-rt",
3c009442 RB	91	};
3c009442 RB	92
e887b245 RB	93	/*
	94	* This is a hack; we really need to figure these values out dynamically
	95	*
	96	* Since 800 ns works very well with various HUB frequencies, such as
	97	* 360, 380, 390 and 400 MHZ, we use 800 ns rtc cycle time.
	98	*
	99	* Ralf: which clock rate is used to feed the counter?
	100	*/
	101	#define NSEC_PER_CYCLE 800
	102	#define CYCLES_PER_SEC (NSEC_PER_SEC / NSEC_PER_CYCLE)
	103
078a55fc	104	void hub_rt_clock_event_init(void)
1da177e4	105	{
e887b245	106	unsigned int cpu = smp_processor_id();
06d428d7 RB	107	struct clock_event_device *cd = &per_cpu(hub_rt_clockevent, cpu);
	108	unsigned char *name = per_cpu(hub_rt_name, cpu);
	109	int irq = rt_timer_irq;
	110
	111	sprintf(name, "hub-rt %d", cpu);
b32bb803 TB	112	cd->name = name;
b32bb803 TB	113	cd->features = CLOCK_EVT_FEAT_ONESHOT;
06d428d7	114	clockevent_set_clock(cd, CYCLES_PER_SEC);
70342287 RB	115	cd->max_delta_ns = clockevent_delta2ns(0xfffffffffffff, cd);
70342287 RB	116	cd->min_delta_ns = clockevent_delta2ns(0x300, cd);
b32bb803 TB	117	cd->rating = 200;
b32bb803 TB	118	cd->irq = irq;
320ab2b0	119	cd->cpumask = cpumask_of(cpu);
b32bb803	120	cd->set_next_event = rt_next_event;
e887b245	121	clockevents_register_device(cd);
06d428d7 RB	122	}
	123
	124	static void __init hub_rt_clock_event_global_init(void)
	125	{
d0e7ba06	126	int irq;
06d428d7 RB	127
	128	do {
	129	smp_wmb();
	130	irq = rt_timer_irq;
	131	if (irq)
	132	break;
	133
	134	irq = allocate_irqno();
	135	if (irq < 0)
	136	panic("Allocation of irq number for timer failed");
	137	} while (xchg(&rt_timer_irq, irq));
e887b245	138
e4ec7989	139	irq_set_chip_and_handler(irq, &rt_irq_type, handle_percpu_irq);
06d428d7	140	setup_irq(irq, &hub_rt_irqaction);
1da177e4 LT	141	}
1da177e4 LT	142
a5a1d1c2	143	static u64 hub_rt_read(struct clocksource *cs)
16b7b2ac AN	144	{
	145	return REMOTE_HUB_L(cputonasid(0), PI_RT_COUNT);
	146	}
	147
06d428d7	148	struct clocksource hub_rt_clocksource = {
e887b245	149	.name = "HUB-RT",
70342287	150	.rating = 200,
87b2335d RB	151	.read = hub_rt_read,
87b2335d RB	152	.mask = CLOCKSOURCE_MASK(52),
87b2335d RB	153	.flags = CLOCK_SOURCE_IS_CONTINUOUS,
	154	};
	155
c41cef36 DCZ	156	static u64 notrace hub_rt_read_sched_clock(void)
	157	{
	158	return REMOTE_HUB_L(cputonasid(0), PI_RT_COUNT);
	159	}
	160
06d428d7	161	static void __init hub_rt_clocksource_init(void)
1da177e4	162	{
06d428d7 RB	163	struct clocksource *cs = &hub_rt_clocksource;
06d428d7 RB	164
75c4fd8c	165	clocksource_register_hz(cs, CYCLES_PER_SEC);
c41cef36 DCZ	166
c41cef36 DCZ	167	sched_clock_register(hub_rt_read_sched_clock, 52, CYCLES_PER_SEC);
1da177e4 LT	168	}
1da177e4 LT	169
e887b245 RB	170	void __init plat_time_init(void)
e887b245 RB	171	{
06d428d7 RB	172	hub_rt_clocksource_init();
06d428d7 RB	173	hub_rt_clock_event_global_init();
b32bb803	174	hub_rt_clock_event_init();
e887b245 RB	175	}
e887b245 RB	176
078a55fc	177	void cpu_time_init(void)
1da177e4 LT	178	{
	179	lboard_t *board;
	180	klcpu_t *cpu;
	181	int cpuid;
	182
	183	/* Don't use ARCS. ARCS is fragile. Klconfig is simple and sane. */
	184	board = find_lboard(KL_CONFIG_INFO(get_nasid()), KLTYPE_IP27);
	185	if (!board)
	186	panic("Can't find board info for myself.");
	187
	188	cpuid = LOCAL_HUB_L(PI_CPU_NUM) ? IP27_CPU0_INDEX : IP27_CPU1_INDEX;
	189	cpu = (klcpu_t *) KLCF_COMP(board, cpuid);
	190	if (!cpu)
	191	panic("No information about myself?");
	192
	193	printk("CPU %d clock is %dMHz.\n", smp_processor_id(), cpu->cpu_speed);
	194
	195	set_c0_status(SRB_TIMOCLK);
	196	}
	197
078a55fc	198	void hub_rtc_init(cnodeid_t cnode)
1da177e4	199	{
3ec066cd	200
1da177e4 LT	201	/*
	202	* We only need to initialize the current node.
	203	* If this is not the current node then it is a cpuless
	204	* node and timeouts will not happen there.
	205	*/
	206	if (get_compact_nodeid() == cnode) {
1da177e4 LT	207	LOCAL_HUB_S(PI_RT_EN_A, 1);
	208	LOCAL_HUB_S(PI_RT_EN_B, 1);
	209	LOCAL_HUB_S(PI_PROF_EN_A, 0);
	210	LOCAL_HUB_S(PI_PROF_EN_B, 0);
1da177e4 LT	211	LOCAL_HUB_S(PI_RT_COUNT, 0);
1da177e4 LT	212	LOCAL_HUB_S(PI_RT_PEND_A, 0);
1da177e4 LT	213	LOCAL_HUB_S(PI_RT_PEND_B, 0);
	214	}
	215	}
3ec066cd TB	216
	217	static int __init sgi_ip27_rtc_devinit(void)
	218	{
	219	struct resource res;
	220
	221	memset(&res, 0, sizeof(res));
	222	res.start = XPHYSADDR(KL_CONFIG_CH_CONS_INFO(master_nasid)->memory_base +
	223	IOC3_BYTEBUS_DEV0);
	224	res.end = res.start + 32767;
	225	res.flags = IORESOURCE_MEM;
	226
	227	return IS_ERR(platform_device_register_simple("rtc-m48t35", -1,
	228	&res, 1));
	229	}
	230
	231	/*
	232	* kludge make this a device_initcall after ioc3 resource conflicts
	233	* are resolved
	234	*/
	235	late_initcall(sgi_ip27_rtc_devinit);