summaryrefslogtreecommitdiff
path: root/testsuite/execute-tests.sh
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/execute-tests.sh')
-rw-r--r--testsuite/execute-tests.sh145
1 files changed, 145 insertions, 0 deletions
diff --git a/testsuite/execute-tests.sh b/testsuite/execute-tests.sh
new file mode 100644
index 0000000..2075c6f
--- /dev/null
+++ b/testsuite/execute-tests.sh
@@ -0,0 +1,145 @@
+#!/bin/sh
+# Test execution less-common cases
+
+# Copyright (C) 2016 Free Software Foundation, Inc.
+
+# This program is free software: you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program. If not, see <http://www.gnu.org/licenses/>.
+. "${srcdir=.}/testsuite/init.sh"; path_prepend_ ./sed
+print_ver_ sed
+
+fail=0
+
+
+#
+# 'D' when pattern-space has no newline (act like 'd')
+#
+echo a | sed 1D > out1 || fail=1
+compare_ /dev/null out1 || fail=1
+
+#
+# s///e with a command that returns zero output
+#
+printf "\n" > exp2 || framework_failure_
+echo "" | sed '1etrue' > out2 || fail=1
+compare_ exp2 out2 || fail=1
+
+
+#
+# plain 'e' with a command that returns non-delimted output
+#
+printf "a\n" > exp3 || framework_failure_
+echo "printf a" | sed '1e' > out3 || fail=1
+compare_ exp3 out3 || fail=1
+
+#
+# plain 'e' with a command that returns delimted '\n' output
+# (implementation note: the delimiter is first chomp'd)
+printf "a\n" > exp4 || framework_failure_
+echo "echo a" | sed '1e' > out4 || fail=1
+compare_ exp4 out4 || fail=1
+
+#
+# e with a command that returns delimted '\0' output
+#
+printf "b\0" > exp5 || framework_failure_
+# This input file contains the shell command to be excuted:
+printf 'cat exp5' > in5 || framework_failure_
+sed -z '1e' <in5 > out5 || fail=1
+compare_ exp5 out5 || fail=1
+
+if test "$fail" -eq 1 ; then
+ od -tx1c exp5
+ od -tx1c out5
+fi
+
+#
+# 'P' command, with and without '\n' in the pattern space
+#
+echo a > in6 || framework_failure_
+printf "%s\n" a b | sed -n 'N;P' > out6 || fail=1
+compare_ in6 out6 || fail=1
+
+printf "%s\n" a | sed -n 'P' > out7 || fail=1
+compare_ in6 out7 || fail=1
+
+#
+# 'Q' with exit code
+#
+echo a > in7 || framework_failure_
+returns_ 42 sed '1Q42' in7 || fail=1
+
+#
+# 'r' without a filename (silently ignored)
+#
+echo c > in8 || framework_failure_
+sed 'rfoo.bar' in8 > out8 || fail=1
+compare_ in8 out8 || fail=1
+
+#
+# 'W' without a filename (silently ignored)
+#
+echo d > in9 || framework_failure_
+sed 'Wfoo1' in9 > out9 || fail=1
+compare_ in9 out9 || fail=1
+
+#
+# 'W', with and without '\n' in pattern space
+#
+
+# pattern-space with '\n', only 'a' should be written
+printf "%s\n" a b > in10 || framework_failure_
+echo a > a || framework_failure_
+sed 'N;Ww1.txt' in10 > out10 || fail=1
+compare_ a w1.txt || fail=1
+compare_ in10 out10 || fail=1
+
+# pattern-space without '\n', entire pattern-space ('a') should be written
+sed 'Ww2.txt' a > out11 || fail=1
+compare_ a out11 || fail=1
+compare_ a w2.txt || fail=1
+
+
+#
+# 'T' command
+#
+
+# Unsuccessful substitute, 'T' jumps to 'skip'.
+echo a | sed -n 's/X/Y/ ; Tskip ; Q42 ; :skip' || fail=1
+
+# Successful substitute, 'T' does not jumps to 'skip', sed exits with code 42.
+echo a | returns_ 42 sed -n 's/a/Y/ ; Tskip ; Q42 ; :skip' || fail=1
+
+
+#
+# 'F' command
+#
+echo a > in12 || framework_failure_
+printf "%s\n" in12 a > exp12 || framework_failure_
+sed F in12 > out12 || fail=1
+compare_ exp12 out12 || fail=1
+
+# 'F' with multiple files
+echo b > in13 || framework_failure_
+echo c > in14 || framework_failure_
+printf "%s\n" in12 a in13 b in14 c > exp14 || framework_failure_
+sed F in12 in13 in14 > out14 || fail=1
+compare_ exp14 out14 || fail=1
+
+# 'F' with stdin
+printf "%s\n" - a > exp15 || framework_failure_
+sed F < in12 > out15 || fail=1
+compare_ exp15 out15 || fail=1
+
+
+Exit $fail