arch/mips/loongson32/common/time.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  * Copyright (c) 2014 Zhang, Keguang <keguang.zhang@gmail.com>
   4  */
   5
   6 #include <linux/clk.h>
   7 #include <linux/interrupt.h>
   8 #include <linux/sizes.h>
   9 #include <asm/time.h>
  10
  11 #include <loongson1.h>
  12 #include <platform.h>
  13
  14 #ifdef CONFIG_CEVT_CSRC_LS1X
  15
  16 #if defined(CONFIG_TIMER_USE_PWM1)
  17 #define LS1X_TIMER_BASE LS1X_PWM1_BASE
  18 #define LS1X_TIMER_IRQ  LS1X_PWM1_IRQ
  19
  20 #elif defined(CONFIG_TIMER_USE_PWM2)
  21 #define LS1X_TIMER_BASE LS1X_PWM2_BASE
  22 #define LS1X_TIMER_IRQ  LS1X_PWM2_IRQ
  23
  24 #elif defined(CONFIG_TIMER_USE_PWM3)
  25 #define LS1X_TIMER_BASE LS1X_PWM3_BASE
  26 #define LS1X_TIMER_IRQ  LS1X_PWM3_IRQ
  27
  28 #else
  29 #define LS1X_TIMER_BASE LS1X_PWM0_BASE
  30 #define LS1X_TIMER_IRQ  LS1X_PWM0_IRQ
  31 #endif
  32
  33 DEFINE_RAW_SPINLOCK(ls1x_timer_lock);
  34
  35 static void __iomem *timer_reg_base;
  36 static uint32_t ls1x_jiffies_per_tick;
  37
  38 static inline void ls1x_pwmtimer_set_period(uint32_t period)
  39 {
  40         __raw_writel(period, timer_reg_base + PWM_HRC);
  41         __raw_writel(period, timer_reg_base + PWM_LRC);
  42 }
  43
  44 static inline void ls1x_pwmtimer_restart(void)
  45 {
  46         __raw_writel(0x0, timer_reg_base + PWM_CNT);
  47         __raw_writel(INT_EN | CNT_EN, timer_reg_base + PWM_CTRL);
  48 }
  49
  50 void __init ls1x_pwmtimer_init(void)
  51 {
  52         timer_reg_base = ioremap(LS1X_TIMER_BASE, SZ_16);
  53         if (!timer_reg_base)
  54                 panic("Failed to remap timer registers");
  55
  56         ls1x_jiffies_per_tick = DIV_ROUND_CLOSEST(mips_hpt_frequency, HZ);
  57
  58         ls1x_pwmtimer_set_period(ls1x_jiffies_per_tick);
  59         ls1x_pwmtimer_restart();
  60 }
  61
  62 static u64 ls1x_clocksource_read(struct clocksource *cs)
  63 {
  64         unsigned long flags;
  65         int count;
  66         u32 jifs;
  67         static int old_count;
  68         static u32 old_jifs;
  69
  70         raw_spin_lock_irqsave(&ls1x_timer_lock, flags);
  71         /*
  72          * Although our caller may have the read side of xtime_lock,
  73          * this is now a seqlock, and we are cheating in this routine
  74          * by having side effects on state that we cannot undo if
  75          * there is a collision on the seqlock and our caller has to
  76          * retry.  (Namely, old_jifs and old_count.)  So we must treat
  77          * jiffies as volatile despite the lock.  We read jiffies
  78          * before latching the timer count to guarantee that although
  79          * the jiffies value might be older than the count (that is,
  80          * the counter may underflow between the last point where
  81          * jiffies was incremented and the point where we latch the
  82          * count), it cannot be newer.
  83          */
  84         jifs = jiffies;
  85         /* read the count */
  86         count = __raw_readl(timer_reg_base + PWM_CNT);
  87
  88         /*
  89          * It's possible for count to appear to go the wrong way for this
  90          * reason:
  91          *
  92          *  The timer counter underflows, but we haven't handled the resulting
  93          *  interrupt and incremented jiffies yet.
  94          *
  95          * Previous attempts to handle these cases intelligently were buggy, so
  96          * we just do the simple thing now.
  97          */
  98         if (count < old_count && jifs == old_jifs)
  99                 count = old_count;
 100
 101         old_count = count;
 102         old_jifs = jifs;
 103
 104         raw_spin_unlock_irqrestore(&ls1x_timer_lock, flags);
 105
 106         return (u64) (jifs * ls1x_jiffies_per_tick) + count;
 107 }
 108
 109 static struct clocksource ls1x_clocksource = {
 110         .name           = "ls1x-pwmtimer",
 111         .read           = ls1x_clocksource_read,
 112         .mask           = CLOCKSOURCE_MASK(24),
 113         .flags          = CLOCK_SOURCE_IS_CONTINUOUS,
 114 };
 115
 116 static irqreturn_t ls1x_clockevent_isr(int irq, void *devid)
 117 {
 118         struct clock_event_device *cd = devid;
 119
 120         ls1x_pwmtimer_restart();
 121         cd->event_handler(cd);
 122
 123         return IRQ_HANDLED;
 124 }
 125
 126 static int ls1x_clockevent_set_state_periodic(struct clock_event_device *cd)
 127 {
 128         raw_spin_lock(&ls1x_timer_lock);
 129         ls1x_pwmtimer_set_period(ls1x_jiffies_per_tick);
 130         ls1x_pwmtimer_restart();
 131         __raw_writel(INT_EN | CNT_EN, timer_reg_base + PWM_CTRL);
 132         raw_spin_unlock(&ls1x_timer_lock);
 133
 134         return 0;
 135 }
 136
 137 static int ls1x_clockevent_tick_resume(struct clock_event_device *cd)
 138 {
 139         raw_spin_lock(&ls1x_timer_lock);
 140         __raw_writel(INT_EN | CNT_EN, timer_reg_base + PWM_CTRL);
 141         raw_spin_unlock(&ls1x_timer_lock);
 142
 143         return 0;
 144 }
 145
 146 static int ls1x_clockevent_set_state_shutdown(struct clock_event_device *cd)
 147 {
 148         raw_spin_lock(&ls1x_timer_lock);
 149         __raw_writel(__raw_readl(timer_reg_base + PWM_CTRL) & ~CNT_EN,
 150                      timer_reg_base + PWM_CTRL);
 151         raw_spin_unlock(&ls1x_timer_lock);
 152
 153         return 0;
 154 }
 155
 156 static int ls1x_clockevent_set_next(unsigned long evt,
 157                                     struct clock_event_device *cd)
 158 {
 159         raw_spin_lock(&ls1x_timer_lock);
 160         ls1x_pwmtimer_set_period(evt);
 161         ls1x_pwmtimer_restart();
 162         raw_spin_unlock(&ls1x_timer_lock);
 163
 164         return 0;
 165 }
 166
 167 static struct clock_event_device ls1x_clockevent = {
 168         .name                   = "ls1x-pwmtimer",
 169         .features               = CLOCK_EVT_FEAT_PERIODIC,
 170         .rating                 = 300,
 171         .irq                    = LS1X_TIMER_IRQ,
 172         .set_next_event         = ls1x_clockevent_set_next,
 173         .set_state_shutdown     = ls1x_clockevent_set_state_shutdown,
 174         .set_state_periodic     = ls1x_clockevent_set_state_periodic,
 175         .set_state_oneshot      = ls1x_clockevent_set_state_shutdown,
 176         .tick_resume            = ls1x_clockevent_tick_resume,
 177 };
 178
 179 static struct irqaction ls1x_pwmtimer_irqaction = {
 180         .name           = "ls1x-pwmtimer",
 181         .handler        = ls1x_clockevent_isr,
 182         .dev_id         = &ls1x_clockevent,
 183         .flags          = IRQF_PERCPU | IRQF_TIMER,
 184 };
 185
 186 static void __init ls1x_time_init(void)
 187 {
 188         struct clock_event_device *cd = &ls1x_clockevent;
 189         int ret;
 190
 191         if (!mips_hpt_frequency)
 192                 panic("Invalid timer clock rate");
 193
 194         ls1x_pwmtimer_init();
 195
 196         clockevent_set_clock(cd, mips_hpt_frequency);
 197         cd->max_delta_ns = clockevent_delta2ns(0xffffff, cd);
 198         cd->max_delta_ticks = 0xffffff;
 199         cd->min_delta_ns = clockevent_delta2ns(0x000300, cd);
 200         cd->min_delta_ticks = 0x000300;
 201         cd->cpumask = cpumask_of(smp_processor_id());
 202         clockevents_register_device(cd);
 203
 204         ls1x_clocksource.rating = 200 + mips_hpt_frequency / 10000000;
 205         ret = clocksource_register_hz(&ls1x_clocksource, mips_hpt_frequency);
 206         if (ret)
 207                 panic(KERN_ERR "Failed to register clocksource: %d\n", ret);
 208
 209         setup_irq(LS1X_TIMER_IRQ, &ls1x_pwmtimer_irqaction);
 210 }
 211 #endif /* CONFIG_CEVT_CSRC_LS1X */
 212
 213 void __init plat_time_init(void)
 214 {
 215         struct clk *clk = NULL;
 216
 217         /* initialize LS1X clocks */
 218         ls1x_clk_init();
 219
 220 #ifdef CONFIG_CEVT_CSRC_LS1X
 221         /* setup LS1X PWM timer */
 222         clk = clk_get(NULL, "ls1x-pwmtimer");
 223         if (IS_ERR(clk))
 224                 panic("unable to get timer clock, err=%ld", PTR_ERR(clk));
 225
 226         mips_hpt_frequency = clk_get_rate(clk);
 227         ls1x_time_init();
 228 #else
 229         /* setup mips r4k timer */
 230         clk = clk_get(NULL, "cpu_clk");
 231         if (IS_ERR(clk))
 232                 panic("unable to get cpu clock, err=%ld", PTR_ERR(clk));
 233
 234         mips_hpt_frequency = clk_get_rate(clk) / 2;
 235 #endif /* CONFIG_CEVT_CSRC_LS1X */
 236 }