arch/i386/kernel/timers/timer_pit.c

   1 /*
   2  * This code largely moved from arch/i386/kernel/time.c.
   3  * See comments there for proper credits.
   4  */
   5
   6 #include <linux/spinlock.h>
   7 #include <linux/module.h>
   8 #include <linux/device.h>
   9 #include <linux/irq.h>
  10 #include <linux/sysdev.h>
  11 #include <linux/timex.h>
  12 #include <asm/delay.h>
  13 #include <asm/mpspec.h>
  14 #include <asm/timer.h>
  15 #include <asm/smp.h>
  16 #include <asm/io.h>
  17 #include <asm/arch_hooks.h>
  18 #include <asm/i8253.h>
  19
  20 #include "do_timer.h"
  21 #include "io_ports.h"
  22
  23 static int count_p; /* counter in get_offset_pit() */
  24
  25 static int __init init_pit(char* override)
  26 {
  27         /* check clock override */
  28         if (override[0] && strncmp(override,"pit",3))
  29                 printk(KERN_ERR "Warning: clock= override failed. Defaulting to PIT\n");
  30
  31         count_p = LATCH;
  32         return 0;
  33 }
  34
  35 static void mark_offset_pit(void)
  36 {
  37         /* nothing needed */
  38 }
  39
  40 static unsigned long long monotonic_clock_pit(void)
  41 {
  42         return 0;
  43 }
  44
  45 static void delay_pit(unsigned long loops)
  46 {
  47         int d0;
  48         __asm__ __volatile__(
  49                 "\tjmp 1f\n"
  50                 ".align 16\n"
  51                 "1:\tjmp 2f\n"
  52                 ".align 16\n"
  53                 "2:\tdecl %0\n\tjns 2b"
  54                 :"=&a" (d0)
  55                 :"0" (loops));
  56 }
  57
  58
  59 /* This function must be called with xtime_lock held.
  60  * It was inspired by Steve McCanne's microtime-i386 for BSD.  -- jrs
  61  *
  62  * However, the pc-audio speaker driver changes the divisor so that
  63  * it gets interrupted rather more often - it loads 64 into the
  64  * counter rather than 11932! This has an adverse impact on
  65  * do_gettimeoffset() -- it stops working! What is also not
  66  * good is that the interval that our timer function gets called
  67  * is no longer 10.0002 ms, but 9.9767 ms. To get around this
  68  * would require using a different timing source. Maybe someone
  69  * could use the RTC - I know that this can interrupt at frequencies
  70  * ranging from 8192Hz to 2Hz. If I had the energy, I'd somehow fix
  71  * it so that at startup, the timer code in sched.c would select
  72  * using either the RTC or the 8253 timer. The decision would be
  73  * based on whether there was any other device around that needed
  74  * to trample on the 8253. I'd set up the RTC to interrupt at 1024 Hz,
  75  * and then do some jiggery to have a version of do_timer that
  76  * advanced the clock by 1/1024 s. Every time that reached over 1/100
  77  * of a second, then do all the old code. If the time was kept correct
  78  * then do_gettimeoffset could just return 0 - there is no low order
  79  * divider that can be accessed.
  80  *
  81  * Ideally, you would be able to use the RTC for the speaker driver,
  82  * but it appears that the speaker driver really needs interrupt more
  83  * often than every 120 us or so.
  84  *
  85  * Anyway, this needs more thought....          pjsg (1993-08-28)
  86  *
  87  * If you are really that interested, you should be reading
  88  * comp.protocols.time.ntp!
  89  */
  90
  91 static unsigned long get_offset_pit(void)
  92 {
  93         int count;
  94         unsigned long flags;
  95         static unsigned long jiffies_p = 0;
  96
  97         /*
  98          * cache volatile jiffies temporarily; we have xtime_lock.
  99          */
 100         unsigned long jiffies_t;
 101
 102         spin_lock_irqsave(&i8253_lock, flags);
 103         /* timer count may underflow right here */
 104         outb_p(0x00, PIT_MODE); /* latch the count ASAP */
 105
 106         count = inb_p(PIT_CH0); /* read the latched count */
 107
 108         /*
 109          * We do this guaranteed double memory access instead of a _p
 110          * postfix in the previous port access. Wheee, hackady hack
 111          */
 112         jiffies_t = jiffies;
 113
 114         count |= inb_p(PIT_CH0) << 8;
 115
 116         /* VIA686a test code... reset the latch if count > max + 1 */
 117         if (count > LATCH) {
 118                 outb_p(0x34, PIT_MODE);
 119                 outb_p(LATCH & 0xff, PIT_CH0);
 120                 outb(LATCH >> 8, PIT_CH0);
 121                 count = LATCH - 1;
 122         }
 123
 124         /*
 125          * avoiding timer inconsistencies (they are rare, but they happen)...
 126          * there are two kinds of problems that must be avoided here:
 127          *  1. the timer counter underflows
 128          *  2. hardware problem with the timer, not giving us continuous time,
 129          *     the counter does small "jumps" upwards on some Pentium systems,
 130          *     (see c't 95/10 page 335 for Neptun bug.)
 131          */
 132
 133         if( jiffies_t == jiffies_p ) {
 134                 if( count > count_p ) {
 135                         /* the nutcase */
 136                         count = do_timer_overflow(count);
 137                 }
 138         } else
 139                 jiffies_p = jiffies_t;
 140
 141         count_p = count;
 142
 143         spin_unlock_irqrestore(&i8253_lock, flags);
 144
 145         count = ((LATCH-1) - count) * TICK_SIZE;
 146         count = (count + LATCH/2) / LATCH;
 147
 148         return count;
 149 }
 150
 151
 152 /* tsc timer_opts struct */
 153 struct timer_opts timer_pit = {
 154         .name = "pit",
 155         .mark_offset = mark_offset_pit,
 156         .get_offset = get_offset_pit,
 157         .monotonic_clock = monotonic_clock_pit,
 158         .delay = delay_pit,
 159 };
 160
 161 struct init_timer_opts __initdata timer_pit_init = {
 162         .init = init_pit,
 163         .opts = &timer_pit,
 164 };
 165
 166 void setup_pit_timer(void)
 167 {
 168         unsigned long flags;
 169
 170         spin_lock_irqsave(&i8253_lock, flags);
 171         outb_p(0x34,PIT_MODE);          /* binary, mode 2, LSB/MSB, ch 0 */
 172         udelay(10);
 173         outb_p(LATCH & 0xff , PIT_CH0); /* LSB */
 174         udelay(10);
 175         outb(LATCH >> 8 , PIT_CH0);     /* MSB */
 176         spin_unlock_irqrestore(&i8253_lock, flags);
 177 }
 178
 179 static int timer_resume(struct sys_device *dev)
 180 {
 181         setup_pit_timer();
 182         return 0;
 183 }
 184
 185 static struct sysdev_class timer_sysclass = {
 186         set_kset_name("timer_pit"),
 187         .resume = timer_resume,
 188 };
 189
 190 static struct sys_device device_timer = {
 191         .id     = 0,
 192         .cls    = &timer_sysclass,
 193 };
 194
 195 static int __init init_timer_sysfs(void)
 196 {
 197         int error = sysdev_class_register(&timer_sysclass);
 198         if (!error)
 199                 error = sysdev_register(&device_timer);
 200         return error;
 201 }
 202
 203 device_initcall(init_timer_sysfs);
 204