OSDN Git Service

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