1##############################################################################
2# Copyright (c) 1998-2009,2010 Free Software Foundation, Inc.                #
3#                                                                            #
4# Permission is hereby granted, free of charge, to any person obtaining a    #
5# copy of this software and associated documentation files (the "Software"), #
6# to deal in the Software without restriction, including without limitation  #
7# the rights to use, copy, modify, merge, publish, distribute, distribute    #
8# with modifications, sublicense, and/or sell copies of the Software, and to #
9# permit persons to whom the Software is furnished to do so, subject to the  #
10# following conditions:                                                      #
11#                                                                            #
12# The above copyright notice and this permission notice shall be included in #
13# all copies or substantial portions of the Software.                        #
14#                                                                            #
15# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR #
16# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,   #
17# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL    #
18# THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER      #
19# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING    #
20# FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER        #
21# DEALINGS IN THE SOFTWARE.                                                  #
22#                                                                            #
23# Except as contained in this notice, the name(s) of the above copyright     #
24# holders shall not be used in advertising or otherwise to promote the sale, #
25# use or other dealings in this Software without prior written               #
26# authorization.                                                             #
27##############################################################################
28# $Id: MKcodes.awk,v 1.9 2010/01/23 17:57:43 tom Exp $
29function large_item(value) {
30	result = sprintf("%d,", offset);
31	offset = offset + length(value) + 1;
32	offcol = offcol + length(result) + 2;
33	if (offcol > 70) {
34		result = result "\n";
35		offcol = 0;
36	} else {
37		result = result " ";
38	}
39	bigstr = bigstr sprintf("\"%s\\0\" ", value);
40	bigcol = bigcol + length(value) + 5;
41	if (bigcol > 70) {
42		bigstr = bigstr "\\\n";
43		bigcol = 0;
44	}
45	return result;
46}
47
48function small_item(value) {
49	return sprintf("\t\t\"%s\",\n", value);
50}
51
52function print_strings(name,value) {
53	printf  "DCL(%s) = {\n", name
54	print  value
55	print  "\t\t(NCURSES_CONST char *)0,"
56	print  "};"
57	print  ""
58}
59
60function print_offsets(name,value) {
61	printf  "static const short _nc_offset_%s[] = {\n", name
62	printf "%s",  value
63	print  "};"
64	print  ""
65	printf "static NCURSES_CONST char ** ptr_%s = 0;\n", name
66	print  ""
67}
68
69BEGIN	{
70		print  "/* This file was generated by MKcodes.awk */"
71		print  ""
72		print  "#include <curses.priv.h>"
73		print  ""
74		print  "#define IT NCURSES_CONST char * const"
75		print  ""
76		offset = 0;
77		offcol = 0;
78		bigcol = 0;
79	}
80
81$1 ~ /^#/		{next;}
82
83$1 == "SKIPWARN"	{next;}
84
85$3 == "bool"	{
86			small_boolcodes = small_boolcodes small_item($4);
87			large_boolcodes = large_boolcodes large_item($4);
88		}
89
90$3 == "num"	{
91			small_numcodes = small_numcodes small_item($4);
92			large_numcodes = large_numcodes large_item($4);
93		}
94
95$3 == "str"	{
96			small_strcodes = small_strcodes small_item($4);
97			large_strcodes = large_strcodes large_item($4);
98		}
99
100END	{
101		print  ""
102		print  "#if BROKEN_LINKER || USE_REENTRANT"
103		print  ""
104		if (bigstrings) {
105			printf "static const char _nc_code_blob[] = \n"
106			printf "%s;\n", bigstr;
107			print_offsets("boolcodes", large_boolcodes);
108			print_offsets("numcodes", large_numcodes);
109			print_offsets("strcodes", large_strcodes);
110			print  ""
111			print  "static IT *"
112			print  "alloc_array(NCURSES_CONST char ***value, const short *offsets, unsigned size)"
113			print  "{"
114			print  "	if (*value == 0) {"
115			print  "		if ((*value = typeCalloc(NCURSES_CONST char *, size + 1)) != 0) {"
116			print  "			unsigned n;"
117			print  "			for (n = 0; n < size; ++n) {"
118			print  "				(*value)[n] = (NCURSES_CONST char *) _nc_code_blob + offsets[n];"
119			print  "			}"
120			print  "		}"
121			print  "	}"
122			print  "	return *value;"
123			print  "}"
124			print  ""
125			print  "#define FIX(it) NCURSES_IMPEXP IT * NCURSES_API NCURSES_PUBLIC_VAR(it)(void) { return alloc_array(&ptr_##it, _nc_offset_##it, SIZEOF(_nc_offset_##it)); }"
126		} else {
127			print  "#define DCL(it) static IT data##it[]"
128			print  ""
129			print_strings("boolcodes", small_boolcodes);
130			print_strings("numcodes", small_numcodes);
131			print_strings("strcodes", small_strcodes);
132			print  "#define FIX(it) NCURSES_IMPEXP IT * NCURSES_API NCURSES_PUBLIC_VAR(it)(void) { return data##it; }"
133		}
134		print  ""
135		print  "/* remove public definition which conflicts with FIX() */"
136		print  "#undef boolcodes"
137		print  "#undef numcodes"
138		print  "#undef strcodes"
139		print  ""
140		print  "/* add local definition */"
141		print  "FIX(boolcodes)"
142		print  "FIX(numcodes)"
143		print  "FIX(strcodes)"
144		print  ""
145		print  "/* restore the public definition */"
146		print  ""
147		print  "#define FREE_FIX(it) if (ptr_##it) { FreeAndNull(ptr_##it); }"
148		print  "#define boolcodes  NCURSES_PUBLIC_VAR(boolcodes())"
149		print  "#define numcodes   NCURSES_PUBLIC_VAR(numcodes())"
150		print  "#define strcodes   NCURSES_PUBLIC_VAR(strcodes())"
151		print  ""
152		print  "#if NO_LEAKS"
153		print  "NCURSES_EXPORT(void)"
154		print  "_nc_codes_leaks(void)"
155		print  "{"
156		if (bigstrings) {
157		print  "FREE_FIX(boolcodes)"
158		print  "FREE_FIX(numcodes)"
159		print  "FREE_FIX(strcodes)"
160		}
161		print  "}"
162		print  "#endif"
163		print  ""
164		print  "#else"
165		print  ""
166		print  "#define DCL(it) NCURSES_EXPORT_VAR(IT) it[]"
167		print  ""
168		print_strings("boolcodes", small_boolcodes);
169		print_strings("numcodes", small_numcodes);
170		print_strings("strcodes", small_strcodes);
171		print  ""
172		print  "#endif /* BROKEN_LINKER */"
173	}
174