Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 1 | #!/bin/sh |
| 2 | |
| 3 | ## Script to build and test the latest python from svn. It basically |
| 4 | ## does this: |
| 5 | ## svn up ; ./configure ; make ; make test ; make install ; cd Doc ; make |
| 6 | ## |
| 7 | ## Logs are kept and rsync'ed to the host. If there are test failure(s), |
| 8 | ## information about the failure(s) is mailed. |
| 9 | ## |
| 10 | ## This script is run on the PSF's machine as user neal via crontab. |
| 11 | ## |
| 12 | ## Yes, this script would probably be easier in python, but then |
| 13 | ## there's a bootstrap problem. What if Python doesn't build? |
| 14 | ## |
| 15 | ## This script should be fairly clean Bourne shell, ie not too many |
| 16 | ## bash-isms. We should try to keep it portable to other Unixes. |
| 17 | ## Even though it will probably only run on Linux. I'm sure there are |
| 18 | ## several GNU-isms currently (date +%s and readlink). |
| 19 | ## |
| 20 | ## Perhaps this script should be broken up into 2 (or more) components. |
| 21 | ## Building doc is orthogonal to the rest of the python build/test. |
| 22 | ## |
| 23 | |
| 24 | ## FIXME: we should detect test hangs (eg, if they take more than 45 minutes) |
| 25 | |
| 26 | ## FIXME: we should run valgrind |
| 27 | ## FIXME: we should run code coverage |
| 28 | |
| 29 | ## Utilities invoked in this script include: |
Neal Norwitz | d3a5867 | 2006-01-02 23:22:41 +0000 | [diff] [blame] | 30 | ## basename, date, dirname, expr, grep, readlink, uname |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 31 | ## cksum, make, mutt, rsync, svn |
| 32 | |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 33 | ## remember where did we started from |
| 34 | DIR=`dirname $0` |
| 35 | if [ "$DIR" = "" ]; then |
| 36 | DIR="." |
| 37 | fi |
| 38 | |
| 39 | ## make directory absolute |
| 40 | DIR=`readlink -f $DIR` |
Neal Norwitz | d3a5867 | 2006-01-02 23:22:41 +0000 | [diff] [blame] | 41 | FULLPATHNAME="$DIR/`basename $0`" |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 42 | ## we want Misc/.. |
| 43 | DIR=`dirname $DIR` |
| 44 | |
| 45 | ## Configurable options |
| 46 | |
| 47 | FAILURE_SUBJECT="Python Regression Test Failures" |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 48 | #FAILURE_MAILTO="YOUR_ACCOUNT@gmail.com" |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 49 | FAILURE_MAILTO="python-3000-checkins@python.org" |
Guido van Rossum | d8faa36 | 2007-04-27 19:54:29 +0000 | [diff] [blame] | 50 | #FAILURE_CC="optional--uncomment and set to desired address" |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 51 | |
| 52 | REMOTE_SYSTEM="neal@dinsdale.python.org" |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 53 | REMOTE_DIR="/data/ftp.python.org/pub/docs.python.org/dev/3.0" |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 54 | RESULT_FILE="$DIR/build/index.html" |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 55 | INSTALL_DIR="/tmp/python-test-3.0/local" |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 56 | RSYNC_OPTS="-aC -e ssh" |
| 57 | |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 58 | # Always run the installed version of Python. |
| 59 | PYTHON=$INSTALL_DIR/bin/python |
| 60 | |
| 61 | # Python options and regression test program that should always be run. |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 62 | REGRTEST_ARGS="-E -tt $INSTALL_DIR/lib/python3.0/test/regrtest.py" |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 63 | |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 64 | REFLOG="build/reflog.txt.out" |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 65 | # These tests are not stable and falsely report leaks sometimes. |
Neal Norwitz | f415d5f | 2006-02-19 18:48:19 +0000 | [diff] [blame] | 66 | # The entire leak report will be mailed if any test not in this list leaks. |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 67 | # Note: test_XXX (none currently) really leak, but are disabled |
| 68 | # so we don't send spam. Any test which really leaks should only |
| 69 | # be listed here if there are also test cases under Lib/test/leakers. |
Guido van Rossum | 7eaf822 | 2007-06-18 17:58:50 +0000 | [diff] [blame] | 70 | LEAKY_TESTS="test_(cmd_line|popen2|socket|threading_local|urllib2_localnet)" |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 71 | |
| 72 | # These tests always fail, so skip them so we don't get false positives. |
Guido van Rossum | cd16bf6 | 2007-06-13 18:07:49 +0000 | [diff] [blame] | 73 | _ALWAYS_SKIP="" |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 74 | ALWAYS_SKIP="-x $_ALWAYS_SKIP" |
Neal Norwitz | f415d5f | 2006-02-19 18:48:19 +0000 | [diff] [blame] | 75 | |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 76 | # Skip these tests altogether when looking for leaks. These tests |
| 77 | # do not need to be stored above in LEAKY_TESTS too. |
| 78 | # test_compiler almost never finishes with the same number of refs |
| 79 | # since it depends on other modules, skip it. |
| 80 | # test_logging causes hangs, skip it. |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 81 | LEAKY_SKIPS="-x test_compiler test_logging $_ALWAYS_SKIP" |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 82 | |
| 83 | # Change this flag to "yes" for old releases to only update/build the docs. |
Neal Norwitz | 88b78d8 | 2006-02-14 08:14:16 +0000 | [diff] [blame] | 84 | BUILD_DISABLED="no" |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 85 | |
| 86 | ## utility functions |
| 87 | current_time() { |
| 88 | date +%s |
| 89 | } |
| 90 | |
| 91 | update_status() { |
| 92 | now=`current_time` |
| 93 | time=`expr $now - $3` |
| 94 | echo "<li><a href=\"$2\">$1</a> <font size=\"-1\">($time seconds)</font></li>" >> $RESULT_FILE |
| 95 | } |
| 96 | |
| 97 | mail_on_failure() { |
| 98 | if [ "$NUM_FAILURES" != "0" ]; then |
Guido van Rossum | d8faa36 | 2007-04-27 19:54:29 +0000 | [diff] [blame] | 99 | dest=$FAILURE_MAILTO |
| 100 | # FAILURE_CC is optional. |
| 101 | if [ "$FAILURE_CC" != "" ]; then |
| 102 | dest="$dest -c $FAILURE_CC" |
| 103 | fi |
| 104 | mutt -s "$FAILURE_SUBJECT $1 ($NUM_FAILURES)" $dest < $2 |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 105 | fi |
| 106 | } |
| 107 | |
| 108 | ## setup |
| 109 | cd $DIR |
| 110 | mkdir -p build |
| 111 | rm -f $RESULT_FILE build/*.out |
| 112 | rm -rf $INSTALL_DIR |
| 113 | |
| 114 | ## create results file |
| 115 | TITLE="Automated Python Build Results" |
Neal Norwitz | b896759 | 2006-01-16 04:37:22 +0000 | [diff] [blame] | 116 | echo "<html>" >> $RESULT_FILE |
| 117 | echo " <head>" >> $RESULT_FILE |
| 118 | echo " <title>$TITLE</title>" >> $RESULT_FILE |
| 119 | echo " <meta http-equiv=\"refresh\" content=\"43200\">" >> $RESULT_FILE |
| 120 | echo " </head>" >> $RESULT_FILE |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 121 | echo "<body>" >> $RESULT_FILE |
| 122 | echo "<h2>Automated Python Build Results</h2>" >> $RESULT_FILE |
| 123 | echo "<table>" >> $RESULT_FILE |
| 124 | echo " <tr>" >> $RESULT_FILE |
| 125 | echo " <td>Built on:</td><td>`date`</td>" >> $RESULT_FILE |
| 126 | echo " </tr><tr>" >> $RESULT_FILE |
| 127 | echo " <td>Hostname:</td><td>`uname -n`</td>" >> $RESULT_FILE |
| 128 | echo " </tr><tr>" >> $RESULT_FILE |
| 129 | echo " <td>Platform:</td><td>`uname -srmpo`</td>" >> $RESULT_FILE |
| 130 | echo " </tr>" >> $RESULT_FILE |
| 131 | echo "</table>" >> $RESULT_FILE |
| 132 | echo "<ul>" >> $RESULT_FILE |
| 133 | |
| 134 | ## update, build, and test |
| 135 | ORIG_CHECKSUM=`cksum $FULLPATHNAME` |
| 136 | F=svn-update.out |
| 137 | start=`current_time` |
| 138 | svn update >& build/$F |
| 139 | err=$? |
| 140 | update_status "Updating" "$F" $start |
Neal Norwitz | 88b78d8 | 2006-02-14 08:14:16 +0000 | [diff] [blame] | 141 | if [ $err = 0 -a "$BUILD_DISABLED" != "yes" ]; then |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 142 | ## FIXME: we should check if this file has changed. |
| 143 | ## If it has changed, we should re-run the script to pick up changes. |
| 144 | if [ "$ORIG_CHECKSUM" != "$ORIG_CHECKSUM" ]; then |
| 145 | exec $FULLPATHNAME $@ |
| 146 | fi |
| 147 | |
| 148 | F=svn-stat.out |
| 149 | start=`current_time` |
| 150 | svn stat >& build/$F |
| 151 | ## ignore some of the diffs |
| 152 | NUM_DIFFS=`egrep -vc '^. (@test|db_home|Lib/test/(regrtest\.py|db_home))$' build/$F` |
| 153 | update_status "svn stat ($NUM_DIFFS possibly important diffs)" "$F" $start |
| 154 | |
| 155 | F=configure.out |
| 156 | start=`current_time` |
| 157 | ./configure --prefix=$INSTALL_DIR --with-pydebug >& build/$F |
| 158 | err=$? |
| 159 | update_status "Configuring" "$F" $start |
| 160 | if [ $err = 0 ]; then |
| 161 | F=make.out |
| 162 | start=`current_time` |
| 163 | make >& build/$F |
| 164 | err=$? |
| 165 | warnings=`grep warning build/$F | egrep -vc "te?mpnam(_r|)' is dangerous,"` |
| 166 | update_status "Building ($warnings warnings)" "$F" $start |
| 167 | if [ $err = 0 ]; then |
Neal Norwitz | d19a4d4 | 2006-01-02 22:10:10 +0000 | [diff] [blame] | 168 | ## make install |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 169 | F=make-install.out |
| 170 | start=`current_time` |
| 171 | make install >& build/$F |
| 172 | update_status "Installing" "$F" $start |
| 173 | |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 174 | if [ ! -x $PYTHON ]; then |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 175 | ln -s ${PYTHON}3.* $PYTHON |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 176 | fi |
| 177 | |
Neal Norwitz | d19a4d4 | 2006-01-02 22:10:10 +0000 | [diff] [blame] | 178 | ## make and run basic tests |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 179 | F=make-test.out |
| 180 | start=`current_time` |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 181 | $PYTHON $REGRTEST_ARGS $ALWAYS_SKIP >& build/$F |
Neal Norwitz | 7941552 | 2006-02-15 06:07:32 +0000 | [diff] [blame] | 182 | NUM_FAILURES=`grep -ic " failed:" build/$F` |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 183 | update_status "Testing basics ($NUM_FAILURES failures)" "$F" $start |
Neal Norwitz | 02c408d | 2006-01-03 02:18:01 +0000 | [diff] [blame] | 184 | mail_on_failure "basics" build/$F |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 185 | |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 186 | F=make-test-opt.out |
| 187 | start=`current_time` |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 188 | $PYTHON -O $REGRTEST_ARGS $ALWAYS_SKIP >& build/$F |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 189 | NUM_FAILURES=`grep -ic " failed:" build/$F` |
| 190 | update_status "Testing opt ($NUM_FAILURES failures)" "$F" $start |
| 191 | mail_on_failure "opt" build/$F |
| 192 | |
Neal Norwitz | d19a4d4 | 2006-01-02 22:10:10 +0000 | [diff] [blame] | 193 | ## run the tests looking for leaks |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 194 | F=make-test-refleak.out |
| 195 | start=`current_time` |
Thomas Wouters | 49fd7fa | 2006-04-21 10:40:58 +0000 | [diff] [blame] | 196 | ## ensure that the reflog exists so the grep doesn't fail |
| 197 | touch $REFLOG |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 198 | $PYTHON $REGRTEST_ARGS -R 4:3:$REFLOG -u network $LEAKY_SKIPS >& build/$F |
Guido van Rossum | 360e4b8 | 2007-05-14 22:51:27 +0000 | [diff] [blame] | 199 | NUM_FAILURES=`egrep -vc "($LEAKY_TESTS|sum=0)" $REFLOG` |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 200 | update_status "Testing refleaks ($NUM_FAILURES failures)" "$F" $start |
| 201 | mail_on_failure "refleak" $REFLOG |
| 202 | |
Neal Norwitz | d19a4d4 | 2006-01-02 22:10:10 +0000 | [diff] [blame] | 203 | ## now try to run all the tests |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 204 | F=make-testall.out |
| 205 | start=`current_time` |
Neal Norwitz | d19a4d4 | 2006-01-02 22:10:10 +0000 | [diff] [blame] | 206 | ## skip curses when running from cron since there's no terminal |
| 207 | ## skip sound since it's not setup on the PSF box (/dev/dsp) |
Guido van Rossum | 5205653 | 2007-05-10 14:04:07 +0000 | [diff] [blame] | 208 | $PYTHON $REGRTEST_ARGS -uall -x test_curses test_linuxaudiodev test_ossaudiodev $_ALWAYS_SKIP >& build/$F |
Neal Norwitz | 7941552 | 2006-02-15 06:07:32 +0000 | [diff] [blame] | 209 | NUM_FAILURES=`grep -ic " failed:" build/$F` |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 210 | update_status "Testing all except curses and sound ($NUM_FAILURES failures)" "$F" $start |
Neal Norwitz | d3a5867 | 2006-01-02 23:22:41 +0000 | [diff] [blame] | 211 | mail_on_failure "all" build/$F |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 212 | fi |
| 213 | fi |
| 214 | fi |
| 215 | |
| 216 | |
| 217 | ## make doc |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 218 | cd $DIR/Doc |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 219 | F="make-doc.out" |
| 220 | start=`current_time` |
Guido van Rossum | d8faa36 | 2007-04-27 19:54:29 +0000 | [diff] [blame] | 221 | # Doc/commontex/boilerplate.tex is expected to always have an outstanding |
| 222 | # modification for the date. When a release is cut, a conflict occurs. |
| 223 | # This allows us to detect this problem and not try to build the docs |
| 224 | # which will definitely fail with a conflict. |
| 225 | CONFLICTED_FILE=commontex/boilerplate.tex |
| 226 | conflict_count=`grep -c "<<<" $CONFLICTED_FILE` |
| 227 | if [ $conflict_count != 0 ]; then |
| 228 | echo "Conflict detected in $CONFLICTED_FILE. Doc build skipped." > ../build/$F |
| 229 | err=1 |
| 230 | else |
| 231 | make >& ../build/$F |
| 232 | err=$? |
| 233 | fi |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 234 | update_status "Making doc" "$F" $start |
| 235 | if [ $err != 0 ]; then |
| 236 | NUM_FAILURES=1 |
| 237 | mail_on_failure "doc" ../build/$F |
| 238 | fi |
| 239 | |
| 240 | echo "</ul>" >> $RESULT_FILE |
| 241 | echo "</body>" >> $RESULT_FILE |
| 242 | echo "</html>" >> $RESULT_FILE |
| 243 | |
| 244 | ## copy results |
Neal Norwitz | 88b78d8 | 2006-02-14 08:14:16 +0000 | [diff] [blame] | 245 | rsync $RSYNC_OPTS html/* $REMOTE_SYSTEM:$REMOTE_DIR |
Neal Norwitz | 461aa5b | 2006-01-02 20:07:16 +0000 | [diff] [blame] | 246 | cd ../build |
| 247 | rsync $RSYNC_OPTS index.html *.out $REMOTE_SYSTEM:$REMOTE_DIR/results/ |