1
1
openmpi/ompi/tools/mpisync/mpirun_prof
Artem Polyakov f2e586980b Fix timing framework:
1. Fixes according to (http://www.open-mpi.org/community/lists/devel/2014/09/15869.php)
2. Force mpisync:rank0 to gather results. Now sync info is written by rank0 to the output file.
3. Improve mpirun_prof: 1) adopt to the environment (SLURM/TORQUE); 2) recognize some noteset-related mpirun options.

This commit was SVN r32772.
2014-09-23 12:59:54 +00:00

81 строка
1.6 KiB
Bash
Исполняемый файл

#!/bin/sh
#!/bin/bash
#
# Copyright (c) 2014 Artem Polyakov <artpol84@gmail.com>
# $COPYRIGHT$
#
# Additional copyrights may follow
#
# $HEADER$
function get_jobid()
{
if [ -n "$SLURM_JOBID" ]; then
echo "$SLURM_JOBID"
return
elif [ -n "$PBS_JOBID" ]; then
echo "$PBS_JOBID"
return
else
echo "$$"
return
fi
}
function extract_nodeset_opts()
{
short_opts="H:h:"
long_opts="host:"
opts=""
while [ -n "$1" ]; do
case "$1" in
-H | -host | --host )
opts=$opts" $1 $2";
shift 2;;
-hostfile | --hostfile )
opts=$opts" $1 $2";
shift 2;;
-machinefile | --machinefile )
opts=$opts" $1 $2";
shift 2;;
*)
shift 1;;
esac
done
echo "$opts"
}
ompi_instdir=`dirname $0`
jobid=`get_jobid`
syncfile=`pwd`"/ompi_clock_sync_data.$jobid"
tmp_timings=`pwd`"/ompi_timing_temp_file.$jobid"
tmp_out=`pwd`"/ompi_mpirun_prof.$jobid"
timing_bkp=$OMPI_MCA_opal_timing_file
export OMPI_MCA_opal_timing_file=$tmp_timings
opts=`extract_nodeset_opts $@`
${ompi_instdir}/mpirun --npernode 1 $opts ${ompi_instdir}/mpisync -o $syncfile >$tmp_out 2>&1
export OMPI_MCA_opal_timing_output=$timing_bkp
export OMPI_MCA_opal_timing_sync_file=$syncfile
# Remove old output
rm -f $OMPI_MCA_opal_timing_output
# Run a program of interest
${ompi_instdir}/mpirun $@
if [ -n "$timing_bkp" ]; then
${ompi_instdir}/ompi_timing_post $timing_bkp $timing_bkp.post
fi
# Cleanup
rm -f $syncfile
rm -f $tmp_timings
rm -f $tmp_out