| #!/bin/ash | 
 |  | 
 | # will run lock_test with whatever arguments are passed in.  default arguments | 
 | # are -wMAX_VCORES and -l10000. | 
 |  | 
 | # TODO: take a param up to MAXVC for how many cores we preempt per loop | 
 | # TODO: make a program that does the preemption, instead of the script.  it | 
 | # takes around 2ms to spawn, run, and wait on a program, which messes with the | 
 | # timing.  When we do this, pull in the vcore shuffling code from prov.c and | 
 | # have that be an option. | 
 | # TODO: have better options for the two preempt styles (periodic, vs total) | 
 | # | 
 | # Run this from looper.sh for multiple runs. | 
 |  | 
 | if [ $# -lt 2 ] | 
 | then | 
 | 	echo Usage: $0 PREEMPT_DELAY_USEC ARGS_FOR_LOCK_TEST | 
 | 	exit | 
 | fi | 
 |  | 
 | PREEMPT_DELAY=$1 | 
 |  | 
 | shift | 
 |  | 
 | # for suppressing output later (no /dev/null, and also append doesn't work) | 
 | echo "" >> tmpfile | 
 |  | 
 | # retval of max_vcores is the value | 
 | max_vcores | 
 | MAXVC=$? | 
 | # pth_test exists to hog the machine | 
 | pthread_test 100 999999999 $MAXVC >> tmpfile 2>&1 & | 
 | PTHPID=$! | 
 | echo Launch pth_test, pid was $PTHPID | 
 |  | 
 | # if arguments, like -w are repeated, the second one is used | 
 | lock_test -w $MAXVC -l 10000 $@ & | 
 | LOCKPID=$! | 
 | echo Launch lock_test, pid was $LOCKPID | 
 |  | 
 | # while lock_test is still alive, we preempt every so often, then give it back. | 
 | # using the retval of prov -p$LOCKPID to tell us if lock_test is around | 
 | RET=0 | 
 | INC=0 | 
 |  | 
 | # This is the preempt and never return, hoping to catch deadlocks | 
 | prov -tc -p$LOCKPID -m >> tmpfile 2>&1 | 
 |  | 
 | usleep $PREEMPT_DELAY | 
 |  | 
 | prov -tc -p$PTHPID -v1 >> tmpfile 2>&1 | 
 | prov -tc -p$PTHPID -v2 >> tmpfile 2>&1 | 
 |  | 
 | # giving it vc3, which it already has.  this is just a test on process existence | 
 | while [ $RET -eq 0 ]; do | 
 | 	prov -tc -p$LOCKPID -v3 >> tmpfile 2>&1 | 
 | 	RET=$? | 
 | 	usleep $PREEMPT_DELAY | 
 | done | 
 |  | 
 | ## This is the preempt, return, preempt return cycle | 
 | #while [ $RET -eq 0 ]; do | 
 | #	prov -tc -p$LOCKPID -m >> tmpfile 2>&1 | 
 | #	RET=$? | 
 | # | 
 | #	usleep $PREEMPT_DELAY | 
 | # | 
 | #	prov -tc -p$PTHPID -v1 >> tmpfile 2>&1 | 
 | #	prov -tc -p$PTHPID -v2 >> tmpfile 2>&1 | 
 | # | 
 | #	# the extra preempts here are to make us wait longer, to see gaps where we | 
 | #	# "locked up" more clearly. | 
 | #	usleep $PREEMPT_DELAY | 
 | #	usleep $PREEMPT_DELAY | 
 | #	usleep $PREEMPT_DELAY | 
 | #	usleep $PREEMPT_DELAY | 
 | #	usleep $PREEMPT_DELAY | 
 | # | 
 | #	let INC=$INC+1 | 
 | #done | 
 |  | 
 | ## This is the 'run for a bit, preempt a lot just once, then return all style | 
 | #prov -tc -p$LOCKPID -m >> tmpfile 2>&1 | 
 | #usleep $PREEMPT_DELAY | 
 | #prov -tc -p$PTHPID -v1 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v2 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v3 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v4 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v5 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v6 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v7 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v8 >> tmpfile 2>&1 | 
 | #prov -tc -p$PTHPID -v9 >> tmpfile 2>&1 | 
 | #usleep $PREEMPT_DELAY | 
 | #prov -tc -p$LOCKPID -m >> tmpfile 2>&1 | 
 | # | 
 | #while [ $RET -eq 0 ]; do | 
 | #	prov -tc -p$LOCKPID -m >> tmpfile 2>&1 | 
 | #	RET=$? | 
 | #	usleep $PREEMPT_DELAY | 
 | #done | 
 |  | 
 | echo All done, killing pth_test.  Did $INC prov-preempt loops. | 
 | kill -9 $PTHPID |