int tty_close()
{
if(!tty_port) return ME_CLOSE;
DEBUG(('M',2,"tty_close"));
fflush(stdin);fflush(stdout);
tty_cooked();
fclose(stdin);fclose(stdout);
tty_unlock(tty_port);
xfree(tty_port);
return ME_OK;
}
int tty_alt(register int fd)
{
register Edit_t *ep = (Edit_t*)(shgd->ed_context);
int mask;
struct tchars ttychars;
switch(ep->e_raw)
{
case ECHOMODE:
return(-1);
case ALTMODE:
return(0);
case RAWMODE:
tty_cooked(fd);
}
l_changed = 0;
if( ep->e_ttyspeed == 0)
{
if((tty_get(fd,&ttyparm) != SYSERR))
ep->e_ttyspeed = (ttyparm.sg_ospeed>=B1200?FAST:SLOW);
ep->e_raw = ALTMODE;
}
if(ioctl(fd,TIOCGETC,&l_ttychars) == SYSERR)
return(-1);
if(ioctl(fd,TIOCLGET,&l_mask)==SYSERR)
return(-1);
ttychars = l_ttychars;
mask = LCRTBS|LCRTERA|LCTLECH|LPENDIN|LCRTKIL;
if((l_mask|mask) != l_mask)
l_changed = L_MASK;
if(ioctl(fd,TIOCLBIS,&mask)==SYSERR)
return(-1);
if(ttychars.t_brkc!=ESC)
{
ttychars.t_brkc = ESC;
l_changed |= T_CHARS;
if(ioctl(fd,TIOCSETC,&ttychars) == SYSERR)
return(-1);
}
return(0);
}
int tty_alt(register int fd)
{
register Edit_t *ep = (Edit_t*)(shgd->ed_context);
switch(ep->e_raw)
{
case ECHOMODE:
return(-1);
case ALTMODE:
return(0);
case RAWMODE:
tty_cooked(fd);
}
if((tty_get(fd, &ttyparm)==SYSERR) || (!(ttyparm.c_lflag&ECHO)))
return(-1);
# ifdef FLUSHO
ttyparm.c_lflag &= ~FLUSHO;
# endif /* FLUSHO */
nttyparm = ttyparm;
ep->e_eof = ttyparm.c_cc[VEOF];
# ifdef ECHOCTL
/* escape character echos as ^[ */
nttyparm.c_lflag |= (ECHOE|ECHOK|ECHOCTL|PENDIN|IEXTEN);
nttyparm.c_cc[VEOL] = ESC;
# else
/* switch VEOL2 and EOF, since EOF isn't echo'd by driver */
nttyparm.c_lflag |= (ECHOE|ECHOK);
nttyparm.c_cc[VEOF] = ESC; /* make ESC the eof char */
# ifdef VEOL2
nttyparm.c_iflag &= ~(IGNCR|ICRNL);
nttyparm.c_iflag |= INLCR;
nttyparm.c_cc[VEOL] = '\r'; /* make CR an eol char */
nttyparm.c_cc[VEOL2] = ep->e_eof; /* make EOF an eol char */
# else
nttyparm.c_cc[VEOL] = ep->e_eof; /* make EOF an eol char */
# endif /* VEOL2 */
# endif /* ECHOCTL */
# ifdef VREPRINT
nttyparm.c_cc[VREPRINT] = _POSIX_DISABLE;
# endif /* VREPRINT */
# ifdef VDISCARD
nttyparm.c_cc[VDISCARD] = _POSIX_DISABLE;
# endif /* VDISCARD */
# ifdef VWERASE
if(ttyparm.c_cc[VWERASE] == _POSIX_DISABLE)
nttyparm.c_cc[VWERASE] = cntl('W');
ep->e_werase = nttyparm.c_cc[VWERASE];
# else
ep->e_werase = cntl('W');
# endif /* VWERASE */
# ifdef VLNEXT
if(ttyparm.c_cc[VLNEXT] == _POSIX_DISABLE )
nttyparm.c_cc[VLNEXT] = cntl('V');
ep->e_lnext = nttyparm.c_cc[VLNEXT];
# else
ep->e_lnext = cntl('V');
# endif /* VLNEXT */
ep->e_erase = ttyparm.c_cc[VERASE];
ep->e_kill = ttyparm.c_cc[VKILL];
if( tty_set(fd, TCSADRAIN, &nttyparm) == SYSERR )
return(-1);
ep->e_ttyspeed = (cfgetospeed(&ttyparm)>=B1200?FAST:SLOW);
ep->e_raw = ALTMODE;
return(0);
}
static void answer_mode(int type)
{
int rc, spd;char *cs;
struct sockaddr_in sa;
socklen_t ss=sizeof(sa);
sts_t sts;
if(cfgs(CFG_ROOTDIR)&&ccs[0])chdir(ccs);
rnode=xcalloc(1,sizeof(ninfo_t));
is_ip=!isatty(0);
xstrcpy(ip_id,"ipline",10);
rnode->tty=xstrdup(is_ip?(bink?"binkp":"tcpip"):basename(ttyname(0)));
rnode->options|=O_INB;
if(!log_init(cfgs(CFG_LOG),rnode->tty)) {
printf("can't open log %s!\n",ccs);
exit(S_FAILURE);
}
signal(SIGINT,SIG_IGN);
signal(SIGTERM,sigerr);
signal(SIGSEGV,sigerr);
signal(SIGFPE,sigerr);
signal(SIGPIPE,SIG_IGN);
IFPerl(perl_init(cfgs(CFG_PERLFILE),0));
log_callback=NULL;xsend_cb=NULL;
ssock=cls_conn(CLS_LINE,cfgs(CFG_SERVER),NULL);
if(ssock<0)write_log("can't connect to server: %s",strerror(errno));
else log_callback=vlogs;
rc=aso_init(cfgs(CFG_ASOOUTBOUND),cfgs(CFG_BSOOUTBOUND),cfgs(CFG_QSTOUTBOUND),cfgal(CFG_ADDRESS)->addr.z);
if(!rc) {
write_log("No outbound defined");
stopit(S_FAILURE);
}
write_log("answering incoming call");vidle();
if(is_ip&&!getpeername(0,(struct sockaddr*)&sa,&ss)) {
write_log("remote is %s",inet_ntoa(sa.sin_addr));
spd=TCP_SPEED;
} else {
cs=getenv("CONNECT");spd=cs?atoi(cs):0;
xfree(connstr);connstr=xstrdup(cs);
if(cs&&spd)write_log("*** CONNECT %s",cs);
else {
write_log("*** CONNECT Unknown");
spd=DEFAULT_SPEED;
}
}
if((cs=getenv("CALLER_ID"))&&strcasecmp(cs,"none")&&strlen(cs)>3)write_log("caller-id: %s",cs);
tty_setattr(0);
tty_local(0);
rc=session(0,type,NULL,spd);
tty_local(1);
if(!is_ip) {
hangup();
stat_collect();
}
tty_cooked();
if((S_OK==(rc&S_MASK))&&cfgi(CFG_HOLDONSUCCESS)) {
log_done();
log_init(cfgs(CFG_MASTERLOG),NULL);
aso_getstatus(&rnode->addrs->addr, &sts);
sts.flags|=(Q_WAITA|Q_WAITR|Q_WAITX);
sts.htime=MAX(t_set(cci*60),sts.htime);
write_log("calls to %s delayed for %d min after successful incoming session",
ftnaddrtoa(&rnode->addrs->addr),cci);
aso_setstatus(&rnode->addrs->addr,&sts);
log_done();
log_init(cfgs(CFG_LOG),rnode->tty);
}
title("Waiting...");
vidle();sline("");
aso_done();
stopit(rc);
}
