summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Completion/Unix/Type/_pids56
1 files changed, 56 insertions, 0 deletions
diff --git a/Completion/Unix/Type/_pids b/Completion/Unix/Type/_pids
new file mode 100644
index 000000000..7b09a1195
--- /dev/null
+++ b/Completion/Unix/Type/_pids
@@ -0,0 +1,56 @@
+#autoload
+
+# If given the `-m <pattern>' option, this tries to complete only pids
+# of processes whose command line match the `<pattern>'.
+
+local out pids list expl match desc listargs args all nm ret=1
+
+_tags processes || return 1
+
+if [[ "$1" = -m ]]; then
+ all=()
+ match="*[[:blank:]]${PREFIX}[0-9]#${SUFFIX}[[:blank:]]*[/[:blank:]]${2}*"
+ shift 2
+elif [[ "$PREFIX$SUFFIX" = ([%-]*|[0-9]#) ]]; then
+ all=()
+ match="(*[[:blank:]]|)${PREFIX}[0-9]#${SUFFIX}[[:blank:]]*"
+else
+ all=(-U)
+ match="*[[:blank:]]*[[/[:blank:]]$PREFIX*$SUFFIX*"
+ nm="$compstate[nmatches]"
+fi
+
+zstyle -s ":completion:${curcontext}:processes" command args
+
+out=( "${(@f)$(_call_program processes ps 2>/dev/null)}" )
+desc="$out[1]"
+out=( "${(@M)out[2,-1]:#${~match}}" )
+
+if [[ "$desc" = (#i)(|*[[:blank:]])pid(|[[:blank:]]*) ]]; then
+ pids=( "${(@)${(@M)out#${(l.${#desc[1,(r)(#i)[[:blank:]]pid]}..?.)~:-}[^[:blank:]]#}##*[[:blank:]]}" )
+else
+ pids=( "${(@)${(@M)out##[^0-9]#[0-9]#}##*[[:blank:]]}" )
+fi
+
+if zstyle -T ":completion:${curcontext}:processes" verbose; then
+ list=( "${(@Mr:COLUMNS-1:)out}" )
+ desc=(-ld list)
+else
+ desc=()
+fi
+
+_wanted processes expl 'process ID' \
+ compadd "$@" "$desc[@]" "$all[@]" -a pids && ret=0
+
+if [[ -n "$all" ]]; then
+ zstyle -s ":completion:${curcontext}:processes" insert-ids out || out=menu
+
+ case "$out" in
+ menu) compstate[insert]=menu ;;
+ single) [[ $compstate[nmatches] -ne nm+1 ]] && compstate[insert]= ;;
+ *) [[ ${#:-$PREFIX$SUFFIX} -gt ${#compstate[unambiguous]} ]] &&
+ compstate[insert]=menu ;;
+ esac
+fi
+
+return ret