diff options
author | unknown <monty@hundin.mysql.fi> | 2001-09-02 16:03:37 +0300 |
---|---|---|
committer | unknown <monty@hundin.mysql.fi> | 2001-09-02 16:03:37 +0300 |
commit | 992e7da03a64a12ed4bcd180dda45cb91e94a4ee (patch) | |
tree | 8e23ee5c5fb05aab08ef350c98bd7bf10f84cf47 /sql-bench/bench-init.pl.sh | |
parent | 62c3fe9b4be15d08cd19f569eaaad495fd46a1f7 (diff) | |
download | mariadb-git-992e7da03a64a12ed4bcd180dda45cb91e94a4ee.tar.gz |
Added testing of IN(value-list)
Portability fixes
Build-tools/Do-compile:
Fix for Linux ia64
sql-bench/bench-init.pl.sh:
Added help function time_fetch_all_rows
sql-bench/test-insert.sh:
Added testing of IN(value-list)
sql/item_func.cc:
Cleanup
sql/mysqld.cc:
Portability fix
sql/stacktrace.c:
Portability fix
Diffstat (limited to 'sql-bench/bench-init.pl.sh')
-rw-r--r-- | sql-bench/bench-init.pl.sh | 31 |
1 files changed, 30 insertions, 1 deletions
diff --git a/sql-bench/bench-init.pl.sh b/sql-bench/bench-init.pl.sh index 2e0b3a9a51d..204d15d7ab3 100644 --- a/sql-bench/bench-init.pl.sh +++ b/sql-bench/bench-init.pl.sh @@ -31,7 +31,7 @@ # $server Object for current server # $limits Hash reference to limits for benchmark -$benchmark_version="2.13"; +$benchmark_version="2.14"; use Getopt::Long; require "$pwd/server-cfg" || die "Can't read Configuration file: $!\n"; @@ -294,6 +294,35 @@ sub do_query die "\nError executing '$query':\n$DBI::errstr\n"; } +# +# Run a query X times +# + +sub time_fetch_all_rows +{ + my($test_text,$result_text,$query,$dbh,$test_count)=@_; + my($i,$loop_time,$end_time,$count,$rows,$estimated); + + print $test_text . "\n" if (defined($test_text)); + $count=$rows=0; + $loop_time=new Benchmark; + for ($i=1 ; $i <= $test_count ; $i++) + { + $count++; + $rows+=fetch_all_rows($dbh,$query) or die $DBI::errstr; + $end_time=new Benchmark; + last if ($estimated=predict_query_time($loop_time,$end_time,\$count,$i, + $test_count)); + } + $end_time=new Benchmark; + if ($estimated) + { print "Estimated time"; } + else + { print "Time"; } + print " for $result_text ($count:$rows) " . + timestr(timediff($end_time, $loop_time),"all") . "\n\n"; +} + # # Handle estimated time of the server is too slow |