X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/ba66c0a53a3284954996b301af67e23b04513d87..e9f0018b823e34405847177b25a85d3facc30ae1:/src/smpi/smpif90.in diff --git a/src/smpi/smpif90.in b/src/smpi/smpif90.in index 60d8d59b9a..1b61608847 100644 --- a/src/smpi/smpif90.in +++ b/src/smpi/smpif90.in @@ -1,5 +1,14 @@ #! /bin/sh +# Copyright (c) 2012-2015. The SimGrid Team. +# All rights reserved. + +# This program is free software; you can redistribute it and/or modify it +# under the terms of the license (GNU LGPL) which comes with this package. + +SIMGRID_VERSION="@SIMGRID_VERSION_STRING@" +SIMGRID_GITHASH="@SIMGRID_GITHASH@" + F90=@GFORTRAN_EXE@ INCLUDEARGS="@includeflag@" @@ -18,7 +27,17 @@ cleanup () { } trap 'cleanup' EXIT -list_set CMDLINE +filter_and_compile() { + list_add TMPFILES "${TMPFILE}" +#replace "program main_name by subroutine user\_main (and the end clause as well)" + sed 's/[[:space:]]*program[[:space:]]*\([a-zA-Z0-9\-\_]*\)/ subroutine user\_main /gI;s/[[:space:]]*use[[:space:]]*mpi/\include \"mpif\.h\" /gI' "${ARG}" > "${TMPFILE}" + SRCFILE="${TMPFILE}" + list_add CMDLINE "${SRCFILE}" +} + + +list_set CMDLINE "${F90}" +list_add_not_empty CMDLINE "${FFLAGS}" while [ $# -gt 0 ]; do ARG="$1" shift @@ -28,13 +47,24 @@ while [ $# -gt 0 ]; do LINKARGS="" list_add CMDLINE "-c" ;; - *.f90|*.F90) + *.f90) TMPFILE=$(mymktemp "${ARG}" ".f90") - list_add TMPFILES "${TMPFILE}" - #replace "program main_name by subroutine user\_main (and the end clause as well)" - sed 's/[[:space:]]*program[[:space:]]*\([a-zA-Z0-9\-\_]*\)/subroutine user\_main /gI;s/[[:space:]]*use[[:space:]]*mpi/\include \"mpif\.h\" /gI' "${ARG}" > "${TMPFILE}" - SRCFILE="${TMPFILE}" - list_add CMDLINE "${SRCFILE}" + filter_and_compile + ;; + *.F90) + TMPFILE=$(mymktemp "${ARG}" ".F90") + filter_and_compile + ;; + '-version' | '--version') + printf '%b\n' "$SIMGRID_VERSION" + exit 0 + ;; + "-git-version" | "--git-version") + printf '%b\n' "$SIMGRID_GITHASH" + exit 0 + ;; + '-compiler-version' | '--compiler-version') + ${F90} --version ;; *) list_add CMDLINE "${ARG}" @@ -42,7 +72,9 @@ while [ $# -gt 0 ]; do esac done -list_set CMDLINE "${FFLAGS}" "${CMDLINE}" ${INCLUDEARGS} ${CMAKE_LINKARGS} "${LINKARGS}" -eval $(list_get CMDLINE) +list_add_not_empty CMDLINE ${INCLUDEARGS} +list_add_not_empty CMDLINE ${CMAKE_LINKARGS} +list_add_not_empty CMDLINE "${LINKARGS}" -"${F90}" "$@" +eval $(list_get CMDLINE) +"$@"