Indentation fix, cleanup.
[AROS.git] / arch / all-pc / acpica / source / components / executer / excreate.c
blob376e1fd77562b8b1bf16b0bed01413fd0e17c310
1 /******************************************************************************
3 * Module Name: excreate - Named object creation
5 *****************************************************************************/
7 /*
8 * Copyright (C) 2000 - 2013, Intel Corp.
9 * All rights reserved.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions, and the following disclaimer,
16 * without modification.
17 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18 * substantially similar to the "NO WARRANTY" disclaimer below
19 * ("Disclaimer") and any redistribution must be conditioned upon
20 * including a substantially similar Disclaimer requirement for further
21 * binary redistribution.
22 * 3. Neither the names of the above-listed copyright holders nor the names
23 * of any contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
26 * Alternatively, this software may be distributed under the terms of the
27 * GNU General Public License ("GPL") version 2 as published by the Free
28 * Software Foundation.
30 * NO WARRANTY
31 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 * POSSIBILITY OF SUCH DAMAGES.
44 #define __EXCREATE_C__
46 #include "acpi.h"
47 #include "accommon.h"
48 #include "acinterp.h"
49 #include "amlcode.h"
50 #include "acnamesp.h"
53 #define _COMPONENT ACPI_EXECUTER
54 ACPI_MODULE_NAME ("excreate")
57 #ifndef ACPI_NO_METHOD_EXECUTION
58 /*******************************************************************************
60 * FUNCTION: AcpiExCreateAlias
62 * PARAMETERS: WalkState - Current state, contains operands
64 * RETURN: Status
66 * DESCRIPTION: Create a new named alias
68 ******************************************************************************/
70 ACPI_STATUS
71 AcpiExCreateAlias (
72 ACPI_WALK_STATE *WalkState)
74 ACPI_NAMESPACE_NODE *TargetNode;
75 ACPI_NAMESPACE_NODE *AliasNode;
76 ACPI_STATUS Status = AE_OK;
79 ACPI_FUNCTION_TRACE (ExCreateAlias);
82 /* Get the source/alias operands (both namespace nodes) */
84 AliasNode = (ACPI_NAMESPACE_NODE *) WalkState->Operands[0];
85 TargetNode = (ACPI_NAMESPACE_NODE *) WalkState->Operands[1];
87 if ((TargetNode->Type == ACPI_TYPE_LOCAL_ALIAS) ||
88 (TargetNode->Type == ACPI_TYPE_LOCAL_METHOD_ALIAS))
91 * Dereference an existing alias so that we don't create a chain
92 * of aliases. With this code, we guarantee that an alias is
93 * always exactly one level of indirection away from the
94 * actual aliased name.
96 TargetNode = ACPI_CAST_PTR (ACPI_NAMESPACE_NODE, TargetNode->Object);
100 * For objects that can never change (i.e., the NS node will
101 * permanently point to the same object), we can simply attach
102 * the object to the new NS node. For other objects (such as
103 * Integers, buffers, etc.), we have to point the Alias node
104 * to the original Node.
106 switch (TargetNode->Type)
109 /* For these types, the sub-object can change dynamically via a Store */
111 case ACPI_TYPE_INTEGER:
112 case ACPI_TYPE_STRING:
113 case ACPI_TYPE_BUFFER:
114 case ACPI_TYPE_PACKAGE:
115 case ACPI_TYPE_BUFFER_FIELD:
117 * These types open a new scope, so we need the NS node in order to access
118 * any children.
120 case ACPI_TYPE_DEVICE:
121 case ACPI_TYPE_POWER:
122 case ACPI_TYPE_PROCESSOR:
123 case ACPI_TYPE_THERMAL:
124 case ACPI_TYPE_LOCAL_SCOPE:
126 * The new alias has the type ALIAS and points to the original
127 * NS node, not the object itself.
129 AliasNode->Type = ACPI_TYPE_LOCAL_ALIAS;
130 AliasNode->Object = ACPI_CAST_PTR (ACPI_OPERAND_OBJECT, TargetNode);
131 break;
133 case ACPI_TYPE_METHOD:
135 * Control method aliases need to be differentiated
137 AliasNode->Type = ACPI_TYPE_LOCAL_METHOD_ALIAS;
138 AliasNode->Object = ACPI_CAST_PTR (ACPI_OPERAND_OBJECT, TargetNode);
139 break;
141 default:
143 /* Attach the original source object to the new Alias Node */
146 * The new alias assumes the type of the target, and it points
147 * to the same object. The reference count of the object has an
148 * additional reference to prevent deletion out from under either the
149 * target node or the alias Node
151 Status = AcpiNsAttachObject (AliasNode,
152 AcpiNsGetAttachedObject (TargetNode), TargetNode->Type);
153 break;
156 /* Since both operands are Nodes, we don't need to delete them */
158 return_ACPI_STATUS (Status);
162 /*******************************************************************************
164 * FUNCTION: AcpiExCreateEvent
166 * PARAMETERS: WalkState - Current state
168 * RETURN: Status
170 * DESCRIPTION: Create a new event object
172 ******************************************************************************/
174 ACPI_STATUS
175 AcpiExCreateEvent (
176 ACPI_WALK_STATE *WalkState)
178 ACPI_STATUS Status;
179 ACPI_OPERAND_OBJECT *ObjDesc;
182 ACPI_FUNCTION_TRACE (ExCreateEvent);
185 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_EVENT);
186 if (!ObjDesc)
188 Status = AE_NO_MEMORY;
189 goto Cleanup;
193 * Create the actual OS semaphore, with zero initial units -- meaning
194 * that the event is created in an unsignalled state
196 Status = AcpiOsCreateSemaphore (ACPI_NO_UNIT_LIMIT, 0,
197 &ObjDesc->Event.OsSemaphore);
198 if (ACPI_FAILURE (Status))
200 goto Cleanup;
203 /* Attach object to the Node */
205 Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) WalkState->Operands[0],
206 ObjDesc, ACPI_TYPE_EVENT);
208 Cleanup:
210 * Remove local reference to the object (on error, will cause deletion
211 * of both object and semaphore if present.)
213 AcpiUtRemoveReference (ObjDesc);
214 return_ACPI_STATUS (Status);
218 /*******************************************************************************
220 * FUNCTION: AcpiExCreateMutex
222 * PARAMETERS: WalkState - Current state
224 * RETURN: Status
226 * DESCRIPTION: Create a new mutex object
228 * Mutex (Name[0], SyncLevel[1])
230 ******************************************************************************/
232 ACPI_STATUS
233 AcpiExCreateMutex (
234 ACPI_WALK_STATE *WalkState)
236 ACPI_STATUS Status = AE_OK;
237 ACPI_OPERAND_OBJECT *ObjDesc;
240 ACPI_FUNCTION_TRACE_PTR (ExCreateMutex, ACPI_WALK_OPERANDS);
243 /* Create the new mutex object */
245 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_MUTEX);
246 if (!ObjDesc)
248 Status = AE_NO_MEMORY;
249 goto Cleanup;
252 /* Create the actual OS Mutex */
254 Status = AcpiOsCreateMutex (&ObjDesc->Mutex.OsMutex);
255 if (ACPI_FAILURE (Status))
257 goto Cleanup;
260 /* Init object and attach to NS node */
262 ObjDesc->Mutex.SyncLevel = (UINT8) WalkState->Operands[1]->Integer.Value;
263 ObjDesc->Mutex.Node = (ACPI_NAMESPACE_NODE *) WalkState->Operands[0];
265 Status = AcpiNsAttachObject (ObjDesc->Mutex.Node, ObjDesc, ACPI_TYPE_MUTEX);
268 Cleanup:
270 * Remove local reference to the object (on error, will cause deletion
271 * of both object and semaphore if present.)
273 AcpiUtRemoveReference (ObjDesc);
274 return_ACPI_STATUS (Status);
278 /*******************************************************************************
280 * FUNCTION: AcpiExCreateRegion
282 * PARAMETERS: AmlStart - Pointer to the region declaration AML
283 * AmlLength - Max length of the declaration AML
284 * SpaceId - Address space ID for the region
285 * WalkState - Current state
287 * RETURN: Status
289 * DESCRIPTION: Create a new operation region object
291 ******************************************************************************/
293 ACPI_STATUS
294 AcpiExCreateRegion (
295 UINT8 *AmlStart,
296 UINT32 AmlLength,
297 UINT8 SpaceId,
298 ACPI_WALK_STATE *WalkState)
300 ACPI_STATUS Status;
301 ACPI_OPERAND_OBJECT *ObjDesc;
302 ACPI_NAMESPACE_NODE *Node;
303 ACPI_OPERAND_OBJECT *RegionObj2;
306 ACPI_FUNCTION_TRACE (ExCreateRegion);
309 /* Get the Namespace Node */
311 Node = WalkState->Op->Common.Node;
314 * If the region object is already attached to this node,
315 * just return
317 if (AcpiNsGetAttachedObject (Node))
319 return_ACPI_STATUS (AE_OK);
323 * Space ID must be one of the predefined IDs, or in the user-defined
324 * range
326 if (!AcpiIsValidSpaceId (SpaceId))
329 * Print an error message, but continue. We don't want to abort
330 * a table load for this exception. Instead, if the region is
331 * actually used at runtime, abort the executing method.
333 ACPI_ERROR ((AE_INFO, "Invalid/unknown Address Space ID: 0x%2.2X", SpaceId));
336 ACPI_DEBUG_PRINT ((ACPI_DB_LOAD, "Region Type - %s (0x%X)\n",
337 AcpiUtGetRegionName (SpaceId), SpaceId));
339 /* Create the region descriptor */
341 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_REGION);
342 if (!ObjDesc)
344 Status = AE_NO_MEMORY;
345 goto Cleanup;
349 * Remember location in AML stream of address & length
350 * operands since they need to be evaluated at run time.
352 RegionObj2 = ObjDesc->Common.NextObject;
353 RegionObj2->Extra.AmlStart = AmlStart;
354 RegionObj2->Extra.AmlLength = AmlLength;
355 if (WalkState->ScopeInfo)
357 RegionObj2->Extra.ScopeNode = WalkState->ScopeInfo->Scope.Node;
359 else
361 RegionObj2->Extra.ScopeNode = Node;
364 /* Init the region from the operands */
366 ObjDesc->Region.SpaceId = SpaceId;
367 ObjDesc->Region.Address = 0;
368 ObjDesc->Region.Length = 0;
369 ObjDesc->Region.Node = Node;
371 /* Install the new region object in the parent Node */
373 Status = AcpiNsAttachObject (Node, ObjDesc, ACPI_TYPE_REGION);
376 Cleanup:
378 /* Remove local reference to the object */
380 AcpiUtRemoveReference (ObjDesc);
381 return_ACPI_STATUS (Status);
385 /*******************************************************************************
387 * FUNCTION: AcpiExCreateProcessor
389 * PARAMETERS: WalkState - Current state
391 * RETURN: Status
393 * DESCRIPTION: Create a new processor object and populate the fields
395 * Processor (Name[0], CpuID[1], PblockAddr[2], PblockLength[3])
397 ******************************************************************************/
399 ACPI_STATUS
400 AcpiExCreateProcessor (
401 ACPI_WALK_STATE *WalkState)
403 ACPI_OPERAND_OBJECT **Operand = &WalkState->Operands[0];
404 ACPI_OPERAND_OBJECT *ObjDesc;
405 ACPI_STATUS Status;
408 ACPI_FUNCTION_TRACE_PTR (ExCreateProcessor, WalkState);
411 /* Create the processor object */
413 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_PROCESSOR);
414 if (!ObjDesc)
416 return_ACPI_STATUS (AE_NO_MEMORY);
419 /* Initialize the processor object from the operands */
421 ObjDesc->Processor.ProcId = (UINT8) Operand[1]->Integer.Value;
422 ObjDesc->Processor.Length = (UINT8) Operand[3]->Integer.Value;
423 ObjDesc->Processor.Address = (ACPI_IO_ADDRESS) Operand[2]->Integer.Value;
425 /* Install the processor object in the parent Node */
427 Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) Operand[0],
428 ObjDesc, ACPI_TYPE_PROCESSOR);
430 /* Remove local reference to the object */
432 AcpiUtRemoveReference (ObjDesc);
433 return_ACPI_STATUS (Status);
437 /*******************************************************************************
439 * FUNCTION: AcpiExCreatePowerResource
441 * PARAMETERS: WalkState - Current state
443 * RETURN: Status
445 * DESCRIPTION: Create a new PowerResource object and populate the fields
447 * PowerResource (Name[0], SystemLevel[1], ResourceOrder[2])
449 ******************************************************************************/
451 ACPI_STATUS
452 AcpiExCreatePowerResource (
453 ACPI_WALK_STATE *WalkState)
455 ACPI_OPERAND_OBJECT **Operand = &WalkState->Operands[0];
456 ACPI_STATUS Status;
457 ACPI_OPERAND_OBJECT *ObjDesc;
460 ACPI_FUNCTION_TRACE_PTR (ExCreatePowerResource, WalkState);
463 /* Create the power resource object */
465 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_POWER);
466 if (!ObjDesc)
468 return_ACPI_STATUS (AE_NO_MEMORY);
471 /* Initialize the power object from the operands */
473 ObjDesc->PowerResource.SystemLevel = (UINT8) Operand[1]->Integer.Value;
474 ObjDesc->PowerResource.ResourceOrder = (UINT16) Operand[2]->Integer.Value;
476 /* Install the power resource object in the parent Node */
478 Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) Operand[0],
479 ObjDesc, ACPI_TYPE_POWER);
481 /* Remove local reference to the object */
483 AcpiUtRemoveReference (ObjDesc);
484 return_ACPI_STATUS (Status);
486 #endif
489 /*******************************************************************************
491 * FUNCTION: AcpiExCreateMethod
493 * PARAMETERS: AmlStart - First byte of the method's AML
494 * AmlLength - AML byte count for this method
495 * WalkState - Current state
497 * RETURN: Status
499 * DESCRIPTION: Create a new method object
501 ******************************************************************************/
503 ACPI_STATUS
504 AcpiExCreateMethod (
505 UINT8 *AmlStart,
506 UINT32 AmlLength,
507 ACPI_WALK_STATE *WalkState)
509 ACPI_OPERAND_OBJECT **Operand = &WalkState->Operands[0];
510 ACPI_OPERAND_OBJECT *ObjDesc;
511 ACPI_STATUS Status;
512 UINT8 MethodFlags;
515 ACPI_FUNCTION_TRACE_PTR (ExCreateMethod, WalkState);
518 /* Create a new method object */
520 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_METHOD);
521 if (!ObjDesc)
523 Status = AE_NO_MEMORY;
524 goto Exit;
527 /* Save the method's AML pointer and length */
529 ObjDesc->Method.AmlStart = AmlStart;
530 ObjDesc->Method.AmlLength = AmlLength;
533 * Disassemble the method flags. Split off the ArgCount, Serialized
534 * flag, and SyncLevel for efficiency.
536 MethodFlags = (UINT8) Operand[1]->Integer.Value;
537 ObjDesc->Method.ParamCount = (UINT8) (MethodFlags & AML_METHOD_ARG_COUNT);
540 * Get the SyncLevel. If method is serialized, a mutex will be
541 * created for this method when it is parsed.
543 if (MethodFlags & AML_METHOD_SERIALIZED)
545 ObjDesc->Method.InfoFlags = ACPI_METHOD_SERIALIZED;
548 * ACPI 1.0: SyncLevel = 0
549 * ACPI 2.0: SyncLevel = SyncLevel in method declaration
551 ObjDesc->Method.SyncLevel = (UINT8)
552 ((MethodFlags & AML_METHOD_SYNC_LEVEL) >> 4);
555 /* Attach the new object to the method Node */
557 Status = AcpiNsAttachObject ((ACPI_NAMESPACE_NODE *) Operand[0],
558 ObjDesc, ACPI_TYPE_METHOD);
560 /* Remove local reference to the object */
562 AcpiUtRemoveReference (ObjDesc);
564 Exit:
565 /* Remove a reference to the operand */
567 AcpiUtRemoveReference (Operand[1]);
568 return_ACPI_STATUS (Status);