err.no Git - linux-2.6/blob - arch/m68knommu/kernel/time.c

   1 /*
   2  *  linux/arch/m68knommu/kernel/time.c
   3  *
   4  *  Copyright (C) 1991, 1992, 1995  Linus Torvalds
   5  *
   6  * This file contains the m68k-specific time handling details.
   7  * Most of the stuff is located in the machine specific files.
   8  *
   9  * 1997-09-10   Updated NTP code according to technical memorandum Jan '96
  10  *              "A Kernel Model for Precision Timekeeping" by Dave Mills
  11  */
  12
  13 #include <linux/errno.h>
  14 #include <linux/module.h>
  15 #include <linux/sched.h>
  16 #include <linux/kernel.h>
  17 #include <linux/param.h>
  18 #include <linux/string.h>
  19 #include <linux/mm.h>
  20 #include <linux/profile.h>
  21 #include <linux/time.h>
  22 #include <linux/timex.h>
  23
  24 #include <asm/machdep.h>
  25 #include <asm/irq_regs.h>
  26
  27 #define TICK_SIZE (tick_nsec / 1000)
  28
  29 static inline int set_rtc_mmss(unsigned long nowtime)
  30 {
  31         if (mach_set_clock_mmss)
  32                 return mach_set_clock_mmss (nowtime);
  33         return -1;
  34 }
  35
  36 /*
  37  * timer_interrupt() needs to keep up the real-time clock,
  38  * as well as call the "do_timer()" routine every clocktick
  39  */
  40 irqreturn_t arch_timer_interrupt(int irq, void *dummy)
  41 {
  42         /* last time the cmos clock got updated */
  43         static long last_rtc_update=0;
  44
  45         write_seqlock(&xtime_lock);
  46
  47         do_timer(1);
  48 #ifndef CONFIG_SMP
  49         update_process_times(user_mode(get_irq_regs()));
  50 #endif
  51         if (current->pid)
  52                 profile_tick(CPU_PROFILING);
  53
  54         /*
  55          * If we have an externally synchronized Linux clock, then update
  56          * CMOS clock accordingly every ~11 minutes. Set_rtc_mmss() has to be
  57          * called as close as possible to 500 ms before the new second starts.
  58          */
  59         if (ntp_synced() &&
  60             xtime.tv_sec > last_rtc_update + 660 &&
  61             (xtime.tv_nsec / 1000) >= 500000 - ((unsigned) TICK_SIZE) / 2 &&
  62             (xtime.tv_nsec  / 1000) <= 500000 + ((unsigned) TICK_SIZE) / 2) {
  63           if (set_rtc_mmss(xtime.tv_sec) == 0)
  64             last_rtc_update = xtime.tv_sec;
  65           else
  66             last_rtc_update = xtime.tv_sec - 600; /* do it again in 60 s */
  67         }
  68
  69         write_sequnlock(&xtime_lock);
  70         return(IRQ_HANDLED);
  71 }
  72
  73 void time_init(void)
  74 {
  75         unsigned int year, mon, day, hour, min, sec;
  76
  77         if (mach_gettod)
  78                 mach_gettod(&year, &mon, &day, &hour, &min, &sec);
  79         else
  80                 year = mon = day = hour = min = sec = 0;
  81
  82         if ((year += 1900) < 1970)
  83                 year += 100;
  84         xtime.tv_sec = mktime(year, mon, day, hour, min, sec);
  85         xtime.tv_nsec = 0;
  86         wall_to_monotonic.tv_sec = -xtime.tv_sec;
  87
  88         hw_timer_init();
  89 }
  90
  91 /*
  92  * This version of gettimeofday has near microsecond resolution.
  93  */
  94 void do_gettimeofday(struct timeval *tv)
  95 {
  96         unsigned long flags;
  97         unsigned long seq;
  98         unsigned long usec, sec;
  99
 100         do {
 101                 seq = read_seqbegin_irqsave(&xtime_lock, flags);
 102                 usec = hw_timer_offset();
 103                 sec = xtime.tv_sec;
 104                 usec += (xtime.tv_nsec / 1000);
 105         } while (read_seqretry_irqrestore(&xtime_lock, seq, flags));
 106
 107         while (usec >= 1000000) {
 108                 usec -= 1000000;
 109                 sec++;
 110         }
 111
 112         tv->tv_sec = sec;
 113         tv->tv_usec = usec;
 114 }
 115
 116 EXPORT_SYMBOL(do_gettimeofday);
 117
 118 int do_settimeofday(struct timespec *tv)
 119 {
 120         time_t wtm_sec, sec = tv->tv_sec;
 121         long wtm_nsec, nsec = tv->tv_nsec;
 122
 123         if ((unsigned long)tv->tv_nsec >= NSEC_PER_SEC)
 124                 return -EINVAL;
 125
 126         write_seqlock_irq(&xtime_lock);
 127         /*
 128          * This is revolting. We need to set the xtime.tv_usec
 129          * correctly. However, the value in this location is
 130          * is value at the last tick.
 131          * Discover what correction gettimeofday
 132          * would have done, and then undo it!
 133          */
 134         nsec -= (hw_timer_offset() * 1000);
 135
 136         wtm_sec  = wall_to_monotonic.tv_sec + (xtime.tv_sec - sec);
 137         wtm_nsec = wall_to_monotonic.tv_nsec + (xtime.tv_nsec - nsec);
 138
 139         set_normalized_timespec(&xtime, sec, nsec);
 140         set_normalized_timespec(&wall_to_monotonic, wtm_sec, wtm_nsec);
 141
 142         ntp_clear();
 143         write_sequnlock_irq(&xtime_lock);
 144         clock_was_set();
 145         return 0;
 146 }
 147 EXPORT_SYMBOL(do_settimeofday);