alarsyo/spot
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

NIPS VM added to the SPOT distribution.

Browse source 
2008-05-29  Guillaume SADEGH  <sadegh@lrde.epita.fr>

	* iface/nips/nips.cc, iface/nips/nips.hh, iface/nips/common.cc,
	iface/nips/common.hh, iface/nips/Makefile.am: TGBA implementation
	with the NIPS library.
	* iface/nips/emptiness_check.cc: Emptiness check on a Promela
	interface.
	* iface/nips/dottynips.cc: Dot printer on the NIPS interface.
	* iface/nips/compile.sh: Add. Wrapper around nips compiler to
	compile Promela to NIPS bytecode.
	* iface/nips/nips_vm,iface/nips/nips_vm/bytecode.h,
	iface/nips/nips_vm/ChangeLog, iface/nips/nips_vm/COPYING,
	iface/nips/nips_vm/hashtab.c, iface/nips/nips_vm/hashtab.h,
	iface/nips/nips_vm/INSTALL, iface/nips/nips_vm/instr.c,
	iface/nips/nips_vm/instr.h, iface/nips/nips_vm/instr_step.c,
	iface/nips/nips_vm/instr_step.h,
	iface/nips/nips_vm/instr_tools.c,
	iface/nips/nips_vm/instr_tools.h,
	iface/nips/nips_vm/instr_wrap.c,
	iface/nips/nips_vm/instr_wrap.h,
	iface/nips/nips_vm/interactive.c,
	iface/nips/nips_vm/interactive.h, iface/nips/nips_vm/main.c,
	iface/nips/nips_vm/Makefile, iface/nips/nips_vm/Makefile.am,
	iface/nips/nips_vm/nips_asm_help.pl,
	iface/nips/nips_vm/nips_asm_instr.pl,
	iface/nips/nips_vm/nips_asm.pl,
	iface/nips/nips_vm/nips_disasm.pl, iface/nips/nips_vm/nipsvm.c,
	iface/nips/nips_vm/nipsvm.h, iface/nips/nips_vm/README,
	iface/nips/nips_vm/rt_err.c, iface/nips/nips_vm/rt_err.h,
	iface/nips/nips_vm/search.c, iface/nips/nips_vm/search.h,
	iface/nips/nips_vm/split.c, iface/nips/nips_vm/split.h,
	iface/nips/nips_vm/state.c, iface/nips/nips_vm/state.h,
	iface/nips/nips_vm/state_inline.h,
	iface/nips/nips_vm/state_parts.c,
	iface/nips/nips_vm/state_parts.h, iface/nips/nips_vm/timeval.h,
	iface/nips/nips_vm/tools.h: NIPS VM added to the SPOT
	distribution.
	* configure.ac, iface/Makefile.am: Build system updated for the
	NIPS front-end.
This commit is contained in:
Guillaume Sadegh 2008-04-02 17:43:54 +02:00
parent 543190f2bc
commit bc5f13bb4e
57 changed files with 11464 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

103
iface/nips/nips_vm/state_parts.c Normal file
View file

@ -0,0 +1,103 @@
/* NIPS VM - New Implementation of Promela Semantics Virtual Machine
* Copyright (C) 2005: Stefan Schuermans <stefan@schuermans.info>
* Michael Weber <michaelw@i2.informatik.rwth-aachen.de>
* Lehrstuhl fuer Informatik II, RWTH Aachen
* Copyleft: GNU public license - http://www.gnu.org/copyleft/gpl.html
*/
#include "state.h"
#include "state_parts.h"
// get size of a global/process/channel part from pointer
unsigned int glob_part_size( char *p_glob_part ) // extern
{
return global_state_size_noproc_nochan( (st_global_state_header *)p_glob_part );
}
unsigned int proc_part_size( char *p_proc_part ) // extern
{
return process_size( (st_process_header *)p_proc_part );
}
unsigned int chan_part_size( char *p_chan_part ) // extern
{
return channel_size( (st_channel_header *)p_chan_part );
}
// split up a global state into its parts
// - callbacks are called with pointer to the different parts
// - 1x glob_cb, Nx proc_cb, Mx chan_cb
// - memory pointed to is read only and only valid within callback
void state_parts( st_global_state_header *p_glob, // the global state to split up
t_glob_part_cb glob_cb, t_proc_part_cb proc_cb, t_chan_part_cb chan_cb, // the callbacks to call
void *p_ctx ) // extern
{
char *ptr = (char *)p_glob;
unsigned int sz, i;
// report global part to callback
sz = global_state_size_noproc_nochan( (st_global_state_header *)ptr );
glob_cb( ptr, sz, p_ctx );
ptr += sz;
// report process parts to callback
for( i = 0; i < p_glob->proc_cnt; i++ )
{
sz = process_size( (st_process_header *)ptr );
proc_cb( ptr, sz, p_ctx );
ptr += sz;
}
// report channel parts to callback
for( i = 0; i < p_glob->chan_cnt; i++ )
{
sz = channel_size( (st_channel_header *)ptr );
chan_cb( ptr, sz, p_ctx );
ptr += sz;
}
}
// recreate a global state from its parts
// - callbacks are called to retrieve parts of state
// - 1x glob_cb, Nx proc_cb, Mx chan_cb
// - state is restored in buffer pointed to by p_buf of length buf_len
// - pointer to start of buffer is returned, or NULL if buffer too small
st_global_state_header * state_restore( char *p_buf, unsigned int buf_len,
t_glob_restore_cb glob_cb, t_proc_restore_cb proc_cb, t_chan_restore_cb chan_cb, // the callbacks to call
void *p_ctx ) // extern
{
st_global_state_header *p_glob = (st_global_state_header *)p_buf;
unsigned int sz, i;
// get global part
sz = glob_cb( p_buf, buf_len, p_ctx );
if( sz <= 0 || sz >= buf_len )
return NULL;
p_buf += sz;
buf_len -= sz;
// get processes
for( i = 0; i < p_glob->proc_cnt; i++ )
{
sz = proc_cb( p_buf, buf_len, p_ctx );
if( sz <= 0 || sz >= buf_len )
return NULL;
p_buf += sz;
buf_len -= sz;
}
// get channels
for( i = 0; i < p_glob->chan_cnt; i++ )
{
sz = chan_cb( p_buf, buf_len, p_ctx );
if( sz <= 0 || sz >= buf_len )
return NULL;
p_buf += sz;
buf_len -= sz;
}
// return assembled state
return p_glob;
}