2 * Real Time Clock interface for
3 * - q40 and other m68k machines,
6 * emulate some RTC irq capabilities in software
8 * Copyright (C) 1999 Richard Zidlicky
10 * based on Paul Gortmaker's rtc.c device and
11 * Sam Creasey Generic rtc driver
13 * This driver allows use of the real time clock (built into
14 * nearly all computers) from user space. It exports the /dev/rtc
15 * interface supporting various ioctl() and also the /proc/driver/rtc
16 * pseudo-file for status information.
18 * The ioctls can be used to set the interrupt behaviour where
21 * The /dev/rtc interface will block on reads until an interrupt
22 * has been received. If a RTC interrupt has already happened,
23 * it will output an unsigned long and then block. The output value
24 * contains the interrupt status in the low byte and the number of
25 * interrupts since the last read in the remaining high bytes. The
26 * /dev/rtc interface can also be used with the select(2) call.
28 * This program is free software; you can redistribute it and/or
29 * modify it under the terms of the GNU General Public License
30 * as published by the Free Software Foundation; either version
31 * 2 of the License, or (at your option) any later version.
34 * 1.01 fix for 2.3.X rz@linux-m68k.org
35 * 1.02 merged with code from genrtc.c rz@linux-m68k.org
36 * 1.03 make it more portable zippel@linux-m68k.org
37 * 1.04 removed useless timer code rz@linux-m68k.org
38 * 1.05 portable RTC_UIE emulation rz@linux-m68k.org
39 * 1.06 set_rtc_time can return an error trini@kernel.crashing.org
40 * 1.07 ported to HP PARISC (hppa) Helge Deller <deller@gmx.de>
43 #define RTC_VERSION "1.07"
45 #include <linux/module.h>
46 #include <linux/errno.h>
47 #include <linux/miscdevice.h>
48 #include <linux/fcntl.h>
50 #include <linux/rtc.h>
51 #include <linux/init.h>
52 #include <linux/poll.h>
53 #include <linux/proc_fs.h>
54 #include <linux/workqueue.h>
56 #include <asm/uaccess.h>
57 #include <asm/system.h>
61 * We sponge a minor off of the misc major. No need slurping
62 * up another valuable major dev number for this. If you add
63 * an ioctl, make sure you don't conflict with SPARC's RTC
67 static DECLARE_WAIT_QUEUE_HEAD(gen_rtc_wait
);
70 * Bits in gen_rtc_status.
73 #define RTC_IS_OPEN 0x01 /* means /dev/rtc is in use */
75 static unsigned char gen_rtc_status
; /* bitmapped status byte. */
76 static unsigned long gen_rtc_irq_data
; /* our output to the world */
78 /* months start at 0 now */
79 static unsigned char days_in_mo
[] =
80 {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
82 static int irq_active
;
84 #ifdef CONFIG_GEN_RTC_X
85 static struct work_struct genrtc_task
;
86 static struct timer_list timer_task
;
88 static unsigned int oldsecs
;
90 static unsigned long tt_exp
;
92 static void gen_rtc_timer(unsigned long data
);
94 static volatile int stask_active
; /* schedule_work */
95 static volatile int ttask_active
; /* timer_task */
96 static int stop_rtc_timers
; /* don't requeue tasks */
97 static DEFINE_SPINLOCK(gen_rtc_lock
);
99 static void gen_rtc_interrupt(unsigned long arg
);
102 * Routine to poll RTC seconds field for change as often as possible,
103 * after first RTC_UIE use timer to reduce polling
105 static void genrtc_troutine(struct work_struct
*work
)
107 unsigned int tmp
= get_rtc_ss();
109 if (stop_rtc_timers
) {
117 timer_task
.function
= gen_rtc_timer
;
118 timer_task
.expires
= jiffies
+ HZ
- (HZ
/10);
119 tt_exp
=timer_task
.expires
;
122 add_timer(&timer_task
);
124 gen_rtc_interrupt(0);
125 } else if (schedule_work(&genrtc_task
) == 0)
129 static void gen_rtc_timer(unsigned long data
)
131 lostint
= get_rtc_ss() - oldsecs
;
133 lostint
= 60 - lostint
;
134 if (time_after(jiffies
, tt_exp
))
135 printk(KERN_INFO
"genrtc: timer task delayed by %ld jiffies\n",
139 if ((schedule_work(&genrtc_task
) == 0))
144 * call gen_rtc_interrupt function to signal an RTC_UIE,
146 * Could be invoked either from a real interrupt handler or
147 * from some routine that periodically (eg 100HZ) monitors
148 * whether RTC_SECS changed
150 static void gen_rtc_interrupt(unsigned long arg
)
152 /* We store the status in the low byte and the number of
153 * interrupts received since the last read in the remainder
154 * of rtc_irq_data. */
156 gen_rtc_irq_data
+= 0x100;
157 gen_rtc_irq_data
&= ~0xff;
158 gen_rtc_irq_data
|= RTC_UIE
;
161 printk("genrtc: system delaying clock ticks?\n");
162 /* increment count so that userspace knows something is wrong */
163 gen_rtc_irq_data
+= ((lostint
-1)<<8);
167 wake_up_interruptible(&gen_rtc_wait
);
171 * Now all the various file operations that we export.
173 static ssize_t
gen_rtc_read(struct file
*file
, char __user
*buf
,
174 size_t count
, loff_t
*ppos
)
179 if (count
!= sizeof (unsigned int) && count
!= sizeof (unsigned long))
182 if (file
->f_flags
& O_NONBLOCK
&& !gen_rtc_irq_data
)
185 retval
= wait_event_interruptible(gen_rtc_wait
,
186 (data
= xchg(&gen_rtc_irq_data
, 0)));
190 /* first test allows optimizer to nuke this case for 32-bit machines */
191 if (sizeof (int) != sizeof (long) && count
== sizeof (unsigned int)) {
192 unsigned int uidata
= data
;
193 retval
= put_user(uidata
, (unsigned int __user
*)buf
) ?:
194 sizeof(unsigned int);
197 retval
= put_user(data
, (unsigned long __user
*)buf
) ?:
198 sizeof(unsigned long);
204 static unsigned int gen_rtc_poll(struct file
*file
,
205 struct poll_table_struct
*wait
)
207 poll_wait(file
, &gen_rtc_wait
, wait
);
208 if (gen_rtc_irq_data
!= 0)
209 return POLLIN
| POLLRDNORM
;
216 * Used to disable/enable interrupts, only RTC_UIE supported
217 * We also clear out any old irq data after an ioctl() that
218 * meddles with the interrupt enable/disable bits.
221 static inline void gen_clear_rtc_irq_bit(unsigned char bit
)
223 #ifdef CONFIG_GEN_RTC_X
226 del_timer_sync(&timer_task
);
232 spin_lock(&gen_rtc_lock
);
234 spin_unlock(&gen_rtc_lock
);
238 static inline int gen_set_rtc_irq_bit(unsigned char bit
)
240 #ifdef CONFIG_GEN_RTC_X
241 spin_lock(&gen_rtc_lock
);
246 INIT_WORK(&genrtc_task
, genrtc_troutine
);
247 oldsecs
= get_rtc_ss();
248 init_timer(&timer_task
);
251 if (schedule_work(&genrtc_task
) == 0){
255 spin_unlock(&gen_rtc_lock
);
256 gen_rtc_irq_data
= 0;
263 static int gen_rtc_ioctl(struct inode
*inode
, struct file
*file
,
264 unsigned int cmd
, unsigned long arg
)
266 struct rtc_time wtime
;
267 struct rtc_pll_info pll
;
268 void __user
*argp
= (void __user
*)arg
;
273 if (get_rtc_pll(&pll
))
276 return copy_to_user(argp
, &pll
, sizeof pll
) ? -EFAULT
: 0;
279 if (!capable(CAP_SYS_TIME
))
281 if (copy_from_user(&pll
, argp
, sizeof(pll
)))
283 return set_rtc_pll(&pll
);
285 case RTC_UIE_OFF
: /* disable ints from RTC updates. */
286 gen_clear_rtc_irq_bit(RTC_UIE
);
289 case RTC_UIE_ON
: /* enable ints for RTC updates. */
290 return gen_set_rtc_irq_bit(RTC_UIE
);
292 case RTC_RD_TIME
: /* Read the time/date from RTC */
293 /* this doesn't get week-day, who cares */
294 memset(&wtime
, 0, sizeof(wtime
));
295 get_rtc_time(&wtime
);
297 return copy_to_user(argp
, &wtime
, sizeof(wtime
)) ? -EFAULT
: 0;
299 case RTC_SET_TIME
: /* Set the RTC */
302 unsigned char leap_yr
;
304 if (!capable(CAP_SYS_TIME
))
307 if (copy_from_user(&wtime
, argp
, sizeof(wtime
)))
310 year
= wtime
.tm_year
+ 1900;
311 leap_yr
= ((!(year
% 4) && (year
% 100)) ||
314 if ((wtime
.tm_mon
< 0 || wtime
.tm_mon
> 11) || (wtime
.tm_mday
< 1))
317 if (wtime
.tm_mday
< 0 || wtime
.tm_mday
>
318 (days_in_mo
[wtime
.tm_mon
] + ((wtime
.tm_mon
== 1) && leap_yr
)))
321 if (wtime
.tm_hour
< 0 || wtime
.tm_hour
>= 24 ||
322 wtime
.tm_min
< 0 || wtime
.tm_min
>= 60 ||
323 wtime
.tm_sec
< 0 || wtime
.tm_sec
>= 60)
326 return set_rtc_time(&wtime
);
334 * We enforce only one user at a time here with the open/close.
335 * Also clear the previous interrupt data on an open, and clean
336 * up things on a close.
339 static int gen_rtc_open(struct inode
*inode
, struct file
*file
)
341 if (gen_rtc_status
& RTC_IS_OPEN
)
344 gen_rtc_status
|= RTC_IS_OPEN
;
345 gen_rtc_irq_data
= 0;
351 static int gen_rtc_release(struct inode
*inode
, struct file
*file
)
354 * Turn off all interrupts once the device is no longer
355 * in use and clear the data.
358 gen_clear_rtc_irq_bit(RTC_PIE
|RTC_AIE
|RTC_UIE
);
360 gen_rtc_status
&= ~RTC_IS_OPEN
;
365 #ifdef CONFIG_PROC_FS
368 * Info exported via "/proc/driver/rtc".
371 static int gen_rtc_proc_output(char *buf
)
376 struct rtc_pll_info pll
;
380 flags
= get_rtc_time(&tm
);
383 "rtc_time\t: %02d:%02d:%02d\n"
384 "rtc_date\t: %04d-%02d-%02d\n"
385 "rtc_epoch\t: %04u\n",
386 tm
.tm_hour
, tm
.tm_min
, tm
.tm_sec
,
387 tm
.tm_year
+ 1900, tm
.tm_mon
+ 1, tm
.tm_mday
, 1900);
389 tm
.tm_hour
= tm
.tm_min
= tm
.tm_sec
= 0;
391 p
+= sprintf(p
, "alarm\t\t: ");
392 if (tm
.tm_hour
<= 24)
393 p
+= sprintf(p
, "%02d:", tm
.tm_hour
);
395 p
+= sprintf(p
, "**:");
398 p
+= sprintf(p
, "%02d:", tm
.tm_min
);
400 p
+= sprintf(p
, "**:");
403 p
+= sprintf(p
, "%02d\n", tm
.tm_sec
);
405 p
+= sprintf(p
, "**\n");
411 "square_wave\t: %s\n"
414 "periodic_IRQ\t: %s\n"
415 "periodic_freq\t: %ld\n"
416 "batt_status\t: %s\n",
417 (flags
& RTC_DST_EN
) ? "yes" : "no",
418 (flags
& RTC_DM_BINARY
) ? "no" : "yes",
419 (flags
& RTC_24H
) ? "yes" : "no",
420 (flags
& RTC_SQWE
) ? "yes" : "no",
421 (flags
& RTC_AIE
) ? "yes" : "no",
422 irq_active
? "yes" : "no",
423 (flags
& RTC_PIE
) ? "yes" : "no",
425 (flags
& RTC_BATT_BAD
) ? "bad" : "okay");
426 if (!get_rtc_pll(&pll
))
428 "PLL adjustment\t: %d\n"
429 "PLL max +ve adjustment\t: %d\n"
430 "PLL max -ve adjustment\t: %d\n"
431 "PLL +ve adjustment factor\t: %d\n"
432 "PLL -ve adjustment factor\t: %d\n"
433 "PLL frequency\t: %ld\n",
443 static int gen_rtc_read_proc(char *page
, char **start
, off_t off
,
444 int count
, int *eof
, void *data
)
446 int len
= gen_rtc_proc_output (page
);
447 if (len
<= off
+count
) *eof
= 1;
450 if (len
>count
) len
= count
;
455 static int __init
gen_rtc_proc_init(void)
457 struct proc_dir_entry
*r
;
459 r
= create_proc_read_entry("driver/rtc", 0, NULL
, gen_rtc_read_proc
, NULL
);
465 static inline int gen_rtc_proc_init(void) { return 0; }
466 #endif /* CONFIG_PROC_FS */
470 * The various file operations we support.
473 static const struct file_operations gen_rtc_fops
= {
474 .owner
= THIS_MODULE
,
475 #ifdef CONFIG_GEN_RTC_X
476 .read
= gen_rtc_read
,
477 .poll
= gen_rtc_poll
,
479 .ioctl
= gen_rtc_ioctl
,
480 .open
= gen_rtc_open
,
481 .release
= gen_rtc_release
,
484 static struct miscdevice rtc_gen_dev
=
488 .fops
= &gen_rtc_fops
,
491 static int __init
rtc_generic_init(void)
495 printk(KERN_INFO
"Generic RTC Driver v%s\n", RTC_VERSION
);
497 retval
= misc_register(&rtc_gen_dev
);
501 retval
= gen_rtc_proc_init();
503 misc_deregister(&rtc_gen_dev
);
510 static void __exit
rtc_generic_exit(void)
512 remove_proc_entry ("driver/rtc", NULL
);
513 misc_deregister(&rtc_gen_dev
);
517 module_init(rtc_generic_init
);
518 module_exit(rtc_generic_exit
);
520 MODULE_AUTHOR("Richard Zidlicky");
521 MODULE_LICENSE("GPL");
522 MODULE_ALIAS_MISCDEV(RTC_MINOR
);