OSDN Git Service

* gcc_release: Add support for releasing Go as a separate
[pf3gnuchains/gcc-fork.git] / maintainer-scripts / gcc_release
1 #! /bin/sh
2
3 ########################################################################
4 #
5 # File:   gcc_release
6 # Author: Jeffrey Law, Bernd Schmidt, Mark Mitchell
7 # Date:   2001-05-25
8 #
9 # Contents:
10 #   Script to create a GCC release.
11 #
12 # Copyright (c) 2001, 2002, 2006, 2009, 2010 Free Software Foundation.
13 #
14 # This file is part of GCC.
15 #
16 # GCC is free software; you can redistribute it and/or modify
17 # it under the terms of the GNU General Public License as published by
18 # the Free Software Foundation; either version 3, or (at your option)
19 # any later version.
20 #
21 # GCC is distributed in the hope that it will be useful,
22 # but WITHOUT ANY WARRANTY; without even the implied warranty of
23 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
24 # GNU General Public License for more details.
25 #
26 # You should have received a copy of the GNU General Public License
27 # along with GCC; see the file COPYING3.  If not see
28 # <http://www.gnu.org/licenses/>.
29 #
30 ########################################################################
31
32 ########################################################################
33 # Notes
34 ########################################################################
35
36 # Here is an example usage of this script, to create a GCC 3.0.2
37 # prerelease:
38 #
39 #   gcc_release -r 3.0.2
40 #
41 # This script will automatically use the head of the release branch
42 # to generate the release.
43
44 ########################################################################
45 # Functions
46 ########################################################################
47
48 # Issue the error message given by $1 and exit with a non-zero
49 # exit code.
50
51 error() {
52     echo "gcc_release: error: $1"
53     exit 1
54 }
55
56 # Issue the informational message given by $1.
57
58 inform() {
59     echo "gcc_release: $1"
60 }
61
62 # Issue a usage message explaining how to use this script.
63
64 usage() {
65 cat <<EOF
66 gcc_release -r release [-f] [further options]
67 gcc_release -s name:svnbranch [further options]
68
69 Options:
70
71   -r release           Version of the form X.Y or X.Y.Z.
72   -s name:svnbranch    Create a snapshot, not a real release.
73
74   -d destination       Local working directory where we will build the release
75                        (default=${HOME}).
76   -f                   Create a final release (and update ChangeLogs,...).
77   -l                   Indicate that we are running on gcc.gnu.org.
78   -p previous-tarball  Location of a previous tarball (to generate diff files).
79   -t tag               Tag to mark the release in SVN.
80   -u username          Username for upload operations.
81 EOF
82     exit 1
83 }
84
85 # Change to the directory given by $1.
86
87 changedir() {
88   cd $1 || \
89     error "Could not change directory to $1"
90 }
91
92 # Each of the arguments is a directory name, relative to the top
93 # of the source tree.  Return another name for that directory, relative
94 # to the working directory.
95
96 adjust_dirs() {
97   for x in $@; do
98     echo `basename ${SOURCE_DIRECTORY}`/$x
99   done
100 }
101
102 # Build the source tree that will be the basis for the release
103 # in ${WORKING_DIRECTORY}/gcc-${RELEASE}.
104
105 build_sources() {
106   # If the WORKING_DIRECTORY already exists, do not risk destroying it.
107   if [ -r ${WORKING_DIRECTORY} ]; then
108     error "\`${WORKING_DIRECTORY}' already exists"
109   fi
110   # Create the WORKING_DIRECTORY.
111   mkdir "${WORKING_DIRECTORY}" \
112     || error "Could not create \`${WORKING_DIRECTORY}'"
113   changedir "${WORKING_DIRECTORY}"
114
115   # If this is a final release, make sure that the ChangeLogs
116   # and version strings are updated.
117   if [ ${FINAL} -ne 0 ]; then
118     inform "Updating ChangeLogs and version files"
119
120     ${SVN} -q co "${SVNROOT}/${SVNBRANCH}" "`basename ${SOURCE_DIRECTORY}`" ||\
121            error "Could not check out release sources"
122     for x in `find ${SOURCE_DIRECTORY} -name ChangeLog`; do
123       # Update this ChangeLog file only if it does not yet contain the
124       # entry we are going to add.  (This is a safety net for repeated
125       # runs of this script for the same release.)
126       if ! grep "GCC ${RELEASE} released." ${x} > /dev/null ; then       
127         cat - ${x} > ${x}.new <<EOF
128 ${LONG_DATE}  Release Manager
129
130         * GCC ${RELEASE} released.
131
132 EOF
133         mv ${x}.new ${x} || \
134             error "Could not update ${x}"
135         (changedir `dirname ${x}` && \
136             ${SVN} -q ci -m 'Mark ChangeLog' `basename ${x}`) || \
137             error "Could not commit ${x}"
138       fi
139     done
140
141     # Update gcc/DEV-PHASE.
142
143     [ `cat ${SOURCE_DIRECTORY}/gcc/BASE-VER` = ${RELEASE} ] || \
144     error "Release number ${RELEASE} does not match BASE-VER"
145     (changedir ${SOURCE_DIRECTORY}/gcc && \
146      : > DEV-PHASE && \
147      ${SVN} -q ci -m 'Mark as release' DEV-PHASE) || \
148     error "Could not update DEV-PHASE"
149
150     # Make sure we tag the sources for a final release.
151     TAG="tags/gcc_`echo ${RELEASE} | tr . _`_release"
152
153     rm -rf ${SOURCE_DIRECTORY}
154   fi
155
156   # Tag the sources.
157   if [ -n "${TAG}" ]; then
158     inform "Tagging sources as ${TAG}"
159     # We don't want to overwrite an existing tag.  So, if the tag
160     # already exists, issue an error message; the release manager can
161     # manually remove the tag if appropriate.
162     echo "${SVN} ls ${SVNROOT}/${TAG}/ChangeLog" 
163     if ${SVN} ls "${SVNROOT}/${TAG}/ChangeLog"; then 
164       error "Tag ${TAG} already exists"
165     fi
166     ${SVN} -m "Tagging source as ${TAG}" cp "${SVNROOT}/${SVNBRANCH}" "${SVNROOT}/${TAG}" || \
167       error "Could not tag sources"
168     SVNBRANCH=${TAG}
169   fi
170   SVNREV=`${SVN} info "${SVNROOT}/${SVNBRANCH}"|awk '/Revision:/ {print $2}'`
171
172   # Export the current sources.
173   inform "Retrieving sources (svn export -r ${SVNREV} ${SVNROOT}/${SVNBRANCH})"
174
175   ${SVN} -q export -r${SVNREV} "${SVNROOT}/${SVNBRANCH}" "`basename ${SOURCE_DIRECTORY}`" ||\
176     error "Could not retrieve sources"
177
178   # Run gcc_update on them to set up the timestamps nicely, and (re)write
179   # the LAST_UPDATED file containing the SVN tag/revision used.
180   changedir "gcc-${RELEASE}"
181   contrib/gcc_update --touch
182   echo "Obtained from SVN: ${SVNBRANCH} revision ${SVNREV}" > LAST_UPDATED
183
184   # For a prerelease or real release, we need to generate additional
185   # files not present in SVN.
186   changedir "${SOURCE_DIRECTORY}"
187   if [ $SNAPSHOT -ne 1 ]; then
188     # Generate the documentation.
189     inform "Building install docs"
190     SOURCEDIR=${SOURCE_DIRECTORY}/gcc/doc
191     DESTDIR=${SOURCE_DIRECTORY}/INSTALL
192     export SOURCEDIR
193     export DESTDIR
194     ${SOURCE_DIRECTORY}/gcc/doc/install.texi2html
195
196     # Regenerate the NEWS file.
197     contrib/gennews > NEWS || \
198       error "Could not regenerate NEWS files"
199
200     # Now, we must build the compiler in order to create any generated
201     # files that are supposed to go in the source directory.  This is
202     # also a good sanity check to make sure that the release builds
203     # on at least one platform.
204     inform "Building compiler"
205     OBJECT_DIRECTORY=../objdir
206     contrib/gcc_build -d ${SOURCE_DIRECTORY} -o ${OBJECT_DIRECTORY} \
207       -c "--enable-generated-files-in-srcdir --disable-multilib" build || \
208       error "Could not rebuild GCC"
209   fi
210
211   # Move message catalogs to source directory.
212   mv ../objdir/gcc/po/*.gmo gcc/po/
213   [ -f libcpp/po/cpplib.pot ] && mv ../objdir/libcpp/po/*.gmo libcpp/po/
214
215   # Create a "MD5SUMS" file to use for checking the validity of the release.
216   echo \
217 "# This file contains the MD5 checksums of the files in the 
218 # gcc-"${RELEASE}".tar.bz2 tarball.
219 #
220 # Besides verifying that all files in the tarball were correctly expanded,
221 # it also can be used to determine if any files have changed since the
222 # tarball was expanded or to verify that a patchfile was correctly applied.
223 #
224 # Suggested usage:
225 # md5sum -c MD5SUMS | grep -v \"OK$\"
226 " > MD5SUMS
227
228   find . -type f |
229   sed -e 's:^\./::' -e '/MD5SUMS/d' |
230   sort |
231   xargs md5sum >>MD5SUMS
232 }
233
234 # Build a single tarfile.  The first argument is the name of the tarfile
235 # to build, without any suffixes.  They will be added automatically.  The
236 # rest of the arguments are files or directories to include, and possibly
237 # other arguments to tar.
238
239 build_tarfile() {
240   # Get the name of the destination tar file.
241   TARFILE="$1.tar.bz2"
242   shift
243
244   # Build the tar file itself.
245   (${TAR} cf - "$@" | ${BZIP2} > ${TARFILE}) || \
246     error "Could not build tarfile"
247   FILE_LIST="${FILE_LIST} ${TARFILE}"
248 }
249
250 # Build a single tarfile if any of the directories listed exist,
251 # but not if none of them do (because that component doesn't exist
252 # on this branch).
253 maybe_build_tarfile() {
254   dest=$1
255   shift
256   dir_exists=0
257   for maybe_dir in "$@"; do
258     if [ -d "$maybe_dir" ]; then
259       dir_exists=1
260     fi
261   done
262   if [ $dir_exists = 1 ]; then
263     build_tarfile "$dest" "$@"
264   else
265     echo "Not building $dest tarfile"
266   fi
267 }
268
269 # Build the various tar files for the release.
270
271 build_tarfiles() {
272   inform "Building tarfiles"
273
274   changedir "${WORKING_DIRECTORY}"
275
276   # The GNU Coding Standards specify that all files should
277   # world readable.
278   chmod -R a+r ${SOURCE_DIRECTORY}
279   # And that all directories have mode 755.
280   find ${SOURCE_DIRECTORY} -type d -exec chmod 755 {} \;
281  
282   # Build one huge tarfile for the entire distribution.
283   build_tarfile gcc-${RELEASE} `basename ${SOURCE_DIRECTORY}`
284
285   # Now, build one for each of the languages.
286   maybe_build_tarfile gcc-ada-${RELEASE} ${ADA_DIRS}
287   maybe_build_tarfile gcc-g++-${RELEASE} ${CPLUSPLUS_DIRS}
288   maybe_build_tarfile gcc-fortran-${RELEASE} ${FORTRAN95_DIRS}
289   maybe_build_tarfile gcc-go-${RELEASE} ${GO_DIRS}
290   maybe_build_tarfile gcc-java-${RELEASE} ${JAVA_DIRS}
291   maybe_build_tarfile gcc-objc-${RELEASE} ${OBJECTIVEC_DIRS}
292   maybe_build_tarfile gcc-testsuite-${RELEASE} ${TESTSUITE_DIRS}
293    
294   # The core is everything else.
295   EXCLUDES=""
296   for x in ${ADA_DIRS} ${CPLUSPLUS_DIRS} ${FORTRAN95_DIRS}\
297            ${GO_DIRS} ${JAVA_DIRS} ${OBJECTIVEC_DIRS} ${TESTSUITE_DIRS}; do
298     EXCLUDES="${EXCLUDES} --exclude $x"
299   done
300   build_tarfile gcc-core-${RELEASE} ${EXCLUDES} \
301     `basename ${SOURCE_DIRECTORY}`
302 }
303
304 # Build .gz files.
305 build_gzip() {
306   for f in ${FILE_LIST}; do
307     target=${f%.bz2}.gz
308     (${BZIP2} -d -c $f | ${GZIP} > ${target}) || error "Could not create ${target}"
309   done
310 }
311
312 # Build diffs against an old release.
313 build_diffs() {
314   old_dir=${1%/*}
315   old_file=${1##*/}
316   old_vers=${old_file%.tar.bz2}
317   old_vers=${old_vers#gcc-}
318   inform "Building diffs against version $old_vers"
319   for f in gcc gcc-ada gcc-g++ gcc-fortran gcc-go gcc-java gcc-objc gcc-testsuite gcc-core; do
320     old_tar=${old_dir}/${f}-${old_vers}.tar.bz2
321     new_tar=${WORKING_DIRECTORY}/${f}-${RELEASE}.tar.bz2
322     if [ ! -e $old_tar ]; then
323       inform "$old_tar not found; not generating diff file"
324     elif [ ! -e $new_tar ]; then
325       inform "$new_tar not found; not generating diff file"
326     else
327       build_diff $old_tar gcc-${old_vers} $new_tar gcc-${RELEASE} \
328         ${f}-${old_vers}-${RELEASE}.diff.bz2
329     fi
330   done
331 }
332
333 # Build an individual diff.
334 build_diff() {
335   changedir "${WORKING_DIRECTORY}"
336   tmpdir=gccdiff.$$
337   mkdir $tmpdir || error "Could not create directory $tmpdir"
338   changedir $tmpdir
339   (${BZIP2} -d -c $1 | ${TAR} xf - ) || error "Could not unpack $1 for diffs"
340   (${BZIP2} -d -c $3 | ${TAR} xf - ) || error "Could not unpack $3 for diffs"
341   ${DIFF} $2 $4 > ../${5%.bz2}
342   if [ $? -eq 2 ]; then
343     error "Trouble making diffs from $1 to $3"
344   fi
345   ${BZIP2} ../${5%.bz2} || error "Could not generate ../$5"
346   changedir ..
347   rm -rf $tmpdir
348   FILE_LIST="${FILE_LIST} $5"
349 }
350
351 # Upload the files to the FTP server.
352 upload_files() {
353   inform "Uploading files"
354
355   changedir "${WORKING_DIRECTORY}"
356
357   # Make sure the directory exists on the server.
358   if [ $LOCAL -eq 0 ]; then
359     ${SSH} -l ${GCC_USERNAME} ${GCC_HOSTNAME} \
360       mkdir -p "${FTP_PATH}/diffs"
361     UPLOAD_PATH="${GCC_USERNAME}@${GCC_HOSTNAME}:${FTP_PATH}"
362   else
363     mkdir -p "${FTP_PATH}/diffs" \
364       || error "Could not create \`${FTP_PATH}'"
365     UPLOAD_PATH=${FTP_PATH}
366   fi
367
368   # Then copy files to their respective (sub)directories.
369   for x in gcc*.gz gcc*.bz2; do
370     if [ -e ${x} ]; then
371       # Make sure the file will be readable on the server.
372       chmod a+r ${x}
373       # Copy it.
374       case ${x} in
375         *.diff.*)
376           SUBDIR="diffs/";
377           ;;
378         *)
379           SUBDIR="";
380       esac
381       ${SCP} ${x} ${UPLOAD_PATH}/${SUBDIR} \
382         || error "Could not upload ${x}"
383     fi
384   done
385 }
386
387 # Print description if snapshot exists.
388 snapshot_print() {
389   if [ -e ${RELEASE}/$1 ]; then
390     hash=`openssl  md5  ${RELEASE}/$1 | sed -e 's#(.*)##' -e 's# *= *#=#'`
391     hash2=`openssl sha1 ${RELEASE}/$1 | sed -e 's#(.*)##' -e 's# *= *#=#'`
392
393     printf " %-37s%s\n\n  %s\n  %s\n\n" "$1" "$2" "$hash" "$hash2" \
394       >> ${SNAPSHOT_README}
395
396      echo "  <tr><td><a href=\"$1\">$1</a></td>" >> ${SNAPSHOT_INDEX}
397      echo "      <td>$2</td></tr>" >> ${SNAPSHOT_INDEX}
398   fi
399 }
400
401 # Announce a snapshot, both on the web and via mail.
402 announce_snapshot() {
403   inform "Updating links and READMEs on the FTP server"
404   
405   TEXT_DATE=`date --date=$DATE +%B\ %d,\ %Y`
406   SNAPSHOT_README=${RELEASE}/README
407   SNAPSHOT_INDEX=${RELEASE}/index.html
408
409   changedir "${SNAPSHOTS_DIR}"
410   echo \
411 "Snapshot gcc-"${RELEASE}" is now available on
412   ftp://gcc.gnu.org/pub/gcc/snapshots/"${RELEASE}"/
413 and on various mirrors, see http://gcc.gnu.org/mirrors.html for details.
414
415 This snapshot has been generated from the GCC "${BRANCH}" SVN branch
416 with the following options: "svn://gcc.gnu.org/svn/gcc/${SVNBRANCH} revision ${SVNREV}"
417
418 You'll find:
419 " > ${SNAPSHOT_README}
420
421   echo \
422 "<html>
423
424 <head>
425 <title>GCC "${RELEASE}" Snapshot</title>
426 </head>
427
428 <body>
429 <h1>GCC "${RELEASE}" Snapshot</h1>
430
431 <p>The <a href =\"http://gcc.gnu.org/\">GCC Project</a> makes
432 periodic snapshots of the GCC source tree available to the public
433 for testing purposes.</p>
434         
435 <p>If you are planning to download and use one of our snapshots, then
436 we highly recommend you join the GCC developers list.  Details for
437 how to sign up can be found on the GCC project home page.</p>
438
439 <p>This snapshot has been generated from the GCC "${BRANCH}" SVN branch
440 with the following options: <code>"svn://gcc.gnu.org/svn/gcc/${SVNBRANCH} revision ${SVNREV}"</code></p>
441
442 <table>" > ${SNAPSHOT_INDEX}
443        
444   snapshot_print gcc-${RELEASE}.tar.bz2 "Complete GCC (includes all of below)"
445   snapshot_print gcc-core-${RELEASE}.tar.bz2 "C front end and core compiler"
446   snapshot_print gcc-ada-${RELEASE}.tar.bz2 "Ada front end and runtime"
447   snapshot_print gcc-fortran-${RELEASE}.tar.bz2 "Fortran front end and runtime"
448   snapshot_print gcc-g++-${RELEASE}.tar.bz2 "C++ front end and runtime"
449   snapshot_print gcc-go-${RELEASE}.tar.bz2 "Go front end and runtime"
450   snapshot_print gcc-java-${RELEASE}.tar.bz2 "Java front end and runtime"
451   snapshot_print gcc-objc-${RELEASE}.tar.bz2 "Objective-C front end and runtime"
452   snapshot_print gcc-testsuite-${RELEASE}.tar.bz2 "The GCC testsuite"
453
454   echo \
455 "Diffs from "${BRANCH}"-"${LAST_DATE}" are available in the diffs/ subdirectory.
456
457 When a particular snapshot is ready for public consumption the LATEST-"${BRANCH}"
458 link is updated and a message is sent to the gcc list.  Please do not use
459 a snapshot before it has been announced that way." >> ${SNAPSHOT_README}
460
461   echo \
462 "</table>
463 <p>Diffs from "${BRANCH}"-"${LAST_DATE}" are available in the
464 <a href=\"diffs/\">diffs/ subdirectory</a>.</p>
465
466 <p>When a particular snapshot is ready for public consumption the LATEST-"${BRANCH}"
467 link is updated and a message is sent to the gcc list.  Please do not use
468 a snapshot before it has been announced that way.</p>
469
470 <hr />
471
472 <address>
473 <a href=\"mailto:gcc@gcc.gnu.org\">gcc@gcc.gnu.org</a>
474 <br />
475 Last modified "${TEXT_DATE}"
476 </address>
477 </body>
478
479 </html>" >> ${SNAPSHOT_INDEX}
480
481   rm -f LATEST-${BRANCH}
482   ln -s ${RELEASE} LATEST-${BRANCH}
483
484   inform "Sending mail"
485
486   export QMAILHOST=gcc.gnu.org
487   mail -s "gcc-${RELEASE} is now available" gcc@gcc.gnu.org < ${SNAPSHOT_README}
488 }
489
490 ########################################################################
491 # Initialization
492 ########################################################################
493
494 LC_ALL=C
495 export LC_ALL
496
497 # Today's date.
498 DATE=`date "+%Y%m%d"`
499 LONG_DATE=`date "+%Y-%m-%d"`
500
501 SVN=${SVN:-svn}
502 # The CVS server containing the GCC repository.
503 SVN_SERVER="gcc.gnu.org"
504 # The path to the repository on that server.
505 SVN_REPOSITORY="/svn/gcc"
506 # The username to use when connecting to the server.
507 SVN_USERNAME="${USER}"
508
509 # The machine to which files will be uploaded.
510 GCC_HOSTNAME="gcc.gnu.org"
511 # The name of the account on the machine to which files are uploaded.
512 GCC_USERNAME="gccadmin"
513 # The directory in which the files will be placed (do not use ~user syntax).
514 FTP_PATH=/var/ftp/pub/gcc
515 # The directory in which snapshots will be placed.
516 SNAPSHOTS_DIR=${FTP_PATH}/snapshots
517
518 # The major number for the release.  For release `3.0.2' this would be 
519 # `3'
520 RELEASE_MAJOR=""
521 # The minor number for the release.  For release `3.0.2' this would be
522 # `0'.
523 RELEASE_MINOR=""
524 # The revision number for the release.  For release `3.0.2' this would
525 # be `2'.
526 RELEASE_REVISION=""
527 # The complete name of the release.
528 RELEASE=""
529
530 # The name of the branch from which the release should be made, in a 
531 # user-friendly form.
532 BRANCH=""
533
534 # The name of the branch from which the release should be made, as used
535 # for our version control system.
536 SVNBRANCH=""
537
538 # The tag to apply to the sources used for the release.
539 TAG=""
540
541 # The old tarballs from which to generate diffs.
542 OLD_TARS=""
543
544 # The directory that will be used to construct the release.  The
545 # release itself will be placed in a subdirectory of this directory.
546 DESTINATION=${HOME}
547 # The subdirectory.
548 WORKING_DIRECTORY=""
549 # The directory that will contain the GCC sources.
550 SOURCE_DIRECTORY=""
551
552 # The directories that should be part of the various language-specific
553 # tar files.  These are all relative to the top of the source tree.
554 ADA_DIRS="gcc/ada libada gnattools"
555 CPLUSPLUS_DIRS="gcc/cp libstdc++-v3"
556 FORTRAN95_DIRS="gcc/fortran libgfortran"
557 GO_DIRS="gcc/go libgo libffi"
558 JAVA_DIRS="gcc/java libjava libffi boehm-gc"
559 OBJECTIVEC_DIRS="gcc/objc gcc/objcp libobjc"
560 TESTSUITE_DIRS="gcc/testsuite"
561
562 # Non-zero if this is the final release, rather than a prerelease.
563 FINAL=0
564
565 # Non-zero if we are building a snapshot, and don't build gcc or
566 # include generated files.
567 SNAPSHOT=0
568
569 # Non-zero if we are running locally on gcc.gnu.org, and use local CVS
570 # and copy directly to the FTP directory.
571 LOCAL=0
572
573 # Major operation modes.
574 MODE_GZIP=0
575 MODE_DIFFS=0
576 MODE_SOURCES=0
577 MODE_TARFILES=0
578 MODE_UPLOAD=0
579
580 # List of archive files generated; used to create .gz files from .bz2.
581 FILE_LIST=""
582
583 # Programs we use.
584
585 BZIP2="${BZIP2:-bzip2}"
586 CVS="${CVS:-cvs -f -Q -z9}"
587 DIFF="${DIFF:-diff -Nrcpad}"
588 ENV="${ENV:-env}"
589 GZIP="${GZIP:-gzip --best}"
590 SCP="${SCP:-scp -p}"
591 SSH="${SSH:-ssh}"
592 TAR="${TAR:-tar}"
593
594 ########################################################################
595 # Command Line Processing
596 ########################################################################
597
598 # Parse the options.
599 while getopts "d:fr:u:t:p:s:l" ARG; do
600     case $ARG in
601     d)    DESTINATION="${OPTARG}";;
602     r)    RELEASE="${OPTARG}";;
603     t)    TAG="${OPTARG}";;
604     u)    SVN_USERNAME="${OPTARG}";;
605     f)    FINAL=1;;
606     s)    SNAPSHOT=1
607           BRANCH=${OPTARG%:*}
608           SVNBRANCH=${OPTARG#*:}
609           ;;
610     l)    LOCAL=1
611           SCP=cp
612           PATH=~:/usr/local/bin:$PATH;;
613     p)    OLD_TARS="${OLD_TARS} ${OPTARG}"
614           if [ ! -f ${OPTARG} ]; then
615             error "-p argument must name a tarball"
616           fi;;
617     \?)   usage;;
618     esac
619 done
620 shift `expr ${OPTIND} - 1`
621
622 # Handle the major modes.
623 while [ $# -ne 0 ]; do
624     case $1 in
625     diffs)    MODE_DIFFS=1;;
626     gzip)     MODE_GZIP=1;;
627     sources)  MODE_SOURCES=1;;
628     tarfiles) MODE_TARFILES=1;;
629     upload)   MODE_UPLOAD=1;;
630     all)      MODE_SOURCES=1; MODE_TARFILES=1; MODE_DIFFS=1; MODE_UPLOAD=1;
631               if [ $SNAPSHOT -ne 1 ]; then
632                 # Only for releases and pre-releases.
633                 MODE_GZIP=1;
634               fi
635               ;;
636     *)        error "Unknown mode $1";;
637     esac
638     shift
639 done
640
641 # Perform consistency checking.
642 if [ ${LOCAL} -eq 0 ] && [ -z ${SVN_USERNAME} ]; then
643   error "No username specified"
644 fi
645
646 if [ ! -d ${DESTINATION} ]; then
647   error "\`${DESTINATION}' is not a directory"
648 fi
649
650 if [ $SNAPSHOT -eq 0 ]; then
651   if [ -z ${RELEASE} ]; then
652     error "No release number specified"
653   fi
654
655   # Compute the major and minor release numbers.
656   RELEASE_MAJOR=`echo $RELEASE | awk --assign FS=. '{ print $1; }'`
657   RELEASE_MINOR=`echo $RELEASE | awk --assign FS=. '{ print $2; }'`
658   RELEASE_REVISION=`echo $RELEASE | awk --assign FS=. '{ print $3; }'`
659
660   if [ -z "${RELEASE_MAJOR}" ] || [ -z "${RELEASE_MINOR}" ]; then
661     error "Release number \`${RELEASE}' is invalid"
662   fi
663
664   # Compute the full name of the release.
665   if [ -z "${RELEASE_REVISION}" ]; then
666     RELEASE="${RELEASE_MAJOR}.${RELEASE_MINOR}"
667   else
668     RELEASE="${RELEASE_MAJOR}.${RELEASE_MINOR}.${RELEASE_REVISION}"
669   fi
670
671   # Compute the name of the branch, which is based solely on the major
672   # and minor release numbers.
673   SVNBRANCH="branches/gcc-${RELEASE_MAJOR}_${RELEASE_MINOR}-branch"
674
675   # If this is not a final release, set various parameters accordingly.
676   if [ ${FINAL} -ne 1 ]; then
677     RELEASE="${RELEASE}-RC-${DATE}"
678     FTP_PATH="${SNAPSHOTS_DIR}/${RELEASE}"
679   else
680     FTP_PATH="${FTP_PATH}/releases/gcc-${RELEASE}/"
681   fi
682 else
683   RELEASE=${BRANCH}-${DATE}
684   FTP_PATH="${FTP_PATH}/snapshots/${RELEASE}"
685
686   # If diffs are requested when building locally on gcc.gnu.org, we (usually)
687   # know what the last snapshot date was and take the corresponding tarballs,
688   # unless the user specified tarballs explicitly.
689   if [ $MODE_DIFFS -ne 0 ] && [ $LOCAL -ne 0 ] && [ -z "${OLD_TARS}" ]; then
690     LAST_DATE=`cat ~/.snapshot_date-${BRANCH}`
691     OLD_TARS=${SNAPSHOTS_DIR}/${BRANCH}-${LAST_DATE}/gcc-${BRANCH}-${LAST_DATE}.tar.bz2
692   fi
693 fi
694
695 # Compute the name of the WORKING_DIRECTORY and the SOURCE_DIRECTORY.
696 WORKING_DIRECTORY="${DESTINATION}/gcc-${RELEASE}"
697 SOURCE_DIRECTORY="${WORKING_DIRECTORY}/gcc-${RELEASE}"
698
699 # Recompute the names of all the language-specific directories,
700 # relative to the WORKING_DIRECTORY.
701 ADA_DIRS=`adjust_dirs ${ADA_DIRS}`
702 CPLUSPLUS_DIRS=`adjust_dirs ${CPLUSPLUS_DIRS}`
703 FORTRAN95_DIRS=`adjust_dirs ${FORTRAN95_DIRS}`
704 GO_DIRS=`adjust_dirs ${GO_DIRS}`
705 JAVA_DIRS=`adjust_dirs ${JAVA_DIRS}`
706 OBJECTIVEC_DIRS=`adjust_dirs ${OBJECTIVEC_DIRS}`
707 TESTSUITE_DIRS=`adjust_dirs ${TESTSUITE_DIRS}`
708
709 # Set up SVNROOT.
710 if [ $LOCAL -eq 0 ]; then
711     SVNROOT="svn+ssh://${SVN_USERNAME}@${SVN_SERVER}${SVN_REPOSITORY}"
712 else
713     SVNROOT="file:///svn/gcc"
714 fi
715 export SVNROOT
716
717 ########################################################################
718 # Main Program
719 ########################################################################
720
721 # Set the timezone to UTC
722 TZ="UTC0"
723 export TZ
724
725 # Build the source directory.
726
727 if [ $MODE_SOURCES -ne 0 ]; then
728   build_sources
729 fi
730
731 # Build the tar files.
732
733 if [ $MODE_TARFILES -ne 0 ]; then
734   build_tarfiles
735 fi
736
737 # Build diffs
738
739 if [ $MODE_DIFFS -ne 0 ]; then
740   # Possibly build diffs.
741   if [ -n "$OLD_TARS" ]; then
742     for old_tar in $OLD_TARS; do
743       build_diffs $old_tar
744     done
745   fi
746 fi
747
748 # Build gzip files
749 if [ $MODE_GZIP -ne 0 ]; then
750   build_gzip
751 fi
752
753 # Upload them to the FTP server.
754 if [ $MODE_UPLOAD -ne 0 ]; then
755   upload_files
756
757   # For snapshots, make some further updates.
758   if [ $SNAPSHOT -ne 0 ] && [ $LOCAL -ne 0 ]; then
759     announce_snapshot
760
761     # Update snapshot date file.
762     changedir ~
763     echo $DATE > .snapshot_date-${BRANCH}
764
765     # Remove working directory
766     rm -rf ${WORKING_DIRECTORY}
767   fi
768 fi