nethack-gwaa-kiwi/nethack
1
0
Fork 0
Code Pull Requests Activity
Files
23a671147f6aba3f4e00a04e73f71d8121dc128c
nethack/sys/share/unixtty.c
Sean Hunt 11d11c5de3 Make LOADSYMSETS unconditional. 
There are some bugs here, but this functionality should make it into the release
in some form.
2015-03-17 18:46:39 +02:00

453 lines
10 KiB
C
Raw Blame History

/* NetHack 3.5 unixtty.c $NHDT-Date$ $NHDT-Branch$:$NHDT-Revision$ */
/* NetHack 3.5 unixtty.c $Date: 2012/01/23 07:11:09 $ $Revision: 1.10 $ */
/* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
/* NetHack may be freely redistributed. See license for details. */
/* tty.c - (Unix) version */
/* With thanks to the people who sent code for SYSV - hpscdi!jon,
* arnold@ucsf-cgl, wcs@bo95b, cbcephus!pds and others.
*/
#define NEED_VARARGS
#include "hack.h"
/*
* The distinctions here are not BSD - rest but rather USG - rest, as
* BSD still has the old sgttyb structure, but SYSV has termio. Thus:
*/
#if (defined(BSD) || defined(ULTRIX)) && !defined(POSIX_TYPES)
# define V7
#else
# define USG
#endif
#ifdef USG
# ifdef POSIX_TYPES
# include <termios.h>
# include <unistd.h>
# define termstruct termios
# else
# include <termio.h>
# if defined(TCSETS) && !defined(AIX_31)
# define termstruct termios
# else
# define termstruct termio
# endif
# endif /* POSIX_TYPES */
# ifdef LINUX
# include <sys/ioctl.h>
# undef delay_output /* curses redefines this */
# include <curses.h>
# endif
# define kill_sym c_cc[VKILL]
# define erase_sym c_cc[VERASE]
# define intr_sym c_cc[VINTR]
# ifdef TAB3 /* not a POSIX flag, but some have it anyway */
# define EXTABS TAB3
# else
# define EXTABS 0
# endif
# define tabflgs c_oflag
# define echoflgs c_lflag
# define cbrkflgs c_lflag
# define CBRKMASK ICANON
# define CBRKON ! /* reverse condition */
# ifdef POSIX_TYPES
# define OSPEED(x) (speednum(cfgetospeed(&x)))
# else
# ifndef CBAUD
# define CBAUD _CBAUD /* for POSIX nitpickers (like RS/6000 cc) */
# endif
# define OSPEED(x) ((x).c_cflag & CBAUD)
# endif
# define IS_7BIT(x) ((x).c_cflag & CS7)
# define inputflags c_iflag
# define STRIPHI ISTRIP
# ifdef POSIX_TYPES
# define GTTY(x) (tcgetattr(0, x))
# define STTY(x) (tcsetattr(0, TCSADRAIN, x))
# else
# if defined(TCSETS) && !defined(AIX_31)
# define GTTY(x) (ioctl(0, TCGETS, x))
# define STTY(x) (ioctl(0, TCSETSW, x))
# else
# define GTTY(x) (ioctl(0, TCGETA, x))
# define STTY(x) (ioctl(0, TCSETAW, x))
# endif
# endif /* POSIX_TYPES */
# define GTTY2(x) 1
# define STTY2(x) 1
# ifdef POSIX_TYPES
# if defined(BSD) && !defined(__DGUX__)
# define nonesuch _POSIX_VDISABLE
# else
# define nonesuch (fpathconf(0, _PC_VDISABLE))
# endif
# else
# define nonesuch 0
# endif
# define inittyb2 inittyb
# define curttyb2 curttyb
#else /* V7 */
# include <sgtty.h>
# define termstruct sgttyb
# define kill_sym sg_kill
# define erase_sym sg_erase
# define intr_sym t_intrc
# define EXTABS XTABS
# define tabflgs sg_flags
# define echoflgs sg_flags
# define cbrkflgs sg_flags
# define CBRKMASK CBREAK
# define CBRKON /* empty */
# define inputflags sg_flags /* don't know how enabling meta bits */
# define IS_7BIT(x) (FALSE)
# define STRIPHI 0 /* should actually be done on BSD */
# define OSPEED(x) (x).sg_ospeed
# if defined(bsdi) || defined(__386BSD) || defined(SUNOS4)
# define GTTY(x) (ioctl(0, TIOCGETP, (char *)x))
# define STTY(x) (ioctl(0, TIOCSETP, (char *)x))
# else
# define GTTY(x) (gtty(0, x))
# define STTY(x) (stty(0, x))
# endif
# define GTTY2(x) (ioctl(0, TIOCGETC, (char *)x))
# define STTY2(x) (ioctl(0, TIOCSETC, (char *)x))
# define nonesuch -1
struct tchars inittyb2, curttyb2;
#endif /* V7 */
#if defined(TTY_GRAPHICS) && ((!defined(SYSV) && !defined(HPUX)) || defined(UNIXPC) || defined(SVR4))
# ifndef LINT
extern /* it is defined in libtermlib (libtermcap) */
# endif
short ospeed; /* terminal baudrate; set by gettty */
#else
short ospeed = 0; /* gets around "not defined" error message */
#endif
#if defined(POSIX_TYPES) && defined(BSD)
unsigned
#endif
char erase_char, intr_char, kill_char;
static boolean settty_needed = FALSE;
struct termstruct inittyb, curttyb;
#ifdef POSIX_TYPES
static int
speednum(speed)
speed_t speed;
{
switch (speed) {
case B0: return 0;
case B50: return 1;
case B75: return 2;
case B110: return 3;
case B134: return 4;
case B150: return 5;
case B200: return 6;
case B300: return 7;
case B600: return 8;
case B1200: return 9;
case B1800: return 10;
case B2400: return 11;
case B4800: return 12;
case B9600: return 13;
case B19200: return 14;
case B38400: return 15;
}
return 0;
}
#endif
static void
setctty()
{
if(STTY(&curttyb) < 0 || STTY2(&curttyb2) < 0)
perror("NetHack (setctty)");
}
/*
* Get initial state of terminal, set ospeed (for termcap routines)
* and switch off tab expansion if necessary.
* Called by startup() in termcap.c and after returning from ! or ^Z
*/
void
gettty()
{
if(GTTY(&inittyb) < 0 || GTTY2(&inittyb2) < 0)
perror("NetHack (gettty)");
curttyb = inittyb;
curttyb2 = inittyb2;
ospeed = OSPEED(inittyb);
erase_char = inittyb.erase_sym;
kill_char = inittyb.kill_sym;
intr_char = inittyb2.intr_sym;
getioctls();
/* do not expand tabs - they might be needed inside a cm sequence */
if(curttyb.tabflgs & EXTABS) {
curttyb.tabflgs &= ~EXTABS;
setctty();
}
settty_needed = TRUE;
}
/* reset terminal to original state */
void
settty(s)
const char *s;
{
end_screen();
if(s) raw_print(s);
if(STTY(&inittyb) < 0 || STTY2(&inittyb2) < 0)
perror("NetHack (settty)");
iflags.echo = (inittyb.echoflgs & ECHO) ? ON : OFF;
iflags.cbreak = (CBRKON(inittyb.cbrkflgs & CBRKMASK)) ? ON : OFF;
curttyb.inputflags |= STRIPHI;
setioctls();
}
void
setftty()
{
unsigned ef, cf;
int change = 0;
ef = 0; /* desired value of flags & ECHO */
cf = CBRKON(CBRKMASK); /* desired value of flags & CBREAK */
iflags.cbreak = ON;
iflags.echo = OFF;
/* Should use (ECHO|CRMOD) here instead of ECHO */
if ((unsigned)(curttyb.echoflgs & ECHO) != ef) {
curttyb.echoflgs &= ~ECHO;
/* curttyb.echoflgs |= ef; */
change++;
}
if ((unsigned)(curttyb.cbrkflgs & CBRKMASK) != cf) {
curttyb.cbrkflgs &= ~CBRKMASK;
curttyb.cbrkflgs |= cf;
#ifdef USG
/* be satisfied with one character; no timeout */
curttyb.c_cc[VMIN] = 1; /* was VEOF */
curttyb.c_cc[VTIME] = 0; /* was VEOL */
# ifdef POSIX_JOB_CONTROL
/* turn off system suspend character
* due to differences in structure layout, this has to be
* here instead of in ioctl.c:getioctls() with the BSD
* equivalent
*/
# ifdef VSUSP /* real POSIX */
curttyb.c_cc[VSUSP] = nonesuch;
# else /* other later SYSV */
curttyb.c_cc[VSWTCH] = nonesuch;
# endif
# endif
# ifdef VDSUSP /* SunOS Posix extensions */
curttyb.c_cc[VDSUSP] = nonesuch;
# endif
# ifdef VREPRINT
curttyb.c_cc[VREPRINT] = nonesuch;
# endif
# ifdef VDISCARD
curttyb.c_cc[VDISCARD] = nonesuch;
# endif
# ifdef VWERASE
curttyb.c_cc[VWERASE] = nonesuch;
# endif
# ifdef VLNEXT
curttyb.c_cc[VLNEXT] = nonesuch;
# endif
#endif
change++;
}
if(!IS_7BIT(inittyb)) curttyb.inputflags &=~ STRIPHI;
/* If an interrupt character is used, it will be overriden and
* set to ^C.
*/
if(intr_char != nonesuch && curttyb2.intr_sym != '\003') {
curttyb2.intr_sym = '\003';
change++;
}
if(change) setctty();
start_screen();
}
void
intron() /* enable kbd interupts if enabled when game started */
{
#ifdef TTY_GRAPHICS
/* Ugly hack to keep from changing tty modes for non-tty games -dlc */
if (!strcmp(windowprocs.name, "tty") &&
intr_char != nonesuch && curttyb2.intr_sym != '\003') {
curttyb2.intr_sym = '\003';
setctty();
}
#endif
}
void
introff() /* disable kbd interrupts if required*/
{
#ifdef TTY_GRAPHICS
/* Ugly hack to keep from changing tty modes for non-tty games -dlc */
if (!strcmp(windowprocs.name, "tty") &&
curttyb2.intr_sym != nonesuch) {
curttyb2.intr_sym = nonesuch;
setctty();
}
#endif
}
#ifdef _M_UNIX /* SCO UNIX (3.2.4), from Andreas Arens */
# include <sys/console.h>
# define BSIZE (E_TABSZ*2)
# define LDIOC ('D'<<8) /* POSIX prevents definition */
# include <sys/emap.h>
int sco_flag_console = 0;
int sco_map_valid = -1;
unsigned char sco_chanmap_buf[BSIZE];
void NDECL(sco_mapon);
void NDECL(sco_mapoff);
void NDECL(check_sco_console);
void NDECL(init_sco_cons);
void
sco_mapon()
{
# ifdef TTY_GRAPHICS
if (!strcmp(windowprocs.name, "tty") && sco_flag_console) {
if (sco_map_valid != -1) {
ioctl(0,LDSMAP,sco_chanmap_buf);
}
sco_map_valid = -1;
}
# endif
}
void
sco_mapoff()
{
# ifdef TTY_GRAPHICS
if (!strcmp(windowprocs.name, "tty") && sco_flag_console) {
sco_map_valid = ioctl(0,LDGMAP,sco_chanmap_buf);
if (sco_map_valid != -1) {
ioctl(0,LDNMAP,(char *)0);
}
}
# endif
}
void
check_sco_console()
{
if (isatty(0) && ioctl(0,CONS_GET,0) != -1) {
sco_flag_console = 1;
}
}
void
init_sco_cons()
{
# ifdef TTY_GRAPHICS
if (!strcmp(windowprocs.name, "tty") && sco_flag_console) {
atexit(sco_mapon);
sco_mapoff();
load_symset("IBMGraphics", PRIMARY);
load_symset("RogueIBM", ROGUESET);
switch_symbols(TRUE);
# ifdef TEXTCOLOR
if (has_colors())
iflags.use_color = TRUE;
# endif
}
# endif
}
#endif /* _M_UNIX */
#ifdef __linux__ /* via Jesse Thilo and Ben Gertzfield */
# include <sys/vt.h>
# include <sys/ioctl.h>
int linux_flag_console = 0;
void NDECL(linux_mapon);
void NDECL(linux_mapoff);
void NDECL(check_linux_console);
void NDECL(init_linux_cons);
void
linux_mapon()
{
# ifdef TTY_GRAPHICS
if (!strcmp(windowprocs.name, "tty") && linux_flag_console) {
write(1, "\033(B", 3);
}
# endif
}
void
linux_mapoff()
{
# ifdef TTY_GRAPHICS
if (!strcmp(windowprocs.name, "tty") && linux_flag_console) {
write(1, "\033(U", 3);
}
# endif
}
void
check_linux_console()
{
struct vt_mode vtm;
if (isatty(0) && ioctl(0,VT_GETMODE,&vtm) >= 0) {
linux_flag_console = 1;
}
}
void
init_linux_cons()
{
# ifdef TTY_GRAPHICS
if (!strcmp(windowprocs.name, "tty") && linux_flag_console) {
atexit(linux_mapon);
linux_mapoff();
# ifdef TEXTCOLOR
if (has_colors())
iflags.use_color = TRUE;
# endif
}
# endif
}
#endif /* __linux__ */
#ifndef __begui__ /* the Be GUI will define its own error proc */
/* fatal error */
/*VARARGS1*/
void
error VA_DECL(const char *,s)
VA_START(s);
VA_INIT(s, const char *);
if(settty_needed)
settty((char *)0);
Vprintf(s,VA_ARGS);
(void) putchar('\n');
VA_END();
exit(EXIT_FAILURE);
}
#endif /* !__begui__ */
View Git Blame Copy Permalink