Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /****************************************************************************** |
2 | * | |
3 | * Module Name: dsobject - Dispatcher object management routines | |
4 | * | |
5 | *****************************************************************************/ | |
6 | ||
7 | /* | |
6c9deb72 | 8 | * Copyright (C) 2000 - 2007, R. Byron Moore |
1da177e4 LT |
9 | * All rights reserved. |
10 | * | |
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. | |
25 | * | |
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. | |
29 | * | |
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. | |
42 | */ | |
43 | ||
1da177e4 LT |
44 | #include <acpi/acpi.h> |
45 | #include <acpi/acparser.h> | |
46 | #include <acpi/amlcode.h> | |
47 | #include <acpi/acdispat.h> | |
48 | #include <acpi/acnamesp.h> | |
49 | #include <acpi/acinterp.h> | |
50 | ||
51 | #define _COMPONENT ACPI_DISPATCHER | |
4be44fcd | 52 | ACPI_MODULE_NAME("dsobject") |
1da177e4 | 53 | |
defba1d8 | 54 | /* Local prototypes */ |
44f6c012 | 55 | static acpi_status |
4be44fcd LB |
56 | acpi_ds_build_internal_object(struct acpi_walk_state *walk_state, |
57 | union acpi_parse_object *op, | |
58 | union acpi_operand_object **obj_desc_ptr); | |
1da177e4 LT |
59 | |
60 | #ifndef ACPI_NO_METHOD_EXECUTION | |
44f6c012 | 61 | /******************************************************************************* |
1da177e4 LT |
62 | * |
63 | * FUNCTION: acpi_ds_build_internal_object | |
64 | * | |
65 | * PARAMETERS: walk_state - Current walk state | |
66 | * Op - Parser object to be translated | |
67 | * obj_desc_ptr - Where the ACPI internal object is returned | |
68 | * | |
69 | * RETURN: Status | |
70 | * | |
71 | * DESCRIPTION: Translate a parser Op object to the equivalent namespace object | |
72 | * Simple objects are any objects other than a package object! | |
73 | * | |
44f6c012 | 74 | ******************************************************************************/ |
1da177e4 | 75 | |
44f6c012 | 76 | static acpi_status |
4be44fcd LB |
77 | acpi_ds_build_internal_object(struct acpi_walk_state *walk_state, |
78 | union acpi_parse_object *op, | |
79 | union acpi_operand_object **obj_desc_ptr) | |
1da177e4 | 80 | { |
4be44fcd LB |
81 | union acpi_operand_object *obj_desc; |
82 | acpi_status status; | |
1da177e4 | 83 | |
b229cf92 | 84 | ACPI_FUNCTION_TRACE(ds_build_internal_object); |
1da177e4 LT |
85 | |
86 | *obj_desc_ptr = NULL; | |
87 | if (op->common.aml_opcode == AML_INT_NAMEPATH_OP) { | |
88 | /* | |
defba1d8 | 89 | * This is a named object reference. If this name was |
1da177e4 LT |
90 | * previously looked up in the namespace, it was stored in this op. |
91 | * Otherwise, go ahead and look it up now | |
92 | */ | |
93 | if (!op->common.node) { | |
4be44fcd LB |
94 | status = acpi_ns_lookup(walk_state->scope_info, |
95 | op->common.value.string, | |
96 | ACPI_TYPE_ANY, | |
97 | ACPI_IMODE_EXECUTE, | |
98 | ACPI_NS_SEARCH_PARENT | | |
99 | ACPI_NS_DONT_OPEN_SCOPE, NULL, | |
defba1d8 BM |
100 | ACPI_CAST_INDIRECT_PTR(struct |
101 | acpi_namespace_node, | |
102 | &(op-> | |
103 | common. | |
104 | node))); | |
4be44fcd | 105 | if (ACPI_FAILURE(status)) { |
52fc0b02 | 106 | |
defba1d8 BM |
107 | /* Check if we are resolving a named reference within a package */ |
108 | ||
109 | if ((status == AE_NOT_FOUND) | |
110 | && (acpi_gbl_enable_interpreter_slack) | |
111 | && | |
112 | ((op->common.parent->common.aml_opcode == | |
113 | AML_PACKAGE_OP) | |
114 | || (op->common.parent->common.aml_opcode == | |
115 | AML_VAR_PACKAGE_OP))) { | |
116 | /* | |
117 | * We didn't find the target and we are populating elements | |
118 | * of a package - ignore if slack enabled. Some ASL code | |
119 | * contains dangling invalid references in packages and | |
120 | * expects that no exception will be issued. Leave the | |
121 | * element as a null element. It cannot be used, but it | |
122 | * can be overwritten by subsequent ASL code - this is | |
123 | * typically the case. | |
124 | */ | |
125 | ACPI_DEBUG_PRINT((ACPI_DB_INFO, | |
126 | "Ignoring unresolved reference in package [%4.4s]\n", | |
127 | walk_state-> | |
128 | scope_info->scope. | |
129 | node->name.ascii)); | |
130 | ||
131 | return_ACPI_STATUS(AE_OK); | |
132 | } else { | |
b8e4d893 BM |
133 | ACPI_ERROR_NAMESPACE(op->common.value. |
134 | string, status); | |
defba1d8 BM |
135 | } |
136 | ||
4be44fcd | 137 | return_ACPI_STATUS(status); |
1da177e4 LT |
138 | } |
139 | } | |
152c300d BM |
140 | |
141 | /* Special object resolution for elements of a package */ | |
142 | ||
143 | if ((op->common.parent->common.aml_opcode == AML_PACKAGE_OP) || | |
144 | (op->common.parent->common.aml_opcode == | |
145 | AML_VAR_PACKAGE_OP)) { | |
146 | /* | |
147 | * Attempt to resolve the node to a value before we insert it into | |
148 | * the package. If this is a reference to a common data type, | |
149 | * resolve it immediately. According to the ACPI spec, package | |
150 | * elements can only be "data objects" or method references. | |
151 | * Attempt to resolve to an Integer, Buffer, String or Package. | |
152 | * If cannot, return the named reference (for things like Devices, | |
153 | * Methods, etc.) Buffer Fields and Fields will resolve to simple | |
154 | * objects (int/buf/str/pkg). | |
155 | * | |
156 | * NOTE: References to things like Devices, Methods, Mutexes, etc. | |
157 | * will remain as named references. This behavior is not described | |
158 | * in the ACPI spec, but it appears to be an oversight. | |
159 | */ | |
b7f9f042 BM |
160 | obj_desc = |
161 | ACPI_CAST_PTR(union acpi_operand_object, | |
162 | op->common.node); | |
152c300d BM |
163 | |
164 | status = | |
165 | acpi_ex_resolve_node_to_value(ACPI_CAST_INDIRECT_PTR | |
166 | (struct | |
167 | acpi_namespace_node, | |
168 | &obj_desc), | |
169 | walk_state); | |
170 | if (ACPI_FAILURE(status)) { | |
171 | return_ACPI_STATUS(status); | |
172 | } | |
173 | ||
174 | switch (op->common.node->type) { | |
175 | /* | |
176 | * For these types, we need the actual node, not the subobject. | |
9e41d93c BM |
177 | * However, the subobject did not get an extra reference count above. |
178 | * | |
179 | * TBD: should ex_resolve_node_to_value be changed to fix this? | |
180 | */ | |
181 | case ACPI_TYPE_DEVICE: | |
182 | case ACPI_TYPE_THERMAL: | |
183 | ||
184 | acpi_ut_add_reference(op->common.node->object); | |
185 | ||
186 | /*lint -fallthrough */ | |
187 | /* | |
188 | * For these types, we need the actual node, not the subobject. | |
189 | * The subobject got an extra reference count in ex_resolve_node_to_value. | |
152c300d BM |
190 | */ |
191 | case ACPI_TYPE_MUTEX: | |
192 | case ACPI_TYPE_METHOD: | |
193 | case ACPI_TYPE_POWER: | |
194 | case ACPI_TYPE_PROCESSOR: | |
195 | case ACPI_TYPE_EVENT: | |
196 | case ACPI_TYPE_REGION: | |
152c300d | 197 | |
9e41d93c | 198 | /* We will create a reference object for these types below */ |
152c300d BM |
199 | break; |
200 | ||
201 | default: | |
9e41d93c BM |
202 | /* |
203 | * All other types - the node was resolved to an actual | |
204 | * object, we are done. | |
205 | */ | |
152c300d BM |
206 | goto exit; |
207 | } | |
208 | } | |
1da177e4 LT |
209 | } |
210 | ||
defba1d8 | 211 | /* Create and init a new internal ACPI object */ |
1da177e4 | 212 | |
4be44fcd LB |
213 | obj_desc = acpi_ut_create_internal_object((acpi_ps_get_opcode_info |
214 | (op->common.aml_opcode))-> | |
215 | object_type); | |
1da177e4 | 216 | if (!obj_desc) { |
4be44fcd | 217 | return_ACPI_STATUS(AE_NO_MEMORY); |
1da177e4 LT |
218 | } |
219 | ||
4be44fcd LB |
220 | status = |
221 | acpi_ds_init_object_from_op(walk_state, op, op->common.aml_opcode, | |
222 | &obj_desc); | |
223 | if (ACPI_FAILURE(status)) { | |
224 | acpi_ut_remove_reference(obj_desc); | |
225 | return_ACPI_STATUS(status); | |
1da177e4 LT |
226 | } |
227 | ||
152c300d | 228 | exit: |
1da177e4 | 229 | *obj_desc_ptr = obj_desc; |
9e41d93c | 230 | return_ACPI_STATUS(status); |
1da177e4 LT |
231 | } |
232 | ||
44f6c012 | 233 | /******************************************************************************* |
1da177e4 LT |
234 | * |
235 | * FUNCTION: acpi_ds_build_internal_buffer_obj | |
236 | * | |
237 | * PARAMETERS: walk_state - Current walk state | |
238 | * Op - Parser object to be translated | |
239 | * buffer_length - Length of the buffer | |
240 | * obj_desc_ptr - Where the ACPI internal object is returned | |
241 | * | |
242 | * RETURN: Status | |
243 | * | |
244 | * DESCRIPTION: Translate a parser Op package object to the equivalent | |
245 | * namespace object | |
246 | * | |
44f6c012 | 247 | ******************************************************************************/ |
1da177e4 LT |
248 | |
249 | acpi_status | |
4be44fcd LB |
250 | acpi_ds_build_internal_buffer_obj(struct acpi_walk_state *walk_state, |
251 | union acpi_parse_object *op, | |
252 | u32 buffer_length, | |
253 | union acpi_operand_object **obj_desc_ptr) | |
1da177e4 | 254 | { |
4be44fcd LB |
255 | union acpi_parse_object *arg; |
256 | union acpi_operand_object *obj_desc; | |
257 | union acpi_parse_object *byte_list; | |
258 | u32 byte_list_length = 0; | |
1da177e4 | 259 | |
b229cf92 | 260 | ACPI_FUNCTION_TRACE(ds_build_internal_buffer_obj); |
1da177e4 | 261 | |
defba1d8 BM |
262 | /* |
263 | * If we are evaluating a Named buffer object "Name (xxxx, Buffer)". | |
264 | * The buffer object already exists (from the NS node), otherwise it must | |
265 | * be created. | |
266 | */ | |
1da177e4 | 267 | obj_desc = *obj_desc_ptr; |
defba1d8 | 268 | if (!obj_desc) { |
52fc0b02 | 269 | |
1da177e4 LT |
270 | /* Create a new buffer object */ |
271 | ||
4be44fcd | 272 | obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_BUFFER); |
1da177e4 LT |
273 | *obj_desc_ptr = obj_desc; |
274 | if (!obj_desc) { | |
4be44fcd | 275 | return_ACPI_STATUS(AE_NO_MEMORY); |
1da177e4 LT |
276 | } |
277 | } | |
278 | ||
279 | /* | |
280 | * Second arg is the buffer data (optional) byte_list can be either | |
281 | * individual bytes or a string initializer. In either case, a | |
282 | * byte_list appears in the AML. | |
283 | */ | |
4be44fcd | 284 | arg = op->common.value.arg; /* skip first arg */ |
1da177e4 LT |
285 | |
286 | byte_list = arg->named.next; | |
287 | if (byte_list) { | |
288 | if (byte_list->common.aml_opcode != AML_INT_BYTELIST_OP) { | |
b8e4d893 BM |
289 | ACPI_ERROR((AE_INFO, |
290 | "Expecting bytelist, got AML opcode %X in op %p", | |
291 | byte_list->common.aml_opcode, byte_list)); | |
1da177e4 | 292 | |
4be44fcd | 293 | acpi_ut_remove_reference(obj_desc); |
1da177e4 LT |
294 | return (AE_TYPE); |
295 | } | |
296 | ||
297 | byte_list_length = (u32) byte_list->common.value.integer; | |
298 | } | |
299 | ||
300 | /* | |
301 | * The buffer length (number of bytes) will be the larger of: | |
302 | * 1) The specified buffer length and | |
303 | * 2) The length of the initializer byte list | |
304 | */ | |
305 | obj_desc->buffer.length = buffer_length; | |
306 | if (byte_list_length > buffer_length) { | |
307 | obj_desc->buffer.length = byte_list_length; | |
308 | } | |
309 | ||
310 | /* Allocate the buffer */ | |
311 | ||
312 | if (obj_desc->buffer.length == 0) { | |
313 | obj_desc->buffer.pointer = NULL; | |
4be44fcd LB |
314 | ACPI_DEBUG_PRINT((ACPI_DB_EXEC, |
315 | "Buffer defined with zero length in AML, creating\n")); | |
316 | } else { | |
317 | obj_desc->buffer.pointer = | |
8313524a | 318 | ACPI_ALLOCATE_ZEROED(obj_desc->buffer.length); |
1da177e4 | 319 | if (!obj_desc->buffer.pointer) { |
4be44fcd LB |
320 | acpi_ut_delete_object_desc(obj_desc); |
321 | return_ACPI_STATUS(AE_NO_MEMORY); | |
1da177e4 LT |
322 | } |
323 | ||
324 | /* Initialize buffer from the byte_list (if present) */ | |
325 | ||
326 | if (byte_list) { | |
4be44fcd LB |
327 | ACPI_MEMCPY(obj_desc->buffer.pointer, |
328 | byte_list->named.data, byte_list_length); | |
1da177e4 LT |
329 | } |
330 | } | |
331 | ||
332 | obj_desc->buffer.flags |= AOPOBJ_DATA_VALID; | |
8f9337c8 | 333 | op->common.node = ACPI_CAST_PTR(struct acpi_namespace_node, obj_desc); |
4be44fcd | 334 | return_ACPI_STATUS(AE_OK); |
1da177e4 LT |
335 | } |
336 | ||
44f6c012 | 337 | /******************************************************************************* |
1da177e4 LT |
338 | * |
339 | * FUNCTION: acpi_ds_build_internal_package_obj | |
340 | * | |
341 | * PARAMETERS: walk_state - Current walk state | |
342 | * Op - Parser object to be translated | |
8f9337c8 BM |
343 | * element_count - Number of elements in the package - this is |
344 | * the num_elements argument to Package() | |
1da177e4 LT |
345 | * obj_desc_ptr - Where the ACPI internal object is returned |
346 | * | |
347 | * RETURN: Status | |
348 | * | |
349 | * DESCRIPTION: Translate a parser Op package object to the equivalent | |
350 | * namespace object | |
351 | * | |
8f9337c8 BM |
352 | * NOTE: The number of elements in the package will be always be the num_elements |
353 | * count, regardless of the number of elements in the package list. If | |
354 | * num_elements is smaller, only that many package list elements are used. | |
355 | * if num_elements is larger, the Package object is padded out with | |
356 | * objects of type Uninitialized (as per ACPI spec.) | |
357 | * | |
358 | * Even though the ASL compilers do not allow num_elements to be smaller | |
359 | * than the Package list length (for the fixed length package opcode), some | |
360 | * BIOS code modifies the AML on the fly to adjust the num_elements, and | |
361 | * this code compensates for that. This also provides compatibility with | |
362 | * other AML interpreters. | |
363 | * | |
44f6c012 | 364 | ******************************************************************************/ |
1da177e4 LT |
365 | |
366 | acpi_status | |
4be44fcd LB |
367 | acpi_ds_build_internal_package_obj(struct acpi_walk_state *walk_state, |
368 | union acpi_parse_object *op, | |
8f9337c8 | 369 | u32 element_count, |
4be44fcd | 370 | union acpi_operand_object **obj_desc_ptr) |
1da177e4 | 371 | { |
4be44fcd LB |
372 | union acpi_parse_object *arg; |
373 | union acpi_parse_object *parent; | |
374 | union acpi_operand_object *obj_desc = NULL; | |
4be44fcd | 375 | acpi_status status = AE_OK; |
0ba7d25c | 376 | unsigned i; |
91d02132 BM |
377 | u16 index; |
378 | u16 reference_count; | |
1da177e4 | 379 | |
b229cf92 | 380 | ACPI_FUNCTION_TRACE(ds_build_internal_package_obj); |
1da177e4 LT |
381 | |
382 | /* Find the parent of a possibly nested package */ | |
383 | ||
384 | parent = op->common.parent; | |
4be44fcd LB |
385 | while ((parent->common.aml_opcode == AML_PACKAGE_OP) || |
386 | (parent->common.aml_opcode == AML_VAR_PACKAGE_OP)) { | |
1da177e4 LT |
387 | parent = parent->common.parent; |
388 | } | |
389 | ||
defba1d8 BM |
390 | /* |
391 | * If we are evaluating a Named package object "Name (xxxx, Package)", | |
392 | * the package object already exists, otherwise it must be created. | |
393 | */ | |
1da177e4 | 394 | obj_desc = *obj_desc_ptr; |
defba1d8 | 395 | if (!obj_desc) { |
4be44fcd | 396 | obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_PACKAGE); |
1da177e4 LT |
397 | *obj_desc_ptr = obj_desc; |
398 | if (!obj_desc) { | |
4be44fcd | 399 | return_ACPI_STATUS(AE_NO_MEMORY); |
1da177e4 LT |
400 | } |
401 | ||
402 | obj_desc->package.node = parent->common.node; | |
403 | } | |
404 | ||
1da177e4 | 405 | /* |
8f9337c8 BM |
406 | * Allocate the element array (array of pointers to the individual |
407 | * objects) based on the num_elements parameter. Add an extra pointer slot | |
408 | * so that the list is always null terminated. | |
1da177e4 | 409 | */ |
8313524a | 410 | obj_desc->package.elements = ACPI_ALLOCATE_ZEROED(((acpi_size) |
8f9337c8 | 411 | element_count + |
8313524a | 412 | 1) * sizeof(void *)); |
1da177e4 LT |
413 | |
414 | if (!obj_desc->package.elements) { | |
4be44fcd LB |
415 | acpi_ut_delete_object_desc(obj_desc); |
416 | return_ACPI_STATUS(AE_NO_MEMORY); | |
1da177e4 LT |
417 | } |
418 | ||
8f9337c8 BM |
419 | obj_desc->package.count = element_count; |
420 | ||
1da177e4 | 421 | /* |
8f9337c8 BM |
422 | * Initialize the elements of the package, up to the num_elements count. |
423 | * Package is automatically padded with uninitialized (NULL) elements | |
424 | * if num_elements is greater than the package list length. Likewise, | |
425 | * Package is truncated if num_elements is less than the list length. | |
1da177e4 | 426 | */ |
1da177e4 LT |
427 | arg = op->common.value.arg; |
428 | arg = arg->common.next; | |
8f9337c8 | 429 | for (i = 0; arg && (i < element_count); i++) { |
1da177e4 | 430 | if (arg->common.aml_opcode == AML_INT_RETURN_VALUE_OP) { |
152c300d BM |
431 | if (arg->common.node->type == ACPI_TYPE_METHOD) { |
432 | /* | |
433 | * A method reference "looks" to the parser to be a method | |
434 | * invocation, so we special case it here | |
435 | */ | |
436 | arg->common.aml_opcode = AML_INT_NAMEPATH_OP; | |
437 | status = | |
438 | acpi_ds_build_internal_object(walk_state, | |
439 | arg, | |
440 | &obj_desc-> | |
441 | package. | |
442 | elements[i]); | |
443 | } else { | |
444 | /* This package element is already built, just get it */ | |
445 | ||
446 | obj_desc->package.elements[i] = | |
447 | ACPI_CAST_PTR(union acpi_operand_object, | |
448 | arg->common.node); | |
449 | } | |
4be44fcd LB |
450 | } else { |
451 | status = acpi_ds_build_internal_object(walk_state, arg, | |
452 | &obj_desc-> | |
453 | package. | |
454 | elements[i]); | |
1da177e4 | 455 | } |
91d02132 BM |
456 | |
457 | if (*obj_desc_ptr) { | |
458 | ||
459 | /* Existing package, get existing reference count */ | |
460 | ||
461 | reference_count = | |
462 | (*obj_desc_ptr)->common.reference_count; | |
463 | if (reference_count > 1) { | |
464 | ||
465 | /* Make new element ref count match original ref count */ | |
466 | ||
467 | for (index = 0; index < (reference_count - 1); | |
468 | index++) { | |
469 | acpi_ut_add_reference((obj_desc-> | |
470 | package. | |
471 | elements[i])); | |
472 | } | |
473 | } | |
474 | } | |
475 | ||
1da177e4 LT |
476 | arg = arg->common.next; |
477 | } | |
478 | ||
0ba7d25c BM |
479 | /* Check for match between num_elements and actual length of package_list */ |
480 | ||
481 | if (arg) { | |
482 | /* | |
483 | * num_elements was exhausted, but there are remaining elements in the | |
484 | * package_list. | |
485 | * | |
486 | * Note: technically, this is an error, from ACPI spec: "It is an error | |
487 | * for NumElements to be less than the number of elements in the | |
488 | * PackageList". However, for now, we just print an error message and | |
489 | * no exception is returned. | |
490 | */ | |
491 | while (arg) { | |
492 | ||
493 | /* Find out how many elements there really are */ | |
494 | ||
495 | i++; | |
496 | arg = arg->common.next; | |
497 | } | |
498 | ||
499 | ACPI_ERROR((AE_INFO, | |
500 | "Package List length (%X) larger than NumElements count (%X), truncated\n", | |
501 | i, element_count)); | |
502 | } else if (i < element_count) { | |
503 | /* | |
504 | * Arg list (elements) was exhausted, but we did not reach num_elements count. | |
505 | * Note: this is not an error, the package is padded out with NULLs. | |
506 | */ | |
8f9337c8 | 507 | ACPI_DEBUG_PRINT((ACPI_DB_INFO, |
0ba7d25c BM |
508 | "Package List length (%X) smaller than NumElements count (%X), padded with null elements\n", |
509 | i, element_count)); | |
8f9337c8 BM |
510 | } |
511 | ||
1da177e4 | 512 | obj_desc->package.flags |= AOPOBJ_DATA_VALID; |
8f9337c8 | 513 | op->common.node = ACPI_CAST_PTR(struct acpi_namespace_node, obj_desc); |
4be44fcd | 514 | return_ACPI_STATUS(status); |
1da177e4 LT |
515 | } |
516 | ||
44f6c012 | 517 | /******************************************************************************* |
1da177e4 LT |
518 | * |
519 | * FUNCTION: acpi_ds_create_node | |
520 | * | |
521 | * PARAMETERS: walk_state - Current walk state | |
522 | * Node - NS Node to be initialized | |
523 | * Op - Parser object to be translated | |
524 | * | |
525 | * RETURN: Status | |
526 | * | |
527 | * DESCRIPTION: Create the object to be associated with a namespace node | |
528 | * | |
44f6c012 | 529 | ******************************************************************************/ |
1da177e4 LT |
530 | |
531 | acpi_status | |
4be44fcd LB |
532 | acpi_ds_create_node(struct acpi_walk_state *walk_state, |
533 | struct acpi_namespace_node *node, | |
534 | union acpi_parse_object *op) | |
1da177e4 | 535 | { |
4be44fcd LB |
536 | acpi_status status; |
537 | union acpi_operand_object *obj_desc; | |
1da177e4 | 538 | |
b229cf92 | 539 | ACPI_FUNCTION_TRACE_PTR(ds_create_node, op); |
1da177e4 LT |
540 | |
541 | /* | |
542 | * Because of the execution pass through the non-control-method | |
543 | * parts of the table, we can arrive here twice. Only init | |
544 | * the named object node the first time through | |
545 | */ | |
4be44fcd LB |
546 | if (acpi_ns_get_attached_object(node)) { |
547 | return_ACPI_STATUS(AE_OK); | |
1da177e4 LT |
548 | } |
549 | ||
550 | if (!op->common.value.arg) { | |
52fc0b02 | 551 | |
1da177e4 LT |
552 | /* No arguments, there is nothing to do */ |
553 | ||
4be44fcd | 554 | return_ACPI_STATUS(AE_OK); |
1da177e4 LT |
555 | } |
556 | ||
557 | /* Build an internal object for the argument(s) */ | |
558 | ||
4be44fcd LB |
559 | status = acpi_ds_build_internal_object(walk_state, op->common.value.arg, |
560 | &obj_desc); | |
561 | if (ACPI_FAILURE(status)) { | |
562 | return_ACPI_STATUS(status); | |
1da177e4 LT |
563 | } |
564 | ||
565 | /* Re-type the object according to its argument */ | |
566 | ||
4be44fcd | 567 | node->type = ACPI_GET_OBJECT_TYPE(obj_desc); |
1da177e4 LT |
568 | |
569 | /* Attach obj to node */ | |
570 | ||
4be44fcd | 571 | status = acpi_ns_attach_object(node, obj_desc, node->type); |
1da177e4 LT |
572 | |
573 | /* Remove local reference to the object */ | |
574 | ||
4be44fcd LB |
575 | acpi_ut_remove_reference(obj_desc); |
576 | return_ACPI_STATUS(status); | |
1da177e4 LT |
577 | } |
578 | ||
4be44fcd | 579 | #endif /* ACPI_NO_METHOD_EXECUTION */ |
1da177e4 | 580 | |
44f6c012 | 581 | /******************************************************************************* |
1da177e4 LT |
582 | * |
583 | * FUNCTION: acpi_ds_init_object_from_op | |
584 | * | |
585 | * PARAMETERS: walk_state - Current walk state | |
586 | * Op - Parser op used to init the internal object | |
587 | * Opcode - AML opcode associated with the object | |
588 | * ret_obj_desc - Namespace object to be initialized | |
589 | * | |
590 | * RETURN: Status | |
591 | * | |
592 | * DESCRIPTION: Initialize a namespace object from a parser Op and its | |
593 | * associated arguments. The namespace object is a more compact | |
594 | * representation of the Op and its arguments. | |
595 | * | |
44f6c012 | 596 | ******************************************************************************/ |
1da177e4 LT |
597 | |
598 | acpi_status | |
4be44fcd LB |
599 | acpi_ds_init_object_from_op(struct acpi_walk_state *walk_state, |
600 | union acpi_parse_object *op, | |
601 | u16 opcode, | |
602 | union acpi_operand_object **ret_obj_desc) | |
1da177e4 | 603 | { |
4be44fcd LB |
604 | const struct acpi_opcode_info *op_info; |
605 | union acpi_operand_object *obj_desc; | |
606 | acpi_status status = AE_OK; | |
1da177e4 | 607 | |
b229cf92 | 608 | ACPI_FUNCTION_TRACE(ds_init_object_from_op); |
1da177e4 LT |
609 | |
610 | obj_desc = *ret_obj_desc; | |
4be44fcd | 611 | op_info = acpi_ps_get_opcode_info(opcode); |
1da177e4 | 612 | if (op_info->class == AML_CLASS_UNKNOWN) { |
52fc0b02 | 613 | |
1da177e4 LT |
614 | /* Unknown opcode */ |
615 | ||
4be44fcd | 616 | return_ACPI_STATUS(AE_TYPE); |
1da177e4 LT |
617 | } |
618 | ||
619 | /* Perform per-object initialization */ | |
620 | ||
4be44fcd | 621 | switch (ACPI_GET_OBJECT_TYPE(obj_desc)) { |
1da177e4 LT |
622 | case ACPI_TYPE_BUFFER: |
623 | ||
624 | /* | |
625 | * Defer evaluation of Buffer term_arg operand | |
626 | */ | |
8f9337c8 BM |
627 | obj_desc->buffer.node = |
628 | ACPI_CAST_PTR(struct acpi_namespace_node, | |
629 | walk_state->operands[0]); | |
1da177e4 LT |
630 | obj_desc->buffer.aml_start = op->named.data; |
631 | obj_desc->buffer.aml_length = op->named.length; | |
632 | break; | |
633 | ||
1da177e4 LT |
634 | case ACPI_TYPE_PACKAGE: |
635 | ||
636 | /* | |
637 | * Defer evaluation of Package term_arg operand | |
638 | */ | |
8f9337c8 BM |
639 | obj_desc->package.node = |
640 | ACPI_CAST_PTR(struct acpi_namespace_node, | |
641 | walk_state->operands[0]); | |
1da177e4 LT |
642 | obj_desc->package.aml_start = op->named.data; |
643 | obj_desc->package.aml_length = op->named.length; | |
644 | break; | |
645 | ||
1da177e4 LT |
646 | case ACPI_TYPE_INTEGER: |
647 | ||
648 | switch (op_info->type) { | |
649 | case AML_TYPE_CONSTANT: | |
650 | /* | |
651 | * Resolve AML Constants here - AND ONLY HERE! | |
652 | * All constants are integers. | |
44f6c012 RM |
653 | * We mark the integer with a flag that indicates that it started |
654 | * life as a constant -- so that stores to constants will perform | |
655 | * as expected (noop). zero_op is used as a placeholder for optional | |
656 | * target operands. | |
1da177e4 LT |
657 | */ |
658 | obj_desc->common.flags = AOPOBJ_AML_CONSTANT; | |
659 | ||
660 | switch (opcode) { | |
661 | case AML_ZERO_OP: | |
662 | ||
663 | obj_desc->integer.value = 0; | |
664 | break; | |
665 | ||
666 | case AML_ONE_OP: | |
667 | ||
668 | obj_desc->integer.value = 1; | |
669 | break; | |
670 | ||
671 | case AML_ONES_OP: | |
672 | ||
673 | obj_desc->integer.value = ACPI_INTEGER_MAX; | |
674 | ||
675 | /* Truncate value if we are executing from a 32-bit ACPI table */ | |
676 | ||
677 | #ifndef ACPI_NO_METHOD_EXECUTION | |
4be44fcd | 678 | acpi_ex_truncate_for32bit_table(obj_desc); |
1da177e4 LT |
679 | #endif |
680 | break; | |
681 | ||
682 | case AML_REVISION_OP: | |
683 | ||
684 | obj_desc->integer.value = ACPI_CA_VERSION; | |
685 | break; | |
686 | ||
687 | default: | |
688 | ||
b8e4d893 BM |
689 | ACPI_ERROR((AE_INFO, |
690 | "Unknown constant opcode %X", | |
691 | opcode)); | |
1da177e4 LT |
692 | status = AE_AML_OPERAND_TYPE; |
693 | break; | |
694 | } | |
695 | break; | |
696 | ||
1da177e4 LT |
697 | case AML_TYPE_LITERAL: |
698 | ||
699 | obj_desc->integer.value = op->common.value.integer; | |
6f42ccf2 | 700 | #ifndef ACPI_NO_METHOD_EXECUTION |
4be44fcd | 701 | acpi_ex_truncate_for32bit_table(obj_desc); |
6f42ccf2 | 702 | #endif |
1da177e4 LT |
703 | break; |
704 | ||
1da177e4 | 705 | default: |
b8e4d893 BM |
706 | ACPI_ERROR((AE_INFO, "Unknown Integer type %X", |
707 | op_info->type)); | |
1da177e4 LT |
708 | status = AE_AML_OPERAND_TYPE; |
709 | break; | |
710 | } | |
711 | break; | |
712 | ||
1da177e4 LT |
713 | case ACPI_TYPE_STRING: |
714 | ||
715 | obj_desc->string.pointer = op->common.value.string; | |
4be44fcd LB |
716 | obj_desc->string.length = |
717 | (u32) ACPI_STRLEN(op->common.value.string); | |
1da177e4 LT |
718 | |
719 | /* | |
720 | * The string is contained in the ACPI table, don't ever try | |
721 | * to delete it | |
722 | */ | |
723 | obj_desc->common.flags |= AOPOBJ_STATIC_POINTER; | |
724 | break; | |
725 | ||
1da177e4 LT |
726 | case ACPI_TYPE_METHOD: |
727 | break; | |
728 | ||
1da177e4 LT |
729 | case ACPI_TYPE_LOCAL_REFERENCE: |
730 | ||
731 | switch (op_info->type) { | |
732 | case AML_TYPE_LOCAL_VARIABLE: | |
733 | ||
734 | /* Split the opcode into a base opcode + offset */ | |
735 | ||
736 | obj_desc->reference.opcode = AML_LOCAL_OP; | |
737 | obj_desc->reference.offset = opcode - AML_LOCAL_OP; | |
738 | ||
739 | #ifndef ACPI_NO_METHOD_EXECUTION | |
4be44fcd LB |
740 | status = acpi_ds_method_data_get_node(AML_LOCAL_OP, |
741 | obj_desc-> | |
742 | reference.offset, | |
743 | walk_state, | |
744 | (struct | |
745 | acpi_namespace_node | |
746 | **)&obj_desc-> | |
747 | reference.object); | |
1da177e4 LT |
748 | #endif |
749 | break; | |
750 | ||
1da177e4 LT |
751 | case AML_TYPE_METHOD_ARGUMENT: |
752 | ||
753 | /* Split the opcode into a base opcode + offset */ | |
754 | ||
755 | obj_desc->reference.opcode = AML_ARG_OP; | |
756 | obj_desc->reference.offset = opcode - AML_ARG_OP; | |
757 | ||
758 | #ifndef ACPI_NO_METHOD_EXECUTION | |
4be44fcd LB |
759 | status = acpi_ds_method_data_get_node(AML_ARG_OP, |
760 | obj_desc-> | |
761 | reference.offset, | |
762 | walk_state, | |
763 | (struct | |
764 | acpi_namespace_node | |
765 | **)&obj_desc-> | |
766 | reference.object); | |
1da177e4 LT |
767 | #endif |
768 | break; | |
769 | ||
4be44fcd | 770 | default: /* Other literals, etc.. */ |
1da177e4 LT |
771 | |
772 | if (op->common.aml_opcode == AML_INT_NAMEPATH_OP) { | |
52fc0b02 | 773 | |
1da177e4 LT |
774 | /* Node was saved in Op */ |
775 | ||
776 | obj_desc->reference.node = op->common.node; | |
9e41d93c BM |
777 | obj_desc->reference.object = |
778 | op->common.node->object; | |
1da177e4 LT |
779 | } |
780 | ||
781 | obj_desc->reference.opcode = opcode; | |
782 | break; | |
783 | } | |
784 | break; | |
785 | ||
1da177e4 LT |
786 | default: |
787 | ||
b8e4d893 BM |
788 | ACPI_ERROR((AE_INFO, "Unimplemented data type: %X", |
789 | ACPI_GET_OBJECT_TYPE(obj_desc))); | |
1da177e4 LT |
790 | |
791 | status = AE_AML_OPERAND_TYPE; | |
792 | break; | |
793 | } | |
794 | ||
4be44fcd | 795 | return_ACPI_STATUS(status); |
1da177e4 | 796 | } |