Lines Matching refs:oid
950 set oid [open $testdir/ELECTION_SOURCE.$elect_serial w]
952 puts $oid "source $test_path/test.tcl"
953 puts $oid "set elected_event 0"
954 puts $oid "set elected_env \"NONE\""
955 puts $oid "set is_repchild 1"
956 puts $oid "replsetup $qdir"
957 foreach i $machids { puts $oid "repladd $i" }
958 puts $oid "set env_cmd \{$envstring\}"
960 puts $oid "set dbenv \[eval \$env_cmd -errfile \
963 puts $oid "set dbenv \[eval \$env_cmd -errfile \
966 puts $oid "\$dbenv test abort $err"
967 puts $oid "set res \[catch \{\$dbenv rep_elect $nsites \
969 puts $oid "set r \[open \$testdir/ELECTION_RESULT.$elect_serial w\]"
970 puts $oid "if \{\$res == 0 \} \{"
971 puts $oid "puts \$r \"SUCCESS \$ret\""
972 puts $oid "\} else \{"
973 puts $oid "puts \$r \"ERROR \$ret\""
974 puts $oid "\}"
979 puts $oid "\$dbenv test abort none"
980 puts $oid "set res \[catch \{\$dbenv rep_elect $nsites \
982 puts $oid "if \{\$res == 0 \} \{"
983 puts $oid "puts \$r \"SUCCESS \$ret\""
984 puts $oid "\} else \{"
985 puts $oid "puts \$r \"ERROR \$ret\""
986 puts $oid "\}"
989 puts $oid "if \{ \$elected_event == 1 \} \{"
990 puts $oid "puts \$r \"ELECTED \$elected_env\""
991 puts $oid "\}"
993 puts $oid "close \$r"
994 close $oid