1 /*
2 * Copyright (C) 2010 Google, Inc.
3 *
4 * Author:
5 * Colin Cross <ccross@google.com>
6 *
7 * This software is licensed under the terms of the GNU General Public
8 * License version 2, as published by the Free Software Foundation, and
9 * may be copied, distributed, and modified under those terms.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 */
17
18 #include <linux/init.h>
19 #include <linux/err.h>
20 #include <linux/time.h>
21 #include <linux/interrupt.h>
22 #include <linux/irq.h>
23 #include <linux/clockchips.h>
24 #include <linux/clocksource.h>
25 #include <linux/clk.h>
26 #include <linux/io.h>
27 #include <linux/of_address.h>
28 #include <linux/of_irq.h>
29 #include <linux/sched_clock.h>
30 #include <linux/delay.h>
31
32 #include <asm/mach/time.h>
33 #include <asm/smp_twd.h>
34
35 #define RTC_SECONDS 0x08
36 #define RTC_SHADOW_SECONDS 0x0c
37 #define RTC_MILLISECONDS 0x10
38
39 #define TIMERUS_CNTR_1US 0x10
40 #define TIMERUS_USEC_CFG 0x14
41 #define TIMERUS_CNTR_FREEZE 0x4c
42
43 #define TIMER1_BASE 0x0
44 #define TIMER2_BASE 0x8
45 #define TIMER3_BASE 0x50
46 #define TIMER4_BASE 0x58
47
48 #define TIMER_PTV 0x0
49 #define TIMER_PCR 0x4
50
51 static void __iomem *timer_reg_base;
52 static void __iomem *rtc_base;
53
54 static struct timespec64 persistent_ts;
55 static u64 persistent_ms, last_persistent_ms;
56
57 static struct delay_timer tegra_delay_timer;
58
59 #define timer_writel(value, reg) \
60 writel_relaxed(value, timer_reg_base + (reg))
61 #define timer_readl(reg) \
62 readl_relaxed(timer_reg_base + (reg))
63
tegra_timer_set_next_event(unsigned long cycles,struct clock_event_device * evt)64 static int tegra_timer_set_next_event(unsigned long cycles,
65 struct clock_event_device *evt)
66 {
67 u32 reg;
68
69 reg = 0x80000000 | ((cycles > 1) ? (cycles-1) : 0);
70 timer_writel(reg, TIMER3_BASE + TIMER_PTV);
71
72 return 0;
73 }
74
timer_shutdown(struct clock_event_device * evt)75 static inline void timer_shutdown(struct clock_event_device *evt)
76 {
77 timer_writel(0, TIMER3_BASE + TIMER_PTV);
78 }
79
tegra_timer_shutdown(struct clock_event_device * evt)80 static int tegra_timer_shutdown(struct clock_event_device *evt)
81 {
82 timer_shutdown(evt);
83 return 0;
84 }
85
tegra_timer_set_periodic(struct clock_event_device * evt)86 static int tegra_timer_set_periodic(struct clock_event_device *evt)
87 {
88 u32 reg = 0xC0000000 | ((1000000 / HZ) - 1);
89
90 timer_shutdown(evt);
91 timer_writel(reg, TIMER3_BASE + TIMER_PTV);
92 return 0;
93 }
94
95 static struct clock_event_device tegra_clockevent = {
96 .name = "timer0",
97 .rating = 300,
98 .features = CLOCK_EVT_FEAT_ONESHOT |
99 CLOCK_EVT_FEAT_PERIODIC,
100 .set_next_event = tegra_timer_set_next_event,
101 .set_state_shutdown = tegra_timer_shutdown,
102 .set_state_periodic = tegra_timer_set_periodic,
103 .set_state_oneshot = tegra_timer_shutdown,
104 .tick_resume = tegra_timer_shutdown,
105 };
106
tegra_read_sched_clock(void)107 static u64 notrace tegra_read_sched_clock(void)
108 {
109 return timer_readl(TIMERUS_CNTR_1US);
110 }
111
112 /*
113 * tegra_rtc_read - Reads the Tegra RTC registers
114 * Care must be taken that this funciton is not called while the
115 * tegra_rtc driver could be executing to avoid race conditions
116 * on the RTC shadow register
117 */
tegra_rtc_read_ms(void)118 static u64 tegra_rtc_read_ms(void)
119 {
120 u32 ms = readl(rtc_base + RTC_MILLISECONDS);
121 u32 s = readl(rtc_base + RTC_SHADOW_SECONDS);
122 return (u64)s * MSEC_PER_SEC + ms;
123 }
124
125 /*
126 * tegra_read_persistent_clock64 - Return time from a persistent clock.
127 *
128 * Reads the time from a source which isn't disabled during PM, the
129 * 32k sync timer. Convert the cycles elapsed since last read into
130 * nsecs and adds to a monotonically increasing timespec64.
131 * Care must be taken that this funciton is not called while the
132 * tegra_rtc driver could be executing to avoid race conditions
133 * on the RTC shadow register
134 */
tegra_read_persistent_clock64(struct timespec64 * ts)135 static void tegra_read_persistent_clock64(struct timespec64 *ts)
136 {
137 u64 delta;
138
139 last_persistent_ms = persistent_ms;
140 persistent_ms = tegra_rtc_read_ms();
141 delta = persistent_ms - last_persistent_ms;
142
143 timespec64_add_ns(&persistent_ts, delta * NSEC_PER_MSEC);
144 *ts = persistent_ts;
145 }
146
tegra_delay_timer_read_counter_long(void)147 static unsigned long tegra_delay_timer_read_counter_long(void)
148 {
149 return readl(timer_reg_base + TIMERUS_CNTR_1US);
150 }
151
tegra_timer_interrupt(int irq,void * dev_id)152 static irqreturn_t tegra_timer_interrupt(int irq, void *dev_id)
153 {
154 struct clock_event_device *evt = (struct clock_event_device *)dev_id;
155 timer_writel(1<<30, TIMER3_BASE + TIMER_PCR);
156 evt->event_handler(evt);
157 return IRQ_HANDLED;
158 }
159
160 static struct irqaction tegra_timer_irq = {
161 .name = "timer0",
162 .flags = IRQF_TIMER | IRQF_TRIGGER_HIGH,
163 .handler = tegra_timer_interrupt,
164 .dev_id = &tegra_clockevent,
165 };
166
tegra20_init_timer(struct device_node * np)167 static void __init tegra20_init_timer(struct device_node *np)
168 {
169 struct clk *clk;
170 unsigned long rate;
171 int ret;
172
173 timer_reg_base = of_iomap(np, 0);
174 if (!timer_reg_base) {
175 pr_err("Can't map timer registers\n");
176 BUG();
177 }
178
179 tegra_timer_irq.irq = irq_of_parse_and_map(np, 2);
180 if (tegra_timer_irq.irq <= 0) {
181 pr_err("Failed to map timer IRQ\n");
182 BUG();
183 }
184
185 clk = of_clk_get(np, 0);
186 if (IS_ERR(clk)) {
187 pr_warn("Unable to get timer clock. Assuming 12Mhz input clock.\n");
188 rate = 12000000;
189 } else {
190 clk_prepare_enable(clk);
191 rate = clk_get_rate(clk);
192 }
193
194 switch (rate) {
195 case 12000000:
196 timer_writel(0x000b, TIMERUS_USEC_CFG);
197 break;
198 case 13000000:
199 timer_writel(0x000c, TIMERUS_USEC_CFG);
200 break;
201 case 19200000:
202 timer_writel(0x045f, TIMERUS_USEC_CFG);
203 break;
204 case 26000000:
205 timer_writel(0x0019, TIMERUS_USEC_CFG);
206 break;
207 default:
208 WARN(1, "Unknown clock rate");
209 }
210
211 sched_clock_register(tegra_read_sched_clock, 32, 1000000);
212
213 if (clocksource_mmio_init(timer_reg_base + TIMERUS_CNTR_1US,
214 "timer_us", 1000000, 300, 32, clocksource_mmio_readl_up)) {
215 pr_err("Failed to register clocksource\n");
216 BUG();
217 }
218
219 tegra_delay_timer.read_current_timer =
220 tegra_delay_timer_read_counter_long;
221 tegra_delay_timer.freq = 1000000;
222 register_current_timer_delay(&tegra_delay_timer);
223
224 ret = setup_irq(tegra_timer_irq.irq, &tegra_timer_irq);
225 if (ret) {
226 pr_err("Failed to register timer IRQ: %d\n", ret);
227 BUG();
228 }
229
230 tegra_clockevent.cpumask = cpu_all_mask;
231 tegra_clockevent.irq = tegra_timer_irq.irq;
232 clockevents_config_and_register(&tegra_clockevent, 1000000,
233 0x1, 0x1fffffff);
234 }
235 CLOCKSOURCE_OF_DECLARE(tegra20_timer, "nvidia,tegra20-timer", tegra20_init_timer);
236
tegra20_init_rtc(struct device_node * np)237 static void __init tegra20_init_rtc(struct device_node *np)
238 {
239 struct clk *clk;
240
241 rtc_base = of_iomap(np, 0);
242 if (!rtc_base) {
243 pr_err("Can't map RTC registers");
244 BUG();
245 }
246
247 /*
248 * rtc registers are used by read_persistent_clock, keep the rtc clock
249 * enabled
250 */
251 clk = of_clk_get(np, 0);
252 if (IS_ERR(clk))
253 pr_warn("Unable to get rtc-tegra clock\n");
254 else
255 clk_prepare_enable(clk);
256
257 register_persistent_clock(NULL, tegra_read_persistent_clock64);
258 }
259 CLOCKSOURCE_OF_DECLARE(tegra20_rtc, "nvidia,tegra20-rtc", tegra20_init_rtc);
260
261 #ifdef CONFIG_PM
262 static u32 usec_config;
263
tegra_timer_suspend(void)264 void tegra_timer_suspend(void)
265 {
266 usec_config = timer_readl(TIMERUS_USEC_CFG);
267 }
268
tegra_timer_resume(void)269 void tegra_timer_resume(void)
270 {
271 timer_writel(usec_config, TIMERUS_USEC_CFG);
272 }
273 #endif
274