1# See the file LICENSE for redistribution information.
2#
3# Copyright (c) 1996,2008 Oracle.  All rights reserved.
4#
5# $Id: recdscript.tcl,v 12.6 2008/01/08 20:58:53 bostic Exp $
6#
7# Recovery txn prepare script
8# Usage: recdscript op dir envcmd dbfile cmd
9# op: primary txn operation
10# dir: test directory
11# envcmd: command to open env
12# dbfile: name of database file
13# gidf: name of global id file
14# cmd: db command to execute
15
16source ./include.tcl
17source $test_path/test.tcl
18
19set usage "recdscript op dir envcmd dbfile gidfile cmd"
20
21# Verify usage
22if { $argc != 6 } {
23	puts stderr "FAIL:[timestamp] Usage: $usage"
24	exit
25}
26
27# Initialize arguments
28set op [ lindex $argv 0 ]
29set dir [ lindex $argv 1 ]
30set envcmd [ lindex $argv 2 ]
31set dbfile [ lindex $argv 3 ]
32set gidfile [ lindex $argv 4 ]
33set cmd [ lindex $argv 5 ]
34
35op_recover_prep $op $dir $envcmd $dbfile $gidfile $cmd
36flush stdout
37