framac: 18 -> 19 and update why3

This commit is contained in:
Jake Waksbaum 2019-06-18 19:01:38 -07:00 committed by Vincent Laporte
parent 3ffe0dce2b
commit 3ab32ee8f6
6 changed files with 112 additions and 72 deletions

View File

@ -0,0 +1,11 @@
diff --git a/configure b/configure
--- a/configure
+++ b/configure
@@ -4029,7 +4029,6 @@ fi
if test "$USEOCAMLFIND" = yes; then
OCAMLFINDLIB=$(ocamlfind printconf stdlib)
- OCAMLFIND=$(which ocamlfind)
if test "$OCAMLFINDLIB" != "$OCAMLLIB"; then
USEOCAMLFIND=no;
echo "but your ocamlfind is not compatible with your ocamlc:"

View File

@ -1,4 +1,5 @@
{ fetchurl, stdenv, ocamlPackages, coq }: { callPackage, fetchurl, stdenv
, ocamlPackages, coqPackages, rubber, hevea, emacs }:
stdenv.mkDerivation rec { stdenv.mkDerivation rec {
name = "why3-${version}"; name = "why3-${version}";
@ -9,14 +10,34 @@ stdenv.mkDerivation rec {
sha256 = "0xz001jhi71ja8vqrjz27v63bidrzj4qvg1yqarq6p4dmpxhk348"; sha256 = "0xz001jhi71ja8vqrjz27v63bidrzj4qvg1yqarq6p4dmpxhk348";
}; };
buildInputs = (with ocamlPackages; [ buildInputs = with ocamlPackages; [
ocaml findlib num lablgtk ocamlgraph zarith menhir ]) ++ ocaml findlib ocamlgraph zarith menhir
stdenv.lib.optionals (ocamlPackages.ocaml == coq.ocamlPackages.ocaml ) [ # Compressed Sessions
coq ocamlPackages.camlp5 # Emacs compilation of why3.el
]; emacs
# Documentation
rubber hevea
# GUI
lablgtk
# WebIDE
js_of_ocaml js_of_ocaml-ppx
# Coq Support
coqPackages.coq coqPackages.flocq ocamlPackages.camlp5
];
propagatedBuildInputs = with ocamlPackages; [ camlzip num ];
enableParallelBuilding = true;
# Remove unnecessary call to which
patches = [ ./configure.patch ];
configureFlags = [ "--enable-verbose-make" ];
installTargets = [ "install" "install-lib" ]; installTargets = [ "install" "install-lib" ];
passthru.withProvers = callPackage ./with-provers.nix {};
meta = with stdenv.lib; { meta = with stdenv.lib; {
description = "A platform for deductive program verification"; description = "A platform for deductive program verification";
homepage = "http://why3.lri.fr/"; homepage = "http://why3.lri.fr/";

View File

@ -0,0 +1,30 @@
{ stdenv, makeWrapper, runCommand, symlinkJoin, why3 }:
provers:
let configAwkScript = runCommand "why3-conf.awk" { inherit provers; }
''
for p in $provers; do
for b in $p/bin/*; do
BASENAME=$(basename $b)
echo "/^command =/{ gsub(\"$BASENAME\", \"$b\") }" >> $out
done
done
echo '{ print }' >> $out
'';
in stdenv.mkDerivation {
name = "${why3.name}-with-provers";
phases = [ "buildPhase" "installPhase" ];
buildInputs = [ why3 makeWrapper ] ++ provers;
buildPhase = ''
mkdir -p $out/share/why3/
why3 config --detect-provers -C $out/share/why3/why3.conf
awk -i inplace -f ${configAwkScript} $out/share/why3/why3.conf
'';
installPhase = ''
mkdir -p $out/bin
makeWrapper ${why3}/bin/why3 $out/bin/why3 --add-flags "--extra-config $out/share/why3/why3.conf"
'';
}

View File

@ -1,87 +1,77 @@
{ stdenv, fetchurl, makeWrapper, ncurses, ocamlPackages, graphviz { lib, stdenv, fetchurl, makeWrapper, writeText
, ltl2ba, coq, why3, autoconf , autoconf, ncurses, graphviz, doxygen
, ocamlPackages, ltl2ba, coq, why3,
}: }:
let let
mkocamlpath = p: "${p}/lib/ocaml/${ocamlPackages.ocaml.version}/site-lib"; mkocamlpath = p: "${p}/lib/ocaml/${ocamlPackages.ocaml.version}/site-lib";
ocamlpath = "${mkocamlpath ocamlPackages.apron}:${mkocamlpath ocamlPackages.mlgmpidl}"; runtimeDeps = with ocamlPackages; [
apron
biniou
camlzip
easy-format
menhir
mlgmpidl
num
ocamlgraph
why3
yojson
zarith
];
ocamlpath = lib.concatMapStringsSep ":" mkocamlpath runtimeDeps;
in in
stdenv.mkDerivation rec { stdenv.mkDerivation rec {
name = "frama-c-${version}"; name = "frama-c-${version}";
version = "18.0"; version = "19.0";
slang = "Argon"; slang = "Potassium";
src = fetchurl { src = fetchurl {
url = "http://frama-c.com/download/frama-c-${version}-${slang}.tar.gz"; url = "http://frama-c.com/download/frama-c-${version}-${slang}.tar.gz";
sha256 = "0a88k2mhafj7pz3dzgsqkrc9digkxpnvr9jqq9nbzwq8qr02bca2"; sha256 = "190n1n4k0xbycz25bn0d2gnfxd8w6scz3nlixl7w2k2jvpqlcs3n";
}; };
why2 = fetchurl { preConfigure = lib.optionalString stdenv.cc.isClang "configureFlagsArray=(\"--with-cpp=clang -E -C\")";
url = "http://why.lri.fr/download/why-2.40.tar.gz";
sha256 = "0h1mbpxsgwvf3pbl0qbg22j6f4v1ffka24ap1ajbjk9b1yb3ali8";
};
nativeBuildInputs = [ autoconf makeWrapper ]; nativeBuildInputs = [ autoconf makeWrapper ];
buildInputs = with ocamlPackages; [ buildInputs = with ocamlPackages; [
ncurses ocaml findlib ltl2ba ocamlgraph ncurses ocaml findlib ltl2ba ocamlgraph yojson menhir camlzip
lablgtk coq graphviz zarith why3 apron lablgtk coq graphviz zarith apron why3 mlgmpidl doxygen
]; ];
enableParallelBuilding = true;
# Experimentally, the build segfaults with high core counts fixupPhase = ''
enableParallelBuilding = false;
unpackPhase = ''
tar xf $src
tar xf $why2
'';
buildPhase = ''
cd frama*
./configure --prefix=$out
# It is not parallel safe
make
make install
cd ../why*
FRAMAC=$out/bin/frama-c ./configure --prefix=$out
make
make install
for p in $out/bin/frama-c{,-gui}; for p in $out/bin/frama-c{,-gui};
do do
wrapProgram $p --prefix OCAMLPATH ':' ${ocamlpath} wrapProgram $p --prefix OCAMLPATH ':' ${ocamlpath}
done done
''; '';
# Enter frama-c directory before patching # Allow loading of external Frama-C plugins
prePatch = ''cd frama*''; setupHook = writeText "setupHook.sh" ''
patches = [ ./dynamic.diff ]; addFramaCPath () {
postPatch = '' if test -d "''$1/lib/frama-c/plugins"; then
# strip absolute paths to /usr/bin export FRAMAC_PLUGIN="''${FRAMAC_PLUGIN}''${FRAMAC_PLUGIN:+:}''$1/lib/frama-c/plugins"
for file in ./configure ./share/Makefile.common ./src/*/configure; do #*/ export OCAMLPATH="''${OCAMLPATH}''${OCAMLPATH:+:}''$1/lib/frama-c/plugins"
substituteInPlace $file --replace '/usr/bin/' "" fi
done
substituteInPlace ./src/plugins/aorai/aorai_register.ml --replace '"ltl2ba' '"${ltl2ba}/bin/ltl2ba' if test -d "''$1/lib/frama-c"; then
export OCAMLPATH="''${OCAMLPATH}''${OCAMLPATH:+:}''$1/lib/frama-c"
fi
cd ../why* if test -d "''$1/share/frama-c/"; then
export FRAMAC_EXTRA_SHARE="''${FRAMAC_EXTRA_SHARE}''${FRAMAC_EXTRA_SHARE:+:}''$1/share/frama-c"
fi
substituteInPlace ./Makefile.in --replace '-warn-error A' '-warn-error A-3' }
substituteInPlace ./frama-c-plugin/Makefile --replace 'shell frama-c' "shell $out/bin/frama-c"
substituteInPlace ./jc/jc_make.ml --replace ' why-dp ' " $out/bin/why-dp " addEnvHooks "$targetOffset" addFramaCPath
substituteInPlace ./jc/jc_make.ml --replace "?= why@\n" "?= $out/bin/why@\n"
substituteInPlace ./jc/jc_make.ml --replace ' gwhy-bin@' " $out/bin/gwhy-bin@"
substituteInPlace ./jc/jc_make.ml --replace ' why3 ' " ${why3}/bin/why3 "
substituteInPlace ./jc/jc_make.ml --replace ' why3ide ' " ${why3}/bin/why3ide "
substituteInPlace ./jc/jc_make.ml --replace ' why3replayer ' " ${why3}/bin/why3replayer "
substituteInPlace ./jc/jc_make.ml --replace ' why3ml ' " ${why3}/bin/why3ml "
substituteInPlace ./jc/jc_make.ml --replace ' coqdep@' " ${coq}/bin/coqdep@"
substituteInPlace ./jc/jc_make.ml --replace 'coqc' " ${coq}/bin/coqc"
substituteInPlace ./frama-c-plugin/register.ml --replace ' jessie ' " $out/bin/jessie "
cd ..
''; '';
meta = { meta = {
description = "An extensible and collaborative platform dedicated to source-code analysis of C software"; description = "An extensible and collaborative platform dedicated to source-code analysis of C software";
homepage = http://frama-c.com/; homepage = http://frama-c.com/;

View File

@ -1,12 +0,0 @@
--- a/src/kernel_services/plugin_entry_points/dynamic.ml 2016-05-30 16:15:22.000000000 +0200
+++ b/src/kernel_services/plugin_entry_points/dynamic.ml 2016-10-13 18:25:31.000000000 +0200
@@ -270,7 +270,8 @@
load_path :=
List.fold_right (add_dir ~user:true) path
(List.fold_right (add_dir ~user:false) Config.plugin_dir []);
- let findlib_path = String.concat ":" !load_path in
+ let findlib_path = String.concat ":" (!load_path @
+ try [Sys.getenv "OCAMLPATH"] with Not_found -> []) in
Klog.debug ~dkey "setting findlib path to %s" findlib_path;
Findlib.init ~env_ocamlpath:findlib_path ()

View File

@ -23079,7 +23079,7 @@ in
veriT = callPackage ../applications/science/logic/verit {}; veriT = callPackage ../applications/science/logic/verit {};
why3 = callPackage ../applications/science/logic/why3 {}; why3 = callPackage ../applications/science/logic/why3 { };
workcraft = callPackage ../applications/science/logic/workcraft {}; workcraft = callPackage ../applications/science/logic/workcraft {};