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_context.h"
31 #include "sl_pp_process.h"
32 #include "sl_pp_public.h"
36 sl_pp_context_add_extension(struct sl_pp_context
*context
,
39 struct sl_pp_extension ext
;
41 if (context
->num_extensions
== SL_PP_MAX_EXTENSIONS
) {
45 ext
.name
= sl_pp_context_add_unique_str(context
, name
);
50 context
->extensions
[context
->num_extensions
++] = ext
;
55 sl_pp_process_extension(struct sl_pp_context
*context
,
56 const struct sl_pp_token_info
*input
,
59 struct sl_pp_process_state
*state
)
61 int extension_name
= -1;
63 struct sl_pp_token_info out
;
65 /* Grab the extension name. */
66 if (first
< last
&& input
[first
].token
== SL_PP_IDENTIFIER
) {
67 extension_name
= input
[first
].data
.identifier
;
70 if (extension_name
== -1) {
71 strcpy(context
->error_msg
, "expected identifier after `#extension'");
75 /* Make sure the extension is supported. */
76 if (extension_name
== context
->dict
.all
) {
77 out
.data
.extension
= extension_name
;
81 out
.data
.extension
= -1;
82 for (i
= 0; i
< context
->num_extensions
; i
++) {
83 if (extension_name
== context
->extensions
[i
].name
) {
84 out
.data
.extension
= extension_name
;
90 /* Grab the colon separating the extension name and behavior. */
91 while (first
< last
&& input
[first
].token
== SL_PP_WHITESPACE
) {
94 if (first
< last
&& input
[first
].token
== SL_PP_COLON
) {
97 strcpy(context
->error_msg
, "expected `:' after extension name");
100 while (first
< last
&& input
[first
].token
== SL_PP_WHITESPACE
) {
104 /* Grab the behavior name. */
105 if (first
< last
&& input
[first
].token
== SL_PP_IDENTIFIER
) {
106 behavior
= input
[first
].data
.identifier
;
109 if (behavior
== -1) {
110 strcpy(context
->error_msg
, "expected identifier after `:'");
114 if (behavior
== context
->dict
.require
) {
115 if (out
.data
.extension
== -1) {
116 strcpy(context
->error_msg
, "the required extension is not supported");
119 if (out
.data
.extension
== context
->dict
.all
) {
120 strcpy(context
->error_msg
, "invalid behavior for `all' extension: `require'");
123 out
.token
= SL_PP_EXTENSION_REQUIRE
;
124 } else if (behavior
== context
->dict
.enable
) {
125 if (out
.data
.extension
== -1) {
126 /* Warning: the extension cannot be enabled. */
129 if (out
.data
.extension
== context
->dict
.all
) {
130 strcpy(context
->error_msg
, "invalid behavior for `all' extension: `enable'");
133 out
.token
= SL_PP_EXTENSION_ENABLE
;
134 } else if (behavior
== context
->dict
.warn
) {
135 if (out
.data
.extension
== -1) {
136 /* Warning: the extension is not supported. */
139 out
.token
= SL_PP_EXTENSION_WARN
;
140 } else if (behavior
== context
->dict
.disable
) {
141 if (out
.data
.extension
== -1) {
142 /* Warning: the extension is not supported. */
145 out
.token
= SL_PP_EXTENSION_DISABLE
;
147 strcpy(context
->error_msg
, "unrecognised behavior name");
151 /* Grab the end of line. */
152 while (first
< last
&& input
[first
].token
== SL_PP_WHITESPACE
) {
156 strcpy(context
->error_msg
, "expected end of line after behavior name");
160 if (sl_pp_process_out(state
, &out
)) {