MOXA linux-2.6.x / linux-2.6.9-uc0 from sdlinux-moxaart.tgz
[linux-2.6.9-moxart.git] / arch / um / kernel / time_kern.c
blob5ce5668825fc750c4d234c6e67fae3e6f1ddb3fd
1 /*
2 * Copyright (C) 2000 Jeff Dike (jdike@karaya.com)
3 * Licensed under the GPL
4 */
6 #include "linux/kernel.h"
7 #include "linux/module.h"
8 #include "linux/unistd.h"
9 #include "linux/stddef.h"
10 #include "linux/spinlock.h"
11 #include "linux/time.h"
12 #include "linux/sched.h"
13 #include "linux/interrupt.h"
14 #include "linux/init.h"
15 #include "linux/delay.h"
16 #include "asm/irq.h"
17 #include "asm/param.h"
18 #include "asm/current.h"
19 #include "kern_util.h"
20 #include "user_util.h"
21 #include "time_user.h"
22 #include "mode.h"
23 #include "os.h"
25 u64 jiffies_64;
27 EXPORT_SYMBOL(jiffies_64);
29 int hz(void)
31 return(HZ);
35 * Scheduler clock - returns current time in nanosec units.
37 unsigned long long sched_clock(void)
39 return (unsigned long long)jiffies_64 * (1000000000 / HZ);
42 /* Changed at early boot */
43 int timer_irq_inited = 0;
45 static int first_tick;
46 static unsigned long long prev_usecs;
47 #ifdef CONFIG_UML_REAL_TIME_CLOCK
48 static long long delta; /* Deviation per interval */
49 #endif
51 #define MILLION 1000000
53 void timer_irq(union uml_pt_regs *regs)
55 unsigned long long ticks = 0;
57 if(!timer_irq_inited){
58 /* This is to ensure that ticks don't pile up when
59 * the timer handler is suspended */
60 first_tick = 0;
61 return;
64 if(first_tick){
65 #ifdef CONFIG_UML_REAL_TIME_CLOCK
66 /* We've had 1 tick */
67 unsigned long long usecs = os_usecs();
69 delta += usecs - prev_usecs;
70 prev_usecs = usecs;
72 /* Protect against the host clock being set backwards */
73 if(delta < 0)
74 delta = 0;
76 ticks += (delta * HZ) / MILLION;
77 delta -= (ticks * MILLION) / HZ;
78 #else
79 ticks = 1;
80 #endif
82 else {
83 prev_usecs = os_usecs();
84 first_tick = 1;
87 while(ticks > 0){
88 do_IRQ(TIMER_IRQ, regs);
89 ticks--;
93 void boot_timer_handler(int sig)
95 struct pt_regs regs;
97 CHOOSE_MODE((void)
98 (UPT_SC(&regs.regs) = (struct sigcontext *) (&sig + 1)),
99 (void) (regs.regs.skas.is_user = 0));
100 do_timer(&regs);
103 irqreturn_t um_timer(int irq, void *dev, struct pt_regs *regs)
105 unsigned long flags;
107 do_timer(regs);
108 write_seqlock_irqsave(&xtime_lock, flags);
109 timer();
110 write_sequnlock_irqrestore(&xtime_lock, flags);
111 return(IRQ_HANDLED);
114 long um_time(int * tloc)
116 struct timeval now;
118 do_gettimeofday(&now);
119 if (tloc) {
120 if (put_user(now.tv_sec,tloc))
121 now.tv_sec = -EFAULT;
123 return now.tv_sec;
126 long um_stime(int * tptr)
128 int value;
129 struct timespec new;
131 if (get_user(value, tptr))
132 return -EFAULT;
133 new.tv_sec = value;
134 new.tv_nsec = 0;
135 do_settimeofday(&new);
136 return 0;
139 /* XXX Needs to be moved under sys-i386 */
140 void __delay(um_udelay_t time)
142 /* Stolen from the i386 __loop_delay */
143 int d0;
144 __asm__ __volatile__(
145 "\tjmp 1f\n"
146 ".align 16\n"
147 "1:\tjmp 2f\n"
148 ".align 16\n"
149 "2:\tdecl %0\n\tjns 2b"
150 :"=&a" (d0)
151 :"0" (time));
154 void __udelay(um_udelay_t usecs)
156 int i, n;
158 n = (loops_per_jiffy * HZ * usecs) / MILLION;
159 for(i=0;i<n;i++) ;
162 void __const_udelay(um_udelay_t usecs)
164 int i, n;
166 n = (loops_per_jiffy * HZ * usecs) / MILLION;
167 for(i=0;i<n;i++) ;
170 void timer_handler(int sig, union uml_pt_regs *regs)
172 #ifdef CONFIG_SMP
173 local_irq_disable();
174 update_process_times(user_context(UPT_SP(regs)));
175 local_irq_enable();
176 #endif
177 if(current_thread->cpu == 0)
178 timer_irq(regs);
181 static spinlock_t timer_spinlock = SPIN_LOCK_UNLOCKED;
183 unsigned long time_lock(void)
185 unsigned long flags;
187 spin_lock_irqsave(&timer_spinlock, flags);
188 return(flags);
191 void time_unlock(unsigned long flags)
193 spin_unlock_irqrestore(&timer_spinlock, flags);
196 int __init timer_init(void)
198 int err;
200 CHOOSE_MODE(user_time_init_tt(), user_time_init_skas());
201 err = request_irq(TIMER_IRQ, um_timer, SA_INTERRUPT, "timer", NULL);
202 if(err != 0)
203 printk(KERN_ERR "timer_init : request_irq failed - "
204 "errno = %d\n", -err);
205 timer_irq_inited = 1;
206 return(0);
209 __initcall(timer_init);
212 * Overrides for Emacs so that we follow Linus's tabbing style.
213 * Emacs will notice this stuff at the end of the file and automatically
214 * adjust the settings for this buffer only. This must remain at the end
215 * of the file.
216 * ---------------------------------------------------------------------------
217 * Local variables:
218 * c-file-style: "linux"
219 * End: