2 # SPDX-License-Identifier: GPL-2.0
3 # Copyright (c) 2001 Silicon Graphics, Inc. All Rights Reserved.
7 $PATH="$PATH:/usr/local/bin/ptools:/sbin:/usr/sbin";
10 if ("$HOST" eq "bruce") {
11 $TOOLS="/home/dxm/isms/slinx-xfs/cmd/xfs/tools";
12 $SCRATCH_DEV="/dev/sdf1";
13 $SCRATCH_MNT="/mnt/xfs3";
14 $MKFS="/sbin/mkfs -t xfs -f";
15 $SUDO="/home/dxm/su -c";
16 $MOUNT="/bin/mount -t xfs";
17 $UMOUNT="/bin/umount";
19 } elsif ("$HOST" eq "whack") {
20 $TOOLS="/hosts/snort/build1/people/dxm/isms/slinx-xfs/cmd/xfs/tools";
21 $SCRATCH_DEV="/dev/dsk/20000080e5114459/lun2s0/c2p1";
25 $MOUNT="/sbin/mount -t xfs";
26 $UMOUNT="/sbin/umount";
29 die "unconfigured host \"$HOST\"\n"
41 || die "ERROR \"" . join(" ",@_) . "\" returned error\n";
44 sub run_expect_fail(@)
47 && die "ERROR \"" . join(" ",@_) . "\" returned non-error\n";
52 run_no_check("umount $SCRATCH_DEV");
57 run("umount $SCRATCH_DEV");
63 run("mount -t xfs $ops $SCRATCH_DEV $SCRATCH_MNT");
66 chomp($HOST=`hostname -s`);
68 die "usage: $ARGV0 <operation> [parameters]\n" unless (scalar(@ARGV));
69 print "*** $HOST: Interop started\n";
70 print " *** ", join(" ", @ARGV), "\n";
80 run("mkfs -t xfs $MKFS_EXTRA $SCRATCH_DEV");
82 } elsif ($op eq "test") {
84 run("xfs_repair -n $SCRATCH_DEV");
86 } elsif ($op eq "easy") {
90 mkdir("$SCRATCH_MNT/fish",0777);
92 } elsif ($op eq "check") {
95 system("cd $SCRATCH_MNT ; $TOOLS/fs-walk .");
98 die "unknown operation \"$op\"\n";