void game_loop(void)
{
int playing = 1;
counter = 0;
do
{
if (player[0].link_toggle_delay > 0)
player[0].link_toggle_delay --;
if (player[1].link_toggle_delay > 0)
player[1].link_toggle_delay --;
reset_lights();
get_input();
enact_commands();
run_actors();
run_bullets(); // should be between actors and enemies for orbitals to work
arena.waver_on_level = 0;
run_clouds();
// run_stars();
run_enemies();
run_pickups();
play_beats();
if (counter % 35 == 0)
run_level();
if (arena.game_over > 0)
{
arena.game_over --;
if (arena.game_over == 1)
{
playing = 0;
kill_gameover_loop();
}
if (arena.game_over == 120)
play_gameover_loop(1000);
} else
{
if (arena.new_level_sign > 0)
arena.new_level_sign --;
if (arena.time_left > 0)
{
if (game.type != GAME_DUEL
|| (game.duel_mode != DUEL_10_POINTS && game.duel_mode != DUEL_30_POINTS))
arena.time_left --;
if (game.type == GAME_TIME_ATTACK || game.type == GAME_TIME_ATTACK_COOP)
game.ta_total_time ++;
}
else
{
if (game.type == GAME_TIME_ATTACK || game.type == GAME_TIME_ATTACK_COOP)
{
arena.game_over = 132;
hurt_actor(0, 0, 100000);
hurt_actor(1, 0, 100000);
// it's okay to call hurt_actor on non-existent actors.
}
if (game.type == GAME_DUEL)
{
if (arena.game_over == 0)
{
arena.game_over = 132;
game.duel_winner = -1;
if (player[0].duel_score > player[1].duel_score)
game.duel_winner = 0;
if (player[1].duel_score > player[0].duel_score)
game.duel_winner = 1;
}
}
else
{
if (arena.level_finished == 1)
{
if (arena.level == 15)
{
arena.level = 16;
// play_gameover_loop(2200);
// play_wavf(NWAV_SWARBLE, 1500);
playing = 0;
break;
}
init_level();
if (actor[0].in_play == 1)
actor_new_level(0);
if (actor[1].in_play == 1)
actor_new_level(1);
ticked = 0;
}
else
{
if (arena.hostile == 0)
{
make_arena_hostile();
}
else
{
if (arena.hostile < 10000)
arena.hostile ++;
run_hostile_level();
}
}
}
}
/* if (arena.time_left == 334)
{
send_message(0, "Hurry} Up}!", STYLE_HURRY);
send_message(1, "Hurry} Up}!", STYLE_HURRY);
}*/
if (arena.time_left == 330 && (game.type != GAME_DUEL
|| (game.duel_mode != DUEL_10_POINTS && game.duel_mode != DUEL_30_POINTS)))
play_wavf(NWAV_ALARM, 900);
if (arena.hostile == 10 || arena.hostile == 40 || arena.hostile == 70)
play_wavf(NWAV_ALARM, 700);
}
if (ticked == 0)
{
run_display();
framecounter++;
}
init_effects();
slacktime = 0;
do
{
slacktime ++;
} while(ticked == 0);
ticked --;
counter ++;
if (counter % 32 == 0)
{
long_slacktime_store = long_slacktime;
long_slacktime = 0;
}
long_slacktime += slacktime / 100;
if (key [KEY_ESC])
quit_query();
} while(playing == 1);
}
/* Entry point of cc1/c++. Decode command args, then call compile_file.
Exit code is 35 if can't open files, 34 if fatal error,
33 if had nonfatal errors, else success. */
int main(int argc, char **argv)
{
register int i;
dd_list files, preludes;
dd_list_pos cur;
int version_flag = 0;
char *p;
char *config_file = NULL;
#ifdef TIMER_USERTIME
reset_timer(&total_time);
#endif
start_timer(&total_time);
region_init();
parse_region = newregion();
in_prelude = FALSE;
num_hotspots = 0;
parsed_files = dd_new_list(parse_region);
copy_argc = 0;
copy_argv = xmalloc((argc + 1) * sizeof(*copy_argv));
files = dd_new_list(parse_region);
preludes = dd_new_list(parse_region);
p = argv[0] + strlen (argv[0]);
while (p != argv[0] && p[-1] != '/'
#ifdef DIR_SEPARATOR
&& p[-1] != DIR_SEPARATOR
#endif
)
--p;
progname = p;
#ifdef SIGPIPE
signal (SIGPIPE, pipe_closed);
#endif
copy_argv[0] = argv[0];
copy_argc = 1;
for (i = 1; i < argc; i++)
{
int j;
bool copy_arg = TRUE;
/* If this is a language-specific option,
decode it in a language-specific way. */
for (j = 0; lang_options[j] != 0; j++)
if (!strncmp (argv[i], lang_options[j],
strlen (lang_options[j])))
break;
if (lang_options[j] != 0)
/* If the option is valid for *some* language,
treat it as valid even if this language doesn't understand it. */
c_decode_option(argv[i]);
else if (argv[i][0] == '-' && argv[i][1] != 0)
{
register char *str = argv[i] + 1;
if (str[0] == 'Y')
str++;
if (!strcmp (str, "dumpbase"))
copy_argv[copy_argc++] = argv[i++];
else if (str[0] == 'f')
{
register char *p = &str[1];
int found = 0;
/* Some kind of -f option.
P's value is the option sans `-f'.
Search for it in the table of options. */
for (j = 0;
!found && j < sizeof (f_options) / sizeof (f_options[0]);
j++)
{
if (!strcmp (p, f_options[j].string))
{
*f_options[j].variable = f_options[j].on_value;
/* A goto here would be cleaner,
but breaks the vax pcc. */
found = 1;
}
if (p[0] == 'n' && p[1] == 'o' && p[2] == '-'
&& ! strcmp (p+3, f_options[j].string))
{
*f_options[j].variable = ! f_options[j].on_value;
found = 1;
}
}
}
else if (!strcmp (str, "pedantic"))
pedantic = 1;
else if (!strcmp (str, "pedantic-errors"))
flag_pedantic_errors = pedantic = 1;
else if (!strcmp (str, "quiet"))
quiet_flag = 1;
else if (!strcmp (str, "version"))
version_flag = 1;
else if (!strcmp (str, "w"))
inhibit_warnings = 1;
else if (!strcmp (str, "W"))
{
extra_warnings = 1;
/* We save the value of warn_uninitialized, since if they put
-Wuninitialized on the command line, we need to generate a
warning about not using it without also specifying -O. */
if (warn_uninitialized != 1)
warn_uninitialized = 2;
}
else if (str[0] == 'W')
{
register char *p = &str[1];
int found = 0;
/* Some kind of -W option.
P's value is the option sans `-W'.
Search for it in the table of options. */
for (j = 0;
!found && j < sizeof (W_options) / sizeof (W_options[0]);
j++)
{
if (!strcmp (p, W_options[j].string))
{
*W_options[j].variable = W_options[j].on_value;
/* A goto here would be cleaner,
but breaks the vax pcc. */
found = 1;
}
if (p[0] == 'n' && p[1] == 'o' && p[2] == '-'
&& ! strcmp (p+3, W_options[j].string))
{
*W_options[j].variable = ! W_options[j].on_value;
found = 1;
}
}
if (found)
;
else if (!strncmp (p, "id-clash-", 9))
{
char *endp = p + 9;
while (*endp)
{
if (*endp >= '0' && *endp <= '9')
endp++;
else
{
error ("Invalid option `%s'", argv[i]);
goto id_clash_lose;
}
}
warn_id_clash = 1;
id_clash_len = atoi (str + 10);
id_clash_lose: ;
}
else if (!strncmp (p, "larger-than-", 12))
{
char *endp = p + 12;
while (*endp)
{
if (*endp >= '0' && *endp <= '9')
endp++;
else
{
error ("Invalid option `%s'", argv[i]);
goto larger_than_lose;
}
}
warn_larger_than = 1;
larger_than_size = atoi (str + 13);
larger_than_lose: ;
}
}
else if (!strcmp (str, "o"))
copy_argv[copy_argc++] = argv[i++];
else if (str[0] == 'G')
{
if (str[1] == '\0')
copy_argv[copy_argc++] = argv[i++];
}
else if (!strncmp (str, "aux-info", 8))
{
if (str[8] == '\0')
copy_argv[copy_argc++] = argv[i++];
}
else if (!strcmp(str, "config"))
{
if (i < argc - 1)
{
i++;
config_file = strdup(argv[i]);
}
else
error ("Missing -config file");
}
else if (!strcmp(str, "prelude"))
{
if (i < argc - 1)
{
i++;
dd_add_last(parse_region, preludes,
rstrdup(parse_region, argv[i]));
}
else
error("Missing -prelude file");
}
else if (!strcmp(str, "hotspots"))
{
if (i < argc - 1)
{
i++;
num_hotspots = atoi(argv[i]);
if (num_hotspots < 0)
error("Negative value for -hotspots count");
}
else
error("Missing -hotspots count");
}
else if (!strcmp( str, "program-files"))
{
if (i < argc - 1)
{
i++;
add_program_files(argv[i], files);
}
else
error("Missing -program-files file");
}
}
else if (argv[i][0] == '+')
;
else
{
/* Allow wildcards, because PAM won't expand files */
glob_t globbuf;
char **cur;
if (glob(argv[i], 0, NULL, &globbuf))
{
/* glob returned non-zero error status; abort */
fprintf(stderr, "%s: file not found\n", argv[i]);
exit(FATAL_EXIT_CODE);
}
else
for (cur = globbuf.gl_pathv; *cur; cur++)
{
/* Assume anything called prelude.i is a prelude file */
if ( strlen(*cur) >= 9 &&
!strncmp("prelude.i", *cur + strlen(*cur) - 9, 9))
dd_add_last(parse_region, preludes,
rstrdup(parse_region, *cur));
else
dd_add_last(parse_region, files,
rstrdup(parse_region, *cur));
}
copy_arg = FALSE;
}
if (copy_arg)
copy_argv[copy_argc++] = argv[i];
}
copy_argv[copy_argc] = NULL;
if (flag_casts_preserve && flag_flow_sensitive) {
fprintf(stderr, "-fcasts-preserve currently not allowed with "
"-fflow_sensitive");
exit(FATAL_EXIT_CODE);
}
/* Now analyze *all* of the files. First, initialize all appropriate
data structures. */
init_types();
cval_init();
init_effects();
init_qtype();
init_quals();
init_qerror();
init_store();
if (config_file)
load_config_file_quals(config_file);
/* Add const so that we can do -fconst-subtyping no matter what */
if (!const_qual)
{
begin_po_qual();
const_qual = add_qual("const");
add_level_qual(const_qual, level_ref);
set_po_nonprop();
end_po_qual();
}
/* Add volatile so we can handle noreturn functions */
if (!volatile_qual)
{
begin_po_qual();
volatile_qual = add_qual("volatile");
add_level_qual(volatile_qual, level_ref);
add_sign_qual(volatile_qual, sign_eq);
set_po_nonprop();
end_po_qual();
}
/* Add noreturn, for non-returning functions */
if (!noreturn_qual)
{
begin_po_qual();
noreturn_qual = add_qual("noreturn");
add_level_qual(noreturn_qual, level_value);
add_sign_qual(noreturn_qual, sign_eq);
set_po_nonprop();
end_po_qual();
}
end_define_pos(); /* Allow cqual to run with no qualifiers */
init_pam();
init_analyze();
found_fs_qual = FALSE; /* Force reset, since init_analyze may
look up some quals */
/* Now analyze the prelude files */
in_prelude = TRUE;
dd_scan(cur, preludes)
{
char *file;
file = DD_GET(char *, cur);
fprintf(stderr, "Analyzing prelude %s\n", file);
compile_file(file);
}
int main(int argc, char **argv)
{
const char *device_param = default_pcm_device;
char *prefsdir;
char thefile[1024];
char str[1024];
float start_vol = 1.0;
int ap_result = 0;
int use_fragsize = -1; // Initialized
int use_fragcount = -1; // later
int do_loopsong = 0;
int do_looplist = 0;
int do_enqueue = 0;
int do_replace = 0;
int do_realtime = 0;
int do_remote_control = 0;
int do_shuffle = 0;
int do_start = 0;
int do_stop = 0;
int do_prev = 0;
int do_next = 0;
int do_pause = 0;
int do_jump = -1;
int do_clear = 0;
int do_seek = -1;
int do_relative = 0;
int do_setvol = 0;
int do_quit = 0;
int do_status = 0;
int do_speed = 0;
float speed_val = 0.0;
int do_onebyone = 0;
int use_freq = OUTPUT_RATE;
float use_vol = 1.0;
int use_session = 0;
int do_crossfade = 0;
int do_save = 1;
int bool_val = 0;
const char *use_output = NULL;
char *use_interface = NULL;
char *use_config = NULL;
char *use_loopsong = NULL;
char *use_onebyone = NULL;
char *use_looplist = NULL;
int opt;
int option_index;
const char *options = "Cc:d:eEf:F:g:hi:J:I:l:n:NMp:qrs:vRSQVxo:";
struct option long_options[] = {
/* { "long_option", take_argument, 0, 'short_option' }, */
{ "config", 1, 0, 'c' },
{ "device", 1, 0, 'd' },
{ "enqueue", 0, 0, 'e' },
{ "replace", 0, 0, 'E' },
{ "fragsize", 1, 0, 'f' },
{ "frequency", 1, 0, 'F' },
{ "fragcount", 1, 0, 'g' },
{ "help", 0, 0, 'h' },
{ "interface", 1, 0, 'i' },
{ "volume", 1, 0, 'Y' },
{ "session", 1, 0, 'n' },
{ "nosave", 0, 0, 'N' },
{ "path", 1, 0, 'p' },
{ "quiet", 0, 0, 'q' },
{ "realtime", 0, 0, 'r' },
{ "script", 1, 0, 'I'},
{ "session-name", 1, 0, 's' },
{ "version", 0, 0, 'v' },
{ "verbose", 0, 0, 'V' },
{ "reverb", 0, 0, 'R' },
{ "loopsong", 1, 0, 'L' },
{ "looplist", 1, 0, 'P' },
{ "crossfade", 0, 0, 'x' },
{ "output", 1, 0, 'o' },
{ "stop", 0, 0, 'U' },
{ "pause", 0, 0, 'O' },
{ "start", 0, 0, 'T' },
{ "shuffle", 0, 0, 'S' },
{ "prev", 0, 0, 'Q' },
{ "next", 0, 0, 'M' },
{ "jump", 1, 0, 'J' },
{ "seek", 1, 0, 'X' },
{ "relative", 1, 0, 'Z' },
{ "speed", 1, 0, 'H' },
{ "clear", 0, 0, 'C' },
{ "startvolume", 1, 0, 'l' },
{ "quit", 0, 0, 'A' },
{ "status", 0, 0, 'B' },
{ "onebyone", 1, 0, 't' },
// Options that we want to be able to pass on to gtk_init(). See man
// gtk-options(7).
// Give all of these an option number of 128 because we're going to
// ignore them option switch statement anyway.
{ "gtk-module", 1, 0, 128 },
{ "gtk-debug", 1, 0, 128 },
{ "gtk-no-debug", 1, 0, 128 },
{ "g-fatal-warnings", 0, 0, 128 },
{ "display", 1, 0, 128 },
{ "screen", 1, 0, 128 },
{ "sync", 0, 0, 128 },
{ "no-xshm", 0, 0, 128 },
{ "name", 1, 0, 128 },
{ "class", 1, 0, 128 },
{ "gxid_host", 1, 0, 128 },
{ "gxid_port", 1, 0, 128 },
{ "xim-preedit", 0, 0, 128 },
{ "xim-status", 0, 0, 128 },
{ "gdk-debug", 1, 0, 128 },
{ "gdk-no-debug", 1, 0, 128 },
// End of list marker.
{ 0, 0, 0, 0 }
};
// First setup signal handler
signal(SIGPIPE, nonfatal_sighandler); // PIPE (socket control)
signal(SIGTERM, exit_sighandler); // kill
signal(SIGHUP, exit_sighandler); // kill -HUP / xterm closed
signal(SIGINT, exit_sighandler); // Interrupt from keyboard
signal(SIGQUIT, exit_sighandler); // Quit from keyboard
// fatal errors
signal(SIGBUS, exit_sighandler); // bus error
//signal(SIGSEGV, exit_sighandler); // segfault
signal(SIGILL, exit_sighandler); // illegal instruction
signal(SIGFPE, exit_sighandler); // floating point exc.
signal(SIGABRT, exit_sighandler); // abort()
// Enable locale support
#ifdef ENABLE_NLS
setlocale (LC_ALL, "");
bindtextdomain(PACKAGE, LOCALEDIR);
textdomain(PACKAGE);
bind_textdomain_codeset (PACKAGE, "UTF-8");
#endif
// Init global mutexes
pthread_mutex_init(&playlist_sort_seq_mutex, NULL);
#if !defined(EMBEDDED)
init_effects();
#endif
while ((opt = getopt_long(argc, argv, options, long_options, &option_index)) != EOF) {
switch(opt) {
case 'A':
do_remote_control = 1;
do_quit = 1;
break;
case 'B':
do_remote_control = 1;
do_status = 1;
break;
case 'c':
if (strlen(optarg) < 1023) {
use_config = optarg;
} else {
alsaplayer_error("config file path too long");
return 1;
}
break;
case 'd':
device_param = optarg;
break;
case 'E':
do_replace = 1;
case 'e':
do_enqueue = 1;
break;
case 'f':
use_fragsize = atoi(optarg);
if (!use_fragsize) {
alsaplayer_error("invalid fragment size");
return 1;
}
if (use_fragsize > 32768) {
alsaplayer_error("fragment size (%d) out of range (0-32768)", use_fragsize);
return 1;
}
break;
case 'F':
use_freq = atoi(optarg);
if (use_freq < 8000 || use_freq > 48000) {
alsaplayer_error("frequency (%d) out of range (8000-48000)", use_freq);
return 1;
}
break;
case 'g':
use_fragcount = atoi(optarg);
if (use_fragcount < 2 || use_fragcount > 128) {
alsaplayer_error("fragcount (%d) out of range (2-128)", use_fragcount);
return 1;
}
break;
case 'h':
help();
return 0;
case 'H':
if ((sscanf(optarg, "%f", &speed_val))) {
do_remote_control = 1;
do_speed = 1;
}
break;
case 'i':
use_interface = optarg;
break;
case 'l':
start_vol = atof(optarg);
if (start_vol < 0.0 || start_vol > 1.0) {
alsaplayer_error("volume (%.3f) out of range: using 1.0", start_vol);
start_vol = 1.0;
}
break;
case 'L':
do_remote_control = 1;
do_loopsong = 1;
use_loopsong = optarg;
break;
case 'Y':
do_remote_control = 1;
do_setvol = 1;
use_vol = atof(optarg);
if (use_vol < 0.0 || use_vol > 1.0) {
alsaplayer_error("volume (%.3f) out of range: using 1.0", use_vol);
use_vol = 1.0;
}
break;
case 'n':
use_session = atoi(optarg);
break;
case 'N':
do_save = 0;
break;
case 'O':
do_remote_control = 1;
do_pause = 1;
break;
case 'p':
global_pluginroot = optarg;
break;
case 'q':
global_quiet = 1;
break;
case 'r':
do_realtime = 1;
break;
case 's':
if (strlen(optarg) < 32) {
global_session_name = strdup(optarg);
} else {
alsaplayer_error("max 32 char session name, ignoring");
}
break;
case 'v':
version();
return 0;
case 'V':
global_verbose = 1;
break;
case 'R':
break;
case 'P':
do_remote_control = 1;
do_looplist = 1;
use_looplist = optarg;
break;
case 'x':
do_crossfade = 1;
break;
case 'o':
use_output = optarg;
break;
case '?':
return 1;
case 'I':
global_interface_script = optarg;
break;
case 'U':
do_remote_control = 1;
do_stop = 1;
break;
case 'T':
do_remote_control = 1;
do_start = 1;
break;
case 'S':
do_remote_control = 1;
do_shuffle = 1;
break;
case 'Q':
do_remote_control = 1;
do_prev = 1;
break;
case 'M':
do_remote_control = 1;
do_next = 1;
break;
case 'J':
do_remote_control = 1;
do_jump = atoi(optarg);
break;
case 'C':
do_remote_control = 1;
do_clear = 1;
break;
case 'X':
do_remote_control = 1;
do_seek = atoi(optarg);
break;
case 'Z':
do_remote_control = 1;
do_relative = 1;
do_seek = atoi(optarg);
break;
case 't':
do_remote_control = 1;
do_onebyone = 1;
use_onebyone = optarg;
break;
case 128:
// Gtk-option which we ignore.
break;
default:
alsaplayer_error("Unknown option '%c'", opt);
break;
}
}
prefsdir = get_prefsdir();
mkdir(prefsdir, 0700); /* XXX We don't do any error checking here */
snprintf(thefile, sizeof(thefile)-21, "%s/config", prefsdir);
if (use_config)
ap_prefs = prefs_load(use_config);
else
ap_prefs = prefs_load(thefile);
if (!ap_prefs) {
alsaplayer_error("Invalid config file %s\n", use_config ? use_config : thefile);
return 1;
}
/* Initialize some settings (and populate the prefs system if needed */
if (use_fragsize < 0)
use_fragsize = prefs_get_int(ap_prefs, "main", "period_size", 4096);
if (use_fragcount < 0)
use_fragcount = prefs_get_int(ap_prefs, "main", "period_count", 8);
if (global_verbose)
puts(copyright_string);
if (!global_pluginroot) {
global_pluginroot = strdup (ADDON_DIR);
}
if (use_session == 0) {
for (; use_session < MAX_REMOTE_SESSIONS+1; use_session++) {
ap_result = ap_session_running(use_session);
if (ap_result)
break;
}
if (use_session == (MAX_REMOTE_SESSIONS+1)) {
//alsaplayer_error("No remote session found");
if (do_remote_control) {
alsaplayer_error("No active sessions");
return 1;
}
do_enqueue = 0;
} else {
//alsaplayer_error("Found session %d", use_session);
if (prefs_get_bool(ap_prefs, "main", "multiopen", 1) == 0) {
// We should not spawn another alsaplayer
//alsaplayer_error("Using session %d, not doing multiopen", use_session);
do_enqueue = 1;
do_replace = 1;
}
}
}
// Check if we're in remote control mode
if (do_remote_control) {
if (do_quit) {
ap_quit(use_session);
return 0;
} else if (do_status) {
char res[1024];
float fres;
int ires;
fprintf(stdout, "---------------- Session ----------------\n");
if (ap_get_session_name(use_session, res) && strlen(res))
fprintf(stdout, "name: %s\n", res);
if (ap_get_playlist_length(use_session, &ires))
fprintf(stdout, "playlist_length: %d\n", ires);
if (ap_get_volume(use_session, &fres))
fprintf(stdout, "volume: %.2f\n", fres);
if (ap_get_speed(use_session, &fres))
fprintf(stdout, "speed: %d%%\n", (int)(fres * 100));
fprintf(stdout, "-------------- Current Track ------------\n");
if (ap_get_artist(use_session, res) && strlen(res))
fprintf(stdout, "artist: %s\n", res);
if (ap_get_title(use_session, res) && strlen(res))
fprintf(stdout, "title: %s\n", res);
if (ap_get_album(use_session, res) && strlen(res))
fprintf(stdout, "album: %s\n", res);
if (ap_get_genre(use_session, res) && strlen(res))
fprintf(stdout, "genre: %s\n", res);
if (ap_get_file_path(use_session, res) && strlen(res))
fprintf(stdout, "path: %s\n", res);
if (ap_get_blocks(use_session, &ires))
fprintf(stdout, "blocks: %d\n", ires);
if (ap_get_length(use_session, &ires))
fprintf(stdout, "length: %d second%s\n", ires, (ires == 1) ? "": "s");
if (ap_get_position(use_session, &ires))
fprintf(stdout, "position: %d\n", ires);
fprintf(stdout, "-----------------------------------------\n");
return 0;
} else if (do_setvol) {
ap_set_volume(use_session, use_vol);
return 0;
} else if (do_shuffle) {
ap_shuffle_playlist(use_session);
return 0;
} else if (do_start) {
ap_play(use_session);
return 0;
} else if (do_stop) {
ap_stop(use_session);
return 0;
} else if (do_pause) {
if (ap_is_paused(use_session, &bool_val)) {
if (bool_val)
ap_unpause(use_session);
else
ap_pause(use_session);
}
return 0;
} else if (do_next) {
ap_next(use_session);
return 0;
} else if (do_prev) {
ap_prev(use_session);
return 0;
} else if (do_jump >= 0) {
ap_jump_to(use_session, do_jump);
return 0;
} else if (do_clear) {
ap_clear_playlist(use_session);
return 0;
} else if (do_relative) {
if (do_seek != 0)
ap_set_position_relative(use_session, do_seek);
return 0;
} else if (do_speed) {
if (speed_val < -10.0 || speed_val > 10.0) {
alsaplayer_error("Speed out of range, must be between -10.00 and 10.00");
return 1;
}
ap_set_speed(use_session, speed_val);
return 0;
} else if (do_seek >= 0) {
ap_set_position(use_session, do_seek);
return 0;
} else if (do_loopsong) {
if (strcasecmp(use_loopsong, "on") != 0) {
do_loopsong = false;
}
ap_set_looping(use_session, do_loopsong);
return 0;
} else if (do_onebyone) {
if (strcasecmp(use_onebyone, "on") != 0) {
do_onebyone = false;
}
ap_set_onebyone(use_session, do_onebyone);
return 0;
} else if (do_looplist) {
if (strcasecmp(use_looplist, "on") != 0) {
do_looplist = false;
}
ap_set_playlist_looping(use_session, do_looplist);
return 0;
} else
alsaplayer_error("No remote control command executed.");
}
// Check if we need to enqueue the files
if (do_enqueue) {
char queue_name[2048];
int count = 0;
int was_playing = 0;
int playlist_length = 0;
count = optind;
ap_result = 1;
if (do_replace && count < argc) {
ap_is_playing(use_session, &was_playing);
if (was_playing) {
ap_stop(use_session);
}
ap_clear_playlist(use_session);
} else {
ap_get_playlist_length(use_session, &playlist_length);
if (!playlist_length) { // Empty list so fire up after add
was_playing = 1;
}
}
while (count < argc && ap_result) {
if (is_playlist(argv[count])) {
ap_add_playlist(use_session, argv[count]);
count++;
continue;
}
if (argv[count][0] != '/' &&
strncmp(argv[count], "http://", 7) != 0 &&
strncmp(argv[count], "ftp://", 6) != 0) {
// Not absolute so append cwd
if (getcwd(queue_name, 1024) == NULL) {
alsaplayer_error("error getting cwd");
return 1;
}
ap_strlcat(queue_name, "/", sizeof(queue_name));
ap_strlcat(queue_name, argv[count], sizeof(queue_name));
} else
ap_strlcpy(queue_name, argv[count], sizeof(queue_name));
count++;
//alsaplayer_error("Adding %s", queue_name);
ap_result = ap_add_path(use_session, queue_name);
//alsaplayer_error("ap_result = %d", ap_result);
}
if (was_playing)
ap_jump_to(use_session, 1);
if (ap_result)
return 0;
}
AlsaNode *node;
// Check if we want jack
if (strcmp(argv[0], "jackplayer") == 0) {
use_output = "jack";
}
// Check the output option
if (use_output == NULL) {
use_output = prefs_get_string(ap_prefs, "main",
"default_output", "alsa");
}
// Else do the usual plugin based thing
node = new AlsaNode(use_output, device_param, do_realtime);
if (!node->RegisterPlugin(use_output)) {
alsaplayer_error("Failed to load output plugin \"%s\". Trying defaults.", use_output);
if (!node->RegisterPlugin())
return 1;
}
int output_is_ok = 0;
int output_alternate = 0;
do {
if (!node || !node->ReadyToRun()) {
alsaplayer_error
("failed to load output plugin (%s). exitting...",
use_output ? use_output: "alsa,etc.");
return 1;
}
if (!node->SetSamplingRate(use_freq) ||
!node->SetStreamBuffers(use_fragsize, use_fragcount, 2)) {
alsaplayer_error
("failed to configure output device...trying OSS");
/* Special case for OSS, since it's easiest to get going, so try it */
if (!output_alternate) {
output_alternate = 1;
node->RegisterPlugin("oss");
continue;
} else {
return 1;
}
}
output_is_ok = 1; /* output device initialized */
} while (!output_is_ok);
// Initialise reader
reader_init ();
// Initialise playlist - must be done before things try to register with it
playlist = new Playlist(node);
if (!prefs_get_bool(ap_prefs, "main", "play_on_start", false))
playlist->Pause();
else
playlist->UnPause();
if (!playlist) {
alsaplayer_error("Failed to create Playlist object");
return 1;
}
// Add any command line arguments to the playlist
if (optind < argc) {
std::vector < std::string > newitems;
while (optind < argc) {
if (is_playlist(argv[optind])) {
if (global_verbose)
alsaplayer_error("Loading playlist (%s)", argv[optind]);
playlist->Load(std::string(argv[optind++]),
playlist->Length(), false);
} else {
newitems.push_back(std::string(argv[optind++]));
}
}
playlist->Insert(newitems, playlist->Length());
} else {
prefsdir = get_prefsdir();
snprintf(thefile, sizeof(thefile)-28, "%s/alsaplayer.m3u", prefsdir);
playlist->Load(thefile, playlist->Length(), false);
}
// Loop song
if (do_loopsong) {
playlist->LoopSong();
}
// Loop Playlist
if (do_looplist) {
playlist->LoopPlaylist();
}
// Play songs one by one
if (do_onebyone) {
playlist->SetOneByOne();
}
// Cross fading
if (do_crossfade) {
playlist->Crossfade();
}
// Set start volume
playlist->GetCorePlayer()->SetVolume(start_vol);
interface_plugin_info_type interface_plugin_info;
interface_plugin *ui;
if (get_interface_from_argv0 (argv[0], str))
use_interface = str;
if (use_interface && *use_interface) {
if (!(interface_plugin_info = load_interface(use_interface))) {
alsaplayer_error("Failed to load interface %s\n", use_interface);
goto _fatal_err;
}
} else {
const char *interface = prefs_get_string
(ap_prefs, "main", "default_interface", "gtk2");
// if we're trying to use the old gtk-1 interface, use gtk-2 instead
if (strcmp (interface, "gtk") == 0)
interface = "gtk2";
// if we're trying to use the gtk interface, but we have no
// $DISPLAY, use the text interface instead
if (strcmp (interface, "gtk2") == 0 && !getenv("DISPLAY"))
interface = "text";
if (!(interface_plugin_info = load_interface(interface))) {
if (!(interface_plugin_info = load_interface(prefs_get_string
(ap_prefs, "main", "fallback_interface", "text")))) {
alsaplayer_error("Failed to load text interface. This is bad (%s,%s,%s)",
interface, interface,
global_pluginroot);
goto _fatal_err;
}
}
}
if (interface_plugin_info) {
ui = interface_plugin_info();
if (global_verbose)
printf("Interface plugin: %s\n", ui->name);
if (!ui->init()) {
alsaplayer_error("Failed to load interface plugin. Should fall back to text\n");
} else {
control_socket_start(playlist, ui);
ui->start(playlist, argc, argv);
ui->close();
// Unfortunately gtk+ is a pig when it comes to
// cleaning up its resources; it doesn't!
// so we can never safely dlclose gtk+ based
// user interfaces, bah!
//dlclose(ui->handle);
control_socket_stop();
}
}
// Save playlist before exit
prefsdir = get_prefsdir();
snprintf(thefile, sizeof(thefile)-25, "%s/alsaplayer", prefsdir);
playlist->Save(thefile, PL_FORMAT_M3U);
// Save preferences
if (ap_prefs && do_save) {
if (prefs_save(ap_prefs) < 0) {
alsaplayer_error("failed to save preferences.");
}
}
_fatal_err:
delete playlist;
//delete p;
delete node;
if (global_session_name)
free(global_session_name);
return 0;
}
ENTRYPOINT void
init_tunnel (ModeInfo *mi)
{
int i;
tunnel_configuration *tc;
wire = MI_IS_WIREFRAME(mi);
# ifdef HAVE_JWZGLES /* #### glPolygonMode other than GL_FILL unimplemented */
wire = 0;
# endif
if (!tconf) {
tconf = (tunnel_configuration *)
calloc (MI_NUM_SCREENS(mi), sizeof (tunnel_configuration));
if (!tconf) {
fprintf(stderr, "%s: out of memory\n", progname);
exit(1);
}
}
tc = &tconf[MI_SCREEN(mi)];
tc->glx_context = init_GL(mi);
tc->cyllist = glGenLists(1);
tc->diamondlist = glGenLists(1);
tc->num_effects = 12;
tc->num_texshifts = 3;
tc->effect_time = 0.0;
tc->effect_maxsecs = 30.00;
/* check bounds on cmd line opts */
if (start > tc->effect_maxsecs) start = tc->effect_maxsecs;
if (end > tc->effect_maxsecs) end = tc->effect_maxsecs;
if (start < tc->effect_time) start = tc->effect_time;
if (end < tc->effect_time) end = tc->effect_time;
/* set loop times, in seconds */
tc->start_time = start;
tc->end_time = end;
/* reset animation knots, effect 0 not defined. */
tc->effects = malloc(sizeof(effect_t) * ( tc->num_effects + 1));
for ( i = 1; i <= tc->num_effects ; i++)
init_effects(&tc->effects[i], i);
if (wire) {
glPolygonMode(GL_FRONT_AND_BACK, GL_LINE);
do_texture = False;
}
if (do_texture)
{
/* the following textures are loaded, and possible overridden:
tunnel 1, tunnel 2, tunnel 3, marquee, tardis, head */
glGenTextures(MAX_TEXTURE, tc->texture_binds);
/*LoadTexture(*mi, **fn, *filename, texbind, bluralpha, bw_color, anegative, onealpha)*/
if (strcasecmp (do_tun1, "(none)")) /* tunnel 1 */
LoadTexture(mi, NULL, do_tun1, tc->texture_binds[0], 0,0.0, False, False);
else
LoadTexture(mi, timetunnel0_xpm, NULL, tc->texture_binds[0], 0, 0.0, False, False);
if (strcasecmp (do_tun2, "(none)")) /* tunnel 2 */
LoadTexture(mi, NULL, do_tun2, tc->texture_binds[2], 0,0.0, False, False);
else
LoadTexture(mi, timetunnel1_xpm, NULL, tc->texture_binds[2], 0, 0.0, False, False);
if (strcasecmp (do_tun3, "(none)")) /* tunnel 3 */
LoadTexture(mi, NULL, do_tun3, tc->texture_binds[5], 0,0.0, False, False);
else
LoadTexture(mi, timetunnel2_xpm, NULL, tc->texture_binds[5], 0, 0.0, False, False);
LoadTexture(mi, tunnelstar_xpm, NULL, tc->texture_binds[4], 0, 0.0, False, False);
if (strcasecmp (do_tx1, "(none)")) /* marquee */
LoadTexture(mi, NULL, do_tx1, tc->texture_binds[3], 0,0.0, False, False);
#ifndef HAVE_JWZGLES /* logo_180_xpm is 180px which is not a power of 2! */
else
LoadTexture(mi, (char **) logo_180_xpm, NULL, tc->texture_binds[3], 0,0.0, False, False);
#endif
if (strcasecmp (do_tx2, "(none)")) /* tardis */
LoadTexture(mi, NULL, do_tx2, tc->texture_binds[1], 0, 0.0 ,False, False);
#ifndef HAVE_JWZGLES /* logo_180_xpm is 180px which is not a power of 2! */
else
LoadTexture(mi, (char **) logo_180_xpm, NULL, tc->texture_binds[1], 0,0.0, False, False);
#endif
if (strcasecmp (do_tx3, "(none)")) { /* head */
LoadTexture(mi, NULL, do_tx3, tc->texture_binds[6], 0, 0.0 ,False, False);
/* negative */
LoadTexture(mi, NULL, do_tx3, tc->texture_binds[9], 2,1.0, True, True);
#ifndef HAVE_JWZGLES /* logo_180_xpm is 180px which is not a power of 2! */
} else {
LoadTexture(mi, (char **) logo_180_xpm, NULL, tc->texture_binds[6], 0,0.0, False, False);
/* negative */
LoadTexture(mi, (char **) logo_180_xpm, NULL, tc->texture_binds[9], 2,1.0, True, True);
#endif
}
glEnable(GL_TEXTURE_2D);
check_gl_error("tex");
}
reshape_tunnel (mi, MI_WIDTH(mi), MI_HEIGHT(mi));
glDisable(GL_DEPTH_TEST); /* who needs it? ;-) */
if (do_fog)
glEnable(GL_FOG);
if (!wire)
{
glEnable(GL_ALPHA_TEST);
glAlphaFunc(GL_GREATER, 0.5);
}
tc->trackball = gltrackball_init ();
tc->texshift = calloc(tc->num_texshifts, sizeof(GLfloat));
for ( i = 0 ; i < tc->num_texshifts; i++)
tc->texshift[i] = 0.0;
glNewList(tc->cyllist, GL_COMPILE);
makecyl(30, -0.1, CYL_LEN, 1., 10. / 40.0 * CYL_LEN);
/*makecyl(30, -0.5, DIAMOND_LEN, 1., 4. / 40 * DIAMOND_LEN); */
glEndList();
glNewList(tc->diamondlist, GL_COMPILE);
makecyl(4, -0.5, DIAMOND_LEN, 1., 4. / 40 * DIAMOND_LEN);
glEndList();
}
