mirror of
https://github.com/steveicarus/iverilog.git
synced 2026-08-29 01:03:29 +02:00
Stephen Williams
cea237b407
By adding ivtest to the iverilog source tree, it is easier to keep the regression test synchronized with the source that is being tested. This should be especially helpful for PRs that add a new feature, and have a matching ivtest PR with the regression test for that feature.
97 lines
2.2 KiB
C
97 lines
2.2 KiB
C
# include <vpi_user.h>
|
|
# include <stdlib.h>
|
|
|
|
#ifdef IVERILOG_V0_8
|
|
static PLI_INT32 memmonitor_compiletf(char*name)
|
|
#else
|
|
static PLI_INT32 memmonitor_compiletf(PLI_BYTE8*name)
|
|
#endif
|
|
{
|
|
vpiHandle sys = vpi_handle(vpiSysTfCall,0);
|
|
vpiHandle argv = vpi_iterate(vpiArgument, sys);
|
|
vpiHandle arg;
|
|
|
|
if (argv == 0) {
|
|
vpi_printf("ERROR: %s expects at least 1 argument.\n", name);
|
|
vpi_control(vpiFinish, 1);
|
|
return 0;
|
|
}
|
|
|
|
while ( (arg = vpi_scan(argv)) ) {
|
|
if (vpi_get(vpiType, arg) != vpiMemory) {
|
|
vpi_printf("ERROR: %s expects only memory arguments\n", name);
|
|
vpi_control(vpiFinish, 1);
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static PLI_INT32 callback(struct t_cb_data*cb)
|
|
{
|
|
vpi_printf("ValueChange: index=%d, value=%s\n",
|
|
(int)cb->index, cb->value->value.str);
|
|
return 0;
|
|
}
|
|
|
|
static PLI_INT32 cleanup(struct t_cb_data*cb)
|
|
{
|
|
free(cb->value);
|
|
return 0;
|
|
}
|
|
|
|
#ifdef IVERILOG_V0_8
|
|
static PLI_INT32 memmonitor_calltf(char*name)
|
|
#else
|
|
static PLI_INT32 memmonitor_calltf(PLI_BYTE8*name)
|
|
#endif
|
|
{
|
|
vpiHandle sys = vpi_handle(vpiSysTfCall,0);
|
|
vpiHandle argv = vpi_iterate(vpiArgument, sys);
|
|
vpiHandle arg;
|
|
|
|
(void)name; /* Parameter is not used. */
|
|
|
|
while ( (arg = vpi_scan(argv)) ) {
|
|
s_cb_data cb_data;
|
|
|
|
cb_data.reason = cbValueChange;
|
|
cb_data.cb_rtn = callback;
|
|
cb_data.obj = arg;
|
|
cb_data.time = 0;
|
|
cb_data.value = malloc(sizeof(struct t_vpi_value));
|
|
cb_data.index = 0;
|
|
cb_data.user_data = 0;
|
|
|
|
cb_data.value->format = vpiBinStrVal;
|
|
cb_data.value->value.str = 0;
|
|
|
|
vpi_register_cb(&cb_data);
|
|
|
|
cb_data.reason = cbEndOfSimulation;
|
|
cb_data.cb_rtn = cleanup;
|
|
vpi_register_cb(&cb_data);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void memmonitor_register(void)
|
|
{
|
|
s_vpi_systf_data tf_data;
|
|
|
|
tf_data.type = vpiSysTask;
|
|
tf_data.tfname = "$memmonitor";
|
|
tf_data.calltf = memmonitor_calltf;
|
|
tf_data.compiletf = memmonitor_compiletf;
|
|
tf_data.sizetf = 0;
|
|
tf_data.user_data = "$memmonitor";
|
|
vpi_register_systf(&tf_data);
|
|
}
|
|
|
|
void (*vlog_startup_routines[])(void) = {
|
|
memmonitor_register,
|
|
0
|
|
};
|