X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/b481f5cc7076aa751d9269d53066b77209683901..ad16e5cd7126fe5cc18b3f5898b6489e54210f4c:/src/smpi/smpirun.in diff --git a/src/smpi/smpirun.in b/src/smpi/smpirun.in index 7ec37c6eb5..e151fb37ae 100755 --- a/src/smpi/smpirun.in +++ b/src/smpi/smpirun.in @@ -1,7 +1,15 @@ -#!/bin/bash +#! /bin/sh + +# Copyright (c) 2007-2014. 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. @CMAKE_SMPI_COMMAND@ +SIMGRID_VERSION="@SIMGRID_VERSION_STRING@" + DEFAULT_LOOPBACK_BANDWIDTH="498000000" DEFAULT_LOOPBACK_LATENCY="0.000004" DEFAULT_NETWORK_BANDWIDTH="$((26 * 1024 * 1024))" @@ -15,25 +23,32 @@ NETWORK_BANDWIDTH="${DEFAULT_NETWORK_BANDWIDTH}" NETWORK_LATENCY="${DEFAULT_NETWORK_LATENCY}" POWER="${DEFAULT_POWER}" -SIMOPTS="--cfg=maxmin/precision:1e-9 --cfg=network/model:SMPI --cfg=network/TCP_gamma:4194304" +SIMOPTS="--cfg=maxmin/precision:1e-3 --cfg=surf/precision:1e-9 --cfg=network/model:SMPI --cfg=network/TCP_gamma:4194304" #usage to print the way this script should be called -function usage () { - echo "usage:" - echo "$0 [-quiet] [-keep-temps]" - echo " [-np ] -platform -hostfile [-map] program [program-options]" - echo " [-keep-temps] # don't remove the generated files after execution" - echo " [-map] # display the machine on which each process rank is mapped" - echo " [-np ] # use that amount of processes from the hostfile." - echo " # By default, all processes of the hostfile are used." - echo " [-trace] # activate tracing" - echo " [-trace-grouped] # group MPI processes by location" - echo " [-trace-resource] # trace resource utilization" - echo " [-trace-triva] # generate configuration for Triva's GraphView" - echo " [-trace-file ] # name of the tracefile (simgrid_smpi.trace)" - echo "or (deprecated usage):" - echo "$0 [-quiet] [-keep-temps] [-np ] [-bandwidth ] [-latency ] program [program-options]" - echo +usage () { + cat < -hostfile program [program-options] +Options: + -keep-temps # don't remove the generated files after execution + -wrapper # use command to run the program (e.g. "valgrind") + -map # display the machine on which each process rank is mapped + -np # use that amount of processes from the hostfile. + # By default, all processes of the hostfile are used. + -trace-ti # activate time independant tracing (for replay, default in smpi_simgrid.txt) + -trace # activate tracing (Paje, default in smpi_simgrid.trace) + -trace-comment # put a comment on the top of the trace file + -trace-comment-file # put file contents on the top of the trace file as comment + -trace-grouped # group MPI processes by location + -trace-resource # trace resource utilization + -trace-viva # generate configuration for Viva's GraphView + -trace-file # name of the tracefile (simgrid_smpi.trace) + -ext # additional parameter (reserved) + +or (deprecated usage): + $0 [-keep-temps] [-np ] [-bandwidth ] [-latency ] program [program-options] + +EOF } #check if we have at least one parameter @@ -43,156 +58,247 @@ then exit fi +EXTOPT="" +WRAPPER="" +HOSTFILE="" + while true; do - case "$1" in - "-np" | "-n") - NUMPROCS="$2" - shift 2 - ;; - "-bandwidth") - NETWORK_BANDWIDTH="$2" - shift 2 - ;; - "-latency") - NETWORK_LATENCY="$2" - shift 2 - ;; - "-platform") - PLATFORM="$2" - if [ ! -f ${PLATFORM} ]; then - echo "[$0] ** error: the file '${PLATFORM}' does not exist. Aborting." + case "$1" in + "-np" | "-n") + NUMPROCS="$2" + shift 2 + ;; + "-bandwidth") + NETWORK_BANDWIDTH="$2" + shift 2 + ;; + "-latency") + NETWORK_LATENCY="$2" + shift 2 + ;; + "-platform") + PLATFORM="$2" + if [ ! -f "${PLATFORM}" ]; then + echo "[`basename $0`] ** error: the file '${PLATFORM}' does not exist. Aborting." exit 1 - fi - shift 2 - ;; - "-hostfile") - HOSTFILE="$2" - if [ ! -f ${HOSTFILE} ]; then - echo "[$0] ** error: the file '${HOSTFILE}' does not exist. Aborting." + fi + shift 2 + ;; + "-hostfile") + HOSTFILE="$2" + if [ ! -f "${HOSTFILE}" ]; then + echo "[`basename $0`] ** error: the file '${HOSTFILE}' does not exist. Aborting." exit 1 - fi - shift 2 - ;; - - "-map") - MAPOPT="true" - shift 1 - ;; - - "-trace") - TRACE_ACTIVE="true" - shift 1 - ;; - - "-trace-file") - TRACE_FILENAME="$2" - shift 2 - ;; - - "-trace-grouped") - TRACE_GROUPED="true" - shift 1 - ;; - - "-trace-resource") - TRACE_RESOURCE="true" - shift 1 - ;; - - "-trace-triva") - TRACE_TRIVA="true" - shift 1 - ;; - - "-keep-temps") - KEEP="true" - shift 1 - ;; - - "-help" | "--help" | "-h") - usage - exit - ;; - - "--cfg="*|"--log="*) - for OPT in ${1#*=} - do - SIMOPTS="$SIMOPTS ${1%%=*}=$OPT" - done - shift 1 - ;; - *) - break - ;; - esac + fi + shift 2 + ;; + + "-machinefile") + HOSTFILE="$2" + if [ ! -f "${HOSTFILE}" ]; then + echo "[`basename $0`] ** error: the file '${HOSTFILE}' does not exist. Aborting." + exit 1 + fi + shift 2 + ;; + + "-ext") + EXTOPT="$2" + shift 2 + ;; + + "-map") + MAPOPT="true" + shift 1 + ;; + + "-trace") + TRACE_ACTIVE="true" + shift 1 + ;; + + "-trace-ti") + TRACE_ACTIVE="true" + TRACE_TI_ACTIVE="true" + shift 1 + ;; + + "-trace-comment") + TRACE_COMMENT="$2" + shift 2 + ;; + + "-trace-comment-file") + TRACE_COMMENT_FILE="$2" + shift 2 + ;; + + "-trace-file") + TRACE_FILENAME="$2" + shift 2 + ;; + + "-trace-grouped") + TRACE_GROUPED="true" + shift 1 + ;; + + "-trace-resource") + TRACE_RESOURCE="true" + shift 1 + ;; + + "-trace-viva") + TRACE_VIVA="true" + shift 1 + ;; + + "-keep-temps") + KEEP="true" + shift 1 + ;; + + "-wrapper") + WRAPPER="$2" + shift 2 + ;; + + "-help" | "--help" | "-h") + usage + exit 0 + ;; + + "-version" | "--version" | "-v") + printf '%b\n' "$SIMGRID_VERSION" + exit 0 + ;; + + "--cfg="*|"--log="*) + for OPT in ${1#*=} + do + SIMOPTS="$SIMOPTS ${1%%=*}=$OPT" + done + shift 1 + ;; + *) + break + ;; + esac done -EXEC="$1" +if [ -n "$WRAPPER" ]; then + EXEC="$WRAPPER $1" +else + EXEC="$1" +fi shift +# steel --cfg and --logs options +while [ $# -gt 0 ]; do + case "$1" in + "--cfg="*|"--log="*) + for OPT in ${1#*=} + do + SIMOPTS="$SIMOPTS ${1%%=*}=$OPT" + done + shift 1 + ;; + *) + PROC_ARGS="${PROC_ARGS:+$PROC_ARGS }$1" + shift + ;; + esac +done + + ##----------------------------------- -# Basic checks on the provided arguments -if [ -z ${EXEC} ] ; then - echo "You must provide a program to execute." + +if [ -z "${HOSTFILE}" ] && [ -z "${PLATFORM}" ] ; then + echo "No hostfile nor platform specified." usage exit 1 fi -if [ -z ${HOSTFILE} ] ; then - echo "No hostfile specified." - usage - exit 1 +HOSTFILETMP=0 +if [ -z "${HOSTFILE}" ] ; then + HOSTFILETMP=1 + HOSTFILE="$(mktemp tmphostXXXXXX)" + perl -ne 'print "$1\n" if /.*.*/' ${PLATFORM} > ${HOSTFILE} +fi +UNROLLEDHOSTFILETMP=0 + +#parse if our lines are terminated by :num_process +multiple_processes=`grep -c ":" $HOSTFILE` +if [ "${multiple_processes}" -gt 0 ] ; then + UNROLLEDHOSTFILETMP=1 + UNROLLEDHOSTFILE="$(mktemp tmphostXXXXXX)" + perl -ne ' do{ for ( 1 .. $2 ) { print "$1\n" } } if /(.*?):(\d+).*/' ${HOSTFILE} > ${UNROLLEDHOSTFILE} + if [ ${HOSTFILETMP} = 1 ] ; then + rm ${HOSTFILE} + HOSTFILETMP=0 + fi + HOSTFILE=$UNROLLEDHOSTFILE fi + # Don't use wc -l to compute it to avoid issues with trailing \n at EOF -hostfile_procs=`grep -c [a-zA-Z0-9] $HOSTFILE` +hostfile_procs=`grep -c "[a-zA-Z0-9]" $HOSTFILE` +if [ ${hostfile_procs} = 0 ] ; then + echo "[`basename $0`] ** error: the hostfile '${HOSTFILE}' is empty. Aborting." >&2 + exit 1 +fi -if [ -z ${NUMPROCS} ] ; then +if [ -z "${NUMPROCS}" ] ; then # Use the amount of processes in the hostfile as default value for the -np parameter - NUMPROC=$hostfile_procs + NUMPROCS=$hostfile_procs fi -if [ ${NUMPROCS} -gt ${hostfile_procs} ] ; then - echo "You requested to use ${NUMPROCS} processes, but there is only ${hostfile_procs} processes in your hostfile..." - exit 1 +if [ ${NUMPROCS} -gt ${hostfile_procs} ] ; then + echo "You requested to use ${NUMPROCS} processes, but there is only ${hostfile_procs} processes in your hostfile..." >&2 fi ##-------------------------------- DEFAULT or SPECIFIED PLATFORM -------------------------------------- if [ -z "${PLATFORM}" ]; then - PLATFORMTMP="$(mktemp tmpXXXXXX)" + PLATFORMTMP="$(mktemp tmpXXXXXX)" - cat > ${PLATFORMTMP} < ${PLATFORMTMP} < PLATFORMHEAD -for (( i=${NUMPROCS}; $i ; i=$i-1 )) do - echo " " >> ${PLATFORMTMP} - echo " " >> ${PLATFORMTMP} - echo " " >> ${PLATFORMTMP} -done - -for (( i=${NUMPROCS}; $i ; i=$i-1 )) do - for (( j=${NUMPROCS}; $j ; j=$j-1 )) do - if [ $i -eq $j ]; then - echo " " >> ${PLATFORMTMP} - else - echo " " >> ${PLATFORMTMP} - fi - done -done - -cat >> ${PLATFORMTMP} <" >> ${PLATFORMTMP} + echo " " >> ${PLATFORMTMP} + echo " " >> ${PLATFORMTMP} + i=$((i - 1)) + done + + i=${NUMPROCS} + while [ $i -gt 0 ]; do + j=${NUMPROCS} + while [ $j -gt 0 ]; do + if [ $i -eq $j ]; then + echo " " >> ${PLATFORMTMP} + else + echo " " >> ${PLATFORMTMP} + fi + j=$((j - 1)) + done + i=$((i - 1)) + done + + cat >> ${PLATFORMTMP} < PLATFORMFOOT else - PLATFORMTMP=${PLATFORM} + PLATFORMTMP=${PLATFORM} fi ##-------------------------------- end DEFAULT or SPECIFIED PLATFORM -------------------------------------- @@ -209,8 +315,19 @@ APPLICATIONHEAD ##---- cache hostnames of hostfile--------------- if [ -n "${HOSTFILE}" ] && [ -f ${HOSTFILE} ]; then - hostnames=(`cat ${HOSTFILE} | tr \\\n " "`) - NUMHOSTS=`cat ${HOSTFILE} | wc -l` + hostnames=$(cat ${HOSTFILE} | tr '\n\r' ' ') + NUMHOSTS=$(cat ${HOSTFILE} | wc -l) +fi + +if [ "${EXTOPT}" = "smpi_replay" ]; then + APP_TRACES=$PROC_ARGS + if [ -n "${APP_TRACES}" ] && [ -f "${APP_TRACES}" ]; then + hosttraces=$(cat ${APP_TRACES} | tr '\n\r' ' ' ) + NUMTRACES=$(cat ${APP_TRACES} | wc -l) + else + printf "File not found: %s\n", "${APP_TRACES:-\${APP_TRACES\}}" >&2 + exit 1 + fi fi ##---------------------------------------------------------- @@ -223,38 +340,47 @@ fi HAVE_SEQ="`which seq 2>/dev/null`" if [ -n "${HAVE_SEQ}" ]; then - SEQ=`${HAVE_SEQ} 0 $((${NUMPROCS}-1))` + SEQ=`${HAVE_SEQ} 0 $((${NUMPROCS}-1))` else - cnt=0 - while (( $cnt < ${NUMPROCS} )) ; do - SEQ="$SEQ $cnt" - cnt=$((cnt + 1)); - done + cnt=0 + while (( $cnt < ${NUMPROCS} )) ; do + SEQ="$SEQ $cnt" + cnt=$((cnt + 1)); + done fi ##---- generate tags------------------------------ for i in ${SEQ} do - if [ -n "${HOSTFILE}" ]; then - j=$(( $i % ${NUMHOSTS} )) - fi - ##---- optional display of ranks to process mapping - if [ -n "${MAPOPT}" ]; then - echo "[rank $i] -> ${hostnames[$j]}" - fi - - if [ -z "${hostnames[$j]}" ]; then - host="host"$(($j+1)) - else - host="${hostnames[$j]}" - fi - echo " " >> ${APPLICATIONTMP} - echo " " >> ${APPLICATIONTMP} - for ARG in $*; do - echo " " >> ${APPLICATIONTMP} - done - echo " " >> ${APPLICATIONTMP} + if [ -n "${HOSTFILE}" ]; then + j=$(( $i % ${NUMHOSTS} + 1 )) + fi + ##---- optional display of ranks to process mapping + if [ -n "${MAPOPT}" ]; then + echo "[rank $i] -> $(echo $hostnames|cut -d' ' -f$j)" + fi + + if [ -z "$(echo $hostnames|cut -d' ' -f$j)" ]; then + host="host"$($j) + else + host="$(echo $hostnames|cut -d' ' -f$j)" + fi + echo " " >> ${APPLICATIONTMP} + echo " " >> ${APPLICATIONTMP} + echo " " >> ${APPLICATIONTMP} + if [ "${EXTOPT}" = "smpi_replay" ]; then + if [ ${NUMTRACES} -gt 1 ]; then + echo " " >> ${APPLICATIONTMP} + else + echo " " >> ${APPLICATIONTMP} + fi + else + for ARG in $PROC_ARGS; do + echo " " >> ${APPLICATIONTMP} + done + fi + echo " " >> ${APPLICATIONTMP} done cat >> ${APPLICATIONTMP} <