* Intel ACPI 20030228 distribution with local DragonFly changes.
[dragonfly.git] / sys / contrib / dev / acpica / pswalk.c
1 /******************************************************************************
2  *
3  * Module Name: pswalk - Parser routines to walk parsed op tree(s)
4  *              $Revision: 68 $
5  *
6  *****************************************************************************/
7
8 /******************************************************************************
9  *
10  * 1. Copyright Notice
11  *
12  * Some or all of this work - Copyright (c) 1999 - 2003, Intel Corp.
13  * All rights reserved.
14  *
15  * 2. License
16  *
17  * 2.1. This is your license from Intel Corp. under its intellectual property
18  * rights.  You may have additional license terms from the party that provided
19  * you this software, covering your right to use that party's intellectual
20  * property rights.
21  *
22  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
23  * copy of the source code appearing in this file ("Covered Code") an
24  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
25  * base code distributed originally by Intel ("Original Intel Code") to copy,
26  * make derivatives, distribute, use and display any portion of the Covered
27  * Code in any form, with the right to sublicense such rights; and
28  *
29  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
30  * license (with the right to sublicense), under only those claims of Intel
31  * patents that are infringed by the Original Intel Code, to make, use, sell,
32  * offer to sell, and import the Covered Code and derivative works thereof
33  * solely to the minimum extent necessary to exercise the above copyright
34  * license, and in no event shall the patent license extend to any additions
35  * to or modifications of the Original Intel Code.  No other license or right
36  * is granted directly or by implication, estoppel or otherwise;
37  *
38  * The above copyright and patent license is granted only if the following
39  * conditions are met:
40  *
41  * 3. Conditions
42  *
43  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
44  * Redistribution of source code of any substantial portion of the Covered
45  * Code or modification with rights to further distribute source must include
46  * the above Copyright Notice, the above License, this list of Conditions,
47  * and the following Disclaimer and Export Compliance provision.  In addition,
48  * Licensee must cause all Covered Code to which Licensee contributes to
49  * contain a file documenting the changes Licensee made to create that Covered
50  * Code and the date of any change.  Licensee must include in that file the
51  * documentation of any changes made by any predecessor Licensee.  Licensee
52  * must include a prominent statement that the modification is derived,
53  * directly or indirectly, from Original Intel Code.
54  *
55  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
56  * Redistribution of source code of any substantial portion of the Covered
57  * Code or modification without rights to further distribute source must
58  * include the following Disclaimer and Export Compliance provision in the
59  * documentation and/or other materials provided with distribution.  In
60  * addition, Licensee may not authorize further sublicense of source of any
61  * portion of the Covered Code, and must include terms to the effect that the
62  * license from Licensee to its licensee is limited to the intellectual
63  * property embodied in the software Licensee provides to its licensee, and
64  * not to intellectual property embodied in modifications its licensee may
65  * make.
66  *
67  * 3.3. Redistribution of Executable. Redistribution in executable form of any
68  * substantial portion of the Covered Code or modification must reproduce the
69  * above Copyright Notice, and the following Disclaimer and Export Compliance
70  * provision in the documentation and/or other materials provided with the
71  * distribution.
72  *
73  * 3.4. Intel retains all right, title, and interest in and to the Original
74  * Intel Code.
75  *
76  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
77  * Intel shall be used in advertising or otherwise to promote the sale, use or
78  * other dealings in products derived from or relating to the Covered Code
79  * without prior written authorization from Intel.
80  *
81  * 4. Disclaimer and Export Compliance
82  *
83  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
84  * HERE.  ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
85  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT,  ASSISTANCE,
86  * INSTALLATION, TRAINING OR OTHER SERVICES.  INTEL WILL NOT PROVIDE ANY
87  * UPDATES, ENHANCEMENTS OR EXTENSIONS.  INTEL SPECIFICALLY DISCLAIMS ANY
88  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
89  * PARTICULAR PURPOSE.
90  *
91  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
92  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
93  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
94  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
95  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
96  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES.  THESE LIMITATIONS
97  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
98  * LIMITED REMEDY.
99  *
100  * 4.3. Licensee shall not export, either directly or indirectly, any of this
101  * software or system incorporating such software without first obtaining any
102  * required license or other approval from the U. S. Department of Commerce or
103  * any other agency or department of the United States Government.  In the
104  * event Licensee exports any such software from the United States or
105  * re-exports any such software from a foreign destination, Licensee shall
106  * ensure that the distribution and export/re-export of the software is in
107  * compliance with all laws, regulations, orders, or other restrictions of the
108  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
109  * any of its subsidiaries will export/re-export any technical data, process,
110  * software, or service, directly or indirectly, to any country for which the
111  * United States government or any agency thereof requires an export license,
112  * other governmental approval, or letter of assurance, without first obtaining
113  * such license, approval or letter.
114  *
115  *****************************************************************************/
116 /* $DragonFly: src/sys/contrib/dev/acpica/Attic/pswalk.c,v 1.1 2003/09/24 03:32:16 drhodus Exp $                                                               */
117
118
119 #include "acpi.h"
120 #include "acparser.h"
121 #include "acdispat.h"
122
123 #define _COMPONENT          ACPI_PARSER
124         ACPI_MODULE_NAME    ("pswalk")
125
126
127 /*******************************************************************************
128  *
129  * FUNCTION:    AcpiPsGetNextWalkOp
130  *
131  * PARAMETERS:  WalkState           - Current state of the walk
132  *              Op                  - Current Op to be walked
133  *              AscendingCallback   - Procedure called when Op is complete
134  *
135  * RETURN:      Status
136  *
137  * DESCRIPTION: Get the next Op in a walk of the parse tree.
138  *
139  ******************************************************************************/
140
141 ACPI_STATUS
142 AcpiPsGetNextWalkOp (
143     ACPI_WALK_STATE         *WalkState,
144     ACPI_PARSE_OBJECT       *Op,
145     ACPI_PARSE_UPWARDS      AscendingCallback)
146 {
147     ACPI_PARSE_OBJECT       *Next;
148     ACPI_PARSE_OBJECT       *Parent;
149     ACPI_PARSE_OBJECT       *GrandParent;
150     ACPI_STATUS             Status;
151
152
153     ACPI_FUNCTION_TRACE_PTR ("PsGetNextWalkOp", Op);
154
155
156     /* Check for a argument only if we are descending in the tree */
157
158     if (WalkState->NextOpInfo != ACPI_NEXT_OP_UPWARD)
159     {
160         /* Look for an argument or child of the current op */
161
162         Next = AcpiPsGetArg (Op, 0);
163         if (Next)
164         {
165             /* Still going downward in tree (Op is not completed yet) */
166
167             WalkState->PrevOp       = Op;
168             WalkState->NextOp       = Next;
169             WalkState->NextOpInfo   = ACPI_NEXT_OP_DOWNWARD;
170
171             return_ACPI_STATUS (AE_OK);
172         }
173
174         /*
175          * No more children, this Op is complete.  Save Next and Parent
176          * in case the Op object gets deleted by the callback routine
177          */
178         Next    = Op->Common.Next;
179         Parent  = Op->Common.Parent;
180
181         WalkState->Op     = Op;
182         WalkState->OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
183         WalkState->Opcode = Op->Common.AmlOpcode;
184
185         Status = AscendingCallback (WalkState);
186
187         /*
188          * If we are back to the starting point, the walk is complete.
189          */
190         if (Op == WalkState->Origin)
191         {
192             /* Reached the point of origin, the walk is complete */
193
194             WalkState->PrevOp       = Op;
195             WalkState->NextOp       = NULL;
196
197             return_ACPI_STATUS (Status);
198         }
199
200         /*
201          * Check for a sibling to the current op.  A sibling means
202          * we are still going "downward" in the tree.
203          */
204         if (Next)
205         {
206             /* There is a sibling, it will be next */
207
208             WalkState->PrevOp       = Op;
209             WalkState->NextOp       = Next;
210             WalkState->NextOpInfo   = ACPI_NEXT_OP_DOWNWARD;
211
212             /* Continue downward */
213
214             return_ACPI_STATUS (Status);
215         }
216
217         /*
218          * Drop into the loop below because we are moving upwards in
219          * the tree
220          */
221     }
222     else
223     {
224         /*
225          * We are resuming a walk, and we were (are) going upward in the tree.
226          * So, we want to drop into the parent loop below.
227          */
228         Parent = Op;
229     }
230
231     /*
232      * Look for a sibling of the current Op's parent
233      * Continue moving up the tree until we find a node that has not been
234      * visited, or we get back to where we started.
235      */
236     while (Parent)
237     {
238         /* We are moving up the tree, therefore this parent Op is complete */
239
240         GrandParent = Parent->Common.Parent;
241         Next        = Parent->Common.Next;
242
243         WalkState->Op     = Parent;
244         WalkState->OpInfo = AcpiPsGetOpcodeInfo (Parent->Common.AmlOpcode);
245         WalkState->Opcode = Parent->Common.AmlOpcode;
246
247         Status = AscendingCallback (WalkState);
248
249         /*
250          * If we are back to the starting point, the walk is complete.
251          */
252         if (Parent == WalkState->Origin)
253         {
254             /* Reached the point of origin, the walk is complete */
255
256             WalkState->PrevOp       = Parent;
257             WalkState->NextOp       = NULL;
258
259             return_ACPI_STATUS (Status);
260         }
261
262         /*
263          * If there is a sibling to this parent (it is not the starting point
264          * Op), then we will visit it.
265          */
266         if (Next)
267         {
268             /* found sibling of parent */
269
270             WalkState->PrevOp       = Parent;
271             WalkState->NextOp       = Next;
272             WalkState->NextOpInfo   = ACPI_NEXT_OP_DOWNWARD;
273
274             return_ACPI_STATUS (Status);
275         }
276
277         /* No siblings, no errors, just move up one more level in the tree */
278
279         Op                  = Parent;
280         Parent              = GrandParent;
281         WalkState->PrevOp   = Op;
282     }
283
284
285     /*
286      * Got all the way to the top of the tree, we must be done!
287      * However, the code should have terminated in the loop above
288      */
289     WalkState->NextOp       = NULL;
290
291     return_ACPI_STATUS (AE_OK);
292 }
293
294
295 /*******************************************************************************
296  *
297  * FUNCTION:    AcpiPsDeleteCompletedOp
298  *
299  * PARAMETERS:  State           - Walk state
300  *              Op              - Completed op
301  *
302  * RETURN:      AE_OK
303  *
304  * DESCRIPTION: Callback function for AcpiPsGetNextWalkOp().  Used during
305  *              AcpiPsDeleteParse tree to delete Op objects when all sub-objects
306  *              have been visited (and deleted.)
307  *
308  ******************************************************************************/
309
310 ACPI_STATUS
311 AcpiPsDeleteCompletedOp (
312     ACPI_WALK_STATE         *WalkState)
313 {
314
315     AcpiPsFreeOp (WalkState->Op);
316     return (AE_OK);
317 }
318
319
320 /*******************************************************************************
321  *
322  * FUNCTION:    AcpiPsDeleteParseTree
323  *
324  * PARAMETERS:  SubtreeRoot         - Root of tree (or subtree) to delete
325  *
326  * RETURN:      None
327  *
328  * DESCRIPTION: Delete a portion of or an entire parse tree.
329  *
330  ******************************************************************************/
331
332 void
333 AcpiPsDeleteParseTree (
334     ACPI_PARSE_OBJECT       *SubtreeRoot)
335 {
336     ACPI_WALK_STATE         *WalkState;
337     ACPI_THREAD_STATE       *Thread;
338     ACPI_STATUS             Status;
339
340
341     ACPI_FUNCTION_TRACE_PTR ("PsDeleteParseTree", SubtreeRoot);
342
343
344     if (!SubtreeRoot)
345     {
346         return_VOID;
347     }
348
349     /* Create and initialize a new walk list */
350
351     Thread = AcpiUtCreateThreadState ();
352     if (!Thread)
353     {
354         return_VOID;
355     }
356
357     WalkState = AcpiDsCreateWalkState (TABLE_ID_DSDT, NULL, NULL, Thread);
358     if (!WalkState)
359     {
360         return_VOID;
361     }
362
363     WalkState->ParseFlags           = 0;
364     WalkState->DescendingCallback   = NULL;
365     WalkState->AscendingCallback    = NULL;
366
367     WalkState->Origin = SubtreeRoot;
368     WalkState->NextOp = SubtreeRoot;
369
370     /* Head downward in the tree */
371
372     WalkState->NextOpInfo = ACPI_NEXT_OP_DOWNWARD;
373
374     /* Visit all nodes in the subtree */
375
376     while (WalkState->NextOp)
377     {
378         Status = AcpiPsGetNextWalkOp (WalkState, WalkState->NextOp,
379                                 AcpiPsDeleteCompletedOp);
380         if (ACPI_FAILURE (Status))
381         {
382             break;
383         }
384     }
385
386     /* We are done with this walk */
387
388     AcpiUtDeleteGenericState (ACPI_CAST_PTR (ACPI_GENERIC_STATE, Thread));
389     AcpiDsDeleteWalkState (WalkState);
390
391     return_VOID;
392 }
393
394