OpenSolaris_b135/lib/libnsl/dial/line.c
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License (the "License").
* You may not use this file except in compliance with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2009 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/*
* This is a new line.c, which consists of line.c and culine.c
* merged together.
*/
#include "mt.h"
#include "uucp.h"
static const struct sg_spds {
int sp_val,
sp_name;
} spds[] = {
{ 50, B50},
{ 75, B75},
{ 110, B110},
{ 134, B134},
{ 150, B150},
{ 200, B200},
{ 300, B300},
{ 600, B600},
{1200, B1200},
{1800, B1800},
{2400, B2400},
{4800, B4800},
{9600, B9600},
#ifdef EXTA
{19200, EXTA},
#endif
#ifdef B19200
{19200, B19200},
#endif
#ifdef B38400
{38400, B38400},
#endif
{57600, B57600},
{76800, B76800},
{115200, B115200},
{153600, B153600},
{230400, B230400},
{307200, B307200},
{460800, B460800},
{921600, B921600},
{0, 0}
};
#define PACKSIZE 64
#define HEADERSIZE 6
#define SNDFILE 'S'
#define RCVFILE 'R'
#define RESET 'X'
static int Saved_line; /* was savline() successful? */
static int Saved_termios; /* was termios saved? */
static int
Oddflag, /* Default is no parity */
Evenflag, /* Default is no parity */
Duplex = 1, /* Default is full duplex */
Terminal, /* Default is no terminal */
line_8bit = -1; /* Default is same as terminal */
static const char P_PARITY[] = "Parity option error\r\n";
static struct termio Savettyb;
static struct termios Savettybs;
/*
* set speed/echo/mode...
* tty -> terminal name
* spwant -> speed
* type -> type
*
* if spwant == 0, speed is untouched
* type is unused, but needed for compatibility
*
* return:
* none
*/
/*ARGSUSED*/
static void
fixline(int tty, int spwant, int type)
{
register const struct sg_spds *ps;
struct termio ttbuf;
struct termios ttbufs;
int speed = -1;
int i, istermios, ospeed;
DEBUG(6, "fixline(%d, ", tty);
DEBUG(6, "%d)\n", spwant);
if ((istermios = (*Ioctl)(tty, TCGETS, &ttbufs)) < 0) {
if ((*Ioctl)(tty, TCGETA, &ttbuf) != 0)
return;
ttbufs.c_lflag = ttbuf.c_lflag;
ttbufs.c_oflag = ttbuf.c_oflag;
ttbufs.c_iflag = ttbuf.c_iflag;
ttbufs.c_cflag = ttbuf.c_cflag;
for (i = 0; i < NCC; i++)
ttbufs.c_cc[i] = ttbuf.c_cc[i];
}
if (spwant > 0) {
for (ps = spds; ps->sp_val; ps++)
if (ps->sp_val == spwant) {
speed = ps->sp_name;
break;
}
if (speed < 0) {
/*EMPTY*/
DEBUG(5, "speed (%d) not supported\n", spwant);
}
ASSERT(speed >= 0, "BAD SPEED", "", spwant);
ttbufs.c_cflag &= 0xffff0000;
(void) cfsetospeed(&ttbufs, speed);
} else { /* determine the current speed setting */
ospeed = cfgetospeed(&ttbufs);
ttbufs.c_cflag &= 0xffff0000;
(void) cfsetospeed(&ttbufs, ospeed);
for (ps = spds; ps->sp_val; ps++)
if (ps->sp_name == ospeed) {
spwant = ps->sp_val;
break;
}
}
ttbufs.c_iflag &= 0xffff0000;
ttbufs.c_oflag &= 0xffff0000;
ttbufs.c_lflag &= 0xffff0000;
ttbufs.c_cflag &= ~CLOCAL;
if (EQUALS(Progname, "cu")) {
/* set attributes associated with -h, -t, -e, and -o options */
ttbufs.c_iflag = (IGNPAR | IGNBRK | IXON | IXOFF);
if (line_8bit) {
ttbufs.c_cflag |= CS8;
ttbufs.c_iflag &= ~ISTRIP;
} else {
ttbufs.c_cflag |= CS7;
ttbufs.c_iflag |= ISTRIP;
}
ttbufs.c_cc[VEOF] = '\1';
ttbufs.c_cflag |= (CREAD | (speed ? HUPCL : 0));
if (Evenflag) { /* even parity -e */
if (ttbufs.c_cflag & PARENB) {
VERBOSE(P_PARITY, 0);
exit(1);
}
ttbufs.c_cflag |= PARENB;
} else if (Oddflag) { /* odd parity -o */
if (ttbufs.c_cflag & PARENB) {
VERBOSE(P_PARITY, 0);
exit(1);
}
ttbufs.c_cflag |= PARODD;
ttbufs.c_cflag |= PARENB;
}
if (!Duplex) /* half duplex -h */
ttbufs.c_iflag &= ~(IXON | IXOFF);
if (Terminal) /* -t */
ttbufs.c_oflag |= (OPOST | ONLCR);
} else { /* non-cu */
ttbufs.c_cflag |= (CS8 | CREAD | (speed ? HUPCL : 0));
ttbufs.c_cc[VMIN] = HEADERSIZE;
ttbufs.c_cc[VTIME] = 1;
}
if (istermios < 0) {
ttbuf.c_lflag = ttbufs.c_lflag;
ttbuf.c_oflag = ttbufs.c_oflag;
ttbuf.c_iflag = ttbufs.c_iflag;
ttbuf.c_cflag = ttbufs.c_cflag;
for (i = 0; i < NCC; i++)
ttbuf.c_cc[i] = ttbufs.c_cc[i];
ASSERT((*Ioctl)(tty, TCSETAW, &ttbuf) >= 0,
"RETURN FROM fixline ioctl", "", errno);
} else {
ASSERT((*Ioctl)(tty, TCSETSW, &ttbufs) >= 0,
"RETURN FROM fixline ioctl", "", errno);
}
}
static void
sethup(int dcf)
{
struct termio ttbuf;
if ((*Ioctl)(dcf, TCGETA, &ttbuf) != 0)
return;
if (!(ttbuf.c_cflag & HUPCL)) {
ttbuf.c_cflag |= HUPCL;
(void) (*Ioctl)(dcf, TCSETAW, &ttbuf);
}
}
static void
ttygenbrk(int fn)
{
if (isatty(fn))
(void) (*Ioctl)(fn, TCSBRK, 0);
}
static int
savline(void)
{
if ((Saved_termios = (*Ioctl)(0, TCGETS, &Savettybs)) < 0) {
if ((*Ioctl)(0, TCGETA, &Savettyb) != 0) {
Saved_line = FALSE;
} else {
Saved_line = TRUE;
Savettyb.c_cflag = (Savettyb.c_cflag & ~CS8) | CS7;
Savettyb.c_oflag |= OPOST;
Savettyb.c_lflag |= (ISIG|ICANON|ECHO);
}
} else {
Saved_line = TRUE;
Savettybs.c_cflag = (Savettybs.c_cflag & ~CS8) | CS7;
Savettybs.c_oflag |= OPOST;
Savettybs.c_lflag |= (ISIG|ICANON|ECHO);
}
return (0);
}
static int
restline(void)
{
if (Saved_line == TRUE) {
if (Saved_termios < 0)
return ((*Ioctl)(0, TCSETAW, &Savettyb));
else
return ((*Ioctl)(0, TCSETSW, &Savettybs));
}
return (0);
}