trunk/src/mess/drivers/altos5.c
| r23514 | r23515 | |
| 2 | 2 | |
| 3 | 3 | Altos 5-15 |
| 4 | 4 | |
| 5 | Boots, terminal works, memory banking works. |
| 6 | |
| 7 | Error when reading floppy disk (record not found) |
| 8 | |
| 9 | ToDo: |
| 10 | - DMA has its own memory banking, activated by BUSACK |
| 11 | - Get floppy to read the disk (only ones found are .TD0 format) |
| 12 | - Find out how to select double density on the fdc |
| 13 | - Further work once the floppy is fixed |
| 14 | |
| 5 | 15 | ****************************************************************************/ |
| 6 | 16 | |
| 7 | 17 | #include "emu.h" |
| r23514 | r23515 | |
| 26 | 36 | m_dart(*this, "z80dart"), |
| 27 | 37 | m_sio (*this, "z80sio"), |
| 28 | 38 | m_ctc (*this, "z80ctc"), |
| 29 | | m_fdc (*this, "fd1797") |
| 39 | m_fdc (*this, "fdc"), |
| 40 | m_floppy0(*this, "fdc:0"), |
| 41 | m_floppy1(*this, "fdc:1") |
| 30 | 42 | { } |
| 31 | 43 | |
| 32 | 44 | DECLARE_READ8_MEMBER(memory_read_byte); |
| r23514 | r23515 | |
| 41 | 53 | DECLARE_DRIVER_INIT(altos5); |
| 42 | 54 | TIMER_DEVICE_CALLBACK_MEMBER(ctc_tick); |
| 43 | 55 | DECLARE_WRITE_LINE_MEMBER(ctc_z1_w); |
| 44 | | //DECLARE_FLOPPY_FORMATS(floppy_formats); |
| 45 | 56 | UINT8 m_port08; |
| 46 | 57 | UINT8 m_port09; |
| 47 | 58 | UINT8 *m_p_prom; |
| 48 | 59 | bool m_ipl; |
| 49 | | bool m_wrpt; |
| 60 | void fdc_intrq_w(bool state); |
| 61 | void fdc_drq_w(bool state); |
| 50 | 62 | UINT8 convert(offs_t offset, bool state); |
| 51 | 63 | void setup_banks(); |
| 52 | 64 | virtual void machine_reset(); |
| r23514 | r23515 | |
| 57 | 69 | required_device<z80sio0_device> m_sio; |
| 58 | 70 | required_device<z80ctc_device> m_ctc; |
| 59 | 71 | required_device<fd1797_t> m_fdc; |
| 72 | required_device<floppy_connector> m_floppy0; |
| 73 | required_device<floppy_connector> m_floppy1; |
| 60 | 74 | }; |
| 61 | 75 | |
| 62 | 76 | static ADDRESS_MAP_START(altos5_mem, AS_PROGRAM, 8, altos5_state) |
| r23514 | r23515 | |
| 82 | 96 | static ADDRESS_MAP_START(altos5_io, AS_IO, 8, altos5_state) |
| 83 | 97 | ADDRESS_MAP_GLOBAL_MASK(0xff) |
| 84 | 98 | AM_RANGE(0x00, 0x03) AM_DEVREADWRITE_LEGACY("z80dma", z80dma_r, z80dma_w) |
| 85 | | AM_RANGE(0x04, 0x07) AM_DEVREADWRITE("fd1797", fd1797_t, read, write) |
| 99 | AM_RANGE(0x04, 0x07) AM_DEVREADWRITE("fdc", fd1797_t, read, write) |
| 86 | 100 | AM_RANGE(0x08, 0x0b) AM_DEVREADWRITE("z80pio_0", z80pio_device, read, write) |
| 87 | 101 | AM_RANGE(0x0c, 0x0f) AM_DEVREADWRITE("z80ctc", z80ctc_device, read, write) |
| 88 | 102 | AM_RANGE(0x10, 0x13) AM_DEVREADWRITE("z80pio_1", z80pio_device, read, write) |
| r23514 | r23515 | |
| 162 | 176 | { |
| 163 | 177 | m_port08 = 0; |
| 164 | 178 | m_port09 = 0; |
| 165 | | m_wrpt = 0; |
| 166 | 179 | m_ipl = 1; |
| 167 | 180 | setup_banks(); |
| 168 | 181 | m_maincpu->reset(); |
| r23514 | r23515 | |
| 213 | 226 | |
| 214 | 227 | static Z80DMA_INTERFACE( dma_intf ) |
| 215 | 228 | { |
| 216 | | DEVCB_NULL, //DEVCB_DRIVER_LINE_MEMBER(altos5_state, p8k_dma_irq_w), |
| 229 | DEVCB_CPU_INPUT_LINE("maincpu", INPUT_LINE_HALT), // actually BUSRQ |
| 217 | 230 | DEVCB_CPU_INPUT_LINE("maincpu", INPUT_LINE_IRQ0), |
| 218 | 231 | DEVCB_NULL, |
| 219 | 232 | DEVCB_DRIVER_MEMBER(altos5_state, memory_read_byte), |
| r23514 | r23515 | |
| 272 | 285 | */ |
| 273 | 286 | READ8_MEMBER( altos5_state::port08_r ) |
| 274 | 287 | { |
| 275 | | return m_port08 | 0x87; |
| 288 | return m_port08 | 0x07; |
| 276 | 289 | } |
| 277 | 290 | |
| 278 | 291 | /* |
| r23514 | r23515 | |
| 284 | 297 | } |
| 285 | 298 | |
| 286 | 299 | /* |
| 287 | | d4: DDEN (H = double density |
| 300 | d4: DDEN (H = double density) |
| 288 | 301 | d5: DS (H = drive 2) |
| 289 | 302 | d6: SS (H = side 2) |
| 290 | 303 | */ |
| 291 | 304 | WRITE8_MEMBER( altos5_state::port08_w ) |
| 292 | 305 | { |
| 293 | 306 | m_port08 = data; |
| 307 | |
| 308 | floppy_image_device *floppy = NULL; |
| 309 | if (BIT(data, 5)) |
| 310 | floppy = m_floppy1->get_device(); |
| 311 | else |
| 312 | floppy = m_floppy0->get_device(); |
| 313 | |
| 314 | m_fdc->set_floppy(floppy); |
| 315 | |
| 316 | if (floppy) |
| 317 | { |
| 318 | floppy->mon_w(0); |
| 319 | floppy->ss_w(BIT(data, 6)); |
| 320 | //floppy->dden_w(BIT(data, 4)); // no option to specify disk density |
| 321 | m_port08 |= (floppy->twosid_r() << 2); // get number of sides |
| 322 | } |
| 294 | 323 | } |
| 295 | 324 | |
| 296 | 325 | /* |
| 297 | 326 | d1, 2: Memory Map template selection (0 = diag; 1 = oasis; 2 = mp/m) |
| 298 | 327 | d3, 4: CPU bank select |
| 299 | 328 | d5: H = Write protect of common area |
| 300 | | d6, 7: DMA bank select |
| 329 | d6, 7: DMA bank select (not emulated) |
| 301 | 330 | */ |
| 302 | 331 | WRITE8_MEMBER( altos5_state::port09_w ) |
| 303 | 332 | { |
| r23514 | r23515 | |
| 382 | 411 | DEVCB_DEVICE_LINE_MEMBER("z80sio", z80dart_device, ctsa_w) |
| 383 | 412 | }; |
| 384 | 413 | |
| 385 | | //FLOPPY_FORMATS_MEMBER( altos5_state::floppy_formats ) |
| 386 | | // FLOPPY_ALTOS5_FORMAT |
| 387 | | //FLOPPY_FORMATS_END |
| 388 | | |
| 389 | 414 | static SLOT_INTERFACE_START( altos5_floppies ) |
| 390 | 415 | SLOT_INTERFACE( "525dd", FLOPPY_525_DD ) |
| 391 | 416 | SLOT_INTERFACE_END |
| 392 | 417 | |
| 418 | void altos5_state::fdc_intrq_w(bool state) |
| 419 | { |
| 420 | m_port08 = (m_port08 & 0x7f) | ((UINT8)(state) << 7); |
| 421 | m_pio0->port_a_write(m_port08); |
| 422 | } |
| 423 | |
| 424 | void altos5_state::fdc_drq_w(bool state) |
| 425 | { |
| 426 | // To DMA pin 25 - SDMA |
| 427 | } |
| 428 | |
| 393 | 429 | DRIVER_INIT_MEMBER( altos5_state, altos5 ) |
| 394 | 430 | { |
| 395 | 431 | |
| 396 | | floppy_connector *con = machine().device<floppy_connector>("fd1797:0"); |
| 432 | floppy_connector *con = machine().device<floppy_connector>("fdc:0"); |
| 397 | 433 | floppy_image_device *floppy = con ? con->get_device() : 0; |
| 398 | 434 | if (floppy) |
| 399 | 435 | { |
| 400 | 436 | m_fdc->set_floppy(floppy); |
| 401 | | //m_fdc->setup_intrq_cb(wd1772_t::line_cb(FUNC(applix_state::fdc_intrq_w), this)); |
| 402 | | //m_fdc->setup_drq_cb(wd1772_t::line_cb(FUNC(applix_state::fdc_drq_w), this)); |
| 437 | m_fdc->setup_intrq_cb(fd1797_t::line_cb(FUNC(altos5_state::fdc_intrq_w), this)); |
| 438 | m_fdc->setup_drq_cb(fd1797_t::line_cb(FUNC(altos5_state::fdc_drq_w), this)); |
| 403 | 439 | |
| 404 | 440 | floppy->ss_w(0); |
| 405 | 441 | } |
| r23514 | r23515 | |
| 459 | 495 | MCFG_Z80SIO0_ADD("z80sio", XTAL_8MHz / 2, sio_intf ) |
| 460 | 496 | MCFG_RS232_PORT_ADD("rs232", rs232_intf, default_rs232_devices, "serial_terminal") |
| 461 | 497 | MCFG_TIMER_DRIVER_ADD_PERIODIC("ctc_tick", altos5_state, ctc_tick, attotime::from_hz(XTAL_8MHz / 4)) |
| 462 | | MCFG_FD1797x_ADD("fd1797", XTAL_8MHz / 4) |
| 463 | | MCFG_FLOPPY_DRIVE_ADD("fd1797:0", altos5_floppies, "525dd", floppy_image_device::default_floppy_formats) |
| 464 | | MCFG_FLOPPY_DRIVE_ADD("fd1797:1", altos5_floppies, "525dd", floppy_image_device::default_floppy_formats) |
| 498 | MCFG_FD1797x_ADD("fdc", XTAL_8MHz / 4) |
| 499 | MCFG_FLOPPY_DRIVE_ADD("fdc:0", altos5_floppies, "525dd", floppy_image_device::default_floppy_formats) |
| 500 | MCFG_FLOPPY_DRIVE_ADD("fdc:1", altos5_floppies, "525dd", floppy_image_device::default_floppy_formats) |
| 465 | 501 | MACHINE_CONFIG_END |
| 466 | 502 | |
| 467 | 503 | |