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

VAX: Add debug support to the CLK device

Browse source
This commit is contained in:
Mark Pizzolato 2016-04-27 12:23:49 -07:00
parent 717f3820b9
commit 3f4eed7517
1 changed files with 22 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

26
VAX/vax_stddev.c
View file

@ -239,12 +239,22 @@ MTAB clk_mod[] = {
{ 0 } { 0 }
}; };
#define DBG_REG 1 /* TODR register access */
#define DBG_TIC 2 /* clock ticks */
DEBTAB clk_debug[] = {
{"REG", DBG_REG, "TODR register access"},
{"TIC", DBG_TIC, "clock ticks"},
{0}
};
DEVICE clk_dev = { DEVICE clk_dev = {
"CLK", &clk_unit, clk_reg, clk_mod, "CLK", &clk_unit, clk_reg, clk_mod,
1, 0, 8, 4, 0, 32, 1, 0, 8, 4, 0, 32,
NULL, NULL, &clk_reset, NULL, NULL, &clk_reset,
NULL, &clk_attach, &clk_detach, NULL, &clk_attach, &clk_detach,
&clk_dib, 0, 0, NULL, NULL, NULL, &clk_help, NULL, NULL, &clk_dib, DEV_DEBUG, 0, clk_debug,
NULL, NULL, &clk_help, NULL, NULL,
&clk_description &clk_description
}; };
@ -460,11 +470,15 @@ int32 todr_rd (void)
TOY *toy = (TOY *)clk_unit.filebuf; TOY *toy = (TOY *)clk_unit.filebuf;
struct timespec base, now, val; struct timespec base, now, val;
if ((fault_PC&0xFFFE0000) == 0x20040000) /* running from ROM? */ if ((fault_PC&0xFFFE0000) == 0x20040000) { /* running from ROM? */
sim_debug (DBG_REG, &clk_dev, "todr_rd(ROM) - TODR=0x%X\n", todr_reg);
return todr_reg; /* return counted value for ROM diags */ return todr_reg; /* return counted value for ROM diags */
}
if (0 == todr_reg) /* clock running? */ if (0 == todr_reg) { /* clock running? */
sim_debug (DBG_REG, &clk_dev, "todr_rd(Not Running) - TODR=0x%X\n", todr_reg);
return todr_reg; return todr_reg;
}
/* Maximum number of seconds which can be represented as 10ms ticks /* Maximum number of seconds which can be represented as 10ms ticks
in the 32bit TODR. This is the 33bit value 0x100000000/100 to get seconds */ in the 32bit TODR. This is the 33bit value 0x100000000/100 to get seconds */
@ -475,9 +489,12 @@ base.tv_sec = toy->toy_gmtbase;
base.tv_nsec = toy->toy_gmtbasemsec * 1000000; base.tv_nsec = toy->toy_gmtbasemsec * 1000000;
sim_timespec_diff (&val, &now, &base); sim_timespec_diff (&val, &now, &base);
if (val.tv_sec >= TOY_MAX_SECS) /* todr overflowed? */ if (val.tv_sec >= TOY_MAX_SECS) { /* todr overflowed? */
sim_debug (DBG_REG, &clk_dev, "todr_rd(Overflowed) - TODR=0x%X\n", 0);
return todr_reg = 0; /* stop counting */ return todr_reg = 0; /* stop counting */
}
sim_debug (DBG_REG, &clk_dev, "todr_rd() - TODR=0x%X\n", (int32)(val.tv_sec*100 + val.tv_nsec/10000000));
return (int32)(val.tv_sec*100 + val.tv_nsec/10000000); /* 100hz Clock Ticks */ return (int32)(val.tv_sec*100 + val.tv_nsec/10000000); /* 100hz Clock Ticks */
} }
@ -500,6 +517,7 @@ toy->toy_gmtbasemsec = base.tv_nsec/1000000;
todr_reg = data; todr_reg = data;
if (data) if (data)
todr_blow = 0; todr_blow = 0;
sim_debug (DBG_REG, &clk_dev, "todr_wr(0x%X) - TODR=0x%X blow=%d\n", data, todr_reg, todr_blow);
} }
/* TODR resync routine */ /* TODR resync routine */