mirror of
https://github.com/rn10950/RetroZilla.git
synced 2024-11-14 11:40:13 +01:00
137 lines
4.2 KiB
Bash
137 lines
4.2 KiB
Bash
#!/bin/sh
|
|
|
|
# Simple timing test for the MPI library. Basically, we use prime
|
|
# generation as a timing test, since it exercises most of the pathways
|
|
# of the library fairly heavily. The 'primegen' tool outputs a line
|
|
# summarizing timing results. We gather these and process them for
|
|
# statistical information, which is collected into a file.
|
|
|
|
# ***** BEGIN LICENSE BLOCK *****
|
|
# Version: MPL 1.1/GPL 2.0/LGPL 2.1
|
|
#
|
|
# The contents of this file are subject to the Mozilla Public License Version
|
|
# 1.1 (the "License"); you may not use this file except in compliance with
|
|
# the License. You may obtain a copy of the License at
|
|
# http://www.mozilla.org/MPL/
|
|
#
|
|
# Software distributed under the License is distributed on an "AS IS" basis,
|
|
# WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
|
|
# for the specific language governing rights and limitations under the
|
|
# License.
|
|
#
|
|
# The Original Code is the MPI Arbitrary Precision Integer Arithmetic library.
|
|
#
|
|
# The Initial Developer of the Original Code is
|
|
# Michael J. Fromberger <sting@linguist.dartmouth.edu>.
|
|
# Portions created by the Initial Developer are Copyright (C) 2000
|
|
# the Initial Developer. All Rights Reserved.
|
|
#
|
|
# Contributor(s):
|
|
# Netscape Communications Corporation
|
|
#
|
|
# Alternatively, the contents of this file may be used under the terms of
|
|
# either the GNU General Public License Version 2 or later (the "GPL"), or
|
|
# the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
|
|
# in which case the provisions of the GPL or the LGPL are applicable instead
|
|
# of those above. If you wish to allow use of your version of this file only
|
|
# under the terms of either the GPL or the LGPL, and not to allow others to
|
|
# use your version of this file under the terms of the MPL, indicate your
|
|
# decision by deleting the provisions above and replace them with the notice
|
|
# and other provisions required by the GPL or the LGPL. If you do not delete
|
|
# the provisions above, a recipient may use your version of this file under
|
|
# the terms of any one of the MPL, the GPL or the LGPL.
|
|
#
|
|
# ***** END LICENSE BLOCK *****
|
|
|
|
#
|
|
# $Id: timetest,v 1.9 2007/05/09 00:09:37 neil.williams%sun.com Exp $
|
|
#
|
|
|
|
# Avoid using built-in shell echoes
|
|
ECHO=/bin/echo
|
|
MAKE=gmake
|
|
PERL=perl
|
|
|
|
# Use a fixed seed so timings will be more consistent
|
|
# This one is the 11th-18th decimal digits of 'e'
|
|
#export SEED=45904523
|
|
SEED=45904523; export SEED
|
|
|
|
#------------------------------------------------------------------------
|
|
|
|
$ECHO "\n** Running timing tests for MPI library\n"
|
|
|
|
$ECHO "Bringing 'metime' up to date ... "
|
|
if $MAKE metime ; then
|
|
:
|
|
else
|
|
$ECHO "\nMake failed to build metime.\n"
|
|
exit 1
|
|
fi
|
|
|
|
if [ ! -x ./metime ] ; then
|
|
$ECHO "\nCannot find 'metime' program, testing cannot continue.\n"
|
|
exit 1
|
|
fi
|
|
|
|
#------------------------------------------------------------------------
|
|
|
|
$ECHO "Bringing 'primegen' up to date ... "
|
|
if $MAKE primegen ; then
|
|
:
|
|
else
|
|
$ECHO "\nMake failed to build primegen.\n"
|
|
exit 1
|
|
fi
|
|
|
|
if [ ! -x ./primegen ] ; then
|
|
$ECHO "\nCannot find 'primegen' program, testing cannot continue.\n"
|
|
exit 1
|
|
fi
|
|
|
|
#------------------------------------------------------------------------
|
|
|
|
rm -f timing-results.txt
|
|
touch timing-results.txt
|
|
|
|
sizes="256 512 1024 2048"
|
|
ntests=10
|
|
|
|
trap 'echo "oop!";rm -f tt*.tmp timing-results.txt;exit 0' INT HUP
|
|
|
|
$ECHO "\n-- Modular exponentiation\n"
|
|
$ECHO "Modular exponentiation:" >> timing-results.txt
|
|
|
|
$ECHO "Running $ntests modular exponentiations per test:"
|
|
for size in $sizes ; do
|
|
$ECHO "- Gathering statistics for $size bits ... "
|
|
secs=`./metime $ntests $size | tail -1 | awk '{print $2}'`
|
|
$ECHO "$size: " $secs " seconds per op" >> timing-results.txt
|
|
tail -1 timing-results.txt
|
|
done
|
|
|
|
$ECHO "<done>";
|
|
|
|
sizes="256 512 1024"
|
|
ntests=1
|
|
|
|
$ECHO "\n-- Prime generation\n"
|
|
$ECHO "Prime generation:" >> timing-results.txt
|
|
|
|
$ECHO "Generating $ntests prime values per test:"
|
|
for size in $sizes ; do
|
|
$ECHO "- Gathering statistics for $size bits ... "
|
|
./primegen $size $ntests | grep ticks | awk '{print $7}' | tr -d '(' > tt$$.tmp
|
|
$ECHO "$size:" >> timing-results.txt
|
|
$PERL stats tt$$.tmp >> timing-results.txt
|
|
tail -1 timing-results.txt
|
|
rm -f tt$$.tmp
|
|
done
|
|
|
|
$ECHO "<done>"
|
|
|
|
trap 'rm -f tt*.tmp timing-results.txt' INT HUP
|
|
|
|
exit 0
|
|
|