/* * sysdep2.c	System dependant routines * *		getrowcols	- get number of columns and rows. *		setcbreak	- set tty mode to raw, cbreak or normal. *		enab_sig	- enable / disable tty driver signals. *		strtok		- for systems that don't have it. *		dup2		- for ancient systems like SVR2. * *		This file is part of the minicom communications package, *		Copyright 1991-1995 Miquel van Smoorenburg. * *		This program 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 *		2 of the License, or (at your option) any later version. */#ifdef HAVE_CONFIG_H#include <config.h>#endif#include "rcsid.h"RCSID("$Id: sysdep2.c,v 1.3 2000/06/24 16:01:29 walker Exp $")#include "sysdep.h"#ifdef POSIX_TERMIOSstatic struct termios savetty;#elsestatic struct sgttyb savetty;static struct tchars savetty2;#endif/* Get the number of rows and columns for this screen. */void getrowcols(rows, cols)int *rows;int *cols;{	char *p, *getenv();#ifdef TIOCGWINSZ	struct winsize ws;	if (ioctl(0, TIOCGWINSZ, &ws) >= 0) {		*rows = ws.ws_row;		*cols = ws.ws_col;	}	#else#  ifdef TIOCGSIZE	struct ttysize ws;	if (ioctl(0, TIOCGSIZE, &ws) >= 0) {		*rows = ws.ts_lines;		*cols = ws.ts_cols;	}#  endif#endif	/* An extra check here because eg. SCO does have TIOCGWINSZ	 * defined but the support is not in the kernel (ioctl	 * returns -1. Yeah :-(	 */	if (*rows == 0 && (p = getenv("LINES")) != NULL)		*rows = atoi(p);	if (*cols == 0 && (p = getenv("COLUMNS")) != NULL)		*cols = atoi(p);}/* * Set cbreak mode. * Mode 0 = normal. * Mode 1 = cbreak, no echo * Mode 2 = raw, no echo. * Mode 3 = only return erasechar (for wkeys.c) * * Returns: the current erase character. */  int setcbreak(mode)int mode;{#ifdef POSIX_TERMIOS  struct termios tty;  static int init = 0;  static int erasechar;#ifdef _HPUX_SOURCE  static int lastmode = -1;#endif#ifndef XCASE#  ifdef _XCASE#    define XCASE _XCASE#  else#    define XCASE 0#  endif#endif  if (init == 0) {	tcgetattr(0, &savetty);	erasechar = savetty.c_cc[VERASE];	init++;  }  if (mode == 3) return(erasechar);#ifdef _HPUX_SOURCE  /* In HP/UX, TCSADRAIN does not work for me. So we use only RAW   * or NORMAL mode, so we never have to switch from cbreak <--> raw   */  if (mode == 1) mode = 2;#endif  /* Avoid overhead */#ifdef _HPUX_SOURCE  if (mode == lastmode) return(erasechar);  lastmode = mode;#endif  /* Always return to default settings first */  tcsetattr(0, TCSADRAIN, &savetty);  if (mode == 0) {  	return(erasechar);  }  tcgetattr(0, &tty);  if (mode == 1) {	tty.c_oflag &= ~OPOST;	tty.c_lflag &= ~(XCASE|ECHONL|NOFLSH);  	tty.c_lflag &= ~(ICANON | ISIG | ECHO);	tty.c_iflag &= ~(ICRNL|INLCR);  	tty.c_cflag |= CREAD;  	tty.c_cc[VTIME] = 5;  	tty.c_cc[VMIN] = 1;  }  if (mode == 2) { /* raw */  	tty.c_iflag &= ~(IGNBRK | IGNCR | INLCR | ICRNL | IUCLC |   		IXANY | IXON | IXOFF | INPCK | ISTRIP);  	tty.c_iflag |= (BRKINT | IGNPAR);	tty.c_oflag &= ~OPOST;	tty.c_lflag &= ~(XCASE|ECHONL|NOFLSH);  	tty.c_lflag &= ~(ICANON | ISIG | ECHO);  	tty.c_cflag |= CREAD;  	tty.c_cc[VTIME] = 5;  	tty.c_cc[VMIN] = 1;  }	  tcsetattr(0, TCSADRAIN, &tty);  return(erasechar);#else  struct sgttyb args;  static int init = 0;  static int erasechar;#ifdef _BSD43    static struct ltchars ltchars;#endif    if (init == 0) {	(void) ioctl(0, TIOCGETP, &savetty);	(void) ioctl(0, TIOCGETC, &savetty2);#ifdef _BSD43	(void) ioctl(0, TIOCGLTC, &ltchars);#endif	erasechar = savetty.sg_erase;	init++;  }  if (mode == 3) return(erasechar);  if (mode == 0) {  	(void) ioctl(0, TIOCSETP, &savetty);	(void) ioctl(0, TIOCSETC, &savetty2);#ifdef _BSD43	(void) ioctl(0, TIOCSLTC, &ltchars);#endif  	return(erasechar);  }  (void) ioctl(0, TIOCGETP, &args);  if (mode == 1) {	args.sg_flags |= CBREAK;	args.sg_flags &= ~(ECHO|RAW);  }  if (mode == 2) {  	args.sg_flags |= RAW;  	args.sg_flags &= ~(ECHO|CBREAK);  }  (void) ioctl(0, TIOCSETP, &args);  return(erasechar);#endif}/* Enable / disable signals from tty driver */void enab_sig(onoff, intchar)int onoff;int intchar;{#ifdef POSIX_TERMIOS  struct termios tty;    (void) tcgetattr(0, &tty);  if (onoff)	tty.c_lflag |= ISIG;  else	tty.c_lflag &= ~ISIG;  /* Set interrupt etc. characters: Zmodem support. */  if (onoff && intchar) {	tty.c_cc[VINTR] = intchar;	tty.c_cc[VQUIT] = -1;#ifdef VSUSP	tty.c_cc[VSUSP] = -1;#endif  }  (void) tcsetattr(0, TCSADRAIN, &tty);#endif#ifdef _V7  struct tchars tch;  struct sgttyb sg;  (void) ioctl(0, TIOCGETP, &sg);  (void) ioctl(0, TIOCGETC, &tch);  if (onoff) {	sg.sg_flags &= ~RAW;	sg.sg_flags |= CBREAK;  } else {	sg.sg_flags &= ~CBREAK;	sg.sg_flags |= RAW;  }  if (onoff && intchar) {	tch.t_intrc = intchar;	tch.t_quitc = -1;  }  (void) ioctl(0, TIOCSETP, &sg);  (void) ioctl(0, TIOCSETC, &tch);#endif}#ifdef _SVR2/* Fake the dup2() system call */int dup2(from, to)int from, to;{  int files[20];  int n, f, exstat = -1;  extern int errno;  /* Ignore if the same */  if (from == to) return(to);  /* Initialize file descriptor table */  for(f = 0; f < 20; f++) files[f] = 0;  /* Close "to" file descriptor, if open */  close(to);  /* Keep opening files until we reach "to" */  while((n = open("/dev/null", 0)) < to && n >= 0) {  	if (n == from) break;  	files[n] = 1;  }  if (n == to) {  	/* Close "to" again, and perform dup() */  	close(n);  	exstat = dup(from);  } else {  	/* We failed. Set exit status and errno. */  	if (n > 0) close(n);  	exstat = -1;  	errno = EBADF;  }  /* Close all temporarily opened file descriptors */  for(f = 0; f < 20; f++) if (files[f]) close(f);  /* We're done. */  return(exstat);}#endif