122 lines
2.1 KiB
C
122 lines
2.1 KiB
C
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <vpi_user.h>
|
|
|
|
#include "ipc.h"
|
|
|
|
struct migensim_softc {
|
|
struct ipc_softc *ipc;
|
|
int has_go;
|
|
};
|
|
|
|
static int h_go(void *user)
|
|
{
|
|
struct migensim_softc *sc = (struct migensim_softc *)user;
|
|
|
|
printf("GO\n");
|
|
sc->has_go = 1;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int h_write(char *name, int nchunks, const unsigned char *chunks, void *user)
|
|
{
|
|
int i;
|
|
|
|
printf("WRITE: %s / nchunks: %d / ", name, nchunks);
|
|
for(i=0;i<nchunks;i++)
|
|
printf("%02hhx", chunks[i]);
|
|
printf("\n");
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int h_read(char *name, void *user)
|
|
{
|
|
printf("READ: %s\n", name);
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int process_until_go(struct migensim_softc *sc)
|
|
{
|
|
sc->has_go = 0;
|
|
while(!sc->has_go) {
|
|
if(!ipc_receive(sc->ipc))
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
static int connect_calltf(char *user)
|
|
{
|
|
struct migensim_softc *sc = (struct migensim_softc *)user;
|
|
vpiHandle sys;
|
|
vpiHandle argv;
|
|
vpiHandle item;
|
|
s_vpi_value value;
|
|
|
|
sys = vpi_handle(vpiSysTfCall, 0);
|
|
argv = vpi_iterate(vpiArgument, sys);
|
|
item = vpi_scan(argv);
|
|
value.format = vpiStringVal;
|
|
vpi_get_value(item, &value);
|
|
|
|
sc->ipc = ipc_connect(value.value.str, h_go, h_write, h_read, sc);
|
|
if(sc->ipc == NULL) {
|
|
perror("ipc_connect");
|
|
vpi_control(vpiFinish, 1);
|
|
return 0;
|
|
}
|
|
|
|
if(!process_until_go(sc)) {
|
|
vpi_control(vpiFinish, 1);
|
|
return 0;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int tick_calltf(char *user)
|
|
{
|
|
struct migensim_softc *sc = (struct migensim_softc *)user;
|
|
|
|
if(!ipc_tick(sc->ipc)) {
|
|
perror("ipc_tick");
|
|
vpi_control(vpiFinish, 1);
|
|
return 0;
|
|
}
|
|
if(!process_until_go(sc)) {
|
|
vpi_control(vpiFinish, 1);
|
|
return 0;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static struct migensim_softc sc;
|
|
|
|
static void simple_register(const char *tfname, PLI_INT32 (*calltf)(PLI_BYTE8*))
|
|
{
|
|
s_vpi_systf_data tf_data;
|
|
|
|
tf_data.type = vpiSysTask;
|
|
tf_data.tfname = tfname;
|
|
tf_data.calltf = calltf;
|
|
tf_data.compiletf = NULL;
|
|
tf_data.sizetf = 0;
|
|
tf_data.user_data = (void *)≻
|
|
vpi_register_systf(&tf_data);
|
|
}
|
|
|
|
static void migensim_register()
|
|
{
|
|
simple_register("$migensim_connect", connect_calltf);
|
|
simple_register("$migensim_tick", tick_calltf);
|
|
}
|
|
|
|
void (*vlog_startup_routines[])() = {
|
|
migensim_register,
|
|
0
|
|
};
|