findutils-4.6.0HEADfindutils-4.6.0master

1 files changed, 19 insertions, 0 deletions

diff --git a/find/testsuite/find.gnu/perm-slash.exp b/find/testsuite/find.gnu/perm-slash.exp
new file mode 100644
index 0000000..252d91a
--- /dev/null
+++ b/find/testsuite/find.gnu/perm-slash.exp
@@ -0,0 +1,19 @@
+# tests for -perm /nnn
+# The slash is a GNU extension
+
+exec rm -rf tmp
+exec mkdir tmp
+
+## set up a selection of test files
+foreach perm  { 400 200 555 700 000 050 } {
+    exec touch "tmp/$perm"
+    exec chmod $perm "tmp/$perm"
+}
+
+#
+# The -o operator normally has a short-circuit effect,
+# so we have to use "-exec false \;" to make sure that
+# all the parenthesised expression actually fail.
+#
+find_start p {tmp -mindepth 1 -perm /555 -printf "p/555 %p\n" }
+# exec rm -rf tmp tmp2