2
0
mirror of https://github.com/Aigor44/ncursesw-morphos.git synced 2025-01-24 15:13:56 +08:00
ncursesw-morphos/ncurses/base/MKunctrl.awk
Thomas E. Dickey 7eb4be765b ncurses 5.6 - patch 20070106
+ change MKunctrl.awk to reduce relocation table for unctrl.o
+ change MKkeyname.awk to reduce relocation table for keyname.o
  (patch by Miroslav Lichvar).
2007-01-07 01:32:36 +00:00

126 lines
4.4 KiB
Awk

# $Id: MKunctrl.awk,v 1.13 2007/01/06 22:52:02 tom Exp $
##############################################################################
# Copyright (c) 1998-2006,2007 Free Software Foundation, Inc. #
# #
# Permission is hereby granted, free of charge, to any person obtaining a #
# copy of this software and associated documentation files (the "Software"), #
# to deal in the Software without restriction, including without limitation #
# the rights to use, copy, modify, merge, publish, distribute, distribute #
# with modifications, sublicense, and/or sell copies of the Software, and to #
# permit persons to whom the Software is furnished to do so, subject to the #
# following conditions: #
# #
# The above copyright notice and this permission notice shall be included in #
# all copies or substantial portions of the Software. #
# #
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR #
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, #
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL #
# THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER #
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING #
# FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER #
# DEALINGS IN THE SOFTWARE. #
# #
# Except as contained in this notice, the name(s) of the above copyright #
# holders shall not be used in advertising or otherwise to promote the sale, #
# use or other dealings in this Software without prior written #
# authorization. #
##############################################################################
#
# Author: Thomas E. Dickey <dickey@clark.net> 1997
#
BEGIN {
print "/* generated by MKunctrl.awk */"
print ""
print "#include <curses.priv.h>"
print ""
print "#undef unctrl"
print ""
}
END {
print "NCURSES_EXPORT(NCURSES_CONST char *) unctrl (register chtype ch)"
print "{"
blob=""
offset=0
printf "static const short unctrl_table[] = {"
for ( ch = 0; ch < 256; ch++ ) {
gap = ","
part=""
if ((ch % 8) == 0) {
printf "\n "
if (ch != 0)
blob = blob "\""
blob = blob "\n \""
}
printf "%4d%s", offset, gap;
if (ch < 32) {
part = sprintf ("^\\%03o\\0", ch + 64);
offset = offset + 3;
} else if (ch == 127) {
part = "^?\\0";
offset = offset + 3;
} else if (ch >= 128 && ch < 160) {
part = sprintf("~\\%03o\\0", ch - 64);
offset = offset + 3;
} else {
gap = gap " "
part = sprintf("\\%03o\\0", ch);
offset = offset + 2;
}
blob = blob part
if (ch == 255)
gap = "\n"
else if (((ch + 1) % 8) != 0)
gap = gap " "
}
print "};"
blob = blob "\"";
print ""
print "#if NCURSES_EXT_FUNCS"
blob = blob "\n#if NCURSES_EXT_FUNCS"
printf "static const short unctrl_c1[] = {"
for ( ch = 128; ch < 160; ch++ ) {
gap = ","
if ((ch % 8) == 0) {
if (ch != 128)
blob = blob "\""
printf "\n "
blob = blob "\n \""
}
printf "%4d%s", offset, gap;
part = sprintf("\\%03o\\0", ch);
blob = blob part
offset = offset + 2;
if (((ch + 1) % 8) != 0)
gap = gap " "
}
print "};"
print "#endif /* NCURSES_EXT_FUNCS */"
blob = blob "\"\n#endif /* NCURSES_EXT_FUNCS */\n"
print ""
print "static const char unctrl_blob[] = "blob";"
print ""
print "\tint check = ChCharOf(ch);"
print "\tconst char *result;"
print ""
print "\tif (check >= 0 && check < (int)SIZEOF(unctrl_table)) {"
print "#if NCURSES_EXT_FUNCS"
print "\t\tif ((SP != 0)"
print "\t\t && (SP->_legacy_coding > 1)"
print "\t\t && (check >= 128)"
print "\t\t && (check < 160))"
print "\t\t\tresult = unctrl_blob + unctrl_c1[check - 128];"
print "\t\telse"
print "#endif /* NCURSES_EXT_FUNCS */"
print "\t\t\tresult = unctrl_blob + unctrl_table[check];"
print "\t} else {"
print "\t\tresult = 0;"
print "\t}"
print "\treturn (NCURSES_CONST char *)result;"
print "}"
}