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

Update fixing dangling connections after detach and trying to adjust some polling behaviors (from Rob Jarratt)

Browse source
This commit is contained in:
Mark Pizzolato 2012-12-08 07:21:28 -08:00
parent badde9b852
commit 2f3782a896
1 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
PDP11/pdp11_dmc.c
View file

@ -546,9 +546,14 @@ t_stat dmc_showpeer (FILE* st, UNIT* uptr, int32 val, void* desc)
{ {
CTLR *controller = dmc_get_controller_from_unit(uptr); CTLR *controller = dmc_get_controller_from_unit(uptr);
if (controller->line->transmit_host[0]) if (controller->line->transmit_host[0])
{
fprintf(st, "PEER=%s", controller->line->transmit_host); fprintf(st, "PEER=%s", controller->line->transmit_host);
}
else else
{
fprintf(st, "PEER Unspecified"); fprintf(st, "PEER Unspecified");
}
return SCPE_OK; return SCPE_OK;
} }
@ -1169,8 +1174,8 @@ void dmc_process_master_clear(CTLR *controller)
controller->transfer_state = Idle; controller->transfer_state = Idle;
dmc_set_run(controller); dmc_set_run(controller);
sim_cancel (controller->device->units); /* stop poll */ //sim_cancel (controller->device->units); /* stop poll */
sim_activate_abs(controller->device->units, clk_cosched (tmxr_poll)); //sim_activate_abs(controller->device->units, clk_cosched (tmxr_poll));
} }
void dmc_start_input_transfer(CTLR *controller) void dmc_start_input_transfer(CTLR *controller)
@ -2225,6 +2230,7 @@ t_stat dmc_reset (DEVICE *dptr)
if (!(dptr->flags & DEV_DIS)) if (!(dptr->flags & DEV_DIS))
{ {
ans = auto_config (dptr->name, DMC_UNITSPERDEVICE); ans = auto_config (dptr->name, DMC_UNITSPERDEVICE);
sim_activate_abs(controller->device->units, clk_cosched (tmxr_poll));
} }
return ans; return ans;
} }
@ -2255,6 +2261,7 @@ int dmc_isattached(CTLR *controller)
t_stat dmc_detach (UNIT *uptr) t_stat dmc_detach (UNIT *uptr)
{ {
CTLR *controller = dmc_get_controller_from_unit(uptr); CTLR *controller = dmc_get_controller_from_unit(uptr);
dmc_error_and_close_receive(controller, "Detach");
dmc_close_master_socket(controller); dmc_close_master_socket(controller);
uptr->flags = uptr->flags & ~UNIT_ATT; /* clear unit attached flag */ uptr->flags = uptr->flags & ~UNIT_ATT; /* clear unit attached flag */
free(uptr->filename); free(uptr->filename);