mirror of
https://git.lyx.org/repos/lyx.git
synced 2024-11-10 20:04:46 +00:00
643 lines
14 KiB
Bash
643 lines
14 KiB
Bash
|
DIRNAME0=`dirname "$0"`
|
||
|
|
#ROOT_OUTDIR="$DIRNAME0/out"
|
||
|
|
OUTDIR="$ROOT_OUTDIR"
|
||
|
|
#OUTDIR="$DIRNAME0/out"
|
||
|
|
THIS_PID=$$
|
||
|
|
|
||
|
|
SRC_DIR=lyx/src
|
||
|
|
EXE_TO_TEST=$SRC_DIR/lyx
|
||
|
|
|
||
|
|
#kill(){
|
||
|
|
# echo kill
|
||
|
|
#}
|
||
|
|
#killall (){
|
||
|
|
# echo killall
|
||
|
|
#}
|
||
|
|
|
||
|
|
mkdirp () {
|
||
|
|
mkdir -p "$1"
|
||
|
|
chmod g+w "$1"
|
||
|
|
}
|
||
|
|
|
||
|
|
kill_all_children() {
|
||
|
|
kill `$DIRNAME0/list_all_children.sh $1`
|
||
|
|
sleep 0.1
|
||
|
|
kill -9 `$DIRNAME0/list_all_children.sh $1`
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
#BORED_AFTER_SECS=7200 #If we have spent more than 3600 secs (an hour) replaying a file, without learning anything new, go and start looking for more bugs instead
|
||
|
|
if [ -z $BORED_AFTER_SECS ]
|
||
|
|
then
|
||
|
|
BORED_AFTER_SECS=3600 #If we have spent more than 3600 secs (an hour) replaying a file, without learning anything new, go and start looking for more bugs instead
|
||
|
|
fi
|
||
|
|
|
||
|
|
LAST_CORE=""
|
||
|
|
|
||
|
|
#############################
|
||
|
|
# This section of code is LyX Specific
|
||
|
|
#############################
|
||
|
|
|
||
|
|
if [ ! -e $DIRNAME0/.lyx ]
|
||
|
|
then
|
||
|
|
echo WARNING $DIRNAME0/.lyx does not exist
|
||
|
|
echo will need to regenerate .lyx every test
|
||
|
|
fi
|
||
|
|
|
||
|
|
#if [ ! -e lib/doc.orig ]
|
||
|
|
#then
|
||
|
|
# mv lib/doc lib/doc.orig
|
||
|
|
#fi
|
||
|
|
|
||
|
|
#kill_all_children() {
|
||
|
|
# kill `$DIRNAME0/list_all_children.sh $1`
|
||
|
|
# sleep 0.1
|
||
|
|
# kill -9 `$DIRNAME0/list_all_children.sh $1`
|
||
|
|
#}
|
||
|
|
|
||
|
|
#. $DIRNAME0/shared_functions.sh
|
||
|
|
|
||
|
|
|
||
|
|
ensure_cannot_print () {
|
||
|
|
if [ ! -z "$REPLAYFILE" ]
|
||
|
|
then
|
||
|
|
return
|
||
|
|
fi
|
||
|
|
if lpq
|
||
|
|
then
|
||
|
|
|
||
|
|
echo We can print, this is bad!
|
||
|
|
echo use lpadmin to stop keytest from destroying a forest.
|
||
|
|
full_exit
|
||
|
|
sleep 999999 ; read
|
||
|
|
else
|
||
|
|
echo "Phew, lpq reckons we aren't ready to print. This is a *good* thing!"
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
extras_save () {
|
||
|
|
return
|
||
|
|
for f in `ls lib/doc`
|
||
|
|
do
|
||
|
|
if [ lib/doc/$f -nt lib/doc.orig/$f -o ! -e lib/doc.orig/$f ]
|
||
|
|
then
|
||
|
|
#echo making doc dir $OUTDIR/$SEC.doc
|
||
|
|
mkdirp $OUTDIR/$SEC.doc
|
||
|
|
cp -a lib/doc/$f $OUTDIR/$SEC.doc/
|
||
|
|
fi
|
||
|
|
done
|
||
|
|
}
|
||
|
|
|
||
|
|
extras_prepare () {
|
||
|
|
return
|
||
|
|
mkdirp lib/doc/
|
||
|
|
rm lib/doc/*.lyx
|
||
|
|
cp -p lib/doc.orig/*.lyx lib/doc/
|
||
|
|
}
|
||
|
|
|
||
|
|
get_crash_id () {
|
||
|
|
name=`(cat $GDB | grep -o ' in lyx::[[:alnum:]:]*' ; cat $GDB | grep -o ' [ai][nt] [[:alnum:]:]*' ) | head -n3 | sed s/in// | sed 's/ //g'`
|
||
|
|
echo $name | sed 's/ /__/g'
|
||
|
|
}
|
||
|
|
|
||
|
|
calc_confirm_file() {
|
||
|
|
id=`get_crash_id`
|
||
|
|
echo "$ROOT_OUTDIR/$id.reproduced"
|
||
|
|
}
|
||
|
|
|
||
|
|
get_pid () {
|
||
|
|
sleep 3
|
||
|
|
echo getting pidof "$1" 1>&2
|
||
|
|
#PID=`ps "-u$USER" "$2" | grep "$1" | grep -v grep | sed 's/^ *//g'| sed 's/ .*$//'`
|
||
|
|
PID=`ps x | grep "$1" | grep -v grep | sed 's/^ *//g'| sed 's/ .*$//'`
|
||
|
|
echo "$PID" | ( grep " " > /dev/null && ( echo ERROR too many PIDs 1>&2 ; ps x ; full_exit ) )
|
||
|
|
nPIDs=`echo PID "$PID" | wc -l`
|
||
|
|
echo nPIDs $nPIDs 1>&2
|
||
|
|
sleep 1
|
||
|
|
echo -- if [ "$nPIDs" != "1" ] 1>&2
|
||
|
|
if test "$nPIDs" != "1" #2> /tmp/testerr
|
||
|
|
then
|
||
|
|
echo autolyx: Wrong number of PIDs "$nPIDs" "($1)" "($2)" 1>&2
|
||
|
|
echo autolyx: PIDs "$PID" 1>&2
|
||
|
|
ps x 1>&2
|
||
|
|
echo -----
|
||
|
|
fi
|
||
|
|
echo "$PID"
|
||
|
|
echo got pidof "$1" 1>&2
|
||
|
|
}
|
||
|
|
clean_up () {
|
||
|
|
KT_PID=`get_pid keytest.py x`
|
||
|
|
kill $KT_PID
|
||
|
|
sleep 0.1
|
||
|
|
kill -9 $KT_PID
|
||
|
|
}
|
||
|
|
|
||
|
|
full_exit() {
|
||
|
|
clean_up
|
||
|
|
|
||
|
|
echo attempting to exit this entire script... normal exit may just exit one function
|
||
|
|
|
||
|
|
kill $THIS_PID
|
||
|
|
sleep 1
|
||
|
|
echo We should not get this far
|
||
|
|
sleep 1
|
||
|
|
kill -9 $THIS_PID
|
||
|
|
echo We really should not get this far
|
||
|
|
exit
|
||
|
|
}
|
||
|
|
|
||
|
|
run_gdb () {
|
||
|
|
#Spawn a process to kill lyx if it runs too long
|
||
|
|
if ! touch $GDB
|
||
|
|
then
|
||
|
|
echo cannot touch $GDB
|
||
|
|
full_exit
|
||
|
|
fi
|
||
|
|
(sleep 300; echo KILLER ACTIVATIED ;killall gdb lyx ; sleep 1 ; killall -9 gdb lyx)&
|
||
|
|
KILLER_PID=$!
|
||
|
|
echo KILLING LYX, before starting new lyx
|
||
|
|
killall lyx
|
||
|
|
sleep 1
|
||
|
|
killall lyx -9
|
||
|
|
sleep 1
|
||
|
|
echo Starting GDB
|
||
|
|
#shell svn info $SRC_DIR/
|
||
|
|
(echo "
|
||
|
|
run
|
||
|
|
bt
|
||
|
|
#shell kill $CHILD_PID
|
||
|
|
shell wmctrl -l
|
||
|
|
#shell sleep 1
|
||
|
|
#shell kill -9 $CHILD_PID
|
||
|
|
" ; yes q) | HOME="$NEWHOME" gdb $EXE_TO_TEST 2>&1 | strings| tee $GDB
|
||
|
|
echo "end run_gdb ($KILLER_PID)"
|
||
|
|
kill $KILLER_PID
|
||
|
|
sleep 0.1
|
||
|
|
kill -9 $KILLER_PID
|
||
|
|
|
||
|
|
#### gcore $GDB.core
|
||
|
|
#shell wmctrl -r __renamed__ -b add,shaded
|
||
|
|
#shell wmctrl -r term -b add,shaded
|
||
|
|
#shell wmctrl -r term -b add,shaded
|
||
|
|
#shell wmctrl -R lyx'
|
||
|
|
#
|
||
|
|
#shell import -window root '$GDB.png'
|
||
|
|
#shell import -window root '$GDB..png'
|
||
|
|
#exit
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
###########################
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
try_replay () {
|
||
|
|
id=`get_crash_id`
|
||
|
|
echo CRASH_ID
|
||
|
|
export CONFIRM_FILE=`calc_confirm_file`
|
||
|
|
if [ ! -e "$CONFIRM_FILE" ]
|
||
|
|
then
|
||
|
|
echo $CONFIRM_FILE does not exist
|
||
|
|
echo This bug appears not to have been reproduced before
|
||
|
|
echo Will try to reproduce now
|
||
|
|
echo
|
||
|
|
do_replay
|
||
|
|
echo
|
||
|
|
echo Finished attempt at replay
|
||
|
|
else
|
||
|
|
echo $CONFIRM_FILE exists
|
||
|
|
echo This bugs has already been reproduced
|
||
|
|
echo Will not attempt to reproduce again
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
do_replay() {
|
||
|
|
(REPLAYFILE="$KEYCODEpure" TAIL_LINES=25 MAX_TAIL_LINES=10000 bash "$0")&
|
||
|
|
TEST_PID="$!"
|
||
|
|
echo Backgrounded $TEST_PID
|
||
|
|
echo waiting for $TEST_PID to finish
|
||
|
|
wait "$TEST_PID"
|
||
|
|
}
|
||
|
|
|
||
|
|
test_replayed () {
|
||
|
|
test -e "$f.replay/last_crash_sec" -o -e "$f.replay/Irreproducible"
|
||
|
|
}
|
||
|
|
|
||
|
|
move_to_replayed () {
|
||
|
|
mkdirp $REPLAY_DIR/replayed
|
||
|
|
mv $f* $REPLAY_DIR/replayed
|
||
|
|
}
|
||
|
|
|
||
|
|
do_queued_replay() {
|
||
|
|
if test_replayed
|
||
|
|
then
|
||
|
|
move_to_replayed
|
||
|
|
else
|
||
|
|
#./development/keytest/killtest
|
||
|
|
killall lyx
|
||
|
|
sleep 1
|
||
|
|
echo killall -9 lyx
|
||
|
|
killall -9 lyx
|
||
|
|
KEYCODEpure="$f" do_replay
|
||
|
|
#if test_replayed
|
||
|
|
#then
|
||
|
|
move_to_replayed
|
||
|
|
#fi
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
do_queued_replays() {
|
||
|
|
REPLAY_DIR=$OUTDIR/toreplay
|
||
|
|
echo doing queued_replays
|
||
|
|
echo replays `ls $REPLAY_DIR/*KEYCODEpure`
|
||
|
|
for f in `ls $REPLAY_DIR/*KEYCODEpure`
|
||
|
|
do
|
||
|
|
do_queued_replay
|
||
|
|
done
|
||
|
|
echo done queued_replays
|
||
|
|
(
|
||
|
|
REPLAY_DIR=$OUTDIR/toreproduce
|
||
|
|
export BORED_AFTER_SECS=0
|
||
|
|
echo doing queued_reproduce
|
||
|
|
echo reproduce`ls $REPLAY_DIR/*KEYCODEpure`
|
||
|
|
for f in `ls $REPLAY_DIR/*KEYCODEpure`
|
||
|
|
do
|
||
|
|
do_queued_replay
|
||
|
|
done
|
||
|
|
echo done queued_reproduce
|
||
|
|
)
|
||
|
|
}
|
||
|
|
|
||
|
|
#get_pid() {
|
||
|
|
# ps a | grep $1 | grep -v grep | sed 's/^ *//g'| sed 's/ .*$//'
|
||
|
|
#}
|
||
|
|
|
||
|
|
get_version_info() {
|
||
|
|
(cd $SRC_DIR ; svn info) 2>&1 |tee "$1".svn
|
||
|
|
$EXE_TO_TEST -version 2>&1 "$1".version
|
||
|
|
}
|
||
|
|
|
||
|
|
do_one_test() {
|
||
|
|
GDB=$OUTDIR/$SEC.GDB
|
||
|
|
KEYCODE=$OUTDIR/$SEC.KEYCODE
|
||
|
|
KEYCODEpure=$OUTDIR/$SEC.KEYCODEpure
|
||
|
|
NEWHOME=~/kt.dir/$SEC.dir
|
||
|
|
mkdirp $NEWHOME
|
||
|
|
NEWHOME=`cd $NEWHOME; pwd`
|
||
|
|
echo NEWHOME $NEWHOME
|
||
|
|
mkdirp "$NEWHOME"
|
||
|
|
cp -rv $DIRNAME0/.lyx "$NEWHOME"/
|
||
|
|
echo killall -9 lyx latex pdflatex
|
||
|
|
killall -9 lyx latex pdflatex
|
||
|
|
( sleep 9 &&
|
||
|
|
ps a | grep lyx
|
||
|
|
echo -- 1 || full_exit
|
||
|
|
LYX_PID=""
|
||
|
|
i=0
|
||
|
|
echo -- while [ -z "$LYX_PID" -a 200 -gt $i ]
|
||
|
|
while [ -z "$LYX_PID" -a 200 -gt $i ]
|
||
|
|
do
|
||
|
|
#export LYX_PID=`ps a | grep /src/lyx | grep -v grep | sed 's/^ *//g'| sed 's/ .*$//'`
|
||
|
|
export LYX_PID=`get_pid "$EXE_TO_TEST$" `
|
||
|
|
echo LYXPID "$LYX_PID" || full_exit
|
||
|
|
sleep 0.1
|
||
|
|
i=$(($i+1))
|
||
|
|
done
|
||
|
|
echo `ps a | grep $EXE_TO_TEST`
|
||
|
|
echo -- 2
|
||
|
|
echo `ps a | grep $EXE_TO_TEST | grep -v grep`
|
||
|
|
echo -- 3
|
||
|
|
echo `ps a | grep $EXE_TO_TEST | grep -v grep | sed 's/ [a-z].*$//'`
|
||
|
|
echo -- 4
|
||
|
|
echo LYX_PID=$LYX_PID
|
||
|
|
echo XA_PRIMARY | xclip -selection XA_PRIMARY
|
||
|
|
echo XA_SECONDARY | xclip -selection XA_SECONDARY
|
||
|
|
echo XA_CLIPBOARD | xclip -selection XA_CLIPBOARD
|
||
|
|
|
||
|
|
echo -- if [ ! -z "$LYX_PID" ]
|
||
|
|
if [ ! -z "$LYX_PID" ]
|
||
|
|
then
|
||
|
|
kill `ps a | grep keytest.py | grep -v grep | cut -c 1-5`
|
||
|
|
sleep 0.2
|
||
|
|
kill -9 `ps a | grep keytest.py | grep -v grep | cut -c 1-5`
|
||
|
|
while ! wmctrl -r lyx -b add,maximized_vert,maximized_horz
|
||
|
|
do
|
||
|
|
echo trying to maximize lyx
|
||
|
|
sleep 1
|
||
|
|
done
|
||
|
|
echo BEGIN KEYTEST KEYTEST_OUTFILE="$KEYCODEpure" nice -19 python $DIRNAME0/keytest.py
|
||
|
|
KEYTEST_OUTFILE="$KEYCODEpure" nice -19 python $DIRNAME0/keytest.py | tee $KEYCODE
|
||
|
|
#echo "$!" > $NEWHOME/keytest_py.pid
|
||
|
|
echo END_KEYTEST
|
||
|
|
fi
|
||
|
|
echo NO_KEYTEST
|
||
|
|
echo killall lyx
|
||
|
|
killall lyx
|
||
|
|
sleep 0.1
|
||
|
|
kill -9 "$LYX_PID"
|
||
|
|
killall -9 lyx #sometimes LyX really doesn't want to die causing the script to freeze
|
||
|
|
#killall lyx #sometimes LyX really doesn't want to die causing the script to freeze
|
||
|
|
sleep 1
|
||
|
|
#kill -9 "$LYX_PID" #sometimes LyX really doesn't want to die causing the script to freeze
|
||
|
|
|
||
|
|
#sleep 1
|
||
|
|
#killall -9 lyx
|
||
|
|
) &
|
||
|
|
CHILD_PID="$!"
|
||
|
|
ls $EXE_TO_TEST ; sleep 1
|
||
|
|
pwd
|
||
|
|
|
||
|
|
#You may want to use the following to simulate SIGFPE
|
||
|
|
#(sleep 90 && killall -8 lyx) &
|
||
|
|
echo TTL $TAIL_LINES
|
||
|
|
extras_prepare
|
||
|
|
ensure_cannot_print
|
||
|
|
run_gdb
|
||
|
|
# (run_gdb) &
|
||
|
|
# GDBTASK_PID="$!"
|
||
|
|
# (sleep 600 ; kill "$!")
|
||
|
|
# echo WAITING FOR: wait $GDBTASK_PID
|
||
|
|
# wait $GDBTASK_PID
|
||
|
|
# echo NOLONGER waiting for: wait $GDBTASK_PID
|
||
|
|
|
||
|
|
echo END gdb
|
||
|
|
kill $CHILD_PID
|
||
|
|
KT_PID=`get_pid keytest.py`
|
||
|
|
echo KT_PID=$KT_PID
|
||
|
|
kill $KT_PID
|
||
|
|
sleep 0.3
|
||
|
|
kill -9 $CHILD_PID
|
||
|
|
kill -9 $KT_PID
|
||
|
|
# Or use "exited normally":
|
||
|
|
echo END gdb2
|
||
|
|
# these tend to take up a huge amount of space:
|
||
|
|
echo will erase "$NEWHOME"
|
||
|
|
sleep 2
|
||
|
|
rm -rf $NEWHOME
|
||
|
|
if (grep " signal SIG[^TK]" $GDB || grep KILL_FREEZE $KEYCODE)
|
||
|
|
then
|
||
|
|
extras_save
|
||
|
|
mkdirp $OUTDIR/save && (
|
||
|
|
ln $OUTDIR/$SEC.* $OUTDIR/save ||
|
||
|
|
cp $OUTDIR/$SEC.* $OUTDIR/save)
|
||
|
|
LAST_CRASH_SEC=$SEC
|
||
|
|
echo $LAST_CRASH_SEC > $OUTDIR/last_crash_sec
|
||
|
|
get_version_info $OUTDIR/last_crash_sec.info
|
||
|
|
if [ ! -z "$TAIL_LINES" ]
|
||
|
|
then
|
||
|
|
LAST_EVENT="$SEC"
|
||
|
|
echo Reproducible > $OUTDIR/Reproducible
|
||
|
|
fi
|
||
|
|
TAIL_LINES=""
|
||
|
|
if [ -z "$REPLAYFILE" ]
|
||
|
|
then
|
||
|
|
echo ATTEMPTING TO REPLAY
|
||
|
|
try_replay
|
||
|
|
else
|
||
|
|
export KEYTEST_INFILE=$KEYCODEpure
|
||
|
|
NUM_KEYCODES=`wc -l < $KEYCODEpure`
|
||
|
|
echo NUM_KEYCODES $NUM_KEYCODES, was $LAST_NUM_KEYCODES
|
||
|
|
if [ "$NUM_KEYCODES" != "$LAST_NUM_KEYCODES" ]
|
||
|
|
then
|
||
|
|
LAST_EVENT="$SEC"
|
||
|
|
LAST_NUM_KEYCODES=$NUM_KEYCODES
|
||
|
|
echo "Hooray! we have eleminated some keycodes"
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
if [ ! -z "$AND_THEN_QUIT" ]
|
||
|
|
then
|
||
|
|
RESULT=1
|
||
|
|
echo RR 1
|
||
|
|
return 1
|
||
|
|
fi
|
||
|
|
if [ ! -z "$LAST_CORE" ]
|
||
|
|
then
|
||
|
|
rm "$LAST_CORE"
|
||
|
|
fi
|
||
|
|
LAST_CORE="$GDB.core"
|
||
|
|
else
|
||
|
|
if ! test -z "$BAK"
|
||
|
|
then
|
||
|
|
echo will erase '$BAK/*'="'$BAK/*'"
|
||
|
|
sleep 2
|
||
|
|
rm -rf $BAK/*
|
||
|
|
mv $OUTDIR/$SEC.* $BAK/
|
||
|
|
else
|
||
|
|
echo "BAK is null"
|
||
|
|
fi
|
||
|
|
if [ ! -z "$TAIL_LINES" ]
|
||
|
|
then
|
||
|
|
echo TTL3 $TAIL_LINES
|
||
|
|
echo MAX_TAIL_LINES "$MAX_TAIL_LINES"
|
||
|
|
TAIL_LINES=$(($TAIL_LINES*2))
|
||
|
|
echo TTL4 $TAIL_LINES
|
||
|
|
if [ "$TAIL_LINES" -ge "0$MAX_TAIL_LINES" -a ! -z "$MAX_TAIL_LINES" ]
|
||
|
|
then
|
||
|
|
echo Giving up because $TAIL_LINES '>' $MAX_TAIL_LINES
|
||
|
|
echo Irreproducible > $OUTDIR/Irreproducible
|
||
|
|
full_exit
|
||
|
|
fi
|
||
|
|
fi
|
||
|
|
if [ ! -z "$AND_THEN_QUIT" ]
|
||
|
|
then
|
||
|
|
RESULT=0
|
||
|
|
echo RR 0
|
||
|
|
return 0
|
||
|
|
fi
|
||
|
|
|
||
|
|
echo TTL2 $TAIL_LINES
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
test_exist () {
|
||
|
|
if [ ! -e "$1" ]
|
||
|
|
then
|
||
|
|
echo "$1" does not exist!
|
||
|
|
full_exit 1
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
assert () {
|
||
|
|
if ! "$@"
|
||
|
|
then
|
||
|
|
echo "Assertion '$*' Failed!"
|
||
|
|
full_exit 1
|
||
|
|
fi
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
#####################################################
|
||
|
|
# MAIN
|
||
|
|
#####################################################
|
||
|
|
|
||
|
|
#Start basic sanity checks
|
||
|
|
|
||
|
|
autolyx_main () {
|
||
|
|
|
||
|
|
if [ ! -e "$EXE_TO_TEST" ]
|
||
|
|
then
|
||
|
|
echo "$EXE_TO_TEST" does not exist
|
||
|
|
echo Cannot proceed
|
||
|
|
exit
|
||
|
|
fi
|
||
|
|
|
||
|
|
assert which xvkbd
|
||
|
|
assert which wmctrl
|
||
|
|
|
||
|
|
if ! wmctrl -l > /dev/null
|
||
|
|
then
|
||
|
|
echo autolyx: cannot run wmctrl -l
|
||
|
|
exit
|
||
|
|
fi
|
||
|
|
|
||
|
|
test_exist "$EXE_TO_TEST"
|
||
|
|
test_exist "$DIRNAME0/keytest.py"
|
||
|
|
|
||
|
|
if ! test -z "`pylint -e $DIRNAME0/keytest.py`"
|
||
|
|
then
|
||
|
|
echo "$DIRNAME0/keytest.py" has python errors
|
||
|
|
exit
|
||
|
|
fi
|
||
|
|
|
||
|
|
ensure_cannot_print
|
||
|
|
|
||
|
|
#End basic sanity checks
|
||
|
|
|
||
|
|
if [ ! -z "$1" ]
|
||
|
|
then
|
||
|
|
REPLAYFILE=$1
|
||
|
|
fi
|
||
|
|
|
||
|
|
if [ ! -z "$REPLAYFILE" ]
|
||
|
|
then
|
||
|
|
echo REPLAYMODE
|
||
|
|
OUTDIR="$REPLAYFILE.replay/"
|
||
|
|
mkdirp $REPLAYFILE.replay/ || full_exit
|
||
|
|
export KEYTEST_INFILE=$REPLAYFILE
|
||
|
|
if [ ! -e "$REPLAYFILE" ]
|
||
|
|
then
|
||
|
|
echo "$REPLAYFILE" does not exist
|
||
|
|
echo exiting
|
||
|
|
full_exit 1
|
||
|
|
fi
|
||
|
|
else
|
||
|
|
do_queued_replays
|
||
|
|
echo RANDOM MODE
|
||
|
|
fi
|
||
|
|
|
||
|
|
get_pid [0-9].x-session-manager"$" x
|
||
|
|
export X_PID=`get_pid [0-9].x-session-manager x`
|
||
|
|
echo X_PID $X_PID
|
||
|
|
|
||
|
|
export TAIL_LINES=$TAIL_LINES
|
||
|
|
echo TL $TAIL_LINES
|
||
|
|
|
||
|
|
|
||
|
|
BAK="$OUTDIR/backup"
|
||
|
|
mkdirp $BAK
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
#rename other windows to avoid confusion.
|
||
|
|
wmctrl -N __renamed__ -r lyx
|
||
|
|
wmctrl -N __renamed__ -r lyx
|
||
|
|
wmctrl -N __renamed__ -r lyx
|
||
|
|
wmctrl -N __renamed__ -r lyx
|
||
|
|
export PATH=`cd $DIRNAME0; pwd`/path:$PATH
|
||
|
|
|
||
|
|
if [ ! -z "$1" ]
|
||
|
|
then
|
||
|
|
SEC=`date +%s`
|
||
|
|
export MAX_DROP=0
|
||
|
|
if [ ".$SCREENSHOT_OUT." = ".auto." ]
|
||
|
|
then
|
||
|
|
echo SCREENSHOT_OUT was $SCREENSHOT_OUT.
|
||
|
|
export SCREENSHOT_OUT="$OUTDIR/$SEC.s"
|
||
|
|
echo SCREENSHOT_OUT is $SCREENSHOT_OUT.
|
||
|
|
#exit
|
||
|
|
fi
|
||
|
|
export RESULT=179
|
||
|
|
do_one_test #| tee do_one_test.log
|
||
|
|
RESULT="$?"
|
||
|
|
echo Ressult $RESULT
|
||
|
|
|
||
|
|
kill `list_all_children.sh $$`
|
||
|
|
sleep 0.1
|
||
|
|
kill -9 `list_all_children.sh $$`
|
||
|
|
|
||
|
|
exit $RESULT
|
||
|
|
|
||
|
|
#echo done ; sleep 1
|
||
|
|
full_exit
|
||
|
|
fi
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
(
|
||
|
|
echo TTL $TAIL_LINES
|
||
|
|
|
||
|
|
LAST_EVENT=`date +%s` # Last time something interesting happened. If nothing interesting has happened for a while, we should quit.
|
||
|
|
|
||
|
|
ensure_cannot_print
|
||
|
|
echo X_PID $X_PID
|
||
|
|
export X_PID=`get_pid [0-9].x-session-manager"$" x`
|
||
|
|
echo PATH $PATH
|
||
|
|
while true
|
||
|
|
do
|
||
|
|
echo Currently running autolyx PID=$$
|
||
|
|
if [ ! -z "$TAIL_LINES" ]
|
||
|
|
then
|
||
|
|
echo TAIL_LINES: "$TAIL_LINES"
|
||
|
|
TAIL_FILE=$OUTDIR/tail_"$TAIL_LINES"
|
||
|
|
tail -n "$TAIL_LINES" "$REPLAYFILE" > $TAIL_FILE
|
||
|
|
KEYTEST_INFILE=$TAIL_FILE
|
||
|
|
MAX_DROP=0
|
||
|
|
else
|
||
|
|
MAX_DROP=0.2
|
||
|
|
fi
|
||
|
|
export MAX_DROP
|
||
|
|
SEC=`date +%s`
|
||
|
|
if [ -z "$TAIL_LINES" -a ! -z "$REPLAYFILE" ]
|
||
|
|
then
|
||
|
|
echo Boredom factor: $SEC-$LAST_EVENT'=' $(($SEC-$LAST_EVENT))
|
||
|
|
if [ $(($SEC-$LAST_EVENT)) -gt $BORED_AFTER_SECS ]
|
||
|
|
then
|
||
|
|
echo
|
||
|
|
echo Is is now $SEC seconds
|
||
|
|
echo The last time we managed to eliminate a keycode was at $LAST_EVENT
|
||
|
|
echo We get bored after $BORED_AFTER_SECS seconds
|
||
|
|
echo Giving up now.
|
||
|
|
echo
|
||
|
|
echo $LAST_CRASH_SEC > $OUTDIR/Finished
|
||
|
|
SEC=$LAST_CRASH_SEC #I used SEC in place of LAST_CRASH_SEC. Here is a quick fix.
|
||
|
|
#make screenshots
|
||
|
|
if [ `cat $OUTDIR/$SEC.KEYCODEpure | wc -l` -lt 40 ] # If many keycodes, dont bother trying to make screenshots
|
||
|
|
then
|
||
|
|
echo "Making screenschot of $OUTDIR/$SEC.KEYCODEpure"
|
||
|
|
test -e $OUTDIR/$SEC.KEYCODEpure || echo "DOES NOT EXIST: $OUTDIR/$SEC.KEYCODEpure"
|
||
|
|
(SCREENSHOT_OUT="auto" ./doNtimes.sh 9 ./reproduce.sh $OUTDIR/$SEC.KEYCODEpure ; echo $f )
|
||
|
|
fi
|
||
|
|
mkdirp $OUTDIR/final
|
||
|
|
mkdirp $OUTDIR/final_cp
|
||
|
|
#chmod g+w $OUTDIR/final
|
||
|
|
ln $OUTDIR/$SEC* $OUTDIR/final || cp $OUTDIR/$SEC* $OUTDIR/final
|
||
|
|
cp $OUTDIR/$SEC* $OUTDIR/final_cp/
|
||
|
|
cp -rv $OUTDIR/$SEC.replay $OUTDIR/final_cp/
|
||
|
|
CONFIRM_FILE=`calc_confirm_file`
|
||
|
|
echo Reproducible > "$CONFIRM_FILE"
|
||
|
|
|
||
|
|
|
||
|
|
full_exit
|
||
|
|
fi
|
||
|
|
else
|
||
|
|
do_queued_replays
|
||
|
|
fi
|
||
|
|
do_one_test
|
||
|
|
done
|
||
|
|
kill_all_children $$
|
||
|
|
) 2>&1 |tee $OUTDIR/log
|
||
|
|
kill_all_children $$
|
||
|
|
}
|