diff options
Diffstat (limited to 'contrib')
-rw-r--r-- | contrib/ChangeLog | 4 | ||||
-rwxr-xr-x | contrib/convert_to_f2c | 48 | ||||
-rwxr-xr-x | contrib/convert_to_g2c | 48 | ||||
-rwxr-xr-x | contrib/download_f2c | 77 |
4 files changed, 177 insertions, 0 deletions
diff --git a/contrib/ChangeLog b/contrib/ChangeLog index 046d4a4..fe071c2 100644 --- a/contrib/ChangeLog +++ b/contrib/ChangeLog @@ -1,3 +1,7 @@ +1999-09-11 Craig Burley <craig@jcb-sc.com> + + * convert_to_f2c, convert_to_g2c, download_f2c: New file. + 1999-08-16 Gerald Pfeifer <pfeifer@dbai.tuwien.ac.at> * gcc_update: New file. diff --git a/contrib/convert_to_f2c b/contrib/convert_to_f2c new file mode 100755 index 0000000..9a499fc --- /dev/null +++ b/contrib/convert_to_f2c @@ -0,0 +1,48 @@ +#!/bin/sh +# +# convert_to_f2c [g2c-dir] +# +# Renames certain files in a g2c (libg2c) directory so they no longer have the +# `.netlib' suffix, a la netlib's f2c distribution. If `g2c-dir' is not +# specified, `g2c-YYYYMMDD' is the default, where YYYYMMDD is the current +# date. The directory is renamed such that the first `g' becomes an `f', +# usually `g2c-YYYYMMDD' -> `f2c-YYYYMMDD'. +# +# (C) 1999 Free Software Foundation +# Originally by James Craig Burley <craig@jcb-sc.com>, September 1999. +# +# This script is Free Software, and it can be copied, distributed and +# modified as defined in the GNU General Public License. A copy of +# its license can be downloaded from http://www.gnu.org/copyleft/gpl.html + +set -e + +if [ x$1 = x ] +then + dir=g2c-`date +%Y%m%d` +else + dir=$1 +fi + +newdir=`echo $dir | sed -e "s:g:f:"` + +cd $dir + +set +e + +mv -i changes.netlib changes +mv -i disclaimer.netlib disclaimer +mv -i g2c.hin f2c.h +mv -i permission.netlib permission +mv -i readme.netlib readme +cd libF77 +mv -i README.netlib README +mv -i makefile.netlib makefile +cd ../libI77 +mv -i README.netlib README +mv -i makefile.netlib makefile +cd .. + +cd .. + +mv -iv $dir $newdir diff --git a/contrib/convert_to_g2c b/contrib/convert_to_g2c new file mode 100755 index 0000000..5d05f84 --- /dev/null +++ b/contrib/convert_to_g2c @@ -0,0 +1,48 @@ +#!/bin/sh +# +# convert_to_g2c [f2c-dir] +# +# Renames certain files in a netlib f2c directory so they have the `.netlib' +# suffix, a la g77's version of f2c (libg2c). If `f2c-dir' is not specified, +# `f2c-YYYYMMDD' is the default, where YYYYMMDD is the current date. +# The directory is renamed such that the first `f' becomes a `g', +# usually `f2c-YYYYMMDD' -> `g2c-YYYYMMDD'. +# +# (C) 1999 Free Software Foundation +# Originally by James Craig Burley <craig@jcb-sc.com>, September 1999. +# +# This script is Free Software, and it can be copied, distributed and +# modified as defined in the GNU General Public License. A copy of +# its license can be downloaded from http://www.gnu.org/copyleft/gpl.html + +set -e + +if [ x$1 = x ] +then + dir=f2c-`date +%Y%m%d` +else + dir=$1 +fi + +newdir=`echo $dir | sed -e "s:f:g:"` + +cd $dir + +set +e + +mv -i changes changes.netlib +mv -i disclaimer disclaimer.netlib +mv -i f2c.h g2c.hin +mv -i permission permission.netlib +mv -i readme readme.netlib +cd libF77 +mv -i README README.netlib +mv -i makefile makefile.netlib +cd ../libI77 +mv -i README README.netlib +mv -i makefile makefile.netlib +cd .. + +cd .. + +mv -iv $dir $newdir diff --git a/contrib/download_f2c b/contrib/download_f2c new file mode 100755 index 0000000..159c52e --- /dev/null +++ b/contrib/download_f2c @@ -0,0 +1,77 @@ +#!/bin/sh +# +# download_f2c +# +# Unpacks a directory full of f2c stuff obtained from netlib, naming +# the directory f2c-YYYYMMDD (YYYYMMDD being the current date), +# leaving it in current working directory. +# +# This shell script downloads the tarball from netlib, unpacks everything, +# and strips off the redundant files, leaving a bare-bones (but fully +# reproducible) f2c source directory. (You must have yacc/bison to rebuild +# gram.c, by the way.) +# +# (C) 1999 Free Software Foundation +# Originally by James Craig Burley <craig@jcb-sc.com>, September 1999. +# +# This script is Free Software, and it can be copied, distributed and +# modified as defined in the GNU General Public License. A copy of +# its license can be downloaded from http://www.gnu.org/copyleft/gpl.html +# +# FIXME: Replace WHOAMI with whatever is the canonical way to +# obtain the user's email address these days. + +dir=f2c-`date +%Y%m%d` +if [ ! -d $dir ] +then + mkdir $dir +fi +cd $dir + +echo Preparing $dir... + +if [ ! -d tmp ] +then + mkdir tmp +fi + +if [ ! -f tmp/f2c.tar ] +then + cd tmp + echo Downloading f2c.tar via ftp... + ftp -n netlib.bell-labs.com <<EOF + user ftp WHOAMI + type binary + cd netlib + get f2c.tar + quit +EOF + cd .. +fi + +echo Unpacking f2c.tar... + +tar xf tmp/f2c.tar +cd f2c +find . -name "*.gz" -print | sed -e "s:^\(.*\).gz:rm -f \1.Z:g" | sh +mv src libf77.gz libi77.gz f2c.1t.gz f2c.h.gz changes.gz disclaimer.gz readme.gz permission.gz .. +cd .. +rm -fr f2c +gunzip *.gz +(cd src; rm -f MD5 MD5.gz gram.c.gz .depend .depend.gz f2c.1.gz index.html index.html.gz; gunzip *.gz) +sh libf77 > /dev/null && rm libf77 +rm -f libF77/xsum0.out libF77/libF77.xsum +sh libi77 > /dev/null && rm libi77 +rm -f libI77/xsum0.out libI77/libI77.xsum +rm -f src/xsum0.out +touch src/xsum.out +cmp f2c.h src/f2c.h && rm -fv src/f2c.h +cmp src/readme src/README && rm -fv src/readme + +echo Deleting f2c.tar... +rm tmp/f2c.tar +rmdir tmp + +cd .. + +echo Latest f2c now in $dir. |