| 1 |
/* |
| 2 |
* Copyright (C) 2005-2007 Anders Gavare. All rights reserved. |
| 3 |
* |
| 4 |
* Redistribution and use in source and binary forms, with or without |
| 5 |
* modification, are permitted provided that the following conditions are met: |
| 6 |
* |
| 7 |
* 1. Redistributions of source code must retain the above copyright |
| 8 |
* notice, this list of conditions and the following disclaimer. |
| 9 |
* 2. Redistributions in binary form must reproduce the above copyright |
| 10 |
* notice, this list of conditions and the following disclaimer in the |
| 11 |
* documentation and/or other materials provided with the distribution. |
| 12 |
* 3. The name of the author may not be used to endorse or promote products |
| 13 |
* derived from this software without specific prior written permission. |
| 14 |
* |
| 15 |
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND |
| 16 |
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| 17 |
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| 18 |
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE |
| 19 |
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
| 20 |
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
| 21 |
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
| 22 |
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
| 23 |
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
| 24 |
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| 25 |
* SUCH DAMAGE. |
| 26 |
* |
| 27 |
* |
| 28 |
* $Id: bus_isa.c,v 1.20 2007/08/29 20:36:49 debug Exp $ |
| 29 |
* |
| 30 |
* COMMENT: Generic ISA bus framework |
| 31 |
* |
| 32 |
* This is not a normal device, but it can be used as a quick way of adding |
| 33 |
* most of the common legacy ISA devices to a machine. |
| 34 |
*/ |
| 35 |
|
| 36 |
#include <stdio.h> |
| 37 |
#include <stdlib.h> |
| 38 |
#include <string.h> |
| 39 |
|
| 40 |
#define BUS_ISA_C |
| 41 |
|
| 42 |
#include "bus_isa.h" |
| 43 |
#include "device.h" |
| 44 |
#include "devices.h" |
| 45 |
#include "diskimage.h" |
| 46 |
#include "interrupt.h" |
| 47 |
#include "machine.h" |
| 48 |
#include "misc.h" |
| 49 |
|
| 50 |
|
| 51 |
/* |
| 52 |
* isa_interrupt_common(): |
| 53 |
*/ |
| 54 |
void isa_interrupt_common(struct bus_isa_data *d, int old_isa_assert) |
| 55 |
{ |
| 56 |
int new_isa_assert, x; |
| 57 |
|
| 58 |
/* Any interrupt assertions on PIC2 go to irq 2 on PIC1 */ |
| 59 |
/* (TODO: don't hardcode this here) */ |
| 60 |
if (d->pic2->irr & ~d->pic2->ier) |
| 61 |
d->pic1->irr |= 0x04; |
| 62 |
else |
| 63 |
d->pic1->irr &= ~0x04; |
| 64 |
|
| 65 |
/* printf("ISA: irr=%02x%02x ier=%02x%02x\n", |
| 66 |
d->pic2->irr, d->pic1->irr, d->pic2->ier, d->pic1->ier); */ |
| 67 |
|
| 68 |
new_isa_assert = d->pic1->irr & ~d->pic1->ier; |
| 69 |
|
| 70 |
if (old_isa_assert == new_isa_assert) |
| 71 |
return; |
| 72 |
|
| 73 |
if (!new_isa_assert) { |
| 74 |
INTERRUPT_DEASSERT(d->irq); |
| 75 |
return; |
| 76 |
} |
| 77 |
|
| 78 |
for (x=0; x<16; x++) { |
| 79 |
if (x == 2) |
| 80 |
continue; |
| 81 |
|
| 82 |
if (x < 8 && (d->pic1->irr & ~d->pic1->ier & (1 << x))) |
| 83 |
break; |
| 84 |
|
| 85 |
if (x >= 8 && (d->pic2->irr & ~d->pic2->ier & (1 << (x&7)))) |
| 86 |
break; |
| 87 |
} |
| 88 |
|
| 89 |
*d->ptr_to_last_int = x; |
| 90 |
|
| 91 |
INTERRUPT_ASSERT(d->irq); |
| 92 |
} |
| 93 |
|
| 94 |
|
| 95 |
/* |
| 96 |
* isa_interrupt_assert(): |
| 97 |
* |
| 98 |
* Called whenever an ISA device asserts an interrupt (0..15). |
| 99 |
*/ |
| 100 |
void isa_interrupt_assert(struct interrupt *interrupt) |
| 101 |
{ |
| 102 |
struct bus_isa_data *d = interrupt->extra; |
| 103 |
int old_isa_assert, line = interrupt->line; |
| 104 |
int mask = 1 << (line & 7); |
| 105 |
|
| 106 |
old_isa_assert = d->pic1->irr & ~d->pic1->ier; |
| 107 |
|
| 108 |
if (line < 8) |
| 109 |
d->pic1->irr |= mask; |
| 110 |
else if (d->pic2 != NULL) |
| 111 |
d->pic2->irr |= mask; |
| 112 |
|
| 113 |
isa_interrupt_common(d, old_isa_assert); |
| 114 |
} |
| 115 |
|
| 116 |
|
| 117 |
/* |
| 118 |
* isa_interrupt_deassert(): |
| 119 |
* |
| 120 |
* Called whenever an ISA device deasserts an interrupt (0..15). |
| 121 |
*/ |
| 122 |
void isa_interrupt_deassert(struct interrupt *interrupt) |
| 123 |
{ |
| 124 |
struct bus_isa_data *d = interrupt->extra; |
| 125 |
int line = interrupt->line, mask = 1 << (line & 7); |
| 126 |
int old_irr1 = d->pic1->irr, old_isa_assert; |
| 127 |
|
| 128 |
old_isa_assert = old_irr1 & ~d->pic1->ier; |
| 129 |
|
| 130 |
if (line < 8) |
| 131 |
d->pic1->irr &= ~mask; |
| 132 |
else if (d->pic2 != NULL) |
| 133 |
d->pic2->irr &= ~mask; |
| 134 |
|
| 135 |
/* If IRQ 0 has been cleared, then this is a timer interrupt. |
| 136 |
Let's ack it here: */ |
| 137 |
if (old_irr1 & 1 && !(d->pic1->irr & 1) && |
| 138 |
d->ptr_to_pending_timer_interrupts != NULL && |
| 139 |
(*d->ptr_to_pending_timer_interrupts) > 0) |
| 140 |
(*d->ptr_to_pending_timer_interrupts) --; |
| 141 |
|
| 142 |
isa_interrupt_common(d, old_isa_assert); |
| 143 |
} |
| 144 |
|
| 145 |
|
| 146 |
/* |
| 147 |
* bus_isa_init(): |
| 148 |
* |
| 149 |
* Flags are zero or more of the following, ORed together: |
| 150 |
* |
| 151 |
* BUS_ISA_EXTERNAL_PIC Don't register/use isa_interrupt_*(). |
| 152 |
* BUS_ISA_IDE0 Include wdc0. |
| 153 |
* BUS_ISA_IDE1 Include wdc1. |
| 154 |
* BUS_ISA_FDC Include a floppy controller. (Dummy.) |
| 155 |
* BUS_ISA_VGA Include old-style (non-PCI) VGA. (*1) |
| 156 |
* BUS_ISA_VGA_FORCE Include VGA even when running without X11. (*2) |
| 157 |
* BUS_ISA_PCKBC_FORCE_USE Always assume keyboard console, not serial. (*3) |
| 158 |
* BUS_ISA_PCKBC_NONPCSTYLE Don't set the pc-style flag for the keyboard. |
| 159 |
* BUS_ISA_NO_SECOND_PIC Only useful for 8086 XT (pre-AT) emulation. :-) |
| 160 |
* BUS_ISA_LPTBASE_3BC Set lptbase to 0x3bc instead of 0x378. |
| 161 |
* |
| 162 |
* (*1) For machines with a PCI bus, this flag should not be used. Instead, a |
| 163 |
* PCI VGA card should be added to the PCI bus. |
| 164 |
* |
| 165 |
* (*2) For machines where it is easy to select VGA vs serial console during |
| 166 |
* boot, this flag should not be used. Machines that "always" boot up |
| 167 |
* in VGA console mode should have it set. |
| 168 |
* |
| 169 |
* (*3) Similar to *2 above; machines that always boot up with VGA console |
| 170 |
* should have this flag set, so that the keyboard is always used. |
| 171 |
* |
| 172 |
* The interrupt_base_path is the name of the bus, CPU, or controller onto |
| 173 |
* which this ISA bus will be attached, e.g. "machine[0].lca" or |
| 174 |
* "machine[0].cpu[0].pic1". |
| 175 |
*/ |
| 176 |
struct bus_isa_data *bus_isa_init(struct machine *machine, |
| 177 |
char *interrupt_base_path, uint32_t bus_isa_flags, |
| 178 |
uint64_t isa_portbase, uint64_t isa_membase) |
| 179 |
{ |
| 180 |
struct bus_isa_data *d; |
| 181 |
char tmpstr[300], tmpstr2[300]; |
| 182 |
int wdc0_irq = 14, wdc1_irq = 15; |
| 183 |
int i, tmp_handle, kbd_in_use; |
| 184 |
int lptbase = 0x378; |
| 185 |
|
| 186 |
CHECK_ALLOCATION(d = malloc(sizeof(struct bus_isa_data))); |
| 187 |
memset(d, 0, sizeof(struct bus_isa_data)); |
| 188 |
|
| 189 |
d->isa_portbase = isa_portbase; |
| 190 |
d->isa_membase = isa_membase; |
| 191 |
|
| 192 |
if (!(bus_isa_flags & BUS_ISA_EXTERNAL_PIC)) { |
| 193 |
/* Connect to the interrupt which we're interrupting |
| 194 |
at (usually a CPU): */ |
| 195 |
INTERRUPT_CONNECT(interrupt_base_path, d->irq); |
| 196 |
|
| 197 |
/* Register the 16 possible ISA interrupts: */ |
| 198 |
for (i=0; i<16; i++) { |
| 199 |
struct interrupt template; |
| 200 |
char name[300]; |
| 201 |
snprintf(name, sizeof(name), |
| 202 |
"%s.isa.%i", interrupt_base_path, i); |
| 203 |
memset(&template, 0, sizeof(template)); |
| 204 |
template.line = i; |
| 205 |
template.name = name; |
| 206 |
template.extra = d; |
| 207 |
template.interrupt_assert = isa_interrupt_assert; |
| 208 |
template.interrupt_deassert = isa_interrupt_deassert; |
| 209 |
interrupt_handler_register(&template); |
| 210 |
} |
| 211 |
} |
| 212 |
|
| 213 |
kbd_in_use = ((bus_isa_flags & BUS_ISA_PCKBC_FORCE_USE) || |
| 214 |
(machine->x11_md.in_use))? 1 : 0; |
| 215 |
|
| 216 |
if (machine->machine_type == MACHINE_PREP) { |
| 217 |
/* PReP with obio controller has both WDCs on irq 13! */ |
| 218 |
wdc0_irq = wdc1_irq = 13; |
| 219 |
} |
| 220 |
|
| 221 |
if (!(bus_isa_flags & BUS_ISA_EXTERNAL_PIC)) { |
| 222 |
snprintf(tmpstr, sizeof(tmpstr), "8259 irq=%s addr=0x%llx", |
| 223 |
interrupt_base_path, (long long)(isa_portbase + 0x20)); |
| 224 |
d->pic1 = machine->isa_pic_data.pic1 = |
| 225 |
device_add(machine, tmpstr); |
| 226 |
d->ptr_to_pending_timer_interrupts = |
| 227 |
machine->isa_pic_data.pending_timer_interrupts; |
| 228 |
d->ptr_to_last_int = &machine->isa_pic_data.last_int; |
| 229 |
|
| 230 |
if (bus_isa_flags & BUS_ISA_NO_SECOND_PIC) |
| 231 |
bus_isa_flags &= ~BUS_ISA_NO_SECOND_PIC; |
| 232 |
else { |
| 233 |
snprintf(tmpstr, sizeof(tmpstr), |
| 234 |
"8259 irq=%s.isa.2 addr=0x%llx", |
| 235 |
interrupt_base_path,(long long)(isa_portbase+0xa0)); |
| 236 |
d->pic2 = machine->isa_pic_data.pic2 = |
| 237 |
device_add(machine, tmpstr); |
| 238 |
} |
| 239 |
} else { |
| 240 |
bus_isa_flags &= ~BUS_ISA_EXTERNAL_PIC; |
| 241 |
} |
| 242 |
|
| 243 |
snprintf(tmpstr, sizeof(tmpstr), "8253 irq=%s.isa.%i addr=0x%llx " |
| 244 |
"in_use=0", interrupt_base_path, 0, |
| 245 |
(long long)(isa_portbase + 0x40)); |
| 246 |
device_add(machine, tmpstr); |
| 247 |
|
| 248 |
snprintf(tmpstr, sizeof(tmpstr), "pccmos irq=%s.isa.%i addr=0x%llx", |
| 249 |
interrupt_base_path, 8, (long long)(isa_portbase + 0x70)); |
| 250 |
device_add(machine, tmpstr); |
| 251 |
|
| 252 |
snprintf(tmpstr, sizeof(tmpstr), "ns16550 irq=%s.isa.%i addr=0x%llx " |
| 253 |
"name2=tty0 in_use=%i", interrupt_base_path, 4, |
| 254 |
(long long)(isa_portbase + 0x3f8), 1 - kbd_in_use); |
| 255 |
machine->main_console_handle = (size_t)device_add(machine, tmpstr); |
| 256 |
|
| 257 |
snprintf(tmpstr, sizeof(tmpstr), "ns16550 irq=%s.isa.%i addr=0x%llx " |
| 258 |
"name2=tty1 in_use=0", interrupt_base_path, 3, |
| 259 |
(long long)(isa_portbase + 0x2f8)); |
| 260 |
device_add(machine, tmpstr); |
| 261 |
|
| 262 |
if (bus_isa_flags & BUS_ISA_LPTBASE_3BC) { |
| 263 |
bus_isa_flags &= ~BUS_ISA_LPTBASE_3BC; |
| 264 |
lptbase = 0x3bc; |
| 265 |
} |
| 266 |
|
| 267 |
snprintf(tmpstr, sizeof(tmpstr), "lpt irq=%s.isa.%i addr=0x%llx " |
| 268 |
"name2=lpt in_use=0", interrupt_base_path, 7, |
| 269 |
(long long)(isa_portbase + lptbase)); |
| 270 |
device_add(machine, tmpstr); |
| 271 |
|
| 272 |
if (bus_isa_flags & BUS_ISA_IDE0) { |
| 273 |
bus_isa_flags &= ~BUS_ISA_IDE0; |
| 274 |
snprintf(tmpstr, sizeof(tmpstr), "wdc irq=%s.isa.%i " |
| 275 |
"addr=0x%llx", interrupt_base_path, wdc0_irq, |
| 276 |
(long long)(isa_portbase + 0x1f0)); |
| 277 |
if (diskimage_exist(machine, 0, DISKIMAGE_IDE) || |
| 278 |
diskimage_exist(machine, 1, DISKIMAGE_IDE)) |
| 279 |
device_add(machine, tmpstr); |
| 280 |
} |
| 281 |
|
| 282 |
if (bus_isa_flags & BUS_ISA_IDE1) { |
| 283 |
bus_isa_flags &= ~BUS_ISA_IDE1; |
| 284 |
snprintf(tmpstr, sizeof(tmpstr), "wdc irq=%s.isa.%i " |
| 285 |
"addr=0x%llx", interrupt_base_path, wdc1_irq, |
| 286 |
(long long)(isa_portbase + 0x170)); |
| 287 |
if (diskimage_exist(machine, 2, DISKIMAGE_IDE) || |
| 288 |
diskimage_exist(machine, 3, DISKIMAGE_IDE)) |
| 289 |
device_add(machine, tmpstr); |
| 290 |
} |
| 291 |
|
| 292 |
if (bus_isa_flags & BUS_ISA_FDC) { |
| 293 |
bus_isa_flags &= ~BUS_ISA_FDC; |
| 294 |
snprintf(tmpstr, sizeof(tmpstr), "fdc irq=%s.isa.%i " |
| 295 |
"addr=0x%llx", interrupt_base_path, 6, |
| 296 |
(long long)(isa_portbase + 0x3f0)); |
| 297 |
device_add(machine, tmpstr); |
| 298 |
} |
| 299 |
|
| 300 |
if (bus_isa_flags & BUS_ISA_VGA) { |
| 301 |
if (machine->x11_md.in_use || bus_isa_flags & BUS_ISA_VGA_FORCE) |
| 302 |
dev_vga_init(machine, machine->memory, |
| 303 |
isa_membase + 0xa0000, isa_portbase + 0x3c0, |
| 304 |
machine->machine_name); |
| 305 |
bus_isa_flags &= ~(BUS_ISA_VGA | BUS_ISA_VGA_FORCE); |
| 306 |
} |
| 307 |
|
| 308 |
snprintf(tmpstr, sizeof(tmpstr), "%s.isa.1", interrupt_base_path); |
| 309 |
snprintf(tmpstr2, sizeof(tmpstr2), "%s.isa.12", interrupt_base_path); |
| 310 |
tmp_handle = dev_pckbc_init(machine, machine->memory, |
| 311 |
isa_portbase + 0x60, PCKBC_8042, tmpstr, tmpstr2, |
| 312 |
kbd_in_use, bus_isa_flags & BUS_ISA_PCKBC_NONPCSTYLE? 0 : 1); |
| 313 |
|
| 314 |
if (kbd_in_use) |
| 315 |
machine->main_console_handle = tmp_handle; |
| 316 |
|
| 317 |
bus_isa_flags &= ~(BUS_ISA_PCKBC_NONPCSTYLE | BUS_ISA_PCKBC_FORCE_USE); |
| 318 |
|
| 319 |
if (bus_isa_flags != 0) |
| 320 |
fatal("WARNING! bus_isa(): unimplemented bus_isa_flags 0x%x\n", |
| 321 |
bus_isa_flags); |
| 322 |
|
| 323 |
return d; |
| 324 |
} |
| 325 |
|
Parent Directory
| 
Revision Log