cvcompiler.c revision 1.1.1.12 1 1.1 christos /******************************************************************************
2 1.1 christos *
3 1.1 christos * Module Name: cvcompiler - ASL-/ASL+ converter functions
4 1.1 christos *
5 1.1 christos *****************************************************************************/
6 1.1 christos
7 1.1.1.11 christos /******************************************************************************
8 1.1.1.11 christos *
9 1.1.1.11 christos * 1. Copyright Notice
10 1.1.1.11 christos *
11 1.1.1.12 christos * Some or all of this work - Copyright (c) 1999 - 2025, Intel Corp.
12 1.1 christos * All rights reserved.
13 1.1 christos *
14 1.1.1.11 christos * 2. License
15 1.1.1.11 christos *
16 1.1.1.11 christos * 2.1. This is your license from Intel Corp. under its intellectual property
17 1.1.1.11 christos * rights. You may have additional license terms from the party that provided
18 1.1.1.11 christos * you this software, covering your right to use that party's intellectual
19 1.1.1.11 christos * property rights.
20 1.1.1.11 christos *
21 1.1.1.11 christos * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22 1.1.1.11 christos * copy of the source code appearing in this file ("Covered Code") an
23 1.1.1.11 christos * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24 1.1.1.11 christos * base code distributed originally by Intel ("Original Intel Code") to copy,
25 1.1.1.11 christos * make derivatives, distribute, use and display any portion of the Covered
26 1.1.1.11 christos * Code in any form, with the right to sublicense such rights; and
27 1.1.1.11 christos *
28 1.1.1.11 christos * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29 1.1.1.11 christos * license (with the right to sublicense), under only those claims of Intel
30 1.1.1.11 christos * patents that are infringed by the Original Intel Code, to make, use, sell,
31 1.1.1.11 christos * offer to sell, and import the Covered Code and derivative works thereof
32 1.1.1.11 christos * solely to the minimum extent necessary to exercise the above copyright
33 1.1.1.11 christos * license, and in no event shall the patent license extend to any additions
34 1.1.1.11 christos * to or modifications of the Original Intel Code. No other license or right
35 1.1.1.11 christos * is granted directly or by implication, estoppel or otherwise;
36 1.1.1.11 christos *
37 1.1.1.11 christos * The above copyright and patent license is granted only if the following
38 1.1.1.11 christos * conditions are met:
39 1.1.1.11 christos *
40 1.1.1.11 christos * 3. Conditions
41 1.1.1.11 christos *
42 1.1.1.11 christos * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43 1.1.1.11 christos * Redistribution of source code of any substantial portion of the Covered
44 1.1.1.11 christos * Code or modification with rights to further distribute source must include
45 1.1.1.11 christos * the above Copyright Notice, the above License, this list of Conditions,
46 1.1.1.11 christos * and the following Disclaimer and Export Compliance provision. In addition,
47 1.1.1.11 christos * Licensee must cause all Covered Code to which Licensee contributes to
48 1.1.1.11 christos * contain a file documenting the changes Licensee made to create that Covered
49 1.1.1.11 christos * Code and the date of any change. Licensee must include in that file the
50 1.1.1.11 christos * documentation of any changes made by any predecessor Licensee. Licensee
51 1.1.1.11 christos * must include a prominent statement that the modification is derived,
52 1.1.1.11 christos * directly or indirectly, from Original Intel Code.
53 1.1.1.11 christos *
54 1.1.1.11 christos * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55 1.1.1.11 christos * Redistribution of source code of any substantial portion of the Covered
56 1.1.1.11 christos * Code or modification without rights to further distribute source must
57 1.1.1.11 christos * include the following Disclaimer and Export Compliance provision in the
58 1.1.1.11 christos * documentation and/or other materials provided with distribution. In
59 1.1.1.11 christos * addition, Licensee may not authorize further sublicense of source of any
60 1.1.1.11 christos * portion of the Covered Code, and must include terms to the effect that the
61 1.1.1.11 christos * license from Licensee to its licensee is limited to the intellectual
62 1.1.1.11 christos * property embodied in the software Licensee provides to its licensee, and
63 1.1.1.11 christos * not to intellectual property embodied in modifications its licensee may
64 1.1.1.11 christos * make.
65 1.1.1.11 christos *
66 1.1.1.11 christos * 3.3. Redistribution of Executable. Redistribution in executable form of any
67 1.1.1.11 christos * substantial portion of the Covered Code or modification must reproduce the
68 1.1.1.11 christos * above Copyright Notice, and the following Disclaimer and Export Compliance
69 1.1.1.11 christos * provision in the documentation and/or other materials provided with the
70 1.1.1.11 christos * distribution.
71 1.1.1.11 christos *
72 1.1.1.11 christos * 3.4. Intel retains all right, title, and interest in and to the Original
73 1.1.1.11 christos * Intel Code.
74 1.1.1.11 christos *
75 1.1.1.11 christos * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76 1.1.1.11 christos * Intel shall be used in advertising or otherwise to promote the sale, use or
77 1.1.1.11 christos * other dealings in products derived from or relating to the Covered Code
78 1.1.1.11 christos * without prior written authorization from Intel.
79 1.1.1.11 christos *
80 1.1.1.11 christos * 4. Disclaimer and Export Compliance
81 1.1.1.11 christos *
82 1.1.1.11 christos * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83 1.1.1.11 christos * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84 1.1.1.11 christos * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85 1.1.1.11 christos * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86 1.1.1.11 christos * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87 1.1.1.11 christos * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
88 1.1.1.11 christos * PARTICULAR PURPOSE.
89 1.1.1.11 christos *
90 1.1.1.11 christos * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91 1.1.1.11 christos * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92 1.1.1.11 christos * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93 1.1.1.11 christos * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94 1.1.1.11 christos * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95 1.1.1.11 christos * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96 1.1.1.11 christos * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
97 1.1.1.11 christos * LIMITED REMEDY.
98 1.1.1.11 christos *
99 1.1.1.11 christos * 4.3. Licensee shall not export, either directly or indirectly, any of this
100 1.1.1.11 christos * software or system incorporating such software without first obtaining any
101 1.1.1.11 christos * required license or other approval from the U. S. Department of Commerce or
102 1.1.1.11 christos * any other agency or department of the United States Government. In the
103 1.1.1.11 christos * event Licensee exports any such software from the United States or
104 1.1.1.11 christos * re-exports any such software from a foreign destination, Licensee shall
105 1.1.1.11 christos * ensure that the distribution and export/re-export of the software is in
106 1.1.1.11 christos * compliance with all laws, regulations, orders, or other restrictions of the
107 1.1.1.11 christos * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108 1.1.1.11 christos * any of its subsidiaries will export/re-export any technical data, process,
109 1.1.1.11 christos * software, or service, directly or indirectly, to any country for which the
110 1.1.1.11 christos * United States government or any agency thereof requires an export license,
111 1.1.1.11 christos * other governmental approval, or letter of assurance, without first obtaining
112 1.1.1.11 christos * such license, approval or letter.
113 1.1.1.11 christos *
114 1.1.1.11 christos *****************************************************************************
115 1.1.1.11 christos *
116 1.1.1.11 christos * Alternatively, you may choose to be licensed under the terms of the
117 1.1.1.11 christos * following license:
118 1.1.1.11 christos *
119 1.1 christos * Redistribution and use in source and binary forms, with or without
120 1.1 christos * modification, are permitted provided that the following conditions
121 1.1 christos * are met:
122 1.1 christos * 1. Redistributions of source code must retain the above copyright
123 1.1 christos * notice, this list of conditions, and the following disclaimer,
124 1.1 christos * without modification.
125 1.1 christos * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126 1.1 christos * substantially similar to the "NO WARRANTY" disclaimer below
127 1.1 christos * ("Disclaimer") and any redistribution must be conditioned upon
128 1.1 christos * including a substantially similar Disclaimer requirement for further
129 1.1 christos * binary redistribution.
130 1.1 christos * 3. Neither the names of the above-listed copyright holders nor the names
131 1.1 christos * of any contributors may be used to endorse or promote products derived
132 1.1 christos * from this software without specific prior written permission.
133 1.1 christos *
134 1.1 christos * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
135 1.1 christos * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
136 1.1.1.8 christos * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
137 1.1 christos * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
138 1.1.1.11 christos * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
139 1.1.1.11 christos * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
140 1.1.1.11 christos * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
141 1.1.1.11 christos * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
142 1.1.1.11 christos * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
143 1.1.1.11 christos * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
144 1.1.1.11 christos * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
145 1.1.1.11 christos *
146 1.1.1.11 christos * Alternatively, you may choose to be licensed under the terms of the
147 1.1.1.11 christos * GNU General Public License ("GPL") version 2 as published by the Free
148 1.1.1.11 christos * Software Foundation.
149 1.1.1.11 christos *
150 1.1.1.11 christos *****************************************************************************/
151 1.1 christos
152 1.1 christos #include "aslcompiler.h"
153 1.1 christos #include "aslcompiler.y.h"
154 1.1 christos #include "amlcode.h"
155 1.1 christos #include "acapps.h"
156 1.1 christos #include "acconvert.h"
157 1.1 christos
158 1.1 christos
159 1.1 christos /*******************************************************************************
160 1.1 christos *
161 1.1 christos * FUNCTION: CvProcessComment
162 1.1 christos *
163 1.1 christos * PARAMETERS: CurrentState Current comment parse state
164 1.1 christos * StringBuffer Buffer containing the comment being processed
165 1.1 christos * c1 Current input
166 1.1 christos *
167 1.1.1.2 christos * RETURN: None
168 1.1 christos *
169 1.1 christos * DESCRIPTION: Process a single line comment of a c Style comment. This
170 1.1 christos * function captures a line of a c style comment in a char* and
171 1.1.1.6 christos * places the comment in the appropriate global buffer.
172 1.1 christos *
173 1.1 christos ******************************************************************************/
174 1.1 christos
175 1.1 christos void
176 1.1 christos CvProcessComment (
177 1.1 christos ASL_COMMENT_STATE CurrentState,
178 1.1 christos char *StringBuffer,
179 1.1 christos int c1)
180 1.1 christos {
181 1.1 christos UINT64 i;
182 1.1 christos char *LineToken;
183 1.1 christos char *FinalLineToken;
184 1.1 christos BOOLEAN CharStart;
185 1.1 christos char *CommentString;
186 1.1 christos char *FinalCommentString;
187 1.1 christos
188 1.1 christos
189 1.1.1.4 christos if (AcpiGbl_CaptureComments && CurrentState.CaptureComments)
190 1.1 christos {
191 1.1 christos *StringBuffer = (char) c1;
192 1.1 christos ++StringBuffer;
193 1.1 christos *StringBuffer = 0;
194 1.1.1.2 christos
195 1.1 christos CvDbgPrint ("Multi-line comment\n");
196 1.1.1.5 christos CommentString = UtLocalCacheCalloc (strlen (AslGbl_MsgBuffer) + 1);
197 1.1.1.5 christos strcpy (CommentString, AslGbl_MsgBuffer);
198 1.1 christos
199 1.1 christos CvDbgPrint ("CommentString: %s\n", CommentString);
200 1.1 christos
201 1.1 christos /*
202 1.1.1.2 christos * Determine whether if this comment spans multiple lines. If so,
203 1.1.1.2 christos * break apart the comment by storing each line in a different node
204 1.1.1.2 christos * within the comment list. This allows the disassembler to
205 1.1.1.2 christos * properly indent a multi-line comment.
206 1.1 christos */
207 1.1.1.2 christos LineToken = strtok (CommentString, "\n");
208 1.1.1.2 christos
209 1.1.1.2 christos if (LineToken)
210 1.1 christos {
211 1.1.1.3 christos FinalLineToken = UtLocalCacheCalloc (strlen (LineToken) + 1);
212 1.1 christos strcpy (FinalLineToken, LineToken);
213 1.1 christos
214 1.1 christos /* Get rid of any carriage returns */
215 1.1 christos
216 1.1 christos if (FinalLineToken[strlen (FinalLineToken) - 1] == 0x0D)
217 1.1 christos {
218 1.1 christos FinalLineToken[strlen(FinalLineToken)-1] = 0;
219 1.1 christos }
220 1.1.1.2 christos
221 1.1 christos CvAddToCommentList (FinalLineToken);
222 1.1 christos LineToken = strtok (NULL, "\n");
223 1.1 christos while (LineToken != NULL)
224 1.1 christos {
225 1.1 christos /*
226 1.1 christos * It is assumed that each line has some sort of indentation.
227 1.1.1.2 christos * This means that we need to find the first character that
228 1.1.1.2 christos * is not a white space within each line.
229 1.1 christos */
230 1.1 christos CharStart = FALSE;
231 1.1 christos for (i = 0; (i < (strlen (LineToken) + 1)) && !CharStart; i++)
232 1.1 christos {
233 1.1 christos if (LineToken[i] != ' ' && LineToken[i] != '\t')
234 1.1 christos {
235 1.1 christos CharStart = TRUE;
236 1.1 christos LineToken += i-1;
237 1.1 christos LineToken [0] = ' '; /* Pad for Formatting */
238 1.1 christos }
239 1.1 christos }
240 1.1.1.2 christos
241 1.1.1.3 christos FinalLineToken = UtLocalCacheCalloc (strlen (LineToken) + 1);
242 1.1 christos strcat (FinalLineToken, LineToken);
243 1.1 christos
244 1.1 christos /* Get rid of any carriage returns */
245 1.1 christos
246 1.1 christos if (FinalLineToken[strlen (FinalLineToken) - 1] == 0x0D)
247 1.1 christos {
248 1.1 christos FinalLineToken[strlen(FinalLineToken) - 1] = 0;
249 1.1 christos }
250 1.1.1.2 christos
251 1.1 christos CvAddToCommentList (FinalLineToken);
252 1.1 christos LineToken = strtok (NULL,"\n");
253 1.1 christos }
254 1.1 christos }
255 1.1 christos
256 1.1 christos /*
257 1.1.1.2 christos * If this only spans a single line, check to see whether if this
258 1.1.1.2 christos * comment appears on the same line as a line of code. If does,
259 1.1.1.2 christos * retain it's position for stylistic reasons. If it doesn't,
260 1.1.1.2 christos * add it to the comment list so that it can be associated with
261 1.1.1.2 christos * the next node that's created.
262 1.1 christos */
263 1.1 christos else
264 1.1 christos {
265 1.1 christos /*
266 1.1.1.2 christos * If this is not a regular comment, pad with extra spaces that
267 1.1.1.2 christos * appeared in the original source input to retain the original
268 1.1.1.2 christos * spacing.
269 1.1 christos */
270 1.1.1.2 christos FinalCommentString =
271 1.1.1.3 christos UtLocalCacheCalloc (strlen (CommentString) +
272 1.1.1.2 christos CurrentState.SpacesBefore + 1);
273 1.1.1.2 christos
274 1.1.1.2 christos for (i = 0; (CurrentState.CommentType != ASL_COMMENT_STANDARD) &&
275 1.1.1.2 christos (i < CurrentState.SpacesBefore); i++)
276 1.1 christos {
277 1.1 christos FinalCommentString[i] = ' ';
278 1.1 christos }
279 1.1.1.2 christos
280 1.1 christos strcat (FinalCommentString, CommentString);
281 1.1 christos CvPlaceComment (CurrentState.CommentType, FinalCommentString);
282 1.1 christos }
283 1.1 christos }
284 1.1 christos }
285 1.1 christos
286 1.1 christos
287 1.1 christos /*******************************************************************************
288 1.1 christos *
289 1.1 christos * FUNCTION: CvProcessCommentType2
290 1.1 christos *
291 1.1 christos * PARAMETERS: CurrentState Current comment parse state
292 1.1 christos * StringBuffer Buffer containing the comment being processed
293 1.1 christos *
294 1.1 christos * RETURN: none
295 1.1 christos *
296 1.1 christos * DESCRIPTION: Process a single line comment. This function captures a comment
297 1.1.1.6 christos * in a char* and places the comment in the appropriate global
298 1.1 christos * buffer through CvPlaceComment
299 1.1 christos *
300 1.1 christos ******************************************************************************/
301 1.1 christos
302 1.1 christos void
303 1.1 christos CvProcessCommentType2 (
304 1.1 christos ASL_COMMENT_STATE CurrentState,
305 1.1 christos char *StringBuffer)
306 1.1 christos {
307 1.1 christos UINT32 i;
308 1.1 christos char *CommentString;
309 1.1 christos char *FinalCommentString;
310 1.1 christos
311 1.1 christos
312 1.1.1.4 christos if (AcpiGbl_CaptureComments && CurrentState.CaptureComments)
313 1.1 christos {
314 1.1 christos *StringBuffer = 0; /* null terminate */
315 1.1 christos CvDbgPrint ("Single-line comment\n");
316 1.1.1.5 christos CommentString = UtLocalCacheCalloc (strlen (AslGbl_MsgBuffer) + 1);
317 1.1.1.5 christos strcpy (CommentString, AslGbl_MsgBuffer);
318 1.1 christos
319 1.1.1.2 christos /* If this comment lies on the same line as the latest parse op,
320 1.1.1.2 christos * assign it to that op's CommentAfter field. Saving in this field
321 1.1.1.2 christos * will allow us to support comments that come after code on the
322 1.1.1.2 christos * same line as the code itself. For example,
323 1.1 christos * Name(A,"") //comment
324 1.1 christos *
325 1.1 christos * will be retained rather than transformed into
326 1.1 christos *
327 1.1 christos * Name(A,"")
328 1.1 christos * //comment
329 1.1 christos *
330 1.1 christos * For this case, we only need to add one comment since
331 1.1 christos *
332 1.1 christos * Name(A,"") //comment1 //comment2 ... more comments here.
333 1.1 christos *
334 1.1 christos * would be lexically analyzed as a single comment.
335 1.1 christos *
336 1.1.1.6 christos * Create a new string with the appropriate spaces. Since we need
337 1.1 christos * to account for the proper spacing, the actual comment,
338 1.1 christos * extra 2 spaces so that this comment can be converted to the "/ *"
339 1.1.1.2 christos * style and the null terminator, the string would look something
340 1.1.1.2 christos * like:
341 1.1 christos *
342 1.1 christos * [ (spaces) (comment) ( * /) ('\0') ]
343 1.1 christos *
344 1.1 christos */
345 1.1.1.3 christos FinalCommentString = UtLocalCacheCalloc (CurrentState.SpacesBefore +
346 1.1.1.2 christos strlen (CommentString) + 3 + 1);
347 1.1.1.2 christos
348 1.1.1.2 christos for (i = 0; (CurrentState.CommentType != 1) &&
349 1.1.1.2 christos (i < CurrentState.SpacesBefore); i++)
350 1.1 christos {
351 1.1 christos FinalCommentString[i] = ' ';
352 1.1 christos }
353 1.1.1.2 christos
354 1.1 christos strcat (FinalCommentString, CommentString);
355 1.1 christos
356 1.1 christos /* convert to a "/ *" style comment */
357 1.1 christos
358 1.1 christos strcat (FinalCommentString, " */");
359 1.1.1.2 christos FinalCommentString [CurrentState.SpacesBefore +
360 1.1.1.2 christos strlen (CommentString) + 3] = 0;
361 1.1 christos
362 1.1 christos /* get rid of the carriage return */
363 1.1 christos
364 1.1 christos if (FinalCommentString[strlen (FinalCommentString) - 1] == 0x0D)
365 1.1 christos {
366 1.1.1.2 christos FinalCommentString[strlen(FinalCommentString) - 1] = 0;
367 1.1 christos }
368 1.1.1.2 christos
369 1.1 christos CvPlaceComment (CurrentState.CommentType, FinalCommentString);
370 1.1 christos }
371 1.1 christos }
372 1.1 christos
373 1.1 christos
374 1.1 christos /*******************************************************************************
375 1.1 christos *
376 1.1 christos * FUNCTION: CgCalculateCommentLengths
377 1.1 christos *
378 1.1 christos * PARAMETERS: Op - Calculate all comments of this Op
379 1.1 christos *
380 1.1.1.2 christos * RETURN: TotalCommentLength - Length of all comments within this op.
381 1.1 christos *
382 1.1.1.2 christos * DESCRIPTION: Calculate the length that the each comment takes up within Op.
383 1.1.1.6 christos * Comments look like the following: [0xA9 OptionBtye comment 0x00]
384 1.1 christos * therefore, we add 1 + 1 + strlen (comment) + 1 to get the actual
385 1.1 christos * length of this comment.
386 1.1 christos *
387 1.1 christos ******************************************************************************/
388 1.1 christos
389 1.1 christos UINT32
390 1.1 christos CvCalculateCommentLengths(
391 1.1 christos ACPI_PARSE_OBJECT *Op)
392 1.1 christos {
393 1.1 christos UINT32 CommentLength = 0;
394 1.1 christos UINT32 TotalCommentLength = 0;
395 1.1 christos ACPI_COMMENT_NODE *Current = NULL;
396 1.1 christos
397 1.1 christos
398 1.1.1.4 christos if (!AcpiGbl_CaptureComments)
399 1.1 christos {
400 1.1 christos return (0);
401 1.1 christos }
402 1.1 christos
403 1.1.1.2 christos CvDbgPrint ("==Calculating comment lengths for %s\n",
404 1.1.1.2 christos Op->Asl.ParseOpName);
405 1.1.1.2 christos
406 1.1 christos if (Op->Asl.FileChanged)
407 1.1 christos {
408 1.1 christos TotalCommentLength += strlen (Op->Asl.Filename) + 3;
409 1.1 christos
410 1.1 christos if (Op->Asl.ParentFilename &&
411 1.1 christos AcpiUtStricmp (Op->Asl.Filename, Op->Asl.ParentFilename))
412 1.1 christos {
413 1.1 christos TotalCommentLength += strlen (Op->Asl.ParentFilename) + 3;
414 1.1 christos }
415 1.1 christos }
416 1.1.1.2 christos
417 1.1 christos if (Op->Asl.CommentList)
418 1.1 christos {
419 1.1 christos Current = Op->Asl.CommentList;
420 1.1 christos while (Current)
421 1.1 christos {
422 1.1 christos CommentLength = strlen (Current->Comment)+3;
423 1.1 christos CvDbgPrint ("Length of standard comment: %d\n", CommentLength);
424 1.1 christos CvDbgPrint (" Comment string: %s\n\n", Current->Comment);
425 1.1 christos TotalCommentLength += CommentLength;
426 1.1 christos Current = Current->Next;
427 1.1 christos }
428 1.1 christos }
429 1.1.1.2 christos
430 1.1 christos if (Op->Asl.EndBlkComment)
431 1.1 christos {
432 1.1 christos Current = Op->Asl.EndBlkComment;
433 1.1 christos while (Current)
434 1.1 christos {
435 1.1 christos CommentLength = strlen (Current->Comment)+3;
436 1.1 christos CvDbgPrint ("Length of endblkcomment: %d\n", CommentLength);
437 1.1 christos CvDbgPrint (" Comment string: %s\n\n", Current->Comment);
438 1.1 christos TotalCommentLength += CommentLength;
439 1.1 christos Current = Current->Next;
440 1.1 christos }
441 1.1 christos }
442 1.1.1.2 christos
443 1.1 christos if (Op->Asl.InlineComment)
444 1.1 christos {
445 1.1 christos CommentLength = strlen (Op->Asl.InlineComment)+3;
446 1.1 christos CvDbgPrint ("Length of inline comment: %d\n", CommentLength);
447 1.1 christos CvDbgPrint (" Comment string: %s\n\n", Op->Asl.InlineComment);
448 1.1 christos TotalCommentLength += CommentLength;
449 1.1 christos }
450 1.1.1.2 christos
451 1.1 christos if (Op->Asl.EndNodeComment)
452 1.1 christos {
453 1.1 christos CommentLength = strlen(Op->Asl.EndNodeComment)+3;
454 1.1 christos CvDbgPrint ("Length of end node comment +3: %d\n", CommentLength);
455 1.1 christos CvDbgPrint (" Comment string: %s\n\n", Op->Asl.EndNodeComment);
456 1.1 christos TotalCommentLength += CommentLength;
457 1.1 christos }
458 1.1 christos
459 1.1 christos if (Op->Asl.CloseBraceComment)
460 1.1 christos {
461 1.1 christos CommentLength = strlen (Op->Asl.CloseBraceComment)+3;
462 1.1 christos CvDbgPrint ("Length of close brace comment: %d\n", CommentLength);
463 1.1 christos CvDbgPrint (" Comment string: %s\n\n", Op->Asl.CloseBraceComment);
464 1.1 christos TotalCommentLength += CommentLength;
465 1.1 christos }
466 1.1 christos
467 1.1 christos CvDbgPrint("\n\n");
468 1.1.1.2 christos return (TotalCommentLength);
469 1.1 christos }
470 1.1 christos
471 1.1 christos
472 1.1 christos /*******************************************************************************
473 1.1 christos *
474 1.1 christos * FUNCTION: CgWriteAmlDefBlockComment
475 1.1 christos *
476 1.1 christos * PARAMETERS: Op - Current parse op
477 1.1 christos *
478 1.1 christos * RETURN: None
479 1.1 christos *
480 1.1 christos * DESCRIPTION: Write all comments for a particular definition block.
481 1.1 christos * For definition blocks, the comments need to come after the
482 1.1 christos * definition block header. The regular comments above the
483 1.1 christos * definition block would be categorized as
484 1.1 christos * STD_DEFBLK_COMMENT and comments after the closing brace
485 1.1 christos * is categorized as END_DEFBLK_COMMENT.
486 1.1 christos *
487 1.1 christos ******************************************************************************/
488 1.1 christos
489 1.1 christos void
490 1.1 christos CgWriteAmlDefBlockComment(
491 1.1 christos ACPI_PARSE_OBJECT *Op)
492 1.1 christos {
493 1.1 christos UINT8 CommentOption;
494 1.1 christos ACPI_COMMENT_NODE *Current;
495 1.1 christos char *NewFilename;
496 1.1 christos char *Position;
497 1.1 christos char *DirectoryPosition;
498 1.1 christos
499 1.1 christos
500 1.1.1.4 christos if (!AcpiGbl_CaptureComments ||
501 1.1 christos (Op->Asl.ParseOpcode != PARSEOP_DEFINITION_BLOCK))
502 1.1 christos {
503 1.1 christos return;
504 1.1 christos }
505 1.1 christos
506 1.1 christos CvDbgPrint ("Printing comments for a definition block..\n");
507 1.1 christos
508 1.1.1.2 christos /* First, print the file name comment after changing .asl to .dsl */
509 1.1 christos
510 1.1.1.3 christos NewFilename = UtLocalCacheCalloc (strlen (Op->Asl.Filename));
511 1.1 christos strcpy (NewFilename, Op->Asl.Filename);
512 1.1 christos DirectoryPosition = strrchr (NewFilename, '/');
513 1.1 christos Position = strrchr (NewFilename, '.');
514 1.1 christos
515 1.1 christos if (Position && (Position > DirectoryPosition))
516 1.1 christos {
517 1.1 christos /* Tack on the new suffix */
518 1.1 christos
519 1.1 christos Position++;
520 1.1 christos *Position = 0;
521 1.1 christos strcat (Position, FILE_SUFFIX_DISASSEMBLY);
522 1.1 christos }
523 1.1 christos else
524 1.1 christos {
525 1.1 christos /* No dot, add one and then the suffix */
526 1.1 christos
527 1.1 christos strcat (NewFilename, ".");
528 1.1 christos strcat (NewFilename, FILE_SUFFIX_DISASSEMBLY);
529 1.1 christos }
530 1.1 christos
531 1.1 christos CommentOption = FILENAME_COMMENT;
532 1.1 christos CgWriteOneAmlComment(Op, NewFilename, CommentOption);
533 1.1 christos
534 1.1 christos Current = Op->Asl.CommentList;
535 1.1 christos CommentOption = STD_DEFBLK_COMMENT;
536 1.1.1.2 christos
537 1.1 christos while (Current)
538 1.1 christos {
539 1.1 christos CgWriteOneAmlComment(Op, Current->Comment, CommentOption);
540 1.1 christos CvDbgPrint ("Printing comment: %s\n", Current->Comment);
541 1.1 christos Current = Current->Next;
542 1.1 christos }
543 1.1.1.2 christos
544 1.1 christos Op->Asl.CommentList = NULL;
545 1.1 christos
546 1.1.1.2 christos /* Print any Inline comments associated with this node */
547 1.1 christos
548 1.1 christos if (Op->Asl.CloseBraceComment)
549 1.1 christos {
550 1.1 christos CommentOption = END_DEFBLK_COMMENT;
551 1.1 christos CgWriteOneAmlComment(Op, Op->Asl.CloseBraceComment, CommentOption);
552 1.1 christos Op->Asl.CloseBraceComment = NULL;
553 1.1 christos }
554 1.1 christos }
555 1.1 christos
556 1.1 christos
557 1.1 christos /*******************************************************************************
558 1.1 christos *
559 1.1 christos * FUNCTION: CgWriteOneAmlComment
560 1.1 christos *
561 1.1 christos * PARAMETERS: Op - Current parse op
562 1.1 christos * CommentToPrint - Comment that's printed
563 1.1 christos * InputOption - Denotes the comment option.
564 1.1 christos *
565 1.1 christos * RETURN: None
566 1.1 christos *
567 1.1 christos * DESCRIPTION: write a single comment.
568 1.1 christos *
569 1.1 christos ******************************************************************************/
570 1.1 christos
571 1.1 christos void
572 1.1 christos CgWriteOneAmlComment(
573 1.1 christos ACPI_PARSE_OBJECT *Op,
574 1.1 christos char* CommentToPrint,
575 1.1 christos UINT8 InputOption)
576 1.1 christos {
577 1.1.1.2 christos UINT8 CommentOption = InputOption;
578 1.1.1.2 christos UINT8 CommentOpcode = (UINT8) AML_COMMENT_OP;
579 1.1.1.2 christos
580 1.1.1.2 christos
581 1.1.1.2 christos if (!CommentToPrint)
582 1.1.1.2 christos {
583 1.1.1.2 christos return;
584 1.1.1.2 christos }
585 1.1 christos
586 1.1 christos CgLocalWriteAmlData (Op, &CommentOpcode, 1);
587 1.1 christos CgLocalWriteAmlData (Op, &CommentOption, 1);
588 1.1 christos
589 1.1 christos /* The strlen (..) + 1 is to include the null terminator */
590 1.1 christos
591 1.1 christos CgLocalWriteAmlData (Op, CommentToPrint, strlen (CommentToPrint) + 1);
592 1.1 christos }
593 1.1 christos
594 1.1 christos
595 1.1 christos /*******************************************************************************
596 1.1 christos *
597 1.1 christos * FUNCTION: CgWriteAmlComment
598 1.1 christos *
599 1.1 christos * PARAMETERS: Op - Current parse op
600 1.1 christos *
601 1.1 christos * RETURN: None
602 1.1 christos *
603 1.1.1.2 christos * DESCRIPTION: Write all comments pertaining to the current parse op
604 1.1 christos *
605 1.1 christos ******************************************************************************/
606 1.1 christos
607 1.1 christos void
608 1.1 christos CgWriteAmlComment(
609 1.1 christos ACPI_PARSE_OBJECT *Op)
610 1.1 christos {
611 1.1 christos ACPI_COMMENT_NODE *Current;
612 1.1 christos UINT8 CommentOption;
613 1.1 christos char *NewFilename;
614 1.1 christos char *ParentFilename;
615 1.1 christos
616 1.1 christos
617 1.1 christos if ((Op->Asl.ParseOpcode == PARSEOP_DEFINITION_BLOCK) ||
618 1.1.1.4 christos !AcpiGbl_CaptureComments)
619 1.1 christos {
620 1.1 christos return;
621 1.1 christos }
622 1.1 christos
623 1.1 christos /* Print out the filename comment if needed */
624 1.1 christos
625 1.1 christos if (Op->Asl.FileChanged)
626 1.1 christos {
627 1.1 christos
628 1.1.1.2 christos /* First, print the file name comment after changing .asl to .dsl */
629 1.1 christos
630 1.1 christos NewFilename =
631 1.1 christos FlGenerateFilename (Op->Asl.Filename, FILE_SUFFIX_DISASSEMBLY);
632 1.1.1.2 christos if (NewFilename)
633 1.1.1.2 christos {
634 1.1.1.2 christos CvDbgPrint ("Writing file comment, \"%s\" for %s\n",
635 1.1.1.2 christos NewFilename, Op->Asl.ParseOpName);
636 1.1.1.2 christos }
637 1.1.1.2 christos
638 1.1 christos CgWriteOneAmlComment(Op, NewFilename, FILENAME_COMMENT);
639 1.1 christos
640 1.1 christos if (Op->Asl.ParentFilename &&
641 1.1 christos AcpiUtStricmp (Op->Asl.ParentFilename, Op->Asl.Filename))
642 1.1 christos {
643 1.1 christos ParentFilename = FlGenerateFilename (Op->Asl.ParentFilename,
644 1.1 christos FILE_SUFFIX_DISASSEMBLY);
645 1.1 christos CgWriteOneAmlComment(Op, ParentFilename, PARENTFILENAME_COMMENT);
646 1.1 christos }
647 1.1 christos
648 1.1.1.2 christos /* Prevent multiple writes of the same comment */
649 1.1 christos
650 1.1 christos Op->Asl.FileChanged = FALSE;
651 1.1 christos }
652 1.1 christos
653 1.1 christos /*
654 1.1 christos * Regular comments are stored in a list of comments within an Op.
655 1.1 christos * If there is a such list in this node, print out the comment
656 1.1 christos * as byte code.
657 1.1 christos */
658 1.1 christos Current = Op->Asl.CommentList;
659 1.1 christos if (Op->Asl.ParseOpcode == PARSEOP_INCLUDE)
660 1.1 christos {
661 1.1 christos CommentOption = INCLUDE_COMMENT;
662 1.1 christos }
663 1.1 christos else
664 1.1 christos {
665 1.1 christos CommentOption = STANDARD_COMMENT;
666 1.1 christos }
667 1.1 christos
668 1.1 christos while (Current)
669 1.1 christos {
670 1.1 christos CgWriteOneAmlComment(Op, Current->Comment, CommentOption);
671 1.1 christos Current = Current->Next;
672 1.1 christos }
673 1.1.1.2 christos
674 1.1 christos Op->Asl.CommentList = NULL;
675 1.1 christos
676 1.1 christos Current = Op->Asl.EndBlkComment;
677 1.1 christos CommentOption = ENDBLK_COMMENT;
678 1.1 christos while (Current)
679 1.1 christos {
680 1.1 christos CgWriteOneAmlComment(Op, Current->Comment, CommentOption);
681 1.1 christos Current = Current->Next;
682 1.1 christos }
683 1.1.1.2 christos
684 1.1 christos Op->Asl.EndBlkComment = NULL;
685 1.1 christos
686 1.1.1.2 christos /* Print any Inline comments associated with this node */
687 1.1 christos
688 1.1 christos if (Op->Asl.InlineComment)
689 1.1 christos {
690 1.1 christos CommentOption = INLINE_COMMENT;
691 1.1 christos CgWriteOneAmlComment(Op, Op->Asl.InlineComment, CommentOption);
692 1.1 christos Op->Asl.InlineComment = NULL;
693 1.1 christos }
694 1.1 christos
695 1.1 christos if (Op->Asl.EndNodeComment)
696 1.1 christos {
697 1.1 christos CommentOption = ENDNODE_COMMENT;
698 1.1 christos CgWriteOneAmlComment(Op, Op->Asl.EndNodeComment, CommentOption);
699 1.1 christos Op->Asl.EndNodeComment = NULL;
700 1.1 christos }
701 1.1 christos
702 1.1 christos if (Op->Asl.CloseBraceComment)
703 1.1 christos {
704 1.1 christos CommentOption = CLOSE_BRACE_COMMENT;
705 1.1 christos CgWriteOneAmlComment(Op, Op->Asl.CloseBraceComment, CommentOption);
706 1.1 christos Op->Asl.CloseBraceComment = NULL;
707 1.1 christos }
708 1.1 christos }
709 1.1 christos
710 1.1 christos
711 1.1 christos /*******************************************************************************
712 1.1 christos *
713 1.1 christos * FUNCTION: CvCommentNodeCalloc
714 1.1 christos *
715 1.1.1.2 christos * PARAMETERS: None
716 1.1 christos *
717 1.1 christos * RETURN: Pointer to the comment node. Aborts on allocation failure
718 1.1 christos *
719 1.1 christos * DESCRIPTION: Allocate a string node buffer.
720 1.1 christos *
721 1.1 christos ******************************************************************************/
722 1.1 christos
723 1.1.1.2 christos ACPI_COMMENT_NODE *
724 1.1 christos CvCommentNodeCalloc (
725 1.1 christos void)
726 1.1 christos {
727 1.1 christos ACPI_COMMENT_NODE *NewCommentNode;
728 1.1 christos
729 1.1 christos
730 1.1.1.2 christos NewCommentNode = UtLocalCalloc (sizeof (ACPI_COMMENT_NODE));
731 1.1 christos NewCommentNode->Next = NULL;
732 1.1.1.2 christos return (NewCommentNode);
733 1.1 christos }
734 1.1 christos
735 1.1 christos
736 1.1 christos /*******************************************************************************
737 1.1 christos *
738 1.1 christos * FUNCTION: CvParseOpBlockType
739 1.1 christos *
740 1.1 christos * PARAMETERS: Op - Object to be examined
741 1.1 christos *
742 1.1 christos * RETURN: BlockType - not a block, parens, braces, or even both.
743 1.1 christos *
744 1.1 christos * DESCRIPTION: Type of block for this ASL parseop (parens or braces)
745 1.1 christos * keep this in sync with aslprimaries.y, aslresources.y and
746 1.1 christos * aslrules.y
747 1.1 christos *
748 1.1 christos ******************************************************************************/
749 1.1 christos
750 1.1 christos UINT32
751 1.1 christos CvParseOpBlockType (
752 1.1 christos ACPI_PARSE_OBJECT *Op)
753 1.1 christos {
754 1.1.1.2 christos
755 1.1 christos if (!Op)
756 1.1 christos {
757 1.1 christos return (BLOCK_NONE);
758 1.1 christos }
759 1.1 christos
760 1.1 christos switch (Op->Asl.ParseOpcode)
761 1.1 christos {
762 1.1.1.2 christos /* From aslprimaries.y */
763 1.1 christos
764 1.1 christos case PARSEOP_VAR_PACKAGE:
765 1.1 christos case PARSEOP_BANKFIELD:
766 1.1 christos case PARSEOP_BUFFER:
767 1.1 christos case PARSEOP_CASE:
768 1.1 christos case PARSEOP_DEVICE:
769 1.1 christos case PARSEOP_FIELD:
770 1.1 christos case PARSEOP_FOR:
771 1.1 christos case PARSEOP_FUNCTION:
772 1.1 christos case PARSEOP_IF:
773 1.1 christos case PARSEOP_ELSEIF:
774 1.1 christos case PARSEOP_INDEXFIELD:
775 1.1 christos case PARSEOP_METHOD:
776 1.1 christos case PARSEOP_POWERRESOURCE:
777 1.1 christos case PARSEOP_PROCESSOR:
778 1.1 christos case PARSEOP_DATABUFFER:
779 1.1 christos case PARSEOP_SCOPE:
780 1.1 christos case PARSEOP_SWITCH:
781 1.1 christos case PARSEOP_THERMALZONE:
782 1.1 christos case PARSEOP_WHILE:
783 1.1 christos
784 1.1.1.2 christos /* From aslresources.y */
785 1.1 christos
786 1.1 christos case PARSEOP_RESOURCETEMPLATE: /* optional parens */
787 1.1 christos case PARSEOP_VENDORLONG:
788 1.1 christos case PARSEOP_VENDORSHORT:
789 1.1 christos case PARSEOP_INTERRUPT:
790 1.1 christos case PARSEOP_IRQNOFLAGS:
791 1.1 christos case PARSEOP_IRQ:
792 1.1 christos case PARSEOP_GPIO_INT:
793 1.1 christos case PARSEOP_GPIO_IO:
794 1.1 christos case PARSEOP_DMA:
795 1.1 christos
796 1.1.1.2 christos /* From aslrules.y */
797 1.1 christos
798 1.1 christos case PARSEOP_DEFINITION_BLOCK:
799 1.1 christos return (BLOCK_PAREN | BLOCK_BRACE);
800 1.1 christos
801 1.1 christos default:
802 1.1 christos return (BLOCK_NONE);
803 1.1 christos }
804 1.1 christos }
805 1.1 christos
806 1.1 christos
807 1.1 christos /*******************************************************************************
808 1.1 christos *
809 1.1 christos * FUNCTION: CvProcessCommentState
810 1.1 christos *
811 1.1.1.2 christos * PARAMETERS: Input - Input character
812 1.1 christos *
813 1.1 christos * RETURN: None
814 1.1 christos *
815 1.1 christos * DESCRIPTION: Take the given input. If this character is
816 1.1 christos * defined as a comment table entry, then update the state
817 1.1 christos * accordingly.
818 1.1 christos *
819 1.1 christos ******************************************************************************/
820 1.1 christos
821 1.1 christos void
822 1.1 christos CvProcessCommentState (
823 1.1.1.2 christos char Input)
824 1.1 christos {
825 1.1 christos
826 1.1.1.2 christos if (Input != ' ')
827 1.1 christos {
828 1.1.1.5 christos AslGbl_CommentState.SpacesBefore = 0;
829 1.1 christos }
830 1.1 christos
831 1.1.1.2 christos switch (Input)
832 1.1 christos {
833 1.1 christos case '\n':
834 1.1 christos
835 1.1.1.5 christos AslGbl_CommentState.CommentType = ASL_COMMENT_STANDARD;
836 1.1 christos break;
837 1.1 christos
838 1.1 christos case ' ':
839 1.1 christos
840 1.1 christos /* Keep the CommentType the same */
841 1.1 christos
842 1.1.1.5 christos AslGbl_CommentState.SpacesBefore++;
843 1.1 christos break;
844 1.1 christos
845 1.1 christos case '(':
846 1.1 christos
847 1.1.1.5 christos AslGbl_CommentState.CommentType = ASL_COMMENT_OPEN_PAREN;
848 1.1 christos break;
849 1.1 christos
850 1.1 christos case ')':
851 1.1 christos
852 1.1.1.5 christos AslGbl_CommentState.CommentType = ASL_COMMENT_CLOSE_PAREN;
853 1.1 christos break;
854 1.1 christos
855 1.1 christos case '{':
856 1.1 christos
857 1.1.1.5 christos AslGbl_CommentState.CommentType = ASL_COMMENT_STANDARD;
858 1.1.1.5 christos AslGbl_CommentState.ParsingParenBraceNode = NULL;
859 1.1 christos CvDbgPrint ("End Parsing paren/Brace node!\n");
860 1.1 christos break;
861 1.1 christos
862 1.1 christos case '}':
863 1.1 christos
864 1.1.1.5 christos AslGbl_CommentState.CommentType = ASL_COMMENT_CLOSE_BRACE;
865 1.1 christos break;
866 1.1 christos
867 1.1 christos case ',':
868 1.1 christos
869 1.1.1.5 christos AslGbl_CommentState.CommentType = ASLCOMMENT_INLINE;
870 1.1 christos break;
871 1.1 christos
872 1.1 christos default:
873 1.1 christos
874 1.1.1.5 christos AslGbl_CommentState.CommentType = ASLCOMMENT_INLINE;
875 1.1 christos break;
876 1.1 christos }
877 1.1 christos }
878 1.1 christos
879 1.1 christos
880 1.1 christos /*******************************************************************************
881 1.1 christos *
882 1.1 christos * FUNCTION: CvAddToCommentList
883 1.1 christos *
884 1.1.1.2 christos * PARAMETERS: ToAdd - Contains the comment to be inserted
885 1.1 christos *
886 1.1 christos * RETURN: None
887 1.1 christos *
888 1.1 christos * DESCRIPTION: Add the given char* to a list of comments in the global list
889 1.1 christos * of comments.
890 1.1 christos *
891 1.1 christos ******************************************************************************/
892 1.1 christos
893 1.1 christos void
894 1.1 christos CvAddToCommentList (
895 1.1.1.2 christos char *ToAdd)
896 1.1 christos {
897 1.1.1.2 christos
898 1.1.1.5 christos if (AslGbl_CommentListHead)
899 1.1 christos {
900 1.1.1.5 christos AslGbl_CommentListTail->Next = CvCommentNodeCalloc ();
901 1.1.1.5 christos AslGbl_CommentListTail = AslGbl_CommentListTail->Next;
902 1.1 christos }
903 1.1 christos else
904 1.1 christos {
905 1.1.1.5 christos AslGbl_CommentListHead = CvCommentNodeCalloc ();
906 1.1.1.5 christos AslGbl_CommentListTail = AslGbl_CommentListHead;
907 1.1 christos }
908 1.1 christos
909 1.1.1.5 christos AslGbl_CommentListTail->Comment = ToAdd;
910 1.1 christos }
911 1.1 christos
912 1.1.1.2 christos
913 1.1 christos /*******************************************************************************
914 1.1 christos *
915 1.1 christos * FUNCTION: CvAppendInlineComment
916 1.1 christos *
917 1.1 christos * PARAMETERS: InlineComment - Append to the end of this string.
918 1.1 christos * toAdd - Contains the comment to be inserted
919 1.1 christos *
920 1.1 christos * RETURN: Str - toAdd appended to InlineComment
921 1.1 christos *
922 1.1 christos * DESCRIPTION: Concatenate ToAdd to InlineComment
923 1.1 christos *
924 1.1 christos ******************************************************************************/
925 1.1 christos
926 1.1.1.2 christos char *
927 1.1 christos CvAppendInlineComment (
928 1.1 christos char *InlineComment,
929 1.1 christos char *ToAdd)
930 1.1 christos {
931 1.1 christos char* Str;
932 1.1 christos UINT32 Size = 0;
933 1.1 christos
934 1.1 christos
935 1.1 christos if (!InlineComment)
936 1.1 christos {
937 1.1.1.2 christos return (ToAdd);
938 1.1 christos }
939 1.1.1.2 christos
940 1.1.1.2 christos if (!ToAdd)
941 1.1 christos {
942 1.1.1.2 christos return (InlineComment);
943 1.1 christos }
944 1.1.1.2 christos
945 1.1.1.2 christos Size = strlen (ToAdd);
946 1.1 christos Size += strlen (InlineComment);
947 1.1.1.3 christos Str = UtLocalCacheCalloc (Size + 1);
948 1.1.1.2 christos
949 1.1 christos strcpy (Str, InlineComment);
950 1.1 christos strcat (Str, ToAdd);
951 1.1.1.2 christos Str[Size +1] = 0;
952 1.1.1.2 christos return (Str);
953 1.1 christos }
954 1.1 christos
955 1.1 christos
956 1.1 christos /*******************************************************************************
957 1.1 christos *
958 1.1 christos * FUNCTION: CvPlaceComment
959 1.1 christos *
960 1.1.1.2 christos * PARAMETERS: UINT8 - Type
961 1.1.1.2 christos * char * - CommentString
962 1.1 christos *
963 1.1 christos * RETURN: None
964 1.1 christos *
965 1.1 christos * DESCRIPTION: Given type and CommentString, this function places the
966 1.1.1.6 christos * CommentString in the appropriate global comment list or char*
967 1.1 christos *
968 1.1 christos ******************************************************************************/
969 1.1 christos
970 1.1 christos void
971 1.1 christos CvPlaceComment(
972 1.1 christos UINT8 Type,
973 1.1 christos char *CommentString)
974 1.1 christos {
975 1.1 christos ACPI_PARSE_OBJECT *LatestParseNode;
976 1.1 christos ACPI_PARSE_OBJECT *ParenBraceNode;
977 1.1 christos
978 1.1 christos
979 1.1.1.5 christos LatestParseNode = AslGbl_CommentState.LatestParseOp;
980 1.1.1.5 christos ParenBraceNode = AslGbl_CommentState.ParsingParenBraceNode;
981 1.1 christos CvDbgPrint ("Placing comment %s for type %d\n", CommentString, Type);
982 1.1 christos
983 1.1 christos switch (Type)
984 1.1 christos {
985 1.1 christos case ASL_COMMENT_STANDARD:
986 1.1 christos
987 1.1 christos CvAddToCommentList (CommentString);
988 1.1 christos break;
989 1.1 christos
990 1.1 christos case ASLCOMMENT_INLINE:
991 1.1 christos
992 1.1 christos LatestParseNode->Asl.InlineComment =
993 1.1 christos CvAppendInlineComment (LatestParseNode->Asl.InlineComment,
994 1.1 christos CommentString);
995 1.1 christos break;
996 1.1 christos
997 1.1 christos case ASL_COMMENT_OPEN_PAREN:
998 1.1 christos
999 1.1.1.5 christos AslGbl_InlineCommentBuffer =
1000 1.1.1.5 christos CvAppendInlineComment(AslGbl_InlineCommentBuffer,
1001 1.1 christos CommentString);
1002 1.1 christos break;
1003 1.1 christos
1004 1.1 christos case ASL_COMMENT_CLOSE_PAREN:
1005 1.1 christos
1006 1.1 christos if (ParenBraceNode)
1007 1.1 christos {
1008 1.1 christos ParenBraceNode->Asl.EndNodeComment =
1009 1.1 christos CvAppendInlineComment (ParenBraceNode->Asl.EndNodeComment,
1010 1.1 christos CommentString);
1011 1.1 christos }
1012 1.1 christos else
1013 1.1 christos {
1014 1.1 christos LatestParseNode->Asl.EndNodeComment =
1015 1.1 christos CvAppendInlineComment (LatestParseNode->Asl.EndNodeComment,
1016 1.1 christos CommentString);
1017 1.1 christos }
1018 1.1 christos break;
1019 1.1 christos
1020 1.1 christos case ASL_COMMENT_CLOSE_BRACE:
1021 1.1 christos
1022 1.1 christos LatestParseNode->Asl.CloseBraceComment = CommentString;
1023 1.1 christos break;
1024 1.1 christos
1025 1.1 christos default:
1026 1.1 christos
1027 1.1 christos break;
1028 1.1 christos }
1029 1.1 christos }
1030