207a55bdde98184db3ed5c2cedec59c3e10e0820
[linux-2.6.git] / 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);