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

TMXR: Actively flush output prior to assessing wait time

Browse source
This commit is contained in:
Mark Pizzolato 2018-06-13 04:06:20 -07:00
parent 3973963b0c
commit a3d8cc6118
1 changed files with 10 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
sim_tmxr.c
View file

@ -2267,10 +2267,8 @@ for (i = 0; i < mp->lines; i++) { /* loop thru lines */
#endif #endif
if ((lp->xmte == 0) && if ((lp->xmte == 0) &&
((lp->txbps == 0) || ((lp->txbps == 0) ||
(lp->txnexttime <= sim_gtime ()))) { (lp->txnexttime <= sim_gtime ())))
lp->xmte = 1; /* enable line transmit */ lp->xmte = 1; /* enable line transmit */
lp->txnexttime = 0.0;
}
} }
} /* end for */ } /* end for */
} }
@ -4107,16 +4105,21 @@ for (i=0; i<mp->lines; i++) {
if (lp->rxnexttime > sim_gtime_now) if (lp->rxnexttime > sim_gtime_now)
due = (int32)(lp->rxnexttime - sim_gtime_now); due = (int32)(lp->rxnexttime - sim_gtime_now);
else else
due = sim_processing_event ? 1 : 0; /* avoid potential infinite loop if called from service routine */ due = sim_processing_event ? 1 : 0; /* avoid potential infinite loop if called from service routine */
sooner = MIN(sooner, due); sooner = MIN(sooner, due);
} }
if ((uptr == lp->o_uptr) && /* output completion unit? */ if ((uptr == lp->o_uptr) && /* output completion unit? */
(lp->txbps) && /* while rate limiting */ (lp->txbps)) { /* while rate limiting */
(lp->txnexttime)) { /* with queued output data */
if (lp->txnexttime > sim_gtime_now) if (lp->txnexttime > sim_gtime_now)
due = (int32)(lp->txnexttime - sim_gtime_now); due = (int32)(lp->txnexttime - sim_gtime_now);
else else {
if (tmxr_tqln(lp)) { /* pending output data? */
tmxr_send_buffered_data (lp);/* flush it */
--i; /* backup line number */
continue; /* go try again */
}
due = sim_processing_event ? 1 : 0; /* avoid potential infinite loop if called from service routine */ due = sim_processing_event ? 1 : 0; /* avoid potential infinite loop if called from service routine */
}
if (i == 0) if (i == 0)
sooner = due; sooner = due;
else else