Blame build-aux/gnupload

Packit 33f14e
#!/bin/sh
Packit 33f14e
# Sign files and upload them.
Packit 33f14e
Packit 33f14e
scriptversion=2016-01-11.22; # UTC
Packit 33f14e
Packit 33f14e
# Copyright (C) 2004-2017 Free Software Foundation, Inc.
Packit 33f14e
#
Packit 33f14e
# This program is free software; you can redistribute it and/or modify
Packit 33f14e
# it under the terms of the GNU General Public License as published by
Packit 33f14e
# the Free Software Foundation; either version 3, or (at your option)
Packit 33f14e
# any later version.
Packit 33f14e
#
Packit 33f14e
# This program is distributed in the hope that it will be useful,
Packit 33f14e
# but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 33f14e
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit 33f14e
# GNU General Public License for more details.
Packit 33f14e
#
Packit 33f14e
# You should have received a copy of the GNU General Public License
Packit 33f14e
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
Packit 33f14e
Packit 33f14e
# Originally written by Alexandre Duret-Lutz <adl@gnu.org>.
Packit 33f14e
# The master copy of this file is maintained in the gnulib Git repository.
Packit 33f14e
# Please send bug reports and feature requests to bug-gnulib@gnu.org.
Packit 33f14e
Packit 33f14e
set -e
Packit 33f14e
Packit 33f14e
GPG='gpg --batch --no-tty'
Packit 33f14e
conffile=.gnuploadrc
Packit 33f14e
to=
Packit 33f14e
dry_run=false
Packit 33f14e
replace=
Packit 33f14e
symlink_files=
Packit 33f14e
delete_files=
Packit 33f14e
delete_symlinks=
Packit 33f14e
collect_var=
Packit 33f14e
dbg=
Packit 33f14e
nl='
Packit 33f14e
'
Packit 33f14e
Packit 33f14e
usage="Usage: $0 [OPTION]... [CMD] FILE... [[CMD] FILE...]
Packit 33f14e
Packit 33f14e
Sign all FILES, and process them at the destinations specified with --to.
Packit 33f14e
If CMD is not given, it defaults to uploading.  See examples below.
Packit 33f14e
Packit 33f14e
Commands:
Packit 33f14e
  --delete                 delete FILES from destination
Packit 33f14e
  --symlink                create symbolic links
Packit 33f14e
  --rmsymlink              remove symbolic links
Packit 33f14e
  --                       treat the remaining arguments as files to upload
Packit 33f14e
Packit 33f14e
Options:
Packit 33f14e
  --to DEST                specify a destination DEST for FILES
Packit 33f14e
                           (multiple --to options are allowed)
Packit 33f14e
  --user NAME              sign with key NAME
Packit 33f14e
  --replace                allow replacements of existing files
Packit 33f14e
  --symlink-regex[=EXPR]   use sed script EXPR to compute symbolic link names
Packit 33f14e
  --dry-run                do nothing, show what would have been done
Packit 33f14e
                           (including the constructed directive file)
Packit 33f14e
  --version                output version information and exit
Packit 33f14e
  --help                   print this help text and exit
Packit 33f14e
Packit 33f14e
If --symlink-regex is given without EXPR, then the link target name
Packit 33f14e
is created by replacing the version information with '-latest', e.g.:
Packit 33f14e
  foo-1.3.4.tar.gz -> foo-latest.tar.gz
Packit 33f14e
Packit 33f14e
Recognized destinations are:
Packit 33f14e
  alpha.gnu.org:DIRECTORY
Packit 33f14e
  savannah.gnu.org:DIRECTORY
Packit 33f14e
  savannah.nongnu.org:DIRECTORY
Packit 33f14e
  ftp.gnu.org:DIRECTORY
Packit 33f14e
                           build directive files and upload files by FTP
Packit 33f14e
  download.gnu.org.ua:{alpha|ftp}/DIRECTORY
Packit 33f14e
                           build directive files and upload files by SFTP
Packit 33f14e
  [user@]host:DIRECTORY    upload files with scp
Packit 33f14e
Packit 33f14e
Options and commands are applied in order.  If the file $conffile exists
Packit 33f14e
in the current working directory, its contents are prepended to the
Packit 33f14e
actual command line options.  Use this to keep your defaults.  Comments
Packit 33f14e
(#) and empty lines in $conffile are allowed.
Packit 33f14e
Packit 33f14e
<http://www.gnu.org/prep/maintain/html_node/Automated-FTP-Uploads.html>
Packit 33f14e
gives some further background.
Packit 33f14e
Packit 33f14e
Examples:
Packit 33f14e
1. Upload foobar-1.0.tar.gz to ftp.gnu.org:
Packit 33f14e
  gnupload --to ftp.gnu.org:foobar foobar-1.0.tar.gz
Packit 33f14e
Packit 33f14e
2. Upload foobar-1.0.tar.gz and foobar-1.0.tar.xz to ftp.gnu.org:
Packit 33f14e
  gnupload --to ftp.gnu.org:foobar foobar-1.0.tar.gz foobar-1.0.tar.xz
Packit 33f14e
Packit 33f14e
3. Same as above, and also create symbolic links to foobar-latest.tar.*:
Packit 33f14e
  gnupload --to ftp.gnu.org:foobar \\
Packit 33f14e
           --symlink-regex \\
Packit 33f14e
           foobar-1.0.tar.gz foobar-1.0.tar.xz
Packit 33f14e
Packit 33f14e
4. Upload foobar-0.9.90.tar.gz to two sites:
Packit 33f14e
  gnupload --to alpha.gnu.org:foobar \\
Packit 33f14e
           --to sources.redhat.com:~ftp/pub/foobar \\
Packit 33f14e
           foobar-0.9.90.tar.gz
Packit 33f14e
Packit 33f14e
5. Delete oopsbar-0.9.91.tar.gz and upload foobar-0.9.91.tar.gz
Packit 33f14e
   (the -- terminates the list of files to delete):
Packit 33f14e
  gnupload --to alpha.gnu.org:foobar \\
Packit 33f14e
           --to sources.redhat.com:~ftp/pub/foobar \\
Packit 33f14e
           --delete oopsbar-0.9.91.tar.gz \\
Packit 33f14e
           -- foobar-0.9.91.tar.gz
Packit 33f14e
Packit 33f14e
gnupload executes a program ncftpput to do the transfers; if you don't
Packit 33f14e
happen to have an ncftp package installed, the ncftpput-ftp script in
Packit 33f14e
the build-aux/ directory of the gnulib package
Packit 33f14e
(http://savannah.gnu.org/projects/gnulib) may serve as a replacement.
Packit 33f14e
Packit 33f14e
Send patches and bug reports to <bug-gnulib@gnu.org>."
Packit 33f14e
Packit 33f14e
# Read local configuration file
Packit 33f14e
if test -r "$conffile"; then
Packit 33f14e
  echo "$0: Reading configuration file $conffile"
Packit 33f14e
  conf=`sed 's/#.*$//;/^$/d' "$conffile" | tr "\015$nl" '  '`
Packit 33f14e
  eval set x "$conf \"\$@\""
Packit 33f14e
  shift
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
while test -n "$1"; do
Packit 33f14e
  case $1 in
Packit 33f14e
  -*)
Packit 33f14e
    collect_var=
Packit 33f14e
    case $1 in
Packit 33f14e
    --help)
Packit 33f14e
      echo "$usage"
Packit 33f14e
      exit $?
Packit 33f14e
      ;;
Packit 33f14e
    --to)
Packit 33f14e
      if test -z "$2"; then
Packit 33f14e
        echo "$0: Missing argument for --to" 1>&2
Packit 33f14e
        exit 1
Packit 33f14e
      elif echo "$2" | grep 'ftp-upload\.gnu\.org' >/dev/null; then
Packit 33f14e
        echo "$0: Use ftp.gnu.org:PKGNAME or alpha.gnu.org:PKGNAME" >&2
Packit 33f14e
        echo "$0: for the destination, not ftp-upload.gnu.org (which" >&2
Packit 33f14e
        echo "$0:  is used for direct ftp uploads, not with gnupload)." >&2
Packit 33f14e
        echo "$0: See --help and its examples if need be." >&2
Packit 33f14e
        exit 1
Packit 33f14e
      else
Packit 33f14e
        to="$to $2"
Packit 33f14e
        shift
Packit 33f14e
      fi
Packit 33f14e
      ;;
Packit 33f14e
    --user)
Packit 33f14e
      if test -z "$2"; then
Packit 33f14e
        echo "$0: Missing argument for --user" 1>&2
Packit 33f14e
        exit 1
Packit 33f14e
      else
Packit 33f14e
        GPG="$GPG --local-user $2"
Packit 33f14e
        shift
Packit 33f14e
      fi
Packit 33f14e
      ;;
Packit 33f14e
    --delete)
Packit 33f14e
      collect_var=delete_files
Packit 33f14e
      ;;
Packit 33f14e
    --replace)
Packit 33f14e
      replace="replace: true"
Packit 33f14e
      ;;
Packit 33f14e
    --rmsymlink)
Packit 33f14e
      collect_var=delete_symlinks
Packit 33f14e
      ;;
Packit 33f14e
    --symlink-regex=*)
Packit 33f14e
      symlink_expr=`expr "$1" : '[^=]*=\(.*\)'`
Packit 33f14e
      ;;
Packit 33f14e
    --symlink-regex)
Packit 33f14e
      symlink_expr='s|-[0-9][0-9\.]*\(-[0-9][0-9]*\)\{0,1\}\.|-latest.|'
Packit 33f14e
      ;;
Packit 33f14e
    --symlink)
Packit 33f14e
      collect_var=symlink_files
Packit 33f14e
      ;;
Packit 33f14e
    --dry-run|-n)
Packit 33f14e
      dry_run=:
Packit 33f14e
      ;;
Packit 33f14e
    --version)
Packit 33f14e
      echo "gnupload $scriptversion"
Packit 33f14e
      exit $?
Packit 33f14e
      ;;
Packit 33f14e
    --)
Packit 33f14e
      shift
Packit 33f14e
      break
Packit 33f14e
      ;;
Packit 33f14e
    -*)
Packit 33f14e
      echo "$0: Unknown option '$1', try '$0 --help'" 1>&2
Packit 33f14e
      exit 1
Packit 33f14e
      ;;
Packit 33f14e
    esac
Packit 33f14e
    ;;
Packit 33f14e
  *)
Packit 33f14e
    if test -z "$collect_var"; then
Packit 33f14e
      break
Packit 33f14e
    else
Packit 33f14e
      eval "$collect_var=\"\$$collect_var $1\""
Packit 33f14e
    fi
Packit 33f14e
    ;;
Packit 33f14e
  esac
Packit 33f14e
  shift
Packit 33f14e
done
Packit 33f14e
Packit 33f14e
dprint()
Packit 33f14e
{
Packit 33f14e
  echo "Running $* ..."
Packit 33f14e
}
Packit 33f14e
Packit 33f14e
if $dry_run; then
Packit 33f14e
  dbg=dprint
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
if test -z "$to"; then
Packit 33f14e
  echo "$0: Missing destination sites" >&2
Packit 33f14e
  exit 1
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
if test -n "$symlink_files"; then
Packit 33f14e
  x=`echo "$symlink_files" | sed 's/[^ ]//g;s/  //g'`
Packit 33f14e
  if test -n "$x"; then
Packit 33f14e
    echo "$0: Odd number of symlink arguments" >&2
Packit 33f14e
    exit 1
Packit 33f14e
  fi
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
if test $# = 0; then
Packit 33f14e
  if test -z "${symlink_files}${delete_files}${delete_symlinks}"; then
Packit 33f14e
    echo "$0: No file to upload" 1>&2
Packit 33f14e
    exit 1
Packit 33f14e
  fi
Packit 33f14e
else
Packit 33f14e
  # Make sure all files exist.  We don't want to ask
Packit 33f14e
  # for the passphrase if the script will fail.
Packit 33f14e
  for file
Packit 33f14e
  do
Packit 33f14e
    if test ! -f $file; then
Packit 33f14e
      echo "$0: Cannot find '$file'" 1>&2
Packit 33f14e
      exit 1
Packit 33f14e
    elif test -n "$symlink_expr"; then
Packit 33f14e
      linkname=`echo $file | sed "$symlink_expr"`
Packit 33f14e
      if test -z "$linkname"; then
Packit 33f14e
        echo "$0: symlink expression produces empty results" >&2
Packit 33f14e
        exit 1
Packit 33f14e
      elif test "$linkname" = $file; then
Packit 33f14e
        echo "$0: symlink expression does not alter file name" >&2
Packit 33f14e
        exit 1
Packit 33f14e
      fi
Packit 33f14e
    fi
Packit 33f14e
  done
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
# Make sure passphrase is not exported in the environment.
Packit 33f14e
unset passphrase
Packit 33f14e
unset passphrase_fd_0
Packit 33f14e
GNUPGHOME=${GNUPGHOME:-$HOME/.gnupg}
Packit 33f14e
Packit 33f14e
# Reset PATH to be sure that echo is a built-in.  We will later use
Packit 33f14e
# 'echo $passphrase' to output the passphrase, so it is important that
Packit 33f14e
# it is a built-in (third-party programs tend to appear in 'ps'
Packit 33f14e
# listings with their arguments...).
Packit 33f14e
# Remember this script runs with 'set -e', so if echo is not built-in
Packit 33f14e
# it will exit now.
Packit 33f14e
if $dry_run || grep -q "^use-agent" $GNUPGHOME/gpg.conf; then :; else
Packit 33f14e
  PATH=/empty echo -n "Enter GPG passphrase: "
Packit 33f14e
  stty -echo
Packit 33f14e
  read -r passphrase
Packit 33f14e
  stty echo
Packit 33f14e
  echo
Packit 33f14e
  passphrase_fd_0="--passphrase-fd 0"
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
if test $# -ne 0; then
Packit 33f14e
  for file
Packit 33f14e
  do
Packit 33f14e
    echo "Signing $file ..."
Packit 33f14e
    rm -f $file.sig
Packit 33f14e
    echo "$passphrase" | $dbg $GPG $passphrase_fd_0 -ba -o $file.sig $file
Packit 33f14e
  done
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
Packit 33f14e
# mkdirective DESTDIR BASE FILE STMT
Packit 33f14e
# Arguments: See upload, below
Packit 33f14e
mkdirective ()
Packit 33f14e
{
Packit 33f14e
  stmt="$4"
Packit 33f14e
  if test -n "$3"; then
Packit 33f14e
    stmt="
Packit 33f14e
filename: $3$stmt"
Packit 33f14e
  fi
Packit 33f14e
Packit 33f14e
  cat >${2}.directive<
Packit 33f14e
version: 1.2
Packit 33f14e
directory: $1
Packit 33f14e
comment: gnupload v. $scriptversion$stmt
Packit 33f14e
EOF
Packit 33f14e
  if $dry_run; then
Packit 33f14e
    echo "File ${2}.directive:"
Packit 33f14e
    cat ${2}.directive
Packit 33f14e
    echo "File ${2}.directive:" | sed 's/./-/g'
Packit 33f14e
  fi
Packit 33f14e
}
Packit 33f14e
Packit 33f14e
mksymlink ()
Packit 33f14e
{
Packit 33f14e
  while test $# -ne 0
Packit 33f14e
  do
Packit 33f14e
    echo "symlink: $1 $2"
Packit 33f14e
    shift
Packit 33f14e
    shift
Packit 33f14e
  done
Packit 33f14e
}
Packit 33f14e
Packit 33f14e
# upload DEST DESTDIR BASE FILE STMT FILES
Packit 33f14e
# Arguments:
Packit 33f14e
#  DEST     Destination site;
Packit 33f14e
#  DESTDIR  Destination directory;
Packit 33f14e
#  BASE     Base name for the directive file;
Packit 33f14e
#  FILE     Name of the file to distribute (may be empty);
Packit 33f14e
#  STMT     Additional statements for the directive file;
Packit 33f14e
#  FILES    List of files to upload.
Packit 33f14e
upload ()
Packit 33f14e
{
Packit 33f14e
  dest=$1
Packit 33f14e
  destdir=$2
Packit 33f14e
  base=$3
Packit 33f14e
  file=$4
Packit 33f14e
  stmt=$5
Packit 33f14e
  files=$6
Packit 33f14e
Packit 33f14e
  rm -f $base.directive $base.directive.asc
Packit 33f14e
  case $dest in
Packit 33f14e
    alpha.gnu.org:*)
Packit 33f14e
      mkdirective "$destdir" "$base" "$file" "$stmt"
Packit 33f14e
      echo "$passphrase" | $dbg $GPG $passphrase_fd_0 --clearsign $base.directive
Packit 33f14e
      $dbg ncftpput ftp-upload.gnu.org /incoming/alpha $files $base.directive.asc
Packit 33f14e
      ;;
Packit 33f14e
    ftp.gnu.org:*)
Packit 33f14e
      mkdirective "$destdir" "$base" "$file" "$stmt"
Packit 33f14e
      echo "$passphrase" | $dbg $GPG $passphrase_fd_0 --clearsign $base.directive
Packit 33f14e
      $dbg ncftpput ftp-upload.gnu.org /incoming/ftp $files $base.directive.asc
Packit 33f14e
      ;;
Packit 33f14e
    savannah.gnu.org:*)
Packit 33f14e
      if test -z "$files"; then
Packit 33f14e
        echo "$0: warning: standalone directives not applicable for $dest" >&2
Packit 33f14e
      fi
Packit 33f14e
      $dbg ncftpput savannah.gnu.org /incoming/savannah/$destdir $files
Packit 33f14e
      ;;
Packit 33f14e
    savannah.nongnu.org:*)
Packit 33f14e
      if test -z "$files"; then
Packit 33f14e
        echo "$0: warning: standalone directives not applicable for $dest" >&2
Packit 33f14e
      fi
Packit 33f14e
      $dbg ncftpput savannah.nongnu.org /incoming/savannah/$destdir $files
Packit 33f14e
      ;;
Packit 33f14e
    download.gnu.org.ua:alpha/*|download.gnu.org.ua:ftp/*)
Packit 33f14e
      destdir_p1=`echo "$destdir" | sed 's,^[^/]*/,,'`
Packit 33f14e
      destdir_topdir=`echo "$destdir" | sed 's,/.*,,'`
Packit 33f14e
      mkdirective "$destdir_p1" "$base" "$file" "$stmt"
Packit 33f14e
      echo "$passphrase" | $dbg $GPG $passphrase_fd_0 --clearsign $base.directive
Packit 33f14e
      for f in $files $base.directive.asc
Packit 33f14e
      do
Packit 33f14e
        echo put $f
Packit 33f14e
      done | $dbg sftp -b - puszcza.gnu.org.ua:/incoming/$destdir_topdir
Packit 33f14e
      ;;
Packit 33f14e
    /*)
Packit 33f14e
      dest_host=`echo "$dest" | sed 's,:.*,,'`
Packit 33f14e
      mkdirective "$destdir" "$base" "$file" "$stmt"
Packit 33f14e
      echo "$passphrase" | $dbg $GPG $passphrase_fd_0 --clearsign $base.directive
Packit 33f14e
      $dbg cp $files $base.directive.asc $dest_host
Packit 33f14e
      ;;
Packit 33f14e
    *)
Packit 33f14e
      if test -z "$files"; then
Packit 33f14e
        echo "$0: warning: standalone directives not applicable for $dest" >&2
Packit 33f14e
      fi
Packit 33f14e
      $dbg scp $files $dest
Packit 33f14e
      ;;
Packit 33f14e
  esac
Packit 33f14e
  rm -f $base.directive $base.directive.asc
Packit 33f14e
}
Packit 33f14e
Packit 33f14e
#####
Packit 33f14e
# Process any standalone directives
Packit 33f14e
stmt=
Packit 33f14e
if test -n "$symlink_files"; then
Packit 33f14e
  stmt="$stmt
Packit 33f14e
`mksymlink $symlink_files`"
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
for file in $delete_files
Packit 33f14e
do
Packit 33f14e
  stmt="$stmt
Packit 33f14e
archive: $file"
Packit 33f14e
done
Packit 33f14e
Packit 33f14e
for file in $delete_symlinks
Packit 33f14e
do
Packit 33f14e
  stmt="$stmt
Packit 33f14e
rmsymlink: $file"
Packit 33f14e
done
Packit 33f14e
Packit 33f14e
if test -n "$stmt"; then
Packit 33f14e
  for dest in $to
Packit 33f14e
  do
Packit 33f14e
    destdir=`echo $dest | sed 's/[^:]*://'`
Packit 33f14e
    upload "$dest" "$destdir" "`hostname`-$$" "" "$stmt"
Packit 33f14e
  done
Packit 33f14e
fi
Packit 33f14e
Packit 33f14e
# Process actual uploads
Packit 33f14e
for dest in $to
Packit 33f14e
do
Packit 33f14e
  for file
Packit 33f14e
  do
Packit 33f14e
    echo "Uploading $file to $dest ..."
Packit 33f14e
    stmt=
Packit 33f14e
    #
Packit 33f14e
    # allowing file replacement is all or nothing.
Packit 33f14e
    if test -n "$replace"; then stmt="$stmt
Packit 33f14e
$replace"
Packit 33f14e
    fi
Packit 33f14e
    #
Packit 33f14e
    files="$file $file.sig"
Packit 33f14e
    destdir=`echo $dest | sed 's/[^:]*://'`
Packit 33f14e
    if test -n "$symlink_expr"; then
Packit 33f14e
      linkname=`echo $file | sed "$symlink_expr"`
Packit 33f14e
      stmt="$stmt
Packit 33f14e
symlink: $file $linkname
Packit 33f14e
symlink: $file.sig $linkname.sig"
Packit 33f14e
    fi
Packit 33f14e
    upload "$dest" "$destdir" "$file" "$file" "$stmt" "$files"
Packit 33f14e
  done
Packit 33f14e
done
Packit 33f14e
Packit 33f14e
exit 0
Packit 33f14e
Packit 33f14e
# Local variables:
Packit 33f14e
# eval: (add-hook 'write-file-hooks 'time-stamp)
Packit 33f14e
# time-stamp-start: "scriptversion="
Packit 33f14e
# time-stamp-format: "%:y-%02m-%02d.%02H"
Packit 33f14e
# time-stamp-time-zone: "UTC0"
Packit 33f14e
# time-stamp-end: "; # UTC"
Packit 33f14e
# End: