/*ARGSUSED*/
void
variable(int c)
{
char buf[256];
if (prompt("[set] ", buf, sizeof(buf)))
return;
vlex(buf);
if (vtable[BEAUTIFY].v_access&CHANGED) {
vtable[BEAUTIFY].v_access &= ~CHANGED;
kill(tipout_pid, SIGSYS);
}
if (vtable[SCRIPT].v_access&CHANGED) {
vtable[SCRIPT].v_access &= ~CHANGED;
setscript();
/*
* So that "set record=blah script" doesn't
* cause two transactions to occur.
*/
if (vtable[RECORD].v_access&CHANGED)
vtable[RECORD].v_access &= ~CHANGED;
}
if (vtable[RECORD].v_access&CHANGED) {
vtable[RECORD].v_access &= ~CHANGED;
if (boolean(value(SCRIPT)))
setscript();
}
if (vtable[TAND].v_access&CHANGED) {
vtable[TAND].v_access &= ~CHANGED;
if (boolean(value(TAND)))
tandem("on");
else
tandem("off");
}
if (vtable[LECHO].v_access&CHANGED) {
vtable[LECHO].v_access &= ~CHANGED;
HD = boolean(value(LECHO));
}
if (vtable[PARITY].v_access&CHANGED) {
vtable[PARITY].v_access &= ~CHANGED;
setparity(NOSTR);
}
if (vtable[HARDWAREFLOW].v_access&CHANGED) {
vtable[HARDWAREFLOW].v_access &= ~CHANGED;
if (boolean(value(HARDWAREFLOW)))
hardwareflow("on");
else
hardwareflow("off");
}
if (vtable[LINEDISC].v_access&CHANGED) {
vtable[LINEDISC].v_access &= ~CHANGED;
linedisc(NOSTR);
}
}
/* ARGSUSED */
void
variable(int cc)
{
char buf[256];
if (prompt("[set] ", buf, sizeof (buf)))
return;
vlex(buf);
if (vtable[BEAUTIFY].v_access&CHANGED) {
vtable[BEAUTIFY].v_access &= ~CHANGED;
(void) kill(pid, SIGSYS);
}
if (vtable[SCRIPT].v_access&CHANGED) {
vtable[SCRIPT].v_access &= ~CHANGED;
setscript();
/*
* So that "set record=blah script" doesn't
* cause two transactions to occur.
*/
if (vtable[RECORD].v_access&CHANGED)
vtable[RECORD].v_access &= ~CHANGED;
}
if (vtable[RECORD].v_access&CHANGED) {
vtable[RECORD].v_access &= ~CHANGED;
if (boolean(value(SCRIPT)))
setscript();
}
if (vtable[TAND].v_access&CHANGED) {
vtable[TAND].v_access &= ~CHANGED;
if (boolean(value(TAND)))
tandem("on");
else
tandem("off");
}
if (vtable[LECHO].v_access&CHANGED) {
vtable[LECHO].v_access &= ~CHANGED;
boolean(value(HALFDUPLEX)) = boolean(value(LECHO));
}
if (vtable[PARITY].v_access&CHANGED) {
vtable[PARITY].v_access &= ~CHANGED;
setparity(NULL);
}
if (vtable[BAUDRATE].v_access&CHANGED) {
vtable[BAUDRATE].v_access &= ~CHANGED;
ttysetup(speed(number(value(BAUDRATE))));
}
if (vtable[HARDWAREFLOW].v_access & CHANGED) {
vtable[HARDWAREFLOW].v_access &= ~CHANGED;
if (boolean(value(HARDWAREFLOW)))
hardwareflow("on");
else
hardwareflow("off");
}
}
void
variable(void)
{
char buf[256];
if (prompt("[set] ", buf, sizeof(buf)))
return;
vlex(buf);
if (vtable[BEAUTIFY].v_access&CHANGED) {
vtable[BEAUTIFY].v_access &= ~CHANGED;
kill(pid, SIGSYS);
}
if (vtable[SCRIPT].v_access&CHANGED) {
vtable[SCRIPT].v_access &= ~CHANGED;
setscript();
/*
* So that "set record=blah script" doesn't
* cause two transactions to occur.
*/
if (vtable[RECORD].v_access&CHANGED)
vtable[RECORD].v_access &= ~CHANGED;
}
if (vtable[RECORD].v_access&CHANGED) {
vtable[RECORD].v_access &= ~CHANGED;
if (boolean(value(SCRIPT)))
setscript();
}
if (vtable[TAND].v_access&CHANGED) {
vtable[TAND].v_access &= ~CHANGED;
if (boolean(value(TAND)))
tandem("on");
else
tandem("off");
}
if (vtable[LECHO].v_access&CHANGED) {
vtable[LECHO].v_access &= ~CHANGED;
HD = boolean(value(LECHO));
}
if (vtable[PARITY].v_access&CHANGED) {
vtable[PARITY].v_access &= ~CHANGED;
setparity(value(PARITY));
}
}
int
main(int argc, char *argv[])
{
char *system = NOSTR;
int i;
char *p;
char sbuf[15];
gid = getgid();
egid = getegid();
uid = getuid();
euid = geteuid();
if (equal(sname(argv[0]), "cu")) {
cumode = 1;
cumain(argc, argv);
goto cucommon;
}
if (argc > 4) {
(void) fprintf(stderr,
"usage: tip [-v] [-speed] [system-name]\n");
return (1);
}
if (!isatty(0)) {
(void) fprintf(stderr, "tip: must be interactive\n");
return (1);
}
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:
(void) fprintf(stderr, "tip: %s, unknown option\n",
argv[1]);
break;
}
}
(void) setlocale(LC_CTYPE, "");
if (system == NOSTR)
goto notnumber;
for (p = system; *p; p++)
if (isalpha(*p))
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) {
(void) fprintf(stderr,
"tip: phone number too long (max = %d bytes)\n",
sizeof (PNbuf) - 1);
return (1);
}
(void) strncpy(PNbuf, system, sizeof (PNbuf) - 1);
for (p = system; *p; p++)
*p = '\0';
PN = PNbuf;
(void) snprintf(sbuf, sizeof (sbuf), "tip%d", BR);
system = sbuf;
notnumber:
(void) signal(SIGINT, (sig_handler_t)cleanup);
(void) signal(SIGQUIT, (sig_handler_t)cleanup);
(void) signal(SIGHUP, (sig_handler_t)cleanup);
(void) signal(SIGTERM, (sig_handler_t)cleanup);
if ((i = hunt(system)) == 0) {
(void) printf("all ports busy\n");
return (3);
}
if (i == -1) {
(void) printf("link down\n");
delock(uucplock);
return (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. The saved-setuid uid and gid
* allows us to get the original setuid permissions back
* for removing the uucp lock.
*/
userperm();
/*
* Kludge, there's no easy way to get the initialization
* in the right order, so force it here.
* Do the open here, before we change back to real uid.
* We will check whether the open succeeded later, when
* (and if) we actually go to use the file.
*/
if ((PH = getenv("PHONES")) == NOSTR) {
myperm();
PH = "/etc/phones";
}
phfd = fopen(PH, "r");
userperm();
vinit(); /* init variables */
setparity("none"); /* set the parity table */
if ((i = speed(number(value(BAUDRATE)))) == NULL) {
(void) printf("tip: bad baud rate %d\n",
number(value(BAUDRATE)));
myperm();
delock(uucplock);
return (3);
}
/*
* 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()) {
(void) printf("\07%s\n[EOT]\n", p);
myperm();
delock(uucplock);
return (1);
}
/*
* Always setup the tty again here in case hardware flow
* control was selected, which can only be set after the
* connection is made, or in case this is not a hardwired
* modem (rare these days) that likewise can only be setup
* after the connection is made.
*/
ttysetup(i);
cucommon:
/*
* From here down the code is shared with
* the "cu" version of tip.
*/
(void) ioctl(0, TCGETS, (char *)&defarg);
arg = defarg;
/* turn off input processing */
arg.c_lflag &= ~(ICANON|ISIG|ECHO|IEXTEN);
arg.c_cc[VMIN] = 1;
arg.c_cc[VTIME] = 0;
arg.c_iflag &= ~(INPCK|IXON|IXOFF|ICRNL);
arg.c_oflag = 0; /* turn off all output processing */
/* handle tandem mode in case was set in remote file */
if (boolean(value(TAND)))
tandem("on");
else
tandem("off");
raw();
(void) pipe(fildes); (void) pipe(repdes);
(void) signal(SIGALRM, (sig_handler_t)timeout);
/*
* 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.
*/
if (CM != NOSTR) {
(void) sleep(2); /* let line settle */
parwrite(FD, (unsigned char *)CM, strlen(CM));
}
(void) printf(cumode ? "Connected\r\n" : "\07connected\r\n");
(void) signal(SIGCHLD, (sig_handler_t)deadkid);
if (pid = fork())
tipin();
else
tipout();
/*NOTREACHED*/
}
