[bpt/emacs.git] / src / systty.h

/* systty.h - System-dependent definitions for terminals.
   Copyright (C) 1992 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 1, or (at your option)
any later version.

GNU Emacs is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with GNU Emacs; see the file COPYING.  If not, write to
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */

#ifdef HAVE_TERMIOS
#define HAVE_TCATTR
#endif
\f
/* Include the proper files.  */
#ifdef HAVE_TERMIO
#include <termio.h>
#include <fcntl.h>
#else
#ifdef HAVE_TERMIOS
#include <termio.h>
#include <termios.h>
#include <fcntl.h>
#else /* neither HAVE_TERMIO nor HAVE_TERMIOS */
#ifndef VMS
#include <sgtty.h>
#else /* VMS */
#include <descrip.h>
static struct iosb
{
  short status;
  short offset;
  short termlen;
  short term;
} input_iosb;

extern int waiting_for_ast;
extern int stop_input;
#if 0 /* VAX C doeasn't understand initializing declarations */
extern int input_ef = 0;
extern int timer_ef = 0;
extern int process_ef = 0;
#else
extern int input_ef;
extern int timer_ef;
extern int process_ef;
#endif
extern int input_eflist;
extern int timer_eflist;

static $DESCRIPTOR (input_dsc, "TT");
static int terminator_mask[2] = { 0, 0 };

static struct sensemode {
  short status;
  unsigned char xmit_baud;
  unsigned char rcv_baud;
  unsigned char crfill;
  unsigned char lffill;
  unsigned char parity;
  unsigned char unused;
  char class;
  char type;
  short scr_wid;
  unsigned long tt_char : 24, scr_len : 8;
  unsigned long tt2_char;
} sensemode_iosb;
#endif /* VMS */
#endif /* not HAVE_TERMIOS */
#endif /* not HAVE_TERMIO */

#ifdef AIX
/* Get files for keyboard remapping */
#define HFNKEYS 2
#include <sys/hft.h>
#include <sys/devinfo.h>
#endif

/* Get rid of LLITOUT in 4.1, since it is said to stimulate kernel bugs.  */
#ifdef BSD4_1
#undef LLITOUT
#define LLITOUT 0
#endif /* 4.1 */

#ifdef NEED_BSDTTY
#include <sys/bsdtty.h>
#endif 

#if defined (HPUX) && defined (HAVE_PTYS)
#include <sys/ptyio.h>
#endif
  
#ifdef AIX
#include <sys/pty.h>
#include <unistd.h>
#endif /* AIX */

#ifdef SYSV_PTYS
#include <sys/tty.h>
#ifdef titan
#include <sys/ttyhw.h>
#include <sys/stream.h>
#endif
#include <sys/pty.h>
#endif

/* saka@pfu.fujitsu.co.JP writes:
   FASYNC defined in this file. But, FASYNC don't working.
   so no problem, because unrequest_sigio only need. */
#if defined (pfa)
#include <sys/file.h>
#endif

\f
/* Special cases - inhibiting the use of certain features.  */

#ifdef APOLLO
#undef TIOCSTART
#endif

#ifdef XENIX
#undef TIOCGETC  /* Avoid confusing some conditionals that test this.  */
#endif

#ifdef BROKEN_TIOCGETC
#undef TIOCGETC  /* Avoid confusing some conditionals that test this.  */
#endif

/* UNIPLUS systems may have FIONREAD.  */
#ifdef UNIPLUS
#include <sys.ioctl.h>
#endif

/* Allow m- file to inhibit use of FIONREAD.  */
#ifdef BROKEN_FIONREAD
#undef FIONREAD
#undef ASYNC
#endif

/* Interupt input is not used if there is no FIONREAD.  */
#ifndef FIONREAD
#undef SIGIO
#endif

\f
/* Try to establish the correct character to disable terminal functions
   in a system-independent manner.  Note that USG (at least) define
   _POSIX_VDISABLE as 0!  */

#ifdef _POSIX_VDISABLE
#define CDISABLE _POSIX_VDISABLE
#else /* not _POSIX_VDISABLE */
#ifdef CDEL
#define CDISABLE CDEL
#else /* not CDEL */
#define CDISABLE 255
#endif /* not CDEL */
#endif /* not _POSIX_VDISABLE */
\f
/* Get the number of characters queued for output.  */

/* EMACS_OUTQSIZE(FD, int *SIZE) stores the number of characters
   queued for output to the terminal FD in *SIZE, if FD is a tty.
   Returns -1 if there was an error (i.e. FD is not a tty), 0
   otherwise.  */
#ifdef TIOCOUTQ
#define EMACS_OUTQSIZE(fd, size) (ioctl ((fd), TIOCOUTQ, (size)))
#endif

#ifdef HAVE_TERMIO
#ifdef TCOUTQ
#undef EMACS_OUTQSIZE
#define EMACS_OUTQSIZE(fd, size) (ioctl ((fd), TCOUTQ, (size)))
#endif
#endif

\f
/* Manipulate a terminal's current process group.  */

/* EMACS_HAVE_TTY_PGRP is true if we can get and set the tty's current
   controlling process group.

   EMACS_GET_TTY_PGRP(int FD, int *PGID) sets *PGID the terminal FD's
   current process group.  Return -1 if there is an error.

   EMACS_SET_TTY_PGRP(int FD, int *PGID) sets the terminal FD's
   current process group to *PGID.  Return -1 if there is an error.  */

#ifdef HPUX
/* HPUX tty process group stuff doesn't work, says the anonymous voice
   from the past.  */
#else
#ifdef TIOCGPGRP
#define EMACS_HAVE_TTY_PGRP
#else
#ifdef HAVE_TERMIOS
#define EMACS_HAVE_TTY_PGRP
#endif
#endif
#endif

#ifdef EMACS_HAVE_TTY_PGRP

#ifdef HAVE_TERMIOS

#define EMACS_GET_TTY_PGRP(fd, pgid) (*(pgid) = tcgetpgrp ((fd)))
#define EMACS_SET_TTY_PGRP(fd, pgid) (*(pgid) = tcsetpgrp ((fd)))

#else
#ifdef TIOCSPGRP

#define EMACS_GET_TTY_PGRP(fd, pgid) (ioctl ((fd), TIOCGPGRP, (pgid)))
#define EMACS_SET_TTY_PGRP(fd, pgid) (ioctl ((fd), TIOCSPGRP, (pgid)))

#endif
#endif

#else

/* Just ignore this for now and hope for the best */
#define EMACS_GET_TTY_PGRP(fd, pgid) 0
#define EMACS_SET_TTY_PGRP(fd, pgif) 0

#endif

\f
/* Manipulate a TTY's input/output processing parameters.  */

/* struct emacs_tty is a structure used to hold the current tty
   parameters.  If the terminal has several structures describing its
   state, for example a struct tchars, a struct sgttyb, a struct
   tchars, a struct ltchars, and a struct pagechars, struct
   emacs_tty should contain an element for each parameter struct
   that Emacs may change.

   EMACS_GET_TTY (int FD, struct emacs_tty *P) stores the
   parameters of the tty on FD in *P.

   EMACS_SET_TTY (int FD, struct emacs_tty *P, int waitp)
   sets the parameters of the tty on FD according to the contents of
   *P.  If waitp is non-zero, we wait for all queued output to be
   written before making the change; otherwise, we forget any queued
   input and make the change immediately.

   EMACS_TTY_TABS_OK (struct emacs_tty *P) is false iff the kernel
   expands tabs to spaces upon output; in that case, there is no
   advantage to using tabs over spaces.  */


/* For each tty parameter structure that Emacs might want to save and restore,
   - include an element for it in this structure,
   - define a pair of numbered macros to get and set it and return 
     true iff the call succeeded,
   - give alternative definitions for when the component is not implemented
     which always succeed, and
   - extend the definition of EMACS_{GET,SET}_TTY_CHARS to include the
     new macros.  */

struct emacs_tty {

/* There is always one of the following elements, so there is no need
   for dummy get and set definitions.  */
#ifdef HAVE_TCATTR
  struct termios main;
#else
#ifdef HAVE_TERMIO
  struct termio main;
#else
#ifdef VMS
  struct sensemode main;
#else
  struct sgttyb main;
#endif
#endif
#endif
#ifdef TIOCGLTC
  struct ltchars ltchars;
#endif
#ifdef TIOCGETC
  struct tchars tchars;
  int lmode;
#endif
};
\f
/* Define EMACS_GET_TTY and EMACS_SET_TTY,
   the macros for reading and setting parts of `struct emacs_tty'.  */

#ifdef HAVE_TCATTR

#define EMACS_GET_TTY_1(fd, p) (tcgetattr ((fd), &(p)->main) != -1)
#define EMACS_SET_TTY_1(fd, p, waitp) \
  (tcsetattr ((fd), (waitp) ? TCSAFLUSH : TCSADRAIN, &(p)->main) != -1)

#else
#ifdef HAVE_TERMIO

#define EMACS_GET_TTY_1(fd, p) (ioctl ((fd), TCGETA, &(p)->main) != -1)
#define EMACS_SET_TTY_1(fd, p, waitp)			\
  (ioctl ((fd), (waitp) ? TCSETAW : TCSETAF, &(p)->main) != -1)

#else
#ifdef VMS

/* These definitions will really only work in sysdep.c, because of their
   use of input_iosb.  I don't know enough about VMS QIO to fix this.  */
#define EMACS_GET_TTY_1(fd, p)					\
  (1 & SYS$QIOW (0, (fd), IO$_SENSEMODE, (p), 0, 0,		\
	    &(p)->main.class, 12, 0, 0, 0, 0))
#define EMACS_SET_TTY_1(fd, p, waitp)				\
  (1 & SYS$QIOW (0, (fd), IO$_SETMODE, &input_iosb, 0, 0,	\
	    &(p)->main.class, 12, 0, 0, 0, 0))

#else

#define EMACS_GET_TTY_1(fd, p) (ioctl ((fd), TIOCGETP, &(p)->main) != -1)
#define EMACS_SET_TTY_1(fd, p, waitp)			\
  (ioctl ((fd), (waitp) ? TIOCSETP : TIOCSETN, &(p)->main) != -1)

#endif
#endif
#endif

#ifdef TIOCGLTC
#define EMACS_GET_TTY_2(fd, p)				\
  (ioctl ((fd), TIOCGLTC, &(p)->ltchars) != -1)
#define EMACS_SET_TTY_2(fd, p, waitp)			\
  (ioctl ((fd), TIOCSLTC, &(p)->ltchars) != -1)
#else
#define EMACS_GET_TTY_2(fd, p) 1
#define EMACS_SET_TTY_2(fd, p, waitp) 1
#endif /* TIOCGLTC */

#ifdef TIOCGETC
#define EMACS_GET_TTY_3(fd, p)				\
  (ioctl ((fd), TIOCGETC, &(p)->tchars) != -1		\
   && ioctl ((fd), TIOCLGET, &(p)->lmode) != -1)
#define EMACS_SET_TTY_3(fd, p, waitp)			\
  (ioctl ((fd), TIOCSETC, &(p)->tchars) != -1		\
   && ioctl ((fd), TIOCLSET, &(p)->lmode) != -1)
#else
#define EMACS_GET_TTY_3(fd, p) 1
#define EMACS_SET_TTY_3(fd, p, waitp) 1
#endif /* TIOCGLTC */

/* Define these to be a concatenation of all the EMACS_{GET,SET}_TTY_n
   macros.  */
#define EMACS_GET_TTY(fd, tc)	\
  (EMACS_GET_TTY_1 (fd, tc)	\
   && EMACS_GET_TTY_2 (fd, tc)	\
   && EMACS_GET_TTY_3 (fd, tc))

#define EMACS_SET_TTY(fd, tc, waitp)	\
  (EMACS_SET_TTY_1 (fd, tc, waitp)	\
   && EMACS_SET_TTY_2 (fd, tc, waitp)	\
   && EMACS_SET_TTY_3 (fd, tc, waitp))
\f
/* Define EMACS_TTY_TABS_OK.  */

#ifdef HAVE_TERMIOS

#define EMACS_TTY_TABS_OK(p) (((p)->main.c_oflag & TABDLY) != TAB3)

#else /* not def HAVE_TERMIOS */
#ifdef HAVE_TERMIO

#define EMACS_TTY_TABS_OK(p) (((p)->main.c_oflag & TABDLY) != TAB3)

#else /* neither HAVE_TERMIO nor HAVE_TERMIOS */
#ifdef VMS

#define EMACS_TTY_TABS_OK(p) (((p)->main.tt_char & TT$M_MECHTAB) != 0)

#else

#define EMACS_TTY_TABS_OK(p) (((p)->main.sg_flags & XTABS) != XTABS)

#endif /* not def VMS */
#endif /* not def HAVE_TERMIO */
#endif /* not def HAVE_TERMIOS */
Commit	Line	Data
a04c9535	1	/* systty.h - System-dependent definitions for terminals.
d0d6b7c5 JB	2	Copyright (C) 1992 Free Software Foundation, Inc.
	3
	4	This file is part of GNU Emacs.
	5
	6	GNU Emacs is free software; you can redistribute it and/or modify
	7	it under the terms of the GNU General Public License as published by
	8	the Free Software Foundation; either version 1, or (at your option)
	9	any later version.
	10
	11	GNU Emacs is distributed in the hope that it will be useful,
	12	but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	GNU General Public License for more details.
	15
	16	You should have received a copy of the GNU General Public License
	17	along with GNU Emacs; see the file COPYING. If not, write to
	18	the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
	19
2182d459 RS	20	#ifdef HAVE_TERMIOS
	21	#define HAVE_TCATTR
	22	#endif
d0d6b7c5 JB	23	\f
	24	/* Include the proper files. */
	25	#ifdef HAVE_TERMIO
	26	#include <termio.h>
	27	#include <fcntl.h>
	28	#else
	29	#ifdef HAVE_TERMIOS
	30	#include <termio.h>
	31	#include <termios.h>
1aaaff21	32	#include <fcntl.h>
d0d6b7c5 JB	33	#else /* neither HAVE_TERMIO nor HAVE_TERMIOS */
	34	#ifndef VMS
	35	#include <sgtty.h>
a04c9535 JB	36	#else /* VMS */
	37	#include <descrip.h>
	38	static struct iosb
	39	{
	40	short status;
	41	short offset;
	42	short termlen;
	43	short term;
	44	} input_iosb;
	45
	46	extern int waiting_for_ast;
	47	extern int stop_input;
210b2b4f	48	#if 0 /* VAX C doeasn't understand initializing declarations */
a04c9535 JB	49	extern int input_ef = 0;
	50	extern int timer_ef = 0;
	51	extern int process_ef = 0;
210b2b4f JB	52	#else
	53	extern int input_ef;
	54	extern int timer_ef;
	55	extern int process_ef;
	56	#endif
a04c9535 JB	57	extern int input_eflist;
	58	extern int timer_eflist;
	59
	60	static $DESCRIPTOR (input_dsc, "TT");
	61	static int terminator_mask[2] = { 0, 0 };
	62
	63	static struct sensemode {
	64	short status;
	65	unsigned char xmit_baud;
	66	unsigned char rcv_baud;
	67	unsigned char crfill;
	68	unsigned char lffill;
	69	unsigned char parity;
	70	unsigned char unused;
	71	char class;
	72	char type;
	73	short scr_wid;
	74	unsigned long tt_char : 24, scr_len : 8;
	75	unsigned long tt2_char;
	76	} sensemode_iosb;
	77	#endif /* VMS */
d0d6b7c5 JB	78	#endif /* not HAVE_TERMIOS */
	79	#endif /* not HAVE_TERMIO */
	80
4746118a JB	81	#ifdef AIX
	82	/* Get files for keyboard remapping */
	83	#define HFNKEYS 2
	84	#include <sys/hft.h>
	85	#include <sys/devinfo.h>
	86	#endif
	87
	88	/* Get rid of LLITOUT in 4.1, since it is said to stimulate kernel bugs. */
	89	#ifdef BSD4_1
	90	#undef LLITOUT
	91	#define LLITOUT 0
	92	#endif /* 4.1 */
	93
	94	#ifdef NEED_BSDTTY
	95	#include <sys/bsdtty.h>
	96	#endif
	97
	98	#if defined (HPUX) && defined (HAVE_PTYS)
	99	#include <sys/ptyio.h>
	100	#endif
	101
	102	#ifdef AIX
	103	#include <sys/pty.h>
	104	#include <unistd.h>
	105	#endif /* AIX */
	106
	107	#ifdef SYSV_PTYS
	108	#include <sys/tty.h>
ffd56f97 JB	109	#ifdef titan
	110	#include <sys/ttyhw.h>
	111	#include <sys/stream.h>
	112	#endif
4746118a JB	113	#include <sys/pty.h>
	114	#endif
	115
	116	/* saka@pfu.fujitsu.co.JP writes:
	117	FASYNC defined in this file. But, FASYNC don't working.
	118	so no problem, because unrequest_sigio only need. */
	119	#if defined (pfa)
	120	#include <sys/file.h>
	121	#endif
	122
d0d6b7c5 JB	123	\f
	124	/* Special cases - inhibiting the use of certain features. */
	125
	126	#ifdef APOLLO
	127	#undef TIOCSTART
	128	#endif
	129
ffd56f97 JB	130	#ifdef XENIX
	131	#undef TIOCGETC /* Avoid confusing some conditionals that test this. */
	132	#endif
	133
d0d6b7c5 JB	134	#ifdef BROKEN_TIOCGETC
	135	#undef TIOCGETC /* Avoid confusing some conditionals that test this. */
	136	#endif
	137
	138	/* UNIPLUS systems may have FIONREAD. */
	139	#ifdef UNIPLUS
	140	#include <sys.ioctl.h>
	141	#endif
	142
	143	/* Allow m- file to inhibit use of FIONREAD. */
	144	#ifdef BROKEN_FIONREAD
	145	#undef FIONREAD
	146	#undef ASYNC
	147	#endif
	148
	149	/* Interupt input is not used if there is no FIONREAD. */
	150	#ifndef FIONREAD
	151	#undef SIGIO
	152	#endif
	153
	154	\f
2102829e RS	155	/* Try to establish the correct character to disable terminal functions
	156	in a system-independent manner. Note that USG (at least) define
	157	_POSIX_VDISABLE as 0! */
	158
	159	#ifdef _POSIX_VDISABLE
	160	#define CDISABLE _POSIX_VDISABLE
	161	#else /* not _POSIX_VDISABLE */
	162	#ifdef CDEL
	163	#define CDISABLE CDEL
	164	#else /* not CDEL */
	165	#define CDISABLE 255
	166	#endif /* not CDEL */
	167	#endif /* not _POSIX_VDISABLE */
	168	\f
d0d6b7c5 JB	169	/* Get the number of characters queued for output. */
	170
	171	/* EMACS_OUTQSIZE(FD, int *SIZE) stores the number of characters
	172	queued for output to the terminal FD in *SIZE, if FD is a tty.
	173	Returns -1 if there was an error (i.e. FD is not a tty), 0
	174	otherwise. */
	175	#ifdef TIOCOUTQ
	176	#define EMACS_OUTQSIZE(fd, size) (ioctl ((fd), TIOCOUTQ, (size)))
	177	#endif
	178
	179	#ifdef HAVE_TERMIO
	180	#ifdef TCOUTQ
	181	#undef EMACS_OUTQSIZE
	182	#define EMACS_OUTQSIZE(fd, size) (ioctl ((fd), TCOUTQ, (size)))
	183	#endif
	184	#endif
	185
	186	\f
	187	/* Manipulate a terminal's current process group. */
	188
	189	/* EMACS_HAVE_TTY_PGRP is true if we can get and set the tty's current
	190	controlling process group.
	191
	192	EMACS_GET_TTY_PGRP(int FD, int PGID) sets PGID the terminal FD's
	193	current process group. Return -1 if there is an error.
	194
	195	EMACS_SET_TTY_PGRP(int FD, int *PGID) sets the terminal FD's
	196	current process group to PGID. Return -1 if there is an error. /
	197
ffd56f97 JB	198	#ifdef HPUX
	199	/* HPUX tty process group stuff doesn't work, says the anonymous voice
	200	from the past. */
	201	#else
d0d6b7c5 JB	202	#ifdef TIOCGPGRP
	203	#define EMACS_HAVE_TTY_PGRP
	204	#else
	205	#ifdef HAVE_TERMIOS
	206	#define EMACS_HAVE_TTY_PGRP
	207	#endif
	208	#endif
ffd56f97	209	#endif
d0d6b7c5 JB	210
	211	#ifdef EMACS_HAVE_TTY_PGRP
	212
	213	#ifdef HAVE_TERMIOS
	214
	215	#define EMACS_GET_TTY_PGRP(fd, pgid) (*(pgid) = tcgetpgrp ((fd)))
	216	#define EMACS_SET_TTY_PGRP(fd, pgid) (*(pgid) = tcsetpgrp ((fd)))
	217
	218	#else
	219	#ifdef TIOCSPGRP
	220
	221	#define EMACS_GET_TTY_PGRP(fd, pgid) (ioctl ((fd), TIOCGPGRP, (pgid)))
	222	#define EMACS_SET_TTY_PGRP(fd, pgid) (ioctl ((fd), TIOCSPGRP, (pgid)))
	223
	224	#endif
	225	#endif
	226
	227	#else
	228
	229	/* Just ignore this for now and hope for the best */
	230	#define EMACS_GET_TTY_PGRP(fd, pgid) 0
ef15f270	231	#define EMACS_SET_TTY_PGRP(fd, pgif) 0
d0d6b7c5 JB	232
	233	#endif
	234
	235	\f
	236	/* Manipulate a TTY's input/output processing parameters. */
	237
	238	/* struct emacs_tty is a structure used to hold the current tty
	239	parameters. If the terminal has several structures describing its
	240	state, for example a struct tchars, a struct sgttyb, a struct
	241	tchars, a struct ltchars, and a struct pagechars, struct
	242	emacs_tty should contain an element for each parameter struct
	243	that Emacs may change.
	244
	245	EMACS_GET_TTY (int FD, struct emacs_tty *P) stores the
	246	parameters of the tty on FD in *P.
	247
	248	EMACS_SET_TTY (int FD, struct emacs_tty *P, int waitp)
	249	sets the parameters of the tty on FD according to the contents of
	250	*P. If waitp is non-zero, we wait for all queued output to be
	251	written before making the change; otherwise, we forget any queued
	252	input and make the change immediately.
	253
	254	EMACS_TTY_TABS_OK (struct emacs_tty *P) is false iff the kernel
	255	expands tabs to spaces upon output; in that case, there is no
	256	advantage to using tabs over spaces. */
	257
	258
d0d6b7c5 JB	259	/* For each tty parameter structure that Emacs might want to save and restore,
	260	- include an element for it in this structure,
	261	- define a pair of numbered macros to get and set it and return
	262	true iff the call succeeded,
	263	- give alternative definitions for when the component is not implemented
	264	which always succeed, and
	265	- extend the definition of EMACS_{GET,SET}_TTY_CHARS to include the
	266	new macros. */
	267
	268	struct emacs_tty {
	269
	270	/* There is always one of the following elements, so there is no need
	271	for dummy get and set definitions. */
2182d459	272	#ifdef HAVE_TCATTR
d0d6b7c5 JB	273	struct termios main;
	274	#else
	275	#ifdef HAVE_TERMIO
	276	struct termio main;
	277	#else
	278	#ifdef VMS
	279	struct sensemode main;
	280	#else
	281	struct sgttyb main;
	282	#endif
	283	#endif
	284	#endif
2182d459 RS	285	#ifdef TIOCGLTC
	286	struct ltchars ltchars;
	287	#endif
	288	#ifdef TIOCGETC
	289	struct tchars tchars;
	290	int lmode;
d0d6b7c5	291	#endif
2182d459 RS	292	};
	293	\f
	294	/* Define EMACS_GET_TTY and EMACS_SET_TTY,
	295	the macros for reading and setting parts of `struct emacs_tty'. */
d0d6b7c5 JB	296
	297	#ifdef HAVE_TCATTR
	298
	299	#define EMACS_GET_TTY_1(fd, p) (tcgetattr ((fd), &(p)->main) != -1)
	300	#define EMACS_SET_TTY_1(fd, p, waitp) \
	301	(tcsetattr ((fd), (waitp) ? TCSAFLUSH : TCSADRAIN, &(p)->main) != -1)
	302
4746118a JB	303	#else
	304	#ifdef HAVE_TERMIO
	305
	306	#define EMACS_GET_TTY_1(fd, p) (ioctl ((fd), TCGETA, &(p)->main) != -1)
	307	#define EMACS_SET_TTY_1(fd, p, waitp) \
	308	(ioctl ((fd), (waitp) ? TCSETAW : TCSETAF, &(p)->main) != -1)
	309
d0d6b7c5 JB	310	#else
	311	#ifdef VMS
	312
	313	/* These definitions will really only work in sysdep.c, because of their
	314	use of input_iosb. I don't know enough about VMS QIO to fix this. */
a04c9535 JB	315	#define EMACS_GET_TTY_1(fd, p) \
	316	(1 & SYS$QIOW (0, (fd), IO$_SENSEMODE, (p), 0, 0, \
	317	&(p)->main.class, 12, 0, 0, 0, 0))
	318	#define EMACS_SET_TTY_1(fd, p, waitp) \
	319	(1 & SYS$QIOW (0, (fd), IO$_SETMODE, &input_iosb, 0, 0, \
	320	&(p)->main.class, 12, 0, 0, 0, 0))
d0d6b7c5 JB	321
	322	#else
	323
	324	#define EMACS_GET_TTY_1(fd, p) (ioctl ((fd), TIOCGETP, &(p)->main) != -1)
	325	#define EMACS_SET_TTY_1(fd, p, waitp) \
	326	(ioctl ((fd), (waitp) ? TIOCSETP : TIOCSETN, &(p)->main) != -1)
	327
	328	#endif
	329	#endif
4746118a	330	#endif
d0d6b7c5 JB	331
d0d6b7c5 JB	332	#ifdef TIOCGLTC
d0d6b7c5 JB	333	#define EMACS_GET_TTY_2(fd, p) \
	334	(ioctl ((fd), TIOCGLTC, &(p)->ltchars) != -1)
	335	#define EMACS_SET_TTY_2(fd, p, waitp) \
	336	(ioctl ((fd), TIOCSLTC, &(p)->ltchars) != -1)
	337	#else
	338	#define EMACS_GET_TTY_2(fd, p) 1
	339	#define EMACS_SET_TTY_2(fd, p, waitp) 1
	340	#endif /* TIOCGLTC */
	341
	342	#ifdef TIOCGETC
d0d6b7c5 JB	343	#define EMACS_GET_TTY_3(fd, p) \
	344	(ioctl ((fd), TIOCGETC, &(p)->tchars) != -1 \
	345	&& ioctl ((fd), TIOCLGET, &(p)->lmode) != -1)
	346	#define EMACS_SET_TTY_3(fd, p, waitp) \
	347	(ioctl ((fd), TIOCSETC, &(p)->tchars) != -1 \
	348	&& ioctl ((fd), TIOCLSET, &(p)->lmode) != -1)
	349	#else
	350	#define EMACS_GET_TTY_3(fd, p) 1
	351	#define EMACS_SET_TTY_3(fd, p, waitp) 1
	352	#endif /* TIOCGLTC */
	353
bd307392	354	/* Define these to be a concatenation of all the EMACS_{GET,SET}_TTY_n
d0d6b7c5 JB	355	macros. */
	356	#define EMACS_GET_TTY(fd, tc) \
	357	(EMACS_GET_TTY_1 (fd, tc) \
	358	&& EMACS_GET_TTY_2 (fd, tc) \
	359	&& EMACS_GET_TTY_3 (fd, tc))
	360
	361	#define EMACS_SET_TTY(fd, tc, waitp) \
	362	(EMACS_SET_TTY_1 (fd, tc, waitp) \
	363	&& EMACS_SET_TTY_2 (fd, tc, waitp) \
	364	&& EMACS_SET_TTY_3 (fd, tc, waitp))
2182d459 RS	365	\f
2182d459 RS	366	/* Define EMACS_TTY_TABS_OK. */
d0d6b7c5 JB	367
	368	#ifdef HAVE_TERMIOS
	369
	370	#define EMACS_TTY_TABS_OK(p) (((p)->main.c_oflag & TABDLY) != TAB3)
	371
	372	#else /* not def HAVE_TERMIOS */
	373	#ifdef HAVE_TERMIO
	374
	375	#define EMACS_TTY_TABS_OK(p) (((p)->main.c_oflag & TABDLY) != TAB3)
	376
	377	#else /* neither HAVE_TERMIO nor HAVE_TERMIOS */
	378	#ifdef VMS
	379
	380	#define EMACS_TTY_TABS_OK(p) (((p)->main.tt_char & TT$M_MECHTAB) != 0)
	381
	382	#else
	383
	384	#define EMACS_TTY_TABS_OK(p) (((p)->main.sg_flags & XTABS) != XTABS)
	385
	386	#endif /* not def VMS */
	387	#endif /* not def HAVE_TERMIO */
	388	#endif /* not def HAVE_TERMIOS */