static int w32g_add_playlist1(char *filename, int uniq, int refine)
{
PlayListEntry *entry;
char *title;
struct midi_file_info *info;
if(uniq)
{
int i;
for(i = 0; i < playlist.nfiles; i++)
if(pathcmp(filename, playlist.list[i].filename, 0) == 0)
return 0;
}
title = get_midi_title(filename);
info = get_midi_file_info(filename, 1);
if(refine && info->format < 0)
return 0;
if(playlist.allocated == 0)
{
playlist.allocated = 32;
playlist.list = (PlayListEntry *)safe_malloc(playlist.allocated *
sizeof(PlayListEntry));
}
else if(playlist.nfiles == playlist.allocated)
{
playlist.allocated *= 2;
playlist.list = (PlayListEntry *)safe_realloc(playlist.list,
playlist.allocated *
sizeof(PlayListEntry));
}
entry = &playlist.list[playlist.nfiles];
entry->filename = safe_strdup(filename);
entry->title = title;
entry->info = info;
playlist.nfiles++;
w32g_shuffle_playlist_reset(1);
return 1;
}
int w32g_shuffle_playlist_next(int skip_invalid_file)
{
if ( !playlist_shuffle_init ) {
if ( !w32g_shuffle_playlist_reset(0) )
return 0;
}
for ( playlist_shuffle.cur ++ ; playlist_shuffle.cur < playlist_shuffle.max; playlist_shuffle.cur ++ ) {
int n = int_rand(playlist_shuffle.max - playlist_shuffle.cur) + playlist_shuffle.cur;
int temp = playlist_shuffle.list[playlist_shuffle.cur];
if ( n > playlist_shuffle.max ) n = playlist_shuffle.max;
playlist_shuffle.list[playlist_shuffle.cur] = playlist_shuffle.list[n];
playlist_shuffle.list[n] = temp;
if ( playlist_shuffle.list[playlist_shuffle.cur] < playlist.nfiles ) {
playlist.selected = playlist_shuffle.list[playlist_shuffle.cur];
if(!skip_invalid_file ||
playlist.list[playlist.selected].info->file_type != IS_ERROR_FILE) {
w32g_update_playlist();
return 1;
}
}
}
return 0;
}
static void ctl_pass_playing_list(int number_of_files, char *list_of_files[])
{
static int init_flag = 1;
int rc;
int32 value;
extern void timidity_init_aq_buff(void);
int errcnt;
w32g_add_playlist(number_of_files, list_of_files, 0,
ctl.flags & CTLF_AUTOUNIQ,
ctl.flags & CTLF_AUTOREFINE);
w32g_play_active = 0;
errcnt = 0;
if(init_flag && w32g_nvalid_playlist() && (ctl.flags & CTLF_AUTOSTART))
// if(play_mode->fd != -1 &&
// w32g_nvalid_playlist() && (ctl.flags & CTLF_AUTOSTART))
rc = RC_LOAD_FILE;
else
rc = RC_NONE;
init_flag = 0;
#ifdef W32G_RANDOM_IS_SHUFFLE
w32g_shuffle_playlist_reset(0);
#endif
while(1)
{
if(rc == RC_NONE)
{
if(play_mode->fd != -1)
{
aq_flush(1);
play_mode->close_output();
}
rc = w32g_get_rc(&value, 1);
}
redo:
switch(rc)
{
case RC_NONE:
Sleep(1000);
break;
case RC_LOAD_FILE: /* Play playlist.selected */
if(w32g_nvalid_playlist())
{
int selected;
w32g_get_playlist_index(&selected, NULL, NULL);
w32g_play_active = 1;
if(play_mode->fd == -1)
{
if(play_mode->open_output() == -1)
{
ctl.cmsg(CMSG_FATAL, VERB_NORMAL,
"Couldn't open %s (`%c') %s",
play_mode->id_name,
play_mode->id_character,
play_mode->name ? play_mode->name : "");
break;
}
aq_setup();
timidity_init_aq_buff();
}
if(play_mode->id_character == 'l')
w32g_show_console();
if(!DocWndIndependent) {
w32g_setup_doc(selected);
if(DocWndAutoPopup)
w32g_open_doc(1);
else
w32g_open_doc(2);
}
{
char *p = w32g_get_playlist(selected);
if(Panel!=NULL && p!=NULL)
strcpy(Panel->filename,p);
}
SetWrdWndActive();
rc = play_midi_file(w32g_get_playlist(selected));
if(ctl.flags & CTLF_NOT_CONTINUE)
w32g_update_playlist(); /* Update mark of error */
if(rc == RC_ERROR)
{
int nfiles;
errcnt++;
w32g_get_playlist_index(NULL, &nfiles, NULL);
if(errcnt >= nfiles)
w32g_msg_box("No MIDI file to play",
"TiMidity Warning", MB_OK);
}
else
errcnt = 0;
w32g_play_active = 0;
goto redo;
}
break;
case RC_ERROR:
case RC_TUNE_END:
#if 0
if(play_mode->id_character != 'd' ||
(ctl.flags & CTLF_NOT_CONTINUE)) {
#else
if(ctl.flags & CTLF_NOT_CONTINUE) {
#endif
break;
}
/* FALLTHROUGH */
case RC_NEXT:
if(!w32g_nvalid_playlist())
{
if(ctl.flags & CTLF_AUTOEXIT) {
if(play_mode->fd != -1)
aq_flush(0);
return;
}
break;
}
if(ctl.flags & CTLF_LIST_RANDOM) {
#ifdef W32G_RANDOM_IS_SHUFFLE
if(w32g_shuffle_playlist_next(!(ctl.flags & CTLF_NOT_CONTINUE))) {
#else
if(w32g_random_playlist(!(ctl.flags & CTLF_NOT_CONTINUE))) {
#endif
rc = RC_LOAD_FILE;
goto redo;
}
} else {
if(w32g_next_playlist(!(ctl.flags & CTLF_NOT_CONTINUE))) {
rc = RC_LOAD_FILE;
goto redo;
}
}
{
/* end of list */
if(ctl.flags & CTLF_AUTOEXIT) {
if(play_mode->fd != -1)
aq_flush(0);
return;
}
if((ctl.flags & CTLF_LIST_LOOP) && w32g_nvalid_playlist())
{
#ifdef W32G_RANDOM_IS_SHUFFLE
if(ctl.flags & CTLF_LIST_RANDOM) {
w32g_shuffle_playlist_reset(0);
w32g_shuffle_playlist_next(!(ctl.flags & CTLF_NOT_CONTINUE));
} else {
#endif
w32g_first_playlist(!(ctl.flags & CTLF_NOT_CONTINUE));
#ifdef W32G_RANDOM_IS_SHUFFLE
}
#endif
rc = RC_LOAD_FILE;
goto redo;
}
if((ctl.flags & CTLF_LIST_RANDOM) && w32g_nvalid_playlist())
w32g_shuffle_playlist_reset(0);
}
break;
case RC_REALLY_PREVIOUS:
#ifdef W32G_RANDOM_IS_SHUFFLE
w32g_shuffle_playlist_reset(0);
#endif
if(w32g_prev_playlist(!(ctl.flags & CTLF_NOT_CONTINUE)))
{
rc = RC_LOAD_FILE;
goto redo;
}
break;
case RC_QUIT:
if(play_mode->fd != -1)
aq_flush(1);
return;
case RC_CHANGE_VOLUME:
amplification += value;
ctl_master_volume(amplification);
break;
case RC_TOGGLE_PAUSE:
play_pause_flag = !play_pause_flag;
break;
default:
if(rc == RC_STOP)
#ifdef W32G_RANDOM_IS_SHUFFLE
w32g_shuffle_playlist_reset(0);
#endif
if(rc >= RC_EXT_BASE)
{
rc = w32g_ext_control(rc, value);
if(rc != RC_NONE)
goto redo;
}
break;
}
if(mark_apply_setting)
PrefSettingApplyReally();
rc = RC_NONE;
}
}
static void ctl_lcd_mark(int flag, int x, int y)
{
Panel->GSLCD[x][y] = flag;
}
static void ctl_gslcd(int id)
{
char *lcd;
int i, j, k, data, mask;
char tmp[3];
if((lcd = event2string(id)) == NULL)
return;
if(lcd[0] != ME_GSLCD)
return;
lcd++;
for(i = 0; i < 16; i++)
{
for(j = 0; j < 4; j++)
{
tmp[0]= lcd[2 * (j * 16 + i)];
tmp[1]= lcd[2 * (j * 16 + i) + 1];
if(sscanf(tmp, "%02X", &data) != 1)
{
/* Invalid format */
return;
}
mask = 0x10;
for(k = 0; k < 5; k++)
{
if(data & mask) {
ctl_lcd_mark(1, j * 5 + k, i);
}
else {
ctl_lcd_mark(0, j * 5 + k, i);
}
mask >>= 1;
}
}
}
Panel->gslcd_displayed_flag = 1;
Panel->gslcd_last_display_time = get_current_calender_time();
Panel->changed = 1;
}
static void ctl_channel_note(int ch, int note, int vel)
{
if (vel == 0) {
if (note == Panel->cnote[ch])
Panel->v_flags[ch] = FLAG_NOTE_OFF;
Panel->cvel[ch] = 0;
} else if (vel > Panel->cvel[ch]) {
Panel->cvel[ch] = vel;
Panel->cnote[ch] = note;
Panel->ctotal[ch] = ( vel * Panel->channel[ch].volume *
Panel->channel[ch].expression ) >> 14;
// Panel->channel[ch].expression / (127*127);
Panel->v_flags[ch] = FLAG_NOTE_ON;
}
Panel->changed = 1;
}
