← Back to branch summary

~zulcss/samba/server-dailies-3.4

« back to all changes in this revision

Viewing changes to testsuite/server/ipc.exp

  • Committer: Chuck Short
  • Date: 2010-09-28 20:38:39 UTC
  • Revision ID: zulcss@ubuntu.com-20100928203839-pgjulytsi9ue63x1
Initial version

Show diffs side-by-side

added added

removed removed

Lines of Context:
testsuite/server/ipc.exp
 
1
#
 
2
# Test operations on IPC$ share
 
3
#
 
4
 
 
5
# Initialisation
 
6
 
 
7
load_lib env-single.exp
 
8
load_lib smbclient.exp
 
9
 
 
10
set timeout 10
 
11
 
 
12
# Spawn a smbclient
 
13
 
 
14
if {![spawn_smbclient //$server/ipc\$ -U $user]} {
 
15
    perror "error spawning smbclient"
 
16
    return -1
 
17
}
 
18
 
 
19
#
 
20
# Start performing tests
 
21
#
 
22
 
 
23
global smb_prompt
 
24
 
 
25
do_smbclient "lcd /tmp\r" "lcd /tmp"
 
26
do_smbclient "!touch test.out\r" "touch test.out"
 
27
 
 
28
foreach { op } { "dir\r" "put test.out\r" "get test.out\r" \
 
29
        "get /etc/passwd\r" "mkdir foo\r" "print test.out\r" } {
 
30
 
 
31
    set action "doing $op"
 
32
    set output [do_smbclient $op $action]
 
33
 
 
34
    if {![regexp "ERR" $output]} {
 
35
        fail $action
 
36
        puts $output
 
37
    } else {
 
38
        pass $action
 
39
    }
 
40
}
 
41
 
 
42
# Clean up
 
43
 
 
44
file delete test.out