2 files changed, 17 insertions, 1 deletions

diff --git a/ChangeLog b/ChangeLog
index bca8568b1..4ff13cad5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -4,6 +4,8 @@
    - [Makefile.in] Add "make tests" target and "make clean" hooks.
    - [regress/agent-getpeereid.sh] Skip test on platforms that don't support
      getpeereid.
+   - [regress/agent-ptrace.sh] Skip tests if platform doesn't support it or
+     gdb cannot be found.
 
 20030903
  - (djm) OpenBSD CVS Sync
@@ -994,4 +996,4 @@
  - Fix sshd BindAddress and -b options for systems using fake-getaddrinfo.
    Report from murple@murple.net, diagnosis from dtucker@zip.com.au
 
-$Id: ChangeLog,v 1.2943 2003/09/04 03:49:30 dtucker Exp $
+$Id: ChangeLog,v 1.2944 2003/09/04 03:55:25 dtucker Exp $
diff --git a/regress/agent-ptrace.sh b/regress/agent-ptrace.sh
index 9f9c99960..7367d7aff 100644
--- a/regress/agent-ptrace.sh
+++ b/regress/agent-ptrace.sh
@@ -3,6 +3,20 @@
 
 tid="disallow agent ptrace attach"
 
+if [ -x `which uname 2>&1` ]; then
+        case `uname` in
+        Linux|HP-UX|SunOS|NetBSD|AIX)
+                echo "skipped (not supported)"
+                exit 0
+                ;;
+        esac
+fi
+
+if [ ! -x `which gdb 2>&1` ]; then
+        echo "skipped (gdb not found)"
+        exit 0
+fi
+
 trace "start agent"
 eval `${SSHAGENT} -s` > /dev/null
 r=$?