Files
fs2open.github.com/code/sound/rbaudio.cpp
T
portej05 719825f80d The big CVS comment removal. This chops approx. 3.5mb off a full checkout.
I've tested this through compiling and through hand checking. 
Normalises line endings in ALL files to \n.
2009-06-20 08:08:20 +00:00

678 lines
15 KiB
C++

/*
* Copyright (C) Volition, Inc. 1999. All rights reserved.
*
* All source code herein is the property of Volition, Inc. You may not sell
* or otherwise commercially exploit the source or things you created based on the
* source.
*
*/
#if 0
#include "globalincs/pstypes.h"
#include <windows.h>
#include <mmsystem.h>
#include <stdlib.h>
#include <string.h>
#include "osapi/monopub.h"
//#include "error.h"
#include "sound/rbaudio.h"
#include "math/fix.h"
#include "io/timer.h"
//#include "winapp.h"
#define HSG_CD_PLAYBACK 0
#define MSF_CD_PLAYBACK 1
#pragma pack(1)
typedef struct CDTrack {
DWORD msf;
DWORD length;
} CDTrack;
int RBCDROM_State = 0; // CD is not used = 0
// CD is used = 1
// CD is already used = -1
static CDTrack CDTrackInfo[255];
static UINT CDDiscID = 0;
static int RedBookEnabled=0, RedBookInstalled = 0;
static UINT CDDeviceID = 0;
static DWORD CDNumTracks = 0;
static fix Playback_Start_Time = 0;
static fix Playback_Pause_Time = 0;
static fix Playback_Length = 0;
static int Playback_first_track,Playback_last_track;
static int AUXDevice = -1;
static char MCIErrorMsg[256];
// Function Prototypes
unsigned long lsn_to_msf(unsigned long lsn);
unsigned long msf_to_lsn(unsigned long msf);
unsigned long msf_add(unsigned long msf1, unsigned long msf2);
unsigned long msf_sub(unsigned long msf1, unsigned long msf2);
UINT MakeCDDiscID(int tracks, unsigned long msflen, unsigned long msftrack1);
UINT GetCDDiscID();
// Functions
void RBClose()
{
if (RedBookInstalled) {
//RBAStop(); // removed by MWA 2/3 -- will probably be handled by higher level code
mciSendCommand(CDDeviceID, MCI_CLOSE, 0, NULL);
RedBookEnabled = 0;
RedBookInstalled = 0;
}
}
void RBAInit(void)
{
MCI_OPEN_PARMS mciOpenParms;
MCI_SET_PARMS mciSetParms;
DWORD retval = 0;
atexit(RBClose);
// removed by MWA since we can't seem to get this to work under NT...needs a little work I guess
/*
int num_devs, i;
num_devs = auxGetNumDevs();
// Find CD-AUDIO device if there is one.
for (i = 0; i < num_devs; i++)
{
AUXCAPS caps;
auxGetDevCaps(i, &caps, sizeof(caps));
if (caps.wTechnology == AUXCAPS_CDAUDIO) {
AUXDevice = i;
mprintf(("CD operating on AUX %d.\n", AUXDevice));
//break;
}
}
if (AUXDevice == -1) {
mprintf(("Unable to find CD-AUDIO device. No Redbook music.\n"));
RedBookEnabled = 0;
return;
}
*/
// We need to identify that a cd audio driver exists
mciOpenParms.lpstrDeviceType = NOX("cdaudio");
retval = mciSendCommand(NULL, MCI_OPEN, MCI_OPEN_TYPE | MCI_OPEN_SHAREABLE, (DWORD)(LPVOID)&mciOpenParms);
if (retval) {
if (retval == MCIERR_MUST_USE_SHAREABLE) RBCDROM_State = -1;
else RBCDROM_State = 0;
mciGetErrorString(retval, MCIErrorMsg, 256);
mprintf(("RBA (%x) MCI:%s.\n", retval, MCIErrorMsg));
RedBookEnabled = 0;
}
else {
// Now we need to set the time format to MSF for Redbook Compatablity.
RedBookInstalled = 1;
RBCDROM_State = 1;
CDDeviceID = mciOpenParms.wDeviceID;
// mwa ?? logentry("Initializing Redbook device %d.\n", CDDeviceID);
mciSetParms.dwTimeFormat = MCI_FORMAT_MSF;
retval = mciSendCommand(CDDeviceID, MCI_SET, MCI_SET_TIME_FORMAT, (DWORD)(LPVOID)&mciSetParms);
if (retval) {
mciSendCommand(CDDeviceID, MCI_CLOSE, 0, NULL);
mprintf(("Error %d. Unable to set Redbook Format.\n", retval));
RedBookEnabled = 0;
}
else RedBookEnabled = 1;
}
}
void RBARegisterCD(void)
{
DWORD i, numtracks, retval = 0;
MCI_STATUS_PARMS mciStatusParms;
// Insure that CD is Redbook, then get track information
mciStatusParms.dwItem = MCI_STATUS_NUMBER_OF_TRACKS;
retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM,
(DWORD)(LPVOID)&mciStatusParms);
if (retval) {
mciGetErrorString(retval, MCIErrorMsg, 256);
mprintf(("RBA MCI:%s.\n", MCIErrorMsg));
CDNumTracks = 0;
return;
}
CDNumTracks = numtracks = mciStatusParms.dwReturn;
for (i = 0; i < numtracks; i++)
{
mciStatusParms.dwTrack = i+1;
mciStatusParms.dwItem = MCI_STATUS_POSITION;
retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM | MCI_TRACK, (DWORD)(LPVOID)&mciStatusParms);
if (retval) {
mprintf(("Could not retrieve information on track %d.\n", i+1));
}
CDTrackInfo[i].msf = mciStatusParms.dwReturn;
mciStatusParms.dwTrack = i+1;
mciStatusParms.dwItem = MCI_STATUS_LENGTH;
retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM | MCI_TRACK, (DWORD)(LPVOID)&mciStatusParms);
if (retval) {
mprintf(("Couldn't get length of track %d.\n", i+1));
}
CDTrackInfo[i].length = mciStatusParms.dwReturn;
// logentry("[%d] (%d:%d):(%d:%d)\n", i+1, MCI_MSF_MINUTE(CDTrackInfo[i].msf), MCI_MSF_SECOND(CDTrackInfo[i].msf), MCI_MSF_MINUTE(CDTrackInfo[i].length), MCI_MSF_SECOND(CDTrackInfo[i].length));
}
CDDiscID = GetCDDiscID();
}
long RBAGetDeviceStatus()
{
return 0;
}
int get_track_time(int first,int last)
{
unsigned long playlen;
int min, sec;
playlen = msf_sub(msf_add(CDTrackInfo[last-1].msf,CDTrackInfo[last-1].length), CDTrackInfo[first-1].msf);
min = MCI_MSF_MINUTE(playlen);
sec = MCI_MSF_SECOND(playlen);
return (min*60+sec);
}
int RBAPlayTrack(int track)
{
MCI_PLAY_PARMS mciPlayParms;
int min=0;
int retval;
// Register CD if media has changed
if (!RedBookEnabled) return 0;
if (RBACheckMediaChange()) {
mprintf(("Unable to play track due to CD change.\n"));
return 0;
}
// Play the track
min = min + MCI_MSF_MINUTE(CDTrackInfo[track-1].msf) + MCI_MSF_MINUTE(CDTrackInfo[track-1].length);
mciPlayParms.dwFrom = CDTrackInfo[track-1].msf; // MCI_MAKE_TMSF(track, 0, 0, 0);
mciPlayParms.dwTo = msf_add(CDTrackInfo[track-1].msf, CDTrackInfo[track-1].length);
retval = mciSendCommand(CDDeviceID, MCI_PLAY, MCI_FROM | MCI_TO, (DWORD)(LPVOID)&mciPlayParms);
if (retval) {
mciGetErrorString(retval, MCIErrorMsg, 256);
mprintf(("RBA MCI:%s.\n", MCIErrorMsg));
mprintf(("Unable to play CD track %d.\n", track));
return 0;
}
else {
Playback_Length = i2f(get_track_time(track,track));
Playback_Start_Time = timer_get_fixed_seconds();
Playback_first_track = Playback_last_track = track;
mprintf( ("Playing Track %d (len: %d secs)\n", track, f2i(Playback_Length)) );
}
return 1;
}
int RBAPlayTracks(int start, int end)
{
MCI_PLAY_PARMS mciPlayParms;
int retval;
Playback_Start_Time = 0;
Playback_Length = 0;
// Register CD if media has changed
if (!RedBookEnabled) return 0;
if (RBACheckMediaChange()) {
mprintf(("Unable to play track due to CD change.\n"));
return 0;
}
// Play the track
mciPlayParms.dwFrom = CDTrackInfo[start-1].msf; // MCI_MAKE_TMSF(track, 0, 0, 0);
mciPlayParms.dwTo = msf_add(CDTrackInfo[end-1].msf, CDTrackInfo[end-1].length);
retval = mciSendCommand(CDDeviceID, MCI_PLAY, MCI_FROM | MCI_TO, (DWORD)(LPVOID)&mciPlayParms);
if (retval) {
mciGetErrorString(retval, MCIErrorMsg, 256);
mprintf(("RBA MCI:%s.\n", MCIErrorMsg));
mprintf(("Unable to play CD tracks %d-%d.\n", start,end));
return 0;
}
else {
Playback_Length = i2f(get_track_time(start,end));
Playback_Start_Time = timer_get_fixed_seconds();
Playback_first_track = start;
Playback_last_track = end;
mprintf( ("Playing Tracks %d-%d (len: %d secs)\n", start,end,f2i(Playback_Length)) );
}
return 1;
}
void RBAStop()
{
int retval;
if (!RedBookEnabled) return;
retval = mciSendCommand(CDDeviceID, MCI_STOP,0,NULL);
if (retval) {
mciGetErrorString(retval, MCIErrorMsg, 256);
mprintf(("RBA MCI:%s.\n", MCIErrorMsg));
mprintf(("CD Stop command failed.\n"));
}
}
void RBASetStereoAudio(RBACHANNELCTL *channels)
{
}
void RBASetQuadAudio(RBACHANNELCTL *channels)
{
}
void RBAGetAudioInfo(RBACHANNELCTL *channels)
{
}
static unsigned rba_paused_head_loc = 0;
void RBAPause()
{
int retval;
MCI_GENERIC_PARMS mciGenParms;
int frame, sec, min;
if (!RedBookEnabled) return;
rba_paused_head_loc = RBAGetHeadLoc(&min, &sec, &frame);
// mwa ??? mciGenParms.dwCallback = GetLibraryWindow();
retval = mciSendCommand(CDDeviceID, MCI_PAUSE, MCI_NOTIFY,
(DWORD)(LPVOID)&mciGenParms);
if (retval) {
mprintf(("ERROR: Unable to pause CD.\n"));
}
else {
mprintf(("Pausing CD...\n"));
Playback_Pause_Time = timer_get_fixed_seconds();
}
}
int RBAResume()
{
int retval;
MCI_PLAY_PARMS mciPlayParms;
if (!RedBookEnabled) return 0;
if (RBACheckMediaChange()) {
RBARegisterCD();
return RBA_MEDIA_CHANGED;
}
mciPlayParms.dwFrom = rba_paused_head_loc; // MCI_MAKE_TMSF(track, 0, 0, 0);
mciPlayParms.dwTo = msf_add(CDTrackInfo[Playback_last_track-1].msf,
CDTrackInfo[Playback_last_track-1].length);
retval = mciSendCommand(CDDeviceID, MCI_PLAY, MCI_FROM | MCI_TO, (DWORD)(LPVOID)&mciPlayParms);
if (retval) {
mprintf(("ERROR: Resume CD play failed.\n"));
}
else
Playback_Start_Time += timer_get_fixed_seconds() - Playback_Pause_Time;
return 1;
}
void RBASetChannelVolume(int channel, int volume)
{
DWORD vol=0;
if ( AUXDevice == -1 ) // added because we might not be able to do this under NT
return;
volume = volume << 8;
if (channel == 0)
vol = MAKELONG(0,volume);
else if (channel == 1)
vol = MAKELONG(volume,0);
auxSetVolume(AUXDevice, vol);
}
void RBASetVolume(int volume)
{
DWORD vol;
WORD wvol;
if ( AUXDevice == -1 ) // added because we might not be able to do this under NT
return;
wvol = (unsigned short)((volume) << 8);
vol = MAKELONG(wvol, wvol);
auxSetVolume(AUXDevice, vol);
}
long RBAGetHeadLoc(int *min, int *sec, int *frame)
{
MCI_STATUS_PARMS mciStatusParms;
int retval;
if (!RedBookEnabled) return 0;
if (RBACheckMediaChange())
return RBA_MEDIA_CHANGED;
mciStatusParms.dwItem = MCI_STATUS_POSITION;
retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM, (DWORD)(LPVOID)&mciStatusParms);
if (retval) {
mprintf(("Couldn't get location of CD head.\n"));
}
*min = MCI_MSF_MINUTE(mciStatusParms.dwReturn);
*sec = MCI_MSF_SECOND(mciStatusParms.dwReturn);
*frame = MCI_MSF_FRAME(mciStatusParms.dwReturn);
return mciStatusParms.dwReturn;
}
int RBAGetTrackNum()
{
int track;
int delta_time; //in seconds
if (!RBAPeekPlayStatus())
return 0;
delta_time = f2i(timer_get_fixed_seconds()-Playback_Start_Time+f1_0/2);
for (track=Playback_first_track;track<=Playback_last_track && delta_time>0;track++) {
delta_time -= get_track_time(track,track);
if (delta_time < 0)
break;
}
Assert(track <= Playback_last_track);
return track;
}
int RBAPeekPlayStatus()
{
//@@ MCI_STATUS_PARMS mciStatusParms;
//@@ int retval;
if (!RedBookEnabled) return 0;
if ((timer_get_fixed_seconds()-Playback_Start_Time) > Playback_Length) return 0;
else return 1;
//@@ mciStatusParms.dwItem = MCI_STATUS_MODE;
//@@ retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM, (DWORD)(LPVOID)&mciStatusParms);
//@@ if (retval) {
//@@ mprintf((0, "Unable to obtain current status of CD.\n"));
//@@ }
//@@
//@@ if (mciStatusParms.dwReturn == MCI_MODE_PLAY) return 1;
//@@ else return 0;
}
int RBAEnabled()
{
if (RedBookEnabled < 1) return 0;
else return 1;
}
void RBAEnable()
{
RedBookEnabled = 1;
mprintf(("Enabling Redbook...\n"));
}
void RBADisable()
{
RedBookEnabled = 0;
mprintf(("Disabling Redbook...\n"));
}
int RBAGetNumberOfTracks(void)
{
MCI_STATUS_PARMS mciStatusParms;
int retval;
if (!RedBookEnabled) return 0;
if (RBACheckMediaChange())
RBARegisterCD();
mciStatusParms.dwItem = MCI_STATUS_NUMBER_OF_TRACKS;
retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM,
(DWORD)(LPVOID)&mciStatusParms);
if (retval) {
mprintf(("Get number of CD tracks failed.\n"));
return 0;
}
return mciStatusParms.dwReturn;
}
// RB functions: Internal to RBA library -----------------------------
int RBACheckMediaChange()
{
if (!RedBookEnabled) return 0;
if (CDDiscID != GetCDDiscID() || !CDDiscID) return 1;
else return 0;
}
// Converts Logical Sector Number to Minutes Seconds Frame Format
unsigned long lsn_to_msf(unsigned long lsn)
{
unsigned long min,sec,frame;
lsn += 150;
min = lsn / (60*75);
lsn = lsn % (60*75);
sec = lsn / 75;
lsn = lsn % 75;
frame = lsn;
return((min << 16) + (sec << 8) + (frame << 0));
}
// convert minutes seconds frame format to a logical sector number.
unsigned long msf_to_lsn(unsigned long msf)
{
unsigned long min,sec,frame;
min = (msf >> 16) & 0xFF;
sec = (msf >> 8) & 0xFF;
frame = (msf >> 0) & 0xFF;
return( (min * 60*75) + (sec * 75) + frame - 150 );
}
unsigned long msf_add(unsigned long msf1, unsigned long msf2)
{
uint min1, sec1, frame1;
uint min2, sec2, frame2;
// we don't take frames into account, which may not be right.
min1 = MCI_MSF_MINUTE(msf1);
sec1 = MCI_MSF_SECOND(msf1);
frame1 = MCI_MSF_FRAME(msf1);
frame2 = 0;
min2 = 0;
if ((sec1 + MCI_MSF_SECOND(msf2)) > 59) {
sec2 = (sec1+MCI_MSF_SECOND(msf2)) - 60;
min1++;
}
else sec2 = sec1 + MCI_MSF_SECOND(msf2);
min2 = min1+MCI_MSF_MINUTE(msf2);
frame2 = 0;
// logentry("msf_add:(%d:%d)\n", min2, sec2);
return MCI_MAKE_MSF(min2, sec2, 0);
}
unsigned long msf_sub(unsigned long msf1, unsigned long msf2)
{
int min1, sec1, frame1;
int min2, sec2, frame2;
// we don't take frames into account, which may not be right.
min1 = MCI_MSF_MINUTE(msf1);
sec1 = MCI_MSF_SECOND(msf1);
frame1 = MCI_MSF_FRAME(msf1);
frame2 = 0;
min2 = 0;
if ((sec1 - (int)MCI_MSF_SECOND(msf2)) < 0) {
sec2 = 60 - ((int)MCI_MSF_SECOND(msf2)-sec1);
min1--; // This is a shortcut to min2 = min1-(MSF_MIN(msf2)-1)
}
else sec2 = sec1 - (int)MCI_MSF_SECOND(msf2);
min2 = min1-(int)MCI_MSF_MINUTE(msf2);
frame2 = 0;
// logentry("msf_sub:(%d:%d)\n", min2, sec2);
return MCI_MAKE_MSF(min2, sec2, 0);
}
unsigned long msf_to_sec(unsigned long msf)
{
unsigned long min,sec,frame;
min = (msf >> 16) & 0xFF;
sec = (msf >> 8) & 0xFF;
frame = (msf >> 0) & 0xFF;
return (min*60) + sec;
}
UINT GetCDDiscID()
{
MCI_STATUS_PARMS mciStatusParms;
int retval;
unsigned long msflen, tracks, msftrack1;
mciStatusParms.dwItem = MCI_STATUS_NUMBER_OF_TRACKS;
if ((retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM,
(DWORD)(LPVOID)&mciStatusParms))>0) {
mprintf(("RBA: Get number of CD tracks failed.\n"));
return 0;
}
tracks = mciStatusParms.dwReturn;
mciStatusParms.dwItem = MCI_STATUS_LENGTH;
if ((retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM,
(DWORD)(LPVOID)&mciStatusParms))>0) {
mprintf(("RBA: Get media length failed.\n"));
return 0;
}
msflen = mciStatusParms.dwReturn;
mciStatusParms.dwTrack = 1;
mciStatusParms.dwItem = MCI_STATUS_POSITION;
if ( (retval = mciSendCommand(CDDeviceID, MCI_STATUS, MCI_STATUS_ITEM | MCI_TRACK, (DWORD)(LPVOID)&mciStatusParms)) >0) {
mprintf(("Could not retrieve information on track %d.\n", 1));
return 0;
}
msftrack1 = mciStatusParms.dwReturn;
return MakeCDDiscID(tracks, msflen, msftrack1);
}
UINT MakeCDDiscID(int tracks, unsigned long msflen, unsigned long msftrack1)
{
UINT code=0;
code = (UINT)(msf_to_sec(msftrack1) << 19);
code |= (UINT)(msf_to_sec(msflen) << 6);
code |= (UINT)(tracks&0xffffffc0);
return code;
}
#endif