← Back to branch summary

~ubuntu-branches/ubuntu/natty/diffutils/natty

« back to all changes in this revision

Viewing changes to build-aux/gnupload

  • Committer: Bazaar Package Importer
  • Author(s): Santiago Vila
  • Date: 2010-05-04 20:38:00 UTC
  • mfrom: (2.1.7 sid)
  • Revision ID: james.westby@ubuntu.com-20100504203800-f67xd9rsa9xl9qqj
Tags: 1:3.0-1
New upstream release.

Show diffs side-by-side

added added

removed removed

Lines of Context:
build-aux/gnupload
 
1
#!/bin/sh
 
2
# Sign files and upload them.
 
3
 
 
4
scriptversion=2010-04-25.17; # UTC
 
5
 
 
6
# Copyright (C) 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software
 
7
# Foundation, Inc.
 
8
#
 
9
# This program is free software; you can redistribute it and/or modify
 
10
# it under the terms of the GNU General Public License as published by
 
11
# the Free Software Foundation; either version 3, or (at your option)
 
12
# any later version.
 
13
#
 
14
# This program is distributed in the hope that it will be useful,
 
15
# but WITHOUT ANY WARRANTY; without even the implied warranty of
 
16
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
17
# GNU General Public License for more details.
 
18
#
 
19
# You should have received a copy of the GNU General Public License
 
20
# along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
21
 
 
22
# Originally written by Alexandre Duret-Lutz <adl@gnu.org>.
 
23
 
 
24
set -e
 
25
 
 
26
GPG='gpg --batch --no-tty'
 
27
conffile=.gnuploadrc
 
28
to=
 
29
dry_run=false
 
30
symlink_files=
 
31
delete_files=
 
32
delete_symlinks=
 
33
collect_var=
 
34
dbg=
 
35
 
 
36
usage="Usage: $0 [OPTION]... [CMD] FILE... [[CMD] FILE...]
 
37
 
 
38
Sign all FILES, and process them at selected destinations according to CMD.
 
39
<http://www.gnu.org/prep/maintain/html_node/Automated-FTP-Uploads.html>
 
40
explains further.
 
41
 
 
42
Commands:
 
43
  --delete                 delete FILES from destination
 
44
  --symlink                create symbolic links
 
45
  --rmsymlink              remove symbolic links
 
46
  --                       treat the remaining arguments as files to upload
 
47
 
 
48
Options:
 
49
  --help                   print this help text and exit
 
50
  --to DEST                specify one destination for FILES
 
51
                           (multiple --to options are allowed)
 
52
  --user NAME              sign with key NAME
 
53
  --symlink-regex[=EXPR]   use sed script EXPR to compute symbolic link names
 
54
  --dry-run                do nothing, show what would have been done
 
55
  --version                output version information and exit
 
56
 
 
57
If --symlink-regex is given without EXPR, then the link target name
 
58
is created by replacing the version information with \`-latest', e.g.:
 
59
 
 
60
  foo-1.3.4.tar.gz -> foo-latest.tar.gz
 
61
 
 
62
Recognized destinations are:
 
63
  alpha.gnu.org:DIRECTORY
 
64
  savannah.gnu.org:DIRECTORY
 
65
  savannah.nongnu.org:DIRECTORY
 
66
  ftp.gnu.org:DIRECTORY
 
67
                           build directive files and upload files by FTP
 
68
  download.gnu.org.ua:{alpha|ftp}/DIRECTORY
 
69
                           build directive files and upload files by SFTP
 
70
  [user@]host:DIRECTORY    upload files with scp
 
71
 
 
72
Options and commands are applied in order.  If the file $conffile exists
 
73
in the current working directory, its contents are prepended to the
 
74
actual command line options.  Use this to keep your defaults.  Comments
 
75
(#) and empty lines in $conffile are allowed.
 
76
 
 
77
Examples:
 
78
1. Upload foobar-1.0.tar.gz to ftp.gnu.org:
 
79
  gnupload --to ftp.gnu.org:foobar foobar-1.0.tar.gz
 
80
 
 
81
2. Upload foobar-1.0.tar.gz and foobar-1.0.tar.xz to ftp.gnu.org:
 
82
  gnupload --to ftp.gnu.org:foobar foobar-1.0.tar.gz foobar-1.0.tar.xz
 
83
 
 
84
3. Same as above, and also create symbolic links to foobar-latest.tar.*:
 
85
  gnupload --to ftp.gnu.org:foobar \\
 
86
           --symlink-regex \\
 
87
           foobar-1.0.tar.gz foobar-1.0.tar.xz
 
88
 
 
89
4. Upload foobar-0.9.90.tar.gz to two sites:
 
90
  gnupload --to alpha.gnu.org:foobar \\
 
91
           --to sources.redhat.com:~ftp/pub/foobar \\
 
92
           foobar-0.9.90.tar.gz
 
93
 
 
94
5. Delete oopsbar-0.9.91.tar.gz and upload foobar-0.9.91.tar.gz
 
95
   (the -- terminates the list of files to delete):
 
96
  gnupload --to alpha.gnu.org:foobar \\
 
97
           --to sources.redhat.com:~ftp/pub/foobar \\
 
98
           --delete oopsbar-0.9.91.tar.gz \\
 
99
           -- foobar-0.9.91.tar.gz
 
100
 
 
101
gnupload uses the ncftpput program to do the transfers; if you don't
 
102
happen to have an ncftp package installed, the ncftpput-ftp script in
 
103
the build-aux/ directory of the gnulib package
 
104
(http://savannah.gnu.org/projects/gnulib) may serve as a replacement.
 
105
 
 
106
Report bugs to <bug-automake@gnu.org>.
 
107
Send patches to <automake-patches@gnu.org>."
 
108
 
 
109
# Read local configuration file
 
110
if test -r "$conffile"; then
 
111
  echo "$0: Reading configuration file $conffile"
 
112
  eval set x "`sed 's/#.*$//;/^$/d' \"$conffile\" | tr '\012\015' '  '` \"\$@\""
 
113
  shift
 
114
fi
 
115
 
 
116
while test -n "$1"; do
 
117
  case $1 in
 
118
  -*)
 
119
    collect_var=
 
120
    case $1 in
 
121
    --help)
 
122
      echo "$usage"
 
123
      exit $?
 
124
      ;;
 
125
    --to)
 
126
      if test -z "$2"; then
 
127
        echo "$0: Missing argument for --to" 1>&2
 
128
        exit 1
 
129
      else
 
130
        to="$to $2"
 
131
        shift
 
132
      fi
 
133
      ;;
 
134
    --user)
 
135
      if test -z "$2"; then
 
136
        echo "$0: Missing argument for --user" 1>&2
 
137
        exit 1
 
138
      else
 
139
        GPG="$GPG --local-user $2"
 
140
        shift
 
141
      fi
 
142
      ;;
 
143
    --delete)
 
144
      collect_var=delete_files
 
145
      ;;
 
146
    --rmsymlink)
 
147
      collect_var=delete_symlinks
 
148
      ;;
 
149
    --symlink-regex=*)
 
150
      symlink_expr=`expr "$1" : '[^=]*=\(.*\)'`
 
151
      ;;
 
152
    --symlink-regex)
 
153
      symlink_expr='s|-[0-9][0-9\.]*\(-[0-9][0-9]*\)\{0,1\}\.|-latest.|'
 
154
      ;;
 
155
    --symlink)
 
156
      collect_var=symlink_files
 
157
      ;;
 
158
    --dry-run|-n)
 
159
      dry_run=:
 
160
      ;;
 
161
    --version)
 
162
      echo "gnupload $scriptversion"
 
163
      exit $?
 
164
      ;;
 
165
    --)
 
166
      shift
 
167
      break
 
168
      ;;
 
169
    -*)
 
170
      echo "$0: Unknown option \`$1', try \`$0 --help'" 1>&2
 
171
      exit 1
 
172
      ;;
 
173
    esac
 
174
    ;;
 
175
  *)
 
176
    if test -z "$collect_var"; then
 
177
      break
 
178
    else
 
179
      eval "$collect_var=\"\$$collect_var $1\""
 
180
    fi
 
181
    ;;
 
182
  esac
 
183
  shift
 
184
done
 
185
 
 
186
dprint()
 
187
{
 
188
  echo "Running $* ..."
 
189
}
 
190
 
 
191
if $dry_run; then
 
192
  dbg=dprint
 
193
fi
 
194
 
 
195
if test -z "$to"; then
 
196
  echo "$0: Missing destination sites" >&2
 
197
  exit 1
 
198
fi
 
199
 
 
200
if test -n "$symlink_files"; then
 
201
  x=`echo "$symlink_files" | sed 's/[^ ]//g;s/  //g'`
 
202
  if test -n "$x"; then
 
203
    echo "$0: Odd number of symlink arguments" >&2
 
204
    exit 1
 
205
  fi
 
206
fi
 
207
 
 
208
if test $# = 0; then
 
209
  if test -z "${symlink_files}${delete_files}${delete_symlinks}"; then
 
210
    echo "$0: No file to upload" 1>&2
 
211
    exit 1
 
212
  fi
 
213
else
 
214
  # Make sure all files exist.  We don't want to ask
 
215
  # for the passphrase if the script will fail.
 
216
  for file
 
217
  do
 
218
    if test ! -f $file; then
 
219
      echo "$0: Cannot find \`$file'" 1>&2
 
220
      exit 1
 
221
    elif test -n "$symlink_expr"; then
 
222
      linkname=`echo $file | sed "$symlink_expr"`
 
223
      if test -z "$linkname"; then
 
224
        echo "$0: symlink expression produces empty results" >&2
 
225
        exit 1
 
226
      elif test "$linkname" = $file; then
 
227
        echo "$0: symlink expression does not alter file name" >&2
 
228
        exit 1
 
229
      fi
 
230
    fi
 
231
  done
 
232
fi
 
233
 
 
234
# Make sure passphrase is not exported in the environment.
 
235
unset passphrase
 
236
 
 
237
# Reset PATH to be sure that echo is a built-in.  We will later use
 
238
# `echo $passphrase' to output the passphrase, so it is important that
 
239
# it is a built-in (third-party programs tend to appear in `ps'
 
240
# listings with their arguments...).
 
241
# Remember this script runs with `set -e', so if echo is not built-in
 
242
# it will exit now.
 
243
PATH=/empty echo -n "Enter GPG passphrase: "
 
244
stty -echo
 
245
read -r passphrase
 
246
stty echo
 
247
echo
 
248
 
 
249
if test $# -ne 0; then
 
250
  for file
 
251
  do
 
252
    echo "Signing $file ..."
 
253
    rm -f $file.sig
 
254
    echo "$passphrase" | $dbg $GPG --passphrase-fd 0 -ba -o $file.sig $file
 
255
  done
 
256
fi
 
257
 
 
258
 
 
259
# mkdirective DESTDIR BASE FILE STMT
 
260
# Arguments: See upload, below
 
261
mkdirective ()
 
262
{
 
263
  stmt="$4"
 
264
  if test -n "$3"; then
 
265
    stmt="
 
266
filename: $3$stmt"
 
267
  fi
 
268
 
 
269
  cat >${2}.directive<<EOF
 
270
version: 1.1
 
271
directory: $1
 
272
comment: gnupload v. $scriptversion$stmt
 
273
EOF
 
274
  if $dry_run; then
 
275
    echo "File ${2}.directive:"
 
276
    cat ${2}.directive
 
277
    echo "File ${2}.directive:" | sed 's/./-/g'
 
278
  fi
 
279
}
 
280
 
 
281
mksymlink ()
 
282
{
 
283
  while test $# -ne 0
 
284
  do
 
285
    echo "symlink: $1 $2"
 
286
    shift
 
287
    shift
 
288
  done
 
289
}
 
290
 
 
291
# upload DEST DESTDIR BASE FILE STMT FILES
 
292
# Arguments:
 
293
#  DEST     Destination site;
 
294
#  DESTDIR  Destination directory;
 
295
#  BASE     Base name for the directive file;
 
296
#  FILE     Name of the file to distribute (may be empty);
 
297
#  STMT     Additional statements for the directive file;
 
298
#  FILES    List of files to upload.
 
299
upload ()
 
300
{
 
301
  dest=$1
 
302
  destdir=$2
 
303
  base=$3
 
304
  file=$4
 
305
  stmt=$5
 
306
  files=$6
 
307
 
 
308
  rm -f $base.directive $base.directive.asc
 
309
  case $dest in
 
310
    alpha.gnu.org:*)
 
311
      mkdirective "$destdir" "$base" "$file" "$stmt"
 
312
      echo "$passphrase" | $dbg $GPG --passphrase-fd 0 --clearsign $base.directive
 
313
      $dbg ncftpput ftp-upload.gnu.org /incoming/alpha $files $base.directive.asc
 
314
      ;;
 
315
    ftp.gnu.org:*)
 
316
      mkdirective "$destdir" "$base" "$file" "$stmt"
 
317
      echo "$passphrase" | $dbg $GPG --passphrase-fd 0 --clearsign $base.directive
 
318
      $dbg ncftpput ftp-upload.gnu.org /incoming/ftp $files $base.directive.asc
 
319
      ;;
 
320
    savannah.gnu.org:*)
 
321
      if test -z "$files"; then
 
322
        echo "$0: warning: standalone directives not applicable for $dest" >&2
 
323
      fi
 
324
      $dbg ncftpput savannah.gnu.org /incoming/savannah/$destdir $files
 
325
      ;;
 
326
    savannah.nongnu.org:*)
 
327
      if test -z "$files"; then
 
328
        echo "$0: warning: standalone directives not applicable for $dest" >&2
 
329
      fi
 
330
      $dbg ncftpput savannah.nongnu.org /incoming/savannah/$destdir $files
 
331
      ;;
 
332
    download.gnu.org.ua:alpha/*|download.gnu.org.ua:ftp/*)
 
333
      destdir_p1=`echo "$destdir" | sed 's,^[^/]*/,,'`
 
334
      destdir_topdir=`echo "$destdir" | sed 's,/.*,,'`
 
335
      mkdirective "$destdir_p1" "$base" "$file" "$stmt"
 
336
      echo "$passphrase" | $dbg $GPG --passphrase-fd 0 --clearsign $base.directive
 
337
      for f in $files $base.directive.asc
 
338
      do
 
339
        echo put $f
 
340
      done | $dbg sftp -b - puszcza.gnu.org.ua:/incoming/$destdir_topdir
 
341
      ;;
 
342
    /*)
 
343
      dest_host=`echo "$dest" | sed 's,:.*,,'`
 
344
      mkdirective "$destdir" "$base" "$file" "$stmt"
 
345
      echo "$passphrase" | $dbg $GPG --passphrase-fd 0 --clearsign $base.directive
 
346
      $dbg cp $files $base.directive.asc $dest_host
 
347
      ;;
 
348
    *)
 
349
      if test -z "$files"; then
 
350
        echo "$0: warning: standalone directives not applicable for $dest" >&2
 
351
      fi
 
352
      $dbg scp $files $dest
 
353
      ;;
 
354
  esac
 
355
  rm -f $base.directive $base.directive.asc
 
356
}
 
357
 
 
358
#####
 
359
# Process any standalone directives
 
360
stmt=
 
361
if test -n "$symlink_files"; then
 
362
  stmt="$stmt
 
363
`mksymlink $symlink_files`"
 
364
fi
 
365
 
 
366
for file in $delete_files
 
367
do
 
368
  stmt="$stmt
 
369
archive: $file"
 
370
done
 
371
 
 
372
for file in $delete_symlinks
 
373
do
 
374
  stmt="$stmt
 
375
rmsymlink: $file"
 
376
done
 
377
 
 
378
if test -n "$stmt"; then
 
379
  for dest in $to
 
380
  do
 
381
    destdir=`echo $dest | sed 's/[^:]*://'`
 
382
    upload "$dest" "$destdir" "`hostname`-$$" "" "$stmt"
 
383
  done
 
384
fi
 
385
 
 
386
# Process actual uploads
 
387
for dest in $to
 
388
do
 
389
  for file
 
390
  do
 
391
    echo "Uploading $file to $dest ..."
 
392
    stmt=
 
393
    files="$file $file.sig"
 
394
    destdir=`echo $dest | sed 's/[^:]*://'`
 
395
    if test -n "$symlink_expr"; then
 
396
      linkname=`echo $file | sed "$symlink_expr"`
 
397
      stmt="$stmt
 
398
symlink: $file $linkname
 
399
symlink: $file.sig $linkname.sig"
 
400
    fi
 
401
    upload "$dest" "$destdir" "$file" "$file" "$stmt" "$files"
 
402
  done
 
403
done
 
404
 
 
405
exit 0
 
406
 
 
407
# Local variables:
 
408
# eval: (add-hook 'write-file-hooks 'time-stamp)
 
409
# time-stamp-start: "scriptversion="
 
410
# time-stamp-format: "%:y-%02m-%02d.%02H"
 
411
# time-stamp-time-zone: "UTC"
 
412
# time-stamp-end: "; # UTC"
 
413
# End: