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 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-java-${RELEASE} ${JAVA_DIRS}
 322   maybe_build_tarfile gcc-objc-${RELEASE} ${OBJECTIVEC_DIRS}
 323   maybe_build_tarfile gcc-testsuite-${RELEASE} ${TESTSUITE_DIRS}
 324
 325   # The core is everything else.
 326   EXCLUDES=""
 327   for x in ${ADA_DIRS} ${CPLUSPLUS_DIRS} ${FORTRAN_DIRS}\
 328            ${JAVA_DIRS} ${OBJECTIVEC_DIRS} ${TESTSUITE_DIRS}; do
 329     EXCLUDES="${EXCLUDES} --exclude $x"
 330   done
 331   build_tarfile gcc-core-${RELEASE} ${EXCLUDES} \
 332     `basename ${SOURCE_DIRECTORY}`
 333 }
 334
 335 # Build .gz files.
 336 build_gzip() {
 337   for f in ${FILE_LIST}; do
 338     target=${f%.bz2}.gz
 339     (${BZIP2} -d -c $f | ${GZIP} > ${target}) || error "Could not create ${target}"
 340   done
 341 }
 342
 343 # Build diffs against an old release.
 344 build_diffs() {
 345   old_dir=${1%/*}
 346   old_file=${1##*/}
 347   old_vers=${old_file%.tar.bz2}
 348   old_vers=${old_vers#gcc-}
 349   inform "Building diffs against version $old_vers"
 350   for f in gcc gcc-ada gcc-g++ gcc-g77 gcc-java gcc-objc gcc-testsuite gcc-core; do
 351     old_tar=${old_dir}/${f}-${old_vers}.tar.bz2
 352     new_tar=${WORKING_DIRECTORY}/${f}-${RELEASE}.tar.bz2
 353     if [ ! -e $old_tar ]; then
 354       inform "$old_tar not found; not generating diff file"
 355     elif [ ! -e $new_tar ]; then
 356       inform "$new_tar not found; not generating diff file"
 357     else
 358       build_diff $old_tar gcc-${old_vers} $new_tar gcc-${RELEASE} \
 359         ${f}-${old_vers}-${RELEASE}.diff.bz2
 360     fi
 361   done
 362 }
 363
 364 # Build an individual diff.
 365 build_diff() {
 366   changedir "${WORKING_DIRECTORY}"
 367   tmpdir=gccdiff.$$
 368   mkdir $tmpdir || error "Could not create directory $tmpdir"
 369   changedir $tmpdir
 370   (${BZIP2} -d -c $1 | ${TAR} xf - ) || error "Could not unpack $1 for diffs"
 371   (${BZIP2} -d -c $3 | ${TAR} xf - ) || error "Could not unpack $3 for diffs"
 372   ${DIFF} $2 $4 > ../${5%.bz2}
 373   if [ $? -eq 2 ]; then
 374     error "Trouble making diffs from $1 to $3"
 375   fi
 376   ${BZIP2} ../${5%.bz2} || error "Could not generate ../$5"
 377   changedir ..
 378   rm -rf $tmpdir
 379   FILE_LIST="${FILE_LIST} $5"
 380 }
 381
 382 # Upload the files to the FTP server.
 383 upload_files() {
 384   inform "Uploading files"
 385
 386   changedir "${WORKING_DIRECTORY}"
 387
 388   # Make sure the directory exists on the server.
 389   if [ $LOCAL -eq 0 ]; then
 390     ${SSH} -l ${GCC_USERNAME} ${GCC_HOSTNAME} \
 391       mkdir -p "${FTP_PATH}/diffs"
 392     UPLOAD_PATH="${GCC_USERNAME}@${GCC_HOSTNAME}:${FTP_PATH}"
 393   else
 394     mkdir -p "${FTP_PATH}/diffs" \
 395       || error "Could not create \`${FTP_PATH}'"
 396     UPLOAD_PATH=${FTP_PATH}
 397   fi
 398
 399   # Then copy files to their respective (sub)directories.
 400   for x in gcc*.gz gcc*.bz2; do
 401     if [ -e ${x} ]; then
 402       # Make sure the file will be readable on the server.
 403       chmod a+r ${x}
 404       # Copy it.
 405       case ${x} in
 406         *.diff.*)
 407           SUBDIR="diffs/";
 408           ;;
 409         *)
 410           SUBDIR="";
 411       esac
 412       ${SCP} ${x} ${UPLOAD_PATH}/${SUBDIR} \
 413         || error "Could not upload ${x}"
 414     fi
 415   done
 416 }
 417
 418 #Print description if snapshot exists
 419 snapshot_print() {
 420   if [ -e ${RELEASE}/$1 ]; then
 421      printf "%-38s%s\n\n" "$1" "$2" >> ${SNAPSHOT_README}
 422      echo "  <tr><td><a href=\"$1\">$1</a></td>" >> ${SNAPSHOT_INDEX}
 423      echo "      <td>$2</td></tr>" >> ${SNAPSHOT_INDEX}
 424   fi
 425 }
 426
 427 # Announce a snapshot, both on the web and via mail.
 428 announce_snapshot() {
 429   inform "Updating links and READMEs on the FTP server"
 430
 431   TEXT_DATE=`date --date=$DATE +%B\ %d,\ %Y`
 432   SNAPSHOT_README=${RELEASE}/README
 433   SNAPSHOT_INDEX=${RELEASE}/index.html
 434
 435   changedir "${SNAPSHOTS_DIR}"
 436   echo \
 437 "Snapshot gcc-"${RELEASE}" is now available on
 438   ftp://gcc.gnu.org/pub/gcc/snapshots/"${RELEASE}"/
 439 and on various mirrors, see http://gcc.gnu.org/mirrors.html for details.
 440
 441 This snapshot has been generated from the GCC "${BRANCH}" SVN branch
 442 with the following options: "svn://gcc.gnu.org/svn/gcc/${SVNBRANCH} revision ${SVNREV}"
 443
 444 You'll find:
 445 " > ${SNAPSHOT_README}
 446
 447   echo \
 448 "<html>
 449
 450 <head>
 451 <title>GCC "${RELEASE}" Snapshot</title>
 452 </head>
 453
 454 <body>
 455 <h1>GCC "${RELEASE}" Snapshot</h1>
 456
 457 <p>The <a href =\"http://gcc.gnu.org/\">GCC Project</a> makes
 458 periodic snapshots of the GCC source tree available to the public
 459 for testing purposes.</p>
 460
 461 <p>If you are planning to download and use one of our snapshots, then
 462 we highly recommend you join the GCC developers list.  Details for
 463 how to sign up can be found on the GCC project home page.</p>
 464
 465 <p>This snapshot has been generated from the GCC "${BRANCH}" SVN branch
 466 with the following options: <code>"svn://gcc.gnu.org/svn/gcc/${SVNBRANCH} revision ${SVNREV}"</code></p>
 467
 468 <table>" > ${SNAPSHOT_INDEX}
 469
 470   snapshot_print gcc-${RELEASE}.tar.bz2 "Complete GCC (includes all of below)"
 471   snapshot_print gcc-core-${RELEASE}.tar.bz2 "C front end and core compiler"
 472   snapshot_print gcc-ada-${RELEASE}.tar.bz2 "Ada front end and runtime"
 473   snapshot_print gcc-g++-${RELEASE}.tar.bz2 "C++ front end and runtime"
 474   snapshot_print gcc-g77-${RELEASE}.tar.bz2 "Fortran 77 front end and runtime"
 475   snapshot_print gcc-java-${RELEASE}.tar.bz2 "Java front end and runtime"
 476   snapshot_print gcc-objc-${RELEASE}.tar.bz2 "Objective-C front end and runtime"
 477   snapshot_print gcc-testsuite-${RELEASE}.tar.bz2 "The GCC testsuite"
 478
 479   echo \
 480 "Diffs from "${BRANCH}"-"${LAST_DATE}" are available in the diffs/ subdirectory.
 481
 482 When a particular snapshot is ready for public consumption the LATEST-"${BRANCH}"
 483 link is updated and a message is sent to the gcc list.  Please do not use
 484 a snapshot before it has been announced that way." >> ${SNAPSHOT_README}
 485
 486   echo \
 487 "</table>
 488 <p>Diffs from "${BRANCH}"-"${LAST_DATE}" are available in the
 489 <a href=\"diffs/\">diffs/ subdirectory</a>.</p>
 490
 491 <p>When a particular snapshot is ready for public consumption the LATEST-"${BRANCH}"
 492 link is updated and a message is sent to the gcc list.  Please do not use
 493 a snapshot before it has been announced that way.</p>
 494
 495 <hr />
 496
 497 <address>
 498 <a href=\"mailto:gcc@gcc.gnu.org\">gcc@gcc.gnu.org</a>
 499 <br />
 500 Last modified "${TEXT_DATE}"
 501 </address>
 502 </body>
 503
 504 </html>" >> ${SNAPSHOT_INDEX}
 505
 506   rm -f LATEST-${BRANCH}
 507   ln -s ${RELEASE} LATEST-${BRANCH}
 508
 509   inform "Sending mail"
 510
 511   export QMAILHOST=gcc.gnu.org
 512   mail -s "gcc-${RELEASE} is now available" gcc@gcc.gnu.org < ${SNAPSHOT_README}
 513 }
 514
 515 ########################################################################
 516 # Initialization
 517 ########################################################################
 518
 519 # Today's date.
 520 DATE=`date "+%Y%m%d"`
 521 LONG_DATE=`date "+%Y-%m-%d"`
 522
 523 SVN=${SVN:-/usr/bin/svn}
 524 # The CVS server containing the GCC repository.
 525 SVN_SERVER="gcc.gnu.org"
 526 # The path to the repository on that server.
 527 SVN_REPOSITORY="/svn/gcc"
 528 # The username to use when connecting to the server.
 529 SVN_USERNAME="${USER}"
 530
 531 # The machine to which files will be uploaded.
 532 GCC_HOSTNAME="gcc.gnu.org"
 533 # The name of the account on the machine to which files are uploaded.
 534 GCC_USERNAME="gccadmin"
 535 # The directory in which the files will be placed (do not use ~user syntax).
 536 FTP_PATH=/var/ftp/pub/gcc
 537 # The directory in which snapshots will be placed.
 538 SNAPSHOTS_DIR=${FTP_PATH}/snapshots
 539
 540 # The major number for the release.  For release `3.0.2' this would be
 541 # `3'
 542 RELEASE_MAJOR=""
 543 # The minor number for the release.  For release `3.0.2' this would be
 544 # `0'.
 545 RELEASE_MINOR=""
 546 # The revision number for the release.  For release `3.0.2' this would
 547 # be `2'.
 548 RELEASE_REVISION=""
 549 # The complete name of the release.
 550 RELEASE=""
 551
 552 # The name of the branch from which the release should be made, in a
 553 # user-friendly form.
 554 BRANCH=""
 555
 556 # The name of the branch from which the release should be made, as used
 557 # for our version control system.
 558 SVNBRANCH=""
 559
 560 # The tag to apply to the sources used for the release.
 561 TAG=""
 562
 563 # The old tarballs from which to generate diffs.
 564 OLD_TARS=""
 565
 566 # The directory that will be used to construct the release.  The
 567 # release itself will be placed in a subdirectory of this diretory.
 568 DESTINATION=${HOME}
 569 # The subdirectory.
 570 WORKING_DIRECTORY=""
 571 # The directory that will contain the GCC sources.
 572 SOURCE_DIRECTORY=""
 573
 574 # The directories that should be part of the various language-specific
 575 # tar files.  These are all relative to the top of the source tree.
 576 ADA_DIRS="gcc/ada libada gnattools"
 577 CPLUSPLUS_DIRS="gcc/cp libstdc++-v3"
 578 FORTRAN_DIRS="gcc/f libf2c"
 579 JAVA_DIRS="gcc/java libjava libffi fastjar zlib boehm-gc"
 580 OBJECTIVEC_DIRS="gcc/objc libobjc"
 581 TESTSUITE_DIRS="gcc/testsuite"
 582
 583 # Non-zero if this is the final release, rather than a prerelease.
 584 FINAL=0
 585
 586 # Non-zero if we are building a snapshot, and don't build gcc or
 587 # include generated files.
 588 SNAPSHOT=0
 589
 590 # Non-zero if we are running locally on gcc.gnu.org, and use local CVS
 591 # and copy directly to the FTP directory.
 592 LOCAL=0
 593
 594 # Major operation modes.
 595 MODE_GZIP=0
 596 MODE_DIFFS=0
 597 MODE_SOURCES=0
 598 MODE_TARFILES=0
 599 MODE_UPLOAD=0
 600
 601 # List of archive files generated; used to create .gz files from .bz2.
 602 FILE_LIST=""
 603
 604 # Programs we use.
 605
 606 BZIP2="${BZIP2:-bzip2}"
 607 CVS="${CVS:-cvs -f -Q -z9}"
 608 DIFF="${DIFF:-diff -Nrcpad}"
 609 ENV="${ENV:-env}"
 610 GZIP="${GZIP:-gzip --best}"
 611 SCP="${SCP:-scp -p}"
 612 SSH="${SSH:-ssh}"
 613 TAR="${TAR:-tar}"
 614
 615 ########################################################################
 616 # Command Line Processing
 617 ########################################################################
 618
 619 # Parse the options.
 620 while getopts "d:fr:u:t:p:s:l" ARG; do
 621     case $ARG in
 622     d)    DESTINATION="${OPTARG}";;
 623     r)    RELEASE="${OPTARG}";;
 624     t)    TAG="${OPTARG}";;
 625     u)    SVN_USERNAME="${OPTARG}";;
 626     f)    FINAL=1;;
 627     s)    SNAPSHOT=1
 628           BRANCH=${OPTARG%:*}
 629           SVNBRANCH=${OPTARG#*:}
 630           ;;
 631     l)    LOCAL=1
 632           SCP=cp
 633           PATH=~:/usr/local/bin:$PATH;;
 634     p)    OLD_TARS="${OLD_TARS} ${OPTARG}"
 635           if [ ! -f ${OPTARG} ]; then
 636             error "-p argument must name a tarball"
 637           fi;;
 638     \?)   usage;;
 639     esac
 640 done
 641 shift `expr ${OPTIND} - 1`
 642
 643 # Handle the major modes.
 644 while [ $# -ne 0 ]; do
 645     case $1 in
 646     diffs)    MODE_DIFFS=1;;
 647     gzip)     MODE_GZIP=1;;
 648     sources)  MODE_SOURCES=1;;
 649     tarfiles) MODE_TARFILES=1;;
 650     upload)   MODE_UPLOAD=1;;
 651     all)      MODE_SOURCES=1; MODE_TARFILES=1; MODE_DIFFS=1; MODE_UPLOAD=1;
 652               if [ $SNAPSHOT -ne 1 ]; then
 653                 # Only for releases and pre-releases.
 654                 MODE_GZIP=1;
 655               fi
 656               ;;
 657     *)        error "Unknown mode $1";;
 658     esac
 659     shift
 660 done
 661
 662 # Perform consistency checking.
 663 if [ ${LOCAL} -eq 0 ] && [ -z ${SVN_USERNAME} ]; then
 664   error "No username specified"
 665 fi
 666
 667 if [ ! -d ${DESTINATION} ]; then
 668   error "\`${DESTINATION}' is not a directory"
 669 fi
 670
 671 if [ $SNAPSHOT -eq 0 ]; then
 672   if [ -z ${RELEASE} ]; then
 673     error "No release number specified"
 674   fi
 675
 676   # Compute the major and minor release numbers.
 677   RELEASE_MAJOR=`echo $RELEASE | awk --assign FS=. '{ print $1; }'`
 678   RELEASE_MINOR=`echo $RELEASE | awk --assign FS=. '{ print $2; }'`
 679   RELEASE_REVISION=`echo $RELEASE | awk --assign FS=. '{ print $3; }'`
 680
 681   if [ -z "${RELEASE_MAJOR}" ] || [ -z "${RELEASE_MINOR}" ]; then
 682     error "Release number \`${RELEASE}' is invalid"
 683   fi
 684
 685   # Compute the full name of the release.
 686   if [ -z "${RELEASE_REVISION}" ]; then
 687     RELEASE="${RELEASE_MAJOR}.${RELEASE_MINOR}"
 688   else
 689     RELEASE="${RELEASE_MAJOR}.${RELEASE_MINOR}.${RELEASE_REVISION}"
 690   fi
 691
 692   # Compute the name of the branch, which is based solely on the major
 693   # and minor release numbers.
 694   SVNBRANCH="branches/gcc-${RELEASE_MAJOR}_${RELEASE_MINOR}-branch"
 695
 696   # If this is not a final release, set various parameters acordingly.
 697   if [ ${FINAL} -ne 1 ]; then
 698     RELEASE="${RELEASE}-${DATE}"
 699     FTP_PATH="${FTP_PATH}/prerelease-${RELEASE}/"
 700   else
 701     FTP_PATH="${FTP_PATH}/releases/gcc-${RELEASE}/"
 702   fi
 703 else
 704   RELEASE=${BRANCH}-${DATE}
 705   FTP_PATH="${FTP_PATH}/snapshots/${RELEASE}"
 706
 707   # If diffs are requested when building locally on gcc.gnu.org, we (usually)
 708   # know what the last snapshot date was and take the corresponding tarballs,
 709   # unless the user specified tarballs explictly.
 710   if [ $MODE_DIFFS -ne 0 ] && [ $LOCAL -ne 0 ] && [ -z "${OLD_TARS}" ]; then
 711     LAST_DATE=`cat ~/.snapshot_date-${BRANCH}`
 712     OLD_TARS=${SNAPSHOTS_DIR}/${BRANCH}-${LAST_DATE}/gcc-${BRANCH}-${LAST_DATE}.tar.bz2
 713   fi
 714 fi
 715
 716 # Compute the name of the WORKING_DIRECTORY and the SOURCE_DIRECTORY.
 717 WORKING_DIRECTORY="${DESTINATION}/gcc-${RELEASE}"
 718 SOURCE_DIRECTORY="${WORKING_DIRECTORY}/gcc-${RELEASE}"
 719
 720 # Recompute the names of all the language-specific directories,
 721 # relative to the WORKING_DIRECTORY.
 722 ADA_DIRS=`adjust_dirs ${ADA_DIRS}`
 723 CPLUSPLUS_DIRS=`adjust_dirs ${CPLUSPLUS_DIRS}`
 724 FORTRAN_DIRS=`adjust_dirs ${FORTRAN_DIRS}`
 725 JAVA_DIRS=`adjust_dirs ${JAVA_DIRS}`
 726 OBJECTIVEC_DIRS=`adjust_dirs ${OBJECTIVEC_DIRS}`
 727 TESTSUITE_DIRS=`adjust_dirs ${TESTSUITE_DIRS}`
 728
 729 # Set up SVNROOT.
 730 if [ $LOCAL -eq 0 ]; then
 731     SVNROOT="svn+ssh://${SVN_USERNAME}@${SVN_SERVER}${SVN_REPOSITORY}"
 732     CVSROOT=":ext:${SVN_USERNAME}@gcc.gnu.org/cvs/gcc"
 733 else
 734     SVNROOT="file:///svn/gcc"
 735     CVSROOT="/cvs/gcc"
 736 fi
 737 export SVNROOT
 738 export CVSROOT
 739
 740 ########################################################################
 741 # Main Program
 742 ########################################################################
 743
 744 # Set the timezone to UTC
 745 TZ="UTC0"
 746 export TZ
 747
 748 # Build the source directory.
 749
 750 if [ $MODE_SOURCES -ne 0 ]; then
 751   build_sources
 752 fi
 753
 754 # Build the tar files.
 755
 756 if [ $MODE_TARFILES -ne 0 ]; then
 757   build_tarfiles
 758 fi
 759
 760 # Build diffs
 761
 762 if [ $MODE_DIFFS -ne 0 ]; then
 763   # Possibly build diffs.
 764   if [ -n "$OLD_TARS" ]; then
 765     for old_tar in $OLD_TARS; do
 766       build_diffs $old_tar
 767     done
 768   fi
 769 fi
 770
 771 # Build gzip files
 772 if [ $MODE_GZIP -ne 0 ]; then
 773   build_gzip
 774 fi
 775
 776 # Upload them to the FTP server.
 777 if [ $MODE_UPLOAD -ne 0 ]; then
 778   upload_files
 779
 780   # For snapshots, make some further updates.
 781   if [ $SNAPSHOT -ne 0 ] && [ $LOCAL -ne 0 ]; then
 782     announce_snapshot
 783
 784     # Update snapshot date file.
 785     changedir ~
 786     echo $DATE > .snapshot_date-${BRANCH}
 787
 788     # Remove working directory
 789     rm -rf ${WORKING_DIRECTORY}
 790   fi
 791 fi