Re: Next improve of completion of modprobe module parameters

[Jörg Sommer <joerg@xxxxxxxxxxxx>]

Hello Bart,

Bart Schaefer <schaefer@xxxxxxxxxxxxxxxx> wrote:
> On Sep 26, 10:35pm, joerg@xxxxxxxxxxxx wrote:
>}
>} % a=12\|4
>} % b=( {10..15} )
>} % echo ${b:#($a)}
>} 10 11 12 13 14 15
>} % eval "echo \${b:#($a)}"
>} 10 11 13 14 15
>} 
>} Why doesn't the non-eval version work?
>
> echo ${b:#($~a)}
>
> The "|" in $a is implicitly quoted unless you use $~a.

Thanks for the enlightenment. This is a better version of the patch:

commit b715bc93beb7c39297435926c17a18178e6e50aa
Author: Jörg Sommer <joerg@xxxxxxxxxxxx>
Date:   Fri Sep 26 20:56:43 2008 +0200

    Print only non‐loaded modules as modprobe completion

diff --git a/Completion/Linux/Command/_modutils b/Completion/Linux/Command/_modutils
index 378c2d5..06e9b14 100644
--- a/Completion/Linux/Command/_modutils
+++ b/Completion/Linux/Command/_modutils
@@ -38,7 +38,7 @@ case "$service" in
       '(-C --config)'{-C,--config}'[specify config file]:config file:_files' \
       "(-r --remove -l --list -t --type -a --all $ign)"{-r,--remove}'[remove module (stacks)]' \
       "(* -l --list -r --remove $ign)"{-l,--list}'[list matching modules]' \
-      "(-c $ign)1:modules:->all_modules" \
+      "(-c $ign)1:modules:->loadable_modules" \
       "(-c -l --list -t --type $ign)*:params:->params" && ret=0
       
       [[ -n $state ]] && (( $+opt_args[-r] )) && state=loaded_modules        
@@ -62,20 +62,28 @@ case "$service" in
 esac 
 
 case "$state" in
-  loaded_modules)
+  loaded_modules|loadable_modules)
     if [[ -r /proc/modules ]]; then
-     modules=(${${(f)"$(</proc/modules)"}%% *})
+     loaded_modules=(${${(f)"$(</proc/modules)"}%% *})
     elif [[ -x /sbin/lsmod ]]; then
-     modules=(${${(f)"$(/sbin/lsmod)"}[2,-1]%% *})
+     loaded_modules=(${${(f)"$(/sbin/lsmod)"}[2,-1]%% *})
     else
      return 1
     fi
-    
-    _wanted modules expl 'loaded module' compadd -a modules && return
-  ;;
+
+    if [[ $state = loaded_modules ]]; then
+        _wanted modules expl 'loaded module' compadd -a loaded_modules && return
+        return ret
+    fi
+  ;&
 
   all_modules)
     modules=( ${${${${(f)"$(_call_program modules ${(M)words[1]##*/}modprobe -l 2>/dev/null)"}:#}##*/}%%.*} )
+
+    if [[ $state = loadable_modules ]]; then
+        modules=( ${modules:#(${(j:|:)~${loaded_modules//_/-}})} )
+    fi
+
     _tags files modules
     while _tags; do
       _requested files expl "module file"  _files -g '*.ko' && ret=0

Bye, Jörg.
-- 
Objektivität ist die Wahnvorstellung, Beobachtungen könnten ohne
Beobachter gemacht werden – Heinz v. Foerster