1 /* File: main-gcu.c */
4 * Copyright (c) 1997 Ben Harrison, and others
6 * This software may be copied and distributed for educational, research,
7 * and not for profit purposes provided that this copyright and statement
8 * are included in all such copies.
11 /* Purpose: Allow use of Unix "curses" with Angband -BEN- */
14 * This file has been modified to use multiple text windows if your screen
15 * is larger than 80x25. By Keldon Jones (keldon@umr.edu).
17 * Also included is Keldon Jones patch to get better colors. To switch to
18 * a term that supports this, see this posting:
20 * From keldon@umr.edu Thu Apr 01 05:40:14 1999
21 * Sender: KELDON JONES <keldon@saucer.cc.umr.edu>
22 * From: Keldon Jones <keldon@umr.edu>
23 * Subject: Re: Linux colour prob (Or: question for Greg)
24 * Newsgroups: rec.games.roguelike.angband
25 * References: <slrn7g1jlp.gj9.scarblac-spamtrap@flits104-37.flits.rug.nl> <3700f96b.1593384@news.polsl.gliwice.pl> <slrn7g36er.fm4.wooledge@jekyll.local>
26 * X-Newsreader: TIN [UNIX 1.3 unoff BETA 970625; 9000/780 HP-UX B.10.20]
27 * NNTP-Posting-Host: saucer.cc.umr.edu
28 * X-NNTP-Posting-Host: saucer.cc.umr.edu
29 * Message-ID: <370306be.0@news.cc.umr.edu>
30 * Date: 1 Apr 99 05:40:14 GMT
31 * Organization: University of Missouri - Rolla
34 * xs4all!xs4all!newsfeed.wirehub.nl!news-peer.gip.net!news.gsl.net!gip.net!news.he.net!mercury.cts.com!alpha.sky.net!news.missouri.edu!news.cc.umr.edu!not-for-mail
35 * Xref: xs4all rec.games.roguelike.angband:86332
37 * Greg Wooledge <wooledge@kellnet.com> wrote:
38 * > Gwidon S. Naskrent (naskrent@artemida.amu.edu.pl) wrote:
40 * > >On 30 Mar 1999 13:17:18 GMT, scarblac-spamtrap@pino.selwerd.cx (Remco
43 * > >>I recently switched to Linux, and *bands work fine. I like
44 * > >>to play them in consoles, not in X. However, colour is wrong.
45 * > >>"Slate" and "light slate" are always light blue, instead
46 * > >>of some shade of grey. Colours are fine in X.
48 * > I actually noticed the Linux console color issue a very long time ago,
49 * > but since I always play under X, I never really investigated it.
51 * > You're absolutely right, though -- the Linux console colors are not
52 * > "right" for Angband.
54 * I've noticed this myself, so I spent the evening fixing it.
55 * Well, sorta fixing it. It's not perfect yet, and it may not be
56 * possible to get it perfect with VGA hardware and/or the current
59 * > OK, reading on in terminfo(5):
62 * > Most color terminals are either `Tektronix-like' or `HP-
63 * > like'. Tektronix-like terminals have a predefined set of
64 * > N colors (where N usually 8), and can set character-cell
65 * > foreground and background characters independently, mixing
66 * > them into N * N color-pairs. On HP-like terminals, the
67 * > use must set each color pair up separately (foreground and
68 * > background are not independently settable). Up to M
69 * > color-pairs may be set up from 2*M different colors.
70 * > ANSI-compatible terminals are Tektronix-like.
72 * > The "linux" terminfo entry is definitely in the "Tektronix-like" family.
73 * > It has the "setaf" and "setab" capabilities for setting the foreground
74 * > and background colors to one of 8 basically hard-coded values:
76 * > Color #define Value RGB
77 * > black COLOR_BLACK 0 0, 0, 0
78 * > red COLOR_RED 1 max,0,0
79 * > green COLOR_GREEN 2 0,max,0
80 * > yellow COLOR_YELLOW 3 max,max,0
81 * > blue COLOR_BLUE 4 0,0,max
82 * > magenta COLOR_MAGENTA 5 max,0,max
83 * > cyan COLOR_CYAN 6 0,max,max
84 * > white COLOR_WHITE 7 max,max,max
86 * Well, not quite. Using certain escape sequences, an
87 * application (or better yet, curses) can redefine the colors (at
88 * least some of them) and then those are used. Read the
89 * curs_color manpage, and the part about "ccc" and "initc" in the
90 * terminfo manpage. This is what the part of main-gcu inside the
91 * "if (can_fix_color)" code does.
93 * > So, what does this mean to the Angband player? Well, it means that
94 * > either there's nothing you can do about the console colors as long as
95 * > straight curses/ncurses is used, or if there is something to be done,
96 * > I'm not clever enough to figure out how to do it.
98 * Well, it is possible, though you have to patch main-gcu
99 * and edit a terminfo entry. Apparently the relevant code in
100 * main-gcu was never tested (it's broken in at least one major
101 * way). Apply the patch at the end of this message (notice that
102 * we need to define REDEFINE_COLORS at some point near the
103 * beginning of the file).
104 * Next, write this termcap entry to a file:
106 * linux-c|linux console 1.3.6+ with private palette for each virtual console,
108 * colors#16, pairs#64,
109 * initc=\E]P%x%p1%{16}%/%02x%p1%{16}%/%02x%p1%{16}%/%02x,
113 * and run "tic" on it to produce a new terminfo entry called
114 * "linux-c". Especially note the "ccc" flag which says that we
115 * can redefine colors. The ugly "initc" string is what tells
116 * the console how to redefine a color. Now, just set your TERM
117 * variable to "linux-c" and try Angband again. If I've
118 * remembered to tell you everything that I've done, you should
119 * get the weird light-blue slate changed to a gray.
120 * Now, there are still lots of problems with this.
121 * Something (I don't think it's curses, either the kernel or
122 * the hardware itself) seems to be ignoring my color changes to
123 * colors 6 and 7, which is annoying. Also, the normal "white"
124 * color is now way too bright, but it's now necessary to
125 * distinguish it from the other grays.
126 * The kernel seems to support 16 colors, but you can
127 * only switch to 8 of those, due to VT102 compatibility, it
128 * seems. I think it would be possible to patch the kernel and
129 * allow all 16 colors to be used, but I haven't built up the
130 * nerve to try that yet.
131 * Let me know if you can improve on this any. Some of
132 * this may actually work differently on other hardware (ugh).
139 * To use this file, you must define "USE_GCU" in the Makefile.
141 * Hack -- note that "angband.h" is included AFTER the #ifdef test.
142 * This was necessary because of annoying "curses.h" silliness.
144 * Note that this file is not "intended" to support non-Unix machines,
145 * nor is it intended to support VMS or other bizarre setups.
147 * Also, this package assumes that the underlying "curses" handles both
148 * the "nonl()" and "cbreak()" commands correctly, see the "OPTION" below.
150 * This code should work with most versions of "curses" or "ncurses",
151 * and the "main-ncu.c" file (and USE_NCU define) are no longer used.
153 * See also "USE_CAP" and "main-cap.c" for code that bypasses "curses"
154 * and uses the "termcap" information directly, or even bypasses the
155 * "termcap" information and sends direct vt100 escape sequences.
157 * XXX XXX XXX Consider the use of "savetty()" and "resetty()".
160 #include "game-option/runtime-arguments.h"
161 #include "game-option/special-options.h"
162 #include "io/exit-panic.h"
163 #include "io/files-util.h"
164 #include "locale/japanese.h"
165 #include "main/sound-definitions-table.h"
166 #include "main/sound-of-music.h"
167 #include "system/angband.h"
168 #include "system/angband-version.h"
169 #include "system/player-type-definition.h"
170 #include "term/gameterm.h"
171 #include "term/term-color-types.h"
172 #include "term/z-form.h"
173 #include "util/angband-files.h"
174 #include "view/display-map.h"
179 * Hack -- play games with "bool"
181 #if __STDC_VERSION__ < 199901L
186 * Include the proper "header" file
191 * Simple rectangle type
198 /* Trivial rectangle utility to make code a bit more readable */
199 static rect_t rect(int x, int y, int cx, int cy)
210 * Information about a term
218 /* Max number of windows on screen */
219 #define MAX_TERM_DATA 4
221 /* Minimum main term size */
222 #define MIN_TERM0_LINES 24
223 #define MIN_TERM0_COLS 80
225 /* Information about our windows */
226 static term_data data[MAX_TERM_DATA];
229 * Hack -- try to guess which systems use what commands
230 * Hack -- allow one of the "USE_Txxxxx" flags to be pre-set.
231 * Mega-Hack -- try to guess when "POSIX" is available.
232 * If the user defines two of these, we will probably crash.
234 #if !defined(USE_TCHARS)
235 #if defined(_POSIX_VERSION)
243 * Try redefining the colors at startup.
245 #define REDEFINE_COLORS
251 #include <sys/ioctl.h>
256 * One version needs this file
259 #include <sys/ioctl.h>
264 * The other needs this file
267 #include <sys/file.h>
268 #include <sys/ioctl.h>
269 #include <sys/param.h>
270 #include <sys/resource.h>
271 #include <sys/types.h>
277 * XXX XXX Hack -- POSIX uses "O_NONBLOCK" instead of "O_NDELAY"
279 * They should both work due to the "(i != 1)" test below.
282 #define O_NDELAY O_NONBLOCK
286 * OPTION: some machines lack "cbreak()"
287 * On these machines, we use an older definition
289 /* #define cbreak() crmode() */
292 * OPTION: some machines cannot handle "nonl()" and "nl()"
293 * On these machines, we can simply ignore those commands.
298 static concptr ANGBAND_DIR_XTRA_SOUND;
302 * Flag set once "sound" has been initialized
304 static bool can_use_sound = false;
307 * An array of sound file names
309 static concptr sound_file[SOUND_MAX];
312 * Save the "normal" and "angband" terminal settings
317 static struct termios norm_termios;
319 static struct termios game_termios;
325 static struct termio norm_termio;
327 static struct termio game_termio;
332 static struct ltchars norm_speciax_chars;
333 static struct sgttyb norm_ttyb;
334 static struct tchars norm_tchars;
335 static int norm_locax_chars;
337 static struct ltchars game_speciax_chars;
338 static struct sgttyb game_ttyb;
339 static struct tchars game_tchars;
340 static int game_locax_chars;
344 * Hack -- Number of initialized "term" structures
346 static int active = 0;
350 * Hack -- define "A_BRIGHT" to be "A_BOLD", because on many
351 * machines, "A_BRIGHT" produces ugly "inverse" video.
354 #define A_BRIGHT A_BOLD
358 * Software flag -- we are allowed to use color
360 static int can_use_color = false;
363 * Software flag -- we are allowed to change the colors
365 static int can_fix_color = false;
368 * Simple Angband to Curses color conversion table
370 static int colortable[16];
373 * Background color we should draw with; either BLACK or DEFAULT
375 static int bg_color = COLOR_BLACK;
380 * Place the "keymap" into its "normal" state
382 static void keymap_norm(void)
385 /* restore the saved values of the special chars */
386 (void)tcsetattr(0, TCSAFLUSH, &norm_termios);
390 /* restore the saved values of the special chars */
391 (void)ioctl(0, TCSETA, (char *)&norm_termio);
395 /* restore the saved values of the special chars */
396 (void)ioctl(0, TIOCSLTC, (char *)&norm_speciax_chars);
397 (void)ioctl(0, TIOCSETP, (char *)&norm_ttyb);
398 (void)ioctl(0, TIOCSETC, (char *)&norm_tchars);
399 (void)ioctl(0, TIOCLSET, (char *)&norm_locax_chars);
404 * Place the "keymap" into the "game" state
406 static void keymap_game(void)
409 /* restore the saved values of the special chars */
410 (void)tcsetattr(0, TCSAFLUSH, &game_termios);
414 /* restore the saved values of the special chars */
415 (void)ioctl(0, TCSETA, (char *)&game_termio);
419 /* restore the saved values of the special chars */
420 (void)ioctl(0, TIOCSLTC, (char *)&game_speciax_chars);
421 (void)ioctl(0, TIOCSETP, (char *)&game_ttyb);
422 (void)ioctl(0, TIOCSETC, (char *)&game_tchars);
423 (void)ioctl(0, TIOCLSET, (char *)&game_locax_chars);
428 * Save the normal keymap
430 static void keymap_norm_prepare(void)
433 /* Get the normal keymap */
434 tcgetattr(0, &norm_termios);
438 /* Get the normal keymap */
439 (void)ioctl(0, TCGETA, (char *)&norm_termio);
443 /* Get the normal keymap */
444 (void)ioctl(0, TIOCGETP, (char *)&norm_ttyb);
445 (void)ioctl(0, TIOCGLTC, (char *)&norm_speciax_chars);
446 (void)ioctl(0, TIOCGETC, (char *)&norm_tchars);
447 (void)ioctl(0, TIOCLGET, (char *)&norm_locax_chars);
452 * Save the keymaps (normal and game)
454 static void keymap_game_prepare(void)
457 /* Acquire the current mapping */
458 tcgetattr(0, &game_termios);
460 /* Force "Ctrl-C" to interupt */
461 game_termios.c_cc[VINTR] = (char)3;
463 /* Force "Ctrl-Z" to suspend */
464 game_termios.c_cc[VSUSP] = (char)26;
466 /* Hack -- Leave "VSTART/VSTOP" alone */
468 /* Disable the standard control characters */
469 game_termios.c_cc[VQUIT] = (char)-1;
470 game_termios.c_cc[VERASE] = (char)-1;
471 game_termios.c_cc[VKILL] = (char)-1;
472 game_termios.c_cc[VEOF] = (char)-1;
473 game_termios.c_cc[VEOL] = (char)-1;
475 /* Normally, block until a character is read */
476 game_termios.c_cc[VMIN] = 1;
477 game_termios.c_cc[VTIME] = 0;
481 /* Acquire the current mapping */
482 (void)ioctl(0, TCGETA, (char *)&game_termio);
484 /* Force "Ctrl-C" to interupt */
485 game_termio.c_cc[VINTR] = (char)3;
487 /* Force "Ctrl-Z" to suspend */
488 game_termio.c_cc[VSUSP] = (char)26;
490 /* Disable the standard control characters */
491 game_termio.c_cc[VQUIT] = (char)-1;
492 game_termio.c_cc[VERASE] = (char)-1;
493 game_termio.c_cc[VKILL] = (char)-1;
494 game_termio.c_cc[VEOF] = (char)-1;
495 game_termio.c_cc[VEOL] = (char)-1;
497 /* Normally, block until a character is read */
498 game_termio.c_cc[VMIN] = 1;
499 game_termio.c_cc[VTIME] = 0;
503 /* Get the default game characters */
504 (void)ioctl(0, TIOCGETP, (char *)&game_ttyb);
505 (void)ioctl(0, TIOCGLTC, (char *)&game_speciax_chars);
506 (void)ioctl(0, TIOCGETC, (char *)&game_tchars);
507 (void)ioctl(0, TIOCLGET, (char *)&game_locax_chars);
509 /* Force suspend (^Z) */
510 game_speciax_chars.t_suspc = (char)26;
512 /* Cancel some things */
513 game_speciax_chars.t_dsuspc = (char)-1;
514 game_speciax_chars.t_rprntc = (char)-1;
515 game_speciax_chars.t_flushc = (char)-1;
516 game_speciax_chars.t_werasc = (char)-1;
517 game_speciax_chars.t_lnextc = (char)-1;
519 /* Force interupt (^C) */
520 game_tchars.t_intrc = (char)3;
522 /* Force start/stop (^Q, ^S) */
523 game_tchars.t_startc = (char)17;
524 game_tchars.t_stopc = (char)19;
526 /* Cancel some things */
527 game_tchars.t_quitc = (char)-1;
528 game_tchars.t_eofc = (char)-1;
529 game_tchars.t_brkc = (char)-1;
536 static errr game_term_xtra_gcu_alive(int v)
539 /* Go to normal keymap mode */
547 /* Hack -- make sure the cursor is visible */
548 term_xtra(TERM_XTRA_SHAPE, 1);
550 /* Flush the curses buffer */
553 /* this moves curses to bottom right corner */
554 mvcur(getcury(curscr), getcurx(curscr), LINES - 1, 0);
559 /* Flush the output */
560 (void)fflush(stdout);
562 /* Restore the settings */
567 /* Go to angband keymap mode */
575 * Check for existance of a file
577 static bool check_file(concptr s)
591 static bool init_sound(void)
593 /* Initialize once */
595 return can_use_sound;
601 /* Prepare the sounds */
602 for (i = 1; i < SOUND_MAX; i++) {
603 /* Extract name of sound file */
604 sprintf(wav, "%s.wav", angband_sound_name[i]);
606 /* Access the sound */
607 path_build(buf, sizeof(buf), ANGBAND_DIR_XTRA_SOUND, wav);
609 /* Save the sound filename, if it exists */
611 sound_file[i] = string_make(buf);
614 /* Sound available */
615 can_use_sound = true;
616 return can_use_sound;
620 * Init the "curses" system
622 static void game_term_init_gcu(term_type *t)
624 term_data *td = (term_data *)(t->data);
626 /* Count init's, handle first */
630 /* Erase the screen */
631 (void)wclear(td->win);
633 /* Reset the cursor */
634 (void)wmove(td->win, 0, 0);
637 (void)wrefresh(td->win);
644 * Nuke the "curses" system
646 static void game_term_nuke_gcu(term_type *t)
648 term_data *td = (term_data *)(t->data);
650 /* Delete this window */
653 /* Count nuke's, handle last */
657 /* Hack -- make sure the cursor is visible */
658 term_xtra(TERM_XTRA_SHAPE, 1);
661 /* Reset colors to defaults */
665 /* This moves curses to bottom right corner */
666 mvcur(getcury(curscr), getcurx(curscr), LINES - 1, 0);
668 /* Flush the curses buffer */
674 /* Flush the output */
675 (void)fflush(stdout);
682 * Push multiple keys reversal
684 static void term_string_push(char *buf)
686 int i, l = strlen(buf);
687 for (i = l; i >= 0; i--)
688 term_key_push(buf[i]);
694 * Process events, with optional wait
696 static errr game_term_xtra_gcu_event(int v)
705 /* Paranoia -- Wait for it */
706 nodelay(stdscr, false);
711 /* Broken input is special */
713 exit_game_panic(p_ptr);
715 exit_game_panic(p_ptr);
719 /* Do not wait for it */
720 nodelay(stdscr, true);
722 while ((i = getch()) != EOF) {
724 exit_game_panic(p_ptr);
730 /* Wait for it next time */
731 nodelay(stdscr, false);
735 char eucbuf[sizeof(buf)];
736 /* strlen + 1 を渡して文字列終端('\0')を含めて変換する */
737 if (utf8_to_euc(buf, strlen(buf) + 1, eucbuf, sizeof(eucbuf)) < 0) {
741 term_string_push(_(eucbuf, buf));
746 /* Do not wait for it */
747 nodelay(stdscr, true);
749 /* Check for keypresses */
752 /* Wait for it next time */
753 nodelay(stdscr, false);
761 /* Enqueue the keypress */
769 #else /* USE_GETCH */
772 * Process events (with optional wait)
774 static errr game_term_xtra_gcu_event(int v)
784 /* Wait for one byte */
785 i = read(0, bp++, 1);
787 /* Hack -- Handle bizarre "errors" */
788 if ((i <= 0) && (errno != EINTR))
789 exit_game_panic(p_ptr);
791 /* Get the current flags for stdin */
792 k = fcntl(0, F_GETFL, 0);
798 /* Tell stdin not to block */
799 if (fcntl(0, F_SETFL, k | O_NDELAY) >= 0) {
800 if ((i = read(0, bp, 254)) > 0) {
804 /* Replace the flags for stdin */
805 if (fcntl(0, F_SETFL, k))
811 char eucbuf[sizeof(buf)];
812 /* strlen + 1 を渡して文字列終端('\0')を含めて変換する */
813 if (utf8_to_euc(buf, strlen(buf) + 1, eucbuf, sizeof(eucbuf)) < 0) {
817 term_string_push(_(eucbuf, buf));
822 /* Get the current flags for stdin */
823 k = fcntl(0, F_GETFL, 0);
829 /* Tell stdin not to block */
830 if (fcntl(0, F_SETFL, k | O_NDELAY) < 0)
833 /* Read one byte, if possible */
836 /* Replace the flags for stdin */
837 if (fcntl(0, F_SETFL, k))
840 /* Ignore "invalid" keys */
841 if ((i != 1) || (!buf[0]))
844 /* Enqueue the keypress */
845 term_key_push(buf[0]);
852 #endif /* USE_GETCH */
855 * Hack -- make a sound
857 static errr game_term_xtra_gcu_sound(int v)
866 if ((v < 0) || (v >= SOUND_MAX))
873 sprintf(buf, "./gcusound.sh %s\n", sound_file[v]);
875 return system(buf) < 0;
880 static int scale_color(int i, int j, int scale)
882 return (angband_color_table[i][j] * (scale - 1) + 127) / 255;
885 static int create_color(int i, int scale)
887 int r = scale_color(i, 1, scale);
888 int g = scale_color(i, 2, scale);
889 int b = scale_color(i, 3, scale);
890 int rgb = 16 + scale * scale * r + scale * g + b;
891 /* In the case of white and black we need to use the ANSI colors */
892 if (r == g && g == b) {
904 static errr game_term_xtra_gcu_react(void)
909 if (!can_change_color()) {
910 if (COLORS == 256 || COLORS == 88) {
911 /* If we have more than 16 colors, find the best matches. These numbers
912 * correspond to xterm/rxvt's builtin color numbers--they do not
913 * correspond to curses' constants OR with curses' color pairs.
915 * XTerm has 216 (6*6*6) RGB colors, with each RGB setting 0-5.
916 * RXVT has 64 (4*4*4) RGB colors, with each RGB setting 0-3.
918 * Both also have the basic 16 ANSI colors, plus some extra grayscale
919 * colors which we do not use.
921 int scale = COLORS == 256 ? 6 : 4;
922 for (int i = 0; i < 16; i++) {
923 int fg = create_color(i, scale);
924 init_pair(i + 1, fg, bg_color);
925 colortable[i] = COLOR_PAIR(i + 1) | A_NORMAL;
929 for (int i = 0; i < 16; ++i) {
931 (angband_color_table[i][1] * 1000) / 255,
932 (angband_color_table[i][2] * 1000) / 255,
933 (angband_color_table[i][3] * 1000) / 255);
944 * Handle a "special request"
946 static errr game_term_xtra_gcu(int n, int v)
948 term_data *td = (term_data *)(game_term->data);
950 /* Analyze the request */
953 case TERM_XTRA_CLEAR:
955 (void)wclear(td->win);
959 case TERM_XTRA_NOISE:
960 return write(1, "\007", 1) != 1;
962 /* Make a special sound */
963 case TERM_XTRA_SOUND:
964 return game_term_xtra_gcu_sound(v);
966 /* Flush the Curses buffer */
967 case TERM_XTRA_FRESH:
968 (void)wrefresh(td->win);
971 /* Change the cursor visibility */
972 case TERM_XTRA_SHAPE:
976 /* Suspend/Resume curses */
977 case TERM_XTRA_ALIVE:
978 return game_term_xtra_gcu_alive(v);
981 case TERM_XTRA_EVENT:
982 return game_term_xtra_gcu_event(v);
985 case TERM_XTRA_FLUSH:
986 while (!game_term_xtra_gcu_event(false))
991 case TERM_XTRA_DELAY:
995 /* React to events */
996 case TERM_XTRA_REACT:
997 game_term_xtra_gcu_react();
1006 * Actually MOVE the hardware cursor
1008 static errr game_term_curs_gcu(int x, int y)
1010 term_data *td = (term_data *)(game_term->data);
1012 /* Literally move the cursor */
1013 wmove(td->win, y, x);
1020 * Erase a grid of space
1021 * Hack -- try to be "semi-efficient".
1023 static errr game_term_wipe_gcu(int x, int y, int n)
1025 term_data *td = (term_data *)(game_term->data);
1028 wmove(td->win, y, x);
1030 /* Clear to end of line */
1035 /* Clear some characters */
1038 waddch(td->win, ' ');
1045 #ifdef USE_NCURSES_ACS
1047 * this function draws some ACS characters on the screen
1048 * for DOS-based users: these are the graphical chars (blocks, lines etc)
1050 * unix-gurus: before you start adding other attributes like A_REVERSE
1051 * think hard about how map_info() in cave.c should handle the color
1052 * of something that we here draw in reverse. It's not so simple, alas.
1054 static void game_term_acs_text_gcu(int x, int y, int n, byte a, concptr s)
1056 term_data *td = (term_data *)(game_term->data);
1059 /* position the cursor */
1060 wmove(td->win, y, x);
1064 wattrset(td->win, colortable[a & 0x0F]);
1067 for (i = 0; i < n; i++) {
1068 /* add acs_map of a */
1069 waddch(td->win, acs_map[(int)s[i]]);
1071 wattrset(td->win, WA_NORMAL);
1076 * Place some text on the screen using an attribute
1078 static errr game_term_text_gcu(int x, int y, int n, byte a, concptr s)
1080 term_data *td = (term_data *)(game_term->data);
1082 #ifdef USE_NCURSES_ACS
1083 /* do we have colors + 16 ? */
1084 /* then call special routine for drawing special characters */
1086 game_term_acs_text_gcu(x, y, n, a, s);
1091 /* Move the cursor and dump the string */
1092 wmove(td->win, y, x);
1097 wattrset(td->win, colortable[a & 0x0F]);
1102 int text_len = euc_to_utf8(s, n, text, sizeof(text));
1108 waddnstr(td->win, _(text, s), _(text_len, n));
1115 * Create a window for the given "term_data" argument.
1117 * Assumes legal arguments.
1119 static errr term_data_init_gcu(term_data *td, int rows, int cols, int y, int x)
1121 term_type *t = &td->t;
1123 /* Make sure the window has a positive size */
1124 if (rows <= 0 || cols <= 0)
1127 /* Create a window */
1128 td->win = newwin(rows, cols, y, x);
1130 /* Make sure we succeed */
1132 plog("Failed to setup curses window.");
1136 /* Initialize the term */
1137 term_init(t, cols, rows, 256);
1139 /* Avoid the bottom right corner */
1140 t->icky_corner = true;
1142 /* Erase with "white space" */
1143 t->attr_blank = TERM_WHITE;
1144 t->char_blank = ' ';
1146 /* Set some hooks */
1147 t->init_hook = game_term_init_gcu;
1148 t->nuke_hook = game_term_nuke_gcu;
1150 /* Set some more hooks */
1151 t->text_hook = game_term_text_gcu;
1152 t->wipe_hook = game_term_wipe_gcu;
1153 t->curs_hook = game_term_curs_gcu;
1154 t->xtra_hook = game_term_xtra_gcu;
1169 static errr term_data_init(term_data *td)
1171 return term_data_init_gcu(td, td->r.cy, td->r.cx, td->r.y, td->r.x);
1174 /* Parse 27,15,*x30 up to the 'x'. * gets converted to a big number
1175 Parse 32,* until the end. Return count of numbers parsed */
1176 static int _parse_size_list(const char *arg, int sizes[], int max)
1179 const char *start = arg;
1180 const char *stop = arg;
1183 if (!*stop || !isdigit(*stop)) {
1189 /* rely on atoi("23,34,*") -> 23
1190 otherwise, copy [start, stop) into a new buffer first.*/
1191 sizes[i] = atoi(start);
1194 if (!*stop || *stop != ',')
1205 static void hook_quit(concptr str)
1215 * Prepare "curses" for use by the file "term.c"
1217 * Installs the "hook" functions defined above, and then activates
1218 * the main screen "term", which clears the screen and such things.
1220 * Someone should really check the semantics of "initscr()"
1222 errr init_gcu(int argc, char *argv[])
1226 int num_term = 4, next_win = 0;
1233 setlocale(LC_ALL, "");
1235 /* Build the "sound" path */
1236 path_build(path, sizeof(path), ANGBAND_DIR_XTRA, "sound");
1238 /* Allocate the path */
1239 ANGBAND_DIR_XTRA_SOUND = string_make(path);
1241 /* Extract the normal keymap */
1242 keymap_norm_prepare();
1244 bool nobigscreen = false;
1247 for (i = 1; i < argc; i++) {
1248 if (prefix(argv[i], "-o")) {
1253 /* Initialize for others systems */
1254 if (initscr() == (WINDOW *)ERR)
1257 /* Activate hooks */
1258 quit_aux = hook_quit;
1259 core_aux = hook_quit;
1261 /* Hack -- Require large screen, or Quit with message */
1262 i = ((LINES < 24) || (COLS < 80));
1264 quit_fmt("%s needs an 80x24 'curses' screen", std::string(VARIANT_NAME).c_str());
1268 /*** Init the Color-pairs and set up a translation table ***/
1270 /* Do we have color, and enough color, available? */
1271 can_use_color = ((start_color() != ERR) && has_colors() && (COLORS >= 8) && (COLOR_PAIRS >= 8));
1273 #ifdef REDEFINE_COLORS
1274 /* Can we change colors? */
1275 can_fix_color = (can_use_color && can_change_color() && (COLORS >= 16) && (COLOR_PAIRS > 8));
1278 /* Attempt to use customized colors */
1279 if (can_fix_color) {
1280 /* Prepare the color pairs */
1281 for (i = 1; i <= 15; i++) {
1282 if (init_pair(i, i, 0) == ERR) {
1283 quit("Color pair init failed");
1286 colortable[i] = COLOR_PAIR(i);
1287 game_term_xtra_gcu_react();
1290 /* Attempt to use colors */
1291 else if (can_use_color) {
1292 /* Color-pair 0 is *always* WHITE on BLACK */
1294 /* Prepare the color pairs */
1295 init_pair(1, COLOR_RED, COLOR_BLACK);
1296 init_pair(2, COLOR_GREEN, COLOR_BLACK);
1297 init_pair(3, COLOR_YELLOW, COLOR_BLACK);
1298 init_pair(4, COLOR_BLUE, COLOR_BLACK);
1299 init_pair(5, COLOR_MAGENTA, COLOR_BLACK);
1300 init_pair(6, COLOR_CYAN, COLOR_BLACK);
1301 init_pair(7, COLOR_BLACK, COLOR_BLACK);
1303 /* Prepare the "Angband Colors" -- Bright white is too bright */
1304 /* Changed in Drangband. Cyan as grey sucks -- -TM- */
1305 colortable[0] = (COLOR_PAIR(7) | A_NORMAL); /* Black */
1306 colortable[1] = (COLOR_PAIR(0) | A_BRIGHT); /* White */
1307 colortable[2] = (COLOR_PAIR(0) | A_NORMAL); /* Grey XXX */
1308 colortable[3] = (COLOR_PAIR(1) | A_BRIGHT); /* Orange XXX */
1309 colortable[4] = (COLOR_PAIR(1) | A_NORMAL); /* Red */
1310 colortable[5] = (COLOR_PAIR(2) | A_NORMAL); /* Green */
1311 colortable[6] = (COLOR_PAIR(4) | A_BRIGHT); /* Blue */
1312 colortable[7] = (COLOR_PAIR(3) | A_NORMAL); /* Umber */
1313 colortable[8] = (COLOR_PAIR(7) | A_BRIGHT); /* Dark-grey XXX */
1314 colortable[9] = (COLOR_PAIR(0) | A_NORMAL); /* Light-grey XXX */
1315 colortable[10] = (COLOR_PAIR(5) | A_BRIGHT); /* Purple */
1316 colortable[11] = (COLOR_PAIR(3) | A_BRIGHT); /* Yellow */
1317 colortable[12] = (COLOR_PAIR(5) | A_NORMAL); /* Light Red XXX */
1318 colortable[13] = (COLOR_PAIR(2) | A_BRIGHT); /* Light Green */
1319 colortable[14] = (COLOR_PAIR(6) | A_BRIGHT); /* Light Blue */
1320 colortable[15] = (COLOR_PAIR(3) | A_NORMAL); /* Light Umber XXX */
1325 /* Handle "arg_sound" */
1326 if (use_sound != arg_sound) {
1327 /* Initialize (if needed) */
1328 if (arg_sound && !init_sound()) {
1330 plog("Cannot initialize sound!");
1336 /* Change setting */
1337 use_sound = arg_sound;
1342 /* if USE_NCURSES_ACS is defined, we can do something with graphics in curses! */
1343 #ifdef USE_NCURSES_ACS
1344 use_graphics = true;
1348 /*** Low level preparation ***/
1352 /* Paranoia -- Assume no waiting */
1353 nodelay(stdscr, false);
1363 /* Extract the game keymap */
1364 keymap_game_prepare();
1366 /*** Now prepare the term(s) ***/
1368 /* Create several terms */
1369 for (i = 0; i < num_term; i++) {
1370 int rows, cols, y, x;
1372 /* Decide on size and position */
1411 rows = cols = y = x = 0;
1416 /* Skip non-existant windows */
1417 if (rows <= 0 || cols <= 0)
1421 term_data_init_gcu(&data[next_win], rows, cols, y, x);
1423 /* Remember the term */
1424 angband_term[next_win] = &data[next_win].t;
1426 /* One more window */
1430 /* Parse Args and Prepare the Terminals. Rectangles are specified
1431 as Width x Height, right? The game will allow you to have two
1432 strips of extra terminals, one on the right and one on the bottom.
1433 The map terminal will than fit in as big as possible in the remaining
1436 angband -mgcu -- -right 30x27,* -bottom *x7 will layout as
1437 Term-0: Map (COLS-30)x(LINES-7) | Term-1: 30x27
1438 --------------------------------|----------------------
1439 <----Term-3: (COLS-30)x7------->| Term-2: 30x(LINES-27)
1440 composband -mgcu -- -bottom *x7 -right 30x27,* will layout as
1441 Term-0: Map (COLS-30)x(LINES-7) | Term-2: 30x27
1442 |------------------------------
1443 | Term-3: 30x(LINES-27)
1444 ---------------------------------------------------------------
1445 <----------Term-1: (COLS)x7----------------------------------->
1446 Notice the effect on the bottom terminal by specifying its argument
1447 second or first. Notice the sequence numbers for the various terminals
1448 as you will have to blindly configure them in the window setup screen.
1449 EDIT: Added support for -left and -top.
1452 rect_t remaining = rect(0, 0, COLS, LINES);
1458 for (i = 1; i < argc; i++) {
1459 if (streq(argv[i], "-spacer")) {
1462 quit("Missing size specifier for -spacer");
1463 sscanf(argv[i], "%dx%d", &spacer_cx, &spacer_cy);
1464 } else if (streq(argv[i], "-right") || streq(argv[i], "-left")) {
1465 const char *arg, *tmp;
1466 bool left = streq(argv[i], "-left");
1467 int cx, cys[MAX_TERM_DATA] = { 0 }, ct, j, x, y;
1471 quit(format("Missing size specifier for -%s", left ? "left" : "right"));
1474 tmp = strchr(arg, 'x');
1476 quit(format("Expected something like -%s 60x27,* for two %s hand terminals of 60 columns, the first 27 lines and the second whatever is left.", left ? "left" : "right", left ? "left" : "right"));
1484 x = remaining.x + remaining.cx;
1487 remaining.cx -= spacer_cx;
1489 remaining.x += spacer_cx;
1492 ct = _parse_size_list(tmp, cys, MAX_TERM_DATA);
1493 for (j = 0; j < ct; j++) {
1495 if (y + cy > remaining.y + remaining.cy)
1496 cy = remaining.y + remaining.cy - y;
1497 if (next_term >= MAX_TERM_DATA)
1498 quit(format("Too many terminals. Only %d are allowed.", MAX_TERM_DATA));
1500 quit(format("Out of bounds in -%s: %d is too large (%d rows max for this strip)",
1501 left ? "left" : "right", cys[j], remaining.cy));
1503 data[next_term++].r = rect(x, y, cx, cy);
1504 y += cy + spacer_cy;
1507 } else if (streq(argv[i], "-top") || streq(argv[i], "-bottom")) {
1508 const char *arg, *tmp;
1509 bool top = streq(argv[i], "-top");
1510 int cy, cxs[MAX_TERM_DATA] = { 0 }, ct, j, x, y;
1514 quit(format("Missing size specifier for -%s", top ? "top" : "bottom"));
1517 tmp = strchr(arg, 'x');
1519 quit(format("Expected something like -%s *x7 for a single %s terminal of 7 lines using as many columns as are available.", top ? "top" : "bottom", top ? "top" : "bottom"));
1522 ct = _parse_size_list(arg, cxs, MAX_TERM_DATA);
1531 y = remaining.y + remaining.cy;
1533 remaining.cy -= spacer_cy;
1535 remaining.y += spacer_cy;
1538 for (j = 0; j < ct; j++) {
1540 if (x + cx > remaining.x + remaining.cx)
1541 cx = remaining.x + remaining.cx - x;
1542 if (next_term >= MAX_TERM_DATA)
1543 quit(format("Too many terminals. Only %d are allowed.", MAX_TERM_DATA));
1545 quit(format("Out of bounds in -%s: %d is too large (%d cols max for this strip)",
1546 top ? "top" : "bottom", cxs[j], remaining.cx));
1548 data[next_term++].r = rect(x, y, cx, cy);
1549 x += cx + spacer_cx;
1556 if (remaining.cx < MIN_TERM0_COLS || remaining.cy < MIN_TERM0_LINES)
1557 quit_fmt("Failed: %s needs an %dx%d map screen, not %dx%d", std::string(VARIANT_NAME).c_str(), MIN_TERM0_COLS, MIN_TERM0_LINES, remaining.cx, remaining.cy);
1558 data[0].r = remaining;
1559 term_data_init(&data[0]);
1560 angband_term[0] = game_term;
1562 /* Child Terminals */
1563 for (next_term = 1; next_term < term_ct; next_term++) {
1564 term_data_init(&data[next_term]);
1565 angband_term[next_term] = game_term;
1569 /* Activate the "Angband" window screen */
1570 term_activate(&data[0].t);
1573 term_screen = &data[0].t;
1579 #endif /* USE_GCU */