/* Signal handler for SIGWINCH. */
static void gli_sig_winsize(int val)
{
endwin();
newterm(getenv("TERM"), stdout, stdin);
gli_setup_curses();
gli_set_halfdelay();
screen_size_changed = TRUE;
signal(SIGWINCH, &gli_sig_winsize);
}
int main(int argc, char *argv[])
{
int ix, jx, val;
glkunix_startup_t startdata;
setlocale (LC_CTYPE, "");
/* Test for compile-time errors. If one of these spouts off, you
must edit glk.h and recompile. */
if (sizeof(glui32) != 4) {
printf("Compile-time error: glui32 is not a 32-bit value. Please fix glk.h.\n");
return 1;
}
if ((glui32)(-1) < 0) {
printf("Compile-time error: glui32 is not unsigned. Please fix glk.h.\n");
return 1;
}
/* Now some argument-parsing. This is probably going to hurt. */
startdata.argc = 0;
startdata.argv = (char **)malloc(argc * sizeof(char *));
/* Copy in the program name. */
startdata.argv[startdata.argc] = argv[0];
startdata.argc++;
for (ix=1; ix<argc && !errflag; ix++) {
glkunix_argumentlist_t *argform;
int inarglist = FALSE;
char *cx;
for (argform = glkunix_arguments;
argform->argtype != glkunix_arg_End && !errflag;
argform++) {
if (argform->name[0] == '\0') {
if (argv[ix][0] != '-') {
startdata.argv[startdata.argc] = argv[ix];
startdata.argc++;
inarglist = TRUE;
}
}
else if ((argform->argtype == glkunix_arg_NumberValue)
&& !strncmp(argv[ix], argform->name, strlen(argform->name))
&& (cx = argv[ix] + strlen(argform->name))
&& (atoi(cx) != 0 || cx[0] == '0')) {
startdata.argv[startdata.argc] = argv[ix];
startdata.argc++;
inarglist = TRUE;
}
else if (!strcmp(argv[ix], argform->name)) {
int numeat = 0;
if (argform->argtype == glkunix_arg_ValueFollows) {
if (ix+1 >= argc) {
printf("%s: %s must be followed by a value\n",
argv[0], argform->name);
errflag = TRUE;
break;
}
numeat = 2;
}
else if (argform->argtype == glkunix_arg_NoValue) {
numeat = 1;
}
else if (argform->argtype == glkunix_arg_ValueCanFollow) {
if (ix+1 < argc && argv[ix+1][0] != '-') {
numeat = 2;
}
else {
numeat = 1;
}
}
else if (argform->argtype == glkunix_arg_NumberValue) {
if (ix+1 >= argc
|| (atoi(argv[ix+1]) == 0 && argv[ix+1][0] != '0')) {
printf("%s: %s must be followed by a number\n",
argv[0], argform->name);
errflag = TRUE;
break;
}
numeat = 2;
}
else {
errflag = TRUE;
break;
}
for (jx=0; jx<numeat; jx++) {
startdata.argv[startdata.argc] = argv[ix];
startdata.argc++;
if (jx+1 < numeat)
ix++;
}
inarglist = TRUE;
break;
}
}
if (inarglist || errflag)
continue;
if (argv[ix][0] != '-') {
printf("%s: unwanted argument: %s\n", argv[0], argv[ix]);
errflag = TRUE;
break;
}
if (extract_value(argc, argv, "?", ex_Void, &ix, &val, FALSE))
errflag = TRUE;
else if (extract_value(argc, argv, "help", ex_Void, &ix, &val, FALSE))
errflag = TRUE;
else if (extract_value(argc, argv, "version", ex_Void, &ix, &val, FALSE))
pref_printversion = val;
else if (extract_value(argc, argv, "v", ex_Void, &ix, &val, FALSE))
pref_printversion = val;
else if (extract_value(argc, argv, "historylen", ex_Int, &ix, &val, 20))
pref_historylen = val;
else if (extract_value(argc, argv, "hl", ex_Int, &ix, &val, 20))
pref_historylen = val;
else if (extract_value(argc, argv, "width", ex_Int, &ix, &val, 80))
pref_screenwidth = val;
else if (extract_value(argc, argv, "w", ex_Int, &ix, &val, 80))
pref_screenwidth = val;
else if (extract_value(argc, argv, "height", ex_Int, &ix, &val, 24))
pref_screenheight = val;
else if (extract_value(argc, argv, "h", ex_Int, &ix, &val, 24))
pref_screenheight = val;
else if (extract_value(argc, argv, "ml", ex_Bool, &ix, &val, pref_messageline))
pref_messageline = val;
else if (extract_value(argc, argv, "revgrid", ex_Bool, &ix, &val, pref_reverse_textgrids))
pref_reverse_textgrids = val;
else if (extract_value(argc, argv, "border", ex_Bool, &ix, &val, pref_window_borders))
pref_window_borders = val;
else if (extract_value(argc, argv, "defprompt", ex_Bool, &ix, &val, pref_prompt_defaults))
pref_prompt_defaults = val;
#ifdef OPT_TIMED_INPUT
else if (extract_value(argc, argv, "precise", ex_Bool, &ix, &val, pref_precise_timing))
pref_precise_timing = val;
#endif /* !OPT_TIMED_INPUT */
else {
printf("%s: unknown option: %s\n", argv[0], argv[ix]);
errflag = TRUE;
}
}
if (errflag) {
printf("usage: %s [ options ... ]\n", argv[0]);
if (glkunix_arguments[0].argtype != glkunix_arg_End) {
glkunix_argumentlist_t *argform;
printf("game options:\n");
for (argform = glkunix_arguments;
argform->argtype != glkunix_arg_End;
argform++) {
printf(" %s\n", argform->desc);
}
}
printf("library options:\n");
printf(" -width NUM: manual screen width (if not specified, will try to measure)\n");
printf(" -height NUM: manual screen height (ditto)\n");
printf(" -ml BOOL: use message line (default 'yes')\n");
printf(" -historylen NUM: length of command history (default 20)\n");
printf(" -revgrid BOOL: reverse text in grid (status) windows (default 'no')\n");
printf(" -border BOOL: draw borders between windows (default 'yes')\n");
printf(" -defprompt BOOL: provide defaults for file prompts (default 'yes')\n");
#ifdef OPT_TIMED_INPUT
printf(" -precise BOOL: more precise timing for timed input (burns more CPU time) (default 'no')\n");
#endif /* !OPT_TIMED_INPUT */
printf(" -version: display Glk library version\n");
printf(" -help: display this list\n");
printf("NUM values can be any number. BOOL values can be 'yes' or 'no', or no value to toggle.\n");
return 1;
}
if (pref_printversion) {
printf("GlkTerm, library version %s (%s).\n",
LIBRARY_VERSION, LIBRARY_PORT);
printf("For more information, see http://eblong.com/zarf/glk/index.html\n");
return 1;
}
/* We now start up curses. From now on, the program must exit through
glk_exit(), so that endwin() is called. */
gli_setup_curses();
/* Initialize things. */
gli_initialize_misc();
gli_initialize_windows();
gli_initialize_events();
inittime = TRUE;
if (!glkunix_startup_code(&startdata)) {
glk_exit();
}
inittime = FALSE;
/* Call the program main entry point, and then exit. */
glk_main();
glk_exit();
/* glk_exit() doesn't return, but the compiler may kvetch if main()
doesn't seem to return a value. */
return 0;
}
