mirror of
				git://git.code.sf.net/p/zsh/code
				synced 2025-11-04 07:21:06 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			93 lines
		
	
	
	
		
			4 KiB
		
	
	
	
		
			Text
		
	
	
	
	
	
			
		
		
	
	
			93 lines
		
	
	
	
		
			4 KiB
		
	
	
	
		
			Text
		
	
	
	
	
	
#compdef ri
 | 
						|
 | 
						|
local curcontext="$curcontext" state line ret=1
 | 
						|
typeset -A opt_args
 | 
						|
 | 
						|
_arguments -C \
 | 
						|
  '(- *)'{-h,--help}'[print help information and exit]' \
 | 
						|
  '(- *)'{-v,--version}'[display the version of ri]' \
 | 
						|
  '*'{-d+,--doc-dir=}'[directory to search for documentation]:ri doc directory:_directories' \
 | 
						|
  '(-f --format)'{-f+,--format=}'[format to use when displaying output]:output format [bs]:(ansi bs markdown rdoc)' \
 | 
						|
  '(-T --no-pager)'{-T,--no-pager}'[send output directly to stdout]' \
 | 
						|
  '(-i --interactive)'{-i,--interactive}'[interactive mode]' \
 | 
						|
  '(-a --all)'{-a,--all}'[show all documentation for a class or module]' \
 | 
						|
  '(-l --list)'{-l,--list}'[list classes ri knows about]' \
 | 
						|
  '--list-doc-dirs[list the directories from which ri will source documentation]' \
 | 
						|
  '(-w --width)'{-w+,--width=}'[set the width of the output]:output width [72]' \
 | 
						|
  '(-l --list)--server=-[run RDoc server on the given port]::port [8214]:_ports' \
 | 
						|
  "--no-standard-docs[don't include documentation from the Ruby standard library, site_lib, installed gems, or ~/.rdoc]" \
 | 
						|
  '(--no-use-cache --use-cache)--'{no-,}"use-cache[whether or not to use ri's cache]" \
 | 
						|
  '(--no-system --system)--'{no-,}"system[include documentation from Ruby's standard library]" \
 | 
						|
  '(--no-site --site)--'{no-,}'site[include documentation from libraries installed in site_lib]' \
 | 
						|
  '(--no-gems --gems)--'{no-,}'gems[include documentation from RubyGems]' \
 | 
						|
  '(--no-home --home)--'{no-,}'home[include documentation stored in ~/.rdoc]' \
 | 
						|
  '--profile[run with the Ruby profiler]' \
 | 
						|
  '--dump=[dump data from an ri cache or data file]:cache:_files' \
 | 
						|
  '*:ri name:->ri-name' && return
 | 
						|
 | 
						|
if [[ "$state" = ri-name ]]; then
 | 
						|
  local -a ri_dirs ri_ext ri_names ri_wants ri_names
 | 
						|
  local class_dir esc_name dir curtag tag descr expl
 | 
						|
 | 
						|
  if "ruby${words[1]#ri}" -rrdoc/ri/ri_options -e 1 >/dev/null 2>&1; then
 | 
						|
    # Old-style Ruby 1.8.x RI
 | 
						|
    ri_dirs=( ${(f)"$(_call_program ri-names "ruby${words[1]#ri}" -rrdoc/ri/ri_options -e '"o = RI::Options.instance; o.parse(ARGV); o.path.each { |p| puts p }"' -- ${(kv)opt_args[(I)-d|--doc-dir|--(system|site|gems|home)]})"} )
 | 
						|
    ri_ext=yaml
 | 
						|
  elif "ruby${words[1]#ri}" -rrdoc/ri -rrdoc/ri/store -e 1 >/dev/null 2>&1; then
 | 
						|
    # Newer-style Ruby 1.9.2 RI
 | 
						|
    ri_dirs=( ${(f)"$(_call_program ri-names "$words[1]" ${(kv)opt_args[(I)-d|--doc-dir|--((no-|)(system|site|gems|home)|standard-docs)]} --list-doc-dirs -f bs -T)"} )
 | 
						|
    ri_ext=ri
 | 
						|
  else
 | 
						|
    # New-style Ruby 1.9+ RI
 | 
						|
    ri_dirs=( ${(f)"$(_call_program ri-names "$words[1]" ${(kv)opt_args[(I)-d|--doc-dir|--((no-|)(system|site|gems|home)|standard-docs)]} --list-doc-dirs -f plain -T)"} )
 | 
						|
    ri_ext=yaml
 | 
						|
  fi
 | 
						|
 | 
						|
  if compset -P '?*(::|\#|.)'; then
 | 
						|
    class_dir=${IPREFIX//(::|\#|.)/\/}
 | 
						|
  fi
 | 
						|
  esc_name=${${(Q)PREFIX}//(#b)([^A-Za-z0-9_])/$(printf %%%x ${(qq)match[1]})}
 | 
						|
 | 
						|
  case "$IPREFIX" in
 | 
						|
    (*::) ri_wants=( 'classes:class names' 'class-methods:class methods' );;
 | 
						|
    (*\#) ri_wants=( 'instance-methods:instance methods' );;
 | 
						|
    (*.) ri_wants=( 'class-methods:class methods' 'instance-methods:instance methods' );;
 | 
						|
    (*) ri_wants=( 'classes:class names' )
 | 
						|
  esac
 | 
						|
 | 
						|
  for curtag in $ri_wants; do
 | 
						|
    tag=${curtag%%:*}
 | 
						|
    descr=${curtag#*:}
 | 
						|
 | 
						|
    _tags "$tag"
 | 
						|
    while _tags; do
 | 
						|
      while _next_label "$tag" expl "$descr"; do
 | 
						|
        ri_wants=()
 | 
						|
        case "$tag" in
 | 
						|
          (classes)
 | 
						|
          for dir in $ri_dirs[@]; do
 | 
						|
            ri_wants+=( $dir/$class_dir*(-/:t) )
 | 
						|
          done
 | 
						|
          ;;
 | 
						|
          (class-methods)
 | 
						|
          for dir in $ri_dirs[@]; do
 | 
						|
            fnames=( $dir/$class_dir*-c.$ri_ext(-.:t) )
 | 
						|
            ri_wants+=( ${${fnames%-c.$ri_ext}//(#b)%(??)/$(print "\\x$match[1]")} )
 | 
						|
          done
 | 
						|
          ;;
 | 
						|
          (instance-methods)
 | 
						|
          for dir in $ri_dirs[@]; do
 | 
						|
            fnames=( $dir/$class_dir*-i.$ri_ext(-.:t) )
 | 
						|
            ri_wants+=( ${${fnames%-i.$ri_ext}//(#b)%(??)/$(print "\\x$match[1]")} )
 | 
						|
          done
 | 
						|
          ;;
 | 
						|
        esac
 | 
						|
        ri_names=( ${(Q)ri_wants} )
 | 
						|
        compadd -S '' -d ri_names -a "$expl[@]" ri_wants && ret=0
 | 
						|
      done
 | 
						|
      (( ret )) || break
 | 
						|
    done
 | 
						|
  done
 | 
						|
fi
 | 
						|
 | 
						|
return ret
 |