1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
|
/* RTC_TOGGLE
uses real time clock to generate an interrupt and
toggles parallel port on each irq
Originally by Michael "FZ" Barabanov(c) 1997, Released under the GPL.
Modified by Victor Yodaiken (c) 1998, Released under the GPL.
*/
#include <linux/module.h>
#include <linux/kernel.h>
#include <asm/ptrace.h>
#include <linux/rtl.h>
#include <asm/io.h>
#include <linux/cons.h>
#include <rtl_sync.h>
#include "common.h"
static int output = 0xffff;
#include <linux/mc146818rtc.h>
char save_cmos_A;
char save_cmos_B;
void shutdown(void);
static int shutdown_flag = 0;
unsigned int handler(unsigned int irq_number, struct pt_regs *p) {
/* Do not rt_task_wait() in a handler */
static int debug = 1000;
switch(shutdown_flag){
case 0:
outb(output, LPT_PORT);
/* I'm too lazy to figure out which pin is which
so just toggle all of them */
output = ~output;
(void) CMOS_READ(RTC_REG_C); /* clear IRQ */
break;
case 1:
shutdown_flag = 2;
default: /* do nothing */
}
return 0;
}
int init_module(void)
{
unsigned char ctemp;
int old_irq_state;
int debug;
printk("Starting parallel port module\n");
rtl_no_interrupts(old_irq_state);
debug = rtl_request_global_irq(8, handler);
printk("Requested 8 and got %d\n",debug);
/* program the RTC to interrupt at 8192 Hz */
save_cmos_A = CMOS_READ(RTC_REG_A);
save_cmos_B = CMOS_READ(RTC_REG_B);
CMOS_WRITE(0x23, RTC_REG_A); /* 32kHz Time Base, 8192 Hz interrupt frequency */
ctemp = CMOS_READ(RTC_REG_B);
ctemp &= 0x8f; /* Clear */
ctemp |= 0x40; /* Periodic interrupt enable */
CMOS_WRITE(ctemp, RTC_REG_B);
(void) CMOS_READ(RTC_REG_C);
rtl_restore_interrupts(old_irq_state);
return 0;
}
void shutdown(){
int old_irq_state;
rtl_no_interrupts(old_irq_state);
CMOS_WRITE(save_cmos_A, RTC_REG_A);
CMOS_WRITE(save_cmos_B, RTC_REG_B);
rtl_free_global_irq(8);
rtl_restore_interrupts(old_irq_state);
}
void cleanup_module(void)
{
int timeout = 100000;
shutdown_flag = 1;
while((shutdown_flag==1) && timeout--);
/* so it's kinda sloppy, wait for timeout or for
interrupt routine to ack shutdown, whatever comes
first */
shutdown();
}
|
