xref: /onnv-gate/usr/src/uts/intel/io/acpica/parser/pstree.c (revision 7851:e828bbb1689c)
1*7851SDana.Myers@Sun.COM /******************************************************************************
2*7851SDana.Myers@Sun.COM  *
3*7851SDana.Myers@Sun.COM  * Module Name: pstree - Parser op tree manipulation/traversal/search
4*7851SDana.Myers@Sun.COM  *              $Revision: 1.52 $
5*7851SDana.Myers@Sun.COM  *
6*7851SDana.Myers@Sun.COM  *****************************************************************************/
7*7851SDana.Myers@Sun.COM 
8*7851SDana.Myers@Sun.COM /******************************************************************************
9*7851SDana.Myers@Sun.COM  *
10*7851SDana.Myers@Sun.COM  * 1. Copyright Notice
11*7851SDana.Myers@Sun.COM  *
12*7851SDana.Myers@Sun.COM  * Some or all of this work - Copyright (c) 1999 - 2008, Intel Corp.
13*7851SDana.Myers@Sun.COM  * All rights reserved.
14*7851SDana.Myers@Sun.COM  *
15*7851SDana.Myers@Sun.COM  * 2. License
16*7851SDana.Myers@Sun.COM  *
17*7851SDana.Myers@Sun.COM  * 2.1. This is your license from Intel Corp. under its intellectual property
18*7851SDana.Myers@Sun.COM  * rights.  You may have additional license terms from the party that provided
19*7851SDana.Myers@Sun.COM  * you this software, covering your right to use that party's intellectual
20*7851SDana.Myers@Sun.COM  * property rights.
21*7851SDana.Myers@Sun.COM  *
22*7851SDana.Myers@Sun.COM  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
23*7851SDana.Myers@Sun.COM  * copy of the source code appearing in this file ("Covered Code") an
24*7851SDana.Myers@Sun.COM  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
25*7851SDana.Myers@Sun.COM  * base code distributed originally by Intel ("Original Intel Code") to copy,
26*7851SDana.Myers@Sun.COM  * make derivatives, distribute, use and display any portion of the Covered
27*7851SDana.Myers@Sun.COM  * Code in any form, with the right to sublicense such rights; and
28*7851SDana.Myers@Sun.COM  *
29*7851SDana.Myers@Sun.COM  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
30*7851SDana.Myers@Sun.COM  * license (with the right to sublicense), under only those claims of Intel
31*7851SDana.Myers@Sun.COM  * patents that are infringed by the Original Intel Code, to make, use, sell,
32*7851SDana.Myers@Sun.COM  * offer to sell, and import the Covered Code and derivative works thereof
33*7851SDana.Myers@Sun.COM  * solely to the minimum extent necessary to exercise the above copyright
34*7851SDana.Myers@Sun.COM  * license, and in no event shall the patent license extend to any additions
35*7851SDana.Myers@Sun.COM  * to or modifications of the Original Intel Code.  No other license or right
36*7851SDana.Myers@Sun.COM  * is granted directly or by implication, estoppel or otherwise;
37*7851SDana.Myers@Sun.COM  *
38*7851SDana.Myers@Sun.COM  * The above copyright and patent license is granted only if the following
39*7851SDana.Myers@Sun.COM  * conditions are met:
40*7851SDana.Myers@Sun.COM  *
41*7851SDana.Myers@Sun.COM  * 3. Conditions
42*7851SDana.Myers@Sun.COM  *
43*7851SDana.Myers@Sun.COM  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
44*7851SDana.Myers@Sun.COM  * Redistribution of source code of any substantial portion of the Covered
45*7851SDana.Myers@Sun.COM  * Code or modification with rights to further distribute source must include
46*7851SDana.Myers@Sun.COM  * the above Copyright Notice, the above License, this list of Conditions,
47*7851SDana.Myers@Sun.COM  * and the following Disclaimer and Export Compliance provision.  In addition,
48*7851SDana.Myers@Sun.COM  * Licensee must cause all Covered Code to which Licensee contributes to
49*7851SDana.Myers@Sun.COM  * contain a file documenting the changes Licensee made to create that Covered
50*7851SDana.Myers@Sun.COM  * Code and the date of any change.  Licensee must include in that file the
51*7851SDana.Myers@Sun.COM  * documentation of any changes made by any predecessor Licensee.  Licensee
52*7851SDana.Myers@Sun.COM  * must include a prominent statement that the modification is derived,
53*7851SDana.Myers@Sun.COM  * directly or indirectly, from Original Intel Code.
54*7851SDana.Myers@Sun.COM  *
55*7851SDana.Myers@Sun.COM  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
56*7851SDana.Myers@Sun.COM  * Redistribution of source code of any substantial portion of the Covered
57*7851SDana.Myers@Sun.COM  * Code or modification without rights to further distribute source must
58*7851SDana.Myers@Sun.COM  * include the following Disclaimer and Export Compliance provision in the
59*7851SDana.Myers@Sun.COM  * documentation and/or other materials provided with distribution.  In
60*7851SDana.Myers@Sun.COM  * addition, Licensee may not authorize further sublicense of source of any
61*7851SDana.Myers@Sun.COM  * portion of the Covered Code, and must include terms to the effect that the
62*7851SDana.Myers@Sun.COM  * license from Licensee to its licensee is limited to the intellectual
63*7851SDana.Myers@Sun.COM  * property embodied in the software Licensee provides to its licensee, and
64*7851SDana.Myers@Sun.COM  * not to intellectual property embodied in modifications its licensee may
65*7851SDana.Myers@Sun.COM  * make.
66*7851SDana.Myers@Sun.COM  *
67*7851SDana.Myers@Sun.COM  * 3.3. Redistribution of Executable. Redistribution in executable form of any
68*7851SDana.Myers@Sun.COM  * substantial portion of the Covered Code or modification must reproduce the
69*7851SDana.Myers@Sun.COM  * above Copyright Notice, and the following Disclaimer and Export Compliance
70*7851SDana.Myers@Sun.COM  * provision in the documentation and/or other materials provided with the
71*7851SDana.Myers@Sun.COM  * distribution.
72*7851SDana.Myers@Sun.COM  *
73*7851SDana.Myers@Sun.COM  * 3.4. Intel retains all right, title, and interest in and to the Original
74*7851SDana.Myers@Sun.COM  * Intel Code.
75*7851SDana.Myers@Sun.COM  *
76*7851SDana.Myers@Sun.COM  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
77*7851SDana.Myers@Sun.COM  * Intel shall be used in advertising or otherwise to promote the sale, use or
78*7851SDana.Myers@Sun.COM  * other dealings in products derived from or relating to the Covered Code
79*7851SDana.Myers@Sun.COM  * without prior written authorization from Intel.
80*7851SDana.Myers@Sun.COM  *
81*7851SDana.Myers@Sun.COM  * 4. Disclaimer and Export Compliance
82*7851SDana.Myers@Sun.COM  *
83*7851SDana.Myers@Sun.COM  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
84*7851SDana.Myers@Sun.COM  * HERE.  ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
85*7851SDana.Myers@Sun.COM  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT,  ASSISTANCE,
86*7851SDana.Myers@Sun.COM  * INSTALLATION, TRAINING OR OTHER SERVICES.  INTEL WILL NOT PROVIDE ANY
87*7851SDana.Myers@Sun.COM  * UPDATES, ENHANCEMENTS OR EXTENSIONS.  INTEL SPECIFICALLY DISCLAIMS ANY
88*7851SDana.Myers@Sun.COM  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
89*7851SDana.Myers@Sun.COM  * PARTICULAR PURPOSE.
90*7851SDana.Myers@Sun.COM  *
91*7851SDana.Myers@Sun.COM  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
92*7851SDana.Myers@Sun.COM  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
93*7851SDana.Myers@Sun.COM  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
94*7851SDana.Myers@Sun.COM  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
95*7851SDana.Myers@Sun.COM  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
96*7851SDana.Myers@Sun.COM  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES.  THESE LIMITATIONS
97*7851SDana.Myers@Sun.COM  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
98*7851SDana.Myers@Sun.COM  * LIMITED REMEDY.
99*7851SDana.Myers@Sun.COM  *
100*7851SDana.Myers@Sun.COM  * 4.3. Licensee shall not export, either directly or indirectly, any of this
101*7851SDana.Myers@Sun.COM  * software or system incorporating such software without first obtaining any
102*7851SDana.Myers@Sun.COM  * required license or other approval from the U. S. Department of Commerce or
103*7851SDana.Myers@Sun.COM  * any other agency or department of the United States Government.  In the
104*7851SDana.Myers@Sun.COM  * event Licensee exports any such software from the United States or
105*7851SDana.Myers@Sun.COM  * re-exports any such software from a foreign destination, Licensee shall
106*7851SDana.Myers@Sun.COM  * ensure that the distribution and export/re-export of the software is in
107*7851SDana.Myers@Sun.COM  * compliance with all laws, regulations, orders, or other restrictions of the
108*7851SDana.Myers@Sun.COM  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
109*7851SDana.Myers@Sun.COM  * any of its subsidiaries will export/re-export any technical data, process,
110*7851SDana.Myers@Sun.COM  * software, or service, directly or indirectly, to any country for which the
111*7851SDana.Myers@Sun.COM  * United States government or any agency thereof requires an export license,
112*7851SDana.Myers@Sun.COM  * other governmental approval, or letter of assurance, without first obtaining
113*7851SDana.Myers@Sun.COM  * such license, approval or letter.
114*7851SDana.Myers@Sun.COM  *
115*7851SDana.Myers@Sun.COM  *****************************************************************************/
116*7851SDana.Myers@Sun.COM 
117*7851SDana.Myers@Sun.COM 
118*7851SDana.Myers@Sun.COM #define __PSTREE_C__
119*7851SDana.Myers@Sun.COM 
120*7851SDana.Myers@Sun.COM #include "acpi.h"
121*7851SDana.Myers@Sun.COM #include "acparser.h"
122*7851SDana.Myers@Sun.COM #include "amlcode.h"
123*7851SDana.Myers@Sun.COM 
124*7851SDana.Myers@Sun.COM #define _COMPONENT          ACPI_PARSER
125*7851SDana.Myers@Sun.COM         ACPI_MODULE_NAME    ("pstree")
126*7851SDana.Myers@Sun.COM 
127*7851SDana.Myers@Sun.COM /* Local prototypes */
128*7851SDana.Myers@Sun.COM 
129*7851SDana.Myers@Sun.COM #ifdef ACPI_OBSOLETE_FUNCTIONS
130*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *
131*7851SDana.Myers@Sun.COM AcpiPsGetChild (
132*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *op);
133*7851SDana.Myers@Sun.COM #endif
134*7851SDana.Myers@Sun.COM 
135*7851SDana.Myers@Sun.COM 
136*7851SDana.Myers@Sun.COM /*******************************************************************************
137*7851SDana.Myers@Sun.COM  *
138*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiPsGetArg
139*7851SDana.Myers@Sun.COM  *
140*7851SDana.Myers@Sun.COM  * PARAMETERS:  Op              - Get an argument for this op
141*7851SDana.Myers@Sun.COM  *              Argn            - Nth argument to get
142*7851SDana.Myers@Sun.COM  *
143*7851SDana.Myers@Sun.COM  * RETURN:      The argument (as an Op object). NULL if argument does not exist
144*7851SDana.Myers@Sun.COM  *
145*7851SDana.Myers@Sun.COM  * DESCRIPTION: Get the specified op's argument.
146*7851SDana.Myers@Sun.COM  *
147*7851SDana.Myers@Sun.COM  ******************************************************************************/
148*7851SDana.Myers@Sun.COM 
149*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *
150*7851SDana.Myers@Sun.COM AcpiPsGetArg (
151*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Op,
152*7851SDana.Myers@Sun.COM     UINT32                  Argn)
153*7851SDana.Myers@Sun.COM {
154*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Arg = NULL;
155*7851SDana.Myers@Sun.COM     const ACPI_OPCODE_INFO  *OpInfo;
156*7851SDana.Myers@Sun.COM 
157*7851SDana.Myers@Sun.COM 
158*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_ENTRY ();
159*7851SDana.Myers@Sun.COM 
160*7851SDana.Myers@Sun.COM 
161*7851SDana.Myers@Sun.COM     /* Get the info structure for this opcode */
162*7851SDana.Myers@Sun.COM 
163*7851SDana.Myers@Sun.COM     OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
164*7851SDana.Myers@Sun.COM     if (OpInfo->Class == AML_CLASS_UNKNOWN)
165*7851SDana.Myers@Sun.COM     {
166*7851SDana.Myers@Sun.COM         /* Invalid opcode or ASCII character */
167*7851SDana.Myers@Sun.COM 
168*7851SDana.Myers@Sun.COM         return (NULL);
169*7851SDana.Myers@Sun.COM     }
170*7851SDana.Myers@Sun.COM 
171*7851SDana.Myers@Sun.COM     /* Check if this opcode requires argument sub-objects */
172*7851SDana.Myers@Sun.COM 
173*7851SDana.Myers@Sun.COM     if (!(OpInfo->Flags & AML_HAS_ARGS))
174*7851SDana.Myers@Sun.COM     {
175*7851SDana.Myers@Sun.COM         /* Has no linked argument objects */
176*7851SDana.Myers@Sun.COM 
177*7851SDana.Myers@Sun.COM         return (NULL);
178*7851SDana.Myers@Sun.COM     }
179*7851SDana.Myers@Sun.COM 
180*7851SDana.Myers@Sun.COM     /* Get the requested argument object */
181*7851SDana.Myers@Sun.COM 
182*7851SDana.Myers@Sun.COM     Arg = Op->Common.Value.Arg;
183*7851SDana.Myers@Sun.COM     while (Arg && Argn)
184*7851SDana.Myers@Sun.COM     {
185*7851SDana.Myers@Sun.COM         Argn--;
186*7851SDana.Myers@Sun.COM         Arg = Arg->Common.Next;
187*7851SDana.Myers@Sun.COM     }
188*7851SDana.Myers@Sun.COM 
189*7851SDana.Myers@Sun.COM     return (Arg);
190*7851SDana.Myers@Sun.COM }
191*7851SDana.Myers@Sun.COM 
192*7851SDana.Myers@Sun.COM 
193*7851SDana.Myers@Sun.COM /*******************************************************************************
194*7851SDana.Myers@Sun.COM  *
195*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiPsAppendArg
196*7851SDana.Myers@Sun.COM  *
197*7851SDana.Myers@Sun.COM  * PARAMETERS:  Op              - Append an argument to this Op.
198*7851SDana.Myers@Sun.COM  *              Arg             - Argument Op to append
199*7851SDana.Myers@Sun.COM  *
200*7851SDana.Myers@Sun.COM  * RETURN:      None.
201*7851SDana.Myers@Sun.COM  *
202*7851SDana.Myers@Sun.COM  * DESCRIPTION: Append an argument to an op's argument list (a NULL arg is OK)
203*7851SDana.Myers@Sun.COM  *
204*7851SDana.Myers@Sun.COM  ******************************************************************************/
205*7851SDana.Myers@Sun.COM 
206*7851SDana.Myers@Sun.COM void
207*7851SDana.Myers@Sun.COM AcpiPsAppendArg (
208*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Op,
209*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Arg)
210*7851SDana.Myers@Sun.COM {
211*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *PrevArg;
212*7851SDana.Myers@Sun.COM     const ACPI_OPCODE_INFO  *OpInfo;
213*7851SDana.Myers@Sun.COM 
214*7851SDana.Myers@Sun.COM 
215*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_ENTRY ();
216*7851SDana.Myers@Sun.COM 
217*7851SDana.Myers@Sun.COM 
218*7851SDana.Myers@Sun.COM     if (!Op)
219*7851SDana.Myers@Sun.COM     {
220*7851SDana.Myers@Sun.COM         return;
221*7851SDana.Myers@Sun.COM     }
222*7851SDana.Myers@Sun.COM 
223*7851SDana.Myers@Sun.COM     /* Get the info structure for this opcode */
224*7851SDana.Myers@Sun.COM 
225*7851SDana.Myers@Sun.COM     OpInfo = AcpiPsGetOpcodeInfo (Op->Common.AmlOpcode);
226*7851SDana.Myers@Sun.COM     if (OpInfo->Class == AML_CLASS_UNKNOWN)
227*7851SDana.Myers@Sun.COM     {
228*7851SDana.Myers@Sun.COM         /* Invalid opcode */
229*7851SDana.Myers@Sun.COM 
230*7851SDana.Myers@Sun.COM         ACPI_ERROR ((AE_INFO, "Invalid AML Opcode: 0x%2.2X",
231*7851SDana.Myers@Sun.COM             Op->Common.AmlOpcode));
232*7851SDana.Myers@Sun.COM         return;
233*7851SDana.Myers@Sun.COM     }
234*7851SDana.Myers@Sun.COM 
235*7851SDana.Myers@Sun.COM     /* Check if this opcode requires argument sub-objects */
236*7851SDana.Myers@Sun.COM 
237*7851SDana.Myers@Sun.COM     if (!(OpInfo->Flags & AML_HAS_ARGS))
238*7851SDana.Myers@Sun.COM     {
239*7851SDana.Myers@Sun.COM         /* Has no linked argument objects */
240*7851SDana.Myers@Sun.COM 
241*7851SDana.Myers@Sun.COM         return;
242*7851SDana.Myers@Sun.COM     }
243*7851SDana.Myers@Sun.COM 
244*7851SDana.Myers@Sun.COM     /* Append the argument to the linked argument list */
245*7851SDana.Myers@Sun.COM 
246*7851SDana.Myers@Sun.COM     if (Op->Common.Value.Arg)
247*7851SDana.Myers@Sun.COM     {
248*7851SDana.Myers@Sun.COM         /* Append to existing argument list */
249*7851SDana.Myers@Sun.COM 
250*7851SDana.Myers@Sun.COM         PrevArg = Op->Common.Value.Arg;
251*7851SDana.Myers@Sun.COM         while (PrevArg->Common.Next)
252*7851SDana.Myers@Sun.COM         {
253*7851SDana.Myers@Sun.COM             PrevArg = PrevArg->Common.Next;
254*7851SDana.Myers@Sun.COM         }
255*7851SDana.Myers@Sun.COM         PrevArg->Common.Next = Arg;
256*7851SDana.Myers@Sun.COM     }
257*7851SDana.Myers@Sun.COM     else
258*7851SDana.Myers@Sun.COM     {
259*7851SDana.Myers@Sun.COM         /* No argument list, this will be the first argument */
260*7851SDana.Myers@Sun.COM 
261*7851SDana.Myers@Sun.COM         Op->Common.Value.Arg = Arg;
262*7851SDana.Myers@Sun.COM     }
263*7851SDana.Myers@Sun.COM 
264*7851SDana.Myers@Sun.COM     /* Set the parent in this arg and any args linked after it */
265*7851SDana.Myers@Sun.COM 
266*7851SDana.Myers@Sun.COM     while (Arg)
267*7851SDana.Myers@Sun.COM     {
268*7851SDana.Myers@Sun.COM         Arg->Common.Parent = Op;
269*7851SDana.Myers@Sun.COM         Arg = Arg->Common.Next;
270*7851SDana.Myers@Sun.COM 
271*7851SDana.Myers@Sun.COM         Op->Common.ArgListLength++;
272*7851SDana.Myers@Sun.COM     }
273*7851SDana.Myers@Sun.COM }
274*7851SDana.Myers@Sun.COM 
275*7851SDana.Myers@Sun.COM 
276*7851SDana.Myers@Sun.COM /*******************************************************************************
277*7851SDana.Myers@Sun.COM  *
278*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiPsGetDepthNext
279*7851SDana.Myers@Sun.COM  *
280*7851SDana.Myers@Sun.COM  * PARAMETERS:  Origin          - Root of subtree to search
281*7851SDana.Myers@Sun.COM  *              Op              - Last (previous) Op that was found
282*7851SDana.Myers@Sun.COM  *
283*7851SDana.Myers@Sun.COM  * RETURN:      Next Op found in the search.
284*7851SDana.Myers@Sun.COM  *
285*7851SDana.Myers@Sun.COM  * DESCRIPTION: Get next op in tree (walking the tree in depth-first order)
286*7851SDana.Myers@Sun.COM  *              Return NULL when reaching "origin" or when walking up from root
287*7851SDana.Myers@Sun.COM  *
288*7851SDana.Myers@Sun.COM  ******************************************************************************/
289*7851SDana.Myers@Sun.COM 
290*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *
291*7851SDana.Myers@Sun.COM AcpiPsGetDepthNext (
292*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Origin,
293*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Op)
294*7851SDana.Myers@Sun.COM {
295*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Next = NULL;
296*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Parent;
297*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Arg;
298*7851SDana.Myers@Sun.COM 
299*7851SDana.Myers@Sun.COM 
300*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_ENTRY ();
301*7851SDana.Myers@Sun.COM 
302*7851SDana.Myers@Sun.COM 
303*7851SDana.Myers@Sun.COM     if (!Op)
304*7851SDana.Myers@Sun.COM     {
305*7851SDana.Myers@Sun.COM         return (NULL);
306*7851SDana.Myers@Sun.COM     }
307*7851SDana.Myers@Sun.COM 
308*7851SDana.Myers@Sun.COM     /* Look for an argument or child */
309*7851SDana.Myers@Sun.COM 
310*7851SDana.Myers@Sun.COM     Next = AcpiPsGetArg (Op, 0);
311*7851SDana.Myers@Sun.COM     if (Next)
312*7851SDana.Myers@Sun.COM     {
313*7851SDana.Myers@Sun.COM         return (Next);
314*7851SDana.Myers@Sun.COM     }
315*7851SDana.Myers@Sun.COM 
316*7851SDana.Myers@Sun.COM     /* Look for a sibling */
317*7851SDana.Myers@Sun.COM 
318*7851SDana.Myers@Sun.COM     Next = Op->Common.Next;
319*7851SDana.Myers@Sun.COM     if (Next)
320*7851SDana.Myers@Sun.COM     {
321*7851SDana.Myers@Sun.COM         return (Next);
322*7851SDana.Myers@Sun.COM     }
323*7851SDana.Myers@Sun.COM 
324*7851SDana.Myers@Sun.COM     /* Look for a sibling of parent */
325*7851SDana.Myers@Sun.COM 
326*7851SDana.Myers@Sun.COM     Parent = Op->Common.Parent;
327*7851SDana.Myers@Sun.COM 
328*7851SDana.Myers@Sun.COM     while (Parent)
329*7851SDana.Myers@Sun.COM     {
330*7851SDana.Myers@Sun.COM         Arg = AcpiPsGetArg (Parent, 0);
331*7851SDana.Myers@Sun.COM         while (Arg && (Arg != Origin) && (Arg != Op))
332*7851SDana.Myers@Sun.COM         {
333*7851SDana.Myers@Sun.COM             Arg = Arg->Common.Next;
334*7851SDana.Myers@Sun.COM         }
335*7851SDana.Myers@Sun.COM 
336*7851SDana.Myers@Sun.COM         if (Arg == Origin)
337*7851SDana.Myers@Sun.COM         {
338*7851SDana.Myers@Sun.COM             /* Reached parent of origin, end search */
339*7851SDana.Myers@Sun.COM 
340*7851SDana.Myers@Sun.COM             return (NULL);
341*7851SDana.Myers@Sun.COM         }
342*7851SDana.Myers@Sun.COM 
343*7851SDana.Myers@Sun.COM         if (Parent->Common.Next)
344*7851SDana.Myers@Sun.COM         {
345*7851SDana.Myers@Sun.COM             /* Found sibling of parent */
346*7851SDana.Myers@Sun.COM 
347*7851SDana.Myers@Sun.COM             return (Parent->Common.Next);
348*7851SDana.Myers@Sun.COM         }
349*7851SDana.Myers@Sun.COM 
350*7851SDana.Myers@Sun.COM         Op = Parent;
351*7851SDana.Myers@Sun.COM         Parent = Parent->Common.Parent;
352*7851SDana.Myers@Sun.COM     }
353*7851SDana.Myers@Sun.COM 
354*7851SDana.Myers@Sun.COM     return (Next);
355*7851SDana.Myers@Sun.COM }
356*7851SDana.Myers@Sun.COM 
357*7851SDana.Myers@Sun.COM 
358*7851SDana.Myers@Sun.COM #ifdef ACPI_OBSOLETE_FUNCTIONS
359*7851SDana.Myers@Sun.COM /*******************************************************************************
360*7851SDana.Myers@Sun.COM  *
361*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiPsGetChild
362*7851SDana.Myers@Sun.COM  *
363*7851SDana.Myers@Sun.COM  * PARAMETERS:  Op              - Get the child of this Op
364*7851SDana.Myers@Sun.COM  *
365*7851SDana.Myers@Sun.COM  * RETURN:      Child Op, Null if none is found.
366*7851SDana.Myers@Sun.COM  *
367*7851SDana.Myers@Sun.COM  * DESCRIPTION: Get op's children or NULL if none
368*7851SDana.Myers@Sun.COM  *
369*7851SDana.Myers@Sun.COM  ******************************************************************************/
370*7851SDana.Myers@Sun.COM 
371*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *
372*7851SDana.Myers@Sun.COM AcpiPsGetChild (
373*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Op)
374*7851SDana.Myers@Sun.COM {
375*7851SDana.Myers@Sun.COM     ACPI_PARSE_OBJECT       *Child = NULL;
376*7851SDana.Myers@Sun.COM 
377*7851SDana.Myers@Sun.COM 
378*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_ENTRY ();
379*7851SDana.Myers@Sun.COM 
380*7851SDana.Myers@Sun.COM 
381*7851SDana.Myers@Sun.COM     switch (Op->Common.AmlOpcode)
382*7851SDana.Myers@Sun.COM     {
383*7851SDana.Myers@Sun.COM     case AML_SCOPE_OP:
384*7851SDana.Myers@Sun.COM     case AML_ELSE_OP:
385*7851SDana.Myers@Sun.COM     case AML_DEVICE_OP:
386*7851SDana.Myers@Sun.COM     case AML_THERMAL_ZONE_OP:
387*7851SDana.Myers@Sun.COM     case AML_INT_METHODCALL_OP:
388*7851SDana.Myers@Sun.COM 
389*7851SDana.Myers@Sun.COM         Child = AcpiPsGetArg (Op, 0);
390*7851SDana.Myers@Sun.COM         break;
391*7851SDana.Myers@Sun.COM 
392*7851SDana.Myers@Sun.COM 
393*7851SDana.Myers@Sun.COM     case AML_BUFFER_OP:
394*7851SDana.Myers@Sun.COM     case AML_PACKAGE_OP:
395*7851SDana.Myers@Sun.COM     case AML_METHOD_OP:
396*7851SDana.Myers@Sun.COM     case AML_IF_OP:
397*7851SDana.Myers@Sun.COM     case AML_WHILE_OP:
398*7851SDana.Myers@Sun.COM     case AML_FIELD_OP:
399*7851SDana.Myers@Sun.COM 
400*7851SDana.Myers@Sun.COM         Child = AcpiPsGetArg (Op, 1);
401*7851SDana.Myers@Sun.COM         break;
402*7851SDana.Myers@Sun.COM 
403*7851SDana.Myers@Sun.COM 
404*7851SDana.Myers@Sun.COM     case AML_POWER_RES_OP:
405*7851SDana.Myers@Sun.COM     case AML_INDEX_FIELD_OP:
406*7851SDana.Myers@Sun.COM 
407*7851SDana.Myers@Sun.COM         Child = AcpiPsGetArg (Op, 2);
408*7851SDana.Myers@Sun.COM         break;
409*7851SDana.Myers@Sun.COM 
410*7851SDana.Myers@Sun.COM 
411*7851SDana.Myers@Sun.COM     case AML_PROCESSOR_OP:
412*7851SDana.Myers@Sun.COM     case AML_BANK_FIELD_OP:
413*7851SDana.Myers@Sun.COM 
414*7851SDana.Myers@Sun.COM         Child = AcpiPsGetArg (Op, 3);
415*7851SDana.Myers@Sun.COM         break;
416*7851SDana.Myers@Sun.COM 
417*7851SDana.Myers@Sun.COM 
418*7851SDana.Myers@Sun.COM     default:
419*7851SDana.Myers@Sun.COM         /* All others have no children */
420*7851SDana.Myers@Sun.COM         break;
421*7851SDana.Myers@Sun.COM     }
422*7851SDana.Myers@Sun.COM 
423*7851SDana.Myers@Sun.COM     return (Child);
424*7851SDana.Myers@Sun.COM }
425*7851SDana.Myers@Sun.COM #endif
426*7851SDana.Myers@Sun.COM 
427*7851SDana.Myers@Sun.COM 
428