Xapian: Internal Source Documentation: xapian-core: tests/harness/scalability.cc Source File

00001 
00004 /* Copyright (C) 2009 Olly Betts
00005  *
00006  * This program is free software; you can redistribute it and/or
00007  * modify it under the terms of the GNU General Public License as
00008  * published by the Free Software Foundation; either version 2 of the
00009  * License, or (at your option) any later version.
00010  *
00011  * This program is distributed in the hope that it will be useful,
00012  * but WITHOUT ANY WARRANTY; without even the implied warranty of
00013  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
00014  * GNU General Public License for more details.
00015  *
00016  * You should have received a copy of the GNU General Public License
00017  * along with this program; if not, write to the Free Software
00018  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
00019  */
00020 
00021 #include <config.h>
00022 
00023 #include "scalability.h"
00024 
00025 #include "cputimer.h"
00026 #include "testsuite.h"
00027 
00028 void
00029 test_scalability(double (*func)(unsigned), unsigned n, double threshold)
00030 {
00031     double time1;
00032     // Increase the number of tests until we take a reliably measurable amount
00033     // of time.
00034     do {
00035        time1 = func(n);
00036        tout << "Test with " << n << " repetitions took " << time1 << " secs\n";
00037        unsigned n_new = n * 10;
00038        if (n_new < n)
00039            SKIP_TEST("Can't count enough repetitions to be able to time test");
00040        n = n_new;
00041     } while (time1 <= 0.001);
00042 
00043     double time10 = func(n);
00044     tout << "Test with " << n << " repetitions took " << time10 << " secs\n";
00045 
00046     TEST_REL(time10,<,time1 * threshold);
00047 }