Berkeley DB 4.8 with rust build script for linux.

1 files changed, 46 insertions, 0 deletions

diff --git a/db-4.8.30/test/repmgr015.tcl b/db-4.8.30/test/repmgr015.tcl
new file mode 100644
index 0000000..ee3e388
--- /dev/null
+++ b/db-4.8.30/test/repmgr015.tcl
@@ -0,0 +1,46 @@
+# See the file LICENSE for redistribution information.
+#
+# Copyright (c) 2007-2009 Oracle.  All rights reserved.
+#
+# $Id$
+#
+# TEST	repmgr015
+# TEST	Basic repmgr in-memory election test. 
+# TEST
+# TEST	Open three clients of different priorities and make sure repmgr 
+# TEST	elects expected master. Shut master down, make sure repmgr elects 
+# TEST	expected remaining client master, make sure former master can join 
+# TEST	as client. Replication files are in-memory; databases, logs and
+# TEST	environment regions are on-disk.
+# TEST
+# TEST	Run for btree only because access method shouldn't matter.
+# TEST
+proc repmgr015 { method { niter 100 } { tnum "015" } args } {
+
+	source ./include.tcl
+
+	if { $is_freebsd_test == 1 } {
+		puts "Skipping replication manager test on FreeBSD platform."
+		return
+	}
+
+	if { $is_windows9x_test == 1 } {
+		puts "Skipping replication test on Win9x platform."
+		return
+	}
+
+	# Skip for all methods except btree.
+	if { $checking_valid_methods } {
+		return btree
+	}
+	if { [is_btree $method] == 0 } {
+		puts "Repmgr$tnum: skipping for non-btree method $method."
+		return
+	}
+
+	set args [convert_args $method $args]
+
+	puts -nonewline "Repmgr$tnum ($method): Basic repmgr election test "
+	puts "with rep files in-memory."
+	basic_repmgr_election_test $method $niter $tnum 1 $args
+}