11.t revision 303975 
11473SN/A#!/bin/sh
27953SN/A# $FreeBSD: head/tools/regression/pjdfstest/tests/truncate/11.t 211352 2010-08-15 21:24:17Z pjd $
31473SN/A
41473SN/Adesc="truncate returns ETXTBSY the file is a pure procedure (shared text) file that is being executed"
51473SN/A
61473SN/Adir=`dirname $0`
71473SN/A. ${dir}/../misc.sh
82362SN/A
91473SN/A[ "${os}" = "FreeBSD" ] || quick_exit
102362SN/A
111473SN/Arequires_exec
121473SN/A
131473SN/Aecho "1..2"
141473SN/A
151473SN/An0=`namegen`
161473SN/A
171473SN/Acp -pf `which sleep` ${n0}
181473SN/A./${n0} 3 &
191473SN/Awhile ! pkill -0 -f ./${n0}; do
201473SN/A	sleep 0.1
211473SN/Adone
222362SN/Aexpect ETXTBSY truncate ${n0} 123
232362SN/Apkill -9 -f ./${n0}
242362SN/Aexpect 0 unlink ${n0}
251473SN/A