1#
2# CDDL HEADER START
3#
4# The contents of this file are subject to the terms of the
5# Common Development and Distribution License (the "License").
6# You may not use this file except in compliance with the License.
7#
8# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9# or http://www.opensolaris.org/os/licensing.
10# See the License for the specific language governing permissions
11# and limitations under the License.
12#
13# When distributing Covered Code, include this CDDL HEADER in each
14# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15# If applicable, add the following below this CDDL HEADER, with the
16# fields enclosed by brackets "[]" replaced with your own identifying
17# information: Portions Copyright [yyyy] [name of copyright owner]
18#
19# CDDL HEADER END
20#
21#
22# Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
23# Use is subject to license terms.
24#
25
26sub pre_run {
27        # Initialize filebench to appropriate personality, create files
28	# and processes
29        op_init();
30
31        # The op_load command automatically creates files
32        op_load(conf_reqval("personality"));
33
34        # Flush the FS cache
35	op_fsflush();
36
37        # Initialise statistics and argument arrays
38        @ext_stats=();
39        @file_stats=();
40        @arg_stats=();
41}
42
43sub post_run {
44        my $statsbase = get_STATSBASE();
45
46        # Create a html summary of the run
47	system ("cd $statsbase; " . get_FILEBENCH() . "/scripts/filebench_compare $statsbase")
48}
49
50sub bm_run {
51        my $runtime = conf_reqval("runtime");
52        my $fs = get_CONFNAME();
53	my $warmuptime = "";
54
55	if (conf_exists("warmuptime") == 1) {
56	    $warmuptime = conf_reqval("warmuptime");
57	}
58
59	# The following array must not contain empty values ! This causes the
60	# statistics scripts to miss arguments !
61        # Clear, run the benchmark, snap statistics 
62        # This command will also run external statistics (supplied in an array)
63	# if desired 
64        # Statistics automatically dumped into directory matching stats
65	# profile variable
66        # <stats>/<hostname>-<date-time>/<personality>
67
68	# create processes and start run, then collect statistics
69        op_stats($runtime,$warmuptime,"stats.$fs",@ext_stats,@file_stats,@arg_stats);
70}
71
721;
73