1# 2# $Id: complete.tcsh,v 1.33 2000/06/10 18:54:34 kim Exp $ 3# example file using the new completion code 4# 5 6onintr - 7if (! $?prompt) goto end 8 9if ($?tcsh) then 10 if ($tcsh != 1) then 11 set rev=$tcsh:r 12 set rel=$rev:e 13 set pat=$tcsh:e 14 set rev=$rev:r 15 endif 16 if ($rev > 5 && $rel > 1) then 17 set complete=1 18 endif 19 unset rev rel pat 20endif 21 22if ($?complete) then 23 set noglob 24 set hosts 25 foreach f ($HOME/.hosts /usr/local/etc/csh.hosts $HOME/.rhosts /etc/hosts.equiv) 26 if ( -r $f ) then 27 set hosts = ($hosts `grep -v "+" $f | tr -s " " " " | cut -f 1`) 28 endif 29 end 30 if ( -r $HOME/.netrc ) then 31 set f=`awk '/machine/ { print $2 }' < $HOME/.netrc` >& /dev/null 32 set hosts=($hosts $f) 33 endif 34 unset f 35 if ( ! $?hosts ) then 36 set hosts=(hyperion.ee.cornell.edu phaeton.ee.cornell.edu \ 37 guillemin.ee.cornell.edu vangogh.cs.berkeley.edu \ 38 ftp.uu.net prep.ai.mit.edu export.lcs.mit.edu \ 39 labrea.stanford.edu sumex-aim.stanford.edu \ 40 tut.cis.ohio-state.edu) 41 endif 42 43 complete ywho n/*/\$hosts/ # argument from list in $hosts 44 complete rsh p/1/\$hosts/ c/-/"(l n)"/ n/-l/u/ N/-l/c/ n/-/c/ p/2/c/ p/*/f/ 45 complete ssh p/1/\$hosts/ c/-/"(l n)"/ n/-l/u/ N/-l/c/ n/-/c/ p/2/c/ p/*/f/ 46 complete xrsh p/1/\$hosts/ c/-/"(l 8 e)"/ n/-l/u/ N/-l/c/ n/-/c/ p/2/c/ p/*/f/ 47 complete rlogin p/1/\$hosts/ c/-/"(l 8 e)"/ n/-l/u/ 48 complete telnet p/1/\$hosts/ p/2/x:'<port>'/ n/*/n/ 49 50 complete cd p/1/d/ # Directories only 51 complete chdir p/1/d/ 52 complete pushd p/1/d/ 53 complete popd p/1/d/ 54 complete pu p/1/d/ 55 complete po p/1/d/ 56 complete complete p/1/X/ # Completions only 57 complete uncomplete n/*/X/ 58 complete exec p/1/c/ # Commands only 59 complete trace p/1/c/ 60 complete strace p/1/c/ 61 complete which n/*/c/ 62 complete where n/*/c/ 63 complete skill p/1/c/ 64 complete dde p/1/c/ 65 complete adb c/-I/d/ n/-/c/ N/-/"(core)"/ p/1/c/ p/2/"(core)"/ 66 complete sdb p/1/c/ 67 complete dbx c/-I/d/ n/-/c/ N/-/"(core)"/ p/1/c/ p/2/"(core)"/ 68 complete xdb p/1/c/ 69 complete gdb n/-d/d/ n/*/c/ 70 complete ups p/1/c/ 71 complete set 'c/*=/f/' 'p/1/s/=' 'n/=/f/' 72 complete unset n/*/s/ 73 complete alias p/1/a/ # only aliases are valid 74 complete unalias n/*/a/ 75 complete xdvi n/*/f:*.dvi/ # Only files that match *.dvi 76 complete dvips n/*/f:*.dvi/ 77 complete tex n/*/f:*.tex/ # Only files that match *.tex 78 complete latex n/*/f:*.{tex,ltx}/ 79 complete su c/--/"(login fast preserve-environment command shell \ 80 help version)"/ c/-/"(f l m p c s -)"/ \ 81 n/{-c,--command}/c/ \ 82 n@{-s,--shell}@'`cat /etc/shells`'@ n/*/u/ 83 complete cc c/-[IL]/d/ \ 84 c@-l@'`\ls -1 /usr/lib/lib*.a | sed s%^.\*/lib%%\;s%\\.a\$%%`'@ \ 85 c/-/"(o l c g L I D U)"/ n/*/f:*.[coasi]/ 86 complete acc c/-[IL]/d/ \ 87 c@-l@'`\ls -1 /usr/lang/SC1.0/lib*.a | sed s%^.\*/lib%%\;s%\\.a\$%%`'@ \ 88 c/-/"(o l c g L I D U)"/ n/*/f:*.[coasi]/ 89 complete gcc c/-[IL]/d/ \ 90 c/-f/"(caller-saves cse-follow-jumps delayed-branch \ 91 elide-constructors expensive-optimizations \ 92 float-store force-addr force-mem inline \ 93 inline-functions keep-inline-functions \ 94 memoize-lookups no-default-inline \ 95 no-defer-pop no-function-cse omit-frame-pointer \ 96 rerun-cse-after-loop schedule-insns \ 97 schedule-insns2 strength-reduce \ 98 thread-jumps unroll-all-loops \ 99 unroll-loops syntax-only all-virtual \ 100 cond-mismatch dollars-in-identifiers \ 101 enum-int-equiv no-asm no-builtin \ 102 no-strict-prototype signed-bitfields \ 103 signed-char this-is-variable unsigned-bitfields \ 104 unsigned-char writable-strings call-saved-reg \ 105 call-used-reg fixed-reg no-common \ 106 no-gnu-binutils nonnull-objects \ 107 pcc-struct-return pic PIC shared-data \ 108 short-enums short-double volatile)"/ \ 109 c/-W/"(all aggregate-return cast-align cast-qual \ 110 comment conversion enum-clash error format \ 111 id-clash-len implicit missing-prototypes \ 112 no-parentheses pointer-arith return-type shadow \ 113 strict-prototypes switch uninitialized unused \ 114 write-strings)"/ \ 115 c/-m/"(68000 68020 68881 bitfield fpa nobitfield rtd \ 116 short c68000 c68020 soft-float g gnu unix fpu \ 117 no-epilogue)"/ \ 118 c/-d/"(D M N)"/ \ 119 c/-/"(f W vspec v vpath ansi traditional \ 120 traditional-cpp trigraphs pedantic x o l c g L \ 121 I D U O O2 C E H B b V M MD MM i dynamic \ 122 nodtdlib static nostdinc undef)"/ \ 123 c/-l/f:*.a/ \ 124 n/*/f:*.{c,C,cc,o,a,s,i}/ 125 complete g++ n/*/f:*.{C,cc,o,s,i}/ 126 complete CC n/*/f:*.{C,cc,o,s,i}/ 127 complete rm c/--/"(directory force interactive verbose \ 128 recursive help version)"/ c/-/"(d f i v r R -)"/ \ 129 n/*/f:^*.{c,cc,C,h,in}/ # Protect precious files 130 complete vi n/*/f:^*.[oa]/ 131 complete bindkey N/-a/b/ N/-c/c/ n/-[ascr]/'x:<key-sequence>'/ \ 132 n/-[svedlr]/n/ c/-[vedl]/n/ c/-/"(a s k c v e d l r)"/\ 133 n/-k/"(left right up down)"/ p/2-/b/ \ 134 p/1/'x:<key-sequence or option>'/ 135 136 complete find n/-fstype/"(nfs 4.2)"/ n/-name/f/ \ 137 n/-type/"(c b d f p l s)"/ n/-user/u/ n/-group/g/ \ 138 n/-exec/c/ n/-ok/c/ n/-cpio/f/ n/-ncpio/f/ n/-newer/f/ \ 139 c/-/"(fstype name perm prune type user nouser \ 140 group nogroup size inum atime mtime ctime exec \ 141 ok print ls cpio ncpio newer xdev depth \ 142 daystart follow maxdepth mindepth noleaf version \ 143 anewer cnewer amin cmin mmin true false uid gid \ 144 ilname iname ipath iregex links lname empty path \ 145 regex used xtype fprint fprint0 fprintf \ 146 print0 printf not a and o or)"/ \ 147 n/*/d/ 148 149 complete -%* c/%/j/ # fill in the jobs builtin 150 complete {fg,bg,stop} c/%/j/ p/1/"(%)"// 151 152 complete limit c/-/"(h)"/ n/*/l/ 153 complete unlimit c/-/"(h)"/ n/*/l/ 154 155 complete -co* p/0/"(compress)"/ # make compress completion 156 # not ambiguous 157 complete zcat n/*/f:*.Z/ 158 complete nm n/*/f:^*.{h,C,c,cc}/ 159 160 complete finger c/*@/\$hosts/ n/*/u/@ 161 complete ping p/1/\$hosts/ 162 complete traceroute p/1/\$hosts/ 163 164 complete {talk,ntalk,phone} p/1/'`users | tr " " "\012" | uniq`'/ \ 165 n/*/\`who\ \|\ grep\ \$:1\ \|\ awk\ \'\{\ print\ \$2\ \}\'\`/ 166 167 complete ftp c/-/"(d i g n v)"/ n/-/\$hosts/ p/1/\$hosts/ n/*/n/ 168 169 # this one is simple... 170 #complete rcp c/*:/f/ C@[./\$~]*@f@ n/*/\$hosts/: 171 # From Michael Schroeder <mlschroe@immd4.informatik.uni-erlangen.de> 172 # This one will rsh to the file to fetch the list of files! 173 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/:' 174 175 complete dd c/--/"(help version)"/ c/[io]f=/f/ \ 176 c/conv=*,/"(ascii ebcdic ibm block unblock \ 177 lcase notrunc ucase swab noerror sync)"/,\ 178 c/conv=/"(ascii ebcdic ibm block unblock \ 179 lcase notrunc ucase swab noerror sync)"/,\ 180 c/*=/x:'<number>'/ \ 181 n/*/"(if of conv ibs obs bs cbs files skip file seek count)"/= 182 183 complete nslookup p/1/x:'<host>'/ p/2/\$hosts/ 184 185 complete ar c/[dmpqrtx]/"(c l o u v a b i)"/ p/1/"(d m p q r t x)"// \ 186 p/2/f:*.a/ p/*/f:*.o/ 187 188 # these should be merged with the MH completion hacks below - jgotts 189 complete {sprev,snext} \ 190 c@+@F:$HOME/Mail/@ 191 192 # these and interrupt handling from Jaap Vermeulen <jaap@sequent.com> 193 complete {rexec,rxexec,rxterm,rmterm} \ 194 'p/1/$hosts/' 'c/-/(l L E)/' 'n/-l/u/' 'n/-L/f/' \ 195 'n/-E/e/' 'n/*/c/' 196 complete kill 'c/-/S/' 'c/%/j/' \ 197 'n/*/`ps -u $LOGNAME | awk '"'"'{print $1}'"'"'`/' 198 199 # these from Marc Horowitz <marc@cam.ov.com> 200 complete attach 'n/-mountpoint/d/' 'n/-m/d/' 'n/-type/(afs nfs rvd ufs)/' \ 201 'n/-t/(afs nfs rvd ufs)/' 'n/-user/u/' 'n/-U/u/' \ 202 'c/-/(verbose quiet force printpath lookup debug map \ 203 nomap remap zephyr nozephyr readonly write \ 204 mountpoint noexplicit explicit type mountoptions \ 205 nosetuid setuid override skipfsck lock user host)/' \ 206 'n/-e/f/' 'n/*/()/' 207 complete hesinfo 'p/1/u/' \ 208 'p/2/(passwd group uid grplist pcap pobox cluster \ 209 filsys sloc service)/' 210 211 # these from E. Jay Berkenbilt <ejb@ERA.COM> 212 # = isn't always followed by a filename or a path anymore - jgotts 213 complete ./configure 'c/--*=/f/' 'c/--{cache-file,prefix,exec-prefix,\ 214 bindir,sbindir,libexecdir,datadir,\ 215 sysconfdir,sharedstatedir,localstatedir,\ 216 libdir,includedir,oldincludedir,infodir,\ 217 mandir,srcdir}/(=)//' \ 218 'c/--/(cache-file verbose prefix exec-prefix bindir \ 219 sbindir libexecdir datadir sysconfdir \ 220 sharedstatedir localstatedir libdir \ 221 includedir oldincludedir infodir mandir \ 222 srcdir)//' 223 complete gs 'c/-sDEVICE=/(x11 cdjmono cdj550 epson eps9high epsonc \ 224 dfaxhigh dfaxlow laserjet ljet4 sparc pbm \ 225 pbmraw pgm pgmraw ppm ppmraw bit)/' \ 226 'c/-sOutputFile=/f/' 'c/-s/(DEVICE OutputFile)/=' \ 227 'c/-d/(NODISPLAY NOPLATFONTS NOPAUSE)/' 'n/*/f/' 228 complete perl 'n/-S/c/' 229 complete printenv 'n/*/e/' 230 complete sccs p/1/"(admin cdc check clean comb deledit delget \ 231 delta diffs edit enter fix get help info \ 232 print prs prt rmdel sccsdiff tell unedit \ 233 unget val what)"/ 234 complete setenv 'p/1/e/' 'c/*:/f/' 235 236 # these and method of setting hosts from Kimmo Suominen <kim@tac.nyc.ny.us> 237 if ( -f $HOME/.mh_profile && -x "`which folders`" ) then 238 239 if ( ! $?FOLDERS ) setenv FOLDERS "`folders -fast -recurse`" 240 if ( ! $?MHA ) setenv MHA "`ali | sed -e '/^ /d' -e 's/:.*//'`" 241 242 set folders = ( $FOLDERS ) 243 set mha = ( $MHA ) 244 245 complete ali \ 246 'c/-/(alias nolist list nonormalize normalize nouser user help)/' \ 247 'n,-alias,f,' 248 249 complete anno \ 250 'c/-/(component noinplace inplace nodate date text help)/' \ 251 'c,+,$folders,' \ 252 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 253 254 complete burst \ 255 'c/-/(noinplace inplace noquiet quiet noverbose verbose help)/' \ 256 'c,+,$folders,' \ 257 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 258 259 complete comp \ 260 'c/-/(draftfolder draftmessage nodraftfolder editor noedit file form nouse use whatnowproc nowhatnowproc help)/' \ 261 'c,+,$folders,' \ 262 'n,-whatnowproc,c,' \ 263 'n,-file,f,'\ 264 'n,-form,f,'\ 265 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 266 267 complete dist \ 268 'c/-/(noannotate annotate draftfolder draftmessage nodraftfolder editor noedit form noinplace inplace whatnowproc nowhatnowproc help)/' \ 269 'c,+,$folders,' \ 270 'n,-whatnowproc,c,' \ 271 'n,-form,f,'\ 272 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 273 274 complete folder \ 275 'c/-/(all nofast fast noheader header nopack pack noverbose verbose norecurse recurse nototal total noprint print nolist list push pop help)/' \ 276 'c,+,$folders,' \ 277 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 278 279 complete folders \ 280 'c/-/(all nofast fast noheader header nopack pack noverbose verbose norecurse recurse nototal total noprint print nolist list push pop help)/' \ 281 'c,+,$folders,' \ 282 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 283 284 complete forw \ 285 'c/-/(noannotate annotate draftfolder draftmessage nodraftfolder editor noedit filter form noformat format noinplace inplace digest issue volume whatnowproc nowhatnowproc help)/' \ 286 'c,+,$folders,' \ 287 'n,-whatnowproc,c,' \ 288 'n,-filter,f,'\ 289 'n,-form,f,'\ 290 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 291 292 complete inc \ 293 'c/-/(audit file noaudit nochangecur changecur file form format nosilent silent notruncate truncate width help)/' \ 294 'c,+,$folders,' \ 295 'n,-audit,f,'\ 296 'n,-form,f,' 297 298 complete mark \ 299 'c/-/(add delete list sequence nopublic public nozero zero help)/' \ 300 'c,+,$folders,' \ 301 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 302 303 complete mhmail \ 304 'c/-/(body cc from subject help)/' \ 305 'n,-cc,$mha,' \ 306 'n,-from,$mha,' \ 307 'n/*/$mha/' 308 309 complete mhpath \ 310 'c/-/(help)/' \ 311 'c,+,$folders,' \ 312 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 313 314 complete msgchk \ 315 'c/-/(nodate date nonotify notify help)/' 316 317 complete msh \ 318 'c/-/(prompt noscan scan notopcur topcur help)/' 319 320 complete next \ 321 'c/-/(draft form moreproc nomoreproc length width showproc noshowproc header noheader help)/' \ 322 'c,+,$folders,' \ 323 'n,-moreproc,c,' \ 324 'n,-showproc,c,' \ 325 'n,-form,f,' 326 327 complete packf \ 328 'c/-/(file help)/' \ 329 'c,+,$folders,' \ 330 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 331 332 complete pick \ 333 'c/-/(and or not lbrace rbrace cc date from search subject to othercomponent after before datefield sequence nopublic public nozero zero nolist list help)/' \ 334 'c,+,$folders,' \ 335 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 336 337 complete prev \ 338 'c/-/(draft form moreproc nomoreproc length width showproc noshowproc header noheader help)/' \ 339 'c,+,$folders,' \ 340 'n,-moreproc,c,' \ 341 'n,-showproc,c,' \ 342 'n,-form,f,' 343 344 complete prompter \ 345 'c/-/(erase kill noprepend prepend norapid rapid nodoteof doteof help)/' 346 347 complete refile \ 348 'c/-/(draft nolink link nopreserve preserve src file help)/' \ 349 'c,+,$folders,' \ 350 'n,-file,f,'\ 351 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 352 353 complete rmf \ 354 'c/-/(nointeractive interactive help)/' \ 355 'c,+,$folders,' 356 357 complete rmm \ 358 'c/-/(help)/' \ 359 'c,+,$folders,' \ 360 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 361 362 complete scan \ 363 'c/-/(noclear clear form format noheader header width noreverse reverse file help)/' \ 364 'c,+,$folders,' \ 365 'n,-form,f,'\ 366 'n,-file,f,'\ 367 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 368 369 complete send \ 370 'c/-/(alias draft draftfolder draftmessage nodraftfolder filter nofilter noformat format noforward forward nomsgid msgid nopush push noverbose verbose nowatch watch width help)/' \ 371 'n,-alias,f,'\ 372 'n,-filter,f,' 373 374 complete show \ 375 'c/-/(draft form moreproc nomoreproc length width showproc noshowproc header noheader help)/' \ 376 'c,+,$folders,' \ 377 'n,-moreproc,c,' \ 378 'n,-showproc,c,' \ 379 'n,-form,f,'\ 380 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 381 382 complete sortm \ 383 'c/-/(datefield textfield notextfield limit nolimit noverbose verbose help)/' \ 384 'c,+,$folders,' \ 385 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 386 387 complete vmh \ 388 'c/-/(prompt vmhproc novmhproc help)/' \ 389 'n,-vmhproc,c,' 390 391 complete whatnow \ 392 'c/-/(draftfolder draftmessage nodraftfolder editor noedit prompt help)/' 393 394 complete whom \ 395 'c/-/(alias nocheck check draft draftfolder draftmessage nodraftfolder help)/' \ 396 'n,-alias,f,' 397 398 complete plum \ 399 'c/-/()/' \ 400 'c,+,$folders,' \ 401 'n,*,`(mark | sed "s/:.*//";echo next cur prev first last)|tr " " "\12" | sort -u`,' 402 403 complete mail \ 404 'c/-/()/' \ 405 'n/*/$mha/' 406 407 endif 408 409 #from Dan Nicolaescu <dann@ics.uci.edu> 410 if ( $?MODULESHOME ) then 411 alias Compl_module 'find ${MODULEPATH:as/:/ /} -name .version -o -name .modulea\* -prune -o -print | sed `echo "-e s@${MODULEPATH:as%:%/\*@@g -e s@%}/\*@@g"`' 412 complete module 'p%1%(add load unload switch display avail use unuse update purge list clear help initadd initrm initswitch initlist initclear)%' \ 413 'n%{unl*,sw*,inits*}%`echo "$LOADEDMODULES:as/:/ /"`%' \ 414 'n%{lo*,di*,he*,inita*,initr*}%`eval Compl_module`%' \ 415 'N%{sw*,initsw*}%`eval Compl_module`%' 'C%-%(-append)%' 'n%{use,unu*,av*}%d%' 'n%-append%d%' \ 416 'C%[^-]*%`eval Compl_module`%' 417 endif 418 419 # these from Tom Warzeka <waz@quahog.npt.nuwc.navy.mil> 420 # you may need to set the following variables for your host 421 set _elispdir = /usr/local/share/emacs/20.2/lisp # GNU Emacs lisp directory 422 set _maildir = /var/spool/mail # Post Office: /var/spool/mail or /usr/mail 423 set _ypdir = /var/yp # directory where NIS (YP) maps are kept 424 set _domain = "`domainname`" 425 426 # this one works but is slow and doesn't descend into subdirectories 427 # complete cd C@[./\$~]*@d@ \ 428 # p@1@'`\ls -1F . $cdpath | grep /\$ | sort -u`'@ n@*@n@ 429 430 if ( -r /etc/shells ) then 431 complete setenv p@1@e@ n@DISPLAY@\$hosts@: n@SHELL@'`cat /etc/shells`'@ 432 else 433 complete setenv p@1@e@ n@DISPLAY@\$hosts@: 434 endif 435 complete unsetenv n/*/e/ 436 437 if (-r $HOME/.mailrc) then 438 complete mail c/-/"(e i f n s u v)"/ c/*@/\$hosts/ \ 439 c@+@F:$HOME/Mail@ C@[./\$~]@f@ n/-s/x:'<subject>'/ \ 440 n@-u@T:$_maildir@ n/-f/f/ \ 441 n@*@'`sed -n s/alias//p $HOME/.mailrc | tr -s " " " " | cut -f 2`'@ 442 else 443 complete mail c/-/"(e i f n s u v)"/ c/*@/\$hosts/ \ 444 c@+@F:$HOME/Mail@ C@[./\$~]@f@ n/-s/x:'<subject>'/ \ 445 n@-u@T:$_maildir@ n/-f/f/ n/*/u/ 446 endif 447 448 complete man n@1@'`\ls -1 /usr/man/man1 | sed s%\\.1.\*\$%%`'@ \ 449 n@2@'`\ls -1 /usr/man/man2 | sed s%\\.2.\*\$%%`'@ \ 450 n@3@'`\ls -1 /usr/man/man3 | sed s%\\.3.\*\$%%`'@ \ 451 n@4@'`\ls -1 /usr/man/man4 | sed s%\\.4.\*\$%%`'@ \ 452 n@5@'`\ls -1 /usr/man/man5 | sed s%\\.5.\*\$%%`'@ \ 453 n@6@'`\ls -1 /usr/man/man6 | sed s%\\.6.\*\$%%`'@ \ 454 n@7@'`\ls -1 /usr/man/man7 | sed s%\\.7.\*\$%%`'@ \ 455 n@8@'`\ls -1 /usr/man/man8 | sed s%\\.8.\*\$%%`'@ \ 456 n@9@'`[ -r /usr/man/man9 ] && \ls -1 /usr/man/man9 | sed s%\\.9.\*\$%%`'@ \ 457 n@0@'`[ -r /usr/man/man0 ] && \ls -1 /usr/man/man0 | sed s%\\.0.\*\$%%`'@ \ 458 n@new@'`[ -r /usr/man/mann ] && \ls -1 /usr/man/mann | sed s%\\.n.\*\$%%`'@ \ 459 n@old@'`[ -r /usr/man/mano ] && \ls -1 /usr/man/mano | sed s%\\.o.\*\$%%`'@ \ 460n@local@'`[ -r /usr/man/manl ] && \ls -1 /usr/man/manl | sed s%\\.l.\*\$%%`'@ \ 461n@public@'`[ -r /usr/man/manp ]&& \ls -1 /usr/man/manp | sed s%\\.p.\*\$%%`'@ \ 462 c/-/"(- f k M P s t)"/ n/-f/c/ n/-k/x:'<keyword>'/ n/-[MP]/d/ \ 463 N@-[MP]@'`\ls -1 $:-1/man? | sed s%\\..\*\$%%`'@ n/*/c/ 464 465 complete ps c/-t/x:'<tty>'/ c/-/"(a c C e g k l S t u v w x)"/ \ 466 n/-k/x:'<kernel>'/ N/-k/x:'<core_file>'/ n/*/x:'<PID>'/ 467 complete compress c/-/"(c f v b)"/ n/-b/x:'<max_bits>'/ n/*/f:^*.Z/ 468 complete uncompress c/-/"(c f v)"/ n/*/f:*.Z/ 469 470 complete xhost c/[+-]/\$hosts/ n/*/\$hosts/ 471 472 # these conform to the latest GNU versions available at press time ... 473 # updates by John Gotts <jgotts@engin.umich.edu> 474 475 complete emacs c/-/"(batch d f funcall i insert kill l load \ 476 no-init-file nw q t u user)"/ c/+/x:'<line_number>'/ \ 477 n/-d/x:'<display>'/ n/-f/x:'<lisp_function>'/ n/-i/f/ \ 478 n@-l@F:$_elispdir@ n/-t/x:'<terminal>'/ \ 479 n/-u/u/ n/*/f:^*[\#~]/ 480 481 complete gzcat c/--/"(force help license quiet version)"/ \ 482 c/-/"(f h L q V -)"/ n/*/f:*.{gz,Z,z,zip}/ 483 complete gzip c/--/"(stdout to-stdout decompress uncompress \ 484 force help list license no-name quiet recurse \ 485 suffix test verbose version fast best)"/ \ 486 c/-/"(c d f h l L n q r S t v V 1 2 3 4 5 6 7 8 9 -)"/\ 487 n/{-S,--suffix}/x:'<file_name_suffix>'/ \ 488 n/{-d,--{de,un}compress}/f:*.{gz,Z,z,zip,taz,tgz}/ \ 489 N/{-d,--{de,un}compress}/f:*.{gz,Z,z,zip,taz,tgz}/ \ 490 n/*/f:^*.{gz,Z,z,zip,taz,tgz}/ 491 complete {gunzip,ungzip} c/--/"(stdout to-stdout force help list license \ 492 no-name quiet recurse suffix test verbose version)"/ \ 493 c/-/"(c f h l L n q r S t v V -)"/ \ 494 n/{-S,--suffix}/x:'<file_name_suffix>'/ \ 495 n/*/f:*.{gz,Z,z,zip,taz,tgz}/ 496 complete zgrep c/-*A/x:'<#_lines_after>'/ c/-*B/x:'<#_lines_before>'/\ 497 c/-/"(A b B c C e f h i l n s v V w x)"/ \ 498 p/1/x:'<limited_regular_expression>'/ N/-*e/f/ \ 499 n/-*e/x:'<limited_regular_expression>'/ n/-*f/f/ n/*/f/ 500 complete zegrep c/-*A/x:'<#_lines_after>'/ c/-*B/x:'<#_lines_before>'/\ 501 c/-/"(A b B c C e f h i l n s v V w x)"/ \ 502 p/1/x:'<full_regular_expression>'/ N/-*e/f/ \ 503 n/-*e/x:'<full_regular_expression>'/ n/-*f/f/ n/*/f/ 504 complete zfgrep c/-*A/x:'<#_lines_after>'/ c/-*B/x:'<#_lines_before>'/\ 505 c/-/"(A b B c C e f h i l n s v V w x)"/ \ 506 p/1/x:'<fixed_string>'/ N/-*e/f/ \ 507 n/-*e/x:'<fixed_string>'/ n/-*f/f/ n/*/f/ 508 complete znew c/-/"(f t v 9 P K)"/ n/*/f:*.Z/ 509 complete zmore n/*/f:*.{gz,Z,z,zip}/ 510 complete zfile n/*/f:*.{gz,Z,z,zip,taz,tgz}/ 511 complete ztouch n/*/f:*.{gz,Z,z,zip,taz,tgz}/ 512 complete zforce n/*/f:^*.{gz,tgz}/ 513 514 complete grep c/-*A/x:'<#_lines_after>'/ c/-*B/x:'<#_lines_before>'/\ 515 c/--/"(extended-regexp fixed-regexp basic-regexp \ 516 regexp file ignore-case word-regexp line-regexp \ 517 no-messages revert-match version help byte-offset \ 518 line-number with-filename no-filename quiet silent \ 519 text directories recursive files-without-match \ 520 files-with-matches count before-context after-context \ 521 context binary unix-byte-offsets)"/ \ 522 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 \ 523 v w x)"/ \ 524 p/1/x:'<limited_regular_expression>'/ N/-*e/f/ \ 525 n/-*e/x:'<limited_regular_expression>'/ n/-*f/f/ n/*/f/ 526 complete egrep c/-*A/x:'<#_lines_after>'/ c/-*B/x:'<#_lines_before>'/\ 527 c/--/"(extended-regexp fixed-regexp basic-regexp \ 528 regexp file ignore-case word-regexp line-regexp \ 529 no-messages revert-match version help byte-offset \ 530 line-number with-filename no-filename quiet silent \ 531 text directories recursive files-without-match \ 532 files-with-matches count before-context after-context \ 533 context binary unix-byte-offsets)"/ \ 534 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 \ 535 v w x)"/ \ 536 p/1/x:'<full_regular_expression>'/ N/-*e/f/ \ 537 n/-*e/x:'<full_regular_expression>'/ n/-*f/f/ n/*/f/ 538 complete fgrep c/-*A/x:'<#_lines_after>'/ c/-*B/x:'<#_lines_before>'/\ 539 c/--/"(extended-regexp fixed-regexp basic-regexp \ 540 regexp file ignore-case word-regexp line-regexp \ 541 no-messages revert-match version help byte-offset \ 542 line-number with-filename no-filename quiet silent \ 543 text directories recursive files-without-match \ 544 files-with-matches count before-context after-context \ 545 context binary unix-byte-offsets)"/ \ 546 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 \ 547 v w x)"/ \ 548 p/1/x:'<fixed_string>'/ N/-*e/f/ \ 549 n/-*e/x:'<fixed_string>'/ n/-*f/f/ n/*/f/ 550 551 complete users c/--/"(help version)"/ p/1/x:'<accounting_file>'/ 552 complete who c/--/"(heading idle count mesg message writable help \ 553 version)"/ c/-/"(H i m q s T w u -)"/ \ 554 p/1/x:'<accounting_file>'/ n/am/"(i)"/ n/are/"(you)"/ 555 556 complete chown c/--/"(changes dereference no-dereference silent \ 557 quiet reference recursive verbose help version)"/ \ 558 c/-/"(c f h R v -)"/ C@[./\$~]@f@ c/*[.:]/g/ \ 559 n/-/u/. p/1/u/. n/*/f/ 560 complete chgrp c/--/"(changes no-dereference silent quiet reference \ 561 recursive verbose help version)"/ \ 562 c/-/"(c f h R v -)"/ n/-/g/ p/1/g/ n/*/f/ 563 complete chmod c/--/"(changes silent quiet verbose reference \ 564 recursive help version)"/ c/-/"(c f R v)"/ 565 complete df c/--/"(all block-size human-readable si inodes \ 566 kilobytes local megabytes no-sync portability sync \ 567 type print-type exclude-type help version)"/ \ 568 c/-/"(a H h i k l m P T t v x)"/ 569 complete du c/--/"(all block-size bytes total dereference-args \ 570 human-readable si kilobytes count-links dereference \ 571 megabytes separate-dirs summarize one-file-system \ 572 exclude-from exclude max-depth help version"/ \ 573 c/-/"(a b c D H h k L l m S s X x)"/ 574 575 complete cat c/--/"(number-nonblank number squeeze-blank show-all \ 576 show-nonprinting show-ends show-tabs help version)"/ \ 577 c/-/"(A b E e n s T t u v -)"/ n/*/f/ 578 complete mv c/--/"(backup force interactive update verbose suffix \ 579 version-control help version)"/ \ 580 c/-/"(b f i S u V v -)"/ \ 581 n/{-S,--suffix}/x:'<suffix>'/ \ 582 n/{-V,--version-control}/"(t numbered nil existing \ 583 never simple)"/ n/-/f/ N/-/d/ p/1/f/ p/2/d/ n/*/f/ 584 complete cp c/--/"(archive backup no-dereference force \ 585 interactive link preserve parents sparse recursive \ 586 symbolic-link suffix update verbose version-control \ 587 one-file-system help version)"/ \ 588 c/-/"(a b d f i l P p R r S s u V v x -)"/ \ 589 n/-*r/d/ n/{-S,--suffix}/x:'<suffix>'/ \ 590 n/{-V,--version-control}/"(t numbered nil existing \ 591 never simple)"/ n/-/f/ N/-/d/ p/1/f/ p/2/d/ n/*/f/ 592 complete ln c/--/"(backup directory force no-dereference \ 593 interactive symbolic suffix verbose version-control \ 594 help version)"/ \ 595 c/-/"(b d F f i n S s V v -)"/ \ 596 n/{-S,--suffix}/x:'<suffix>'/ \ 597 n/{-V,--version-control}/"(t numbered nil existing \ 598 never simple)"/ n/-/f/ N/-/x:'<link_name>'/ \ 599 p/1/f/ p/2/x:'<link_name>'/ 600 complete touch c/--/"(date reference time help version)"/ \ 601 c/-/"(a c d f m r t -)"/ \ 602 n/{-d,--date}/x:'<date_string>'/ \ 603 c/--time/"(access atime mtime modify use)"/ \ 604 n/{-r,--file}/f/ n/-t/x:'<time_stamp>'/ n/*/f/ 605 complete mkdir c/--/"(mode parents verbose help version)"/ \ 606 c/-/"(p m -)"/ \ 607 n/{-m,--mode}/x:'<mode>'/ n/*/d/ 608 complete rmdir c/--/"(ignore-fail-on-non-empty parents verbose help \ 609 version)"/ c/-/"(p -)"/ n/*/d/ 610 611 complete tar c/-[Acru]*/"(b B C f F g G h i l L M N o P \ 612 R S T v V w W X z Z)"/ \ 613 c/-[dtx]*/"( B C f F g G i k K m M O p P \ 614 R s S T v w x X z Z)"/ \ 615 p/1/"(A c d r t u x -A -c -d -r -t -u -x \ 616 --catenate --concatenate --create --diff --compare \ 617 --delete --append --list --update --extract --get \ 618 --help --version)"/ \ 619 c/--/"(catenate concatenate create diff compare \ 620 delete append list update extract get atime-preserve \ 621 block-size read-full-blocks directory checkpoint file \ 622 force-local info-script new-volume-script incremental \ 623 listed-incremental dereference ignore-zeros \ 624 ignore-failed-read keep-old-files starting-file \ 625 one-file-system tape-length modification-time \ 626 multi-volume after-date newer old-archive portability \ 627 to-stdout same-permissions preserve-permissions \ 628 absolute-paths preserve record-number remove-files \ 629 same-order preserve-order same-owner sparse \ 630 files-from null totals verbose label version \ 631 interactive confirmation verify exclude exclude-from \ 632 compress uncompress gzip ungzip use-compress-program \ 633 block-compress help version)"/ \ 634 c/-/"(b B C f F g G h i k K l L m M N o O p P R s S \ 635 T v V w W X z Z 0 1 2 3 4 5 6 7 -)"/ \ 636 n/-c*f/x:'<new_tar_file, device_file, or "-">'/ \ 637 n/{-[Adrtux]*f,--file}/f:*.tar/ \ 638 N/{-x*f,--file}/'`tar -tf $:-1`'/ \ 639 n/--use-compress-program/c/ \ 640 n/{-b,--block-size}/x:'<block_size>'/ \ 641 n/{-V,--label}/x:'<volume_label>'/ \ 642 n/{-N,--{after-date,newer}}/x:'<date>'/ \ 643 n/{-L,--tape-length}/x:'<tape_length_in_kB>'/ \ 644 n/{-C,--directory}/d/ \ 645 N/{-C,--directory}/'`\ls $:-1`'/ \ 646 n/-[0-7]/"(l m h)"/ 647 648 # SVR4 filesystems 649 #complete mount c/-/"(a F m o O p r v V)"/ n/-p/n/ n/-v/n/ \ 650 # n/-o/x:'<FSType_options>'/ \ 651 # n@-F@'`\ls -1 /usr/lib/fs`'@ \ 652 # n@*@'`grep -v "^#" /etc/vfstab | tr -s " " " " | cut -f 3`'@ 653 #complete umount c/-/"(a o V)"/ n/-o/x:'<FSType_options>'/ \ 654 # n/*/'`mount | cut -d " " -f 1`'/ 655 #complete mountall c/-/"(F l r)"/ n@-F@'`\ls -1 /usr/lib/fs`'@ 656 #complete umountall c/-/"(F h k l r s)"/ n@-F@'`\ls -1 /usr/lib/fs`'@ \ 657 # n/-h/'`df -k | cut -s -d ":" -f 1 | sort -u`'/ 658 # BSD 4.3 filesystems 659 complete mount c/-/"(a r t v)"/ n/-t/"(4.2 nfs)"/ \ 660 n@*@'`grep -v "^#" /etc/fstab | tr -s " " " " | cut -f 2`'@ 661 complete umount c/-/"(a h t v)"/ n/-t/"(4.2 nfs)"/ \ 662 n/-h/'`df | cut -s -d ":" -f 1 | sort -u`'/ \ 663 n/*/'`mount | cut -d " " -f 3`'/ 664 # BSD 4.2 filesystems 665 #complete mount c/-/"(a r t v)"/ n/-t/"(ufs nfs)"/ \ 666 # n@*@'`cut -d ":" -f 2 /etc/fstab`'@ 667 #complete umount c/-/"(a h t v)"/ n/-t/"(ufs nfs)"/ \ 668 # n/-h/'`df | cut -s -d ":" -f 1 | sort -u`'/ \ 669 # n/*/'`mount | cut -d " " -f 3`'/ 670 671 # these deal with NIS (formerly YP); if it's not running you don't need 'em 672 complete domainname p@1@D:$_ypdir@" " n@*@n@ 673 complete ypcat c@-@"(d k t x)"@ n@-x@n@ n@-d@D:$_ypdir@" " \ 674 N@-d@\`\\ls\ -1\ $_ypdir/\$:-1\ \|\ sed\ -n\ s%\\\\.pag\\\$%%p\`@ \ 675 n@*@\`\\ls\ -1\ $_ypdir/$_domain\ \|\ sed\ -n\ s%\\\\.pag\\\$%%p\`@ 676 complete ypmatch c@-@"(d k t x)"@ n@-x@n@ n@-d@D:$_ypdir@" " \ 677 N@-d@x:'<key ...>'@ n@-@x:'<key ...>'@ p@1@x:'<key ...>'@ \ 678 n@*@\`\\ls\ -1\ $_ypdir/$_domain\ \|\ sed\ -n\ s%\\\\.pag\\\$%%p\`@ 679 complete ypwhich c@-@"(d m t x V1 V2)"@ n@-x@n@ n@-d@D:$_ypdir@" " \ 680 n@-m@\`\\ls\ -1\ $_ypdir/$_domain\ \|\ sed\ -n\ s%\\\\.pag\\\$%%p\`@ \ 681 N@-m@n@ n@*@\$hosts@ 682 683 # there's no need to clutter the user's shell with these 684 unset _elispdir _maildir _ypdir _domain 685 686 complete make \ 687 'n/-f/f/' \ 688 'c/*=/f/' \ 689 'n@*@`cat -s GNUmakefile Makefile makefile |& sed -n -e "/No such file/d" -e "/^[^ #].*:/s/:.*//p"`@' 690 691 if ( -f /etc/printcap ) then 692 set printers=(`sed -n -e "/^[^ #].*:/s/:.*//p" /etc/printcap`) 693 694 complete lpr 'c/-P/$printers/' 695 complete lpq 'c/-P/$printers/' 696 complete lprm 'c/-P/$printers/' 697 complete lpquota 'p/1/(-Qprlogger)/' 'c/-P/$printers/' 698 complete dvips 'c/-P/$printers/' 'n/-o/f:*.{ps,PS}/' 'n/*/f:*.dvi/' 699 endif 700 701 unset noglob 702 unset complete 703endif 704 705end: 706 onintr 707