+++ /dev/null
-/* $NetBSD: curses.c,v 1.4 1997/10/12 11:45:01 lukem Exp $ */
-
-/*
- * Copyright (c) 1988, 1993
- * The Regents of the University of California. All rights reserved.
- *
- * This code is derived from software contributed to Berkeley by
- * Timothy C. Stoehr.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- */
-
-#include <sys/cdefs.h>
-#ifndef lint
-#if 0
-static char sccsid[] = "@(#)curses.c 8.1 (Berkeley) 5/31/93";
-#else
-__RCSID("$NetBSD: curses.c,v 1.4 1997/10/12 11:45:01 lukem Exp $");
-#endif
-#endif /* not lint */
-
-/*
- * curses.c
- *
- * This source herein may be modified and/or distributed by anybody who
- * so desires, with the following restrictions:
- * 1.) No portion of this notice shall be removed.
- * 2.) Credit shall not be taken for the creation of this source.
- * 3.) This code is not to be traded, sold, or used for personal
- * gain or profit.
- *
- */
-
-#ifdef CURSES
-
-/* The following is a curses emulation package suitable for the rogue program
- * in which it is included. No other suitability is claimed or suspected.
- * Only those routines currently needed by this rogue program are included.
- * This is being provided for those systems that don't have a suitable
- * curses package and want to run this rogue program.
- *
- * Compile the entire program with -DCURSES to incorporate this package.
- *
- * The following is NOT supported:
- * "%D", "%B", "%n", or "%>" inside a cursor motion (cm) termcap string.
- * Terminals in which the cursor motion addresses the row differently from
- * the column, as in ":cm=\E%2,%3" or ":cm=\EY%+x;%+y"
- * Termcap database stored in the TERMCAP environ variable as returned
- * from md_getenv(). Only the termcap file name can be stored there.
- * See the comments for md_getenv() in machdep.c.
- * Terminals without non-destructive backspace. Backspace (^H) is used
- * for cursor motion regardless of any termcap entries.
- * The ":tc=" termcap entry is ignored.
- *
- * Suggestions:
- * Use line-feed as your termcap "do" entry: ":do=^J", ":do=\012" or
- * ":do=\n" This will help cursor motion optimization. If line-feed
- * won't work, then a short escape sequence will do.
- */
-
-#include <stdio.h>
-#include "rogue.h"
-
-boolean tc_tname();
-
-#define BS 010
-#define LF 012
-#define CR 015
-#define ESC '\033'
-#define TAB '\011'
-
-#define ST_MASK 0x80
-#define BUFLEN 256
-
-char terminal[DROWS][DCOLS];
-char buffer[DROWS][DCOLS];
-char *tc_file;
-
-char cm_esc[16];
-char cm_sep[16];
-char cm_end[16];
-boolean cm_reverse = 0;
-boolean cm_two = 0;
-boolean cm_three = 0;
-boolean cm_char = 0;
-short cm_inc = 0;
-
-boolean screen_dirty;
-boolean lines_dirty[DROWS];
-boolean buf_stand_out = 0;
-boolean term_stand_out = 0;
-
-int LINES = DROWS;
-int COLS = DCOLS;
-WINDOW scr_buf;
-WINDOW *curscr = &scr_buf;
-
-char *CL = (char *) 0;
-char *CM = (char *) 0;
-char *UC = (char *) 0; /* UP */
-char *DO = (char *) 0;
-char *VS = "";
-char *VE = "";
-char *TI = "";
-char *TE = "";
-char *SO = "";
-char *SE = "";
-
-short cur_row;
-short cur_col;
-
-initscr()
-{
- clear();
- get_term_info();
- printf("%s%s", TI, VS);
-}
-
-endwin()
-{
- printf("%s%s", TE, VE);
- md_cbreak_no_echo_nonl(0);
-}
-
-move(row, col)
-short row, col;
-{
- curscr->_cury = row;
- curscr->_curx = col;
- screen_dirty = 1;
-}
-
-mvaddstr(row, col, str)
-short row, col;
-char *str;
-{
- move(row, col);
- addstr(str);
-}
-
-addstr(str)
-char *str;
-{
- while (*str) {
- addch((int) *str++);
- }
-}
-
-addch(ch)
- int ch;
-{
- short row, col;
-
- row = curscr->_cury;
- col = curscr->_curx++;
-
- if (buf_stand_out) {
- ch |= ST_MASK;
- }
- buffer[row][col] = (char) ch;
- lines_dirty[row] = 1;
- screen_dirty = 1;
-}
-
-mvaddch(row, col, ch)
-short row, col;
-int ch;
-{
- move(row, col);
- addch(ch);
-}
-
-refresh()
-{
- int i, j, line;
- short old_row, old_col, first_row;
-
- if (screen_dirty) {
-
- old_row = curscr->_cury;
- old_col = curscr->_curx;
- first_row = cur_row;
-
- for (i = 0; i < DROWS; i++) {
- line = (first_row + i) % DROWS;
- if (lines_dirty[line]) {
- for (j = 0; j < DCOLS; j++) {
- if (buffer[line][j] != terminal[line][j]) {
- put_char_at(line, j, buffer[line][j]);
- }
- }
- lines_dirty[line] = 0;
- }
- }
- put_cursor(old_row, old_col);
- screen_dirty = 0;
- fflush(stdout);
- }
-}
-
-wrefresh(scr)
-WINDOW *scr;
-{
- short i, col;
-
- printf("%s", CL);
- cur_row = cur_col = 0;
-
- for (i = 0; i < DROWS; i++) {
- col = 0;
- while (col < DCOLS) {
- while ((col < DCOLS) && (buffer[i][col] == ' ')) {
- col++;
- }
- if (col < DCOLS) {
- put_cursor(i, col);
- }
- while ((col < DCOLS) && (buffer[i][col] != ' ')) {
- put_st_char((int) buffer[i][col]);
- cur_col++;
- col++;
- }
- }
- }
- put_cursor(curscr->_cury, curscr->_curx);
- fflush(stdout);
- scr = scr; /* make lint happy */
-}
-
-mvinch(row, col)
-short row, col;
-{
- move(row, col);
- return((int) buffer[row][col]);
-}
-
-clear()
-{
- printf("%s", CL);
- fflush(stdout);
- cur_row = cur_col = 0;
- move(0, 0);
- clear_buffers();
-}
-
-clrtoeol()
-{
- short row, col;
-
- row = curscr->_cury;
-
- for (col = curscr->_curx; col < DCOLS; col++) {
- buffer[row][col] = ' ';
- }
- lines_dirty[row] = 1;
-}
-
-standout()
-{
- buf_stand_out = 1;
-}
-
-standend()
-{
- buf_stand_out = 0;
-}
-
-crmode()
-{
- md_cbreak_no_echo_nonl(1);
-}
-
-noecho()
-{
- /* crmode() takes care of this */
-}
-
-nonl()
-{
- /* crmode() takes care of this */
-}
-
-clear_buffers()
-{
- int i, j;
-
- screen_dirty = 0;
-
- for (i = 0; i < DROWS; i++) {
- lines_dirty[i] = 0;
- for (j = 0; j < DCOLS; j++) {
- terminal[i][j] = ' ';
- buffer[i][j] = ' ';
- }
- }
-}
-
-put_char_at(row, col, ch)
- int row, col, ch;
-{
- put_cursor(row, col);
- put_st_char(ch);
- terminal[row][col] = (char) ch;
- cur_col++;
-}
-
-put_cursor(row, col)
- int row, col;
-{
- int i, rdif, cdif;
- short ch, t;
-
- rdif = (row > cur_row) ? row - cur_row : cur_row - row;
- cdif = (col > cur_col) ? col - cur_col : cur_col - col;
-
- if (((row > cur_row) && DO) || ((cur_row > row) && UC)) {
- if ((rdif < 4) && (cdif < 4)) {
- for (i = 0; i < rdif; i++) {
- printf("%s", ((row < cur_row) ? UC : DO));
- }
- cur_row = row;
- if (col == cur_col) {
- return;
- }
- }
- }
- if (row == cur_row) {
- if (cdif <= 6) {
- for (i = 0; i < cdif; i++) {
- ch = (col < cur_col) ? BS :
- terminal[row][cur_col + i];
- put_st_char((int) ch);
- }
- cur_row = row;
- cur_col = col;
- return;
- }
- }
- cur_row = row;
- cur_col = col;
-
- row += cm_inc;
- col += cm_inc;
-
- if (cm_reverse) {
- t = row;
- row = col;
- col = t;
- }
- if (cm_two) {
- printf("%s%02d%s%02d%s", cm_esc, row, cm_sep, col, cm_end);
- } else if (cm_three) {
- printf("%s%03d%s%03d%s", cm_esc, row, cm_sep, col, cm_end);
- } else if (cm_char) {
- printf("%s%c%s%c%s", cm_esc, row, cm_sep, col, cm_end);
- } else {
- printf("%s%d%s%d%s", cm_esc, row, cm_sep, col, cm_end);
- }
-}
-
-put_st_char(ch)
- int ch;
-{
- if ((ch & ST_MASK) && (!term_stand_out)) {
- ch &= ~ST_MASK;
- printf("%s%c", SO, ch);
- term_stand_out = 1;
- } else if ((!(ch & ST_MASK)) && term_stand_out) {
- printf("%s%c", SE, ch);
- term_stand_out = 0;
- } else {
- ch &= ~ST_MASK;
- putchar(ch);
- }
-}
-
-get_term_info()
-{
- FILE *fp;
- char *term, *tcf;
- char buf[BUFLEN];
-
- if (tcf = md_getenv("TERMCAP")) {
- if (strlen(tcf) > 40) {
- clean_up("TERMCAP file name too long");
- }
- tc_file = tcf;
- } else {
- if (!(tc_file = md_gdtcf())) {
- clean_up("I need a termcap file");
- }
- }
-
- if (!(term = md_getenv("TERM"))) {
- clean_up("Cannot find TERM variable in environ");
- }
- if ((fp = fopen(tc_file, "r")) == NULL) {
- sprintf(buf, "Cannot open TERMCAP file: %s", tc_file);
- clean_up(buf);
- }
-
- if (!tc_tname(fp, term, buf)) {
- sprintf(buf, "Cannot find TERM type: %s in TERMCAP file: %s", term,
- tc_file);
- clean_up(buf);
- }
- tc_gtdata(fp, buf);
- fclose(fp);
-}
-
-boolean
-tc_tname(fp, term, buf)
-FILE *fp;
-char *term;
-char *buf;
-{
- short i, j;
- boolean found = 0;
- char *fg;
-
- while (!found) {
- i = 0;
- fg = fgets(buf, BUFLEN, fp);
- if (fg != NULL) {
- if ( (buf[0] != '#') && (buf[0] != ' ') && (buf[0] != TAB) &&
- (buf[0] != CR) && (buf[0] != LF)) {
- while (buf[i] && (!found)) {
- j = 0;
- while (buf[i] == term[j]) {
- i++;
- j++;
- }
- if ((!term[j]) && ((buf[i] == '|') || (buf[i] == ':'))) {
- found = 1;
- } else {
- while (buf[i] && (buf[i] != '|') && (buf[i] != ':')) {
- i++;
- }
- if (buf[i]) {
- i++;
- }
- }
- }
- }
- } else {
- break;
- }
- }
- return(found);
-}
-
-tc_gtdata(fp, buf)
-FILE *fp;
-char *buf;
-{
- short i;
- boolean first = 1;
-
- do {
- if (!first) {
- if ((buf[0] != TAB) && (buf[0] != ' ')) {
- break;
- }
- }
- first = 0;
- i = 0;
- while (buf[i]) {
- while (buf[i] && (buf[i] != ':')) {
- i++;
- }
- if (buf[i] == ':') {
- if (!strncmp(buf + i, ":cl=", 4)) {
- tc_gets(buf + i, &CL);
- } else if (!strncmp(buf + i, ":cm=", 4)) {
- tc_gets(buf + i, &CM);
- } else if (!strncmp(buf + i, ":up=", 4)) {
- tc_gets(buf + i, &UC);
- } else if (!strncmp(buf + i, ":do=", 4)) {
- tc_gets(buf + i, &DO);
- } else if (!strncmp(buf + i, ":vs=", 4)) {
- tc_gets(buf + i, &VS);
- } else if (!strncmp(buf + i, ":ve=", 4)) {
- tc_gets(buf + i, &VE);
- } else if (!strncmp(buf + i, ":ti=", 4)) {
- tc_gets(buf + i, &TI);
- } else if (!strncmp(buf + i, ":te=", 4)) {
- tc_gets(buf + i, &TE);
- } else if (!strncmp(buf + i, ":vs=", 4)) {
- tc_gets(buf + i, &VS);
- } else if (!strncmp(buf + i, ":ve=", 4)) {
- tc_gets(buf + i, &VE);
- } else if (!strncmp(buf + i, ":so=", 4)) {
- tc_gets(buf + i, &SO);
- } else if (!strncmp(buf + i, ":se=", 4)) {
- tc_gets(buf + i, &SE);
- } else if (!strncmp(buf + i, ":li#", 4)) {
- tc_gnum(buf + i, &LINES);
- } else if (!strncmp(buf + i, ":co#", 4)) {
- tc_gnum(buf + i, &COLS);
- }
- i++;
- }
- }
- } while (fgets(buf, BUFLEN, fp) != NULL);
-
- if ((!CM) || (!CL)) {
- clean_up("Terminal and termcap must have cm and cl");
- }
- tc_cmget();
-}
-
-tc_gets(ibuf, tcstr)
-char *ibuf;
-char **tcstr;
-{
- short i, j, k, n;
- char obuf[BUFLEN];
-
- i = 4;
- j = 0;
-
- while (ibuf[i] && is_digit(ibuf[i])) {
- i++;
- }
-
- while (ibuf[i] && (ibuf[i] != ':')) {
- if (ibuf[i] == '\\') {
- i++;
- switch(ibuf[i]) {
- case 'E':
- obuf[j] = ESC;
- i++;
- break;
- case 'n':
- obuf[j] = LF;
- i++;
- break;
- case 'r':
- obuf[j] = CR;
- i++;
- break;
- case 'b':
- obuf[j] = BS;
- i++;
- break;
- case 't':
- obuf[j] = TAB;
- i++;
- break;
- case '0':
- case '1':
- case '2':
- case '3':
- case '4':
- case '5':
- case '6':
- case '7':
- case '8':
- case '9':
- n = 0;
- k = 0;
- while (k < 3 && ibuf[i] && is_digit(ibuf[i])) {
- n = (8 * n) + (ibuf[i] - '0');
- i++;
- k++;
- }
- obuf[j] = (char) n;
- break;
- default:
- obuf[j] = ibuf[i];
- i++;
- }
- } else if (ibuf[i] == '^') {
- obuf[j] = ibuf[i+1] - 64;
- i += 2;
- } else {
- obuf[j] = ibuf[i++];
- }
- j++;
- }
- obuf[j] = 0;
- if (!(*tcstr = md_malloc(j + 1))) {
- clean_up("cannot alloc() memory");
- }
- (void) strcpy(*tcstr, obuf);
-}
-
-tc_gnum(ibuf, n)
-char *ibuf;
-int *n;
-{
- short i;
- int r = 0;
-
- i = 4;
-
- while (is_digit(ibuf[i])) {
- r = (r * 10) + (ibuf[i] - '0');
- i++;
- }
- *n = r;
-}
-
-tstp()
-{
- endwin();
- md_tstp();
-
- start_window();
- printf("%s%s", TI, VS);
- wrefresh(curscr);
- md_slurp();
-}
-
-tc_cmget()
-{
- short i = 0, j = 0, rc_spec = 0;
-
- while (CM[i] && (CM[i] != '%') && (j < 15)) {
- cm_esc[j++] = CM[i++];
- }
- cm_esc[j] = 0;
-
- while (CM[i] && (rc_spec < 2)) {
- if (CM[i] == '%') {
- i++;
- switch(CM[i]) {
- case 'd':
- rc_spec++;
- break;
- case 'i':
- cm_inc = 1;
- break;
- case '2':
- cm_two = 1;
- rc_spec++;
- break;
- case '3':
- cm_three = 1;
- rc_spec++;
- break;
- case '.':
- cm_char = 1;
- rc_spec++;
- break;
- case 'r':
- cm_reverse = 1;
- break;
- case '+':
- i++;
- cm_inc = CM[i];
- cm_char = 1;
- rc_spec++;
- break;
- }
- i++;
- } else {
- j = 0;
- while (CM[i] && (CM[i] != '%')) {
- cm_sep[j++] = CM[i++];
- }
- cm_sep[j] = 0;
- }
- }
-
- j = 0;
- if (rc_spec == 2) {
- while (CM[i] && (j < 15)) {
- cm_end[j++] = CM[i++];
- }
- }
- cm_end[j] = 0;
-}
-
-#endif /* CURSES */
-/* $NetBSD: machdep.c,v 1.10 1999/09/12 09:02:23 jsm Exp $ */
+/* $NetBSD: machdep.c,v 1.11 1999/09/13 17:14:08 jsm Exp $ */
/*
* Copyright (c) 1988, 1993
#if 0
static char sccsid[] = "@(#)machdep.c 8.1 (Berkeley) 5/31/93";
#else
-__RCSID("$NetBSD: machdep.c,v 1.10 1999/09/12 09:02:23 jsm Exp $");
+__RCSID("$NetBSD: machdep.c,v 1.11 1999/09/13 17:14:08 jsm Exp $");
#endif
#endif /* not lint */
* values are strings, and each string is identified by a name. The names
* of the values needed, and their use, is as follows:
*
- * TERMCAP
- * The name of the users's termcap file, NOT the termcap entries
- * themselves. This is used ONLY if the program is compiled with
- * CURSES defined (-DCURSES). Even in this case, the program need
- * not find a string for TERMCAP. If it does not, it will use the
- * default termcap file as returned by md_gdtcf();
- * TERM
- * The name of the users's terminal. This is used ONLY if the program
- * is compiled with CURSES defined (-DCURSES). In this case, the string
- * value for TERM must be found, or the routines in curses.c cannot
- * function, and the program will quit.
* ROGUEOPTS
* A string containing the various game options. This need not be
* defined.
*
* If your system does not provide a means of searching for these values,
* you will have to do it yourself. None of the values above really need
- * to be defined except TERM when the program is compiled with CURSES
- * defined. In this case, as a bare minimum, you can check the 'name'
- * parameter, and if it is "TERM" find the terminal name and return that,
- * else return zero. If the program is not compiled with CURSES, you can
- * get by with simply always returning zero. Returning zero indicates
- * that their is no defined value for the given string.
+ * to be defined; you can get by with simply always returning zero.
+ * Returning zero indicates that their is no defined value for the
+ * given string.
*/
char *
wait(&w);
}
-/* If you have a viable curses/termlib library, then use it and don't bother
- * implementing the routines below. And don't compile with -DCURSES.
- */
-
-#ifdef CURSES
-
-/* md_cbreak_no_echo_nonl:
- *
- * This routine sets up some terminal characteristics. The tty-driver
- * must be told to:
- * 1.) Not echo input.
- * 2.) Transmit input characters immediately upon typing. (cbreak mode)
- * 3.) Move the cursor down one line, without changing column, and
- * without generating a carriage-return, when it
- * sees a line-feed. This is only necessary if line-feed is ever
- * used in the termcap 'do' (cursor down) entry, in which case,
- * your system should must have a way of accomplishing this.
- *
- * When the parameter 'on' is true, the terminal is set up as specified
- * above. When this parameter is false, the terminal is restored to the
- * original state.
- *
- * Raw mode should not to be used. Keyboard signals/events/interrupts should
- * be sent, although they are not strictly necessary. See notes in
- * md_heed_signals().
- *
- * This function must be implemented for rogue to run properly if the
- * program is compiled with CURSES defined to use the enclosed curses
- * emulation package. If you are not using this, then this routine is
- * totally unnecessary.
- *
- * Notice that information is saved between calls. This is used to
- * restore the terminal to an initial saved state.
- *
- */
-
-void
-md_cbreak_no_echo_nonl(on)
- boolean on;
-{
- struct termios tty_buf;
- static struct termios tty_save;
-
- if (on) {
- tcgetattr(0, &tty_buf);
- tty_save = tty_buf;
- tty_buf.c_lflag &= ~(ICANON | ECHO);
- tty_buf.c_oflag &= ~ONLCR;
- tty_buf.c_cc[VMIN] = 1;
- tty_buf.c_cc[VTIME] = 2;
- tcsetattr(0, TCSADRAIN, &tty_buf);
- } else {
- tcsetattr(0, TCSADRAIN, &tty_save);
- }
-}
-
-/* md_gdtcf(): (Get Default Termcap File)
- *
- * This function is called ONLY when the program is compiled with CURSES
- * defined. If you use your system's curses/termlib library, this function
- * won't be called. On most UNIX systems, "/etc/termcap" suffices.
- *
- * If their is no such termcap file, then return 0, but in that case, you
- * must have a TERMCAP file returned from md_getenv("TERMCAP"). The latter
- * will override the value returned from md_gdtcf(). If the program is
- * compiled with CURSES defined, and md_gdtcf() returns 0, and
- * md_getenv("TERMCAP") returns 0, the program will have no terminal
- * capability information and will quit.
- */
-
-char *
-md_gdtcf()
-{
- return("/etc/termcap");
-}
-
-/* md_tstp():
- *
- * This function puts the game to sleep and returns to the shell. This
- * only applies to UNIX 4.2 and 4.3. For other systems, the routine should
- * be provided as a do-nothing routine. md_tstp() will only be referenced
- * in the code when compiled with CURSES defined.
- *
- */
-
-void
-md_tstp()
-{
-#ifdef UNIX_BSD4_2
- kill(0, SIGTSTP);
-#endif
-}
-
-#endif
-
#endif
git.ckatri.com / bsdgames-darwin.git / commitdiff