xref: /onnv-gate/usr/src/uts/intel/io/acpica/executer/excreate.c (revision 7851:e828bbb1689c)
1*7851SDana.Myers@Sun.COM /******************************************************************************
2*7851SDana.Myers@Sun.COM  *
3*7851SDana.Myers@Sun.COM  * Module Name: excreate - Named object creation
4*7851SDana.Myers@Sun.COM  *              $Revision: 1.117 $
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 
88*7851SDana.Myers@Sun.COM  * UPDATES, ENHANCEMENTS OR EXTENSIONS.  INTEL SPECIFICALLY DISCLAIMS ANY
89*7851SDana.Myers@Sun.COM  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
90*7851SDana.Myers@Sun.COM  * PARTICULAR PURPOSE.
91*7851SDana.Myers@Sun.COM  *
92*7851SDana.Myers@Sun.COM  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
93*7851SDana.Myers@Sun.COM  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
94*7851SDana.Myers@Sun.COM  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
95*7851SDana.Myers@Sun.COM  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
96*7851SDana.Myers@Sun.COM  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
97*7851SDana.Myers@Sun.COM  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES.  THESE LIMITATIONS
98*7851SDana.Myers@Sun.COM  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
99*7851SDana.Myers@Sun.COM  * LIMITED REMEDY.
100*7851SDana.Myers@Sun.COM  *
101*7851SDana.Myers@Sun.COM  * 4.3. Licensee shall not export, either directly or indirectly, any of this
102*7851SDana.Myers@Sun.COM  * software or system incorporating such software without first obtaining any
103*7851SDana.Myers@Sun.COM  * required license or other approval from the U. S. Department of Commerce or
104*7851SDana.Myers@Sun.COM  * any other agency or department of the United States Government.  In the
105*7851SDana.Myers@Sun.COM  * event Licensee exports any such software from the United States or
106*7851SDana.Myers@Sun.COM  * re-exports any such software from a foreign destination, Licensee shall
107*7851SDana.Myers@Sun.COM  * ensure that the distribution and export/re-export of the software is in
108*7851SDana.Myers@Sun.COM  * compliance with all laws, regulations, orders, or other restrictions of the
109*7851SDana.Myers@Sun.COM  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
110*7851SDana.Myers@Sun.COM  * any of its subsidiaries will export/re-export any technical data, process,
111*7851SDana.Myers@Sun.COM  * software, or service, directly or indirectly, to any country for which the
112*7851SDana.Myers@Sun.COM  * United States government or any agency thereof requires an export license,
113*7851SDana.Myers@Sun.COM  * other governmental approval, or letter of assurance, without first obtaining
114*7851SDana.Myers@Sun.COM  * such license, approval or letter.
115*7851SDana.Myers@Sun.COM  *
116*7851SDana.Myers@Sun.COM  *****************************************************************************/
117*7851SDana.Myers@Sun.COM 
118*7851SDana.Myers@Sun.COM #define __EXCREATE_C__
119*7851SDana.Myers@Sun.COM 
120*7851SDana.Myers@Sun.COM #include "acpi.h"
121*7851SDana.Myers@Sun.COM #include "acinterp.h"
122*7851SDana.Myers@Sun.COM #include "amlcode.h"
123*7851SDana.Myers@Sun.COM #include "acnamesp.h"
124*7851SDana.Myers@Sun.COM 
125*7851SDana.Myers@Sun.COM 
126*7851SDana.Myers@Sun.COM #define _COMPONENT          ACPI_EXECUTER
127*7851SDana.Myers@Sun.COM         ACPI_MODULE_NAME    ("excreate")
128*7851SDana.Myers@Sun.COM 
129*7851SDana.Myers@Sun.COM 
130*7851SDana.Myers@Sun.COM #ifndef ACPI_NO_METHOD_EXECUTION
131*7851SDana.Myers@Sun.COM /*******************************************************************************
132*7851SDana.Myers@Sun.COM  *
133*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExCreateAlias
134*7851SDana.Myers@Sun.COM  *
135*7851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState            - Current state, contains operands
136*7851SDana.Myers@Sun.COM  *
137*7851SDana.Myers@Sun.COM  * RETURN:      Status
138*7851SDana.Myers@Sun.COM  *
139*7851SDana.Myers@Sun.COM  * DESCRIPTION: Create a new named alias
140*7851SDana.Myers@Sun.COM  *
141*7851SDana.Myers@Sun.COM  ******************************************************************************/
142*7851SDana.Myers@Sun.COM 
143*7851SDana.Myers@Sun.COM ACPI_STATUS
144*7851SDana.Myers@Sun.COM AcpiExCreateAlias (
145*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
146*7851SDana.Myers@Sun.COM {
147*7851SDana.Myers@Sun.COM     ACPI_NAMESPACE_NODE     *TargetNode;
148*7851SDana.Myers@Sun.COM     ACPI_NAMESPACE_NODE     *AliasNode;
149*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status = AE_OK;
150*7851SDana.Myers@Sun.COM 
151*7851SDana.Myers@Sun.COM 
152*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE (ExCreateAlias);
153*7851SDana.Myers@Sun.COM 
154*7851SDana.Myers@Sun.COM 
155*7851SDana.Myers@Sun.COM     /* Get the source/alias operands (both namespace nodes) */
156*7851SDana.Myers@Sun.COM 
157*7851SDana.Myers@Sun.COM     AliasNode =  (ACPI_NAMESPACE_NODE *) WalkState->Operands[0];
158*7851SDana.Myers@Sun.COM     TargetNode = (ACPI_NAMESPACE_NODE *) WalkState->Operands[1];
159*7851SDana.Myers@Sun.COM 
160*7851SDana.Myers@Sun.COM     if ((TargetNode->Type == ACPI_TYPE_LOCAL_ALIAS)  ||
161*7851SDana.Myers@Sun.COM         (TargetNode->Type == ACPI_TYPE_LOCAL_METHOD_ALIAS))
162*7851SDana.Myers@Sun.COM     {
163*7851SDana.Myers@Sun.COM         /*
164*7851SDana.Myers@Sun.COM          * Dereference an existing alias so that we don't create a chain
165*7851SDana.Myers@Sun.COM          * of aliases.  With this code, we guarantee that an alias is
166*7851SDana.Myers@Sun.COM          * always exactly one level of indirection away from the
167*7851SDana.Myers@Sun.COM          * actual aliased name.
168*7851SDana.Myers@Sun.COM          */
169*7851SDana.Myers@Sun.COM         TargetNode = ACPI_CAST_PTR (ACPI_NAMESPACE_NODE, TargetNode->Object);
170*7851SDana.Myers@Sun.COM     }
171*7851SDana.Myers@Sun.COM 
172*7851SDana.Myers@Sun.COM     /*
173*7851SDana.Myers@Sun.COM      * For objects that can never change (i.e., the NS node will
174*7851SDana.Myers@Sun.COM      * permanently point to the same object), we can simply attach
175*7851SDana.Myers@Sun.COM      * the object to the new NS node.  For other objects (such as
176*7851SDana.Myers@Sun.COM      * Integers, buffers, etc.), we have to point the Alias node
177*7851SDana.Myers@Sun.COM      * to the original Node.
178*7851SDana.Myers@Sun.COM      */
179*7851SDana.Myers@Sun.COM     switch (TargetNode->Type)
180*7851SDana.Myers@Sun.COM     {
181*7851SDana.Myers@Sun.COM 
182*7851SDana.Myers@Sun.COM     /* For these types, the sub-object can change dynamically via a Store */
183*7851SDana.Myers@Sun.COM 
184*7851SDana.Myers@Sun.COM     case ACPI_TYPE_INTEGER:
185*7851SDana.Myers@Sun.COM     case ACPI_TYPE_STRING:
186*7851SDana.Myers@Sun.COM     case ACPI_TYPE_BUFFER:
187*7851SDana.Myers@Sun.COM     case ACPI_TYPE_PACKAGE:
188*7851SDana.Myers@Sun.COM     case ACPI_TYPE_BUFFER_FIELD:
189*7851SDana.Myers@Sun.COM 
190*7851SDana.Myers@Sun.COM     /*
191*7851SDana.Myers@Sun.COM      * These types open a new scope, so we need the NS node in order to access
192*7851SDana.Myers@Sun.COM      * any children.
193*7851SDana.Myers@Sun.COM      */
194*7851SDana.Myers@Sun.COM     case ACPI_TYPE_DEVICE:
195*7851SDana.Myers@Sun.COM     case ACPI_TYPE_POWER:
196*7851SDana.Myers@Sun.COM     case ACPI_TYPE_PROCESSOR:
197*7851SDana.Myers@Sun.COM     case ACPI_TYPE_THERMAL:
198*7851SDana.Myers@Sun.COM     case ACPI_TYPE_LOCAL_SCOPE:
199*7851SDana.Myers@Sun.COM 
200*7851SDana.Myers@Sun.COM         /*
201*7851SDana.Myers@Sun.COM          * The new alias has the type ALIAS and points to the original
202*7851SDana.Myers@Sun.COM          * NS node, not the object itself.
203*7851SDana.Myers@Sun.COM          */
204*7851SDana.Myers@Sun.COM         AliasNode->Type = ACPI_TYPE_LOCAL_ALIAS;
205*7851SDana.Myers@Sun.COM         AliasNode->Object = ACPI_CAST_PTR (ACPI_OPERAND_OBJECT, TargetNode);
206*7851SDana.Myers@Sun.COM         break;
207*7851SDana.Myers@Sun.COM 
208*7851SDana.Myers@Sun.COM     case ACPI_TYPE_METHOD:
209*7851SDana.Myers@Sun.COM 
210*7851SDana.Myers@Sun.COM         /*
211*7851SDana.Myers@Sun.COM          * Control method aliases need to be differentiated
212*7851SDana.Myers@Sun.COM          */
213*7851SDana.Myers@Sun.COM         AliasNode->Type = ACPI_TYPE_LOCAL_METHOD_ALIAS;
214*7851SDana.Myers@Sun.COM         AliasNode->Object = ACPI_CAST_PTR (ACPI_OPERAND_OBJECT, TargetNode);
215*7851SDana.Myers@Sun.COM         break;
216*7851SDana.Myers@Sun.COM 
217*7851SDana.Myers@Sun.COM     default:
218*7851SDana.Myers@Sun.COM 
219*7851SDana.Myers@Sun.COM         /* Attach the original source object to the new Alias Node */
220*7851SDana.Myers@Sun.COM 
221*7851SDana.Myers@Sun.COM         /*
222*7851SDana.Myers@Sun.COM          * The new alias assumes the type of the target, and it points
223*7851SDana.Myers@Sun.COM          * to the same object.  The reference count of the object has an
224*7851SDana.Myers@Sun.COM          * additional reference to prevent deletion out from under either the
225*7851SDana.Myers@Sun.COM          * target node or the alias Node
226*7851SDana.Myers@Sun.COM          */
227*7851SDana.Myers@Sun.COM         Status = AcpiNsAttachObject (AliasNode,
228*7851SDana.Myers@Sun.COM                     AcpiNsGetAttachedObject (TargetNode), TargetNode->Type);
229*7851SDana.Myers@Sun.COM         break;
230*7851SDana.Myers@Sun.COM     }
231*7851SDana.Myers@Sun.COM 
232*7851SDana.Myers@Sun.COM     /* Since both operands are Nodes, we don't need to delete them */
233*7851SDana.Myers@Sun.COM 
234*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
235*7851SDana.Myers@Sun.COM }
236*7851SDana.Myers@Sun.COM 
237*7851SDana.Myers@Sun.COM 
238*7851SDana.Myers@Sun.COM /*******************************************************************************
239*7851SDana.Myers@Sun.COM  *
240*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExCreateEvent
241*7851SDana.Myers@Sun.COM  *
242*7851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState           - Current state
243*7851SDana.Myers@Sun.COM  *
244*7851SDana.Myers@Sun.COM  * RETURN:      Status
245*7851SDana.Myers@Sun.COM  *
246*7851SDana.Myers@Sun.COM  * DESCRIPTION: Create a new event object
247*7851SDana.Myers@Sun.COM  *
248*7851SDana.Myers@Sun.COM  ******************************************************************************/
249*7851SDana.Myers@Sun.COM 
250*7851SDana.Myers@Sun.COM ACPI_STATUS
251*7851SDana.Myers@Sun.COM AcpiExCreateEvent (
252*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
253*7851SDana.Myers@Sun.COM {
254*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status;
255*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc;
256*7851SDana.Myers@Sun.COM 
257*7851SDana.Myers@Sun.COM 
258*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE (ExCreateEvent);
259*7851SDana.Myers@Sun.COM 
260*7851SDana.Myers@Sun.COM 
261*7851SDana.Myers@Sun.COM     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_EVENT);
262*7851SDana.Myers@Sun.COM     if (!ObjDesc)
263*7851SDana.Myers@Sun.COM     {
264*7851SDana.Myers@Sun.COM         Status = AE_NO_MEMORY;
265*7851SDana.Myers@Sun.COM         goto Cleanup;
266*7851SDana.Myers@Sun.COM     }
267*7851SDana.Myers@Sun.COM 
268*7851SDana.Myers@Sun.COM     /*
269*7851SDana.Myers@Sun.COM      * Create the actual OS semaphore, with zero initial units -- meaning
270*7851SDana.Myers@Sun.COM      * that the event is created in an unsignalled state
271*7851SDana.Myers@Sun.COM      */
272*7851SDana.Myers@Sun.COM     Status = AcpiOsCreateSemaphore (ACPI_NO_UNIT_LIMIT, 0,
273*7851SDana.Myers@Sun.COM                 &ObjDesc->Event.OsSemaphore);
274*7851SDana.Myers@Sun.COM     if (ACPI_FAILURE (Status))
275*7851SDana.Myers@Sun.COM     {
276*7851SDana.Myers@Sun.COM         goto Cleanup;
277*7851SDana.Myers@Sun.COM     }
278*7851SDana.Myers@Sun.COM 
279*7851SDana.Myers@Sun.COM     /* Attach object to the Node */
280*7851SDana.Myers@Sun.COM 
281*7851SDana.Myers@Sun.COM     Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) WalkState->Operands[0],
282*7851SDana.Myers@Sun.COM                 ObjDesc, ACPI_TYPE_EVENT);
283*7851SDana.Myers@Sun.COM 
284*7851SDana.Myers@Sun.COM Cleanup:
285*7851SDana.Myers@Sun.COM     /*
286*7851SDana.Myers@Sun.COM      * Remove local reference to the object (on error, will cause deletion
287*7851SDana.Myers@Sun.COM      * of both object and semaphore if present.)
288*7851SDana.Myers@Sun.COM      */
289*7851SDana.Myers@Sun.COM     AcpiUtRemoveReference (ObjDesc);
290*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
291*7851SDana.Myers@Sun.COM }
292*7851SDana.Myers@Sun.COM 
293*7851SDana.Myers@Sun.COM 
294*7851SDana.Myers@Sun.COM /*******************************************************************************
295*7851SDana.Myers@Sun.COM  *
296*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExCreateMutex
297*7851SDana.Myers@Sun.COM  *
298*7851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState           - Current state
299*7851SDana.Myers@Sun.COM  *
300*7851SDana.Myers@Sun.COM  * RETURN:      Status
301*7851SDana.Myers@Sun.COM  *
302*7851SDana.Myers@Sun.COM  * DESCRIPTION: Create a new mutex object
303*7851SDana.Myers@Sun.COM  *
304*7851SDana.Myers@Sun.COM  *              Mutex (Name[0], SyncLevel[1])
305*7851SDana.Myers@Sun.COM  *
306*7851SDana.Myers@Sun.COM  ******************************************************************************/
307*7851SDana.Myers@Sun.COM 
308*7851SDana.Myers@Sun.COM ACPI_STATUS
309*7851SDana.Myers@Sun.COM AcpiExCreateMutex (
310*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
311*7851SDana.Myers@Sun.COM {
312*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status = AE_OK;
313*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc;
314*7851SDana.Myers@Sun.COM 
315*7851SDana.Myers@Sun.COM 
316*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_PTR (ExCreateMutex, ACPI_WALK_OPERANDS);
317*7851SDana.Myers@Sun.COM 
318*7851SDana.Myers@Sun.COM 
319*7851SDana.Myers@Sun.COM     /* Create the new mutex object */
320*7851SDana.Myers@Sun.COM 
321*7851SDana.Myers@Sun.COM     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_MUTEX);
322*7851SDana.Myers@Sun.COM     if (!ObjDesc)
323*7851SDana.Myers@Sun.COM     {
324*7851SDana.Myers@Sun.COM         Status = AE_NO_MEMORY;
325*7851SDana.Myers@Sun.COM         goto Cleanup;
326*7851SDana.Myers@Sun.COM     }
327*7851SDana.Myers@Sun.COM 
328*7851SDana.Myers@Sun.COM     /* Create the actual OS Mutex */
329*7851SDana.Myers@Sun.COM 
330*7851SDana.Myers@Sun.COM     Status = AcpiOsCreateMutex (&ObjDesc->Mutex.OsMutex);
331*7851SDana.Myers@Sun.COM     if (ACPI_FAILURE (Status))
332*7851SDana.Myers@Sun.COM     {
333*7851SDana.Myers@Sun.COM         goto Cleanup;
334*7851SDana.Myers@Sun.COM     }
335*7851SDana.Myers@Sun.COM 
336*7851SDana.Myers@Sun.COM     /* Init object and attach to NS node */
337*7851SDana.Myers@Sun.COM 
338*7851SDana.Myers@Sun.COM     ObjDesc->Mutex.SyncLevel = (UINT8) WalkState->Operands[1]->Integer.Value;
339*7851SDana.Myers@Sun.COM     ObjDesc->Mutex.Node = (ACPI_NAMESPACE_NODE *) WalkState->Operands[0];
340*7851SDana.Myers@Sun.COM 
341*7851SDana.Myers@Sun.COM     Status = AcpiNsAttachObject (ObjDesc->Mutex.Node, ObjDesc, ACPI_TYPE_MUTEX);
342*7851SDana.Myers@Sun.COM 
343*7851SDana.Myers@Sun.COM 
344*7851SDana.Myers@Sun.COM Cleanup:
345*7851SDana.Myers@Sun.COM     /*
346*7851SDana.Myers@Sun.COM      * Remove local reference to the object (on error, will cause deletion
347*7851SDana.Myers@Sun.COM      * of both object and semaphore if present.)
348*7851SDana.Myers@Sun.COM      */
349*7851SDana.Myers@Sun.COM     AcpiUtRemoveReference (ObjDesc);
350*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
351*7851SDana.Myers@Sun.COM }
352*7851SDana.Myers@Sun.COM 
353*7851SDana.Myers@Sun.COM 
354*7851SDana.Myers@Sun.COM /*******************************************************************************
355*7851SDana.Myers@Sun.COM  *
356*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExCreateRegion
357*7851SDana.Myers@Sun.COM  *
358*7851SDana.Myers@Sun.COM  * PARAMETERS:  AmlStart            - Pointer to the region declaration AML
359*7851SDana.Myers@Sun.COM  *              AmlLength           - Max length of the declaration AML
360*7851SDana.Myers@Sun.COM  *              RegionSpace         - SpaceID for the region
361*7851SDana.Myers@Sun.COM  *              WalkState           - Current state
362*7851SDana.Myers@Sun.COM  *
363*7851SDana.Myers@Sun.COM  * RETURN:      Status
364*7851SDana.Myers@Sun.COM  *
365*7851SDana.Myers@Sun.COM  * DESCRIPTION: Create a new operation region object
366*7851SDana.Myers@Sun.COM  *
367*7851SDana.Myers@Sun.COM  ******************************************************************************/
368*7851SDana.Myers@Sun.COM 
369*7851SDana.Myers@Sun.COM ACPI_STATUS
370*7851SDana.Myers@Sun.COM AcpiExCreateRegion (
371*7851SDana.Myers@Sun.COM     UINT8                   *AmlStart,
372*7851SDana.Myers@Sun.COM     UINT32                  AmlLength,
373*7851SDana.Myers@Sun.COM     UINT8                   RegionSpace,
374*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
375*7851SDana.Myers@Sun.COM {
376*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status;
377*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc;
378*7851SDana.Myers@Sun.COM     ACPI_NAMESPACE_NODE     *Node;
379*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *RegionObj2;
380*7851SDana.Myers@Sun.COM 
381*7851SDana.Myers@Sun.COM 
382*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE (ExCreateRegion);
383*7851SDana.Myers@Sun.COM 
384*7851SDana.Myers@Sun.COM 
385*7851SDana.Myers@Sun.COM     /* Get the Namespace Node */
386*7851SDana.Myers@Sun.COM 
387*7851SDana.Myers@Sun.COM     Node = WalkState->Op->Common.Node;
388*7851SDana.Myers@Sun.COM 
389*7851SDana.Myers@Sun.COM     /*
390*7851SDana.Myers@Sun.COM      * If the region object is already attached to this node,
391*7851SDana.Myers@Sun.COM      * just return
392*7851SDana.Myers@Sun.COM      */
393*7851SDana.Myers@Sun.COM     if (AcpiNsGetAttachedObject (Node))
394*7851SDana.Myers@Sun.COM     {
395*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_OK);
396*7851SDana.Myers@Sun.COM     }
397*7851SDana.Myers@Sun.COM 
398*7851SDana.Myers@Sun.COM     /*
399*7851SDana.Myers@Sun.COM      * Space ID must be one of the predefined IDs, or in the user-defined
400*7851SDana.Myers@Sun.COM      * range
401*7851SDana.Myers@Sun.COM      */
402*7851SDana.Myers@Sun.COM     if ((RegionSpace >= ACPI_NUM_PREDEFINED_REGIONS) &&
403*7851SDana.Myers@Sun.COM         (RegionSpace < ACPI_USER_REGION_BEGIN))
404*7851SDana.Myers@Sun.COM     {
405*7851SDana.Myers@Sun.COM         ACPI_ERROR ((AE_INFO, "Invalid AddressSpace type %X", RegionSpace));
406*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_AML_INVALID_SPACE_ID);
407*7851SDana.Myers@Sun.COM     }
408*7851SDana.Myers@Sun.COM 
409*7851SDana.Myers@Sun.COM     ACPI_DEBUG_PRINT ((ACPI_DB_LOAD, "Region Type - %s (%X)\n",
410*7851SDana.Myers@Sun.COM         AcpiUtGetRegionName (RegionSpace), RegionSpace));
411*7851SDana.Myers@Sun.COM 
412*7851SDana.Myers@Sun.COM     /* Create the region descriptor */
413*7851SDana.Myers@Sun.COM 
414*7851SDana.Myers@Sun.COM     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_REGION);
415*7851SDana.Myers@Sun.COM     if (!ObjDesc)
416*7851SDana.Myers@Sun.COM     {
417*7851SDana.Myers@Sun.COM         Status = AE_NO_MEMORY;
418*7851SDana.Myers@Sun.COM         goto Cleanup;
419*7851SDana.Myers@Sun.COM     }
420*7851SDana.Myers@Sun.COM 
421*7851SDana.Myers@Sun.COM     /*
422*7851SDana.Myers@Sun.COM      * Remember location in AML stream of address & length
423*7851SDana.Myers@Sun.COM      * operands since they need to be evaluated at run time.
424*7851SDana.Myers@Sun.COM      */
425*7851SDana.Myers@Sun.COM     RegionObj2 = ObjDesc->Common.NextObject;
426*7851SDana.Myers@Sun.COM     RegionObj2->Extra.AmlStart = AmlStart;
427*7851SDana.Myers@Sun.COM     RegionObj2->Extra.AmlLength = AmlLength;
428*7851SDana.Myers@Sun.COM 
429*7851SDana.Myers@Sun.COM     /* Init the region from the operands */
430*7851SDana.Myers@Sun.COM 
431*7851SDana.Myers@Sun.COM     ObjDesc->Region.SpaceId = RegionSpace;
432*7851SDana.Myers@Sun.COM     ObjDesc->Region.Address = 0;
433*7851SDana.Myers@Sun.COM     ObjDesc->Region.Length = 0;
434*7851SDana.Myers@Sun.COM     ObjDesc->Region.Node = Node;
435*7851SDana.Myers@Sun.COM 
436*7851SDana.Myers@Sun.COM     /* Install the new region object in the parent Node */
437*7851SDana.Myers@Sun.COM 
438*7851SDana.Myers@Sun.COM     Status = AcpiNsAttachObject (Node, ObjDesc, ACPI_TYPE_REGION);
439*7851SDana.Myers@Sun.COM 
440*7851SDana.Myers@Sun.COM 
441*7851SDana.Myers@Sun.COM Cleanup:
442*7851SDana.Myers@Sun.COM 
443*7851SDana.Myers@Sun.COM     /* Remove local reference to the object */
444*7851SDana.Myers@Sun.COM 
445*7851SDana.Myers@Sun.COM     AcpiUtRemoveReference (ObjDesc);
446*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
447*7851SDana.Myers@Sun.COM }
448*7851SDana.Myers@Sun.COM 
449*7851SDana.Myers@Sun.COM 
450*7851SDana.Myers@Sun.COM /*******************************************************************************
451*7851SDana.Myers@Sun.COM  *
452*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExCreateProcessor
453*7851SDana.Myers@Sun.COM  *
454*7851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState           - Current state
455*7851SDana.Myers@Sun.COM  *
456*7851SDana.Myers@Sun.COM  * RETURN:      Status
457*7851SDana.Myers@Sun.COM  *
458*7851SDana.Myers@Sun.COM  * DESCRIPTION: Create a new processor object and populate the fields
459*7851SDana.Myers@Sun.COM  *
460*7851SDana.Myers@Sun.COM  *              Processor (Name[0], CpuID[1], PblockAddr[2], PblockLength[3])
461*7851SDana.Myers@Sun.COM  *
462*7851SDana.Myers@Sun.COM  ******************************************************************************/
463*7851SDana.Myers@Sun.COM 
464*7851SDana.Myers@Sun.COM ACPI_STATUS
465*7851SDana.Myers@Sun.COM AcpiExCreateProcessor (
466*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
467*7851SDana.Myers@Sun.COM {
468*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
469*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc;
470*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status;
471*7851SDana.Myers@Sun.COM 
472*7851SDana.Myers@Sun.COM 
473*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_PTR (ExCreateProcessor, WalkState);
474*7851SDana.Myers@Sun.COM 
475*7851SDana.Myers@Sun.COM 
476*7851SDana.Myers@Sun.COM     /* Create the processor object */
477*7851SDana.Myers@Sun.COM 
478*7851SDana.Myers@Sun.COM     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_PROCESSOR);
479*7851SDana.Myers@Sun.COM     if (!ObjDesc)
480*7851SDana.Myers@Sun.COM     {
481*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_NO_MEMORY);
482*7851SDana.Myers@Sun.COM     }
483*7851SDana.Myers@Sun.COM 
484*7851SDana.Myers@Sun.COM     /* Initialize the processor object from the operands */
485*7851SDana.Myers@Sun.COM 
486*7851SDana.Myers@Sun.COM     ObjDesc->Processor.ProcId = (UINT8) Operand[1]->Integer.Value;
487*7851SDana.Myers@Sun.COM     ObjDesc->Processor.Length = (UINT8) Operand[3]->Integer.Value;
488*7851SDana.Myers@Sun.COM     ObjDesc->Processor.Address = (ACPI_IO_ADDRESS) Operand[2]->Integer.Value;
489*7851SDana.Myers@Sun.COM 
490*7851SDana.Myers@Sun.COM     /* Install the processor object in the parent Node */
491*7851SDana.Myers@Sun.COM 
492*7851SDana.Myers@Sun.COM     Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) Operand[0],
493*7851SDana.Myers@Sun.COM                     ObjDesc, ACPI_TYPE_PROCESSOR);
494*7851SDana.Myers@Sun.COM 
495*7851SDana.Myers@Sun.COM     /* Remove local reference to the object */
496*7851SDana.Myers@Sun.COM 
497*7851SDana.Myers@Sun.COM     AcpiUtRemoveReference (ObjDesc);
498*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
499*7851SDana.Myers@Sun.COM }
500*7851SDana.Myers@Sun.COM 
501*7851SDana.Myers@Sun.COM 
502*7851SDana.Myers@Sun.COM /*******************************************************************************
503*7851SDana.Myers@Sun.COM  *
504*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExCreatePowerResource
505*7851SDana.Myers@Sun.COM  *
506*7851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState           - Current state
507*7851SDana.Myers@Sun.COM  *
508*7851SDana.Myers@Sun.COM  * RETURN:      Status
509*7851SDana.Myers@Sun.COM  *
510*7851SDana.Myers@Sun.COM  * DESCRIPTION: Create a new PowerResource object and populate the fields
511*7851SDana.Myers@Sun.COM  *
512*7851SDana.Myers@Sun.COM  *              PowerResource (Name[0], SystemLevel[1], ResourceOrder[2])
513*7851SDana.Myers@Sun.COM  *
514*7851SDana.Myers@Sun.COM  ******************************************************************************/
515*7851SDana.Myers@Sun.COM 
516*7851SDana.Myers@Sun.COM ACPI_STATUS
517*7851SDana.Myers@Sun.COM AcpiExCreatePowerResource (
518*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
519*7851SDana.Myers@Sun.COM {
520*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
521*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status;
522*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc;
523*7851SDana.Myers@Sun.COM 
524*7851SDana.Myers@Sun.COM 
525*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_PTR (ExCreatePowerResource, WalkState);
526*7851SDana.Myers@Sun.COM 
527*7851SDana.Myers@Sun.COM 
528*7851SDana.Myers@Sun.COM     /* Create the power resource object */
529*7851SDana.Myers@Sun.COM 
530*7851SDana.Myers@Sun.COM     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_POWER);
531*7851SDana.Myers@Sun.COM     if (!ObjDesc)
532*7851SDana.Myers@Sun.COM     {
533*7851SDana.Myers@Sun.COM         return_ACPI_STATUS (AE_NO_MEMORY);
534*7851SDana.Myers@Sun.COM     }
535*7851SDana.Myers@Sun.COM 
536*7851SDana.Myers@Sun.COM     /* Initialize the power object from the operands */
537*7851SDana.Myers@Sun.COM 
538*7851SDana.Myers@Sun.COM     ObjDesc->PowerResource.SystemLevel = (UINT8) Operand[1]->Integer.Value;
539*7851SDana.Myers@Sun.COM     ObjDesc->PowerResource.ResourceOrder = (UINT16) Operand[2]->Integer.Value;
540*7851SDana.Myers@Sun.COM 
541*7851SDana.Myers@Sun.COM     /* Install the  power resource object in the parent Node */
542*7851SDana.Myers@Sun.COM 
543*7851SDana.Myers@Sun.COM     Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) Operand[0],
544*7851SDana.Myers@Sun.COM                     ObjDesc, ACPI_TYPE_POWER);
545*7851SDana.Myers@Sun.COM 
546*7851SDana.Myers@Sun.COM     /* Remove local reference to the object */
547*7851SDana.Myers@Sun.COM 
548*7851SDana.Myers@Sun.COM     AcpiUtRemoveReference (ObjDesc);
549*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
550*7851SDana.Myers@Sun.COM }
551*7851SDana.Myers@Sun.COM #endif
552*7851SDana.Myers@Sun.COM 
553*7851SDana.Myers@Sun.COM 
554*7851SDana.Myers@Sun.COM /*******************************************************************************
555*7851SDana.Myers@Sun.COM  *
556*7851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExCreateMethod
557*7851SDana.Myers@Sun.COM  *
558*7851SDana.Myers@Sun.COM  * PARAMETERS:  AmlStart        - First byte of the method's AML
559*7851SDana.Myers@Sun.COM  *              AmlLength       - AML byte count for this method
560*7851SDana.Myers@Sun.COM  *              WalkState       - Current state
561*7851SDana.Myers@Sun.COM  *
562*7851SDana.Myers@Sun.COM  * RETURN:      Status
563*7851SDana.Myers@Sun.COM  *
564*7851SDana.Myers@Sun.COM  * DESCRIPTION: Create a new method object
565*7851SDana.Myers@Sun.COM  *
566*7851SDana.Myers@Sun.COM  ******************************************************************************/
567*7851SDana.Myers@Sun.COM 
568*7851SDana.Myers@Sun.COM ACPI_STATUS
569*7851SDana.Myers@Sun.COM AcpiExCreateMethod (
570*7851SDana.Myers@Sun.COM     UINT8                   *AmlStart,
571*7851SDana.Myers@Sun.COM     UINT32                  AmlLength,
572*7851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
573*7851SDana.Myers@Sun.COM {
574*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
575*7851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ObjDesc;
576*7851SDana.Myers@Sun.COM     ACPI_STATUS             Status;
577*7851SDana.Myers@Sun.COM     UINT8                   MethodFlags;
578*7851SDana.Myers@Sun.COM 
579*7851SDana.Myers@Sun.COM 
580*7851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_PTR (ExCreateMethod, WalkState);
581*7851SDana.Myers@Sun.COM 
582*7851SDana.Myers@Sun.COM 
583*7851SDana.Myers@Sun.COM     /* Create a new method object */
584*7851SDana.Myers@Sun.COM 
585*7851SDana.Myers@Sun.COM     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_METHOD);
586*7851SDana.Myers@Sun.COM     if (!ObjDesc)
587*7851SDana.Myers@Sun.COM     {
588*7851SDana.Myers@Sun.COM        Status = AE_NO_MEMORY;
589*7851SDana.Myers@Sun.COM        goto Exit;
590*7851SDana.Myers@Sun.COM     }
591*7851SDana.Myers@Sun.COM 
592*7851SDana.Myers@Sun.COM     /* Save the method's AML pointer and length  */
593*7851SDana.Myers@Sun.COM 
594*7851SDana.Myers@Sun.COM     ObjDesc->Method.AmlStart = AmlStart;
595*7851SDana.Myers@Sun.COM     ObjDesc->Method.AmlLength = AmlLength;
596*7851SDana.Myers@Sun.COM 
597*7851SDana.Myers@Sun.COM     /*
598*7851SDana.Myers@Sun.COM      * Disassemble the method flags. Split off the Arg Count
599*7851SDana.Myers@Sun.COM      * for efficiency
600*7851SDana.Myers@Sun.COM      */
601*7851SDana.Myers@Sun.COM     MethodFlags = (UINT8) Operand[1]->Integer.Value;
602*7851SDana.Myers@Sun.COM 
603*7851SDana.Myers@Sun.COM     ObjDesc->Method.MethodFlags = (UINT8) (MethodFlags & ~AML_METHOD_ARG_COUNT);
604*7851SDana.Myers@Sun.COM     ObjDesc->Method.ParamCount = (UINT8) (MethodFlags & AML_METHOD_ARG_COUNT);
605*7851SDana.Myers@Sun.COM 
606*7851SDana.Myers@Sun.COM     /*
607*7851SDana.Myers@Sun.COM      * Get the SyncLevel. If method is serialized, a mutex will be
608*7851SDana.Myers@Sun.COM      * created for this method when it is parsed.
609*7851SDana.Myers@Sun.COM      */
610*7851SDana.Myers@Sun.COM     if (MethodFlags & AML_METHOD_SERIALIZED)
611*7851SDana.Myers@Sun.COM     {
612*7851SDana.Myers@Sun.COM         /*
613*7851SDana.Myers@Sun.COM          * ACPI 1.0: SyncLevel = 0
614*7851SDana.Myers@Sun.COM          * ACPI 2.0: SyncLevel = SyncLevel in method declaration
615*7851SDana.Myers@Sun.COM          */
616*7851SDana.Myers@Sun.COM         ObjDesc->Method.SyncLevel = (UINT8)
617*7851SDana.Myers@Sun.COM             ((MethodFlags & AML_METHOD_SYNCH_LEVEL) >> 4);
618*7851SDana.Myers@Sun.COM     }
619*7851SDana.Myers@Sun.COM 
620*7851SDana.Myers@Sun.COM     /* Attach the new object to the method Node */
621*7851SDana.Myers@Sun.COM 
622*7851SDana.Myers@Sun.COM     Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) Operand[0],
623*7851SDana.Myers@Sun.COM                     ObjDesc, ACPI_TYPE_METHOD);
624*7851SDana.Myers@Sun.COM 
625*7851SDana.Myers@Sun.COM     /* Remove local reference to the object */
626*7851SDana.Myers@Sun.COM 
627*7851SDana.Myers@Sun.COM     AcpiUtRemoveReference (ObjDesc);
628*7851SDana.Myers@Sun.COM 
629*7851SDana.Myers@Sun.COM Exit:
630*7851SDana.Myers@Sun.COM     /* Remove a reference to the operand */
631*7851SDana.Myers@Sun.COM 
632*7851SDana.Myers@Sun.COM     AcpiUtRemoveReference (Operand[1]);
633*7851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
634*7851SDana.Myers@Sun.COM }
635*7851SDana.Myers@Sun.COM 
636*7851SDana.Myers@Sun.COM 
637