folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

CONSOLE: Add REGister reflecting console character output count

Browse source
This commit is contained in:
Mark Pizzolato 2020-11-01 09:41:40 -08:00
parent 2a87c499f0
commit a02b87625c
1 changed files with 11 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
sim_console.c
View file

@ -190,6 +190,7 @@ t_bool sim_signaled_int_char /* WRU character detecte
#endif
uint32 sim_last_poll_kbd_time; /* time when sim_poll_kbd was called */
extern TMLN *sim_oline; /* global output socket */
static uint32 sim_con_pos; /* console character output count */
static t_stat sim_con_poll_svc (UNIT *uptr); /* console connection poll routine */
static t_stat sim_con_reset (DEVICE *dptr); /* console reset routine */
@ -226,6 +227,7 @@ static REG sim_con_reg[] = {
{ ORDATAD (BRK, sim_brk_char, 8, "break character") },
{ ORDATAD (DEL, sim_del_char, 8, "delete character ") },
{ ORDATAD (PCHAR, sim_tt_pchar, 32, "printable character mask") },
{ DRDATAD (CONSOLE_POS, sim_con_pos, 32, "character output count") },
{ 0 },
};
@ -2907,6 +2909,7 @@ t_stat sim_putchar (int32 c)
sim_exp_check (&sim_con_expect, c);
if ((sim_con_tmxr.master == 0) && /* not Telnet? */
(sim_con_ldsc.serport == 0)) { /* and not serial port */
++sim_con_pos; /* bookkeeping */
if (sim_log) /* log file? */
fputc (c, sim_log);
sim_debug (DBG_XMT, &sim_con_telnet, "sim_putchar('%c' (0x%02X)\n", sim_isprint (c) ? c : '.', c);
@ -2919,6 +2922,7 @@ if (!sim_con_ldsc.conn) { /* no Telnet or serial c
sim_con_ldsc.rcve = 1; /* rcv enabled */
}
tmxr_putc_ln (&sim_con_ldsc, c); /* output char */
++sim_con_pos; /* bookkeeping */
tmxr_poll_tx (&sim_con_tmxr); /* poll xmt */
return SCPE_OK;
}
@ -2930,6 +2934,7 @@ t_stat r;
sim_exp_check (&sim_con_expect, c);
if ((sim_con_tmxr.master == 0) && /* not Telnet? */
(sim_con_ldsc.serport == 0)) { /* and not serial port */
++sim_con_pos; /* bookkeeping */
if (sim_log) /* log file? */
fputc (c, sim_log);
sim_debug (DBG_XMT, &sim_con_telnet, "sim_putchar('%c' (0x%02X)\n", sim_isprint (c) ? c : '.', c);
@ -2942,6 +2947,8 @@ if (!sim_con_ldsc.conn) { /* no Telnet or serial c
sim_con_ldsc.rcve = 1; /* rcv enabled */
}
r = tmxr_putc_ln (&sim_con_ldsc, c); /* Telnet output */
if (r == SCPE_OK)
++sim_con_pos; /* bookkeeping */
tmxr_poll_tx (&sim_con_tmxr); /* poll xmt */
return r; /* return status */
}