ac54fe55a0fcc1ff3d85ecb2fcad3014b7d23bbf
[dragonfly.git] / sys / platform / pc64 / isa / intr_machdep.c
1 /*-
2  * Copyright (c) 1991 The Regents of the University of California.
3  * Copyright (c) 2008 The DragonFly Project.
4  * All rights reserved.
5  *
6  * This code is derived from software contributed to Berkeley by
7  * William Jolitz.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. All advertising materials mentioning features or use of this software
18  *    must display the following acknowledgement:
19  *      This product includes software developed by the University of
20  *      California, Berkeley and its contributors.
21  * 4. Neither the name of the University nor the names of its contributors
22  *    may be used to endorse or promote products derived from this software
23  *    without specific prior written permission.
24  *
25  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35  * SUCH DAMAGE.
36  *
37  *      from: @(#)isa.c 7.2 (Berkeley) 5/13/91
38  * $FreeBSD: src/sys/i386/isa/intr_machdep.c,v 1.29.2.5 2001/10/14 06:54:27 luigi Exp $
39  * $DragonFly: src/sys/platform/pc64/isa/intr_machdep.c,v 1.1 2008/08/29 17:07:19 dillon Exp $
40  */
41 /*
42  * This file contains an aggregated module marked:
43  * Copyright (c) 1997, Stefan Esser <se@freebsd.org>
44  * All rights reserved.
45  * See the notice for details.
46  */
47
48 #include "use_isa.h"
49 //#include "opt_auto_eoi.h"
50
51 #include <sys/param.h>
52 #ifndef SMP
53 #include <machine/lock.h>
54 #endif
55 #include <sys/systm.h>
56 #include <sys/syslog.h>
57 #include <sys/malloc.h>
58 #include <sys/errno.h>
59 #include <sys/interrupt.h>
60 #include <machine/ipl.h>
61 #include <machine/md_var.h>
62 #include <machine/segments.h>
63 #include <sys/bus.h> 
64 #include <machine/globaldata.h>
65 #include <sys/proc.h>
66 #include <sys/thread2.h>
67 #include <sys/machintr.h>
68
69 #include <machine/smp.h>
70 #include <bus/isa/isa.h>
71 #include <machine_base/icu/icu.h>
72
73 #if NISA > 0
74 #include <bus/isa/isavar.h>
75 #endif
76 #include <machine_base/isa/intr_machdep.h>
77 #include <sys/interrupt.h>
78 #include <machine/clock.h>
79 #include <machine/cpu.h>
80
81 static void     icu_init(void);
82
83 #define NMI_PARITY (1 << 7)
84 #define NMI_IOCHAN (1 << 6)
85 #define ENMI_WATCHDOG (1 << 7)
86 #define ENMI_BUSTIMER (1 << 6)
87 #define ENMI_IOSTATUS (1 << 5)
88
89 /*
90  * Handle a NMI, possibly a machine check.
91  * return true to panic system, false to ignore.
92  */
93 int
94 isa_nmi(int cd)
95 {
96         int retval = 0;
97         int isa_port = inb(0x61);
98         int eisa_port = inb(0x461);
99
100         log(LOG_CRIT, "NMI ISA %x, EISA %x\n", isa_port, eisa_port);
101         
102         if (isa_port & NMI_PARITY) {
103                 log(LOG_CRIT, "RAM parity error, likely hardware failure.");
104                 retval = 1;
105         }
106
107         if (isa_port & NMI_IOCHAN) {
108                 log(LOG_CRIT, "I/O channel check, likely hardware failure.");
109                 retval = 1;
110         }
111
112         /*
113          * On a real EISA machine, this will never happen.  However it can
114          * happen on ISA machines which implement XT style floating point
115          * error handling (very rare).  Save them from a meaningless panic.
116          */
117         if (eisa_port == 0xff)
118                 return(retval);
119
120         if (eisa_port & ENMI_WATCHDOG) {
121                 log(LOG_CRIT, "EISA watchdog timer expired, likely hardware failure.");
122                 retval = 1;
123         }
124
125         if (eisa_port & ENMI_BUSTIMER) {
126                 log(LOG_CRIT, "EISA bus timeout, likely hardware failure.");
127                 retval = 1;
128         }
129
130         if (eisa_port & ENMI_IOSTATUS) {
131                 log(LOG_CRIT, "EISA I/O port status error.");
132                 retval = 1;
133         }
134         return(retval);
135 }
136
137 /*
138  *  ICU reinitialize when ICU configuration has lost.
139  */
140 void
141 icu_reinit(void)
142 {
143         int i;
144
145         icu_init();
146         for (i = 0; i < MAX_HARDINTS; ++i) {
147                 if (count_registered_ints(i))
148                         machintr_intren(i);
149         }
150 }
151
152 /*
153  * Fill in default interrupt table (in case of spurious interrupt
154  * during configuration of kernel, setup interrupt control unit
155  */
156 void
157 isa_defaultirq(void)
158 {
159         register_t ef;
160
161         KKASSERT(MachIntrABI.type == MACHINTR_ICU);
162
163         ef = read_rflags();
164         cpu_disable_intr();
165
166         /* Leave interrupts masked */
167         outb(IO_ICU1 + ICU_IMR_OFFSET, 0xff);
168         outb(IO_ICU2 + ICU_IMR_OFFSET, 0xff);
169
170         MachIntrABI.setdefault();
171         icu_init();
172
173         write_rflags(ef);
174 }
175
176 static void
177 icu_init(void)
178 {
179 #ifdef AUTO_EOI_1
180         int auto_eoi = 2;               /* auto EOI, 8086 mode */
181 #else
182         int auto_eoi = 0;               /* 8086 mode */
183 #endif
184
185 #ifdef SMP
186         if (apic_io_enable)
187                 auto_eoi = 2;           /* auto EOI, 8086 mode */
188 #endif
189
190         /*
191          * Program master
192          */
193         outb(IO_ICU1, 0x11);            /* reset; program device, four bytes */
194         outb(IO_ICU1 + ICU_IMR_OFFSET, IDT_OFFSET);
195                                         /* starting at this vector index */
196         outb(IO_ICU1 + ICU_IMR_OFFSET, 1 << ICU_IRQ_SLAVE);
197                                         /* slave on line 2 */
198         outb(IO_ICU1 + ICU_IMR_OFFSET, auto_eoi | 1); /* 8086 mode */
199
200         outb(IO_ICU1 + ICU_IMR_OFFSET, 0xff); /* leave interrupts masked */
201         outb(IO_ICU1, 0x0a);            /* default to IRR on read */
202         outb(IO_ICU1, 0xc0 | (3 - 1));  /* pri order 3-7, 0-2 (com2 first) */
203
204         /*
205          * Program slave
206          */
207         outb(IO_ICU2, 0x11);            /* reset; program device, four bytes */
208         outb(IO_ICU2 + ICU_IMR_OFFSET, IDT_OFFSET + 8);
209                                         /* staring at this vector index */
210         outb(IO_ICU2 + ICU_IMR_OFFSET, ICU_IRQ_SLAVE);
211 #ifdef AUTO_EOI_2
212         outb(IO_ICU2 + ICU_IMR_OFFSET, 2 | 1); /* auto EOI, 8086 mode */
213 #else
214         outb(IO_ICU2 + ICU_IMR_OFFSET, 1); /* 8086 mode */
215 #endif
216
217         outb(IO_ICU2 + ICU_IMR_OFFSET, 0xff); /* leave interrupts masked */
218         outb(IO_ICU2, 0x0a);            /* default to IRR on read */
219 }
220
221 #if NISA > 0
222 /*
223  * Return a bitmap of the current interrupt requests.  This is 8259-specific
224  * and is only suitable for use at probe time.
225  */
226 intrmask_t
227 isa_irq_pending(void)
228 {
229         u_char irr1;
230         u_char irr2;
231
232         irr1 = inb(IO_ICU1);
233         irr2 = inb(IO_ICU2);
234         return ((irr2 << 8) | irr1);
235 }
236
237 #endif