14cc7b6f703b1f94c4a8c7bfbcdb567f8ff30f14
[firefly-linux-kernel-4.4.55.git] / drivers / clocksource / sh_mtu2.c
1 /*
2  * SuperH Timer Support - MTU2
3  *
4  *  Copyright (C) 2009 Magnus Damm
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  */
19
20 #include <linux/init.h>
21 #include <linux/platform_device.h>
22 #include <linux/spinlock.h>
23 #include <linux/interrupt.h>
24 #include <linux/ioport.h>
25 #include <linux/delay.h>
26 #include <linux/io.h>
27 #include <linux/clk.h>
28 #include <linux/irq.h>
29 #include <linux/err.h>
30 #include <linux/clockchips.h>
31 #include <linux/sh_timer.h>
32 #include <linux/slab.h>
33 #include <linux/module.h>
34 #include <linux/pm_domain.h>
35 #include <linux/pm_runtime.h>
36
37 struct sh_mtu2_device;
38
39 struct sh_mtu2_channel {
40         struct sh_mtu2_device *mtu;
41         unsigned int index;
42
43         void __iomem *base;
44         int irq;
45
46         struct clock_event_device ced;
47 };
48
49 struct sh_mtu2_device {
50         struct platform_device *pdev;
51
52         void __iomem *mapbase;
53         struct clk *clk;
54
55         struct sh_mtu2_channel *channels;
56         unsigned int num_channels;
57 };
58
59 static DEFINE_RAW_SPINLOCK(sh_mtu2_lock);
60
61 #define TSTR -1 /* shared register */
62 #define TCR  0 /* channel register */
63 #define TMDR 1 /* channel register */
64 #define TIOR 2 /* channel register */
65 #define TIER 3 /* channel register */
66 #define TSR  4 /* channel register */
67 #define TCNT 5 /* channel register */
68 #define TGR  6 /* channel register */
69
70 #define TCR_CCLR_NONE           (0 << 5)
71 #define TCR_CCLR_TGRA           (1 << 5)
72 #define TCR_CCLR_TGRB           (2 << 5)
73 #define TCR_CCLR_SYNC           (3 << 5)
74 #define TCR_CCLR_TGRC           (5 << 5)
75 #define TCR_CCLR_TGRD           (6 << 5)
76 #define TCR_CCLR_MASK           (7 << 5)
77 #define TCR_CKEG_RISING         (0 << 3)
78 #define TCR_CKEG_FALLING        (1 << 3)
79 #define TCR_CKEG_BOTH           (2 << 3)
80 #define TCR_CKEG_MASK           (3 << 3)
81 /* Values 4 to 7 are channel-dependent */
82 #define TCR_TPSC_P1             (0 << 0)
83 #define TCR_TPSC_P4             (1 << 0)
84 #define TCR_TPSC_P16            (2 << 0)
85 #define TCR_TPSC_P64            (3 << 0)
86 #define TCR_TPSC_CH0_TCLKA      (4 << 0)
87 #define TCR_TPSC_CH0_TCLKB      (5 << 0)
88 #define TCR_TPSC_CH0_TCLKC      (6 << 0)
89 #define TCR_TPSC_CH0_TCLKD      (7 << 0)
90 #define TCR_TPSC_CH1_TCLKA      (4 << 0)
91 #define TCR_TPSC_CH1_TCLKB      (5 << 0)
92 #define TCR_TPSC_CH1_P256       (6 << 0)
93 #define TCR_TPSC_CH1_TCNT2      (7 << 0)
94 #define TCR_TPSC_CH2_TCLKA      (4 << 0)
95 #define TCR_TPSC_CH2_TCLKB      (5 << 0)
96 #define TCR_TPSC_CH2_TCLKC      (6 << 0)
97 #define TCR_TPSC_CH2_P1024      (7 << 0)
98 #define TCR_TPSC_CH34_P256      (4 << 0)
99 #define TCR_TPSC_CH34_P1024     (5 << 0)
100 #define TCR_TPSC_CH34_TCLKA     (6 << 0)
101 #define TCR_TPSC_CH34_TCLKB     (7 << 0)
102 #define TCR_TPSC_MASK           (7 << 0)
103
104 #define TMDR_BFE                (1 << 6)
105 #define TMDR_BFB                (1 << 5)
106 #define TMDR_BFA                (1 << 4)
107 #define TMDR_MD_NORMAL          (0 << 0)
108 #define TMDR_MD_PWM_1           (2 << 0)
109 #define TMDR_MD_PWM_2           (3 << 0)
110 #define TMDR_MD_PHASE_1         (4 << 0)
111 #define TMDR_MD_PHASE_2         (5 << 0)
112 #define TMDR_MD_PHASE_3         (6 << 0)
113 #define TMDR_MD_PHASE_4         (7 << 0)
114 #define TMDR_MD_PWM_SYNC        (8 << 0)
115 #define TMDR_MD_PWM_COMP_CREST  (13 << 0)
116 #define TMDR_MD_PWM_COMP_TROUGH (14 << 0)
117 #define TMDR_MD_PWM_COMP_BOTH   (15 << 0)
118 #define TMDR_MD_MASK            (15 << 0)
119
120 #define TIOC_IOCH(n)            ((n) << 4)
121 #define TIOC_IOCL(n)            ((n) << 0)
122 #define TIOR_OC_RETAIN          (0 << 0)
123 #define TIOR_OC_0_CLEAR         (1 << 0)
124 #define TIOR_OC_0_SET           (2 << 0)
125 #define TIOR_OC_0_TOGGLE        (3 << 0)
126 #define TIOR_OC_1_CLEAR         (5 << 0)
127 #define TIOR_OC_1_SET           (6 << 0)
128 #define TIOR_OC_1_TOGGLE        (7 << 0)
129 #define TIOR_IC_RISING          (8 << 0)
130 #define TIOR_IC_FALLING         (9 << 0)
131 #define TIOR_IC_BOTH            (10 << 0)
132 #define TIOR_IC_TCNT            (12 << 0)
133 #define TIOR_MASK               (15 << 0)
134
135 #define TIER_TTGE               (1 << 7)
136 #define TIER_TTGE2              (1 << 6)
137 #define TIER_TCIEU              (1 << 5)
138 #define TIER_TCIEV              (1 << 4)
139 #define TIER_TGIED              (1 << 3)
140 #define TIER_TGIEC              (1 << 2)
141 #define TIER_TGIEB              (1 << 1)
142 #define TIER_TGIEA              (1 << 0)
143
144 #define TSR_TCFD                (1 << 7)
145 #define TSR_TCFU                (1 << 5)
146 #define TSR_TCFV                (1 << 4)
147 #define TSR_TGFD                (1 << 3)
148 #define TSR_TGFC                (1 << 2)
149 #define TSR_TGFB                (1 << 1)
150 #define TSR_TGFA                (1 << 0)
151
152 static unsigned long mtu2_reg_offs[] = {
153         [TCR] = 0,
154         [TMDR] = 1,
155         [TIOR] = 2,
156         [TIER] = 4,
157         [TSR] = 5,
158         [TCNT] = 6,
159         [TGR] = 8,
160 };
161
162 static inline unsigned long sh_mtu2_read(struct sh_mtu2_channel *ch, int reg_nr)
163 {
164         unsigned long offs;
165
166         if (reg_nr == TSTR)
167                 return ioread8(ch->mtu->mapbase);
168
169         offs = mtu2_reg_offs[reg_nr];
170
171         if ((reg_nr == TCNT) || (reg_nr == TGR))
172                 return ioread16(ch->base + offs);
173         else
174                 return ioread8(ch->base + offs);
175 }
176
177 static inline void sh_mtu2_write(struct sh_mtu2_channel *ch, int reg_nr,
178                                 unsigned long value)
179 {
180         unsigned long offs;
181
182         if (reg_nr == TSTR) {
183                 iowrite8(value, ch->mtu->mapbase);
184                 return;
185         }
186
187         offs = mtu2_reg_offs[reg_nr];
188
189         if ((reg_nr == TCNT) || (reg_nr == TGR))
190                 iowrite16(value, ch->base + offs);
191         else
192                 iowrite8(value, ch->base + offs);
193 }
194
195 static void sh_mtu2_start_stop_ch(struct sh_mtu2_channel *ch, int start)
196 {
197         unsigned long flags, value;
198
199         /* start stop register shared by multiple timer channels */
200         raw_spin_lock_irqsave(&sh_mtu2_lock, flags);
201         value = sh_mtu2_read(ch, TSTR);
202
203         if (start)
204                 value |= 1 << ch->index;
205         else
206                 value &= ~(1 << ch->index);
207
208         sh_mtu2_write(ch, TSTR, value);
209         raw_spin_unlock_irqrestore(&sh_mtu2_lock, flags);
210 }
211
212 static int sh_mtu2_enable(struct sh_mtu2_channel *ch)
213 {
214         unsigned long periodic;
215         unsigned long rate;
216         int ret;
217
218         pm_runtime_get_sync(&ch->mtu->pdev->dev);
219         dev_pm_syscore_device(&ch->mtu->pdev->dev, true);
220
221         /* enable clock */
222         ret = clk_enable(ch->mtu->clk);
223         if (ret) {
224                 dev_err(&ch->mtu->pdev->dev, "ch%u: cannot enable clock\n",
225                         ch->index);
226                 return ret;
227         }
228
229         /* make sure channel is disabled */
230         sh_mtu2_start_stop_ch(ch, 0);
231
232         rate = clk_get_rate(ch->mtu->clk) / 64;
233         periodic = (rate + HZ/2) / HZ;
234
235         /*
236          * "Periodic Counter Operation"
237          * Clear on TGRA compare match, divide clock by 64.
238          */
239         sh_mtu2_write(ch, TCR, TCR_CCLR_TGRA | TCR_TPSC_P64);
240         sh_mtu2_write(ch, TIOR, TIOC_IOCH(TIOR_OC_0_CLEAR) |
241                       TIOC_IOCL(TIOR_OC_0_CLEAR));
242         sh_mtu2_write(ch, TGR, periodic);
243         sh_mtu2_write(ch, TCNT, 0);
244         sh_mtu2_write(ch, TMDR, TMDR_MD_NORMAL);
245         sh_mtu2_write(ch, TIER, TIER_TGIEA);
246
247         /* enable channel */
248         sh_mtu2_start_stop_ch(ch, 1);
249
250         return 0;
251 }
252
253 static void sh_mtu2_disable(struct sh_mtu2_channel *ch)
254 {
255         /* disable channel */
256         sh_mtu2_start_stop_ch(ch, 0);
257
258         /* stop clock */
259         clk_disable(ch->mtu->clk);
260
261         dev_pm_syscore_device(&ch->mtu->pdev->dev, false);
262         pm_runtime_put(&ch->mtu->pdev->dev);
263 }
264
265 static irqreturn_t sh_mtu2_interrupt(int irq, void *dev_id)
266 {
267         struct sh_mtu2_channel *ch = dev_id;
268
269         /* acknowledge interrupt */
270         sh_mtu2_read(ch, TSR);
271         sh_mtu2_write(ch, TSR, ~TSR_TGFA);
272
273         /* notify clockevent layer */
274         ch->ced.event_handler(&ch->ced);
275         return IRQ_HANDLED;
276 }
277
278 static struct sh_mtu2_channel *ced_to_sh_mtu2(struct clock_event_device *ced)
279 {
280         return container_of(ced, struct sh_mtu2_channel, ced);
281 }
282
283 static void sh_mtu2_clock_event_mode(enum clock_event_mode mode,
284                                     struct clock_event_device *ced)
285 {
286         struct sh_mtu2_channel *ch = ced_to_sh_mtu2(ced);
287         int disabled = 0;
288
289         /* deal with old setting first */
290         switch (ced->mode) {
291         case CLOCK_EVT_MODE_PERIODIC:
292                 sh_mtu2_disable(ch);
293                 disabled = 1;
294                 break;
295         default:
296                 break;
297         }
298
299         switch (mode) {
300         case CLOCK_EVT_MODE_PERIODIC:
301                 dev_info(&ch->mtu->pdev->dev,
302                          "ch%u: used for periodic clock events\n", ch->index);
303                 sh_mtu2_enable(ch);
304                 break;
305         case CLOCK_EVT_MODE_UNUSED:
306                 if (!disabled)
307                         sh_mtu2_disable(ch);
308                 break;
309         case CLOCK_EVT_MODE_SHUTDOWN:
310         default:
311                 break;
312         }
313 }
314
315 static void sh_mtu2_clock_event_suspend(struct clock_event_device *ced)
316 {
317         pm_genpd_syscore_poweroff(&ced_to_sh_mtu2(ced)->mtu->pdev->dev);
318 }
319
320 static void sh_mtu2_clock_event_resume(struct clock_event_device *ced)
321 {
322         pm_genpd_syscore_poweron(&ced_to_sh_mtu2(ced)->mtu->pdev->dev);
323 }
324
325 static void sh_mtu2_register_clockevent(struct sh_mtu2_channel *ch,
326                                         const char *name)
327 {
328         struct clock_event_device *ced = &ch->ced;
329         int ret;
330
331         ced->name = name;
332         ced->features = CLOCK_EVT_FEAT_PERIODIC;
333         ced->rating = 200;
334         ced->cpumask = cpu_possible_mask;
335         ced->set_mode = sh_mtu2_clock_event_mode;
336         ced->suspend = sh_mtu2_clock_event_suspend;
337         ced->resume = sh_mtu2_clock_event_resume;
338
339         dev_info(&ch->mtu->pdev->dev, "ch%u: used for clock events\n",
340                  ch->index);
341         clockevents_register_device(ced);
342
343         ret = request_irq(ch->irq, sh_mtu2_interrupt,
344                           IRQF_TIMER | IRQF_IRQPOLL | IRQF_NOBALANCING,
345                           dev_name(&ch->mtu->pdev->dev), ch);
346         if (ret) {
347                 dev_err(&ch->mtu->pdev->dev, "ch%u: failed to request irq %d\n",
348                         ch->index, ch->irq);
349                 return;
350         }
351 }
352
353 static int sh_mtu2_register(struct sh_mtu2_channel *ch, const char *name,
354                             bool clockevent)
355 {
356         if (clockevent)
357                 sh_mtu2_register_clockevent(ch, name);
358
359         return 0;
360 }
361
362 static int sh_mtu2_setup_channel(struct sh_mtu2_channel *ch,
363                                  struct sh_mtu2_device *mtu)
364 {
365         struct sh_timer_config *cfg = mtu->pdev->dev.platform_data;
366
367         ch->mtu = mtu;
368         ch->index = cfg->timer_bit;
369
370         ch->irq = platform_get_irq(mtu->pdev, 0);
371         if (ch->irq < 0) {
372                 dev_err(&mtu->pdev->dev, "ch%u: failed to get irq\n",
373                         ch->index);
374                 return ch->irq;
375         }
376
377         return sh_mtu2_register(ch, dev_name(&mtu->pdev->dev),
378                                 cfg->clockevent_rating != 0);
379 }
380
381 static int sh_mtu2_setup(struct sh_mtu2_device *mtu,
382                          struct platform_device *pdev)
383 {
384         struct sh_timer_config *cfg = pdev->dev.platform_data;
385         struct resource *res;
386         void __iomem *base;
387         int ret;
388         ret = -ENXIO;
389
390         mtu->pdev = pdev;
391
392         if (!cfg) {
393                 dev_err(&mtu->pdev->dev, "missing platform data\n");
394                 goto err0;
395         }
396
397         platform_set_drvdata(pdev, mtu);
398
399         res = platform_get_resource(mtu->pdev, IORESOURCE_MEM, 0);
400         if (!res) {
401                 dev_err(&mtu->pdev->dev, "failed to get I/O memory\n");
402                 goto err0;
403         }
404
405         /*
406          * Map memory, let base point to our channel and mapbase to the
407          * start/stop shared register.
408          */
409         base = ioremap_nocache(res->start, resource_size(res));
410         if (base == NULL) {
411                 dev_err(&mtu->pdev->dev, "failed to remap I/O memory\n");
412                 goto err0;
413         }
414
415         mtu->mapbase = base + cfg->channel_offset;
416
417         /* get hold of clock */
418         mtu->clk = clk_get(&mtu->pdev->dev, "mtu2_fck");
419         if (IS_ERR(mtu->clk)) {
420                 dev_err(&mtu->pdev->dev, "cannot get clock\n");
421                 ret = PTR_ERR(mtu->clk);
422                 goto err1;
423         }
424
425         ret = clk_prepare(mtu->clk);
426         if (ret < 0)
427                 goto err2;
428
429         mtu->channels = kzalloc(sizeof(*mtu->channels), GFP_KERNEL);
430         if (mtu->channels == NULL) {
431                 ret = -ENOMEM;
432                 goto err3;
433         }
434
435         mtu->num_channels = 1;
436
437         mtu->channels[0].base = base;
438
439         ret = sh_mtu2_setup_channel(&mtu->channels[0], mtu);
440         if (ret < 0)
441                 goto err3;
442
443         return 0;
444  err3:
445         kfree(mtu->channels);
446         clk_unprepare(mtu->clk);
447  err2:
448         clk_put(mtu->clk);
449  err1:
450         iounmap(base);
451  err0:
452         return ret;
453 }
454
455 static int sh_mtu2_probe(struct platform_device *pdev)
456 {
457         struct sh_mtu2_device *mtu = platform_get_drvdata(pdev);
458         struct sh_timer_config *cfg = pdev->dev.platform_data;
459         int ret;
460
461         if (!is_early_platform_device(pdev)) {
462                 pm_runtime_set_active(&pdev->dev);
463                 pm_runtime_enable(&pdev->dev);
464         }
465
466         if (mtu) {
467                 dev_info(&pdev->dev, "kept as earlytimer\n");
468                 goto out;
469         }
470
471         mtu = kzalloc(sizeof(*mtu), GFP_KERNEL);
472         if (mtu == NULL) {
473                 dev_err(&pdev->dev, "failed to allocate driver data\n");
474                 return -ENOMEM;
475         }
476
477         ret = sh_mtu2_setup(mtu, pdev);
478         if (ret) {
479                 kfree(mtu);
480                 pm_runtime_idle(&pdev->dev);
481                 return ret;
482         }
483         if (is_early_platform_device(pdev))
484                 return 0;
485
486  out:
487         if (cfg->clockevent_rating)
488                 pm_runtime_irq_safe(&pdev->dev);
489         else
490                 pm_runtime_idle(&pdev->dev);
491
492         return 0;
493 }
494
495 static int sh_mtu2_remove(struct platform_device *pdev)
496 {
497         return -EBUSY; /* cannot unregister clockevent */
498 }
499
500 static struct platform_driver sh_mtu2_device_driver = {
501         .probe          = sh_mtu2_probe,
502         .remove         = sh_mtu2_remove,
503         .driver         = {
504                 .name   = "sh_mtu2",
505         }
506 };
507
508 static int __init sh_mtu2_init(void)
509 {
510         return platform_driver_register(&sh_mtu2_device_driver);
511 }
512
513 static void __exit sh_mtu2_exit(void)
514 {
515         platform_driver_unregister(&sh_mtu2_device_driver);
516 }
517
518 early_platform_init("earlytimer", &sh_mtu2_device_driver);
519 subsys_initcall(sh_mtu2_init);
520 module_exit(sh_mtu2_exit);
521
522 MODULE_AUTHOR("Magnus Damm");
523 MODULE_DESCRIPTION("SuperH MTU2 Timer Driver");
524 MODULE_LICENSE("GPL v2");