Home | History | Annotate | Line # | Download | only in sh
mkinit.sh revision 1.8 
      1 #! /bin/sh
      2 #	$NetBSD: mkinit.sh,v 1.8 2018/09/16 22:31:30 kre Exp $
      3 
      4 # Copyright (c) 2003 The NetBSD Foundation, Inc.
      5 # All rights reserved.
      6 #
      7 # This code is derived from software contributed to The NetBSD Foundation
      8 # by David Laight.
      9 #
     10 # Redistribution and use in source and binary forms, with or without
     11 # modification, are permitted provided that the following conditions
     12 # are met:
     13 # 1. Redistributions of source code must retain the above copyright
     14 #    notice, this list of conditions and the following disclaimer.
     15 # 2. Redistributions in binary form must reproduce the above copyright
     16 #    notice, this list of conditions and the following disclaimer in the
     17 #    documentation and/or other materials provided with the distribution.
     18 #
     19 # THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20 # ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21 # TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22 # PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23 # BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24 # CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25 # SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26 # INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27 # CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28 # ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29 # POSSIBILITY OF SUCH DAMAGE.
     30 
     31 srcs="$*"
     32 
     33 nl='
     34 '
     35 openparen='('
     36 backslash='\'
     37 
     38 includes=' "shell.h" "mystring.h" "init.h" '
     39 defines=
     40 decles=
     41 event_init=
     42 event_reset=
     43 event_shellproc=
     44 
     45 for src in $srcs; do
     46 	exec <$src
     47 	decnl="$nl"
     48 	while IFS=; read -r line; do
     49 		[ "$line" = x ]
     50 		case "$line " in
     51 		INIT["{ 	"]* ) event=init;;
     52 		RESET["{ 	"]* ) event=reset;;
     53 		SHELLPROC["{ 	"]* ) event=shellproc;;
     54 		INCLUDE[\ \	]* )
     55 			IFS=' 	'
     56 			set -- $line
     57 			# ignore duplicates
     58 			[ "${includes}" != "${includes% $2 *}" ] && continue
     59 			includes="$includes$2 "
     60 			continue
     61 			;;
     62 		MKINIT\  )
     63 			# struct declaration
     64 			decles="$decles$nl"
     65 			while
     66 				read -r line
     67 				decles="${decles}${line}${nl}"
     68 				[ "$line" != "};" ]
     69 			do
     70 				:
     71 			done
     72 			decnl="$nl"
     73 			continue
     74 			;;
     75 		MKINIT["{ 	"]* )
     76 			# strip initialiser
     77 			def=${line#MKINIT}
     78 			comment="${def#*;}"
     79 			def="${def%;$comment}"
     80 			def="${def%%=*}"
     81 			def="${def% }"
     82 			decles="${decles}${decnl}extern${def};${comment}${nl}"
     83 			decnl=
     84 			continue
     85 			;;
     86 		\#define[\ \	]* )
     87 			IFS=' 	'
     88 			set -- $line
     89 			# Ignore those with arguments
     90 			[ "$2" = "${2##*$openparen}" ] || continue
     91 			# and multiline definitions
     92 			[ "$line" = "${line%$backslash}" ] || continue
     93 			defines="${defines}#undef	$2${nl}${line}${nl}"
     94 			continue
     95 			;;
     96 		* ) continue;;
     97 		esac
     98 		# code for events
     99 		ev="${nl}	/* from $src: */${nl}	{${nl}"
    100 		# Indent the text by an extra <tab>
    101 		while
    102 			read -r line
    103 			[ "$line" != "}" ]
    104 		do
    105 			case "$line" in
    106 			('')	;;
    107 			('#'*)	;;
    108 			(*)	line="	$line";;
    109 			esac
    110 			ev="${ev}${line}${nl}"
    111 		done
    112 		ev="${ev}	}${nl}"
    113 		eval event_$event=\"\$event_$event\$ev\"
    114 	done
    115 done
    116 
    117 exec >init.c.tmp
    118 
    119 echo "/*"
    120 echo " * This file was generated by the mkinit program."
    121 echo " */"
    122 echo
    123 
    124 IFS=' '
    125 for f in $includes; do
    126 	echo "#include $f"
    127 done
    128 
    129 echo
    130 echo
    131 echo
    132 echo "$defines"
    133 echo
    134 echo "$decles"
    135 echo
    136 echo
    137 echo "/*"
    138 echo " * Initialization code."
    139 echo " */"
    140 echo
    141 echo "void"
    142 echo "init(void)"
    143 echo "{"
    144 echo "${event_init}"
    145 echo "}"
    146 echo
    147 echo
    148 echo
    149 echo "/*"
    150 echo " * This routine is called when an error or an interrupt occurs in an"
    151 echo " * interactive shell and control is returned to the main command loop."
    152 echo " */"
    153 echo
    154 echo "void"
    155 echo "reset(void)"
    156 echo "{"
    157 echo "${event_reset}"
    158 echo "}"
    159 echo
    160 echo
    161 echo
    162 echo "/*"
    163 echo " * This routine is called to initialize the shell to run a shell procedure."
    164 echo " */"
    165 echo
    166 echo "void"
    167 echo "initshellproc(void)"
    168 echo "{"
    169 echo "${event_shellproc}"
    170 echo "}"
    171 
    172 exec >&-
    173 mv init.c.tmp init.c
    174