2000-04-15 04:41:27 +00:00
#
2000-06-10 20:14:21 +00:00
# $Id: complete.tcsh,v 1.33 2000/06/10 18:54:34 kim Exp $
2000-04-15 04:41:27 +00:00
# example file using the new completion code
#
onintr -
if ( ! $? prompt) goto end
if ( $? tcsh) then
if ( $tcsh != 1) then
set rev = $tcsh :r
set rel = $rev :e
set pat = $tcsh :e
set rev = $rev :r
endif
if ( $rev > 5 && $rel > 1) then
set complete = 1
endif
unset rev rel pat
endif
if ( $? complete ) then
set noglob
set hosts
foreach f ( $HOME /.hosts /usr/local/etc/csh.hosts $HOME /.rhosts /etc/hosts.equiv)
if ( -r $f ) then
set hosts = ( $hosts ` grep -v "+" $f | tr -s " " " " | cut -f 1` )
endif
end
if ( -r $HOME /.netrc ) then
set f = ` awk '/machine/ { print $2 }' < $HOME /.netrc` >& /dev/null
set hosts = ( $hosts $f )
endif
unset f
if ( ! $? hosts ) then
set hosts = ( hyperion.ee.cornell.edu phaeton.ee.cornell.edu \
guillemin.ee.cornell.edu vangogh.cs.berkeley.edu \
ftp.uu.net prep.ai.mit.edu export.lcs.mit.edu \
labrea.stanford.edu sumex-aim.stanford.edu \
tut.cis.ohio-state.edu)
endif
complete ywho n/*/\$ hosts/ # argument from list in $hosts
complete rsh p/1/\$ hosts/ c/-/"(l n)" / n/-l/u/ N/-l/c/ n/-/c/ p/2/c/ p/*/f/
complete ssh p/1/\$ hosts/ c/-/"(l n)" / n/-l/u/ N/-l/c/ n/-/c/ p/2/c/ p/*/f/
complete xrsh p/1/\$ hosts/ c/-/"(l 8 e)" / n/-l/u/ N/-l/c/ n/-/c/ p/2/c/ p/*/f/
complete rlogin p/1/\$ hosts/ c/-/"(l 8 e)" / n/-l/u/
complete telnet p/1/\$ hosts/ p/2/x:'<port>' / n/*/n/
complete cd p/1/d/ # Directories only
complete chdir p/1/d/
complete pushd p/1/d/
complete popd p/1/d/
complete pu p/1/d/
complete po p/1/d/
complete complete p/1/X/ # Completions only
complete uncomplete n/*/X/
complete exec p/1/c/ # Commands only
complete trace p/1/c/
complete strace p/1/c/
complete which n/*/c/
complete where n/*/c/
complete skill p/1/c/
complete dde p/1/c/
complete adb c/-I/d/ n/-/c/ N/-/"(core)" / p/1/c/ p/2/"(core)" /
complete sdb p/1/c/
complete dbx c/-I/d/ n/-/c/ N/-/"(core)" / p/1/c/ p/2/"(core)" /
complete xdb p/1/c/
complete gdb n/-d/d/ n/*/c/
complete ups p/1/c/
complete set 'c/*=/f/' 'p/1/s/=' 'n/=/f/'
complete unset n/*/s/
complete alias p/1/a/ # only aliases are valid
complete unalias n/*/a/
complete xdvi n/*/f:*.dvi/ # Only files that match *.dvi
complete dvips n/*/f:*.dvi/
complete tex n/*/f:*.tex/ # Only files that match *.tex
complete latex n/*/f:*.{ tex,ltx} /
complete su c/--/" ( login fast preserve-environment command shell \
help version) "/ c/-/" ( f l m p c s -) " / \
n/{ -c,--command} /c/ \
n@{ -s,--shell} @'`cat /etc/shells`' @ n/*/u/
complete cc c/-[ IL] /d/ \
c@-l@'`\ls -1 /usr/lib/lib*.a | sed s%^.\*/lib%%\;s%\\.a\$%%`' @ \
c/-/"(o l c g L I D U)" / n/*/f:*.[ coasi] /
complete acc c/-[ IL] /d/ \
c@-l@'`\ls -1 /usr/lang/SC1.0/lib*.a | sed s%^.\*/lib%%\;s%\\.a\$%%`' @ \
c/-/"(o l c g L I D U)" / n/*/f:*.[ coasi] /
complete gcc c/-[ IL] /d/ \
c/-f/" ( caller -saves cse-follow-jumps delayed-branch \
elide-constructors expensive-optimizations \
float-store force-addr force-mem inline \
inline-functions keep-inline-functions \
memoize-lookups no-default-inline \
no-defer-pop no-function-cse omit-frame-pointer \
rerun-cse-after-loop schedule-insns \
schedule-insns2 strength-reduce \
thread-jumps unroll-all-loops \
unroll-loops syntax-only all-virtual \
cond-mismatch dollars-in-identifiers \
enum-int-equiv no-asm no-builtin \
no-strict-prototype signed-bitfields \
signed-char this-is-variable unsigned-bitfields \
unsigned-char writable-strings call-saved-reg \
call-used-reg fixed-reg no-common \
no-gnu-binutils nonnull-objects \
pcc-struct-return pic PIC shared-data \
short-enums short-double volatile) " / \
c/-W/" ( all aggregate-return cast-align cast-qual \
comment conversion enum-clash error format \
id-clash-len implicit missing-prototypes \
no-parentheses pointer-arith return-type shadow \
strict-prototypes switch uninitialized unused \
write-strings) " / \
c/-m/" ( 68000 68020 68881 bitfield fpa nobitfield rtd \
short c68000 c68020 soft-float g gnu unix fpu \
no-epilogue) " / \
c/-d/"(D M N)" / \
c/-/" ( f W vspec v vpath ansi traditional \
traditional-cpp trigraphs pedantic x o l c g L \
I D U O O2 C E H B b V M MD MM i dynamic \
nodtdlib static nostdinc undef) " / \
c/-l/f:*.a/ \
n/*/f:*.{ c,C,cc,o,a,s,i} /
complete g++ n/*/f:*.{ C,cc,o,s,i} /
complete CC n/*/f:*.{ C,cc,o,s,i} /
complete rm c/--/" ( directory force interactive verbose \
recursive help version) "/ c/-/" ( d f i v r R -) " / \
n/*/f:^*.{ c,cc,C,h,in} / # Protect precious files
complete vi n/*/f:^*.[ oa] /
complete bindkey N/-a/b/ N/-c/c/ n/-[ ascr] /'x:<key-sequence>' / \
n/-[ svedlr] /n/ c/-[ vedl] /n/ c/-/"(a s k c v e d l r)" /\
n/-k/"(left right up down)" / p/2-/b/ \
p/1/'x:<key-sequence or option>' /
complete find n/-fstype/"(nfs 4.2)" / n/-name/f/ \
n/-type/"(c b d f p l s)" / n/-user/u/ n/-group/g/ \
n/-exec/c/ n/-ok/c/ n/-cpio/f/ n/-ncpio/f/ n/-newer/f/ \
c/-/" ( fstype name perm prune type user nouser \
group nogroup size inum atime mtime ctime exec \
ok print ls cpio ncpio newer xdev depth \
daystart follow maxdepth mindepth noleaf version \
anewer cnewer amin cmin mmin true false uid gid \
ilname iname ipath iregex links lname empty path \
regex used xtype fprint fprint0 fprintf \
print0 printf not a and o or) " / \
n/*/d/
complete -%* c/%/j/ # fill in the jobs builtin
complete { fg ,bg,stop} c/%/j/ p/1/"(%)" //
complete limit c/-/"(h)" / n/*/l/
complete unlimit c/-/"(h)" / n/*/l/
complete -co* p/0/"(compress)" / # make compress completion
# not ambiguous
complete zcat n/*/f:*.Z/
complete nm n/*/f:^*.{ h,C,c,cc} /
complete finger c/*@/\$ hosts/ n/*/u/@
complete ping p/1/\$ hosts/
complete traceroute p/1/\$ hosts/
complete { talk,ntalk,phone} p/1/'`users | tr " " "\012" | uniq`' / \
n/*/\` who\ \| \ grep\ \$ :1\ \| \ awk\ \' \{ \ print\ \$ 2\ \} \' \` /
complete ftp c/-/"(d i g n v)" / n/-/\$ hosts/ p/1/\$ hosts/ n/*/n/
# this one is simple...
#complete rcp c/*:/f/ C@[./\$~]*@f@ n/*/\$hosts/:
# From Michael Schroeder <mlschroe@immd4.informatik.uni-erlangen.de>
# This one will rsh to the file to fetch the list of files!
complete rcp 'c%*@*:%`set q=$:-0;set q="$q:s/@/ /";set q="$q:s/:/ /";set q=($q " ");rsh $q[2] -l $q[1] ls -dp $q[3]\*`%' 'c%*:%`set q=$:-0;set q="$q:s/:/ /";set q=($q " ");rsh $q[1] ls -dp $q[2]\*`%' 'c%*@%$hosts%:' 'C@[./$~]*@f@' 'n/*/$hosts/:'
complete dd c/--/"(help version)" / c/[ io] f = /f/ \
c/conv= *,/" ( ascii ebcdic ibm block unblock \
lcase notrunc ucase swab noerror sync) " /,\
c/conv= /" ( ascii ebcdic ibm block unblock \
lcase notrunc ucase swab noerror sync) " /,\
c/*= /x:'<number>' / \
n/*/"(if of conv ibs obs bs cbs files skip file seek count)" /=
complete nslookup p/1/x:'<host>' / p/2/\$ hosts/
complete ar c/[ dmpqrtx] /"(c l o u v a b i)" / p/1/"(d m p q r t x)" // \
p/2/f:*.a/ p/*/f:*.o/
# these should be merged with the MH completion hacks below - jgotts
complete { sprev,snext} \
c@+@F:$HOME /Mail/@
# these and interrupt handling from Jaap Vermeulen <jaap@sequent.com>
complete { rexec,rxexec,rxterm,rmterm} \
'p/1/$hosts/' 'c/-/(l L E)/' 'n/-l/u/' 'n/-L/f/' \
'n/-E/e/' 'n/*/c/'
complete kill 'c/-/S/' 'c/%/j/' \
'n/*/`ps -u $LOGNAME | awk ' "'" '{print $1}' "'" '`/'
# these from Marc Horowitz <marc@cam.ov.com>
complete attach 'n/-mountpoint/d/' 'n/-m/d/' 'n/-type/(afs nfs rvd ufs)/' \
'n/-t/(afs nfs rvd ufs)/' 'n/-user/u/' 'n/-U/u/' \
' c/-/( verbose quiet force printpath lookup debug map \
nomap remap zephyr nozephyr readonly write \
mountpoint noexplicit explicit type mountoptions \
nosetuid setuid override skipfsck lock user host) /' \
'n/-e/f/' 'n/*/()/'
complete hesinfo 'p/1/u/' \
' p/2/( passwd group uid grplist pcap pobox cluster \
filsys sloc service) /'
# these from E. Jay Berkenbilt <ejb@ERA.COM>
# = isn't always followed by a filename or a path anymore - jgotts
complete ./configure 'c/--*=/f/' ' c/--{ cache-file,prefix,exec-prefix,\
bindir,sbindir,libexecdir,datadir,\
sysconfdir,sharedstatedir,localstatedir,\
libdir,includedir,oldincludedir,infodir,\
mandir,srcdir} /(=) //' \
' c/--/( cache-file verbose prefix exec -prefix bindir \
sbindir libexecdir datadir sysconfdir \
sharedstatedir localstatedir libdir \
includedir oldincludedir infodir mandir \
srcdir) //'
complete gs ' c/-sDEVICE= /( x11 cdjmono cdj550 epson eps9high epsonc \
dfaxhigh dfaxlow laserjet ljet4 sparc pbm \
pbmraw pgm pgmraw ppm ppmraw bit) /' \
'c/-sOutputFile=/f/' 'c/-s/(DEVICE OutputFile)/=' \
'c/-d/(NODISPLAY NOPLATFONTS NOPAUSE)/' 'n/*/f/'
complete perl 'n/-S/c/'
complete printenv 'n/*/e/'
complete sccs p/1/" ( admin cdc check clean comb deledit delget \
delta diffs edit enter fix get help info \
print prs prt rmdel sccsdiff tell unedit \
unget val what) " /
complete setenv 'p/1/e/' 'c/*:/f/'
# these and method of setting hosts from Kimmo Suominen <kim@tac.nyc.ny.us>
if ( -f $HOME /.mh_profile && -x "`which folders`" ) then
if ( ! $? FOLDERS ) setenv FOLDERS "`folders -fast -recurse`"
if ( ! $? MHA ) setenv MHA "`ali | sed -e '/^ /d' -e 's/:.*//'`"
set folders = ( $FOLDERS )
set mha = ( $MHA )
complete ali \
'c/-/(alias nolist list nonormalize normalize nouser user help)/' \
'n,-alias,f,'
complete anno \
'c/-/(component noinplace inplace nodate date text help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete burst \
'c/-/(noinplace inplace noquiet quiet noverbose verbose help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete comp \
'c/-/(draftfolder draftmessage nodraftfolder editor noedit file form nouse use whatnowproc nowhatnowproc help)/' \
'c,+,$folders,' \
'n,-whatnowproc,c,' \
'n,-file,f,' \
'n,-form,f,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete dist \
'c/-/(noannotate annotate draftfolder draftmessage nodraftfolder editor noedit form noinplace inplace whatnowproc nowhatnowproc help)/' \
'c,+,$folders,' \
'n,-whatnowproc,c,' \
'n,-form,f,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete folder \
'c/-/(all nofast fast noheader header nopack pack noverbose verbose norecurse recurse nototal total noprint print nolist list push pop help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete folders \
'c/-/(all nofast fast noheader header nopack pack noverbose verbose norecurse recurse nototal total noprint print nolist list push pop help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete forw \
'c/-/(noannotate annotate draftfolder draftmessage nodraftfolder editor noedit filter form noformat format noinplace inplace digest issue volume whatnowproc nowhatnowproc help)/' \
'c,+,$folders,' \
'n,-whatnowproc,c,' \
'n,-filter,f,' \
'n,-form,f,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete inc \
'c/-/(audit file noaudit nochangecur changecur file form format nosilent silent notruncate truncate width help)/' \
'c,+,$folders,' \
'n,-audit,f,' \
'n,-form,f,'
complete mark \
'c/-/(add delete list sequence nopublic public nozero zero help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete mhmail \
'c/-/(body cc from subject help)/' \
'n,-cc,$mha,' \
'n,-from,$mha,' \
'n/*/$mha/'
complete mhpath \
'c/-/(help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete msgchk \
'c/-/(nodate date nonotify notify help)/'
complete msh \
'c/-/(prompt noscan scan notopcur topcur help)/'
complete next \
'c/-/(draft form moreproc nomoreproc length width showproc noshowproc header noheader help)/' \
'c,+,$folders,' \
'n,-moreproc,c,' \
'n,-showproc,c,' \
'n,-form,f,'
complete packf \
'c/-/(file help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete pick \
'c/-/(and or not lbrace rbrace cc date from search subject to othercomponent after before datefield sequence nopublic public nozero zero nolist list help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete prev \
'c/-/(draft form moreproc nomoreproc length width showproc noshowproc header noheader help)/' \
'c,+,$folders,' \
'n,-moreproc,c,' \
'n,-showproc,c,' \
'n,-form,f,'
complete prompter \
'c/-/(erase kill noprepend prepend norapid rapid nodoteof doteof help)/'
complete refile \
'c/-/(draft nolink link nopreserve preserve src file help)/' \
'c,+,$folders,' \
'n,-file,f,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete rmf \
'c/-/(nointeractive interactive help)/' \
'c,+,$folders,'
complete rmm \
'c/-/(help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete scan \
'c/-/(noclear clear form format noheader header width noreverse reverse file help)/' \
'c,+,$folders,' \
'n,-form,f,' \
'n,-file,f,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete send \
'c/-/(alias draft draftfolder draftmessage nodraftfolder filter nofilter noformat format noforward forward nomsgid msgid nopush push noverbose verbose nowatch watch width help)/' \
'n,-alias,f,' \
'n,-filter,f,'
complete show \
'c/-/(draft form moreproc nomoreproc length width showproc noshowproc header noheader help)/' \
'c,+,$folders,' \
'n,-moreproc,c,' \
'n,-showproc,c,' \
'n,-form,f,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete sortm \
'c/-/(datefield textfield notextfield limit nolimit noverbose verbose help)/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete vmh \
'c/-/(prompt vmhproc novmhproc help)/' \
'n,-vmhproc,c,'
complete whatnow \
'c/-/(draftfolder draftmessage nodraftfolder editor noedit prompt help)/'
complete whom \
'c/-/(alias nocheck check draft draftfolder draftmessage nodraftfolder help)/' \
'n,-alias,f,'
complete plum \
'c/-/()/' \
'c,+,$folders,' \
'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,'
complete mail \
'c/-/()/' \
'n/*/$mha/'
endif
#from Dan Nicolaescu <dann@ics.uci.edu>
if ( $? MODULESHOME ) then
2000-06-10 20:14:21 +00:00
alias Compl_module 'find ${MODULEPATH:as/:/ /} -name .version -o -name .modulea\* -prune -o -print | sed `echo "-e s@${MODULEPATH:as%:%/\*@@g -e s@%}/\*@@g"`'
2000-04-15 04:41:27 +00:00
complete module 'p%1%(add load unload switch display avail use unuse update purge list clear help initadd initrm initswitch initlist initclear)%' \
2000-06-10 20:14:21 +00:00
'n%{unl*,sw*,inits*}%`echo "$LOADEDMODULES:as/:/ /"`%' \
'n%{lo*,di*,he*,inita*,initr*}%`eval Compl_module`%' \
'N%{sw*,initsw*}%`eval Compl_module`%' 'C%-%(-append)%' 'n%{use,unu*,av*}%d%' 'n%-append%d%' \
'C%[^-]*%`eval Compl_module`%'
2000-04-15 04:41:27 +00:00
endif
# these from Tom Warzeka <waz@quahog.npt.nuwc.navy.mil>
# you may need to set the following variables for your host
set _elispdir = /usr/local/share/emacs/20.2/lisp # GNU Emacs lisp directory
set _maildir = /var/spool/mail # Post Office: /var/spool/mail or /usr/mail
set _ypdir = /var/yp # directory where NIS (YP) maps are kept
set _domain = "`domainname`"
# this one works but is slow and doesn't descend into subdirectories
# complete cd C@[./\$~]*@d@ \
# p@1@'`\ls -1F . $cdpath | grep /\$ | sort -u`'@ n@*@n@
if ( -r /etc/shells ) then
complete setenv p@1@e@ n@DISPLAY@\$ hosts@: n@SHELL@'`cat /etc/shells`' @
else
complete setenv p@1@e@ n@DISPLAY@\$ hosts@:
endif
complete unsetenv n/*/e/
if ( -r $HOME /.mailrc) then
complete mail c/-/"(e i f n s u v)" / c/*@/\$ hosts/ \
c@+@F:$HOME /Mail@ C@[ ./\$ ~] @f@ n/-s/x:'<subject>' / \
n@-u@T:$_maildir @ n/-f/f/ \
n@*@'`sed -n s/alias//p $HOME/.mailrc | tr -s " " " " | cut -f 2`' @
else
complete mail c/-/"(e i f n s u v)" / c/*@/\$ hosts/ \
c@+@F:$HOME /Mail@ C@[ ./\$ ~] @f@ n/-s/x:'<subject>' / \
n@-u@T:$_maildir @ n/-f/f/ n/*/u/
endif
complete man n@1@'`\ls -1 /usr/man/man1 | sed s%\\.1.\*\$%%`' @ \
n@2@'`\ls -1 /usr/man/man2 | sed s%\\.2.\*\$%%`' @ \
n@3@'`\ls -1 /usr/man/man3 | sed s%\\.3.\*\$%%`' @ \
n@4@'`\ls -1 /usr/man/man4 | sed s%\\.4.\*\$%%`' @ \
n@5@'`\ls -1 /usr/man/man5 | sed s%\\.5.\*\$%%`' @ \
n@6@'`\ls -1 /usr/man/man6 | sed s%\\.6.\*\$%%`' @ \
n@7@'`\ls -1 /usr/man/man7 | sed s%\\.7.\*\$%%`' @ \
n@8@'`\ls -1 /usr/man/man8 | sed s%\\.8.\*\$%%`' @ \
n@9@'`[ -r /usr/man/man9 ] && \ls -1 /usr/man/man9 | sed s%\\.9.\*\$%%`' @ \
n@0@'`[ -r /usr/man/man0 ] && \ls -1 /usr/man/man0 | sed s%\\.0.\*\$%%`' @ \
n@new@'`[ -r /usr/man/mann ] && \ls -1 /usr/man/mann | sed s%\\.n.\*\$%%`' @ \
n@old@'`[ -r /usr/man/mano ] && \ls -1 /usr/man/mano | sed s%\\.o.\*\$%%`' @ \
n@local@'`[ -r /usr/man/manl ] && \ls -1 /usr/man/manl | sed s%\\.l.\*\$%%`' @ \
n@public@'`[ -r /usr/man/manp ]&& \ls -1 /usr/man/manp | sed s%\\.p.\*\$%%`' @ \
c/-/"(- f k M P s t)" / n/-f/c/ n/-k/x:'<keyword>' / n/-[ MP] /d/ \
N@-[ MP] @'`\ls -1 $:-1/man? | sed s%\\..\*\$%%`' @ n/*/c/
complete ps c/-t/x:'<tty>' / c/-/"(a c C e g k l S t u v w x)" / \
n/-k/x:'<kernel>' / N/-k/x:'<core_file>' / n/*/x:'<PID>' /
complete compress c/-/"(c f v b)" / n/-b/x:'<max_bits>' / n/*/f:^*.Z/
complete uncompress c/-/"(c f v)" / n/*/f:*.Z/
complete xhost c/[ +-] /\$ hosts/ n/*/\$ hosts/
# these conform to the latest GNU versions available at press time ...
# updates by John Gotts <jgotts@engin.umich.edu>
complete emacs c/-/" ( batch d f funcall i insert kill l load \
no-init-file nw q t u user) " / c/+/x:'<line_number>' / \
n/-d/x:'<display>' / n/-f/x:'<lisp_function>' / n/-i/f/ \
n@-l@F:$_elispdir @ n/-t/x:'<terminal>' / \
n/-u/u/ n/*/f:^*[ \# ~] /
complete gzcat c/--/"(force help license quiet version)" / \
c/-/"(f h L q V -)" / n/*/f:*.{ gz,Z,z,zip} /
complete gzip c/--/" ( stdout to-stdout decompress uncompress \
force help list license no-name quiet recurse \
suffix test verbose version fast best) " / \
c/-/"(c d f h l L n q r S t v V 1 2 3 4 5 6 7 8 9 -)" /\
n/{ -S,--suffix} /x:'<file_name_suffix>' / \
n/{ -d,--{ de,un} compress} /f:*.{ gz,Z,z,zip,taz,tgz} / \
N/{ -d,--{ de,un} compress} /f:*.{ gz,Z,z,zip,taz,tgz} / \
n/*/f:^*.{ gz,Z,z,zip,taz,tgz} /
complete { gunzip,ungzip} c/--/" ( stdout to-stdout force help list license \
no-name quiet recurse suffix test verbose version) " / \
c/-/"(c f h l L n q r S t v V -)" / \
n/{ -S,--suffix} /x:'<file_name_suffix>' / \
n/*/f:*.{ gz,Z,z,zip,taz,tgz} /
complete zgrep c/-*A/x:'<#_lines_after>' / c/-*B/x:'<#_lines_before>' /\
c/-/"(A b B c C e f h i l n s v V w x)" / \
p/1/x:'<limited_regular_expression>' / N/-*e/f/ \
n/-*e/x:'<limited_regular_expression>' / n/-*f/f/ n/*/f/
complete zegrep c/-*A/x:'<#_lines_after>' / c/-*B/x:'<#_lines_before>' /\
c/-/"(A b B c C e f h i l n s v V w x)" / \
p/1/x:'<full_regular_expression>' / N/-*e/f/ \
n/-*e/x:'<full_regular_expression>' / n/-*f/f/ n/*/f/
complete zfgrep c/-*A/x:'<#_lines_after>' / c/-*B/x:'<#_lines_before>' /\
c/-/"(A b B c C e f h i l n s v V w x)" / \
p/1/x:'<fixed_string>' / N/-*e/f/ \
n/-*e/x:'<fixed_string>' / n/-*f/f/ n/*/f/
complete znew c/-/"(f t v 9 P K)" / n/*/f:*.Z/
complete zmore n/*/f:*.{ gz,Z,z,zip} /
complete zfile n/*/f:*.{ gz,Z,z,zip,taz,tgz} /
complete ztouch n/*/f:*.{ gz,Z,z,zip,taz,tgz} /
complete zforce n/*/f:^*.{ gz,tgz} /
complete grep c/-*A/x:'<#_lines_after>' / c/-*B/x:'<#_lines_before>' /\
c/--/" ( extended-regexp fixed-regexp basic-regexp \
regexp file ignore-case word-regexp line-regexp \
no-messages revert-match version help byte-offset \
line-number with-filename no-filename quiet silent \
text directories recursive files-without-match \
files-with-matches count before-context after-context \
context binary unix-byte-offsets) " / \
c/-/" ( A a B b C c d E e F f G H h i L l n q r s U u V \
v w x) " / \
p/1/x:'<limited_regular_expression>' / N/-*e/f/ \
n/-*e/x:'<limited_regular_expression>' / n/-*f/f/ n/*/f/
complete egrep c/-*A/x:'<#_lines_after>' / c/-*B/x:'<#_lines_before>' /\
c/--/" ( extended-regexp fixed-regexp basic-regexp \
regexp file ignore-case word-regexp line-regexp \
no-messages revert-match version help byte-offset \
line-number with-filename no-filename quiet silent \
text directories recursive files-without-match \
files-with-matches count before-context after-context \
context binary unix-byte-offsets) " / \
c/-/" ( A a B b C c d E e F f G H h i L l n q r s U u V \
v w x) " / \
p/1/x:'<full_regular_expression>' / N/-*e/f/ \
n/-*e/x:'<full_regular_expression>' / n/-*f/f/ n/*/f/
complete fgrep c/-*A/x:'<#_lines_after>' / c/-*B/x:'<#_lines_before>' /\
c/--/" ( extended-regexp fixed-regexp basic-regexp \
regexp file ignore-case word-regexp line-regexp \
no-messages revert-match version help byte-offset \
line-number with-filename no-filename quiet silent \
text directories recursive files-without-match \
files-with-matches count before-context after-context \
context binary unix-byte-offsets) " / \
c/-/" ( A a B b C c d E e F f G H h i L l n q r s U u V \
v w x) " / \
p/1/x:'<fixed_string>' / N/-*e/f/ \
n/-*e/x:'<fixed_string>' / n/-*f/f/ n/*/f/
complete users c/--/"(help version)" / p/1/x:'<accounting_file>' /
complete who c/--/" ( heading idle count mesg message writable help \
version) "/ c/-/" ( H i m q s T w u -) " / \
p/1/x:'<accounting_file>' / n/am/"(i)" / n/are/"(you)" /
complete chown c/--/" ( changes dereference no-dereference silent \
quiet reference recursive verbose help version) " / \
c/-/"(c f h R v -)" / C@[ ./\$ ~] @f@ c/*[ .:] /g/ \
n/-/u/. p/1/u/. n/*/f/
complete chgrp c/--/" ( changes no-dereference silent quiet reference \
recursive verbose help version) " / \
c/-/"(c f h R v -)" / n/-/g/ p/1/g/ n/*/f/
complete chmod c/--/" ( changes silent quiet verbose reference \
recursive help version) "/ c/-/" ( c f R v) " /
complete df c/--/" ( all block-size human-readable si inodes \
kilobytes local megabytes no-sync portability sync \
type print-type exclude-type help version) " / \
c/-/"(a H h i k l m P T t v x)" /
complete du c/--/" ( all block-size bytes total dereference-args \
human-readable si kilobytes count-links dereference \
megabytes separate-dirs summarize one-file-system \
exclude-from exclude max-depth help version" / \
c/-/"(a b c D H h k L l m S s X x)" /
complete cat c/--/" ( number-nonblank number squeeze-blank show-all \
show-nonprinting show-ends show-tabs help version) " / \
c/-/"(A b E e n s T t u v -)" / n/*/f/
complete mv c/--/" ( backup force interactive update verbose suffix \
version-control help version) " / \
c/-/"(b f i S u V v -)" / \
n/{ -S,--suffix} /x:'<suffix>' / \
n/{ -V,--version-control} /" ( t numbered nil existing \
never simple) " / n/-/f/ N/-/d/ p/1/f/ p/2/d/ n/*/f/
complete cp c/--/" ( archive backup no-dereference force \
interactive link preserve parents sparse recursive \
symbolic-link suffix update verbose version-control \
one-file-system help version) " / \
c/-/"(a b d f i l P p R r S s u V v x -)" / \
n/-*r/d/ n/{ -S,--suffix} /x:'<suffix>' / \
n/{ -V,--version-control} /" ( t numbered nil existing \
never simple) " / n/-/f/ N/-/d/ p/1/f/ p/2/d/ n/*/f/
complete ln c/--/" ( backup directory force no-dereference \
interactive symbolic suffix verbose version-control \
help version) " / \
c/-/"(b d F f i n S s V v -)" / \
n/{ -S,--suffix} /x:'<suffix>' / \
n/{ -V,--version-control} /" ( t numbered nil existing \
never simple) " / n/-/f/ N/-/x:'<link_name>' / \
p/1/f/ p/2/x:'<link_name>' /
complete touch c/--/"(date reference time help version)" / \
c/-/"(a c d f m r t -)" / \
n/{ -d,--date} /x:'<date_string>' / \
c/--time/"(access atime mtime modify use)" / \
n/{ -r,--file} /f/ n/-t/x:'<time_stamp>' / n/*/f/
complete mkdir c/--/"(mode parents verbose help version)" / \
c/-/"(p m -)" / \
n/{ -m,--mode} /x:'<mode>' / n/*/d/
complete rmdir c/--/" ( ignore-fail-on-non-empty parents verbose help \
version) "/ c/-/" ( p -) " / n/*/d/
complete tar c/-[ Acru] */" ( b B C f F g G h i l L M N o P \
R S T v V w W X z Z) " / \
c/-[ dtx] */" ( B C f F g G i k K m M O p P \
R s S T v w x X z Z) " / \
p/1/" ( A c d r t u x -A -c -d -r -t -u -x \
--catenate --concatenate --create --diff --compare \
--delete --append --list --update --extract --get \
--help --version) " / \
c/--/" ( catenate concatenate create diff compare \
delete append list update extract get atime-preserve \
block-size read-full-blocks directory checkpoint file \
force-local info-script new-volume-script incremental \
listed-incremental dereference ignore-zeros \
ignore-failed-read keep-old-files starting-file \
one-file-system tape-length modification-time \
multi-volume after-date newer old-archive portability \
to-stdout same-permissions preserve-permissions \
absolute-paths preserve record-number remove-files \
same-order preserve-order same-owner sparse \
files-from null totals verbose label version \
interactive confirmation verify exclude exclude-from \
compress uncompress gzip ungzip use-compress-program \
block-compress help version) " / \
c/-/" ( b B C f F g G h i k K l L m M N o O p P R s S \
T v V w W X z Z 0 1 2 3 4 5 6 7 -) " / \
n/-c*f/x:'<new_tar_file, device_file, or "-">' / \
n/{ -[ Adrtux] *f,--file} /f:*.tar/ \
N/{ -x*f,--file} /'`tar -tf $:-1`' / \
n/--use-compress-program/c/ \
n/{ -b,--block-size} /x:'<block_size>' / \
n/{ -V,--label} /x:'<volume_label>' / \
n/{ -N,--{ after-date,newer}} /x:'<date>' / \
n/{ -L,--tape-length} /x:'<tape_length_in_kB>' / \
n/{ -C,--directory} /d/ \
N/{ -C,--directory} /'`\ls $:-1`' / \
n/-[ 0-7] /"(l m h)" /
# SVR4 filesystems
#complete mount c/-/"(a F m o O p r v V)"/ n/-p/n/ n/-v/n/ \
# n/-o/x:'<FSType_options>'/ \
# n@-F@'`\ls -1 /usr/lib/fs`'@ \
# n@*@'`grep -v "^#" /etc/vfstab | tr -s " " " " | cut -f 3`'@
#complete umount c/-/"(a o V)"/ n/-o/x:'<FSType_options>'/ \
# n/*/'`mount | cut -d " " -f 1`'/
#complete mountall c/-/"(F l r)"/ n@-F@'`\ls -1 /usr/lib/fs`'@
#complete umountall c/-/"(F h k l r s)"/ n@-F@'`\ls -1 /usr/lib/fs`'@ \
# n/-h/'`df -k | cut -s -d ":" -f 1 | sort -u`'/
# BSD 4.3 filesystems
complete mount c/-/"(a r t v)" / n/-t/"(4.2 nfs)" / \
n@*@'`grep -v "^#" /etc/fstab | tr -s " " " " | cut -f 2`' @
complete umount c/-/"(a h t v)" / n/-t/"(4.2 nfs)" / \
n/-h/'`df | cut -s -d ":" -f 1 | sort -u`' / \
n/*/'`mount | cut -d " " -f 3`' /
# BSD 4.2 filesystems
#complete mount c/-/"(a r t v)"/ n/-t/"(ufs nfs)"/ \
# n@*@'`cut -d ":" -f 2 /etc/fstab`'@
#complete umount c/-/"(a h t v)"/ n/-t/"(ufs nfs)"/ \
# n/-h/'`df | cut -s -d ":" -f 1 | sort -u`'/ \
# n/*/'`mount | cut -d " " -f 3`'/
# these deal with NIS (formerly YP); if it's not running you don't need 'em
complete domainname p@1@D:$_ypdir @" " n@*@n@
complete ypcat c@-@"(d k t x)" @ n@-x@n@ n@-d@D:$_ypdir @" " \
N@-d@\` \\ ls\ -1\ $_ypdir /\$ :-1\ \| \ sed\ -n\ s%\\ \\ .pag\\ \$ %%p\` @ \
n@*@\` \\ ls\ -1\ $_ypdir /$_domain \ \| \ sed\ -n\ s%\\ \\ .pag\\ \$ %%p\` @
complete ypmatch c@-@"(d k t x)" @ n@-x@n@ n@-d@D:$_ypdir @" " \
N@-d@x:'<key ...>' @ n@-@x:'<key ...>' @ p@1@x:'<key ...>' @ \
n@*@\` \\ ls\ -1\ $_ypdir /$_domain \ \| \ sed\ -n\ s%\\ \\ .pag\\ \$ %%p\` @
complete ypwhich c@-@"(d m t x V1 V2)" @ n@-x@n@ n@-d@D:$_ypdir @" " \
n@-m@\` \\ ls\ -1\ $_ypdir /$_domain \ \| \ sed\ -n\ s%\\ \\ .pag\\ \$ %%p\` @ \
N@-m@n@ n@*@\$ hosts@
# there's no need to clutter the user's shell with these
unset _elispdir _maildir _ypdir _domain
complete make \
'n/-f/f/' \
'c/*=/f/' \
'n@*@`cat -s GNUmakefile Makefile makefile |& sed -n -e "/No such file/d" -e "/^[^ #].*:/s/:.*//p"`@'
if ( -f /etc/printcap ) then
set printers = ( ` sed -n -e "/^[^ #].*:/s/:.*//p" /etc/printcap` )
complete lpr 'c/-P/$printers/'
complete lpq 'c/-P/$printers/'
complete lprm 'c/-P/$printers/'
complete lpquota 'p/1/(-Qprlogger)/' 'c/-P/$printers/'
complete dvips 'c/-P/$printers/' 'n/-o/f:*.{ps,PS}/' 'n/*/f:*.dvi/'
endif
unset noglob
unset complete
endif
end :
onintr