/* returns the time (since 1970) of next event (tick) */
int check_event(int time, struct session *ses)
{
int tt; /* tick time */
int et; /* event time */
struct eventnode *ev;
assert(ses != NULL);
/* events check - that should be done in #delay */
while ((ev=ses->events) && (ev->time<=time))
{
ses->events=ev->next;
execute_event(ev, ses);
TFREE(ev, struct eventnode);
if (any_closed)
return -1;
}
et = (ses->events) ? ses->events->time : 0;
/* ticks check */
tt = ses->time0 + ses->tick_size; /* expected time of tick */
if (tt <= time)
{
if (ses->tickstatus)
tintin_puts1("#TICK!!!", ses);
if (any_closed)
return -1;
ses->time0 = time - (time - ses->time0) % ses->tick_size;
tt = ses->time0 + ses->tick_size;
}
else if (ses->tickstatus && tt-ses->pretick==time
&& ses->tick_size>ses->pretick && time!=ses->time10)
{
tintin_puts1("#10 SECONDS TO TICK!!!", ses);
if (any_closed)
return -1;
ses->time10=time;
}
if (ses->tickstatus && ses->tick_size>ses->pretick && tt-time>ses->pretick)
tt-=ses->pretick;
return (et<tt && et!=0) ? et : tt;
}
static void tintin(void)
{
int i, result, maxfd;
struct timeval tv;
fd_set readfdmask;
#ifdef XTERM_TITLE
struct session *lastsession=0;
#endif
char kbdbuf[BUFFER_SIZE];
WC ch;
int inbuf=0;
mbstate_t instate;
memset(&instate, 0, sizeof(instate));
for (;;)
{
#ifdef XTERM_TITLE
if (ui_own_output && activesession!=lastsession)
{
lastsession=activesession;
if (activesession==nullsession)
user_title(XTERM_TITLE, "(no session)");
else
user_title(XTERM_TITLE, activesession->name);
}
#endif
tv.tv_sec = check_events();
tv.tv_usec = 0;
maxfd=0;
FD_ZERO(&readfdmask);
if (!eofinput)
FD_SET(0, &readfdmask);
else if (activesession==nullsession)
end_command(0, activesession);
for (struct session *ses = sessionlist; ses; ses = ses->next)
{
if (ses==nullsession)
continue;
if (ses->nagle)
flush_socket(ses);
FD_SET(ses->socket, &readfdmask);
if (ses->socket>maxfd)
maxfd=ses->socket;
}
result = select(maxfd+1, &readfdmask, 0, 0, &tv);
if (need_resize)
{
char buf[BUFFER_SIZE];
user_resize();
sprintf(buf, "#NEW SCREEN SIZE: %dx%d.", COLS, LINES);
tintin_puts1(buf, activesession);
}
if (result == 0)
continue;
else if (result < 0 && errno == EINTR)
continue; /* Interrupted system call */
else if (result < 0)
syserr("select");
if (FD_ISSET(0, &readfdmask))
{
PROFSTART;
PROFPUSH("user interface");
result=read(0, kbdbuf+inbuf, BUFFER_SIZE-inbuf);
if (result==-1)
myquitsig(0);
if (result==0 && !isatty(0))
eofinput=true;
inbuf+=result;
i=0;
while (i<inbuf)
{
result=mbrtowc(&ch, kbdbuf+i, inbuf-i, &instate);
if (result==-2) /* incomplete but valid sequence */
{
memmove(kbdbuf, kbdbuf+i, inbuf-i);
inbuf-=i;
goto partial;
}
else if (result==-1) /* invalid sequence */
{
ch=0xFFFD;
i++;
errno=0;
/* Shift by 1 byte. We can use a more intelligent shift,
* but staying charset-agnostic makes the code simpler.
*/
}
else if (result==0) /* literal 0 */
i++; /* oops... bad ISO/ANSI, bad */
else
i+=result;
if (user_process_kbd(activesession, ch))
{
hist_num=-1;
if (term_echoing || (got_more_kludge && done_input[0]))
/* got_more_kludge: echo any non-empty line */
{
if (activesession && *done_input)
if (strcmp(done_input, prev_command))
do_history(done_input, activesession);
if (activesession->echo)
echo_input(done_input);
if (activesession->logfile)
write_logf(activesession, done_input,
activesession->loginputprefix, activesession->loginputsuffix);
}
if (*done_input)
strcpy(prev_command, done_input);
aborting=false;
activesession = parse_input(done_input, false, activesession);
recursion=0;
}
}
inbuf=0;
partial:
PROFEND(kbd_lag, kbd_cnt);
PROFPOP;
}
for (struct session *ses = sessionlist; ses; ses = ses->next)
{
if (ses->socket && FD_ISSET(ses->socket, &readfdmask))
{
aborting=false;
any_closed=false;
do
{
read_mud(ses);
if (any_closed)
{
any_closed=false;
goto after_read;
/* The remaining sessions will be done after select() */
}
#ifdef HAVE_ZLIB
} while (ses->mccp_more);
#else
} while (0);
#endif
}
}
after_read:
if (activesession->server_echo
&& (2-activesession->server_echo != gotpassword))
{
gotpassword= 2-activesession->server_echo;
if (!gotpassword)
got_more_kludge=false;
user_passwd(gotpassword && !got_more_kludge);
term_echoing=!gotpassword;
}
}
