kernel/time/sched_clock.c

   1 /*
   2  * sched_clock.c: support for extending counters to full 64-bit ns counter
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License version 2 as
   6  * published by the Free Software Foundation.
   7  */
   8 #include <linux/clocksource.h>
   9 #include <linux/init.h>
  10 #include <linux/jiffies.h>
  11 #include <linux/kernel.h>
  12 #include <linux/moduleparam.h>
  13 #include <linux/sched.h>
  14 #include <linux/syscore_ops.h>
  15 #include <linux/timer.h>
  16 #include <linux/sched_clock.h>
  17
  18 struct clock_data {
  19         u64 epoch_ns;
  20         u32 epoch_cyc;
  21         u32 epoch_cyc_copy;
  22         unsigned long rate;
  23         u32 mult;
  24         u32 shift;
  25         bool suspended;
  26 };
  27
  28 static void sched_clock_poll(unsigned long wrap_ticks);
  29 static DEFINE_TIMER(sched_clock_timer, sched_clock_poll, 0, 0);
  30 static int irqtime = -1;
  31
  32 core_param(irqtime, irqtime, int, 0400);
  33
  34 static struct clock_data cd = {
  35         .mult   = NSEC_PER_SEC / HZ,
  36 };
  37
  38 static u32 __read_mostly sched_clock_mask = 0xffffffff;
  39
  40 static u32 notrace jiffy_sched_clock_read(void)
  41 {
  42         return (u32)(jiffies - INITIAL_JIFFIES);
  43 }
  44
  45 static u32 __read_mostly (*read_sched_clock)(void) = jiffy_sched_clock_read;
  46
  47 static inline u64 notrace cyc_to_ns(u64 cyc, u32 mult, u32 shift)
  48 {
  49         return (cyc * mult) >> shift;
  50 }
  51
  52 static unsigned long long notrace cyc_to_sched_clock(u32 cyc, u32 mask)
  53 {
  54         u64 epoch_ns;
  55         u32 epoch_cyc;
  56
  57         /*
  58          * Load the epoch_cyc and epoch_ns atomically.  We do this by
  59          * ensuring that we always write epoch_cyc, epoch_ns and
  60          * epoch_cyc_copy in strict order, and read them in strict order.
  61          * If epoch_cyc and epoch_cyc_copy are not equal, then we're in
  62          * the middle of an update, and we should repeat the load.
  63          */
  64         do {
  65                 epoch_cyc = cd.epoch_cyc;
  66                 smp_rmb();
  67                 epoch_ns = cd.epoch_ns;
  68                 smp_rmb();
  69         } while (epoch_cyc != cd.epoch_cyc_copy);
  70
  71         return epoch_ns + cyc_to_ns((cyc - epoch_cyc) & mask, cd.mult, cd.shift);
  72 }
  73
  74 /*
  75  * Atomically update the sched_clock epoch.
  76  */
  77 static void notrace update_sched_clock(void)
  78 {
  79         unsigned long flags;
  80         u32 cyc;
  81         u64 ns;
  82
  83         cyc = read_sched_clock();
  84         ns = cd.epoch_ns +
  85                 cyc_to_ns((cyc - cd.epoch_cyc) & sched_clock_mask,
  86                           cd.mult, cd.shift);
  87         /*
  88          * Write epoch_cyc and epoch_ns in a way that the update is
  89          * detectable in cyc_to_fixed_sched_clock().
  90          */
  91         raw_local_irq_save(flags);
  92         cd.epoch_cyc_copy = cyc;
  93         smp_wmb();
  94         cd.epoch_ns = ns;
  95         smp_wmb();
  96         cd.epoch_cyc = cyc;
  97         raw_local_irq_restore(flags);
  98 }
  99
 100 static void sched_clock_poll(unsigned long wrap_ticks)
 101 {
 102         mod_timer(&sched_clock_timer, round_jiffies(jiffies + wrap_ticks));
 103         update_sched_clock();
 104 }
 105
 106 void __init setup_sched_clock(u32 (*read)(void), int bits, unsigned long rate)
 107 {
 108         unsigned long r, w;
 109         u64 res, wrap;
 110         char r_unit;
 111
 112         if (cd.rate > rate)
 113                 return;
 114
 115         BUG_ON(bits > 32);
 116         WARN_ON(!irqs_disabled());
 117         read_sched_clock = read;
 118         sched_clock_mask = (1 << bits) - 1;
 119         cd.rate = rate;
 120
 121         /* calculate the mult/shift to convert counter ticks to ns. */
 122         clocks_calc_mult_shift(&cd.mult, &cd.shift, rate, NSEC_PER_SEC, 0);
 123
 124         r = rate;
 125         if (r >= 4000000) {
 126                 r /= 1000000;
 127                 r_unit = 'M';
 128         } else if (r >= 1000) {
 129                 r /= 1000;
 130                 r_unit = 'k';
 131         } else
 132                 r_unit = ' ';
 133
 134         /* calculate how many ns until we wrap */
 135         wrap = cyc_to_ns((1ULL << bits) - 1, cd.mult, cd.shift);
 136         do_div(wrap, NSEC_PER_MSEC);
 137         w = wrap;
 138
 139         /* calculate the ns resolution of this counter */
 140         res = cyc_to_ns(1ULL, cd.mult, cd.shift);
 141         pr_info("sched_clock: %u bits at %lu%cHz, resolution %lluns, wraps every %lums\n",
 142                 bits, r, r_unit, res, w);
 143
 144         /*
 145          * Start the timer to keep sched_clock() properly updated and
 146          * sets the initial epoch.
 147          */
 148         sched_clock_timer.data = msecs_to_jiffies(w - (w / 10));
 149         update_sched_clock();
 150
 151         /*
 152          * Ensure that sched_clock() starts off at 0ns
 153          */
 154         cd.epoch_ns = 0;
 155
 156         /* Enable IRQ time accounting if we have a fast enough sched_clock */
 157         if (irqtime > 0 || (irqtime == -1 && rate >= 1000000))
 158                 enable_sched_clock_irqtime();
 159
 160         pr_debug("Registered %pF as sched_clock source\n", read);
 161 }
 162
 163 static unsigned long long notrace sched_clock_32(void)
 164 {
 165         u32 cyc = read_sched_clock();
 166         return cyc_to_sched_clock(cyc, sched_clock_mask);
 167 }
 168
 169 unsigned long long __read_mostly (*sched_clock_func)(void) = sched_clock_32;
 170
 171 unsigned long long notrace sched_clock(void)
 172 {
 173         if (cd.suspended)
 174                 return cd.epoch_ns;
 175
 176         return sched_clock_func();
 177 }
 178
 179 void __init sched_clock_postinit(void)
 180 {
 181         /*
 182          * If no sched_clock function has been provided at that point,
 183          * make it the final one one.
 184          */
 185         if (read_sched_clock == jiffy_sched_clock_read)
 186                 setup_sched_clock(jiffy_sched_clock_read, 32, HZ);
 187
 188         sched_clock_poll(sched_clock_timer.data);
 189 }
 190
 191 static int sched_clock_suspend(void)
 192 {
 193         sched_clock_poll(sched_clock_timer.data);
 194         cd.suspended = true;
 195         return 0;
 196 }
 197
 198 static void sched_clock_resume(void)
 199 {
 200         cd.epoch_cyc = read_sched_clock();
 201         cd.epoch_cyc_copy = cd.epoch_cyc;
 202         cd.suspended = false;
 203 }
 204
 205 static struct syscore_ops sched_clock_ops = {
 206         .suspend = sched_clock_suspend,
 207         .resume = sched_clock_resume,
 208 };
 209
 210 static int __init sched_clock_syscore_init(void)
 211 {
 212         register_syscore_ops(&sched_clock_ops);
 213         return 0;
 214 }
 215 device_initcall(sched_clock_syscore_init);