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
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
|
// license:BSD-3-Clause
// copyright-holders:Olivier Galibert
// CD 90-015 - Floppy drive selectler built from a wd1770
//
// Handles up to two 5.25 dual-sided drives (DD 90-320)
#include "emu.h"
#include "cd90_015.h"
#include "formats/thom_dsk.h"
DEFINE_DEVICE_TYPE(CD90_015, cd90_015_device, "cd90_015", "Thomson CD90-015 floppy drive selectler")
cd90_015_device::cd90_015_device(const machine_config &mconfig, const char *tag, device_t *owner, const XTAL &clock) :
device_t(mconfig, CD90_015, tag, owner, clock),
thomson_extension_interface(mconfig, *this),
m_fdc(*this, "fdc"),
m_floppy(*this, "%u", 0U),
m_rom(*this, "rom")
{
}
ROM_START(cd90_015)
ROM_REGION( 0x7c0, "rom", 0 )
ROM_LOAD ( "cd90-015.rom", 0x000, 0x7c0, CRC(821d34c1) SHA1(31a6bb81baaeec5fc8de457c97264f9dfa92c18b) )
ROM_END
void cd90_015_device::rom_map(address_map &map)
{
map(0x000, 0x7bf).rom().region(m_rom, 0);
}
void cd90_015_device::io_map(address_map &map)
{
map(0, 7).m(m_fdc, FUNC(mc6843_device::map));
map(8, 9).rw(FUNC(cd90_015_device::motor_r), FUNC(cd90_015_device::select_w));
}
const tiny_rom_entry *cd90_015_device::device_rom_region() const
{
return ROM_NAME(cd90_015);
}
void cd90_015_device::floppy_drives(device_slot_interface &device)
{
device.option_add("dd90_015", FLOPPY_525_SD);
}
void cd90_015_device::floppy_formats(format_registration &fr)
{
fr.add(FLOPPY_THOMSON_525_FORMAT);
}
void cd90_015_device::device_add_mconfig(machine_config &config)
{
MC6843(config, m_fdc, 16_MHz_XTAL / 32); // Comes from the main board
m_fdc->force_ready();
FLOPPY_CONNECTOR(config, m_floppy[0], floppy_drives, "dd90_015", floppy_formats).enable_sound(true);
FLOPPY_CONNECTOR(config, m_floppy[1], floppy_drives, nullptr, floppy_formats).enable_sound(true);
FLOPPY_CONNECTOR(config, m_floppy[2], floppy_drives, nullptr, floppy_formats).enable_sound(true);
FLOPPY_CONNECTOR(config, m_floppy[3], floppy_drives, nullptr, floppy_formats).enable_sound(true);
}
TIMER_CALLBACK_MEMBER(cd90_015_device::motor_tick)
{
m_floppy[param]->get_device()->mon_w(1);
}
void cd90_015_device::device_start()
{
for(int i=0; i != 4; i++)
m_motor_timer[i] = timer_alloc(FUNC(cd90_015_device::motor_tick), this);
save_item(NAME(m_select));
}
void cd90_015_device::device_reset()
{
m_select = 0;
for(int i=0; i != 4; i++) {
floppy_image_device *f = m_floppy[i]->get_device();
if(f)
f->mon_w(1);
}
m_fdc->set_floppy(nullptr);
}
void cd90_015_device::select_w(u8 data)
{
u8 started = (~m_select) & data;
m_select = data & 0xf;
for(int i = 0; i != 5; i++)
if(m_select & (1 << i)) {
m_fdc->set_floppy(m_floppy[i]->get_device());
goto found;
}
m_fdc->set_floppy(nullptr);
found:
for(int i = 0; i != 4; i++)
if(started & (1 << i)) {
if(m_floppy[i]->get_device()) {
m_floppy[i]->get_device()->mon_w(0);
m_motor_timer[i]->adjust(attotime::from_seconds(5), i);
}
}
logerror("select_w %x\n", m_select);
}
u8 cd90_015_device::motor_r()
{
u8 res = 0xf;
for(int i=0; i != 4; i++)
if(m_floppy[i]->get_device() && !m_floppy[i]->get_device()->mon_r())
res &= ~(1 << i);
if(!machine().side_effects_disabled())
logerror("motor_r %x\n", res);
return res;
}
|