MKunctrl.awk revision 174993 
1# $Id: MKunctrl.awk,v 1.14 2007/07/28 21:13:21 tom Exp $
2##############################################################################
3# Copyright (c) 1998-2006,2007 Free Software Foundation, Inc.                #
4#                                                                            #
5# Permission is hereby granted, free of charge, to any person obtaining a    #
6# copy of this software and associated documentation files (the "Software"), #
7# to deal in the Software without restriction, including without limitation  #
8# the rights to use, copy, modify, merge, publish, distribute, distribute    #
9# with modifications, sublicense, and/or sell copies of the Software, and to #
10# permit persons to whom the Software is furnished to do so, subject to the  #
11# following conditions:                                                      #
12#                                                                            #
13# The above copyright notice and this permission notice shall be included in #
14# all copies or substantial portions of the Software.                        #
15#                                                                            #
16# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR #
17# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,   #
18# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL    #
19# THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER      #
20# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING    #
21# FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER        #
22# DEALINGS IN THE SOFTWARE.                                                  #
23#                                                                            #
24# Except as contained in this notice, the name(s) of the above copyright     #
25# holders shall not be used in advertising or otherwise to promote the sale, #
26# use or other dealings in this Software without prior written               #
27# authorization.                                                             #
28##############################################################################
29#
30# Author: Thomas E. Dickey <dickey@clark.net> 1997
31#
32
33BEGIN	{
34		print "/* generated by MKunctrl.awk */"
35		print ""
36		print "#include <curses.priv.h>"
37		print ""
38		print "#undef unctrl"
39		print ""
40	}
41END	{
42		print "NCURSES_EXPORT(NCURSES_CONST char *) unctrl (register chtype ch)"
43		print "{"
44
45		blob=""
46		offset=0
47		if (bigstrings) {
48			printf "static const short unctrl_table[] = {"
49		} else {
50			printf "static const char* const unctrl_table[] = {"
51		}
52		for ( ch = 0; ch < 256; ch++ ) {
53			gap = ","
54			part=""
55			if ((ch % 8) == 0) {
56				printf "\n    "
57				if (ch != 0)
58					blob = blob "\""
59				blob = blob "\n    \""
60			}
61			if (bigstrings)
62				printf "%4d%s", offset, gap;
63			if (ch < 32) {
64				part = sprintf ("^\\%03o", ch + 64);
65				offset = offset + 3;
66			} else if (ch == 127) {
67				part = "^?";
68				offset = offset + 3;
69			} else if (ch >= 128 && ch < 160) {
70				part = sprintf("~\\%03o", ch - 64);
71				offset = offset + 3;
72			} else {
73				gap = gap " "
74				part = sprintf("\\%03o", ch);
75				offset = offset + 2;
76			}
77			if (ch == 255)
78				gap = "\n"
79			else if (((ch + 1) % 8) != 0)
80				gap = gap " "
81			if (bigstrings) {
82				blob = blob part "\\0";
83			} else {
84				printf "\"%s\"%s", part, gap
85			}
86		}
87		print "};"
88		blob = blob "\"";
89
90		print ""
91		print "#if NCURSES_EXT_FUNCS"
92		if (bigstrings) {
93			blob = blob "\n#if NCURSES_EXT_FUNCS"
94			printf "static const short unctrl_c1[] = {"
95		} else {
96			printf "static const char* const unctrl_c1[] = {"
97		}
98		for ( ch = 128; ch < 160; ch++ ) {
99			gap = ","
100			if ((ch % 8) == 0) {
101				if (ch != 128)
102					blob = blob "\""
103				printf "\n    "
104				blob = blob "\n    \""
105			}
106			if (bigstrings) {
107				printf "%4d%s", offset, gap;
108				part = sprintf("\\%03o\\0", ch);
109				blob = blob part
110				offset = offset + 2;
111				if (((ch + 1) % 8) != 0)
112					gap = gap " "
113			} else {
114				if (ch >= 128 && ch < 160) {
115					printf "\"\\%03o\"", ch
116					gap = gap " "
117				}
118				if (ch == 255)
119					gap = "\n"
120				else if (((ch + 1) % 8) != 0)
121					gap = gap " "
122				printf "%s", gap
123			}
124		}
125		print "};"
126		print "#endif /* NCURSES_EXT_FUNCS */"
127		blob = blob "\"\n#endif /* NCURSES_EXT_FUNCS */\n"
128
129		print ""
130		if (bigstrings) {
131			print "static const char unctrl_blob[] = "blob";"
132			print ""
133			stringname = "unctrl_blob + unctrl"
134		} else {
135			stringname = "unctrl"
136		}
137		print "\tint check = ChCharOf(ch);"
138		print "\tconst char *result;"
139		print ""
140		print "\tif (check >= 0 && check < (int)SIZEOF(unctrl_table)) {"
141		print "#if NCURSES_EXT_FUNCS"
142		print "\t\tif ((SP != 0)"
143		print "\t\t && (SP->_legacy_coding > 1)"
144		print "\t\t && (check >= 128)"
145		print "\t\t && (check < 160))"
146		printf "\t\t\tresult = %s_c1[check - 128];\n", stringname;
147		print "\t\telse"
148		print "#endif /* NCURSES_EXT_FUNCS */"
149		printf "\t\t\tresult = %s_table[check];\n", stringname;
150		print "\t} else {"
151		print "\t\tresult = 0;"
152		print "\t}"
153		print "\treturn (NCURSES_CONST char *)result;"
154		print "}"
155	}
156