1 |
/* |
2 |
* PearPC |
3 |
* syscdrom.cc |
4 |
* |
5 |
* Copyright (C) 2003 Sebastian Biallas (sb@biallas.net) |
6 |
* |
7 |
* This program is free software; you can redistribute it and/or modify |
8 |
* it under the terms of the GNU General Public License version 2 as |
9 |
* published by the Free Software Foundation. |
10 |
* |
11 |
* This program is distributed in the hope that it will be useful, |
12 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
13 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
14 |
* GNU General Public License for more details. |
15 |
* |
16 |
* You should have received a copy of the GNU General Public License |
17 |
* along with this program; if not, write to the Free Software |
18 |
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
19 |
*/ |
20 |
|
21 |
#define WIN32_LEAN_AND_MEAN |
22 |
#include <windows.h> |
23 |
#include <windowsx.h> |
24 |
|
25 |
#ifdef FASTCALL |
26 |
#undef FASTCALL |
27 |
#endif |
28 |
|
29 |
#include <cstdio> |
30 |
#include <cstring> |
31 |
#include "errno.h" |
32 |
|
33 |
#include "debug/tracers.h" |
34 |
#include "tools/data.h" |
35 |
#include "io/ide/cd.h" |
36 |
#include "aspi-win32.h" |
37 |
#include "scsipt.h" |
38 |
#include "scsitypes.h" |
39 |
|
40 |
#define SCSI_CMD_DIR_IN 1 |
41 |
#define SCSI_CMD_DIR_OUT 2 |
42 |
|
43 |
/// SPTI CD-ROM implementation |
44 |
class CDROMDeviceSPTI:public CDROMDeviceSCSI |
45 |
{ |
46 |
private: |
47 |
// HANDLE to device |
48 |
HANDLE device; |
49 |
|
50 |
/// Opens a drive device |
51 |
/// @author Alexander Stockinger |
52 |
/// @date 07/18/2004 |
53 |
/// @param letter The drive letter of the drive to open |
54 |
/// @return A file handle to the device |
55 |
static HANDLE OpenDevice(char letter) |
56 |
{ |
57 |
|
58 |
// Generate the device name |
59 |
char fname[16]; |
60 |
ht_snprintf(fname, sizeof fname, "\\\\.\\%c:", letter); |
61 |
|
62 |
// Handle access (different on NT / 2K / XP) |
63 |
OSVERSIONINFO ver; |
64 |
memset(&ver, 0, sizeof(ver)); |
65 |
ver.dwOSVersionInfoSize = sizeof(ver); |
66 |
GetVersionEx(&ver); |
67 |
|
68 |
DWORD flags = GENERIC_READ; |
69 |
if (ver.dwPlatformId == VER_PLATFORM_WIN32_NT |
70 |
&& ver.dwMajorVersion > 4) |
71 |
flags |= GENERIC_WRITE; |
72 |
|
73 |
// Create the file handle |
74 |
return CreateFile(fname, flags, FILE_SHARE_READ, NULL, |
75 |
OPEN_EXISTING, 0, NULL); |
76 |
} |
77 |
|
78 |
|
79 |
protected: |
80 |
/// SCSI command pass-through function |
81 |
/// @author Alexander Stockinger |
82 |
/// @date 07/18/2004 |
83 |
/// @param command The SCSI command to be sent |
84 |
/// @param dir The data direcion flags |
85 |
/// @param params byte[11] array containing command dependent parameters |
86 |
/// @param buffer Buffer for data exchange |
87 |
/// @param buffer_len The size of buffer in bytes |
88 |
/// @return If the call could be executed it returns the status from the device, else it returns 0xff |
89 |
virtual byte SCSI_ExecCmd(byte command, byte dir, byte params[11], byte *buffer, unsigned int buffer_len) |
90 |
{ |
91 |
byte srb_dir; |
92 |
|
93 |
if (dir & SCSI_CMD_DIR_IN) |
94 |
srb_dir = SCSI_IOCTL_DATA_IN; |
95 |
else if (dir & SCSI_CMD_DIR_OUT) |
96 |
srb_dir = SCSI_IOCTL_DATA_OUT; |
97 |
else |
98 |
srb_dir = SCSI_IOCTL_DATA_UNSPECIFIED; |
99 |
|
100 |
// Fill SPTDWB |
101 |
SCSI_PASS_THROUGH_DIRECT_WITH_BUFFER swb; |
102 |
|
103 |
memset(&swb, 0, sizeof(swb)); |
104 |
swb.spt.Length = sizeof(SCSI_PASS_THROUGH); |
105 |
swb.spt.DataTransferLength = buffer_len; |
106 |
swb.spt.DataBuffer = buffer; |
107 |
swb.spt.TimeOutValue = 5; |
108 |
swb.spt.SenseInfoOffset = |
109 |
offsetof(SCSI_PASS_THROUGH_DIRECT_WITH_BUFFER, |
110 |
ucSenseBuf); |
111 |
swb.spt.DataIn = srb_dir; |
112 |
if (command < 0x20) { |
113 |
swb.spt.CdbLength = 6; |
114 |
} else if (command < 0xa0) { |
115 |
swb.spt.CdbLength = 10; |
116 |
} else { |
117 |
swb.spt.CdbLength = 12; |
118 |
} |
119 |
swb.spt.Cdb[0] = command; |
120 |
for (int i=1; i < swb.spt.CdbLength; i++) { |
121 |
swb.spt.Cdb[i] = params[i-1]; |
122 |
} |
123 |
|
124 |
// Send cmd |
125 |
ULONG ret; |
126 |
BOOL status = DeviceIoControl(device, |
127 |
IOCTL_SCSI_PASS_THROUGH_DIRECT, |
128 |
&swb, |
129 |
sizeof(swb), |
130 |
&swb, |
131 |
sizeof(swb), |
132 |
&ret, |
133 |
NULL); |
134 |
|
135 |
// Done |
136 |
if (!status) { |
137 |
IO_IDE_WARN("SPTI: DeviceIoControl() returned error:\n"); |
138 |
IO_IDE_WARN("command: %02x %02x %02x %02x %02x %02x %02x %02x %02x %02x:\n", |
139 |
command, params[0], params[1], params[2], params[3], params[4], params[5], params[6], params[7], params[8], params[9]); |
140 |
char buffer[256]; |
141 |
|
142 |
FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM, 0, |
143 |
GetLastError(), 0, buffer, sizeof buffer, 0); |
144 |
IO_IDE_WARN("%s\n", buffer); |
145 |
return 0xff; |
146 |
} |
147 |
return swb.spt.ScsiStatus; |
148 |
} |
149 |
|
150 |
|
151 |
public: |
152 |
/// Constructor |
153 |
/// @author Alexander Stockinger |
154 |
/// @date 07/17/2004 |
155 |
/// @param name The name of the CDROM device |
156 |
CDROMDeviceSPTI (const char *name):CDROMDeviceSCSI(name), |
157 |
device(INVALID_HANDLE_VALUE) |
158 |
{ |
159 |
} |
160 |
|
161 |
/// Destructor |
162 |
/// @author Alexander Stockinger |
163 |
/// @date 07/18/2004 |
164 |
virtual ~CDROMDeviceSPTI() |
165 |
{ |
166 |
setLock(false); |
167 |
if (device != INVALID_HANDLE_VALUE) |
168 |
CloseHandle(device); |
169 |
} |
170 |
|
171 |
/// Sets the drive letter of the real CD drive |
172 |
/// @author Alexander Stockinger |
173 |
/// @date 07/18/2004 |
174 |
/// @param name The drive letter, e.g. "e:" or "e:\" |
175 |
/// @return A file handle to the device |
176 |
void setDrive(const char *name) |
177 |
{ |
178 |
// Check parameter |
179 |
size_t len = strlen(name); |
180 |
|
181 |
if (len != 2 && len != 3) |
182 |
IO_IDE_ERR("SPTI: Invalid drive name '%s'\n", name); |
183 |
|
184 |
if (name[1] != ':') |
185 |
IO_IDE_ERR("SPTI: Invalid drive name '%s'\n", name); |
186 |
if (len == 3 && name[2] != '\\') |
187 |
IO_IDE_ERR("SPTI: Invalid drive name '%s'\n", name); |
188 |
|
189 |
char letter = name[0]; |
190 |
|
191 |
if (letter >= 'a' && letter <= 'z') |
192 |
letter -= ('a' - 'A'); |
193 |
if (letter < 'A' || letter > 'Z') |
194 |
IO_IDE_ERR("SPTI: Invalid drive '%c:'\n", letter); |
195 |
|
196 |
// Open the device |
197 |
device = OpenDevice(letter); |
198 |
if (device == INVALID_HANDLE_VALUE) |
199 |
IO_IDE_ERR("SPTI: Cannot open drive '%c:'\n", letter); |
200 |
} |
201 |
|
202 |
}; |
203 |
|
204 |
|
205 |
/// ASPI CD-ROM implementation |
206 |
class CDROMDeviceASPI:public CDROMDeviceSCSI |
207 |
{ |
208 |
private: |
209 |
/// Module handle to ASPI DLL |
210 |
HMODULE hASPI; |
211 |
|
212 |
/// SCSI host adapter ID |
213 |
unsigned int a; |
214 |
|
215 |
/// SCSI target ID |
216 |
unsigned int t; |
217 |
|
218 |
/// SCSI lun ID |
219 |
unsigned int l; |
220 |
|
221 |
protected: |
222 |
/// SCSI command pass-trough function |
223 |
/// @author Alexander Stockinger |
224 |
/// @date 07/17/2004 |
225 |
/// @param command The SCSI command to be sent |
226 |
/// @param dir The data direcion flags |
227 |
/// @param params byte[8] array containing command dependent parameters |
228 |
/// @param buffer Buffer for data exchange |
229 |
/// @param buffer_len The size of buffer in bytes |
230 |
/// @return If the call could be executed it returns the status from the device, else it returns 0xff |
231 |
virtual byte SCSI_ExecCmd(byte command, byte dir, byte params[8], |
232 |
byte *buffer, unsigned int buffer_len) |
233 |
{ |
234 |
byte srb_dir; |
235 |
if (dir & SCSI_CMD_DIR_IN) |
236 |
srb_dir = SRB_DIR_IN; |
237 |
else if (dir & SCSI_CMD_DIR_OUT) |
238 |
srb_dir = SRB_DIR_OUT; |
239 |
else |
240 |
srb_dir = 0; |
241 |
|
242 |
|
243 |
// Create event |
244 |
HANDLE event = CreateEvent(NULL, TRUE, FALSE, NULL); |
245 |
ResetEvent(event); |
246 |
|
247 |
// Prepare SRB |
248 |
SRB_ExecSCSICmd cmd; |
249 |
memset(&cmd, 0, sizeof(cmd)); |
250 |
cmd.SRB_Cmd = SC_EXEC_SCSI_CMD; |
251 |
cmd.SRB_HaId = a; |
252 |
cmd.SRB_Target = t; |
253 |
cmd.SRB_Lun = l; |
254 |
cmd.SRB_Flags = srb_dir | SRB_EVENT_NOTIFY; |
255 |
cmd.SRB_SenseLen = SENSE_LEN; |
256 |
cmd.SRB_PostProc = event; |
257 |
cmd.SRB_BufPointer = buffer; |
258 |
cmd.SRB_BufLen = buffer_len; |
259 |
cmd.SRB_CDBLen = 10; |
260 |
cmd.CDBByte[0] = command; |
261 |
cmd.CDBByte[1] = params[0]; |
262 |
cmd.CDBByte[2] = params[1]; |
263 |
cmd.CDBByte[3] = params[2]; |
264 |
cmd.CDBByte[4] = params[3]; |
265 |
cmd.CDBByte[5] = params[4]; |
266 |
cmd.CDBByte[6] = params[5]; |
267 |
cmd.CDBByte[7] = params[6]; |
268 |
cmd.CDBByte[8] = params[7]; |
269 |
|
270 |
// Send cmd and wait for event |
271 |
DWORD status = SendASPI32Command((LPSRB) & cmd); |
272 |
if (status == SS_PENDING) |
273 |
WaitForSingleObject(event, 100000); |
274 |
|
275 |
// Clean up |
276 |
CloseHandle(event); |
277 |
|
278 |
// Check error conditions |
279 |
if (status != SS_COMP && status != SS_PENDING) |
280 |
return 0xff; |
281 |
|
282 |
// Return error code |
283 |
return cmd.SRB_TargStat; |
284 |
} |
285 |
public: |
286 |
/// Constructor |
287 |
/// @author Alexander Stockinger |
288 |
/// @date 07/13/2004 |
289 |
/// @param name The name of the CDROM device |
290 |
CDROMDeviceASPI(const char *name):CDROMDeviceSCSI(name) |
291 |
{ |
292 |
// See if ASPI is available |
293 |
hASPI = (HMODULE) LoadLibrary("wnaspi32.dll"); |
294 |
if (hASPI == INVALID_HANDLE_VALUE || hASPI == 0) |
295 |
IO_IDE_ERR("No ASPI support (Could not load wnaspi32.dll).\n"); |
296 |
|
297 |
// Load ASPI function addresses |
298 |
SendASPI32Command = |
299 |
(DWORD(*)(LPSRB)) GetProcAddress(hASPI, |
300 |
"SendASPI32Command"); |
301 |
GetASPI32DLLVersion = |
302 |
(DWORD(*)(void)) GetProcAddress(hASPI, |
303 |
"GetASPI32DLLVersion"); |
304 |
GetASPI32SupportInfo = |
305 |
(DWORD(*)(void)) GetProcAddress(hASPI, |
306 |
"GetASPI32SupportInfo"); |
307 |
|
308 |
if (!SendASPI32Command || !GetASPI32DLLVersion |
309 |
|| !GetASPI32SupportInfo) |
310 |
IO_IDE_ERR("Error loading wnaspi32.dll\n"); |
311 |
|
312 |
// Make sure the init function is being called |
313 |
GetASPI32SupportInfo(); |
314 |
} |
315 |
|
316 |
/// Destructor |
317 |
/// @author Alexander Stockinger |
318 |
/// @date 07/13/2004 |
319 |
virtual ~CDROMDeviceASPI() |
320 |
{ |
321 |
setLock(false); |
322 |
if (hASPI != INVALID_HANDLE_VALUE) |
323 |
FreeLibrary(hASPI); |
324 |
} |
325 |
|
326 |
/// Checks if the ASPI device is a CD drive |
327 |
/// @author Alexander Stockinger |
328 |
/// @date 07/17/2004 |
329 |
/// @return true if the specified device is CD drive, else false |
330 |
bool ASPI_IsDeviceCDROM() |
331 |
{ |
332 |
// Get adapter cound |
333 |
const DWORD info = GetASPI32SupportInfo(); |
334 |
const byte adapter_count LOBYTE(LOWORD(info)); |
335 |
|
336 |
// Make sure the host adapter exists |
337 |
if (a >= adapter_count) |
338 |
return false; |
339 |
|
340 |
// Get device type |
341 |
SRB_GDEVBlock desc; |
342 |
|
343 |
memset(&desc, 0, sizeof(desc)); |
344 |
desc.SRB_Cmd = SC_GET_DEV_TYPE; |
345 |
desc.SRB_HaId = a; |
346 |
desc.SRB_Target = t; |
347 |
desc.SRB_Lun = l; |
348 |
SendASPI32Command((LPSRB) & desc); |
349 |
|
350 |
// False on errors |
351 |
if (desc.SRB_Status != SS_COMP) |
352 |
return false; |
353 |
|
354 |
// Done |
355 |
return desc.SRB_DeviceType == DTYPE_CDROM; |
356 |
} |
357 |
|
358 |
/// Sets the SCSI target for the ASPI device |
359 |
/// @author Alexander Stockinger |
360 |
/// @date 07/13/2004 |
361 |
/// @param name The SCSI device id in the form "a,t,l" |
362 |
void setSCSITarget(const char *name) |
363 |
{ |
364 |
// Extract SCSI device info |
365 |
char *spath = new char[strlen(name) + 1]; |
366 |
|
367 |
strcpy(spath, name); |
368 |
char *scsi[3] = { spath, 0, 0 }; |
369 |
int i = 0; |
370 |
|
371 |
for (char *c = spath; *c; c++) { |
372 |
if (i == 3) |
373 |
break; |
374 |
if (*c == ',') { |
375 |
i++; |
376 |
*c = 0; |
377 |
c++; |
378 |
scsi[i] = c; |
379 |
} |
380 |
} |
381 |
|
382 |
if (scsi[1] == 0 || scsi[2] == 0) |
383 |
IO_IDE_ERR("Invalid SCSI path: %s", name); |
384 |
|
385 |
a = atoi(scsi[0]); |
386 |
t = atoi(scsi[1]); |
387 |
l = atoi(scsi[2]); |
388 |
delete[]spath; |
389 |
|
390 |
// Check device type |
391 |
if (!ASPI_IsDeviceCDROM()) |
392 |
IO_IDE_WARN("SCSI device %d/%d/%d is not a CDROM drive.\n", |
393 |
a, t, l); |
394 |
|
395 |
// Set initial ready state |
396 |
isReady(); |
397 |
} |
398 |
}; |
399 |
|
400 |
/// Creates a native CDROM device |
401 |
/// @param device_name The PearPC internal device name for the drive |
402 |
/// @param image_name The image / device name to identify the real hardware |
403 |
/// @return On success a pointer to a CDROMDevice is returned, else NULL |
404 |
/// @author Alexander Stockinger |
405 |
/// @date 07/19/2004 |
406 |
CDROMDevice *createNativeCDROMDevice(const char *device_name, |
407 |
const char *image_name) |
408 |
{ |
409 |
if (strlen(image_name) < 2) |
410 |
return NULL; |
411 |
|
412 |
CDROMDevice *ret = NULL; |
413 |
|
414 |
if (image_name[1] == ':') { |
415 |
CDROMDeviceSPTI *spti = new CDROMDeviceSPTI(device_name); |
416 |
|
417 |
spti->setDrive(image_name); |
418 |
ret = spti; |
419 |
} else { |
420 |
CDROMDeviceASPI *aspi = new CDROMDeviceASPI(device_name); |
421 |
|
422 |
aspi->setSCSITarget(image_name); |
423 |
ret = aspi; |
424 |
} |
425 |
|
426 |
return ret; |
427 |
} |