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_LINUX |
25 | |
26 | /* Functions for system-level CD-ROM audio control */ |
27 | |
28 | #include <string.h> /* For strerror() */ |
29 | #include <sys/types.h> |
30 | #include <sys/stat.h> |
31 | #include <sys/ioctl.h> |
32 | #include <fcntl.h> |
33 | #include <errno.h> |
34 | #include <unistd.h> |
35 | #ifdef __LINUX__ |
36 | #ifdef HAVE_LINUX_VERSION_H |
37 | /* linux 2.6.9 workaround */ |
38 | #include <linux/version.h> |
39 | #if LINUX_VERSION_CODE == KERNEL_VERSION(2,6,9) |
40 | #include <asm/types.h> |
41 | #define __le64 __u64 |
42 | #define __le32 __u32 |
43 | #define __le16 __u16 |
44 | #define __be64 __u64 |
45 | #define __be32 __u32 |
46 | #define __be16 __u16 |
47 | #endif /* linux 2.6.9 workaround */ |
48 | #endif /* HAVE_LINUX_VERSION_H */ |
49 | #include <linux/cdrom.h> |
50 | #endif |
51 | #ifdef __SVR4 |
52 | #include <sys/cdio.h> |
53 | #endif |
54 | |
55 | /* Define this to use the alternative getmntent() code */ |
56 | #ifndef __SVR4 |
57 | #define USE_MNTENT |
58 | #endif |
59 | |
60 | #ifdef USE_MNTENT |
61 | #if defined(__USLC__) |
62 | #include <sys/mntent.h> |
63 | #else |
64 | #include <mntent.h> |
65 | #endif |
66 | |
67 | #ifndef _PATH_MNTTAB |
68 | #ifdef MNTTAB |
69 | #define _PATH_MNTTAB MNTTAB |
70 | #else |
71 | #define _PATH_MNTTAB "/etc/fstab" |
72 | #endif |
73 | #endif /* !_PATH_MNTTAB */ |
74 | |
75 | #ifndef _PATH_MOUNTED |
76 | #define _PATH_MOUNTED "/etc/mtab" |
77 | #endif /* !_PATH_MOUNTED */ |
78 | |
79 | #ifndef MNTTYPE_CDROM |
80 | #define MNTTYPE_CDROM "iso9660" |
81 | #endif |
82 | #ifndef MNTTYPE_SUPER |
83 | #define MNTTYPE_SUPER "supermount" |
84 | #endif |
85 | #endif /* USE_MNTENT */ |
86 | |
87 | #include "SDL_cdrom.h" |
88 | #include "../SDL_syscdrom.h" |
89 | |
90 | |
91 | /* The maximum number of CD-ROM drives we'll detect */ |
92 | #define MAX_DRIVES 16 |
93 | |
94 | /* A list of available CD-ROM drives */ |
95 | static char *SDL_cdlist[MAX_DRIVES]; |
96 | static dev_t SDL_cdmode[MAX_DRIVES]; |
97 | |
98 | /* The system-dependent CD control functions */ |
99 | static const char *SDL_SYS_CDName(int drive); |
100 | static int SDL_SYS_CDOpen(int drive); |
101 | static int SDL_SYS_CDGetTOC(SDL_CD *cdrom); |
102 | static CDstatus SDL_SYS_CDStatus(SDL_CD *cdrom, int *position); |
103 | static int SDL_SYS_CDPlay(SDL_CD *cdrom, int start, int length); |
104 | static int SDL_SYS_CDPause(SDL_CD *cdrom); |
105 | static int SDL_SYS_CDResume(SDL_CD *cdrom); |
106 | static int SDL_SYS_CDStop(SDL_CD *cdrom); |
107 | static int SDL_SYS_CDEject(SDL_CD *cdrom); |
108 | static void SDL_SYS_CDClose(SDL_CD *cdrom); |
109 | |
110 | /* Some ioctl() errno values which occur when the tray is empty */ |
111 | #ifndef ENOMEDIUM |
112 | #define ENOMEDIUM ENOENT |
113 | #endif |
114 | #define ERRNO_TRAYEMPTY(errno) \ |
115 | ((errno == EIO) || (errno == ENOENT) || \ |
116 | (errno == EINVAL) || (errno == ENOMEDIUM)) |
117 | |
118 | /* Check a drive to see if it is a CD-ROM */ |
119 | static int CheckDrive(char *drive, char *mnttype, struct stat *stbuf) |
120 | { |
121 | int is_cd, cdfd; |
122 | struct cdrom_subchnl info; |
123 | |
124 | /* If it doesn't exist, return -1 */ |
125 | if ( stat(drive, stbuf) < 0 ) { |
126 | return(-1); |
127 | } |
128 | |
129 | /* If it does exist, verify that it's an available CD-ROM */ |
130 | is_cd = 0; |
131 | if ( S_ISCHR(stbuf->st_mode) || S_ISBLK(stbuf->st_mode) ) { |
132 | cdfd = open(drive, (O_RDONLY|O_NONBLOCK), 0); |
133 | if ( cdfd >= 0 ) { |
134 | info.cdsc_format = CDROM_MSF; |
135 | /* Under Linux, EIO occurs when a disk is not present. |
136 | */ |
137 | if ( (ioctl(cdfd, CDROMSUBCHNL, &info) == 0) || |
138 | ERRNO_TRAYEMPTY(errno) ) { |
139 | is_cd = 1; |
140 | } |
141 | close(cdfd); |
142 | } |
143 | #ifdef USE_MNTENT |
144 | /* Even if we can't read it, it might be mounted */ |
145 | else if ( mnttype && (SDL_strcmp(mnttype, MNTTYPE_CDROM) == 0) ) { |
146 | is_cd = 1; |
147 | } |
148 | #endif |
149 | } |
150 | return(is_cd); |
151 | } |
152 | |
153 | /* Add a CD-ROM drive to our list of valid drives */ |
154 | static void AddDrive(char *drive, struct stat *stbuf) |
155 | { |
156 | int i; |
157 | |
158 | if ( SDL_numcds < MAX_DRIVES ) { |
159 | /* Check to make sure it's not already in our list. |
160 | This can happen when we see a drive via symbolic link. |
161 | */ |
162 | for ( i=0; i<SDL_numcds; ++i ) { |
163 | if ( stbuf->st_rdev == SDL_cdmode[i] ) { |
164 | #ifdef DEBUG_CDROM |
165 | fprintf(stderr, "Duplicate drive detected: %s == %s\n", drive, SDL_cdlist[i]); |
166 | #endif |
167 | return; |
168 | } |
169 | } |
170 | |
171 | /* Add this drive to our list */ |
172 | i = SDL_numcds; |
173 | SDL_cdlist[i] = SDL_strdup(drive); |
174 | if ( SDL_cdlist[i] == NULL ) { |
175 | SDL_OutOfMemory(); |
176 | return; |
177 | } |
178 | SDL_cdmode[i] = stbuf->st_rdev; |
179 | ++SDL_numcds; |
180 | #ifdef DEBUG_CDROM |
181 | fprintf(stderr, "Added CD-ROM drive: %s\n", drive); |
182 | #endif |
183 | } |
184 | } |
185 | |
186 | #ifdef USE_MNTENT |
187 | static void CheckMounts(const char *mtab) |
188 | { |
189 | FILE *mntfp; |
190 | struct mntent *mntent; |
191 | struct stat stbuf; |
192 | |
193 | mntfp = setmntent(mtab, "r"); |
194 | if ( mntfp != NULL ) { |
195 | char *tmp; |
196 | char *mnt_type; |
197 | size_t mnt_type_len; |
198 | char *mnt_dev; |
199 | size_t mnt_dev_len; |
200 | |
201 | while ( (mntent=getmntent(mntfp)) != NULL ) { |
202 | mnt_type_len = SDL_strlen(mntent->mnt_type) + 1; |
203 | mnt_type = SDL_stack_alloc(char, mnt_type_len); |
204 | if (mnt_type == NULL) |
205 | continue; /* maybe you'll get lucky next time. */ |
206 | |
207 | mnt_dev_len = SDL_strlen(mntent->mnt_fsname) + 1; |
208 | mnt_dev = SDL_stack_alloc(char, mnt_dev_len); |
209 | if (mnt_dev == NULL) { |
210 | SDL_stack_free(mnt_type); |
211 | continue; |
212 | } |
213 | |
214 | SDL_strlcpy(mnt_type, mntent->mnt_type, mnt_type_len); |
215 | SDL_strlcpy(mnt_dev, mntent->mnt_fsname, mnt_dev_len); |
216 | |
217 | /* Handle "supermount" filesystem mounts */ |
218 | if ( SDL_strcmp(mnt_type, MNTTYPE_SUPER) == 0 ) { |
219 | tmp = SDL_strstr(mntent->mnt_opts, "fs="); |
220 | if ( tmp ) { |
221 | SDL_stack_free(mnt_type); |
222 | mnt_type = SDL_strdup(tmp + SDL_strlen("fs=")); |
223 | if ( mnt_type ) { |
224 | tmp = SDL_strchr(mnt_type, ','); |
225 | if ( tmp ) { |
226 | *tmp = '\0'; |
227 | } |
228 | } |
229 | } |
230 | tmp = SDL_strstr(mntent->mnt_opts, "dev="); |
231 | if ( tmp ) { |
232 | SDL_stack_free(mnt_dev); |
233 | mnt_dev = SDL_strdup(tmp + SDL_strlen("dev=")); |
234 | if ( mnt_dev ) { |
235 | tmp = SDL_strchr(mnt_dev, ','); |
236 | if ( tmp ) { |
237 | *tmp = '\0'; |
238 | } |
239 | } |
240 | } |
241 | } |
242 | if ( SDL_strcmp(mnt_type, MNTTYPE_CDROM) == 0 ) { |
243 | #ifdef DEBUG_CDROM |
244 | fprintf(stderr, "Checking mount path from %s: %s mounted on %s of %s\n", |
245 | mtab, mnt_dev, mntent->mnt_dir, mnt_type); |
246 | #endif |
247 | if (CheckDrive(mnt_dev, mnt_type, &stbuf) > 0) { |
248 | AddDrive(mnt_dev, &stbuf); |
249 | } |
250 | } |
251 | SDL_stack_free(mnt_dev); |
252 | SDL_stack_free(mnt_type); |
253 | } |
254 | endmntent(mntfp); |
255 | } |
256 | } |
257 | #endif /* USE_MNTENT */ |
258 | |
259 | int SDL_SYS_CDInit(void) |
260 | { |
261 | /* checklist: /dev/cdrom, /dev/hd?, /dev/scd? /dev/sr? */ |
262 | static char *checklist[] = { |
263 | "cdrom", "?a hd?", "?0 scd?", "?0 sr?", NULL |
264 | }; |
265 | char *SDLcdrom; |
266 | int i, j, exists; |
267 | char drive[32]; |
268 | struct stat stbuf; |
269 | |
270 | /* Fill in our driver capabilities */ |
271 | SDL_CDcaps.Name = SDL_SYS_CDName; |
272 | SDL_CDcaps.Open = SDL_SYS_CDOpen; |
273 | SDL_CDcaps.GetTOC = SDL_SYS_CDGetTOC; |
274 | SDL_CDcaps.Status = SDL_SYS_CDStatus; |
275 | SDL_CDcaps.Play = SDL_SYS_CDPlay; |
276 | SDL_CDcaps.Pause = SDL_SYS_CDPause; |
277 | SDL_CDcaps.Resume = SDL_SYS_CDResume; |
278 | SDL_CDcaps.Stop = SDL_SYS_CDStop; |
279 | SDL_CDcaps.Eject = SDL_SYS_CDEject; |
280 | SDL_CDcaps.Close = SDL_SYS_CDClose; |
281 | |
282 | /* Look in the environment for our CD-ROM drive list */ |
283 | SDLcdrom = SDL_getenv("SDL_CDROM"); /* ':' separated list of devices */ |
284 | if ( SDLcdrom != NULL ) { |
285 | char *cdpath, *delim; |
286 | size_t len = SDL_strlen(SDLcdrom)+1; |
287 | cdpath = SDL_stack_alloc(char, len); |
288 | if ( cdpath != NULL ) { |
289 | SDL_strlcpy(cdpath, SDLcdrom, len); |
290 | SDLcdrom = cdpath; |
291 | do { |
292 | delim = SDL_strchr(SDLcdrom, ':'); |
293 | if ( delim ) { |
294 | *delim++ = '\0'; |
295 | } |
296 | #ifdef DEBUG_CDROM |
297 | fprintf(stderr, "Checking CD-ROM drive from SDL_CDROM: %s\n", SDLcdrom); |
298 | #endif |
299 | if ( CheckDrive(SDLcdrom, NULL, &stbuf) > 0 ) { |
300 | AddDrive(SDLcdrom, &stbuf); |
301 | } |
302 | if ( delim ) { |
303 | SDLcdrom = delim; |
304 | } else { |
305 | SDLcdrom = NULL; |
306 | } |
307 | } while ( SDLcdrom ); |
308 | SDL_stack_free(cdpath); |
309 | } |
310 | |
311 | /* If we found our drives, there's nothing left to do */ |
312 | if ( SDL_numcds > 0 ) { |
313 | return(0); |
314 | } |
315 | } |
316 | |
317 | #ifdef USE_MNTENT |
318 | /* Check /dev/cdrom first :-) */ |
319 | if (CheckDrive("/dev/cdrom", NULL, &stbuf) > 0) { |
320 | AddDrive("/dev/cdrom", &stbuf); |
321 | } |
322 | |
323 | /* Now check the currently mounted CD drives */ |
324 | CheckMounts(_PATH_MOUNTED); |
325 | |
326 | /* Finally check possible mountable drives in /etc/fstab */ |
327 | CheckMounts(_PATH_MNTTAB); |
328 | |
329 | /* If we found our drives, there's nothing left to do */ |
330 | if ( SDL_numcds > 0 ) { |
331 | return(0); |
332 | } |
333 | #endif /* USE_MNTENT */ |
334 | |
335 | /* Scan the system for CD-ROM drives. |
336 | Not always 100% reliable, so use the USE_MNTENT code above first. |
337 | */ |
338 | for ( i=0; checklist[i]; ++i ) { |
339 | if ( checklist[i][0] == '?' ) { |
340 | char *insert; |
341 | exists = 1; |
342 | for ( j=checklist[i][1]; exists; ++j ) { |
343 | SDL_snprintf(drive, SDL_arraysize(drive), "/dev/%s", &checklist[i][3]); |
344 | insert = SDL_strchr(drive, '?'); |
345 | if ( insert != NULL ) { |
346 | *insert = j; |
347 | } |
348 | #ifdef DEBUG_CDROM |
349 | fprintf(stderr, "Checking possible CD-ROM drive: %s\n", drive); |
350 | #endif |
351 | switch (CheckDrive(drive, NULL, &stbuf)) { |
352 | /* Drive exists and is a CD-ROM */ |
353 | case 1: |
354 | AddDrive(drive, &stbuf); |
355 | break; |
356 | /* Drive exists, but isn't a CD-ROM */ |
357 | case 0: |
358 | break; |
359 | /* Drive doesn't exist */ |
360 | case -1: |
361 | exists = 0; |
362 | break; |
363 | } |
364 | } |
365 | } else { |
366 | SDL_snprintf(drive, SDL_arraysize(drive), "/dev/%s", checklist[i]); |
367 | #ifdef DEBUG_CDROM |
368 | fprintf(stderr, "Checking possible CD-ROM drive: %s\n", drive); |
369 | #endif |
370 | if ( CheckDrive(drive, NULL, &stbuf) > 0 ) { |
371 | AddDrive(drive, &stbuf); |
372 | } |
373 | } |
374 | } |
375 | return(0); |
376 | } |
377 | |
378 | /* General ioctl() CD-ROM command function */ |
379 | static int SDL_SYS_CDioctl(int id, int command, void *arg) |
380 | { |
381 | int retval; |
382 | |
383 | retval = ioctl(id, command, arg); |
384 | if ( retval < 0 ) { |
385 | SDL_SetError("ioctl() error: %s", strerror(errno)); |
386 | } |
387 | return(retval); |
388 | } |
389 | |
390 | static const char *SDL_SYS_CDName(int drive) |
391 | { |
392 | return(SDL_cdlist[drive]); |
393 | } |
394 | |
395 | static int SDL_SYS_CDOpen(int drive) |
396 | { |
397 | return(open(SDL_cdlist[drive], (O_RDONLY|O_NONBLOCK), 0)); |
398 | } |
399 | |
400 | static int SDL_SYS_CDGetTOC(SDL_CD *cdrom) |
401 | { |
402 | struct cdrom_tochdr toc; |
403 | int i, okay; |
404 | struct cdrom_tocentry entry; |
405 | |
406 | okay = 0; |
407 | if ( SDL_SYS_CDioctl(cdrom->id, CDROMREADTOCHDR, &toc) == 0 ) { |
408 | cdrom->numtracks = toc.cdth_trk1-toc.cdth_trk0+1; |
409 | if ( cdrom->numtracks > SDL_MAX_TRACKS ) { |
410 | cdrom->numtracks = SDL_MAX_TRACKS; |
411 | } |
412 | /* Read all the track TOC entries */ |
413 | for ( i=0; i<=cdrom->numtracks; ++i ) { |
414 | if ( i == cdrom->numtracks ) { |
415 | cdrom->track[i].id = CDROM_LEADOUT; |
416 | } else { |
417 | cdrom->track[i].id = toc.cdth_trk0+i; |
418 | } |
419 | entry.cdte_track = cdrom->track[i].id; |
420 | entry.cdte_format = CDROM_MSF; |
421 | if ( SDL_SYS_CDioctl(cdrom->id, CDROMREADTOCENTRY, |
422 | &entry) < 0 ) { |
423 | break; |
424 | } else { |
425 | if ( entry.cdte_ctrl & CDROM_DATA_TRACK ) { |
426 | cdrom->track[i].type = SDL_DATA_TRACK; |
427 | } else { |
428 | cdrom->track[i].type = SDL_AUDIO_TRACK; |
429 | } |
430 | cdrom->track[i].offset = MSF_TO_FRAMES( |
431 | entry.cdte_addr.msf.minute, |
432 | entry.cdte_addr.msf.second, |
433 | entry.cdte_addr.msf.frame); |
434 | cdrom->track[i].length = 0; |
435 | if ( i > 0 ) { |
436 | cdrom->track[i-1].length = |
437 | cdrom->track[i].offset- |
438 | cdrom->track[i-1].offset; |
439 | } |
440 | } |
441 | } |
442 | if ( i == (cdrom->numtracks+1) ) { |
443 | okay = 1; |
444 | } |
445 | } |
446 | return(okay ? 0 : -1); |
447 | } |
448 | |
449 | /* Get CD-ROM status */ |
450 | static CDstatus SDL_SYS_CDStatus(SDL_CD *cdrom, int *position) |
451 | { |
452 | CDstatus status; |
453 | struct cdrom_tochdr toc; |
454 | struct cdrom_subchnl info; |
455 | |
456 | info.cdsc_format = CDROM_MSF; |
457 | if ( ioctl(cdrom->id, CDROMSUBCHNL, &info) < 0 ) { |
458 | if ( ERRNO_TRAYEMPTY(errno) ) { |
459 | status = CD_TRAYEMPTY; |
460 | } else { |
461 | status = CD_ERROR; |
462 | } |
463 | } else { |
464 | switch (info.cdsc_audiostatus) { |
465 | case CDROM_AUDIO_INVALID: |
466 | case CDROM_AUDIO_NO_STATUS: |
467 | /* Try to determine if there's a CD available */ |
468 | if (ioctl(cdrom->id, CDROMREADTOCHDR, &toc)==0) |
469 | status = CD_STOPPED; |
470 | else |
471 | status = CD_TRAYEMPTY; |
472 | break; |
473 | case CDROM_AUDIO_COMPLETED: |
474 | status = CD_STOPPED; |
475 | break; |
476 | case CDROM_AUDIO_PLAY: |
477 | status = CD_PLAYING; |
478 | break; |
479 | case CDROM_AUDIO_PAUSED: |
480 | /* Workaround buggy CD-ROM drive */ |
481 | if ( info.cdsc_trk == CDROM_LEADOUT ) { |
482 | status = CD_STOPPED; |
483 | } else { |
484 | status = CD_PAUSED; |
485 | } |
486 | break; |
487 | default: |
488 | status = CD_ERROR; |
489 | break; |
490 | } |
491 | } |
492 | if ( position ) { |
493 | if ( status == CD_PLAYING || (status == CD_PAUSED) ) { |
494 | *position = MSF_TO_FRAMES( |
495 | info.cdsc_absaddr.msf.minute, |
496 | info.cdsc_absaddr.msf.second, |
497 | info.cdsc_absaddr.msf.frame); |
498 | } else { |
499 | *position = 0; |
500 | } |
501 | } |
502 | return(status); |
503 | } |
504 | |
505 | /* Start play */ |
506 | static int SDL_SYS_CDPlay(SDL_CD *cdrom, int start, int length) |
507 | { |
508 | struct cdrom_msf playtime; |
509 | |
510 | FRAMES_TO_MSF(start, |
511 | &playtime.cdmsf_min0, &playtime.cdmsf_sec0, &playtime.cdmsf_frame0); |
512 | FRAMES_TO_MSF(start+length, |
513 | &playtime.cdmsf_min1, &playtime.cdmsf_sec1, &playtime.cdmsf_frame1); |
514 | #ifdef DEBUG_CDROM |
515 | fprintf(stderr, "Trying to play from %d:%d:%d to %d:%d:%d\n", |
516 | playtime.cdmsf_min0, playtime.cdmsf_sec0, playtime.cdmsf_frame0, |
517 | playtime.cdmsf_min1, playtime.cdmsf_sec1, playtime.cdmsf_frame1); |
518 | #endif |
519 | return(SDL_SYS_CDioctl(cdrom->id, CDROMPLAYMSF, &playtime)); |
520 | } |
521 | |
522 | /* Pause play */ |
523 | static int SDL_SYS_CDPause(SDL_CD *cdrom) |
524 | { |
525 | return(SDL_SYS_CDioctl(cdrom->id, CDROMPAUSE, 0)); |
526 | } |
527 | |
528 | /* Resume play */ |
529 | static int SDL_SYS_CDResume(SDL_CD *cdrom) |
530 | { |
531 | return(SDL_SYS_CDioctl(cdrom->id, CDROMRESUME, 0)); |
532 | } |
533 | |
534 | /* Stop play */ |
535 | static int SDL_SYS_CDStop(SDL_CD *cdrom) |
536 | { |
537 | return(SDL_SYS_CDioctl(cdrom->id, CDROMSTOP, 0)); |
538 | } |
539 | |
540 | /* Eject the CD-ROM */ |
541 | static int SDL_SYS_CDEject(SDL_CD *cdrom) |
542 | { |
543 | return(SDL_SYS_CDioctl(cdrom->id, CDROMEJECT, 0)); |
544 | } |
545 | |
546 | /* Close the CD-ROM handle */ |
547 | static void SDL_SYS_CDClose(SDL_CD *cdrom) |
548 | { |
549 | close(cdrom->id); |
550 | } |
551 | |
552 | void SDL_SYS_CDQuit(void) |
553 | { |
554 | int i; |
555 | |
556 | if ( SDL_numcds > 0 ) { |
557 | for ( i=0; i<SDL_numcds; ++i ) { |
558 | SDL_free(SDL_cdlist[i]); |
559 | } |
560 | SDL_numcds = 0; |
561 | } |
562 | } |
563 | |
564 | #endif /* SDL_CDROM_LINUX */ |