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