int32_t S_PlayMusic(const char *fn)
{
if (!ud.config.MusicToggle || fn == NULL)
return 0;
int32_t fp = S_OpenAudio(fn, 0, 1);
if (EDUKE32_PREDICT_FALSE(fp < 0))
{
OSD_Printf(OSD_ERROR "S_PlayMusic(): error: can't open \"%s\" for playback!\n",fn);
return 0;
}
S_StopMusic();
int32_t MusicLen = kfilelength(fp);
if (EDUKE32_PREDICT_FALSE(MusicLen < 4))
{
OSD_Printf(OSD_ERROR "S_PlayMusic(): error: empty music file \"%s\"\n", fn);
kclose(fp);
return 0;
}
ALIGNED_FREE_AND_NULL(MusicPtr); // in case the following allocation was never freed
MusicPtr = (char *)Xaligned_alloc(16, MusicLen);
g_musicSize = kread(fp, (char *)MusicPtr, MusicLen);
if (EDUKE32_PREDICT_FALSE(g_musicSize != MusicLen))
{
OSD_Printf(OSD_ERROR "S_PlayMusic(): error: read %d bytes from \"%s\", expected %d\n",
g_musicSize, fn, MusicLen);
kclose(fp);
g_musicSize = 0;
return 0;
}
kclose(fp);
if (!Bmemcmp(MusicPtr, "MThd", 4))
{
MUSIC_PlaySong(MusicPtr, MUSIC_LoopSong);
MusicIsWaveform = 0;
}
else
{
int32_t const mvol = MASTER_VOLUME(ud.config.MusicVolume);
MusicVoice = FX_PlayLoopedAuto(MusicPtr, MusicLen, 0, 0,
0, mvol, mvol, mvol,
FX_MUSIC_PRIORITY, MUSIC_ID);
if (MusicVoice > FX_Ok)
MusicIsWaveform = 1;
}
return 0;
}
void playmusic(char *fn)
{
int fp;
char * testfn, * extension;
if(MusicToggle == 0) return;
if(MusicDevice < 0) return;
stopmusic();
testfn = (char *) malloc( strlen(fn) + 5 );
printf("Playing song: %s\n", fn);
strcpy(testfn, fn);
extension = strrchr(testfn, '.');
do {
if (extension && !Bstrcasecmp(extension, ".mid")) {
// we've been asked to load a .mid file, but first
// let's see if there's an ogg with the same base name
// lying around
strcpy(extension, ".ogg");
fp = kopen4load(testfn, 0);
if (fp >= 0) {
printf("OGG found: %s\n", testfn);
free(testfn);
break;
}
}
free(testfn);
// just use what we've been given
fp = kopen4load(fn, 0);
} while (0);
if (fp < 0) return;
MusicLen = kfilelength( fp );
MusicPtr = (char *) malloc(MusicLen);
kread( fp, MusicPtr, MusicLen);
kclose( fp );
if (!memcmp(MusicPtr, "MThd", 4)) {
MUSIC_PlaySong( MusicPtr, MusicLen, MUSIC_LoopSong );
MusicIsWaveform = 0;
} else {
MusicVoice = FX_PlayLoopedAuto(MusicPtr, MusicLen, 0, 0, 0,
MusicVolume, MusicVolume, MusicVolume,
FX_MUSIC_PRIORITY, MUSIC_ID);
MusicIsWaveform = 1;
}
MusicPaused = 0;
}
void playmusic(char *fn)
{
short fp;
long l;
if(MusicToggle == 0) return;
if(MusicDevice == NumSoundCards) return;
if(eightytwofifty && numplayers > 1) return;
fp = kopen4load(fn,0);
if(fp == -1) return;
l = kfilelength( fp );
if(l >= 72000)
{
kclose(fp);
return;
}
kread( fp, MusicPtr, l);
kclose( fp );
MUSIC_PlaySong( MusicPtr, MUSIC_LoopSong );
}
void main()
{
char * song;
char * voc;
volatile int32 lasttime;
RegisterShutdownFunction( ShutDown );
KB_Startup();
timerhandle = TIME_AddTimer( 40, &timer );
//CONFIG_GetSetupFilename();
CONFIG_ReadSetup();
CONTROL_Startup( 1, &GetTime, 1500 );
SetupGameButtons();
MusicStartup();
SoundStartup();
RTS_Init(RTSName);
// load in some test data
LoadFile("test.mid",&song);
LoadFile("test.voc",&voc);
// start playing a song
MUSIC_PlaySong( song, MUSIC_LoopSong );
lasttime = timer;
while (1)
{
int32 i;
ControlInfo info;
while (lasttime==timer)
{
ServiceEvents();
}
lasttime = timer;
// printf("timer=%ld\n",timer);
CONTROL_GetInput( &info );
if (
info.dx!=0 ||
info.dy!=0 ||
info.dz!=0 ||
info.dpitch!=0 ||
info.dyaw!=0 ||
info.droll!=0
)
printf("x=%6ld y=%6ld z=%6ld yaw=%6ld pitch=%6ld roll=%6ld\n",
info.dx,info.dy,info.dz,info.dyaw,info.dpitch,info.droll);
// Get Keyboard input and set appropiate game function states
for (i=0;i<NUMGAMEFUNCTIONS;i++)
{
if (BUTTON(i) && !BUTTONHELD(i))
{
printf("%s\n",gamefunctions[i]);
}
}
for (i=0;i<10;i++)
{
if (KB_KeyPressed(sc_F1+i))
{
byte * ptr;
KB_ClearKeyDown(sc_F1+i);
ptr = RTS_GetSound(i);
FX_PlayVOC( ptr, 0, 255, 255, 255, 255, 0);
}
}
// Check to see if fire is being pressed so we can play a sound
if (BUTTON(gamefunc_Fire) && !BUTTONHELD(gamefunc_Fire))
{
FX_PlayVOC( voc, 0, 255, 255, 255, 255, 0);
}
// Check to see if we want to exit
if ( KB_KeyPressed(sc_Escape) )
{
break;
}
}
ShutDown();
}
SWBOOL
PlaySong(char *song_file_name, int cdaudio_track, SWBOOL loop, SWBOOL restart)
{
if (!gs.MusicOn)
{
return FALSE;
}
if (DemoMode)
return FALSE;
if (!restart)
{
if (SongType == SongTypeWave)
{
if (SongTrack > 0 && SongTrack == cdaudio_track)
{
// ogg replacement for a CD track
return TRUE;
}
else if (SongName && song_file_name && !strcmp(SongName, song_file_name))
{
return TRUE;
}
}
else if (SongType == SongTypeMIDI)
{
if (SongName && song_file_name && !strcmp(SongName, song_file_name))
{
return TRUE;
}
}
}
StopSong();
if (!SW_SHAREWARE)
{
if (cdaudio_track >= 0)
{
char waveformtrack[MAXWAVEFORMTRACKLENGTH];
Bstrncpy(waveformtrack, gs.WaveformTrackName, MAXWAVEFORMTRACKLENGTH - 1);
char *numPos = Bstrstr(waveformtrack, "??");
if (numPos && (numPos-waveformtrack) < MAXWAVEFORMTRACKLENGTH - 2)
{
static const char *tracktypes[] = { ".flac", ".ogg" };
const size_t tracknamebaselen = Bstrlen(waveformtrack);
size_t i;
numPos[0] = '0' + (cdaudio_track / 10) % 10;
numPos[1] = '0' + cdaudio_track % 10;
for (i = 0; i < ARRAY_SIZE(tracktypes); ++i)
{
waveformtrack[tracknamebaselen] = '\0';
Bstrncat(waveformtrack, tracktypes[i], MAXWAVEFORMTRACKLENGTH);
if (LoadSong(waveformtrack))
{
SongVoice = FX_PlayLoopedAuto(SongPtr, SongLength, 0, 0, 0,
255, 255, 255, FX_MUSIC_PRIORITY, MUSIC_ID);
if (SongVoice > FX_Ok)
{
SongType = SongTypeWave;
SongTrack = cdaudio_track;
SongName = Bstrdup(waveformtrack);
return TRUE;
}
}
}
buildprintf("Can't find CD track %i!\n", cdaudio_track);
}
else
{
buildprintf("Make sure to have \"??\" as a placeholder for the track number in your WaveformTrackName!\n");
buildprintf(" e.g. WaveformTrackName = \"MUSIC/Track??\"\n");
}
}
}
if (!song_file_name || !LoadSong(song_file_name))
{
return FALSE;
}
if (!memcmp(SongPtr, "MThd", 4))
{
MUSIC_PlaySong(SongPtr, /*SongLength,*/ MUSIC_LoopSong);
SongType = SongTypeMIDI;
SongName = strdup(song_file_name);
return TRUE;
}
else
{
SongVoice = FX_PlayLoopedAuto(SongPtr, SongLength, 0, 0, 0,
255, 255, 255, FX_MUSIC_PRIORITY, MUSIC_ID);
if (SongVoice > FX_Ok)
{
SongType = SongTypeWave;
SongName = strdup(song_file_name);
return TRUE;
}
}
return FALSE;
}
