e14743d1 |
1 | /* |
2 | SDL - Simple DirectMedia Layer |
3 | Copyright (C) 1997-2009 Sam Lantinga |
4 | |
5 | This library is free software; you can redistribute it and/or |
6 | modify it under the terms of the GNU Lesser General Public |
7 | License as published by the Free Software Foundation; either |
8 | version 2.1 of the License, or (at your option) any later version. |
9 | |
10 | This library is distributed in the hope that it will be useful, |
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
13 | Lesser General Public License for more details. |
14 | |
15 | You should have received a copy of the GNU Lesser General Public |
16 | License along with this library; if not, write to the Free Software |
17 | Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
18 | |
19 | Sam Lantinga |
20 | slouken@libsdl.org |
21 | */ |
22 | #include "SDL_config.h" |
23 | |
24 | #ifdef SDL_CDROM_OS2 |
25 | |
26 | /* Functions for system-level CD-ROM audio control */ |
27 | |
28 | #define INCL_MCIOS2 |
29 | #include <os2.h> |
30 | #include <os2me.h> |
31 | |
32 | #include "SDL_cdrom.h" |
33 | #include "../SDL_syscdrom.h" |
34 | |
35 | /* Size of MCI result buffer (in bytes) */ |
36 | #define MCI_CMDRETBUFSIZE 128 |
37 | |
38 | /* The maximum number of CD-ROM drives we'll detect */ |
39 | #define MAX_DRIVES 16 |
40 | |
41 | /* A list of available CD-ROM drives */ |
42 | static char *SDL_cdlist[MAX_DRIVES]; |
43 | //static dev_t SDL_cdmode[MAX_DRIVES]; |
44 | |
45 | /* The system-dependent CD control functions */ |
46 | static const char *SDL_SYS_CDName(int drive); |
47 | static int SDL_SYS_CDOpen(int drive); |
48 | static int SDL_SYS_CDGetTOC(SDL_CD *cdrom); |
49 | static CDstatus SDL_SYS_CDStatus(SDL_CD *cdrom, int *position); |
50 | static int SDL_SYS_CDPlay(SDL_CD *cdrom, int start, int length); |
51 | static int SDL_SYS_CDPause(SDL_CD *cdrom); |
52 | static int SDL_SYS_CDResume(SDL_CD *cdrom); |
53 | static int SDL_SYS_CDStop(SDL_CD *cdrom); |
54 | static int SDL_SYS_CDEject(SDL_CD *cdrom); |
55 | static void SDL_SYS_CDClose(SDL_CD *cdrom); |
56 | |
57 | /* MCI Timing Functions */ |
58 | #define MCI_MMTIMEPERSECOND 3000 |
59 | #define FRAMESFROMMM(mmtime) (((mmtime)*CD_FPS)/MCI_MMTIMEPERSECOND) |
60 | |
61 | |
62 | /* Ready for MCI CDAudio Devices */ |
63 | int SDL_SYS_CDInit(void) |
64 | { |
65 | int i; /* generig counter */ |
66 | MCI_SYSINFO_PARMS msp; /* Structure to MCI SysInfo parameters */ |
67 | CHAR SysInfoRet[MCI_CMDRETBUFSIZE]; /* Buffer for MCI Command result */ |
68 | |
69 | /* Fill in our driver capabilities */ |
70 | SDL_CDcaps.Name = SDL_SYS_CDName; |
71 | SDL_CDcaps.Open = SDL_SYS_CDOpen; |
72 | SDL_CDcaps.GetTOC = SDL_SYS_CDGetTOC; |
73 | SDL_CDcaps.Status = SDL_SYS_CDStatus; |
74 | SDL_CDcaps.Play = SDL_SYS_CDPlay; |
75 | SDL_CDcaps.Pause = SDL_SYS_CDPause; |
76 | SDL_CDcaps.Resume = SDL_SYS_CDResume; |
77 | SDL_CDcaps.Stop = SDL_SYS_CDStop; |
78 | SDL_CDcaps.Eject = SDL_SYS_CDEject; |
79 | SDL_CDcaps.Close = SDL_SYS_CDClose; |
80 | |
81 | /* Get the number of CD ROMs in the System */ |
82 | /* Clean SysInfo structure */ |
83 | SDL_memset(&msp, 0x00, sizeof(MCI_SYSINFO_PARMS)); |
84 | /* Prepare structure to Ask Numer of Audio CDs */ |
85 | msp.usDeviceType = MCI_DEVTYPE_CD_AUDIO; /* CD Audio Type */ |
86 | msp.pszReturn = (PSZ)&SysInfoRet; /* Return Structure */ |
87 | msp.ulRetSize = MCI_CMDRETBUFSIZE; /* Size of ret struct */ |
88 | if (LOUSHORT(mciSendCommand(0,MCI_SYSINFO, MCI_SYSINFO_QUANTITY | MCI_WAIT, (PVOID)&msp, 0)) != MCIERR_SUCCESS) return(CD_ERROR); |
89 | SDL_numcds = atoi(SysInfoRet); |
90 | if (SDL_numcds > MAX_DRIVES) SDL_numcds = MAX_DRIVES; /* Limit maximum CD number */ |
91 | |
92 | /* Get and Add their system name to the SDL_cdlist */ |
93 | msp.pszReturn = (PSZ)&SysInfoRet; /* Return Structure */ |
94 | msp.ulRetSize = MCI_CMDRETBUFSIZE; /* Size of ret struct */ |
95 | msp.usDeviceType = MCI_DEVTYPE_CD_AUDIO; /* CD Audio Type */ |
96 | for (i=0; i<SDL_numcds; i++) |
97 | { |
98 | msp.ulNumber = i+1; |
99 | mciSendCommand(0,MCI_SYSINFO, MCI_SYSINFO_NAME | MCI_WAIT,&msp, 0); |
100 | SDL_cdlist[i] = SDL_strdup(SysInfoRet); |
101 | if ( SDL_cdlist[i] == NULL ) |
102 | { |
103 | SDL_OutOfMemory(); |
104 | return(-1); |
105 | } |
106 | } |
107 | return(0); |
108 | } |
109 | |
110 | /* Return CDAudio System Dependent Device Name - Ready for MCI*/ |
111 | static const char *SDL_SYS_CDName(int drive) |
112 | { |
113 | return(SDL_cdlist[drive]); |
114 | } |
115 | |
116 | /* Open CDAudio Device - Ready for MCI */ |
117 | static int SDL_SYS_CDOpen(int drive) |
118 | { |
119 | MCI_OPEN_PARMS mop; |
120 | MCI_SET_PARMS msp; |
121 | MCI_GENERIC_PARMS mgp; |
122 | |
123 | /* Open the device */ |
124 | mop.hwndCallback = (HWND)NULL; // None |
125 | mop.usDeviceID = (USHORT)NULL; // Will be returned. |
126 | mop.pszDeviceType = (PSZ)SDL_cdlist[drive]; // CDAudio Device |
127 | if (LOUSHORT(mciSendCommand(0,MCI_OPEN,MCI_WAIT,&mop, 0)) != MCIERR_SUCCESS) return(CD_ERROR); |
128 | /* Set time format */ |
129 | msp.hwndCallback = (HWND)NULL; // None |
130 | msp.ulTimeFormat = MCI_FORMAT_MSF; // Minute : Second : Frame structure |
131 | msp.ulSpeedFormat = (ULONG)NULL; // No change |
132 | msp.ulAudio = (ULONG)NULL; // No Channel |
133 | msp.ulLevel = (ULONG)NULL; // No Volume |
134 | msp.ulOver = (ULONG)NULL; // No Delay |
135 | msp.ulItem = (ULONG)NULL; // No item |
136 | msp.ulValue = (ULONG)NULL; // No value for item flag |
137 | if (LOUSHORT(mciSendCommand(mop.usDeviceID,MCI_SET,MCI_WAIT | MCI_SET_TIME_FORMAT,&msp, 0)) == MCIERR_SUCCESS) return (mop.usDeviceID); |
138 | /* Error setting time format? - Close opened device */ |
139 | mgp.hwndCallback = (HWND)NULL; // None |
140 | mciSendCommand(mop.usDeviceID,MCI_CLOSE,MCI_WAIT,&mgp, 0); |
141 | return(CD_ERROR); |
142 | } |
143 | |
144 | /* Get CD Table Of Contents - Ready for MCI */ |
145 | static int SDL_SYS_CDGetTOC(SDL_CD *cdrom) |
146 | { |
147 | MCI_TOC_PARMS mtp; |
148 | MCI_STATUS_PARMS msp; |
149 | MCI_TOC_REC * mtr; |
150 | INT i; |
151 | |
152 | /* Correction because MCI cannot read TOC while CD is playing (it'll stop!) */ |
153 | if (cdrom->status == CD_PLAYING || cdrom->status == CD_PAUSED) return 0; |
154 | |
155 | /* Get Number of Tracks */ |
156 | msp.hwndCallback = (HWND)NULL; /* None */ |
157 | msp.ulReturn = (ULONG)NULL; /* We want this information */ |
158 | msp.ulItem = MCI_STATUS_NUMBER_OF_TRACKS; |
159 | msp.ulValue = (ULONG)NULL; /* No additional information */ |
160 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_STATUS,MCI_WAIT | MCI_STATUS_ITEM,&msp, 0)) != MCIERR_SUCCESS) return(CD_ERROR); |
161 | cdrom->numtracks = msp.ulReturn; |
162 | if ( cdrom->numtracks > SDL_MAX_TRACKS ) |
163 | { |
164 | cdrom->numtracks = SDL_MAX_TRACKS; |
165 | } |
166 | /* Alocate space for TOC data */ |
167 | mtr = (MCI_TOC_REC *)SDL_malloc(cdrom->numtracks*sizeof(MCI_TOC_REC)); |
168 | if ( mtr == NULL ) |
169 | { |
170 | SDL_OutOfMemory(); |
171 | return(-1); |
172 | } |
173 | /* Get TOC from CD */ |
174 | mtp.pBuf = mtr; |
175 | mtp.ulBufSize = cdrom->numtracks*sizeof(MCI_TOC_REC); |
176 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_GETTOC,MCI_WAIT,&mtp, 0)) != MCIERR_SUCCESS) |
177 | { |
178 | SDL_OutOfMemory(); |
179 | SDL_free(mtr); |
180 | return(CD_ERROR); |
181 | } |
182 | /* Fill SDL Tracks Structure */ |
183 | for (i=0; i<cdrom->numtracks; i++) |
184 | { |
185 | /* Set Track ID */ |
186 | cdrom->track[i].id = (mtr+i)->TrackNum; |
187 | /* Set Track Type */ |
188 | msp.hwndCallback = (HWND)NULL; /* None */ |
189 | msp.ulReturn = (ULONG)NULL; /* We want this information */ |
190 | msp.ulItem = MCI_CD_STATUS_TRACK_TYPE; |
191 | msp.ulValue = (ULONG)((mtr+i)->TrackNum); /* Track Number? */ |
192 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_STATUS,MCI_WAIT | MCI_TRACK | MCI_STATUS_ITEM,&msp, 0)) != MCIERR_SUCCESS) |
193 | { |
194 | SDL_free(mtr); |
195 | return (CD_ERROR); |
196 | } |
197 | if (msp.ulReturn==MCI_CD_TRACK_AUDIO) cdrom->track[i].type = SDL_AUDIO_TRACK; |
198 | else cdrom->track[i].type = SDL_DATA_TRACK; |
199 | /* Set Track Length - values from MCI are in MMTIMEs - 3000 MMTIME = 1 second */ |
200 | cdrom->track[i].length = FRAMESFROMMM((mtr+i)->ulEndAddr - (mtr+i)->ulStartAddr); |
201 | /* Set Track Offset */ |
202 | cdrom->track[i].offset = FRAMESFROMMM((mtr+i)->ulStartAddr); |
203 | } |
204 | SDL_free(mtr); |
205 | return(0); |
206 | } |
207 | |
208 | |
209 | /* Get CD-ROM status - Ready for MCI */ |
210 | static CDstatus SDL_SYS_CDStatus(SDL_CD *cdrom, int *position) |
211 | { |
212 | CDstatus status; |
213 | MCI_STATUS_PARMS msp; |
214 | |
215 | /* Get Status from MCI */ |
216 | msp.hwndCallback = (HWND)NULL; /* None */ |
217 | msp.ulReturn = (ULONG)NULL; /* We want this information */ |
218 | msp.ulItem = MCI_STATUS_MODE; |
219 | msp.ulValue = (ULONG)NULL; /* No additional information */ |
220 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_STATUS,MCI_WAIT | MCI_STATUS_ITEM,&msp, 0)) != MCIERR_SUCCESS) status = CD_ERROR; |
221 | else |
222 | { |
223 | switch(msp.ulReturn) |
224 | { |
225 | case MCI_MODE_NOT_READY: |
226 | status = CD_TRAYEMPTY; |
227 | break; |
228 | case MCI_MODE_PAUSE: |
229 | status = CD_PAUSED; |
230 | break; |
231 | case MCI_MODE_PLAY: |
232 | status = CD_PLAYING; |
233 | break; |
234 | case MCI_MODE_STOP: |
235 | status = CD_STOPPED; |
236 | break; |
237 | /* These cases should not occour */ |
238 | case MCI_MODE_RECORD: |
239 | case MCI_MODE_SEEK: |
240 | default: |
241 | status = CD_ERROR; |
242 | break; |
243 | } |
244 | } |
245 | |
246 | /* Determine position */ |
247 | if (position != NULL) /* The SDL $&$&%# CDROM call sends NULL pointer here! */ |
248 | { |
249 | if ((status == CD_PLAYING) || (status == CD_PAUSED)) |
250 | { |
251 | /* Get Position */ |
252 | msp.hwndCallback = (HWND)NULL; /* None */ |
253 | msp.ulReturn = (ULONG)NULL; /* We want this information */ |
254 | msp.ulItem = MCI_STATUS_POSITION; |
255 | msp.ulValue = (ULONG)NULL; /* No additiona info */ |
256 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_STATUS,MCI_WAIT | MCI_STATUS_ITEM,&msp, 0)) != MCIERR_SUCCESS) return (CD_ERROR); |
257 | /* Convert from MSF (format selected in the Open process) to Frames (format that will be returned) */ |
258 | *position = MSF_TO_FRAMES(MSF_MINUTE(msp.ulReturn),MSF_SECOND(msp.ulReturn),MSF_FRAME(msp.ulReturn)); |
259 | } |
260 | else *position = 0; |
261 | } |
262 | return(status); |
263 | } |
264 | |
265 | /* Start play - Ready for MCI */ |
266 | static int SDL_SYS_CDPlay(SDL_CD *cdrom, int start, int length) |
267 | { |
268 | MCI_GENERIC_PARMS mgp; |
269 | MCI_STATUS_PARMS msp; |
270 | MCI_PLAY_PARMS mpp; |
271 | ULONG min,sec,frm; |
272 | |
273 | /* Start MSF */ |
274 | FRAMES_TO_MSF(start, &min, &sec, &frm); |
275 | MSF_MINUTE(mpp.ulFrom) = min; |
276 | MSF_SECOND(mpp.ulFrom) = sec; |
277 | MSF_FRAME(mpp.ulFrom) = frm; |
278 | /* End MSF */ |
279 | FRAMES_TO_MSF(start+length, &min, &sec, &frm); |
280 | MSF_MINUTE(mpp.ulTo) = min; |
281 | MSF_SECOND(mpp.ulTo) = sec; |
282 | MSF_FRAME(mpp.ulTo) = frm; |
283 | #ifdef DEBUG_CDROM |
284 | fprintf(stderr, "Trying to play from %d:%d:%d to %d:%d:%d\n", |
285 | playtime.cdmsf_min0, playtime.cdmsf_sec0, playtime.cdmsf_frame0, |
286 | playtime.cdmsf_min1, playtime.cdmsf_sec1, playtime.cdmsf_frame1); |
287 | #endif |
288 | /* Verifies if it is paused first... and if it is, unpause before stopping it. */ |
289 | msp.hwndCallback = (HWND)NULL; /* None */ |
290 | msp.ulReturn = (ULONG)NULL; /* We want this information */ |
291 | msp.ulItem = MCI_STATUS_MODE; |
292 | msp.ulValue = (ULONG)NULL; /* No additional information */ |
293 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_STATUS,MCI_WAIT | MCI_STATUS_ITEM,&msp, 0)) == MCIERR_SUCCESS) |
294 | { |
295 | if (msp.ulReturn == MCI_MODE_PAUSE) |
296 | { |
297 | mgp.hwndCallback = (HWND)NULL; // None |
298 | mciSendCommand(cdrom->id,MCI_RESUME,0,&mgp, 0); |
299 | } |
300 | } |
301 | /* Now play it. */ |
302 | mpp.hwndCallback = (HWND)NULL; // We do not want the info. temp |
303 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_PLAY,MCI_FROM | MCI_TO,&mpp, 0)) == MCIERR_SUCCESS) return 0; |
304 | return (CD_ERROR); |
305 | } |
306 | |
307 | /* Pause play - Ready for MCI */ |
308 | static int SDL_SYS_CDPause(SDL_CD *cdrom) |
309 | { |
310 | MCI_GENERIC_PARMS mgp; |
311 | |
312 | mgp.hwndCallback = (HWND)NULL; // None |
313 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_PAUSE,MCI_WAIT,&mgp, 0)) == MCIERR_SUCCESS) return 0; |
314 | return(CD_ERROR); |
315 | } |
316 | |
317 | /* Resume play - Ready for MCI */ |
318 | static int SDL_SYS_CDResume(SDL_CD *cdrom) |
319 | { |
320 | MCI_GENERIC_PARMS mgp; |
321 | |
322 | mgp.hwndCallback = (HWND)NULL; // None |
323 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_RESUME,MCI_WAIT,&mgp, 0)) == MCIERR_SUCCESS) return 0; |
324 | return(CD_ERROR); |
325 | } |
326 | |
327 | /* Stop play - Ready for MCI */ |
328 | static int SDL_SYS_CDStop(SDL_CD *cdrom) |
329 | { |
330 | MCI_GENERIC_PARMS mgp; |
331 | MCI_STATUS_PARMS msp; |
332 | |
333 | /* Verifies if it is paused first... and if it is, unpause before stopping it. */ |
334 | msp.hwndCallback = (HWND)NULL; /* None */ |
335 | msp.ulReturn = (ULONG)NULL; /* We want this information */ |
336 | msp.ulItem = MCI_STATUS_MODE; |
337 | msp.ulValue = (ULONG)NULL; /* No additional information */ |
338 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_STATUS,MCI_WAIT | MCI_STATUS_ITEM,&msp, 0)) == MCIERR_SUCCESS) |
339 | { |
340 | if (msp.ulReturn == MCI_MODE_PAUSE) |
341 | { |
342 | mgp.hwndCallback = (HWND)NULL; // None |
343 | mciSendCommand(cdrom->id,MCI_RESUME,0,&mgp, 0); |
344 | } |
345 | } |
346 | /* Now stops the media */ |
347 | mgp.hwndCallback = (HWND)NULL; // None |
348 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_STOP,MCI_WAIT,&mgp, 0)) == MCIERR_SUCCESS) return 0; |
349 | return(CD_ERROR); |
350 | } |
351 | |
352 | /* Eject the CD-ROM - Ready for MCI */ |
353 | static int SDL_SYS_CDEject(SDL_CD *cdrom) |
354 | { |
355 | MCI_SET_PARMS msp; |
356 | |
357 | msp.hwndCallback = (HWND)NULL; // None |
358 | msp.ulTimeFormat = (ULONG)NULL; // No change |
359 | msp.ulSpeedFormat = (ULONG)NULL; // No change |
360 | msp.ulAudio = (ULONG)NULL; // No Channel |
361 | msp.ulLevel = (ULONG)NULL; // No Volume |
362 | msp.ulOver = (ULONG)NULL; // No Delay |
363 | msp.ulItem = (ULONG)NULL; // No item |
364 | msp.ulValue = (ULONG)NULL; // No value for item flag |
365 | if (LOUSHORT(mciSendCommand(cdrom->id,MCI_SET,MCI_WAIT | MCI_SET_DOOR_OPEN,&msp, 0)) == MCIERR_SUCCESS) return 0; |
366 | return(CD_ERROR); |
367 | } |
368 | |
369 | /* Close the CD-ROM handle - Ready for MCI */ |
370 | static void SDL_SYS_CDClose(SDL_CD *cdrom) |
371 | { |
372 | MCI_GENERIC_PARMS mgp; |
373 | |
374 | mgp.hwndCallback = (HWND)NULL; // None |
375 | mciSendCommand(cdrom->id,MCI_CLOSE,MCI_WAIT,&mgp, 0); |
376 | } |
377 | |
378 | /* Finalize CDROM Subsystem - Ready for MCI */ |
379 | void SDL_SYS_CDQuit(void) |
380 | { |
381 | int i; |
382 | |
383 | if ( SDL_numcds > 0 ) |
384 | { |
385 | for ( i=0; i<SDL_numcds; ++i ) |
386 | { |
387 | SDL_free(SDL_cdlist[i]); |
388 | } |
389 | SDL_numcds = 0; |
390 | } |
391 | } |
392 | |
393 | #endif /* SDL_CDROM_OS2 */ |