blob: 2f71cbd8dfd261d912e87ca69aabe870e1e351ce (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
make_testproc
set pwdx "${topdir}src/pwdx"
# Run pwdx with no arguments
set test "pwdx no args"
spawn $pwdx
expect_pass "$test" "^\\s*Usage:\\s+\(lt-\)\?pwdx \\\[options\\\] pid\.\.\."
# Run pwdx with pid 0 which is invalid
set test "pwdx pid 0 should be invalid"
spawn $pwdx 0
expect_pass "$test" "\(lt-\)\?pwdx\: invalid process id\: 0"
# Run pwdx with existing pid
set test "pwdx find test process cwd"
set my_pwd [ pwd ]
spawn $pwdx $testproc1_pid
expect_pass "$test" "^$testproc1_pid: $my_pwd"
# Cleanup
kill_testproc
|
