xenocara/app/fvwm/extras/FvwmCommand/findcmd

33 lines
594 B
Bash

#!/bin/sh
# Find fvwm commands from function.c struct functions
# Written by Toshi Isogai
ff="FvwmCommand.sh";
fc="../../fvwm/functions.c";
echo "# $ff" > $ff;
echo "# Collection of fvwm2 builtin commands for FvwmCommand" >> $ff
echo "" >> $ff;
echo "alias FvwmCommand='$1/FvwmCommand'" >> $ff;
echo 'AM () { ' >> $ff
echo 'FvwmCommand "+ $*"' >> $ff
echo '}' >> $ff;
awk 'OFS="";
/struct function/,/""/ {
if( $0 ~ /\{ *"[a-zA-Z_]/ ) {
sub(/^ *\{ *"/,"",$0);
sub(/".*/,"",$0);
print $0," () {"
print "FvwmCommand \"",$0," $*\""
print "}" ;
}
}' $fc >> $ff;