arch/arm/kernel/time.c

   1 /*
   2  *  linux/arch/arm/kernel/time.c
   3  *
   4  *  Copyright (C) 1991, 1992, 1995  Linus Torvalds
   5  *  Modifications for ARM (C) 1994-2001 Russell King
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License version 2 as
   9  * published by the Free Software Foundation.
  10  *
  11  *  This file contains the ARM-specific time handling details:
  12  *  reading the RTC at bootup, etc...
  13  *
  14  *  1994-07-02  Alan Modra
  15  *              fixed set_rtc_mmss, fixed time.year for >= 2000, new mktime
  16  *  1998-12-20  Updated NTP code according to technical memorandum Jan '96
  17  *              "A Kernel Model for Precision Timekeeping" by Dave Mills
  18  */
  19 #include <linux/config.h>
  20 #include <linux/module.h>
  21 #include <linux/kernel.h>
  22 #include <linux/interrupt.h>
  23 #include <linux/time.h>
  24 #include <linux/init.h>
  25 #include <linux/smp.h>
  26 #include <linux/timex.h>
  27 #include <linux/errno.h>
  28 #include <linux/profile.h>
  29
  30 #include <asm/hardware.h>
  31 #include <asm/io.h>
  32 #include <asm/irq.h>
  33 #include <asm/leds.h>
  34
  35 u64 jiffies_64 = INITIAL_JIFFIES;
  36
  37 extern unsigned long wall_jiffies;
  38
  39 /* this needs a better home */
  40 spinlock_t rtc_lock = SPIN_LOCK_UNLOCKED;
  41
  42 #ifdef CONFIG_SA1100_RTC_MODULE
  43 EXPORT_SYMBOL(rtc_lock);
  44 #endif
  45
  46 /* change this if you have some constant time drift */
  47 #define USECS_PER_JIFFY (1000000/HZ)
  48
  49 static int dummy_set_rtc(void)
  50 {
  51         return 0;
  52 }
  53
  54 /*
  55  * hook for setting the RTC's idea of the current time.
  56  */
  57 int (*set_rtc)(void) = dummy_set_rtc;
  58
  59 static unsigned long dummy_gettimeoffset(void)
  60 {
  61         return 0;
  62 }
  63
  64 /*
  65  * hook for getting the time offset.  Note that it is
  66  * always called with interrupts disabled.
  67  */
  68 unsigned long (*gettimeoffset)(void) = dummy_gettimeoffset;
  69
  70 /*
  71  * Handle kernel profile stuff...
  72  */
  73 static inline void do_profile(struct pt_regs *regs)
  74 {
  75         if (!user_mode(regs) &&
  76             prof_buffer &&
  77             current->pid) {
  78                 unsigned long pc = instruction_pointer(regs);
  79                 extern int _stext;
  80
  81                 pc -= (unsigned long)&_stext;
  82
  83                 pc >>= prof_shift;
  84
  85                 if (pc >= prof_len)
  86                         pc = prof_len - 1;
  87
  88                 prof_buffer[pc] += 1;
  89         }
  90 }
  91
  92 static unsigned long next_rtc_update;
  93
  94 /*
  95  * If we have an externally synchronized linux clock, then update
  96  * CMOS clock accordingly every ~11 minutes.  set_rtc() has to be
  97  * called as close as possible to 500 ms before the new second
  98  * starts.
  99  */
 100 static inline void do_set_rtc(void)
 101 {
 102         if (time_status & STA_UNSYNC || set_rtc == NULL)
 103                 return;
 104
 105         if (next_rtc_update &&
 106             time_before(xtime.tv_sec, next_rtc_update))
 107                 return;
 108
 109         if (xtime.tv_nsec < 500000000 - ((unsigned) tick_nsec >> 1) &&
 110             xtime.tv_nsec >= 500000000 + ((unsigned) tick_nsec >> 1))
 111                 return;
 112
 113         if (set_rtc())
 114                 /*
 115                  * rtc update failed.  Try again in 60s
 116                  */
 117                 next_rtc_update = xtime.tv_sec + 60;
 118         else
 119                 next_rtc_update = xtime.tv_sec + 660;
 120 }
 121
 122 #ifdef CONFIG_LEDS
 123
 124 static void dummy_leds_event(led_event_t evt)
 125 {
 126 }
 127
 128 void (*leds_event)(led_event_t) = dummy_leds_event;
 129
 130 EXPORT_SYMBOL(leds_event);
 131 #endif
 132
 133 #ifdef CONFIG_LEDS_TIMER
 134 static void do_leds(void)
 135 {
 136         static unsigned int count = 50;
 137
 138         if (--count == 0) {
 139                 count = 50;
 140                 leds_event(led_timer);
 141         }
 142 }
 143 #else
 144 #define do_leds()
 145 #endif
 146
 147 void do_gettimeofday(struct timeval *tv)
 148 {
 149         unsigned long flags;
 150         unsigned long seq;
 151         unsigned long usec, sec, lost;
 152
 153         do {
 154                 seq = read_seqbegin_irqsave(&xtime_lock, flags);
 155                 usec = gettimeoffset();
 156
 157                 lost = jiffies - wall_jiffies;
 158                 if (lost)
 159                         usec += lost * USECS_PER_JIFFY;
 160
 161                 sec = xtime.tv_sec;
 162                 usec += xtime.tv_nsec / 1000;
 163         } while (read_seqretry_irqrestore(&xtime_lock, seq, flags));
 164
 165         /* usec may have gone up a lot: be safe */
 166         while (usec >= 1000000) {
 167                 usec -= 1000000;
 168                 sec++;
 169         }
 170
 171         tv->tv_sec = sec;
 172         tv->tv_usec = usec;
 173 }
 174
 175 int do_settimeofday(struct timespec *tv)
 176 {
 177         time_t wtm_sec, sec = tv->tv_sec;
 178         long wtm_nsec, nsec = tv->tv_nsec;
 179
 180         if ((unsigned long)tv->tv_nsec >= NSEC_PER_SEC)
 181                 return -EINVAL;
 182
 183         write_seqlock_irq(&xtime_lock);
 184         /*
 185          * This is revolting. We need to set "xtime" correctly. However, the
 186          * value in this location is the value at the most recent update of
 187          * wall time.  Discover what correction gettimeofday() would have
 188          * done, and then undo it!
 189          */
 190         nsec -= gettimeoffset() * NSEC_PER_USEC;
 191         nsec -= (jiffies - wall_jiffies) * TICK_NSEC;
 192
 193         wtm_sec  = wall_to_monotonic.tv_sec + (xtime.tv_sec - sec);
 194         wtm_nsec = wall_to_monotonic.tv_nsec + (xtime.tv_nsec - nsec);
 195
 196         set_normalized_timespec(&xtime, sec, nsec);
 197         set_normalized_timespec(&wall_to_monotonic, wtm_sec, wtm_nsec);
 198
 199         time_adjust = 0;                /* stop active adjtime() */
 200         time_status |= STA_UNSYNC;
 201         time_maxerror = NTP_PHASE_LIMIT;
 202         time_esterror = NTP_PHASE_LIMIT;
 203         write_sequnlock_irq(&xtime_lock);
 204         clock_was_set();
 205         return 0;
 206 }
 207
 208 static struct irqaction timer_irq = {
 209         .name   = "timer",
 210         .flags  = SA_INTERRUPT,
 211 };
 212
 213 /*
 214  * Include architecture specific code
 215  */
 216 #include <asm/arch/time.h>