PATCH: _wget

PATCH: _wget

[Oliver Kiddle]

This updates _wget for the newly released wget 1.8.

Index: Completion/Unix/Command/_wget
===================================================================
RCS file: /cvsroot/zsh/zsh/Completion/Unix/Command/_wget,v
retrieving revision 1.4
diff -u -r1.4 _wget
--- Completion/Unix/Command/_wget	2001/10/08 16:22:40	1.4
+++ Completion/Unix/Command/_wget	2001/12/11 17:49:59
@@ -21,15 +21,17 @@
   '(--tries -t)'{--tries=,-t+}'[set number of retries]:number of retries' \
   '(--output-document -O)'{--output-document=,-O+}'[specify file to write documents to]:output file:_files' \
   '(--continue -c)'{--continue,-c}'[continue getting an existing file]'  \
-  '--dot-style=[set retrieval display style]:display style:(default binary mega giga micro)' \
+  '--progress=[set progress gauge type]:gauge type:->gauge' \
   '(--timestamping -N)'{--timestamping,-N}'[retrieve only files newer than existing]' \
   '(--server-response -S)'{--server-response,-S}'[print server response]' \
   "--spider[don't download anything]" \
   '(--timeout -T)'{--timeout=,-T+}'[specify read timeout]:read timeout (seconds)' \
   '(--wait,-w)'{--wait=,-w+}'[specify wait between retrievals]:wait between retrievals (seconds)' \
-  '--waitretry=:wait between retries of a retrieval (seconds)' \
+  '(--random-wait)--waitretry=:wait between retries of a retrieval (seconds)' \
+  '(--waitretry)--random-wait[wait from 0...2*WAIT secs between retrievals]' \
   '(--proxy -Y)'{--proxy=,-Y+}'[turn proxy on or off]:proxy use:(on off)' \
   '(--quota -Q)'{--quota=,-Q+}'[set retrieval quota]:number' \
+  '--limit-rate=[specify limit to download rate]:download rate limit' \
   '(--force-directories -x)'{--force-directories,-x}'[force creation of directories]' \
   '(--directory-prefix -P)'{--directory-prefix=,-P+}'[specify prefix to save files to]:prefix:_files -/' \
   '--cut-dirs=:number:' \
@@ -80,17 +82,22 @@
   '--no-http-keep-alive[disable HTTP keep-alive]' \
   '--sslcertfile=[specify client certificate]:client certificate file:_files' \
   '--sslcertkey=[specify keyfile for certificate]:keyfile:_files' \
+  '--egd-file=[specify filename of EGD socket]' \
   '*:url:_urls' && return 0
 
 case "$state" in
-noflags)
-  _values -s '' 'option' \
-    'v[non verbose]' \
-    'h[no host lookup]' \
-    'H[no host directories]' \
-    'd[no directories]' \
-    'c[no clobber]' \
-    'r[don'\''t remove listing]' \
-    'p[no parent]'
+  gauge)
+    _values -S : 'progress gauge type' \
+      'dot:style:(default binary mega giga micro)' \
+      'bar:force:(force)'
+  ;;
+  noflags)
+    _values -s '' 'option' \
+      'v[non verbose]' \
+      'H[no host directories]' \
+      'd[no directories]' \
+      'c[no clobber]' \
+      'r[don'\''t remove listing]' \
+      'p[no parent]'
   ;;
 esac

_____________________________________________________________________
This message has been checked for all known viruses by the 
MessageLabs Virus Scanning Service. For further information visit
http://www.messagelabs.com/stats.asp

PATCH: _wget

[Tanaka Akira]

This is a completion function for wget.

--- /dev/null	Fri Sep 17 09:49:00 1999
+++ Completion/User/_wget	Fri Sep 17 08:27:05 1999
@@ -0,0 +1,93 @@
+#compdef wget
+
+local state line
+typeset -A options
+
+local tmp1 tmp2
+
+_arguments -s \
+  '(--version)-V[version]' '(-V)--version' \
+  '(--help)-h[help]' '(-h)--help' \
+  '(--background)-b[background]' '(-b)--background' \
+  {'(--execute)-e+[execute]','(-e)--execute='}':.wgetrc command:' \
+  {'(--output-file)-o+[output file]','(-o)--output-file='}':log file to output:_files' \
+  {'(--append-output)-a+[append output file]','(-a)--append-output='}':log file to append:_files' \
+  '(--debug)-d[debug]' '(-d)--debug' \
+  '(--quiet)-q[quiet]' '(-q)--quiet' \
+  '(--verbose)-v[verbose]' '(-v)--verbose' \
+  '*-n+[no]:flags:->noflags' \
+  {'(--input-file)-i+[input file]','(-i)--input-file='}':file containing URLs:_files' \
+  '(--force-html)-F[force html]' '(-F)--force-html' \
+  {'(--tries)-t+[tries]','(-t)--tries='}':number of retries:(0)' \
+  {'(--output-document)-O+[output document]','(-O)--output-document='}':output file:_files' \
+  '(--continue)-c[continue]' '(-c)--continue' \
+  '--dot-style=:display style:(default binary mega giga micro)' \
+  '(--timestamping)-N[timestamping]' '(-N)--timestamping' \
+  '(--server-response)-S[server response]' '(-S)--server-response' \
+  '--spider' \
+  {'(--timeout)-T+[timeout]','(-T)--timeout='}':read timeout(seconds):' \
+  {'(--wait)-w+[wait]','(-w)--wait='}':wait between retrievals(seconds):' \
+  {'(--proxy --use-proxy)-Y+[proxy]','(-Y --use-proxy)--proxy=','(-Y --proxy)--use-proxy='}':proxy:(on off)' \
+  {'(--quota)-Q+[quota]','(-Q)--quota='}':number:' \
+  '(--force-directories)-x[force directories]' '(-x)--force-directories' \
+  {'(--directory-prefix)-P+[directory prefix]','(-P)--directory-prefix='}':prefix:_files -/' \
+  '--cut-dirs=:number:' \
+  '--http-user=:user:' \
+  '--http-passwd=:password:' \
+  '--ignore-length' \
+  '--header=:string:' \
+  '--proxy-user=:user:' \
+  '--proxy-passwd=:password:' \
+  '(--save-headers)-s[save headers]' '(-s)--save-headers' \
+  {'(--user-agent)-U+[user agent]','(-U)--user-agent='}':user-agent:' \
+  '--retr-symlinks' \
+  {'(--glob)-g+[glob]','(-g)--glob='}':glob:(on off)' \
+  '--passive-ftp' \
+  '(--recursive)-r[recursive]' '(-r)--recursive' \
+  {'(--level)-l+[level]','(-l)--level='}':level:(0)' \
+  '--delete-after' \
+  '(--convert-links)-k[convert links]' '(-k)--convert-links' \
+  '(--mirror)-m[mirror]' '(-m)--mirror' \
+  {'(--accept)-A+[accept]','(-A)--accept='}':accepted etensions:' \
+  {'(--reject)-R+[reject]','(-R)--reject='}':rejected etensions:' \
+  {'(--domains)-D+[domains]','(-D)--domains='}':accepted domains:' \
+  '--exclude-domains=:rejected domains:' \
+  '(--relative)-L[relative]' '(-L)--relative' \
+  '--follow-ftp' \
+  '(--span-hosts)-H[span hosts]' '(-H)--span-hosts' \
+  {'(--include-directories)-I+[include directories]','(-I)--include-directories='}':allowed directories:' \
+  {'(--exclude-directories)-X+[exclude directories]','(-X)--exclude-directories='}':excluded directories:' \
+  {'(--base)-B+[base]','(-B)--base='}':base:' \
+  '--no-host-lookup' \
+  '--no-parent' \
+  '--non-verbose' \
+  '--no-clobber' \
+  '--no-directories' \
+  '--no-host-directories' \
+  '--dont-remove-listing' \
+  '--cache=:cache:(on off)' \
+  '--htmlify=:htmlify:' \
+  '--no:no:->noflags' \
+  '*:url:_urls'
+
+#  '--backups:backups:' \
+#  '-W' \
+#  '(--email-address)-E+[email address]' '(-E)--email-address' \
+#  '-C+[cache]:cache:(on off)' \
+#  '--force-hier' \
+
+case "$state" in
+noflags)
+  tmp1=(
+    'v:non verbose'
+    'h:no host lookup'
+    'H:no host directories'
+    'd:no directories'
+    'c:no clobber'
+    'r:don'\''t remove listing'
+    'p:no parent'
+  )
+  tmp2=(${PREFIX}${^tmp1%%:*})
+  _describe -o option tmp1 tmp2
+  ;;
+esac
-- 
Tanaka Akira