X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/blobdiff_plain/75a44ba568e363957a91e949e89a03b421cab728..eb83bf86a0eaf06f2adc62c19321650f48ecc87c:/usr/src/sys/kern/kern_proc.c?ds=inline

diff --git a/usr/src/sys/kern/kern_proc.c b/usr/src/sys/kern/kern_proc.c
index b985dca248..4497220bc6 100644
--- a/usr/src/sys/kern/kern_proc.c
+++ b/usr/src/sys/kern/kern_proc.c
@@ -1,4 +1,4 @@
-/*	kern_proc.c	4.4	%G%	*/
+/*	kern_proc.c	4.5	%G%	*/
 
 #include "../h/param.h"
 #include "../h/systm.h"
@@ -66,6 +66,8 @@ exece()
   again:
 	if(access(ip, IEXEC))
 		goto bad;
+	if((u.u_procp->p_flag&STRC) && access(ip, IREAD))
+		goto bad;
 	if((ip->i_mode & IFMT) != IFREG ||
 	   (ip->i_mode & (IEXEC|(IEXEC>>3)|(IEXEC>>6))) == 0) {
 		u.u_error = EACCES;