| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081 | 
							- #!/bin/bash
 
- # StarPU --- Runtime system for heterogeneous multicore architectures.
 
- # 
 
- # Copyright (C) 2008, 2009, 2010  Université de Bordeaux 1
 
- # Copyright (C) 2010  Centre National de la Recherche Scientifique
 
- # 
 
- # StarPU is free software; you can redistribute it and/or modify
 
- # it under the terms of the GNU Lesser General Public License as published by
 
- # the Free Software Foundation; either version 2.1 of the License, or (at
 
- # your option) any later version.
 
- # 
 
- # StarPU is distributed in the hope that it will be useful, but
 
- # WITHOUT ANY WARRANTY; without even the implied warranty of
 
- # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
- # 
 
- # See the GNU Lesser General Public License in COPYING.LGPL for more details.
 
- DIR=$PWD
 
- ROOTDIR=$DIR/../..
 
- TIMINGDIR=$DIR/timings/
 
- mkdir -p $TIMINGDIR
 
- filename=$TIMINGDIR/gflops.data
 
- tilelist="256 512 1024 2048"
 
- sizelist="1024 2048 4096 8192 16384"
 
- trace_header()
 
- {
 
- 	line="# size 	"
 
- 	for tile in $tilelist
 
- 	do
 
- 		line="$line	$tile"
 
- 	done
 
- 	echo "$line" > $filename
 
- }
 
- trace_size()
 
- {
 
- 	size=$1
 
- 	echo "Computing size $size"
 
- 	
 
- 	line="$size"
 
- 	for tile in $tilelist
 
- 	do
 
- 		nblocks=$(($size / $tile))
 
- 		if [ $tile -lt $size -a $nblocks -lt 32 -a $(($size % $tile)) == 0 ];
 
- 		then
 
- 			echo "start tile $tile size $size nblocks $nblocks  "
 
- 			timing=`$ROOTDIR/examples/mult/dw_mult -pin -x $size -y $size -z $size -nblocks $nblocks 2>/dev/null`
 
- 		else
 
- 			timing="x"
 
- 		fi
 
- 		echo "size : $size tile $tile => $timing us"
 
- 		line="$line	$timing"
 
- 	done
 
- 	echo "$line" >> $filename
 
- }
 
- cd $ROOTDIR
 
- make clean 1> /dev/null 2> /dev/null
 
- make examples STARPU_ATLAS=1 CUDA=1 CPUS=3 1> /dev/null 2> /dev/null
 
- cd $DIR
 
- trace_header 
 
- for size in $sizelist
 
- do
 
- 	trace_size $size;
 
- done
 
 
  |