Parameterize 001_pgbench.pl: allow to define a number of transactions, clients and threads from the environment.

Author: danolivo

t/001_pgbench.pl

@@ -14,11 +14,25 @@
 						log_statement = 'ddl'
 					});
 
-# Test constants.
+# Test constants. Default values.
 my $TRANSACTIONS = 1000;
 my $CLIENTS = 10;
 my $THREADS = 10;
 
+# Change pgbench parameters according to the environment variable.
+if (defined $ENV{TRANSACTIONS})
+{
+	$TRANSACTIONS = $ENV{TRANSACTIONS};
+}
+if (defined $ENV{CLIENTS})
+{
+	$CLIENTS = $ENV{CLIENTS};
+}
+if (defined $ENV{THREADS})
+{
+	$THREADS = $ENV{THREADS};
+}
+
 # General purpose variables.
 my $res;
 my $fss_count;