static int adev_set_master_volume(struct audio_hw_device *dev, float volume)
{
#if 0 //TARGET_AUDIO_PRIMARY
struct mixer *mixer;
struct mixer_ctl *ctl;
struct audio_device * adev = (struct audio_device *)dev;
if ((0 > volume) || (1 < volume) || (NULL == adev))
return -EINVAL;
pthread_mutex_lock(&adev->lock);
adev->master_volume = (int)(volume*100);
if (!(mixer = mixer_open(0))) {
pthread_mutex_unlock(&adev->lock);
return -ENOSYS;
}
ctl = mixer_get_ctl_by_name(mixer, "HP Playback Volume");
mixer_ctl_set_value(ctl,0,adjust_volume(adev->master_volume));
mixer_ctl_set_value(ctl,1,adjust_volume(adev->master_volume));
mixer_close(mixer);
pthread_mutex_unlock(&adev->lock);
return 0;
#else
return -ENOSYS;
#endif
}
int
init_sound_engine (void)
{
if (nosound) {
nosfx = 1;
return 0;
}
dmsg (D_SYSTEM | D_SOUND_TRACK, "initialize libMikMod");
/* register all the drivers */
MikMod_RegisterAllDrivers ();
dmsg (D_SOUND_TRACK, "libMikMod driver registered");
/* register the all module loader
(the user can use something else than .xm) */
MikMod_RegisterAllLoaders ();
dmsg (D_SOUND_TRACK, "libMikMod loader registered");
/* initialize the library */
md_device = nth_driver;
md_mode |= DMODE_SOFT_MUSIC | DMODE_SOFT_SNDFX;
if (mono)
md_mode &= ~DMODE_STEREO;
if (bits8)
md_mode &= ~DMODE_16BITS;
if (hqmix)
md_mode |= DMODE_HQMIXER;
dmsg (D_SOUND_TRACK, "Opening audio device #%d, with %dbits, %s%s",
nth_driver, (md_mode & DMODE_16BITS)?16:8,
(md_mode & DMODE_STEREO)?"stereo":"mono",
(md_mode & DMODE_HQMIXER)?"":", high quality mixer");
if (driver_options)
dmsg (D_SOUND_TRACK, "MikMod user options: %s", driver_options);
if (MikMod_Init (driver_options ? driver_options : const_cast_string (""))) {
wmsg (_("Could not initialize sound, reason: %s\n"
"Disabling sound output (use -S to suppress this message)."),
MikMod_strerror (MikMod_errno));
nosfx = nosound = 1;
MikMod_Exit ();
return 0;
}
dmsg (D_SOUND_TRACK,"initialize MikMod thread");
if (MikMod_InitThreads () != 1) {
wmsg (_("Could not initialize sound, reason: "
"LibMikMod is not thread safe.\n"
"Disabling sound output (use -S to suppress this message)."));
nosfx = nosound = 1;
MikMod_Exit ();
return 0;
}
sound_initialized = 1;
pthread_mutex_init (&playing, 0);
adjust_volume ();
return 0;
}
extern inline void decrease_volume (void)
{
adjust_volume (1);
}
extern inline void increase_volume (void)
{
adjust_volume (0);
}
static int adev_open(const hw_module_t* module, const char* name, hw_device_t** device)
{
#if 0 //TARGET_AUDIO_PRIMARY
struct mixer *mixer;
struct mixer_ctl *ctl;
#endif
if (strcmp(name, AUDIO_HARDWARE_INTERFACE) != 0)
return -EINVAL;
struct audio_device *adev = calloc(1, sizeof(struct audio_device));
if (!adev)
return -ENOMEM;
profile_init(&adev->out_profile, PCM_OUT);
profile_init(&adev->in_profile, PCM_IN);
adev->hw_device.common.tag = HARDWARE_DEVICE_TAG;
adev->hw_device.common.version = AUDIO_DEVICE_API_VERSION_2_0;
adev->hw_device.common.module = (struct hw_module_t *)module;
adev->hw_device.common.close = adev_close;
adev->hw_device.init_check = adev_init_check;
adev->hw_device.set_voice_volume = adev_set_voice_volume;
adev->hw_device.set_master_volume = adev_set_master_volume;
adev->hw_device.set_mode = adev_set_mode;
adev->hw_device.set_mic_mute = adev_set_mic_mute;
adev->hw_device.get_mic_mute = adev_get_mic_mute;
adev->hw_device.set_parameters = adev_set_parameters;
adev->hw_device.get_parameters = adev_get_parameters;
adev->hw_device.get_input_buffer_size = adev_get_input_buffer_size;
adev->hw_device.open_output_stream = adev_open_output_stream;
adev->hw_device.close_output_stream = adev_close_output_stream;
adev->hw_device.open_input_stream = adev_open_input_stream;
adev->hw_device.close_input_stream = adev_close_input_stream;
adev->hw_device.dump = adev_dump;
*device = &adev->hw_device.common;
#if 0 //TARGET_AUDIO_PRIMARY
mixer = mixer_open(0);
if (mixer) {
/* setting master volume to value 50 */
adev->master_volume = 50;
int ret = 0;
ctl = mixer_get_ctl_by_name(mixer, "HP Playback Switch");
ret = mixer_ctl_set_value(ctl,0,1);
ret = mixer_ctl_set_value(ctl,1,1);
ctl = mixer_get_ctl_by_name(mixer, "HP Playback Volume");
mixer_ctl_set_value(ctl,0,adjust_volume(adev->master_volume));
mixer_ctl_set_value(ctl,1,adjust_volume(adev->master_volume));
ctl = mixer_get_ctl_by_name(mixer, "HPO MIX DAC1 Switch");
mixer_ctl_set_value(ctl,0,1);
ctl = mixer_get_ctl_by_name(mixer, "HPO MIX DAC1 Switch");
mixer_ctl_set_value(ctl,0,1);
ctl = mixer_get_ctl_by_name(mixer, "OUT MIXR DAC R1 Switch");
mixer_ctl_set_value(ctl,0,1);
ctl = mixer_get_ctl_by_name(mixer, "OUT MIXL DAC L1 Switch");
mixer_ctl_set_value(ctl,0,1);
ctl = mixer_get_ctl_by_name(mixer, "Stereo DAC MIXR DAC R1 Switch");
mixer_ctl_set_value(ctl,0,1);
ctl = mixer_get_ctl_by_name(mixer, "Stereo DAC MIXL DAC L1 Switch");
mixer_ctl_set_value(ctl,0,1);
mixer_close(mixer);
}
#endif
return 0;
}
void MYWAVE::set_volume(int newvol)
{
vol = newvol;
adjust_volume();
}
int main(int argc, char *argv[])
{
char inkey=0, *prgdir, *curdir, *program_name;
bool ext, validcfg, quit = false, bkgply = false, batchply = false;
unsigned int opt, prgdrive, i;
CWindow *focus;
#ifdef DEBUG
f_log = fopen(DEBUG_FILE,"wt");
#endif
std::cout << ADPLAYVERS << ", Copyright (c) 2000 - 2006 Simon Peter <*****@*****.**>" << std::endl << std::endl;
// check that no other instance is running
{
char *adplayenv = getenv("ADPLAY");
if(adplayenv && !strcmp(adplayenv,"S")) {
std::cout << "AdPlay already running!" << std::endl;
exit(EXIT_FAILURE);
} else
setenv("ADPLAY","S",1); // flag our instance
}
// Build program executable name
program_name = strrchr(argv[0], '\\') ? strrchr(argv[0], '\\') + 1 : argv[0];
CAdPlug::debug_output("debug.log"); // Redirect AdPlug's debug to file
// Build path to default configuration file (in program's directory)
SPLITPATH(argv[0],configfile,configfile+2,NULL,NULL);
strcat(configfile,CONFIGFILE);
loadconfig(configfile,DEFCONFIG); // load default configuration
// parse commandline for general options
while((opt = getopt(argc,argv)))
switch(opt) {
case 1: // display help
case 2:
std::cout << "Usage: " << program_name << " [options]" << std::endl << std::endl;
std::cout << "Options can be set with '-' or '/' respectively." << std::endl << std::endl;
std::cout << " -?, -h Display commandline help" << std::endl <<
" -p port Set OPL2 port" << std::endl <<
" -o Force OPL2 port" << std::endl <<
" -f file Use alternate configuration file" << std::endl <<
" -c section Load another configuration section" << std::endl <<
" -b file Immediate background playback using " <<
"specified file" << std::endl <<
" -q files Immediate (batch mode) playback using " <<
"specified files" << std::endl;
showcursor();
exit(EXIT_SUCCESS);
case 3: // set OPL2 port
opl.setport(atoi(argv[myoptind++]));
break;
case 4: // force OPL2 port
oplforce = true;
break;
case 7: // background playback
bkgply = true;
break;
case 8: // batch mode playback
batchply = true;
break;
}
// Bail out if OPL2 not detected and not force
if(!opl.detect() && !oplforce) {
std::cout << "No OPL2 detected!" << std::endl;
showcursor();
exit(EXIT_FAILURE);
}
// Hand our database to AdPlug
CAdPlug::set_database(&mydb);
/*** Background playback mode ***/
if(bkgply)
if(!(p = CAdPlug::factory(argv[myoptind],&opl))) {
std::cout << "[" << argv[myoptind] << "]: unsupported file type!" << std::endl;
exit(EXIT_FAILURE);
} else {
std::cout << "Background playback... (type EXIT to stop)" << std::endl;
#ifdef HAVE_WCC_TIMER_H
tmInit(poll_player,0xffff,DEFSTACK);
#elif defined HAVE_GCC_TIMER_H
timer_init(poll_player);
#endif
dopoll = true;
#ifdef __WATCOMC__
_heapshrink();
#endif
system(getenv("COMSPEC"));
#ifdef HAVE_WCC_TIMER_H
tmClose();
#elif defined HAVE_GCC_TIMER_H
timer_deinit();
#endif
stop();
exit(EXIT_SUCCESS);
}
/*** Batch playback mode ***/
if(batchply) {
#ifdef HAVE_WCC_TIMER_H
tmInit(poll_player,0xffff,DEFSTACK);
#elif defined HAVE_GCC_TIMER_H
timer_init(poll_player);
#endif
for(i = myoptind; i < argc; i++)
if(!(p = CAdPlug::factory(argv[i],&opl))) {
std::cout << "[" << argv[i] << "]: unsupported file type!" << std::endl;
#ifdef HAVE_WCC_TIMER_H
tmClose();
#elif defined HAVE_GCC_TIMER_H
timer_deinit();
#endif
exit(EXIT_FAILURE);
} else {
dopoll = firsttime = true;
std::cout << "Playing [" << argv[i] << "] ..." << std::endl;
while(firsttime) ; // busy waiting
stop();
dopoll = false;
}
#ifdef HAVE_WCC_TIMER_H
tmClose();
#elif defined HAVE_GCC_TIMER_H
timer_deinit();
#endif
exit(EXIT_SUCCESS);
}
/*** interactive (GUI) mode ***/
getvideoinfo(&dosvideo); // Save previous video state
// register our windows with the window manager
wnds.reg(titlebar); wnds.reg(filesel); wnds.reg(songwnd);
wnds.reg(instwnd); wnds.reg(volbars); wnds.reg(mastervol);
wnds.reg(infownd);
// load default GUI layout
validcfg = loadcolors(configfile,DEFCONFIG);
// reparse commandline for GUI options
myoptind = 1; // reset option parser
while((opt = getopt(argc,argv)))
switch(opt) {
case 5: // set config file
strcpy(configfile,argv[myoptind++]);
if(loadcolors(configfile,DEFCONFIG))
validcfg = true;
break;
case 6: // load config section
loadcolors(configfile,argv[myoptind++]);
break;
}
// bail out if no configfile could be loaded
if(!validcfg) {
std::cout << "No valid default GUI layout could be loaded!" << std::endl;
exit(EXIT_FAILURE);
}
// init GUI
if((tmpfn = TEMPNAM(getenv("TEMP"),"_AP")))
#ifdef __WATCOMC__
mkdir(tmpfn);
#else
mkdir(tmpfn, S_IWUSR);
#endif
prgdir = getcwd(NULL, PATH_MAX); _dos_getdrive(&prgdrive);
setadplugvideo();
#ifdef HAVE_WCC_TIMER_H
tmInit(poll_player,0xffff,DEFSTACK);
#elif defined HAVE_GCC_TIMER_H
timer_init(poll_player);
#endif
songwnd.setcaption("Song Info"); volbars.setcaption("VBars");
titlebar.setcaption(ADPLAYVERS); filesel.setcaption("Directory");
mastervol.setcaption("Vol"); filesel.refresh(); mastervol.set(63);
display_help(infownd); filesel.setfocus(); reset_windows();
// main loop
do {
if(p) { // auto-update windows
// wait_retrace();
idle_ms(1000/70);
refresh_songinfo(songwnd);
refresh_volbars(volbars,opl);
if(onsongend && !firsttime) { // song ended
switch(onsongend) {
case 1: // auto-rewind
dopoll = false; while(inpoll) ; // critical section...
p->rewind(subsong);
last_ms = time_ms = 0.0f;
dopoll = true; // ...End critical section
break;
case 2: // stop playback
stop();
reset_windows();
break;
}
}
}
// Check for keypress and read in, if any
if(kbhit()) {
if(!(inkey = toupper(getch()))) {
ext = true;
inkey = toupper(getch());
} else
ext = false;
focus = CWindow::getfocus(); // cache focused window
dbg_printf("main(): Key pressed: %d %s\n",
inkey, ext ? "(Ext)" : "(Norm)");
} else
inkey = 0;
if(ext) // handle all extended keys
switch(inkey) {
case 15: // [Shift]+[TAB] - Back cycle windows
window_cycle(true);
break;
case 59: // [F1] - display help
display_help(infownd);
infownd.setfocus();
wnds.update();
break;
case 60: // [F2] - change screen layout
curdir = getcwd(NULL, PATH_MAX);
chdir(prgdir);
select_colors();
chdir(curdir);
free(curdir);
clearscreen(backcol);
filesel.refresh();
wnds.update();
break;
case 72: // [Up Arrow] - scroll up
if(focus == &filesel) {
filesel.select_prev();
filesel.update();
} else if(focus == &infownd) {
infownd.scroll_up();
infownd.update();
} else if(focus == &instwnd) {
instwnd.scroll_up();
instwnd.update();
}
break;
case 80: // [Down Arrow] - scroll down
if(focus == &filesel) {
filesel.select_next();
filesel.update();
} else if(focus == &infownd) {
infownd.scroll_down();
infownd.update();
} else if(focus == &instwnd) {
instwnd.scroll_down();
instwnd.update();
}
break;
case 75: // [Left Arrow] - previous subsong
if(p && subsong) {
subsong--;
dopoll = false; while(inpoll) ; // critical section...
totaltime = p->songlength(subsong);
p->rewind(subsong);
last_ms = time_ms = 0.0f;
dopoll = true; // ...End critical section
}
break;
case 77: // [Right Arrow] - next subsong
if(p && subsong < p->getsubsongs()-1) {
subsong++;
dopoll = false; while(inpoll) ; // critical section...
totaltime = p->songlength(subsong);
p->rewind(subsong);
last_ms = time_ms = 0.0f;
dopoll = true; // ...End critical section
}
break;
case 73: // [Page Up] - scroll up half window
if(focus == &filesel) {
filesel.select_prev(filesel.getsizey() / 2);
filesel.update();
} else if(focus == &infownd) {
infownd.scroll_up(infownd.getsizey() / 2);
infownd.update();
} else if(focus == &instwnd) {
instwnd.scroll_up(instwnd.getsizey() / 2);
instwnd.update();
}
break;
case 81: // [Page Down] - scroll down half window
if(focus == &filesel) {
filesel.select_next(filesel.getsizey() / 2);
filesel.update();
} else if(focus == &infownd) {
infownd.scroll_down(infownd.getsizey() / 2);
infownd.update();
} else if(focus == &instwnd) {
instwnd.scroll_down(instwnd.getsizey() / 2);
instwnd.update();
}
break;
case 71: // [Home] - scroll to start
if(focus == &filesel) {
filesel.setselection(0);
filesel.update();
} else if(focus == &infownd) {
infownd.scroll_set(0);
infownd.update();
} else if(focus == &instwnd) {
instwnd.scroll_set(0);
instwnd.update();
}
break;
case 79: // [End] - scroll to end
if(focus == &filesel) {
filesel.setselection(0xffff);
filesel.update();
} else if(focus == &infownd) {
infownd.scroll_set(0xffff);
infownd.update();
} else if(focus == &instwnd) {
instwnd.scroll_set(0xffff);
instwnd.update();
}
break;
}
else // handle all normal keys
switch(inkey) {
case 9: // [TAB] - Cycle through windows
window_cycle();
break;
case 13: // [Return] - Activate
if(focus == &filesel)
activate();
break;
case 27: // [ESC] - Stop music / Exit to DOS
if(p) {
stop();
reset_windows();
} else
quit = true;
break;
case ' ': // [Space] - fast forward
fast_forward(FF_MSEC);
break;
case 'M': // refresh song info
refresh_songdesc(infownd);
break;
case 'D': // shell to DOS
dosshell(getenv("COMSPEC"));
filesel.refresh(); wnds.update();
break;
case '+': // [+] - Increase volume
adjust_volume(-1);
break;
case '-': // [-] - Decrease volume
adjust_volume(+1);
break;
}
} while(!quit);
// deinit
#ifdef HAVE_WCC_TIMER_H
tmClose();
#elif defined HAVE_GCC_TIMER_H
timer_deinit();
#endif
stop();
setvideoinfo(&dosvideo);
{
unsigned int dummy;
_dos_setdrive(prgdrive, &dummy);
}
chdir(prgdir);
free(prgdir);
if(tmpfn) { rmdir(tmpfn); free(tmpfn); }
#ifdef DEBUG
dbg_printf("main(): clean shutdown.\n");
fclose(f_log);
#endif
return EXIT_SUCCESS;
}
void MYMOD::set_volume(int newvol)
{
vol = newvol;
adjust_volume();
}
