summaryrefslogtreecommitdiff
path: root/testsuite/server
diff options
context:
space:
mode:
authorTim Potter <tpot@samba.org>2000-05-24 05:58:58 +0000
committerTim Potter <tpot@samba.org>2000-05-24 05:58:58 +0000
commitefc723ddd184ec1f511f25ffbb0451708be97a24 (patch)
treef9609000c1a0ebcbd76398944d0c1697063946b2 /testsuite/server
parentc29b72cd4f644c7750ee99313dee64441f78f076 (diff)
downloadsamba-efc723ddd184ec1f511f25ffbb0451708be97a24.tar.gz
samba-efc723ddd184ec1f511f25ffbb0451708be97a24.tar.bz2
samba-efc723ddd184ec1f511f25ffbb0451708be97a24.zip
Test wildcard rename function.
(This used to be commit a9133e2df038c73d3e9f1ffec7628dbde289085c)
Diffstat (limited to 'testsuite/server')
-rw-r--r--testsuite/server/rename.exp59
1 files changed, 59 insertions, 0 deletions
diff --git a/testsuite/server/rename.exp b/testsuite/server/rename.exp
new file mode 100644
index 0000000000..77e7297776
--- /dev/null
+++ b/testsuite/server/rename.exp
@@ -0,0 +1,59 @@
+#
+# Test misc file operations
+#
+
+# Initialisation
+
+load_lib env-single.exp
+load_lib smbclient.exp
+
+set timeout 10
+
+# Spawn a connection
+
+if {![spawn_smbclient //$server/$share -U $user]} {
+ perror "error spawning smbclient"
+ return -1
+}
+
+# Do wildcard rename test
+
+foreach { op } {"!touch /tmp/test.out\r" "lcd /tmp\r" "rm test.out\r" \
+ "put test.out\r"} {
+
+ set action "doing $op"
+ set output [do_smbclient $op $action]
+
+ if {[regexp "ERR" $output]} {
+ perror $action
+ puts $output
+ return -1;
+ }
+}
+
+file delete "/tmp/test.out"
+
+# Perform rename
+
+set output [do_smbclient "rename *.out *.dat\r" "wildcard rename"]
+
+if {[regexp "ERR" $output]} {
+ perror "wildcard rename didn't work"
+ return -1
+}
+
+# Check it worked
+
+set testname "wildcard match"
+set output [do_smbclient "dir\r" "wildcard rename check"]
+
+if {[regexp "test.dat" $output]} {
+ pass $testname
+} else {
+ fail $testname
+}
+
+# Clean up
+
+set op "rm test.dat\r"
+do_smbclient $op "doing $op"