void
cleanup(int signo)
{
daemon_uid();
(void)uu_unlock(uucplock);
#if !HAVE_TERMIOS
if (odisc)
ioctl(0, TIOCSETD, (char *)&odisc);
#endif
exit(0);
}
void
tipabort(char *msg)
{
kill(pid, SIGTERM);
disconnect(msg);
if (msg != NULL)
printf("\r\n%s", msg);
printf("\r\n[EOT]\r\n");
daemon_uid();
(void)uu_unlock(uucplock);
unraw();
exit(0);
}
void
cleanup(int signo)
{
daemon_uid();
(void)uu_unlock(uucplock);
if (odisc)
ioctl(0, TIOCSETD, &odisc);
unraw();
if (signo && tipout_pid) {
kill(tipout_pid, signo);
wait(NULL);
}
exit(0);
}
void
tipabort(char *msg)
{
signal(SIGTERM, SIG_IGN);
kill(tipout_pid, SIGTERM);
disconnect(msg);
if (msg != NOSTR)
printf("\r\n%s", msg);
printf("\r\n[EOT]\r\n");
daemon_uid();
(void)uu_unlock(uucplock);
unraw();
unexcl();
exit(0);
}
/*
* Botch the interface to look like cu's
*/
void
cumain(int argc, char *argv[])
{
int i;
static char sbuf[12];
if (argc < 2) {
printf("usage: cu telno [-t] [-s speed] [-a acu] [-l line] [-#]\n");
exit(8);
}
CU = DV = NULL;
BR = DEFBR;
for (; argc > 1; argv++, argc--) {
if (argv[1][0] != '-')
PN = argv[1];
else switch (argv[1][1]) {
case 't':
HW = 1, DU = -1;
--argc;
continue;
case 'a':
CU = argv[2]; ++argv; --argc;
break;
case 's':
if (argc < 3 || speed(atoi(argv[2])) == 0) {
fprintf(stderr, "cu: unsupported speed %s\n",
argv[2]);
exit(3);
}
BR = atoi(argv[2]); ++argv; --argc;
break;
case 'l':
DV = argv[2]; ++argv; --argc;
break;
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
if (CU)
CU[strlen(CU)-1] = argv[1][1];
if (DV)
DV[strlen(DV)-1] = argv[1][1];
break;
default:
printf("Bad flag %s", argv[1]);
break;
}
}
signal(SIGINT, cleanup);
signal(SIGQUIT, cleanup);
signal(SIGHUP, cleanup);
signal(SIGTERM, cleanup);
/*
* The "cu" host name is used to define the
* attributes of the generic dialer.
*/
(void)snprintf(sbuf, sizeof(sbuf), "cu%ld", BR);
if ((i = hunt(sbuf)) == 0) {
printf("all ports busy\n");
exit(3);
}
if (i == -1) {
printf("link down\n");
(void)uu_unlock(uucplock);
exit(3);
}
setbuf(stdout, NULL);
loginit();
user_uid();
vinit();
setparity("none");
boolean(value(VERBOSE)) = 0;
if (HW)
ttysetup(speed(BR));
if (connect()) {
printf("Connect failed\n");
daemon_uid();
(void)uu_unlock(uucplock);
exit(1);
}
if (!HW)
ttysetup(speed(BR));
exit(0);
}
int
main(int argc, char *argv[])
{
char *sys = NOSTR, sbuf[12], *p;
int i;
/* XXX preserve previous braindamaged behavior */
setboolean(value(DC), TRUE);
gid = getgid();
egid = getegid();
uid = getuid();
euid = geteuid();
if (equal(__progname, "cu")) {
cumode = 1;
cumain(argc, argv);
goto cucommon;
}
if (argc > 4) {
fprintf(stderr, "usage: tip [-v] [-speed] [system-name]\n");
exit(1);
}
if (!isatty(0)) {
fprintf(stderr, "%s: must be interactive\n", __progname);
exit(1);
}
for (; argc > 1; argv++, argc--) {
if (argv[1][0] != '-')
sys = argv[1];
else switch (argv[1][1]) {
case 'v':
vflag++;
break;
case 'n':
noesc++;
break;
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
BR = atoi(&argv[1][1]);
break;
default:
fprintf(stderr, "%s: %s, unknown option\n", __progname,
argv[1]);
break;
}
}
if (sys == NOSTR)
goto notnumber;
if (isalpha(*sys))
goto notnumber;
/*
* System name is really a phone number...
* Copy the number then stomp on the original (in case the number
* is private, we don't want 'ps' or 'w' to find it).
*/
if (strlen(sys) > sizeof PNbuf - 1) {
fprintf(stderr, "%s: phone number too long (max = %d bytes)\n",
__progname, (int)sizeof(PNbuf) - 1);
exit(1);
}
strlcpy(PNbuf, sys, sizeof PNbuf - 1);
for (p = sys; *p; p++)
*p = '\0';
PN = PNbuf;
(void)snprintf(sbuf, sizeof(sbuf), "tip%ld", BR);
sys = sbuf;
notnumber:
(void)signal(SIGINT, cleanup);
(void)signal(SIGQUIT, cleanup);
(void)signal(SIGHUP, cleanup);
(void)signal(SIGTERM, cleanup);
(void)signal(SIGCHLD, SIG_DFL);
if ((i = hunt(sys)) == 0) {
printf("all ports busy\n");
exit(3);
}
if (i == -1) {
printf("link down\n");
(void)uu_unlock(uucplock);
exit(3);
}
setbuf(stdout, NULL);
loginit();
/*
* Now that we have the logfile and the ACU open
* return to the real uid and gid. These things will
* be closed on exit. Swap real and effective uid's
* so we can get the original permissions back
* for removing the uucp lock.
*/
user_uid();
/*
* Kludge, their's no easy way to get the initialization
* in the right order, so force it here
*/
if ((PH = getenv("PHONES")) == NOSTR)
PH = _PATH_PHONES;
vinit(); /* init variables */
setparity("none"); /* set the parity table */
/*
* Hardwired connections require the
* line speed set before they make any transmissions
* (this is particularly true of things like a DF03-AC)
*/
if (HW && ttysetup(number(value(BAUDRATE)))) {
fprintf(stderr, "%s: bad baud rate %ld\n", __progname,
number(value(BAUDRATE)));
daemon_uid();
(void)uu_unlock(uucplock);
exit(3);
}
if ((p = con())) {
printf("\07%s\n[EOT]\n", p);
daemon_uid();
(void)uu_unlock(uucplock);
exit(1);
}
if (!HW && ttysetup(number(value(BAUDRATE)))) {
fprintf(stderr, "%s: bad baud rate %ld\n", __progname,
number(value(BAUDRATE)));
daemon_uid();
(void)uu_unlock(uucplock);
exit(3);
}
cucommon:
/*
* From here down the code is shared with
* the "cu" version of tip.
*/
i = fcntl(FD, F_GETFL);
if (i == -1) {
perror("fcntl");
cleanup(0);
}
i = fcntl(FD, F_SETFL, i & ~O_NONBLOCK);
if (i == -1) {
perror("fcntl");
cleanup(0);
}
tcgetattr(0, &defterm);
gotdefterm = 1;
term = defterm;
term.c_lflag &= ~(ICANON|IEXTEN|ECHO);
term.c_iflag &= ~(INPCK|ICRNL);
term.c_oflag &= ~OPOST;
term.c_cc[VMIN] = 1;
term.c_cc[VTIME] = 0;
defchars = term;
term.c_cc[VINTR] = term.c_cc[VQUIT] = term.c_cc[VSUSP] =
term.c_cc[VDSUSP] = term.c_cc[VDISCARD] =
term.c_cc[VLNEXT] = _POSIX_VDISABLE;
raw();
pipe(fildes); pipe(repdes);
(void)signal(SIGALRM, timeout);
if (value(LINEDISC) != TTYDISC) {
int ld = (int)(intptr_t)value(LINEDISC);
ioctl(FD, TIOCSETD, &ld);
}
/*
* Everything's set up now:
* connection established (hardwired or dialup)
* line conditioned (baud rate, mode, etc.)
* internal data structures (variables)
* so, fork one process for local side and one for remote.
*/
printf(cumode ? "Connected\r\n" : "\07connected\r\n");
tipin_pid = getpid();
if ((tipout_pid = fork()))
tipin();
else
tipout();
/*NOTREACHED*/
exit(0);
}
/*
* Botch the interface to look like cu's
*/
void
cumain(int argc, char *argv[])
{
int ch, i, parity;
long l;
char *cp;
static char sbuf[12];
if (argc < 2)
cuusage();
CU = DV = NOSTR;
BR = DEFBR;
parity = 0; /* none */
/*
* We want to accept -# as a speed. It's easiest to look through
* the arguments, replace -# with -s#, and let getopt() handle it.
*/
for (i = 1; i < argc; i++) {
if (argv[i][0] == '-' &&
argv[i][1] >= '0' && argv[i][1] <= '9') {
asprintf(&cp, "-s%s", argv[i] + 1);
if (cp == NULL) {
fprintf(stderr,
"%s: cannot convert -# to -s#\n",
__progname);
exit(3);
}
argv[i] = cp;
}
}
while ((ch = getopt(argc, argv, "a:l:s:htoe")) != -1) {
switch (ch) {
case 'a':
CU = optarg;
break;
case 'l':
if (DV != NULL) {
fprintf(stderr,
"%s: cannot specificy multiple -l options\n",
__progname);
exit(3);
}
if (strchr(optarg, '/'))
DV = optarg;
else
asprintf(&DV, "/dev/%s", optarg);
break;
case 's':
l = strtol(optarg, &cp, 10);
if (*cp != '\0' || l < 0 || l >= INT_MAX) {
fprintf(stderr, "%s: unsupported speed %s\n",
__progname, optarg);
exit(3);
}
BR = (int)l;
break;
case 'h':
setboolean(value(LECHO), TRUE);
HD = TRUE;
break;
case 't':
HW = 1, DU = -1;
break;
case 'o':
if (parity != 0)
parity = 0; /* -e -o */
else
parity = 1; /* odd */
break;
case 'e':
if (parity != 0)
parity = 0; /* -o -e */
else
parity = -1; /* even */
break;
default:
cuusage();
break;
}
}
argc -= optind;
argv += optind;
switch (argc) {
case 1:
PN = argv[0];
break;
case 0:
break;
default:
cuusage();
break;
}
signal(SIGINT, cleanup);
signal(SIGQUIT, cleanup);
signal(SIGHUP, cleanup);
signal(SIGTERM, cleanup);
signal(SIGCHLD, SIG_DFL);
/*
* The "cu" host name is used to define the
* attributes of the generic dialer.
*/
(void)snprintf(sbuf, sizeof(sbuf), "cu%ld", BR);
if ((i = hunt(sbuf)) == 0) {
printf("all ports busy\n");
exit(3);
}
if (i == -1) {
printf("link down\n");
(void)uu_unlock(uucplock);
exit(3);
}
setbuf(stdout, NULL);
loginit();
user_uid();
vinit();
switch (parity) {
case -1:
setparity("even");
break;
case 1:
setparity("odd");
break;
default:
setparity("none");
break;
}
setboolean(value(VERBOSE), FALSE);
if (HW && ttysetup(BR)) {
fprintf(stderr, "%s: unsupported speed %ld\n",
__progname, BR);
daemon_uid();
(void)uu_unlock(uucplock);
exit(3);
}
if (con()) {
printf("Connect failed\n");
daemon_uid();
(void)uu_unlock(uucplock);
exit(1);
}
if (!HW && ttysetup(BR)) {
fprintf(stderr, "%s: unsupported speed %ld\n",
__progname, BR);
daemon_uid();
(void)uu_unlock(uucplock);
exit(3);
}
}
int
main(int argc, char *argv[])
{
char *system = NULL;
int i;
char *p;
char sbuf[12];
gid = getgid();
egid = getegid();
uid = getuid();
euid = geteuid();
#if INCLUDE_CU_INTERFACE
if (equal(sname(argv[0]), "cu")) {
cumode = 1;
cumain(argc, argv);
goto cucommon;
}
#endif /* INCLUDE_CU_INTERFACE */
if (argc > 4)
usage();
if (!isatty(0))
errx(1, "must be interactive");
for (; argc > 1; argv++, argc--) {
if (argv[1][0] != '-')
system = argv[1];
else switch (argv[1][1]) {
case 'v':
vflag++;
break;
case '0': case '1': case '2': case '3': case '4':
case '5': case '6': case '7': case '8': case '9':
BR = atoi(&argv[1][1]);
break;
default:
warnx("%s, unknown option", argv[1]);
break;
}
}
if (system == NULL)
goto notnumber;
if (isalpha(*system))
goto notnumber;
/*
* System name is really a phone number...
* Copy the number then stomp on the original (in case the number
* is private, we don't want 'ps' or 'w' to find it).
*/
if (strlen(system) > sizeof(PNbuf) - 1)
errx(1, "phone number too long (max = %zd bytes)", sizeof PNbuf - 1);
strncpy(PNbuf, system, sizeof(PNbuf) - 1);
for (p = system; *p; p++)
*p = '\0';
PN = PNbuf;
(void)snprintf(sbuf, sizeof(sbuf), "tip%ld", BR);
system = sbuf;
notnumber:
(void)signal(SIGINT, cleanup);
(void)signal(SIGQUIT, cleanup);
(void)signal(SIGHUP, cleanup);
(void)signal(SIGTERM, cleanup);
(void)signal(SIGUSR1, tipdone);
if ((i = hunt(system)) == 0) {
printf("all ports busy\n");
exit(3);
}
if (i == -1) {
printf("link down\n");
(void)uu_unlock(uucplock);
exit(3);
}
setbuf(stdout, NULL);
loginit();
/*
* Kludge, their's no easy way to get the initialization
* in the right order, so force it here
*/
if ((PH = getenv("PHONES")) == NULL)
PH = _PATH_PHONES;
vinit(); /* init variables */
setparity("even"); /* set the parity table */
if ((i = speed(number(value(BAUDRATE)))) == 0) {
printf("tip: bad baud rate %d\n", number(value(BAUDRATE)));
(void)uu_unlock(uucplock);
exit(3);
}
/*
* Now that we have the logfile and the ACU open
* return to the real uid and gid. These things will
* be closed on exit. Swap real and effective uid's
* so we can get the original permissions back
* for removing the uucp lock.
*/
user_uid();
/*
* Hardwired connections require the
* line speed set before they make any transmissions
* (this is particularly true of things like a DF03-AC)
*/
if (HW)
ttysetup(i);
if ((p = connect())) {
printf("\07%s\n[EOT]\n", p);
daemon_uid();
(void)uu_unlock(uucplock);
exit(1);
}
if (!HW)
ttysetup(i);
cucommon:
/*
* From here down the code is shared with
* the "cu" version of tip.
*/
#if HAVE_TERMIOS
tcgetattr (0, &otermios);
ctermios = otermios;
#ifndef _POSIX_SOURCE
ctermios.c_iflag = (IMAXBEL|IXANY|ISTRIP|IXON|BRKINT);
ctermios.c_lflag = (PENDIN|IEXTEN|ISIG|ECHOCTL|ECHOE|ECHOKE);
#else
ctermios.c_iflag = (ISTRIP|IXON|BRKINT);
ctermios.c_lflag = (PENDIN|IEXTEN|ISIG|ECHOE);
#endif
ctermios.c_cflag = (CLOCAL|HUPCL|CREAD|CS8);
ctermios.c_cc[VINTR] = ctermios.c_cc[VQUIT] = -1;
ctermios.c_cc[VSUSP] = ctermios.c_cc[VDSUSP] = ctermios.c_cc[VDISCARD] =
ctermios.c_cc[VLNEXT] = -1;
#else /* HAVE_TERMIOS */
ioctl(0, TIOCGETP, (char *)&defarg);
ioctl(0, TIOCGETC, (char *)&defchars);
ioctl(0, TIOCGLTC, (char *)&deflchars);
ioctl(0, TIOCGETD, (char *)&odisc);
arg = defarg;
arg.sg_flags = ANYP | CBREAK;
tchars = defchars;
tchars.t_intrc = tchars.t_quitc = -1;
ltchars = deflchars;
ltchars.t_suspc = ltchars.t_dsuspc = ltchars.t_flushc
= ltchars.t_lnextc = -1;
#endif /* HAVE_TERMIOS */
raw();
pipe(fildes); pipe(repdes);
(void)signal(SIGALRM, timeoutfunc);
/*
* Everything's set up now:
* connection established (hardwired or dialup)
* line conditioned (baud rate, mode, etc.)
* internal data structures (variables)
* so, fork one process for local side and one for remote.
*/
printf(cumode ? "Connected\r\n" : "\07connected\r\n");
if (LI != NULL && tiplink (LI, 0) != 0) {
tipabort ("login failed");
}
if ((pid = fork()))
tipin();
else
tipout();
/*NOTREACHED*/
}