Bring in the FreeBSD-5 ACPICA code as a module. Note: not hooked up yet,
[dragonfly.git] / sys / i386 / bios / mca_machdep.c
1 /*-
2  * Copyright (c) 1999 Matthew N. Dodd <winter@jurai.net>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/sys/i386/bios/mca_machdep.c,v 1.4 2000/01/29 16:17:34 peter Exp $
27  * $DragonFly: src/sys/i386/bios/Attic/mca_machdep.c,v 1.3 2003/08/07 21:17:20 dillon Exp $
28  */
29
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/kernel.h>
33 #include <vm/vm.h>
34 #include <vm/pmap.h>
35 #include <machine/pmap.h>
36 #include <machine/md_var.h>
37 #include <machine/vm86.h>
38 #include <machine/pc/bios.h>
39 #include <machine/cpufunc.h>
40
41 #include <bus/mca/mca_busreg.h>
42 #include "mca_machdep.h"
43
44 /* Global MCA bus flag */
45 int MCA_system = 0;
46
47 /* System Configuration Block */
48 struct sys_config {
49         u_int16_t       count;
50         u_int8_t        model;
51         u_int8_t        submodel;
52         u_int8_t        bios_rev;
53         u_int8_t        feature;
54 #define FEATURE_RESV    0x01    /* Reserved                             */
55 #define FEATURE_MCABUS  0x02    /* MicroChannel Architecture            */
56 #define FEATURE_EBDA    0x04    /* Extended BIOS data area allocated    */
57 #define FEATURE_WAITEV  0x08    /* Wait for external event is supported */
58 #define FEATURE_KBDINT  0x10    /* Keyboard intercept called by Int 09h */
59 #define FEATURE_RTC     0x20    /* Real-time clock present              */
60 #define FEATURE_IC2     0x40    /* Second interrupt chip present        */
61 #define FEATURE_DMA3    0x80    /* DMA channel 3 used by hard disk BIOS */
62         u_int8_t        pad[3];
63 } __attribute__ ((packed));
64
65 /* Function Prototypes */
66 static void bios_mcabus_present (void *);
67 SYSINIT(mca_present, SI_SUB_CPU, SI_ORDER_ANY, bios_mcabus_present, NULL);
68
69 /* Functions */
70 static void
71 bios_mcabus_present(void * dummy)
72 {
73         struct vm86frame        vmf;
74         struct sys_config *     scp;
75         vm_offset_t             paddr;
76
77         bzero(&vmf, sizeof(struct vm86frame));
78
79         vmf.vmf_ah = 0xc0;
80         if (vm86_intcall(0x15, &vmf)) {
81                 if (bootverbose) {
82                         printf("BIOS SDT: INT call failed.\n");
83                 }
84                 return;
85         }
86
87         if ((vmf.vmf_ah != 0) && (vmf.vmf_flags & 0x01)) {
88                 if (bootverbose) {
89                         printf("BIOS SDT: Not supported.  Not PS/2?\n");
90                         printf("BIOS SDT: AH 0x%02x, Flags 0x%04x\n",
91                                 vmf.vmf_ah, vmf.vmf_flags);
92                 }
93                 return;
94         }
95
96         paddr = vmf.vmf_es;
97         paddr = (paddr << 4) + vmf.vmf_bx;
98         scp = (struct sys_config *)BIOS_PADDRTOVADDR(paddr);
99
100         if (bootverbose) {
101                 printf("BIOS SDT: model 0x%02x, submodel 0x%02x, bios_rev 0x%02x\n",
102                         scp->model, scp->submodel, scp->bios_rev);
103                 printf("BIOS SDT: features 0x%b\n", scp->feature,
104                         "\20"
105                         "\01RESV"
106                         "\02MCABUS"
107                         "\03EBDA"
108                         "\04WAITEV"
109                         "\05KBDINT"
110                         "\06RTC"
111                         "\07IC2"
112                         "\08DMA3\n");
113         }
114
115         MCA_system = ((scp->feature & FEATURE_MCABUS) ? 1 : 0);
116
117         if (MCA_system)
118                 printf("MicroChannel Architecture System detected.\n");
119
120         return;
121 }
122
123 int
124 mca_bus_nmi (void)
125 {
126         int     slot;
127         int     retval = 0;
128         int     pos5 = 0;
129
130         /* Disable motherboard setup */
131         outb(MCA_MB_SETUP_REG, MCA_MB_SETUP_DIS);
132
133         /* For each slot */
134         for (slot = 0; slot < MCA_MAX_SLOTS; slot++) {
135
136                 /* Select the slot */
137                 outb(MCA_ADAP_SETUP_REG, slot | MCA_ADAP_SET); 
138                 pos5 = inb(MCA_POS_REG(MCA_POS5));
139
140                 /* If Adapter Check is low */
141                 if ((pos5 & MCA_POS5_CHCK) == 0) {
142                         retval++;
143
144                         /* If Adapter Check Status is available */
145                         if ((pos5 & MCA_POS5_CHCK_STAT) == 0) {
146                                 printf("MCA NMI: slot %d, POS6=0x%02x, POS7=0x%02x\n",
147                                         slot+1,
148                                         inb( MCA_POS_REG(MCA_POS6) ),
149                                         inb( MCA_POS_REG(MCA_POS7) ));
150                         } else { 
151                                 printf("MCA NMI: slot %d\n", slot+1);
152                         }
153                 }
154                 /* Disable adapter setup */
155                 outb(MCA_ADAP_SETUP_REG, MCA_ADAP_SETUP_DIS);
156         }
157
158         return (retval);
159 }