d45416e707
(only if cmd exited successfully) use tmp file as input to sed pipeline. This works around two issues: (1) a pathological case where the script would fail in ... interesting ways if the command being executed closed its stdout. (Certain commands are used only for their side effects, but not their output, and doing some testing on my own i got into hot water when one of my mods caused a command to close its output). (2) the fact that genassym would succeed even when the command in fact failed (because the last cmd in the pipeline is the one whose exit status would be reported).
156 lines
3.9 KiB
Bash
156 lines
3.9 KiB
Bash
# $NetBSD: genassym.sh,v 1.10 2001/03/06 02:20:18 cgd Exp $
|
|
|
|
#
|
|
# Copyright (c) 1997 Matthias Pfaller.
|
|
# All rights reserved.
|
|
#
|
|
# Redistribution and use in source and binary forms, with or without
|
|
# modification, are permitted provided that the following conditions
|
|
# are met:
|
|
# 1. Redistributions of source code must retain the above copyright
|
|
# notice, this list of conditions and the following disclaimer.
|
|
# 2. Redistributions in binary form must reproduce the above copyright
|
|
# notice, this list of conditions and the following disclaimer in the
|
|
# documentation and/or other materials provided with the distribution.
|
|
# 3. All advertising materials mentioning features or use of this software
|
|
# must display the following acknowledgement:
|
|
# This product includes software developed by Matthias Pfaller.
|
|
# 4. The name of the author may not be used to endorse or promote products
|
|
# derived from this software without specific prior written permission
|
|
#
|
|
# THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
|
# IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
# OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
# IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
# INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
# NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
# DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
# THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
# THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
#
|
|
|
|
# If first argument is -c, create a temporary C file,
|
|
# compile it and execute the result.
|
|
|
|
awk=${AWK:-awk}
|
|
|
|
if [ $1 = '-c' ] ; then
|
|
shift
|
|
ccode=1
|
|
else
|
|
ccode=0
|
|
fi
|
|
|
|
trap "rm -f /tmp/$$.c /tmp/genassym.$$" 0 1 2 3 15
|
|
|
|
$awk '
|
|
BEGIN {
|
|
printf("#ifndef _KERNEL\n#define _KERNEL\n#endif\n");
|
|
printf("#define offsetof(type, member) ((size_t)(&((type *)0)->member))\n");
|
|
defining = 0;
|
|
type = "long";
|
|
asmtype = "n";
|
|
asmprint = "";
|
|
}
|
|
|
|
$0 ~ /^[ \t]*#.*/ || $0 ~ /^[ \t]*$/ {
|
|
# Just ignore comments and empty lines
|
|
next;
|
|
}
|
|
|
|
$0 ~ /^config[ \t]/ {
|
|
type = $2;
|
|
asmtype = $3;
|
|
asmprint = $4;
|
|
next;
|
|
}
|
|
|
|
/^include[ \t]/ {
|
|
if (defining != 0) {
|
|
defining = 0;
|
|
printf("}\n");
|
|
}
|
|
printf("#%s\n", $0);
|
|
next;
|
|
}
|
|
|
|
$0 ~ /^if[ \t]/ ||
|
|
$0 ~ /^ifdef[ \t]/ ||
|
|
$0 ~ /^ifndef[ \t]/ ||
|
|
$0 ~ /^else/ ||
|
|
$0 ~ /^elif[ \t]/ ||
|
|
$0 ~ /^endif/ {
|
|
printf("#%s\n", $0);
|
|
next;
|
|
}
|
|
|
|
/^struct[ \t]/ {
|
|
structname = $2;
|
|
$0 = "define " structname "_SIZEOF sizeof(struct " structname ")";
|
|
# fall through
|
|
}
|
|
|
|
/^member[ \t]/ {
|
|
$0 = "define " $2 " offsetof(struct " structname ", " $2 ")";
|
|
# fall through
|
|
}
|
|
|
|
/^export[ \t]/ {
|
|
$0 = "define " $2 " " $2;
|
|
# fall through
|
|
}
|
|
|
|
/^define[ \t]/ {
|
|
if (defining == 0) {
|
|
defining = 1;
|
|
printf("void f" FNR "(void);\n");
|
|
printf("void f" FNR "() {\n");
|
|
if (ccode)
|
|
call[FNR] = "f" FNR;
|
|
defining = 1;
|
|
}
|
|
value = $0
|
|
gsub("^define[ \t]+[A-Za-z_][A-Za-z_0-9]*[ \t]+", "", value)
|
|
if (ccode)
|
|
printf("printf(\"#define " $2 " %%ld\\n\", (%s)" value ");\n", type);
|
|
else
|
|
printf("__asm(\"XYZZY %s %%%s0\" : : \"%s\" (%s));\n", $2, asmprint, asmtype, value);
|
|
next;
|
|
}
|
|
|
|
/^quote[ \t]/ {
|
|
gsub("^quote[ \t]+", "");
|
|
print;
|
|
next;
|
|
}
|
|
|
|
{
|
|
printf("syntax error in line %d\n", FNR) >"/dev/stderr";
|
|
exit(1);
|
|
}
|
|
|
|
END {
|
|
if (defining != 0) {
|
|
defining = 0;
|
|
printf("}\n");
|
|
}
|
|
if (ccode) {
|
|
printf("int main(int argc, char **argv) {");
|
|
for (i in call)
|
|
printf(call[i] "();");
|
|
printf("return(0); }\n");
|
|
}
|
|
}
|
|
' ccode=$ccode > /tmp/$$.c || exit 1
|
|
|
|
if [ $ccode = 1 ] ; then
|
|
"$@" /tmp/$$.c -o /tmp/genassym.$$ && /tmp/genassym.$$
|
|
else
|
|
# Kill all of the "#" and "$" modifiers; locore.s already
|
|
# prepends the correct "constant" modifier.
|
|
"$@" -S /tmp/$$.c -o - > /tmp/genassym.$$ && \
|
|
sed -e 's/#//g' -e 's/\$//g' < /tmp/genassym.$$ | \
|
|
sed -n 's/.*XYZZY/#define/gp'
|
|
fi
|