a06e2ab395
import/switch of: init, getty, reboot, halt, shutdown, wall, last changes: . change reboot() call to netbsd prototype and args . allows pristine <utmp.h> . use clean <sys/reboot.h> instead of <minix/reboot.h> . implement TIOCSCTTY for use by getty so getty can get controlling terminal from init's child(ren) . allow NULL envp for exec Change-Id: I5ca02cb4230857140c08794bbfeba7df982c58a3
743 lines
14 KiB
C
743 lines
14 KiB
C
/* $NetBSD: subr.c,v 1.33 2006/11/16 04:31:24 christos Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 1983, 1993
|
|
* The Regents of the University of California. All rights reserved.
|
|
*
|
|
* 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. 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[] = "from: @(#)subr.c 8.1 (Berkeley) 6/4/93";
|
|
#else
|
|
__RCSID("$NetBSD: subr.c,v 1.33 2006/11/16 04:31:24 christos Exp $");
|
|
#endif
|
|
#endif /* not lint */
|
|
|
|
/*
|
|
* Melbourne getty.
|
|
*/
|
|
#ifndef __minix
|
|
#define COMPAT_43
|
|
#endif
|
|
#include <sys/param.h>
|
|
#include <sys/ioctl.h>
|
|
|
|
#include <stdio.h>
|
|
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <termios.h>
|
|
#include <unistd.h>
|
|
#include <poll.h>
|
|
|
|
#include "extern.h"
|
|
#include "gettytab.h"
|
|
#include "pathnames.h"
|
|
|
|
extern struct termios tmode, omode;
|
|
|
|
#ifndef __minix
|
|
static void compatflags(long);
|
|
#endif
|
|
|
|
/*
|
|
* Get a table entry.
|
|
*/
|
|
void
|
|
gettable(char *name, char *buf)
|
|
{
|
|
struct gettystrs *sp;
|
|
struct gettynums *np;
|
|
struct gettyflags *fp;
|
|
long n;
|
|
const char *dba[2];
|
|
dba[0] = _PATH_GETTYTAB;
|
|
dba[1] = 0;
|
|
|
|
if (cgetent(&buf, dba, name) != 0)
|
|
return;
|
|
|
|
for (sp = gettystrs; sp->field; sp++)
|
|
(void)cgetstr(buf, sp->field, &sp->value);
|
|
for (np = gettynums; np->field; np++) {
|
|
if (cgetnum(buf, np->field, &n) == -1)
|
|
np->set = 0;
|
|
else {
|
|
np->set = 1;
|
|
np->value = n;
|
|
}
|
|
}
|
|
for (fp = gettyflags; fp->field; fp++) {
|
|
if (cgetcap(buf, fp->field, ':') == NULL)
|
|
fp->set = 0;
|
|
else {
|
|
fp->set = 1;
|
|
fp->value = 1 ^ fp->invrt;
|
|
}
|
|
}
|
|
#ifdef DEBUG
|
|
printf("name=\"%s\", buf=\"%s\"\n", name, buf);
|
|
for (sp = gettystrs; sp->field; sp++)
|
|
printf("cgetstr: %s=%s\n", sp->field, sp->value);
|
|
for (np = gettynums; np->field; np++)
|
|
printf("cgetnum: %s=%d\n", np->field, np->value);
|
|
for (fp = gettyflags; fp->field; fp++)
|
|
printf("cgetflags: %s='%c' set='%c'\n", fp->field,
|
|
fp->value + '0', fp->set + '0');
|
|
exit(1);
|
|
#endif /* DEBUG */
|
|
}
|
|
|
|
void
|
|
gendefaults(void)
|
|
{
|
|
struct gettystrs *sp;
|
|
struct gettynums *np;
|
|
struct gettyflags *fp;
|
|
|
|
for (sp = gettystrs; sp->field; sp++)
|
|
if (sp->value)
|
|
sp->defalt = sp->value;
|
|
for (np = gettynums; np->field; np++)
|
|
if (np->set)
|
|
np->defalt = np->value;
|
|
for (fp = gettyflags; fp->field; fp++)
|
|
if (fp->set)
|
|
fp->defalt = fp->value;
|
|
else
|
|
fp->defalt = fp->invrt;
|
|
}
|
|
|
|
void
|
|
setdefaults(void)
|
|
{
|
|
struct gettystrs *sp;
|
|
struct gettynums *np;
|
|
struct gettyflags *fp;
|
|
|
|
for (sp = gettystrs; sp->field; sp++)
|
|
if (!sp->value)
|
|
sp->value = sp->defalt;
|
|
for (np = gettynums; np->field; np++)
|
|
if (!np->set)
|
|
np->value = np->defalt;
|
|
for (fp = gettyflags; fp->field; fp++)
|
|
if (!fp->set)
|
|
fp->value = fp->defalt;
|
|
}
|
|
|
|
static char **
|
|
charnames[] = {
|
|
&ER, &KL, &IN, &QU, &XN, &XF, &ET, &BK,
|
|
&SU, &DS, &RP, &FL, &WE, &LN, &ST, &B2, 0
|
|
};
|
|
|
|
static cc_t *
|
|
charvars[] = {
|
|
&tmode.c_cc[VERASE], &tmode.c_cc[VKILL], &tmode.c_cc[VINTR],
|
|
&tmode.c_cc[VQUIT], &tmode.c_cc[VSTART], &tmode.c_cc[VSTOP],
|
|
&tmode.c_cc[VEOF], &tmode.c_cc[VEOL], &tmode.c_cc[VSUSP],
|
|
&tmode.c_cc[VDSUSP], &tmode.c_cc[VREPRINT], &tmode.c_cc[VDISCARD],
|
|
&tmode.c_cc[VWERASE], &tmode.c_cc[VLNEXT], &tmode.c_cc[VSTATUS],
|
|
&tmode.c_cc[VEOL2], 0
|
|
};
|
|
|
|
void
|
|
setchars(void)
|
|
{
|
|
int i;
|
|
char *p;
|
|
|
|
for (i = 0; charnames[i]; i++) {
|
|
p = *charnames[i];
|
|
if (p && *p)
|
|
*charvars[i] = *p;
|
|
else
|
|
*charvars[i] = _POSIX_VDISABLE;
|
|
}
|
|
}
|
|
|
|
/* Macros to clear/set/test flags. */
|
|
#define SET(t, f) (t) |= (f)
|
|
#define CLR(t, f) (t) &= ~(f)
|
|
#define ISSET(t, f) ((t) & (f))
|
|
|
|
void
|
|
setflags(int n)
|
|
{
|
|
tcflag_t iflag, oflag, cflag, lflag;
|
|
|
|
#ifdef COMPAT_43
|
|
switch (n) {
|
|
case 0:
|
|
if (F0set) {
|
|
compatflags(F0);
|
|
return;
|
|
}
|
|
break;
|
|
case 1:
|
|
if (F1set) {
|
|
compatflags(F1);
|
|
return;
|
|
}
|
|
break;
|
|
default:
|
|
if (F2set) {
|
|
compatflags(F2);
|
|
return;
|
|
}
|
|
break;
|
|
}
|
|
#endif
|
|
|
|
switch (n) {
|
|
case 0:
|
|
if (C0set && I0set && L0set && O0set) {
|
|
tmode.c_cflag = C0;
|
|
tmode.c_iflag = I0;
|
|
tmode.c_lflag = L0;
|
|
tmode.c_oflag = O0;
|
|
return;
|
|
}
|
|
break;
|
|
case 1:
|
|
if (C1set && I1set && L1set && O1set) {
|
|
tmode.c_cflag = C1;
|
|
tmode.c_iflag = I1;
|
|
tmode.c_lflag = L1;
|
|
tmode.c_oflag = O1;
|
|
return;
|
|
}
|
|
break;
|
|
default:
|
|
if (C2set && I2set && L2set && O2set) {
|
|
tmode.c_cflag = C2;
|
|
tmode.c_iflag = I2;
|
|
tmode.c_lflag = L2;
|
|
tmode.c_oflag = O2;
|
|
return;
|
|
}
|
|
break;
|
|
}
|
|
|
|
iflag = omode.c_iflag;
|
|
oflag = omode.c_oflag;
|
|
cflag = omode.c_cflag;
|
|
lflag = omode.c_lflag;
|
|
|
|
if (NP) {
|
|
CLR(cflag, CSIZE|PARENB);
|
|
SET(cflag, CS8);
|
|
CLR(iflag, ISTRIP|INPCK|IGNPAR);
|
|
} else if (AP || EP || OP) {
|
|
CLR(cflag, CSIZE);
|
|
SET(cflag, CS7|PARENB);
|
|
SET(iflag, ISTRIP);
|
|
if (OP && !EP) {
|
|
SET(iflag, INPCK|IGNPAR);
|
|
SET(cflag, PARODD);
|
|
if (AP)
|
|
CLR(iflag, INPCK);
|
|
} else if (EP && !OP) {
|
|
SET(iflag, INPCK|IGNPAR);
|
|
CLR(cflag, PARODD);
|
|
if (AP)
|
|
CLR(iflag, INPCK);
|
|
} else if (AP || (EP && OP)) {
|
|
CLR(iflag, INPCK|IGNPAR);
|
|
CLR(cflag, PARODD);
|
|
}
|
|
} /* else, leave as is */
|
|
|
|
#if 0
|
|
if (UC)
|
|
f |= LCASE;
|
|
#endif
|
|
|
|
if (HC)
|
|
SET(cflag, HUPCL);
|
|
else
|
|
CLR(cflag, HUPCL);
|
|
|
|
#ifndef __minix
|
|
if (MB)
|
|
SET(cflag, MDMBUF);
|
|
else
|
|
CLR(cflag, MDMBUF);
|
|
#endif
|
|
|
|
if (NL) {
|
|
SET(iflag, ICRNL);
|
|
SET(oflag, ONLCR|OPOST);
|
|
} else {
|
|
CLR(iflag, ICRNL);
|
|
CLR(oflag, ONLCR);
|
|
}
|
|
|
|
#ifndef __minix
|
|
if (!HT)
|
|
SET(oflag, OXTABS|OPOST);
|
|
else
|
|
CLR(oflag, OXTABS);
|
|
#endif
|
|
|
|
#ifdef XXX_DELAY
|
|
SET(f, delaybits());
|
|
#endif
|
|
|
|
if (n == 1) { /* read mode flags */
|
|
if (RW) {
|
|
iflag = 0;
|
|
CLR(oflag, OPOST);
|
|
CLR(cflag, CSIZE|PARENB);
|
|
SET(cflag, CS8);
|
|
lflag = 0;
|
|
} else {
|
|
CLR(lflag, ICANON);
|
|
}
|
|
goto out;
|
|
}
|
|
|
|
if (n == 0)
|
|
goto out;
|
|
|
|
#if 0
|
|
if (CB)
|
|
SET(f, CRTBS);
|
|
#endif
|
|
|
|
if (CE)
|
|
SET(lflag, ECHOE);
|
|
else
|
|
CLR(lflag, ECHOE);
|
|
|
|
#ifndef __minix
|
|
if (CK)
|
|
SET(lflag, ECHOKE);
|
|
else
|
|
CLR(lflag, ECHOKE);
|
|
|
|
if (PE)
|
|
SET(lflag, ECHOPRT);
|
|
else
|
|
CLR(lflag, ECHOPRT);
|
|
#endif
|
|
|
|
if (EC)
|
|
SET(lflag, ECHO);
|
|
else
|
|
CLR(lflag, ECHO);
|
|
|
|
#ifndef __minix
|
|
if (XC)
|
|
SET(lflag, ECHOCTL);
|
|
else
|
|
CLR(lflag, ECHOCTL);
|
|
#endif
|
|
|
|
if (DX)
|
|
SET(lflag, IXANY);
|
|
else
|
|
CLR(lflag, IXANY);
|
|
|
|
out:
|
|
tmode.c_iflag = iflag;
|
|
tmode.c_oflag = oflag;
|
|
tmode.c_cflag = cflag;
|
|
tmode.c_lflag = lflag;
|
|
}
|
|
|
|
#ifdef COMPAT_43
|
|
/*
|
|
* Old TTY => termios, snatched from <sys/kern/tty_compat.c>
|
|
*/
|
|
void
|
|
compatflags(long flags)
|
|
{
|
|
tcflag_t iflag, oflag, cflag, lflag;
|
|
|
|
iflag = BRKINT|ICRNL|IMAXBEL|IXON|IXANY;
|
|
oflag = OPOST|ONLCR|OXTABS;
|
|
cflag = CREAD;
|
|
lflag = ICANON|ISIG|IEXTEN;
|
|
|
|
if (ISSET(flags, TANDEM))
|
|
SET(iflag, IXOFF);
|
|
else
|
|
CLR(iflag, IXOFF);
|
|
if (ISSET(flags, ECHO))
|
|
SET(lflag, ECHO);
|
|
else
|
|
CLR(lflag, ECHO);
|
|
if (ISSET(flags, CRMOD)) {
|
|
SET(iflag, ICRNL);
|
|
SET(oflag, ONLCR);
|
|
} else {
|
|
CLR(iflag, ICRNL);
|
|
CLR(oflag, ONLCR);
|
|
}
|
|
if (ISSET(flags, XTABS))
|
|
SET(oflag, OXTABS);
|
|
else
|
|
CLR(oflag, OXTABS);
|
|
|
|
|
|
if (ISSET(flags, RAW)) {
|
|
iflag &= IXOFF;
|
|
CLR(lflag, ISIG|ICANON|IEXTEN);
|
|
CLR(cflag, PARENB);
|
|
} else {
|
|
SET(iflag, BRKINT|IXON|IMAXBEL);
|
|
SET(lflag, ISIG|IEXTEN);
|
|
if (ISSET(flags, CBREAK))
|
|
CLR(lflag, ICANON);
|
|
else
|
|
SET(lflag, ICANON);
|
|
switch (ISSET(flags, ANYP)) {
|
|
case 0:
|
|
CLR(cflag, PARENB);
|
|
break;
|
|
case ANYP:
|
|
SET(cflag, PARENB);
|
|
CLR(iflag, INPCK);
|
|
break;
|
|
case EVENP:
|
|
SET(cflag, PARENB);
|
|
SET(iflag, INPCK);
|
|
CLR(cflag, PARODD);
|
|
break;
|
|
case ODDP:
|
|
SET(cflag, PARENB);
|
|
SET(iflag, INPCK);
|
|
SET(cflag, PARODD);
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* Nothing we can do with CRTBS. */
|
|
if (ISSET(flags, PRTERA))
|
|
SET(lflag, ECHOPRT);
|
|
else
|
|
CLR(lflag, ECHOPRT);
|
|
if (ISSET(flags, CRTERA))
|
|
SET(lflag, ECHOE);
|
|
else
|
|
CLR(lflag, ECHOE);
|
|
#ifndef __minix
|
|
/* Nothing we can do with TILDE. */
|
|
if (ISSET(flags, MDMBUF))
|
|
SET(cflag, MDMBUF);
|
|
else
|
|
CLR(cflag, MDMBUF);
|
|
#endif
|
|
if (ISSET(flags, NOHANG))
|
|
CLR(cflag, HUPCL);
|
|
else
|
|
SET(cflag, HUPCL);
|
|
|
|
#ifndef __minix
|
|
if (ISSET(flags, CRTKIL))
|
|
SET(lflag, ECHOKE);
|
|
else
|
|
CLR(lflag, ECHOKE);
|
|
#endif
|
|
|
|
if (ISSET(flags, CTLECH))
|
|
SET(lflag, ECHOCTL);
|
|
else
|
|
CLR(lflag, ECHOCTL);
|
|
if (!ISSET(flags, DECCTQ))
|
|
SET(iflag, IXANY);
|
|
else
|
|
CLR(iflag, IXANY);
|
|
CLR(lflag, TOSTOP|FLUSHO|PENDIN|NOFLSH);
|
|
SET(lflag, ISSET(flags, TOSTOP|FLUSHO|PENDIN|NOFLSH));
|
|
|
|
if (ISSET(flags, RAW|LITOUT|PASS8)) {
|
|
CLR(cflag, CSIZE);
|
|
SET(cflag, CS8);
|
|
if (!ISSET(flags, RAW|PASS8))
|
|
SET(iflag, ISTRIP);
|
|
else
|
|
CLR(iflag, ISTRIP);
|
|
if (!ISSET(flags, RAW|LITOUT))
|
|
SET(oflag, OPOST);
|
|
else
|
|
CLR(oflag, OPOST);
|
|
} else {
|
|
CLR(cflag, CSIZE);
|
|
SET(cflag, CS7);
|
|
SET(iflag, ISTRIP);
|
|
SET(oflag, OPOST);
|
|
}
|
|
|
|
tmode.c_iflag = iflag;
|
|
tmode.c_oflag = oflag;
|
|
tmode.c_cflag = cflag;
|
|
tmode.c_lflag = lflag;
|
|
}
|
|
#endif
|
|
|
|
#ifdef XXX_DELAY
|
|
struct delayval {
|
|
unsigned delay; /* delay in ms */
|
|
int bits;
|
|
};
|
|
|
|
/*
|
|
* below are random guesses, I can't be bothered checking
|
|
*/
|
|
|
|
struct delayval crdelay[] = {
|
|
{ 1, CR1 },
|
|
{ 2, CR2 },
|
|
{ 3, CR3 },
|
|
{ 83, CR1 },
|
|
{ 166, CR2 },
|
|
{ 0, CR3 },
|
|
};
|
|
|
|
struct delayval nldelay[] = {
|
|
{ 1, NL1 }, /* special, calculated */
|
|
{ 2, NL2 },
|
|
{ 3, NL3 },
|
|
{ 100, NL2 },
|
|
{ 0, NL3 },
|
|
};
|
|
|
|
struct delayval bsdelay[] = {
|
|
{ 1, BS1 },
|
|
{ 0, 0 },
|
|
};
|
|
|
|
struct delayval ffdelay[] = {
|
|
{ 1, FF1 },
|
|
{ 1750, FF1 },
|
|
{ 0, FF1 },
|
|
};
|
|
|
|
struct delayval tbdelay[] = {
|
|
{ 1, TAB1 },
|
|
{ 2, TAB2 },
|
|
{ 3, XTABS }, /* this is expand tabs */
|
|
{ 100, TAB1 },
|
|
{ 0, TAB2 },
|
|
};
|
|
|
|
int
|
|
delaybits(void)
|
|
{
|
|
int f;
|
|
|
|
f = adelay(CD, crdelay);
|
|
f |= adelay(ND, nldelay);
|
|
f |= adelay(FD, ffdelay);
|
|
f |= adelay(TD, tbdelay);
|
|
f |= adelay(BD, bsdelay);
|
|
return (f);
|
|
}
|
|
|
|
int
|
|
adelay(int ms, struct delayval *dp)
|
|
{
|
|
if (ms == 0)
|
|
return (0);
|
|
while (dp->delay && ms > dp->delay)
|
|
dp++;
|
|
return (dp->bits);
|
|
}
|
|
#endif
|
|
|
|
char editedhost[MAXHOSTNAMELEN];
|
|
|
|
void
|
|
edithost(char *pat)
|
|
{
|
|
char *host = HN;
|
|
char *res = editedhost;
|
|
|
|
if (!pat)
|
|
pat = "";
|
|
while (*pat) {
|
|
switch (*pat) {
|
|
|
|
case '#':
|
|
if (*host)
|
|
host++;
|
|
break;
|
|
|
|
case '@':
|
|
if (*host)
|
|
*res++ = *host++;
|
|
break;
|
|
|
|
default:
|
|
*res++ = *pat;
|
|
break;
|
|
|
|
}
|
|
if (res == &editedhost[sizeof editedhost - 1]) {
|
|
*res = '\0';
|
|
return;
|
|
}
|
|
pat++;
|
|
}
|
|
if (*host)
|
|
(void)strncpy(res, host,
|
|
sizeof editedhost - (res - editedhost) - 1);
|
|
else
|
|
*res = '\0';
|
|
editedhost[sizeof editedhost - 1] = '\0';
|
|
}
|
|
|
|
void
|
|
makeenv(char *env[])
|
|
{
|
|
static char termbuf[128] = "TERM=";
|
|
char *p, *q;
|
|
char **ep;
|
|
|
|
ep = env;
|
|
if (TT && *TT) {
|
|
(void)strlcat(termbuf, TT, sizeof(termbuf));
|
|
*ep++ = termbuf;
|
|
}
|
|
if ((p = EV) != NULL) {
|
|
q = p;
|
|
while ((q = strchr(q, ',')) != NULL) {
|
|
*q++ = '\0';
|
|
*ep++ = p;
|
|
p = q;
|
|
}
|
|
if (*p)
|
|
*ep++ = p;
|
|
}
|
|
*ep = (char *)0;
|
|
}
|
|
|
|
/*
|
|
* This speed select mechanism is written for the Develcon DATASWITCH.
|
|
* The Develcon sends a string of the form "B{speed}\n" at a predefined
|
|
* baud rate. This string indicates the user's actual speed.
|
|
* The routine below returns the terminal type mapped from derived speed.
|
|
*/
|
|
struct portselect {
|
|
char *ps_baud;
|
|
char *ps_type;
|
|
} portspeeds[] = {
|
|
{ "B110", "std.110" },
|
|
{ "B134", "std.134" },
|
|
{ "B150", "std.150" },
|
|
{ "B300", "std.300" },
|
|
{ "B600", "std.600" },
|
|
{ "B1200", "std.1200" },
|
|
{ "B2400", "std.2400" },
|
|
{ "B4800", "std.4800" },
|
|
{ "B9600", "std.9600" },
|
|
{ "B19200", "std.19200" },
|
|
{ 0 }
|
|
};
|
|
|
|
char *
|
|
portselector(void)
|
|
{
|
|
char c, baud[20], *type = "default";
|
|
struct portselect *ps;
|
|
int len;
|
|
|
|
(void)alarm(5*60);
|
|
for (len = 0; len < sizeof (baud) - 1; len++) {
|
|
if (read(STDIN_FILENO, &c, 1) <= 0)
|
|
break;
|
|
c &= 0177;
|
|
if (c == '\n' || c == '\r')
|
|
break;
|
|
if (c == 'B')
|
|
len = 0; /* in case of leading garbage */
|
|
baud[len] = c;
|
|
}
|
|
baud[len] = '\0';
|
|
for (ps = portspeeds; ps->ps_baud; ps++)
|
|
if (strcmp(ps->ps_baud, baud) == 0) {
|
|
type = ps->ps_type;
|
|
break;
|
|
}
|
|
(void)sleep(2); /* wait for connection to complete */
|
|
return (type);
|
|
}
|
|
|
|
/*
|
|
* This auto-baud speed select mechanism is written for the Micom 600
|
|
* portselector. Selection is done by looking at how the character '\r'
|
|
* is garbled at the different speeds.
|
|
*/
|
|
#include <sys/time.h>
|
|
|
|
char *
|
|
autobaud(void)
|
|
{
|
|
struct pollfd set[1];
|
|
struct timespec timeout;
|
|
char c, *type = "9600-baud";
|
|
|
|
(void)tcflush(0, TCIOFLUSH);
|
|
set[0].fd = STDIN_FILENO;
|
|
set[0].events = POLLIN;
|
|
if (poll(set, 1, 5000) <= 0)
|
|
return (type);
|
|
if (read(STDIN_FILENO, &c, 1) != 1)
|
|
return (type);
|
|
timeout.tv_sec = 0;
|
|
timeout.tv_nsec = 20000;
|
|
(void)nanosleep(&timeout, NULL);
|
|
(void)tcflush(0, TCIOFLUSH);
|
|
switch (c & 0377) {
|
|
|
|
case 0200: /* 300-baud */
|
|
type = "300-baud";
|
|
break;
|
|
|
|
case 0346: /* 1200-baud */
|
|
type = "1200-baud";
|
|
break;
|
|
|
|
case 015: /* 2400-baud */
|
|
case 0215:
|
|
type = "2400-baud";
|
|
break;
|
|
|
|
default: /* 4800-baud */
|
|
type = "4800-baud";
|
|
break;
|
|
|
|
case 0377: /* 9600-baud */
|
|
type = "9600-baud";
|
|
break;
|
|
}
|
|
return (type);
|
|
}
|