2 # SPDX-License-Identifier: GPL-2.0
3 # Copyright (c) 2000-2005 Silicon Graphics, Inc. All Rights Reserved.
8 # generic initialization
13 trap "rm -f $tmpfile; exit" 0 1 2 3 15
20 SRC_GROUPS=`find tests -not -path tests -type d -printf "%f "`
23 echo "Usage $0 test_dir|test_dir_and_name"
24 echo "Available dirs are: $SRC_GROUPS"
30 if echo "$1" | grep -q '/'; then
31 if [ -e "tests/$1" ]; then
32 echo "$1: test already exists."
35 tdir="tests/$(echo "$1" | cut -d '/' -f 1)"
36 id="$(echo "$1" | cut -d '/' -f 2)"
39 id="$(basename "$(./tools/nextid "$1")")"
45 [ -d "$tdir/" ] || usage
47 export AWK_PROG="$(type -P awk)"
48 [ "$AWK_PROG" = "" ] && { echo "awk not found"; exit; }
50 echo "Next test id is $id"
53 read -p "Append a name to the ID? Test name will be $id-\$name. y,[n]: " -r
54 if [[ $REPLY = [Yy] ]]; then
55 # get the new name from user
57 while [ "$name" = "" ]; do
58 read -p "Enter the name: "
59 if [ "$REPLY" = "" ]; then
60 echo "For canceling, use ctrl+c."
61 elif echo "$id-$REPLY" | grep -q "^$VALID_TEST_NAME$"; then
62 if [ -e "$tdir/$id-$REPLY" ]; then
63 echo "File '$id-$REPLY' already exists, use another one."
69 echo "A name can contain only alphanumeric symbols and dash!"
77 echo "Creating test file '$id'"
81 echo "Error: test $id already exists!"
91 echo -n "Add to group(s) [other] (separate by space, ? for list): "
93 [ -z "$ans" ] && ans=other
96 for d in $SRC_GROUPS; do
97 (cd "tests/$d/" ; ../../tools/mkgroupfile "$tmpfile")
98 l=$(sed -n < "$tmpfile" \
101 -e 's;\(^[0-9][0-9][0-9]\)\(.*$\);\2;p')
104 lst=`for word in $grpl; do echo $word; done | sort| uniq `
107 # only allow lower cases, spaces, digits and underscore in group
108 inval=`echo $ans | tr -d '[:lower:][:space:][:digit:]_'`
109 if [ "$inval" != "" ]; then
110 echo "Invalid characters in group(s): $inval"
111 echo "Only lower cases, digits and underscore are allowed in groups, separated by space"
114 # remove redundant spaces/tabs
115 ans=`echo "$ans" | sed 's/\s\+/ /g'`
121 # expert mode, groups are on the command line
123 (cd "$tdir" ; ../../tools/mkgroupfile "$tmpfile")
126 if ! grep -q "[[:space:]]$g" "$tmpfile"; then
127 echo "Warning: group \"$g\" not defined in $tdir tests"
133 echo -n "Creating skeletal script for you to edit ..."
137 cat <<End-of-File >$tdir/$id
139 # SPDX-License-Identifier: GPL-2.0
140 # Copyright (c) $year YOUR NAME HERE. All Rights Reserved.
144 # what am I here for?
149 # Override the default cleanup function.
156 # Import common functions.
159 # real QA test starts here
161 # Modify as appropriate.
162 _supported_fs generic
168 # optional stuff if your test has verbose output to help resolve problems
170 #echo "If failure, check \$seqres.full (this) and \$seqres.full.ok (reference)"
177 sleep 2 # latency to read messages to this point
181 ${EDITOR-vi} $tdir/$id
183 # Create default .out file
184 cat <<End-of-File >$tdir/$id.out
185 QA output created by $id