module PdgMarks:sig
..end
Some more functions are defined in the PDG plugin itself
(in pdg/marks
):
the signatures of these public functions can be found in file Pdg.mli
This file provides useful things to help to associate an information
(called mark) to PDG elements and to propagate it across the
dependencies.
module type Mark =sig
..end
type
select_elem = private
| |
SelNode of |
(* |
zone is
Some z only for nodes that
represent call output in case we want to
select less than the whole OutCall | *) |
| |
SelIn of |
val mk_select_node : ?z_opt:Locations.Zone.t option -> PdgTypes.Node.t -> select_elem
val mk_select_undef_zone : Locations.Zone.t -> select_elem
type'tm
select =(select_elem * 'tm) list
val add_to_select : 'tm select -> select_elem -> 'tm -> 'tm select
val add_node_to_select : 'tm select ->
PdgTypes.Node.t * Locations.Zone.t option -> 'tm -> 'tm select
val add_undef_in_to_select : 'tm select -> Locations.Zone.t option -> 'tm -> 'tm select
type 'tm
pdg_select_info =
| |
SelList of |
| |
SelTopMarks of |
t_select
associated with its pdg when dealing
with several functions at one time.type'tm
pdg_select =(PdgTypes.Pdg.t * 'tm pdg_select_info) list
type'tm
info_caller_inputs =(PdgIndex.Signature.in_key * 'tm) list
type'tm
info_called_outputs =(Cil_types.stmt * (PdgIndex.Signature.out_key * 'tm) list) list
stmt
are the calls to consider.type'tm
info_inter ='tm info_caller_inputs * 'tm info_called_outputs
module type Fct =sig
..end
module F_Fct:
Mark
),
we have that, after the marks propagation,
the mark of a node are always smaller than the sum of the marks of its
dependencies.
type't_mark
m2m =select_elem -> 't_mark -> 't_mark option
type't_mark
call_m2m =Cil_types.stmt option -> PdgTypes.Pdg.t -> 't_mark m2m
module type Proj =sig
..end
module type Config =sig
..end