ncurses 6.1 - patch 20190623
[ncurses.git] / ncurses / tinfo / MKuserdefs.sh
1 #!/bin/sh
2 ##############################################################################
3 # Copyright (c) 2019 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 # $Id: MKuserdefs.sh,v 1.8 2019/03/17 00:46:17 tom Exp $
30 AWK=${1-awk}; shift 1
31 OPT1=${1-0}; shift 1
32
33 cat <<EOF
34 /*
35  * generated by $0
36  */
37
38 EOF
39
40 cat <<'EOF'
41 /*
42  *    comp_userdefs.c -- The names of widely used user-defined capabilities
43  *                       indexed via a hash table for the compiler.
44  *
45  */
46
47 #include <curses.priv.h>
48 #include <tic.h>
49 #include <hashsize.h>
50
51 #if NCURSES_XNAMES
52 EOF
53
54 cat "$@" | ./make_hash 1 user $OPT1
55
56 cat <<EOF
57
58 #if $OPT1
59 static void
60 next_string(const char *strings, unsigned *offset)
61 {
62     *offset += (unsigned) strlen(strings + *offset) + 1;
63 }
64
65 static const struct user_table_entry *
66 _nc_build_names(struct user_table_entry **actual,
67                 const user_table_data *source,
68                 const char *strings)
69 {
70     if (*actual == 0) {
71         *actual = typeCalloc(struct user_table_entry, CAPTABSIZE);
72         if (*actual != 0) {
73             unsigned n;
74             unsigned len = 0;
75             for (n = 0; n < CAPTABSIZE; ++n) {
76                 (*actual)[n].ute_name = strings + len;
77                 (*actual)[n].ute_type = (int) source[n].ute_type;
78                 (*actual)[n].ute_argc = source[n].ute_argc;
79                 (*actual)[n].ute_args = source[n].ute_args;
80                 (*actual)[n].ute_index = source[n].ute_index;
81                 (*actual)[n].ute_link = source[n].ute_link;
82                 next_string(strings, &len);
83             }
84         }
85     }
86     return *actual;
87 }
88
89 #define build_names(root) _nc_build_names(&_nc_##root##_table, \\
90                                           root##_names_data, \\
91                                           root##_names_text)
92 #else
93 #define build_names(root) _nc_ ## root ## _table
94 #endif
95
96 NCURSES_EXPORT(const struct user_table_entry *) _nc_get_userdefs_table (void)
97 {
98     return build_names(user) ;
99 }
100
101 static HashValue
102 info_hash(const char *string)
103 {
104     long sum = 0;
105
106     DEBUG(9, ("hashing %s", string));
107     while (*string) {
108         sum += (long) (*string + (*(string + 1) << 8));
109         string++;
110     }
111
112     DEBUG(9, ("sum is %ld", sum));
113     return (HashValue) (sum % HASHTABSIZE);
114 }
115
116 static int
117 compare_info_names(const char *a, const char *b)
118 {
119     return !strcmp(a, b);
120 }
121
122 static const HashData hash_data[] = {
123     { HASHTABSIZE, _nc_user_hash_table, info_hash, compare_info_names }
124 };
125
126 NCURSES_EXPORT(const HashData *) _nc_get_hash_user (void)
127 {
128     return hash_data;
129 }
130
131 #if NO_LEAKS
132 NCURSES_EXPORT(void) _nc_comp_userdefs_leaks(void)
133 {
134 #if $OPT1
135     FreeIfNeeded(_nc_user_table);
136 #endif
137 }
138 #endif /* NO_LEAKS */
139
140 #else /*! NCURSES_XNAMES */
141 NCURSES_EXPORT(void) _nc_comp_userdefs(void);
142 NCURSES_EXPORT(void) _nc_comp_userdefs(void) { }
143 #endif /* NCURSES_XNAMES */
144 EOF