2ce50790313ca34e332920d17327f30ee859dfa3
1 /**************************************************************************
3 * Copyright 2009 VMware, Inc.
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the
8 * "Software"), to deal in the Software without restriction, including
9 * without limitation the rights to use, copy, modify, merge, publish,
10 * distribute, sub license, and/or sell copies of the Software, and to
11 * permit persons to whom the Software is furnished to do so, subject to
12 * the following conditions:
14 * The above copyright notice and this permission notice (including the
15 * next paragraph) shall be included in all copies or substantial portions
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
20 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21 * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
22 * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23 * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24 * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26 **************************************************************************/
30 #include "sl_pp_public.h"
31 #include "sl_pp_context.h"
34 struct sl_pp_context
*
35 sl_pp_context_create(void)
37 struct sl_pp_context
*context
;
39 context
= calloc(1, sizeof(struct sl_pp_context
));
44 if (sl_pp_dict_init(context
)) {
45 sl_pp_context_destroy(context
);
49 context
->getc_buf
= malloc(64 * sizeof(char));
50 if (!context
->getc_buf
) {
51 sl_pp_context_destroy(context
);
55 context
->macro_tail
= &context
->macro
;
56 context
->if_ptr
= SL_PP_MAX_IF_NESTING
;
57 context
->if_value
= 1;
58 memset(context
->error_msg
, 0, sizeof(context
->error_msg
));
59 context
->error_line
= 1;
67 sl_pp_context_destroy(struct sl_pp_context
*context
)
70 free(context
->cstr_pool
);
71 sl_pp_macro_free(context
->macro
);
72 free(context
->getc_buf
);
78 sl_pp_context_error_message(const struct sl_pp_context
*context
)
80 return context
->error_msg
;
84 sl_pp_context_error_position(const struct sl_pp_context
*context
,
92 *line
= context
->error_line
;
97 sl_pp_context_add_predefined(struct sl_pp_context
*context
,
101 struct sl_pp_predefined pre
;
103 if (context
->num_predefined
== SL_PP_MAX_PREDEFINED
) {
107 pre
.name
= sl_pp_context_add_unique_str(context
, name
);
108 if (pre
.name
== -1) {
112 pre
.value
= sl_pp_context_add_unique_str(context
, value
);
113 if (pre
.value
== -1) {
117 context
->predefined
[context
->num_predefined
++] = pre
;
122 sl_pp_context_add_unique_str(struct sl_pp_context
*context
,
126 unsigned int offset
= 0;
128 size
= strlen(str
) + 1;
130 /* Find out if this is a unique string. */
131 while (offset
< context
->cstr_pool_len
) {
135 str2
= &context
->cstr_pool
[offset
];
136 size2
= strlen(str2
) + 1;
137 if (size
== size2
&& !memcmp(str
, str2
, size
- 1)) {
144 if (context
->cstr_pool_len
+ size
> context
->cstr_pool_max
) {
145 context
->cstr_pool_max
= (context
->cstr_pool_len
+ size
+ 0xffff) & ~0xffff;
146 context
->cstr_pool
= realloc(context
->cstr_pool
, context
->cstr_pool_max
);
149 if (!context
->cstr_pool
) {
150 strcpy(context
->error_msg
, "out of memory");
154 offset
= context
->cstr_pool_len
;
155 memcpy(&context
->cstr_pool
[offset
], str
, size
);
156 context
->cstr_pool_len
+= size
;
162 sl_pp_context_cstr(const struct sl_pp_context
*context
,
168 return &context
->cstr_pool
[offset
];