about summary refs log tree commit diff
path: root/Completion/Core/_main_complete
blob: c7f5a5a963822310802c4acf9085cbf60190ab55 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
#autoload

# The main loop of the completion code. This is what is called when 
# completion is attempted from the command line.
# The completion code gives us the special variables and the arguments
# from the command line are given as positional parameters.

local comp name

setopt localoptions nullglob rcexpandparam globdots
unsetopt markdirs globsubst shwordsplit nounset

# An entry for `-first-' is the replacement for `compctl -T'
# Completion functions may set `_compskip' to any value to make the 
# main loops stop calling other completion functions.

comp="$_comps[-first-]"
if [[ ! -z "$comp" ]]; then
  "$comp" "$@"
  if (( $+_compskip )); then
    unset _compskip
    return
  fi
fi

# For arguments we use the `_normal function.

if [[ $CONTEXT == argument || $CONTEXT == command ]]; then
  _normal "$@"
else
  # Let's see if we have a special completion definition for the other
  # possible contexts.

  comp=''

  case $CONTEXT in
  redirect)  comp="$_comps[-redirect-]";;
  math)      comp="$_comps[-math-]";;
  subscript) comp="$_comps[-subscript-]";;
  value)     comp="$_comps[-value-]";;
  condition) comp="$_comps[-condition-]";;
  esac

  # If not, we use default completion, if any.

  [[ -z "$comp" ]] && comp="$_comps[-default-]"
  [[ -z "$comp" ]] || "$comp" "$@"
fi