granicus.if.org Git - psmisc/blob - testsuite/pslog.test/pslog.exp

   1 #
   2 # Testsuite for pslog
   3 #
   4
   5 set pslog "${topdir}src/pslog"
   6 set fake_pid "27000"
   7
   8 set test "pslog with no arguments"
   9 spawn $pslog
  10 expect_pass "$test" "^Usage: pslog PID\\.\\.\\."
  11
  12 set test "pslog pid not found"
  13 if { [ file exists "/proc/$fake_pid" ] } {
  14     untested "$test (PID exists)"
  15 } else {
  16     spawn $pslog ${fake_pid}
  17     expect_pass "$test" "opendir: No such file or directory"
  18 }
  19