Add completion for file descriptors

2 files changed, 25 insertions, 2 deletions

diff --git a/Completion/Core/.distfiles b/Completion/Core/.distfiles
index ff67b283e..9ddf7f523 100644
--- a/Completion/Core/.distfiles
+++ b/Completion/Core/.distfiles
@@ -1,8 +1,8 @@
 DISTFILES_SRC='
     .distfiles
     _all_labels _alternative _approximate
-    _call _compalso _complete _correct _description
-    _expand _files _funcall _ignored _list _main_complete _match
+    _call _compalso _complete _correct _description _expand
+    _file_descriptors _files _funcall _ignored _list _main_complete _match
     _menu _multi_parts _message _next_label _normal _oldlist _options
     _parameters _path_files _prefix _requested _sep_parts
     _set_options _setup _sort_tags _tags
diff --git a/Completion/Core/_file_descriptors b/Completion/Core/_file_descriptors
new file mode 100644
index 000000000..37e44c068
--- /dev/null
+++ b/Completion/Core/_file_descriptors
@@ -0,0 +1,23 @@
+#autoload
+
+local i fds expl list link
+
+for i in {0..9}; [[ -e /dev/fd/$i ]] && fds=( ${fds[@]} $i )
+
+if zstyle -T ":completion:${curcontext}" verbose && [[ -e /proc/$$/fd ]]; then
+  if zmodload -e zsh/stat; then
+    for i in "${fds[@]}"; do
+      stat +link -A link /proc/$$/fd/$i
+      list=( ${list[@]} "$i -- ${link[1]}" )
+    done
+  elif (( $+commands[readlink] )); then
+    for i in "${fds[@]}"; list=( ${list[@]} "$i -- $(readlink /proc/$$/fd/$i)" )
+  else
+    for i in "${fds[@]}"; do
+      list=( ${list[@]} "$i -- $(ls -l /proc/$$/fd/$i|sed 's/.*-> //' )" )
+    done
+  fi
+  _wanted file-descriptors expl 'file descriptors' compadd "$@" -d list - "$fds[@]"  
+else
+  _wanted file-descriptors expl 'file descriptors' compadd "$@" - "$fds[@]"
+fi