2 THE COMPUTER CODE CONTAINED HEREIN IS THE SOLE PROPERTY OF PARALLAX
3 SOFTWARE CORPORATION ("PARALLAX"). PARALLAX, IN DISTRIBUTING THE CODE TO
4 END-USERS, AND SUBJECT TO ALL OF THE TERMS AND CONDITIONS HEREIN, GRANTS A
5 ROYALTY-FREE, PERPETUAL LICENSE TO SUCH END-USERS FOR USE BY SUCH END-USERS
6 IN USING, DISPLAYING, AND CREATING DERIVATIVE WORKS THEREOF, SO LONG AS
7 SUCH USE, DISPLAY OR CREATION IS FOR NON-COMMERCIAL, ROYALTY OR REVENUE
8 FREE PURPOSES. IN NO EVENT SHALL THE END-USER USE THE COMPUTER CODE
9 CONTAINED HEREIN FOR REVENUE-BEARING PURPOSES. THE END-USER UNDERSTANDS
10 AND AGREES TO THE TERMS HEREIN AND ACCEPTS THE SAME BY USE OF THIS FILE.
11 COPYRIGHT 1993-1999 PARALLAX SOFTWARE CORPORATION. ALL RIGHTS RESERVED.
26 #define HSG_CD_PLAYBACK 0
27 #define MSF_CD_PLAYBACK 1
29 #define RBERR_WRITEPROTVIOL 0
30 #define RBERR_UNKNOWNUNIT 1
31 #define RBERR_DRIVENOTREADY 2
32 #define RBERR_UNKNOWNCOMMAND 3
33 #define RBERR_CRCERROR 4
34 #define RBERR_BADDRIVEREQ 5
35 #define RBERR_SEEKERROR 6
36 #define RBERR_UNKNOWNMEDIA 7
37 #define RBERR_SECTORNOTFOUND 8
38 #define RBERR_WRITEFAULT 10
39 #define RBERR_READFAULT 12
40 #define RBERR_GENERALFAILURE 13
41 #define RBERR_BADDISKCHANGE 15
43 #define RBSTAT_ERROR 0x8000
44 #define RBSTAT_BUSY 0x0200
45 #define RBSTAT_DONE 0x0100
50 // Request Header -----------------------------------------------------
52 typedef struct _REQHDR {
54 unsigned char subunit;
56 unsigned short status;
60 typedef struct _IOCTL {
62 unsigned short buffer_realoff;
63 unsigned short buffer_realseg;
64 unsigned short xferlen;
65 unsigned short sector;
70 // CD Information -----------------------------------------------------
73 char code; // Control Block Code
74 char track; // Track Number
75 long start; // Start of Track in MSF (Redbook)
76 unsigned char info; // Track Control Info
77 } CDTrackInfo = {11,2,0L,0};
82 } TrackInfoREQ = {{13,0,3,0,""}, {0,0,0,0,0}};
86 unsigned long devstat;
92 } DevStatREQ = {{13,0,3,0,""}, {0,0,0,0,0}};
102 } MedChgREQ = {{13,0,3,0,""}, {0,0,0,0,0}};
106 } StopREQ = {{13,0,133,0,""}};
110 } ResumeREQ = {{13,0,136,0,""}};
116 unsigned long lead_out;
117 } CDInfo = {10,0,0,0L};
122 } CDInfoREQ = {{13,0,3,0,""},{0,0,0,0,0}};
126 char mode; // Play in HSG or MSF(RedBook)
127 unsigned long playbeg;
128 unsigned long playlen; // HSG Format
129 char empty; // Empty byte used so that all requests have same size
130 } PlayREQ = {{13,0,132,0,""},0,0,0,0};
134 unsigned char out0in;
135 unsigned char out0vol;
136 unsigned char out1in;
137 unsigned char out1vol;
138 unsigned char out2in;
139 unsigned char out2vol;
140 unsigned char out3in;
141 unsigned char out3vol;
142 } AUDChannelCtl = {3,0,0,0,0,0,0,0,0};
147 } AUDChannelCtlREQ = {{13,0,12,0,""},{0,0,0,0,0}};
151 unsigned char out0in;
152 unsigned char out0vol;
153 unsigned char out1in;
154 unsigned char out1vol;
155 unsigned char out2in;
156 unsigned char out2vol;
157 unsigned char out3in;
158 unsigned char out3vol;
159 } AUDChannelInfo = {4,0,0,0,0,0,0,0,0};
164 } AUDChannelInfoREQ = {{13,0,3,0,""},{0,0,0,0,0}};
169 unsigned long headloc;
170 } HeadInfo = {1,MSF_CD_PLAYBACK,0L};
175 } HeadInfoREQ = {{13,0,3,0,""},{0,0,0,0,0}};
189 //@@} QChannelInfo = {12, MSF_CD_PLAYBACK, 2,0,0,0,0,0,0,0,0 };
194 //@@} QChannelInfoREQ = {{13, 0, 3, 0, ""}, {0,0,0,0,0}};
197 // Translation from RealMode->Protected mode buffer
199 typedef struct _REQ_xlatbuf { // Buffer for Real Mode Callback
206 // Other Data ---------------------------------------------------------
208 static unsigned char CDDriveLetter;
209 static unsigned long CDNumTracks,CDTrackStart[101];
210 static int RedBookEnabled = 0;
211 static int RedBookPlaybackType = MSF_CD_PLAYBACK;
212 static fix Playback_Start_Time = 0;
213 static fix Playback_Pause_Time = 0;
214 static fix Playback_Length = 0;
215 static int Playback_first_track,Playback_last_track;
218 // Prototypes ---------------------------------------------------------
220 int RBSendRequest(char *request, char *xferptr, int xferlen);
221 unsigned long msf_to_lsn(unsigned long msf);
222 unsigned long lsn_to_msf(unsigned long lsn);
225 // --------------------------------------------------------------------
227 void RBAInit(ubyte cd_drive_num) //drive a == 0, drive b == 1
231 // Detect presence of CD-ROM
234 int386(0x2f, ®s, ®s);
237 RBADisable(); // Disable RedBook
238 // Error("RBA Error: MSCDEX.EXE compatible driver couldn't be found.");
240 CDDriveLetter = cd_drive_num;
241 // CDDriveLetter = (unsigned char)regs.x.ecx;
244 RBACheckMediaChange();
246 RBSendRequest((char*)&DevStatREQ, (char*)&DevStat, sizeof(DevStat));
248 // If Door drive open, or no disc in CD-ROM, then Redbook is Disabled.
249 if ((DevStat.devstat&2048) || (DevStat.devstat&1) || RBAEnabled() == 0)
252 //@@ if (DevStat.devstat&4)
253 //@@ mprintf((0, "supports cooked and raw reading.\n"));
255 //@@ mprintf((0, "supports only cooked reading.\n"));
257 //@@ if (DevStat.devstat&256)
258 //@@ mprintf((0, "audio channel manipulation.\n"));
260 //@@ mprintf((0, "no audio channel manipulation.\n"));
262 if (DevStat.devstat&512) {
263 // RedBookPlaybackType = MSF_CD_PLAYBACK;
264 mprintf((0, "supports HSG and RedBook addressing mode.\n"));
267 // RedBookPlaybackType = HSG_CD_PLAYBACK;
268 mprintf((0, "supports HSG addressing only.\n"));
271 RedBookPlaybackType = MSF_CD_PLAYBACK;
276 //find out how many tracks on the CD, and their starting locations
277 void RBARegisterCD(void)
282 // Get CD Information First
283 RBACheckMediaChange();
285 error = RBSendRequest((char*)&CDInfoREQ, (char*)&CDInfo, sizeof(CDInfo));
287 if (error & RBSTAT_ERROR) { //error!
292 CDNumTracks = (CDInfo.last-CDInfo.first)+1;
294 // Define Track Starts
295 for (i=CDInfo.first; i<=CDNumTracks; i++)
297 CDTrackInfo.track = i;
298 RBSendRequest((char *)&TrackInfoREQ, (char*)&CDTrackInfo, sizeof(CDTrackInfo));
299 CDTrackStart[i] = CDTrackInfo.start;
302 CDTrackStart[i] = CDInfo.lead_out;
306 long RBAGetDeviceStatus()
308 RBSendRequest((char*)&DevStatREQ, (char*)&DevStat, sizeof(DevStat));
309 return (long)DevStat.devstat;
313 int RBAGetNumberOfTracks(void)
315 // Get CD Information
316 if (RBACheckMediaChange())
322 //returns the length in seconds of tracks first through last, inclusive
323 int get_track_time(int first,int last)
325 unsigned long playlen;
328 playlen = msf_to_lsn(CDTrackStart[last+1]) - msf_to_lsn(CDTrackStart[first]);
329 playlen = lsn_to_msf(playlen);
330 min = (int)((playlen >> 16) & 0xFF);
331 sec = (int)((playlen >> 8) & 0xFF);
336 int RBAPlayTrack(int track)
338 Playback_Start_Time = 0;
341 if (track < CDInfo.first || track > CDInfo.last) {
342 mprintf((0,"CD not Redbook Compatible. Will not play track.\n"));
344 // Error("RBA Error: Track %d doesn't exist on CD!!!", track);
346 if (RBACheckMediaChange()) {
347 mprintf((0, "Unable to play track due to CD change.\n"));
351 // Play the track now!!!
352 PlayREQ.mode = RedBookPlaybackType;
353 PlayREQ.playbeg = CDTrackStart[track];
355 if (RedBookPlaybackType == MSF_CD_PLAYBACK) {
357 msf_to_lsn(CDTrackStart[track+1]) - msf_to_lsn(CDTrackStart[track]);
360 mprintf((1, "RBERR: No! No! No! This shouldn't happen (HSG_CD_PLAYBACK).\n"));
362 PlayREQ.playlen = CDTrackStart[track+1] - CDTrackStart[track];
364 RBSendRequest((char *)&PlayREQ,NULL,0);
366 Playback_Length = i2f(get_track_time(track,track));
367 Playback_Start_Time = timer_get_fixed_seconds();
369 Playback_first_track = Playback_last_track = track;
371 mprintf( (0,"Playing Track %d (len: %d secs)\n", track, f2i(Playback_Length)) );
376 //plays tracks first through last, inclusive
377 int RBAPlayTracks(int first, int last)
379 Playback_Start_Time = 0;
382 if (first < CDInfo.first || last > CDInfo.last) {
383 mprintf((0,"Invalid start or end track.\n"));
385 // Error("RBA Error: Track %d doesn't exist on CD!!!", track);
387 if (RBACheckMediaChange()) {
388 mprintf((0, "Unable to play track due to CD change.\n"));
392 // Play the track now!!!
393 PlayREQ.mode = RedBookPlaybackType;
394 PlayREQ.playbeg = CDTrackStart[first];
396 if (RedBookPlaybackType == MSF_CD_PLAYBACK) {
398 msf_to_lsn(CDTrackStart[last+1]) - msf_to_lsn(CDTrackStart[first]);
401 mprintf((1, "RBERR: No! No! No! This shouldn't happen (HSG_CD_PLAYBACK).\n"));
403 PlayREQ.playlen = CDTrackStart[last+1] - CDTrackStart[first];
405 RBSendRequest((char *)&PlayREQ,NULL,0);
407 Playback_Length = i2f(get_track_time(first,last));
408 Playback_Start_Time = timer_get_fixed_seconds();
410 Playback_first_track = first;
411 Playback_last_track = last;
413 mprintf( (0,"Playing Tracks %d-%d (len: %d secs)\n", first,last,f2i(Playback_Length)) );
421 RBSendRequest((char *)&StopREQ, NULL, 0);
422 Playback_Pause_Time = timer_get_fixed_seconds();
428 if (RBACheckMediaChange()) {
430 return RBA_MEDIA_CHANGED;
432 RBSendRequest((char *)&ResumeREQ, NULL, 0);
434 Playback_Start_Time += timer_get_fixed_seconds() - Playback_Pause_Time;
442 if (RBACheckMediaChange())
445 RBSendRequest((char *)&StopREQ,NULL,0);
449 void RBASetStereoAudio(RBACHANNELCTL *channels)
451 AUDChannelCtl.out0in = channels->out0in;
452 AUDChannelCtl.out0vol = channels->out0vol;
453 AUDChannelCtl.out1in = channels->out1in;
454 AUDChannelCtl.out1vol = channels->out1vol;
455 AUDChannelCtl.out2in = AUDChannelCtl.out2vol = 0;
456 AUDChannelCtl.out3in = AUDChannelCtl.out3vol = 0;
458 RBSendRequest((char*)&AUDChannelCtlREQ, (char*)&AUDChannelCtl, sizeof(AUDChannelCtl));
462 void RBASetQuadAudio(RBACHANNELCTL *channels)
464 AUDChannelCtl.out0in = (unsigned char)channels->out0in;
465 AUDChannelCtl.out0vol = (unsigned char)channels->out0vol;
466 AUDChannelCtl.out1in = (unsigned char)channels->out1in;
467 AUDChannelCtl.out1vol = (unsigned char)channels->out1vol;
468 AUDChannelCtl.out2in = (unsigned char)channels->out2in;
469 AUDChannelCtl.out2vol = (unsigned char)channels->out2vol;
470 AUDChannelCtl.out3in = (unsigned char)channels->out3in;
471 AUDChannelCtl.out3vol = (unsigned char)channels->out3vol;
473 RBSendRequest((char*)&AUDChannelCtlREQ, (char*)&AUDChannelCtl, sizeof(AUDChannelCtl));
477 void RBAGetAudioInfo(RBACHANNELCTL *channels)
479 RBSendRequest((char*)&AUDChannelInfoREQ, (char*)&AUDChannelInfo, sizeof(AUDChannelInfo));
481 channels->out0in = (int)AUDChannelInfo.out0in;
482 channels->out0vol = (int)AUDChannelInfo.out0vol;
483 channels->out1in = (int)AUDChannelInfo.out1in;
484 channels->out1vol = (int)AUDChannelInfo.out1vol;
485 channels->out2in = (int)AUDChannelInfo.out2in;
486 channels->out2vol = (int)AUDChannelInfo.out2vol;
487 channels->out3in = (int)AUDChannelInfo.out3in;
488 channels->out3vol = (int)AUDChannelInfo.out3vol;
493 void RBASetChannelVolume(int channel, int volume)
495 //RBACHANNELCTL channels;
497 RBSendRequest((char*)&AUDChannelInfoREQ, (char*)&AUDChannelInfo, sizeof(AUDChannelInfo));
499 AUDChannelCtl.out0in = AUDChannelInfo.out0in;
500 AUDChannelCtl.out0vol = AUDChannelInfo.out0vol;
501 AUDChannelCtl.out1in = AUDChannelInfo.out1in;
502 AUDChannelCtl.out1vol = AUDChannelInfo.out1vol;
503 AUDChannelCtl.out2in = AUDChannelInfo.out2in;
504 AUDChannelCtl.out2vol = AUDChannelInfo.out2vol;
505 AUDChannelCtl.out3in = AUDChannelInfo.out3in;
506 AUDChannelCtl.out3vol = AUDChannelInfo.out3vol;
508 if (channel == 0) AUDChannelCtl.out0vol = (unsigned char)volume;
509 if (channel == 1) AUDChannelCtl.out1vol = (unsigned char)volume;
510 if (channel == 2) AUDChannelCtl.out2vol = (unsigned char)volume;
511 if (channel == 3) AUDChannelCtl.out3vol = (unsigned char)volume;
513 RBSendRequest((char*)&AUDChannelCtlREQ,(char*)&AUDChannelCtl, sizeof(AUDChannelCtl));
518 void RBASetVolume(int volume)
520 RBASetChannelVolume(0,volume);
521 RBASetChannelVolume(1,volume);
525 long RBAGetHeadLoc(int *min, int *sec, int *frame)
529 if (RBACheckMediaChange())
530 return RBA_MEDIA_CHANGED;
532 HeadInfo.mode = RedBookPlaybackType;
533 RBSendRequest((char*)&HeadInfoREQ, (char*)&HeadInfo, sizeof(HeadInfo));
535 if (RedBookPlaybackType == MSF_CD_PLAYBACK)
536 loc = HeadInfo.headloc;
538 loc = lsn_to_msf(HeadInfo.headloc);
540 *min = (int)((loc >> 16) & 0xFF);
541 *sec = (int)((loc >> 8) & 0xFF);
542 *frame = (int)((loc >> 0) & 0xFF);
547 //return the track number currently playing. Useful if RBAPlayTracks()
548 //is called. Returns 0 if no track playing, else track number
552 int delta_time; //in seconds
554 if (!RBAPeekPlayStatus())
557 delta_time = f2i(timer_get_fixed_seconds()-Playback_Start_Time+f1_0/2);
559 for (track=Playback_first_track;track<=Playback_last_track && delta_time>0;track++) {
561 delta_time -= get_track_time(track,track);
567 Assert(track <= Playback_last_track);
573 int RBAPeekPlayStatus()
575 if (RBACheckMediaChange()) { //if media changed, then not playing
580 if ((timer_get_fixed_seconds()-Playback_Start_Time) > Playback_Length) return 0;
587 if (RedBookEnabled < 1) return 0;
595 mprintf((0, "Enabling Redbook...\n"));
602 mprintf((0, "Disabling Redbook...\n"));
607 // RB functions: Internal to RBA library -----------------------------
609 //returns 1 if media has changed, else 0
610 int RBACheckMediaChange()
612 RBSendRequest((char *)&MedChgREQ, (char*)&MedChg, sizeof(MedChg));
614 if (MedChg.byte == 255 || MedChg.byte == 0) {
615 // New media in drive (or maybe no media in drive)
616 mprintf((0,"CD-ROM Media change detected\n"));
625 //returns 16-bit value. Bit 15 means error.
626 //WE NEED SYMBOLOIC CONSTANTS FOR ALL RETURN CODES & STATUS BITS
627 int RBSendRequest(char *request, char *xferptr, int xferlen)
630 dpmi_real_regs rregs;
633 REQ_xlatbuf *xlat_req; // Translated Buffer Request
634 char *xlat_xferptr; // Translated Buffer Transfer Buffer Ptr
636 unsigned short status;
638 if (!RedBookEnabled) return 0; // Don't send request if no RBA
640 memset(&rregs,0,sizeof(dpmi_real_regs));
642 // Get Temporary Real Mode Buffer for request translation
643 xlat_req = (REQ_xlatbuf *)dpmi_get_temp_low_buffer(128+xferlen);
644 memcpy(xlat_req, request, sizeof(REQHDR)+sizeof(IOCTL));
645 ioctl = (IOCTL *)(((char*)xlat_req)+sizeof(REQHDR));
647 // Set Transfer Buffer in IOCTL reqion of 'request'
648 if (xferlen && xferptr) {
649 xlat_xferptr = ((char*)xlat_req) + 128;
650 memcpy(xlat_xferptr, xferptr, xferlen);
652 ioctl->buffer_realoff = DPMI_real_offset(xlat_xferptr);
653 ioctl->buffer_realseg = DPMI_real_segment(xlat_xferptr);
654 ioctl->xferlen = xferlen;
657 // Setup and Send Request Packet
659 rregs.ecx = (unsigned)(CDDriveLetter);
660 rregs.es = DPMI_real_segment(xlat_req);
661 rregs.ebx = DPMI_real_offset(xlat_req);
662 dpmi_real_int386x(0x2f, &rregs);
664 // Return Translate Buffer to Protected mode 'xferptr'
665 if (xferlen && xferptr) {
666 memcpy(xferptr, xlat_xferptr, xferlen);
668 memcpy(request, xlat_req, sizeof(REQHDR)+sizeof(IOCTL));
671 status = ((REQHDR *)request)->status;
673 if (status & RBSTAT_ERROR) {
674 mprintf((0,"Error in SendRequest: %x.\n", status));
681 // Converts Logical Sector Number to Minutes Seconds Frame Format
683 unsigned long lsn_to_msf(unsigned long lsn)
685 unsigned long min,sec,frame;
694 return((min << 16) + (sec << 8) + (frame << 0));
697 // convert minutes seconds frame format to a logical sector number.
699 unsigned long msf_to_lsn(unsigned long msf)
701 unsigned long min,sec,frame;
703 min = (msf >> 16) & 0xFF;
704 sec = (msf >> 8) & 0xFF;
705 frame = (msf >> 0) & 0xFF;
707 return( (min * 60*75) + (sec * 75) + frame - 150 );