From: Rich Felker <dalias@aerifal.cx>
Date: Fri, 16 Sep 2011 14:13:00 +0000 (-0400)
Subject: fix ptrace (maybe)
X-Git-Tag: v0.8.2~7
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=d431d4546e5f028646592533d2fa2a53284bc2e4;p=oweals%2Fmusl.git

fix ptrace (maybe)
---

diff --git a/src/misc/ptrace.c b/src/misc/ptrace.c
index 1cc00167..f8540698 100644
--- a/src/misc/ptrace.c
+++ b/src/misc/ptrace.c
@@ -8,11 +8,18 @@ long ptrace(int req, ...)
 	va_list ap;
 	pid_t pid;
 	void *addr, *data, *addr2;
+	long ret, result;
+
 	va_start(ap, req);
 	pid = va_arg(ap, pid_t);
 	addr = va_arg(ap, void *);
 	data = va_arg(ap, void *);
 	addr2 = va_arg(ap, void *);
 	va_end(ap);
-	return syscall(SYS_ptrace, req, pid, addr, data, addr2);
+
+	if (req<4U) data = &result;
+	ret = syscall(SYS_ptrace, req, pid, addr, data, addr2);
+
+	if (ret<0 || req>=4U) return ret;
+	return result;
 }