mirror of
				git://git.code.sf.net/p/zsh/code
				synced 2025-10-31 06:00:54 +01:00 
			
		
		
		
	
		
			
				
	
	
		
			91 lines
		
	
	
	
		
			2.6 KiB
		
	
	
	
		
			Bash
		
	
	
	
	
	
			
		
		
	
	
			91 lines
		
	
	
	
		
			2.6 KiB
		
	
	
	
		
			Bash
		
	
	
	
	
	
| #! /bin/sh
 | |
| #
 | |
| # mkbltnmlst.sh: generate boot code for linked-in modules
 | |
| #
 | |
| # Written by Andrew Main
 | |
| #
 | |
| 
 | |
| srcdir=${srcdir-`echo $0|sed 's%/[^/][^/]*$%%'`}
 | |
| test "x$srcdir" = "x$0" && srcdir=.
 | |
| test "x$srcdir" = "x"   && srcdir=.
 | |
| MODBINS=${MODBINS-modules-bltin}
 | |
| XMODCF=${XMODCF-$srcdir/xmods.conf}
 | |
| 
 | |
| bin_mods=" zsh/main "`sed 's/^/ /;s/$/ /' $MODBINS`
 | |
| x_mods=`sed 's/^.* //' $XMODCF`
 | |
| . ./modules.index
 | |
| 
 | |
| trap "rm -f $1; exit 1" 1 2 15
 | |
| 
 | |
| exec > $1
 | |
| 
 | |
| for x_mod in $x_mods; do
 | |
|     q_x_mod=`echo $x_mod | sed 's,Q,Qq,g;s,_,Qu,g;s,/,Qs,g'`
 | |
|     eval "modfile=\$modfile_$q_x_mod"
 | |
|     if test "x$modfile" = x; then
 | |
| 	echo >&2 "WARNING: $XMODCF lists non-existent module \`$x_mod' (ignored)"
 | |
| 	continue
 | |
|     fi
 | |
|     case "$bin_mods" in
 | |
|     *" $x_mod "*)
 | |
|         echo "/* linked-in known module \`$x_mod' */"
 | |
| 	linked=yes
 | |
| 	;;
 | |
|     *)
 | |
|         echo "#ifdef DYNAMIC"
 | |
|         echo "/* non-linked-in known module \`$x_mod' */"
 | |
| 	linked=no
 | |
|     esac
 | |
|     unset moddeps autobins autoinfixconds autoprefixconds autoparams
 | |
|     unset automathfuncs
 | |
|     . $srcdir/../$modfile
 | |
|     for bin in $autobins; do
 | |
| 	echo "    add_autobin(\"$bin\", \"$x_mod\");"
 | |
|     done
 | |
|     for cond in $autoinfixconds; do
 | |
| 	echo "    add_autocond(\"$cond\", 1, \"$x_mod\");"
 | |
|     done
 | |
|     for cond in $autoprefixconds; do
 | |
| 	echo "    add_autocond(\"$cond\", 0, \"$x_mod\");"
 | |
|     done
 | |
|     for param in $autoparams; do
 | |
| 	echo "    add_autoparam(\"$param\", \"$x_mod\");"
 | |
|     done
 | |
|     for mfunc in $automathfuncs; do
 | |
| 	echo "    add_automath(\"$mfunc\", \"$x_mod\");"
 | |
|     done
 | |
|     for dep in $moddeps; do
 | |
| 	echo "    add_dep(\"$x_mod\", \"$dep\");"
 | |
|     done
 | |
|     test "x$linked" = xno && echo "#endif"
 | |
| done
 | |
| 
 | |
| echo
 | |
| done_mods=" "
 | |
| for bin_mod in $bin_mods; do
 | |
|     q_bin_mod=`echo $bin_mod | sed 's,Q,Qq,g;s,_,Qu,g;s,/,Qs,g'`
 | |
|     echo "/* linked-in module \`$bin_mod' */"
 | |
|     eval "modfile=\$modfile_$q_bin_mod"
 | |
|     unset moddeps
 | |
|     . $srcdir/../$modfile
 | |
|     for dep in $moddeps; do
 | |
| 	case $done_mods in
 | |
| 	    *" $dep "*)
 | |
| 		echo "    /* depends on \`$dep' */" ;;
 | |
| 	    *)	echo >&2 "ERROR: linked-in module \`$bin_mod' depends on \`$dep'"
 | |
| 		rm -f $1
 | |
| 		exit 1 ;;
 | |
| 	esac
 | |
|     done
 | |
|     echo "    {"
 | |
|     echo "        extern int setup_${q_bin_mod} _((Module));"
 | |
|     echo "        extern int boot_${q_bin_mod} _((Module));"
 | |
|     echo "        extern int cleanup_${q_bin_mod} _((Module));"
 | |
|     echo "        extern int finish_${q_bin_mod} _((Module));"
 | |
|     echo
 | |
|     echo "        register_module(\"$bin_mod\","
 | |
|     echo "                        setup_${q_bin_mod}, boot_${q_bin_mod},"
 | |
|     echo "                        cleanup_${q_bin_mod}, finish_${q_bin_mod});"
 | |
|     echo "    }"
 | |
|     done_mods="$done_mods$bin_mod "
 | |
| done
 |