git://gcc.gnu.org / gcc.git / blame
| Commit | Line | Data |
|---|---|---|
| 697f6b2f CB |
1 | #!/bin/sh |
| 2 | # | |
| 3 | # download_f2c | |
| 4 | # | |
| 5 | # Unpacks a directory full of f2c stuff obtained from netlib, naming | |
| 6 | # the directory f2c-YYYYMMDD (YYYYMMDD being the current date), | |
| 7 | # leaving it in current working directory. | |
| 8 | # | |
| 9 | # This shell script downloads the tarball from netlib, unpacks everything, | |
| 10 | # and strips off the redundant files, leaving a bare-bones (but fully | |
| 11 | # reproducible) f2c source directory. (You must have yacc/bison to rebuild | |
| 12 | # gram.c, by the way.) | |
| 13 | # | |
| 14 | # (C) 1999 Free Software Foundation | |
| 15 | # Originally by James Craig Burley <craig@jcb-sc.com>, September 1999. | |
| 16 | # | |
| 17 | # This script is Free Software, and it can be copied, distributed and | |
| 18 | # modified as defined in the GNU General Public License. A copy of | |
| 19 | # its license can be downloaded from http://www.gnu.org/copyleft/gpl.html | |
| 20 | # | |
| 21 | # FIXME: Replace WHOAMI with whatever is the canonical way to | |
| 22 | # obtain the user's email address these days. | |
| 23 | ||
| 24 | dir=f2c-`date +%Y%m%d` | |
| 25 | if [ ! -d $dir ] | |
| 26 | then | |
| 27 | mkdir $dir | |
| 28 | fi | |
| 29 | cd $dir | |
| 30 | ||
| 31 | echo Preparing $dir... | |
| 32 | ||
| 33 | if [ ! -d tmp ] | |
| 34 | then | |
| 35 | mkdir tmp | |
| 36 | fi | |
| 37 | ||
| 38 | if [ ! -f tmp/f2c.tar ] | |
| 39 | then | |
| 40 | cd tmp | |
| 41 | echo Downloading f2c.tar via ftp... | |
| 42 | ftp -n netlib.bell-labs.com <<EOF | |
| 43 | user ftp WHOAMI | |
| 44 | type binary | |
| 45 | cd netlib | |
| 46 | get f2c.tar | |
| 47 | quit | |
| 48 | EOF | |
| 49 | cd .. | |
| 50 | fi | |
| 51 | ||
| 52 | echo Unpacking f2c.tar... | |
| 53 | ||
| 54 | tar xf tmp/f2c.tar | |
| 55 | cd f2c | |
| 56 | find . -name "*.gz" -print | sed -e "s:^\(.*\).gz:rm -f \1.Z:g" | sh | |
| 57 | mv src libf77.gz libi77.gz f2c.1t.gz f2c.h.gz changes.gz disclaimer.gz readme.gz permission.gz .. | |
| 58 | cd .. | |
| 59 | rm -fr f2c | |
| 60 | gunzip *.gz | |
| 61 | (cd src; rm -f MD5 MD5.gz gram.c.gz .depend .depend.gz f2c.1.gz index.html index.html.gz; gunzip *.gz) | |
| 62 | sh libf77 > /dev/null && rm libf77 | |
| 63 | rm -f libF77/xsum0.out libF77/libF77.xsum | |
| 64 | sh libi77 > /dev/null && rm libi77 | |
| 65 | rm -f libI77/xsum0.out libI77/libI77.xsum | |
| 66 | rm -f src/xsum0.out | |
| 67 | touch src/xsum.out | |
| 68 | cmp f2c.h src/f2c.h && rm -fv src/f2c.h | |
| 69 | cmp src/readme src/README && rm -fv src/readme | |
| 70 | ||
| 71 | echo Deleting f2c.tar... | |
| 72 | rm tmp/f2c.tar | |
| 73 | rmdir tmp | |
| 74 | ||
| 75 | cd .. | |
| 76 | ||
| 77 | echo Latest f2c now in $dir. |