cosmetic
[build.git] / vbuild-nightly.sh
1 #!/bin/bash
2 REVISION=$(echo '$Revision$' | sed -e 's,\$,,g' -e 's,^\w*:\s,,' )
3
4 COMMANDPATH=$0
5 COMMAND=$(basename $0)
6
7 # default values, tunable with command-line options
8 DEFAULT_FCDISTRO=f7
9 DEFAULT_PLDISTRO=planetlab
10 DEFAULT_PERSONALITY=linux32
11 DEFAULT_BASE="@DATE@--@PLDISTRO@-@FCDISTRO@-@PERSONALITY@"
12 DEFAULT_SVNPATH="http://svn.planet-lab.org/svn/build/trunk"
13
14 # web publishing results
15 DEFAULT_WEBPATH="/build/@PLDISTRO@/"
16
17 # for the test part
18 TESTBUILDURL="http://build.one-lab.org/"
19 TESTBOX=onelab-test.inria.fr
20 TESTBOXSSH=root@onelab-test.inria.fr
21 TESTSVNPATH="http://svn.planet-lab.org/svn/tests/trunk/system/"
22 ####################
23 # assuming vserver runs in UTC
24 DATE=$(date +'%Y.%m.%d')
25
26 # temporary - wrap a quick summary of suspicious stuff
27 # this is to focus on installation that go wrong
28 # use with care, a *lot* of other things can go bad as well
29 function summary () {
30     from=$1; shift
31     echo "******************** BEG SUMMARY" 
32     python - $from <<EOF
33 #!/usr/bin/env python
34 # read a full log and tries to extract the interesting stuff
35
36 import sys,re
37 m_show_line=re.compile(".* BEG (RPM|VSERVER).*|.*'boot'.*|\* .*|.*is not installed.*")
38 m_installing_any=re.compile('\r  (Installing:[^\]]*]) ')
39 m_installing_err=re.compile('\r  (Installing:[^\]]*])(..+)')
40 m_installing_end=re.compile('Installed:.*')
41 m_installing_doc=re.compile("(.*)install-info: No such file or directory for /usr/share/info/\S+(.*)")
42
43 def scan_log (filename):
44
45     try:
46         if filename=="-":
47             filename="stdin"
48             f=sys.stdin
49         else:
50             f=open(filename)
51         echo=False
52         for line in f.xreadlines():
53             # first off : discard warnings related to doc
54             if m_installing_doc.match(line):
55                 (begin,end)=m_installing_doc.match(line).groups()
56                 line=begin+end
57             # unconditionnally show these lines
58             if m_show_line.match(line):
59                 print line,
60             # an 'installing' line with messages afterwards : needs to be echoed
61             elif m_installing_err.match(line):
62                 (installing,error)=m_installing_err.match(line).groups()
63                 print installing
64                 print error
65                 echo=True
66             # closing an 'installing' section
67             elif m_installing_end.match(line):
68                 echo=False
69             # any 'installing' line
70             elif m_installing_any.match(line):
71                 if echo: 
72                     installing=m_installing_any.match(line).group(1)
73                     print installing
74                 echo=False
75             # print lines when echo is true
76             else:
77                 if echo: print line,
78         f.close()
79     except:
80         print 'Failed to analyze',filename
81
82 for arg in sys.argv[1:]:
83     scan_log(arg)
84 EOF
85     echo "******************** END SUMMARY" 
86 }
87
88
89 # Notify recipient of failure or success, manage various stamps 
90 function failure() {
91     set -x
92     WEBLOG=${WEBPATH}/${BASE}.log.txt
93     cp $LOG ${WEBLOG}
94     summary $LOG >> ${WEBLOG}
95     (echo -n "============================== $COMMAND: failure at " ; date ; tail -c 20k $WEBLOG) > ${WEBLOG}.ko
96     if [ -n "$MAILTO" ] ; then
97         tail -c 20k ${WEBPATH}/${BASE}.log.txt | mail -s "Failures for build ${BASE}" $MAILTO
98     fi
99     exit 1
100 }
101
102 function success () {
103     set -x
104     WEBLOG=${WEBPATH}/${BASE}.log.txt
105     cp $LOG ${WEBLOG}
106     summary $LOG >> ${WEBLOG}
107     touch ${WEBLOG}.ok
108     if [ -n "$MAILTO" ] ; then
109         (echo "$PLDISTRO ($BASE) build for $FCDISTRO completed on $(date)" ) | mail -s "Successfull build for ${BASE}" $MAILTO
110     fi
111     exit 0
112 }
113
114 # run in the vserver - do not manage success/failure, will be done from the root ctx
115 function build () {
116     set -x
117     set -e
118
119     echo -n "============================== Starting $COMMAND:build on "
120     date
121
122     cd /build
123   # if TAGSRELEASE specified : update PLDISTROTAGS with this tag
124     if [ -n "$TAGSRELEASE" ] ; then
125         svn up -r $TAGSRELEASE $PLDISTROTAGS
126     fi
127
128     show_env
129     
130     echo "Running make IN $(pwd)"
131     # stage1
132     make -C /build "${MAKEOPTS[@]}" PLDISTROTAGS=${PLDISTROTAGS} PLDISTRO=${PLDISTRO} "${MAKEVARS[@]}" stage1=true 
133     # versions
134     make -C /build "${MAKEOPTS[@]}" PLDISTROTAGS=${PLDISTROTAGS} PLDISTRO=${PLDISTRO} "${MAKEVARS[@]}" NIGHTLY_BASE=${BASE} versions
135     # actual stuff
136     make -C /build "${MAKEOPTS[@]}" PLDISTROTAGS=${PLDISTROTAGS} PLDISTRO=${PLDISTRO} "${MAKEVARS[@]}" $MAKETARGETS
137
138 }
139
140 # this was formerly run in the myplc-devel chroot but now is run in the root context,
141 # this is so that the .ssh config gets done manually, and once and for all
142 function runtest () {
143     set -x
144     set -e
145     trap failure ERR INT
146
147     echo -n "============================== Starting $COMMAND:runtest on $(date)"
148
149     ### the URL to the myplc package
150     rpm=$( (cd /vservers/$BASE/build/RPMS/i386 ; ls myplc-[0-9]*.rpm) )
151     if [ ${#rpm[@]} != 1 ] ; then
152         echo "$COMMAND: Cannot locate rpm for testing"
153         failure
154         exit 1
155     fi
156     url=${TESTBUILDURL}${PLDISTRO}/${BASE}/RPMS/i386/${rpm}
157
158     # compute test directory name on test box
159     testdir=test-${BASE}
160     # clean it
161     ssh ${TESTBOXSSH} rm -rf ${testdir}
162     # check it out
163     ssh ${TESTBOXSSH} svn co ${TESTSVNPATH} ${testdir}
164     # invoke test on testbox - pass url and build url - so the tests can use myplc-init-vserver.sh
165     ssh 2>&1 ${TESTBOXSSH} python -u ${testdir}/runtest --build ${SVNPATH} --url ${url} --all
166     # still missing - need to populate /var/www/html/install-rpms on the myplc
167         
168     if [ "$?" != 0 ] ; then
169         failure
170     fi
171     
172     echo -n "============================== End $COMMAND:runtest on $(date)"
173 }
174
175 function show_env () {
176     set +x
177     echo FCDISTRO=$FCDISTRO
178     echo PLDISTRO=$PLDISTRO
179     echo BASE=$BASE
180     echo SVNPATH=$SVNPATH
181     echo MAKEVARS="${MAKEVARS[@]}"
182     echo MAKEOPTS="${MAKEOPTS[@]}"
183     echo PLDISTROTAGS="$PLDISTROTAGS"
184     echo TAGSRELEASE="$TAGSRELEASE"
185     echo -n "(might be unexpanded)"
186     echo WEBPATH="$WEBPATH"
187     if [ -d /vservers ] ; then
188         echo PLDISTROTAGS="$PLDISTROTAGS"
189     else
190         echo "XXXXXXXXXXXXXXXXXXXX Contents of tags definition file /build/$PLDISTROTAGS"
191         cat /build/$PLDISTROTAGS
192         echo "XXXXXXXXXXXXXXXXXXXX end tags definition"
193     fi
194     set -x
195 }
196
197 function usage () {
198     echo "Usage: $COMMAND [option] make-targets"
199     echo "This is $REVISION"
200     echo "Supported options"
201     echo " -n dry-run : -n passed to make - vserver gets created though - no mail sent"
202     echo " -f fcdistro - defaults to $DEFAULT_FCDISTRO"
203     echo " -d pldistro - defaults to $DEFAULT_PLDISTRO"
204     echo " -p personality - defaults to $DEFAULT_PERSONALITY"
205     echo " -b base - defaults to $DEFAULT_BASE"
206     echo "    @NAME@ replaced as appropriate"
207     echo " -t pldistrotags - defaults to \${PLDISTRO}-tags.mk"
208     echo " -r tagsrelease - a release number that refers to PLDISTROTAGS - defaults to HEAD"
209     echo " -s svnpath - where to fetch the build module"
210     echo " -o : overwrite - re-run in base directory, do not create vserver"
211     echo " -m mailto"
212     echo " -a makevar=value - space in values are not supported"
213     echo " -w webpath - defaults to $DEFAULT_WEBPATH"
214     echo " -B : run build only"
215     echo " -T : run test only"
216     echo " -v : be verbose"
217     echo " -7 : uses weekday-@FCDISTRO@ as base"
218     exit 1
219 }
220
221 function main () {
222
223     set -e
224
225     # preserve arguments for passing them again later
226     declare -a argv
227     for arg in "$@"; do argv=(${argv[@]} "$arg") ; done
228     
229     # parse arguments
230     MAKEVARS=()
231     MAKEOPTS=()
232     DO_BUILD=true
233     DO_TEST=true
234     while getopts "nf:d:b:p:t:r:s:om:a:w:BTvh7" opt ; do
235         case $opt in
236             n) DRY_RUN="true" ; MAKEOPTS=(${MAKEOPTS[@]} -n) ;;
237             f) FCDISTRO=$OPTARG ;;
238             d) PLDISTRO=$OPTARG ;;
239             p) PERSONALITY=$OPTARG ;;
240             b) BASE=$OPTARG ;;
241             t) PLDISTROTAGS=$OPTARG ;;
242             r) TAGSRELEASE=$OPTARG ;;
243             s) SVNPATH=$OPTARG ;;
244             o) OVERWRITEMODE=true ;;
245             m) MAILTO=$OPTARG ;;
246             a) MAKEVARS=(${MAKEVARS[@]} "$OPTARG") ;;
247             w) WEBPATH=$OPTARG ;;
248             B) DO_TEST= ;;
249             T) DO_BUILD= ; OVERWRITEMODE=true ;;
250             v) set -x ;;
251             7) BASE="$(date +%a|tr A-Z a-z)-@FCDISTRO@" ;;
252             h|*) usage ;;
253         esac
254     done
255         
256     shift $(($OPTIND - 1))
257     MAKETARGETS="$@"
258     
259     # set defaults
260     [ -z "$FCDISTRO" ] && FCDISTRO=$DEFAULT_FCDISTRO
261     [ -z "$PLDISTRO" ] && PLDISTRO=$DEFAULT_PLDISTRO
262     [ -z "$PERSONALITY" ] && PERSONALITY=$DEFAULT_PERSONALITY
263     [ -z "$PLDISTROTAGS" ] && PLDISTROTAGS="${PLDISTRO}-tags.mk"
264     [ -z "$BASE" ] && BASE="$DEFAULT_BASE"
265     [ -z "$WEBPATH" ] && WEBPATH="$DEFAULT_WEBPATH"
266     [ -z "$SVNPATH" ] && SVNPATH="$DEFAULT_SVNPATH"
267
268     [ -n "$DRY_RUN" ] && MAILTO=""
269         
270     ### set BASE from DISTRO, if unspecified
271     sedargs="-e s,@DATE@,${DATE},g -e s,@FCDISTRO@,${FCDISTRO},g -e s,@PLDISTRO@,${PLDISTRO},g -e s,@PERSONALITY@,${PERSONALITY},g"
272     BASE=$(echo ${BASE} | sed $sedargs)
273     WEBPATH=$(echo ${WEBPATH} | sed $sedargs)
274
275     if [ ! -d /vservers ] ; then
276         # in the vserver
277         echo "==================== Within vserver BEG $(date)"
278         build
279         echo "==================== Within vserver END $(date)"
280
281     else
282         trap failure ERR INT
283         # we run in the root context : 
284         # (*) create or check for the vserver to use
285         # (*) copy this command in the vserver
286         # (*) invoke it
287         
288         if [ -n "$OVERWRITEMODE" ] ; then
289             ### Re-use a vserver (finish an unfinished build..)
290             if [ ! -d /vservers/${BASE} ] ; then
291                 echo $COMMAND : cannot find vserver $BASE
292                 exit 1
293             fi
294             # manage LOG - beware it might be a symlink so nuke it first
295             LOG=/vservers/${BASE}.log.txt
296             rm -f $LOG
297             exec > $LOG 2>&1
298             set -x
299             echo "XXXXXXXXXX $COMMAND: using existing vserver $BASE" $(date)
300             show_env
301             # update build
302             vserver ${BASE} exec svn update /build
303         else
304             # create vserver: check it does not exist yet
305             i=
306             while [ -d /vservers/${BASE}${i} ] ; do
307                 # we name subsequent builds <base>-n<i> so the logs and builds get sorted properly
308                 [ -z ${i} ] && BASE=${BASE}-n
309                 i=$((${i}+1))
310                 if [ $i -gt 100 ] ; then
311                     echo "$COMMAND: Failed to create build vserver /vservers/${BASE}${i}"
312                     exit 1
313                 fi
314             done
315             BASE=${BASE}${i}
316             # need update
317             # manage LOG - beware it might be a symlink so nuke it first
318             LOG=/vservers/${BASE}.log.txt
319             rm -f $LOG
320             exec > $LOG 2>&1 
321             set -x
322             echo "XXXXXXXXXX $COMMAND: creating vserver $BASE" $(date)
323             show_env
324
325             ### extract the whole build - much simpler
326             tmpdir=/tmp/$COMMAND-$$
327             svn export $SVNPATH $tmpdir
328             # Create vserver
329             cd $tmpdir
330             ./vbuild-init-vserver.sh -f ${FCDISTRO} -d ${PLDISTRO} -p ${PERSONALITY} ${BASE}
331             # cleanup
332             cd -
333             rm -rf $tmpdir
334             # Extract build again - in the vserver
335             vserver ${BASE} exec svn checkout ${SVNPATH} /build
336         fi
337         echo "XXXXXXXXXX $COMMAND: preparation of vserver $BASE done" $(date)
338
339         # The log inside the vserver contains everything
340         LOG2=/vservers/${BASE}/log.txt
341         (echo "==================== BEG VSERVER Transcript of vserver creation" ; \
342          cat $LOG ; \
343          echo "==================== END VSERVER Transcript of vserver creation" ; \
344          echo "xxxxxxxxxx Messing with logs, symlinking $LOG2 to $LOG" ) >> $LOG2
345         ### not too nice : nuke the former log, symlink it to the new one
346         rm $LOG; ln -s $LOG2 $LOG
347         LOG=$LOG2
348         # redirect log again
349         exec >> $LOG 2>&1 
350
351         if [ -n "$DO_BUILD" ] ; then 
352
353             cp $COMMANDPATH /vservers/${BASE}/build/
354
355             # invoke this command in the vserver for building (-T)
356             vserver ${BASE} exec chmod +x /build/$COMMAND
357             vserver ${BASE} exec /build/$COMMAND "${argv[@]}" -b "${BASE}"
358         fi
359
360         # publish to the web so runtest can find them
361         rm -rf $WEBPATH/$BASE ; mkdir -p $WEBPATH/$BASE/{RPMS,SRPMS}
362         rsync --archive --delete --verbose /vservers/$BASE/build/RPMS/ $WEBPATH/$BASE/RPMS/
363         rsync --archive --delete --verbose /vservers/$BASE/build/SRPMS/ $WEBPATH/$BASE/SRPMS/
364         
365         if [ -n "$DO_TEST" ] ; then 
366             runtest
367         fi
368
369         success 
370         
371     fi
372
373 }  
374
375 ##########
376 main "$@"