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
));
66 sl_pp_context_destroy(struct sl_pp_context
*context
)
69 free(context
->cstr_pool
);
70 sl_pp_macro_free(context
->macro
);
71 free(context
->getc_buf
);
77 sl_pp_context_error_message(const struct sl_pp_context
*context
)
79 return context
->error_msg
;
83 sl_pp_context_add_predefined(struct sl_pp_context
*context
,
87 struct sl_pp_predefined pre
;
89 if (context
->num_predefined
== SL_PP_MAX_PREDEFINED
) {
93 pre
.name
= sl_pp_context_add_unique_str(context
, name
);
98 pre
.value
= sl_pp_context_add_unique_str(context
, value
);
99 if (pre
.value
== -1) {
103 context
->predefined
[context
->num_predefined
++] = pre
;
108 sl_pp_context_add_unique_str(struct sl_pp_context
*context
,
112 unsigned int offset
= 0;
114 size
= strlen(str
) + 1;
116 /* Find out if this is a unique string. */
117 while (offset
< context
->cstr_pool_len
) {
121 str2
= &context
->cstr_pool
[offset
];
122 size2
= strlen(str2
) + 1;
123 if (size
== size2
&& !memcmp(str
, str2
, size
- 1)) {
130 if (context
->cstr_pool_len
+ size
> context
->cstr_pool_max
) {
131 context
->cstr_pool_max
= (context
->cstr_pool_len
+ size
+ 0xffff) & ~0xffff;
132 context
->cstr_pool
= realloc(context
->cstr_pool
, context
->cstr_pool_max
);
135 if (!context
->cstr_pool
) {
136 strcpy(context
->error_msg
, "out of memory");
140 offset
= context
->cstr_pool_len
;
141 memcpy(&context
->cstr_pool
[offset
], str
, size
);
142 context
->cstr_pool_len
+= size
;
148 sl_pp_context_cstr(const struct sl_pp_context
*context
,
154 return &context
->cstr_pool
[offset
];