Merge branch 'for-jeff' of git://electric-eye.fr.zoreil.com/home/romieu/linux-2.6
[sfrench/cifs-2.6.git] / drivers / acpi / executer / exresnte.c
1
2 /******************************************************************************
3  *
4  * Module Name: exresnte - AML Interpreter object resolution
5  *
6  *****************************************************************************/
7
8 /*
9  * Copyright (C) 2000 - 2006, R. Byron Moore
10  * All rights reserved.
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  * 1. Redistributions of source code must retain the above copyright
16  *    notice, this list of conditions, and the following disclaimer,
17  *    without modification.
18  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
19  *    substantially similar to the "NO WARRANTY" disclaimer below
20  *    ("Disclaimer") and any redistribution must be conditioned upon
21  *    including a substantially similar Disclaimer requirement for further
22  *    binary redistribution.
23  * 3. Neither the names of the above-listed copyright holders nor the names
24  *    of any contributors may be used to endorse or promote products derived
25  *    from this software without specific prior written permission.
26  *
27  * Alternatively, this software may be distributed under the terms of the
28  * GNU General Public License ("GPL") version 2 as published by the Free
29  * Software Foundation.
30  *
31  * NO WARRANTY
32  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
33  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
34  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
35  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
36  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
37  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
38  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
39  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
40  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
41  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
42  * POSSIBILITY OF SUCH DAMAGES.
43  */
44
45 #include <acpi/acpi.h>
46 #include <acpi/acdispat.h>
47 #include <acpi/acinterp.h>
48 #include <acpi/acnamesp.h>
49 #include <acpi/acparser.h>
50 #include <acpi/amlcode.h>
51
52 #define _COMPONENT          ACPI_EXECUTER
53 ACPI_MODULE_NAME("exresnte")
54
55 /*******************************************************************************
56  *
57  * FUNCTION:    acpi_ex_resolve_node_to_value
58  *
59  * PARAMETERS:  object_ptr      - Pointer to a location that contains
60  *                                a pointer to a NS node, and will receive a
61  *                                pointer to the resolved object.
62  *              walk_state      - Current state.  Valid only if executing AML
63  *                                code.  NULL if simply resolving an object
64  *
65  * RETURN:      Status
66  *
67  * DESCRIPTION: Resolve a Namespace node to a valued object
68  *
69  * Note: for some of the data types, the pointer attached to the Node
70  * can be either a pointer to an actual internal object or a pointer into the
71  * AML stream itself.  These types are currently:
72  *
73  *      ACPI_TYPE_INTEGER
74  *      ACPI_TYPE_STRING
75  *      ACPI_TYPE_BUFFER
76  *      ACPI_TYPE_MUTEX
77  *      ACPI_TYPE_PACKAGE
78  *
79  ******************************************************************************/
80 acpi_status
81 acpi_ex_resolve_node_to_value(struct acpi_namespace_node **object_ptr,
82                               struct acpi_walk_state *walk_state)
83 {
84         acpi_status status = AE_OK;
85         union acpi_operand_object *source_desc;
86         union acpi_operand_object *obj_desc = NULL;
87         struct acpi_namespace_node *node;
88         acpi_object_type entry_type;
89
90         ACPI_FUNCTION_TRACE("ex_resolve_node_to_value");
91
92         /*
93          * The stack pointer points to a struct acpi_namespace_node (Node).  Get the
94          * object that is attached to the Node.
95          */
96         node = *object_ptr;
97         source_desc = acpi_ns_get_attached_object(node);
98         entry_type = acpi_ns_get_type((acpi_handle) node);
99
100         ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Entry=%p source_desc=%p [%s]\n",
101                           node, source_desc,
102                           acpi_ut_get_type_name(entry_type)));
103
104         if ((entry_type == ACPI_TYPE_LOCAL_ALIAS) ||
105             (entry_type == ACPI_TYPE_LOCAL_METHOD_ALIAS)) {
106                 /* There is always exactly one level of indirection */
107
108                 node = ACPI_CAST_PTR(struct acpi_namespace_node, node->object);
109                 source_desc = acpi_ns_get_attached_object(node);
110                 entry_type = acpi_ns_get_type((acpi_handle) node);
111                 *object_ptr = node;
112         }
113
114         /*
115          * Several object types require no further processing:
116          * 1) Devices rarely have an attached object, return the Node
117          * 2) Method locals and arguments have a pseudo-Node
118          */
119         if (entry_type == ACPI_TYPE_DEVICE ||
120             (node->flags & (ANOBJ_METHOD_ARG | ANOBJ_METHOD_LOCAL))) {
121                 return_ACPI_STATUS(AE_OK);
122         }
123
124         if (!source_desc) {
125                 ACPI_ERROR((AE_INFO, "No object attached to node %p", node));
126                 return_ACPI_STATUS(AE_AML_NO_OPERAND);
127         }
128
129         /*
130          * Action is based on the type of the Node, which indicates the type
131          * of the attached object or pointer
132          */
133         switch (entry_type) {
134         case ACPI_TYPE_PACKAGE:
135
136                 if (ACPI_GET_OBJECT_TYPE(source_desc) != ACPI_TYPE_PACKAGE) {
137                         ACPI_ERROR((AE_INFO, "Object not a Package, type %s",
138                                     acpi_ut_get_object_type_name(source_desc)));
139                         return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
140                 }
141
142                 status = acpi_ds_get_package_arguments(source_desc);
143                 if (ACPI_SUCCESS(status)) {
144                         /* Return an additional reference to the object */
145
146                         obj_desc = source_desc;
147                         acpi_ut_add_reference(obj_desc);
148                 }
149                 break;
150
151         case ACPI_TYPE_BUFFER:
152
153                 if (ACPI_GET_OBJECT_TYPE(source_desc) != ACPI_TYPE_BUFFER) {
154                         ACPI_ERROR((AE_INFO, "Object not a Buffer, type %s",
155                                     acpi_ut_get_object_type_name(source_desc)));
156                         return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
157                 }
158
159                 status = acpi_ds_get_buffer_arguments(source_desc);
160                 if (ACPI_SUCCESS(status)) {
161                         /* Return an additional reference to the object */
162
163                         obj_desc = source_desc;
164                         acpi_ut_add_reference(obj_desc);
165                 }
166                 break;
167
168         case ACPI_TYPE_STRING:
169
170                 if (ACPI_GET_OBJECT_TYPE(source_desc) != ACPI_TYPE_STRING) {
171                         ACPI_ERROR((AE_INFO, "Object not a String, type %s",
172                                     acpi_ut_get_object_type_name(source_desc)));
173                         return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
174                 }
175
176                 /* Return an additional reference to the object */
177
178                 obj_desc = source_desc;
179                 acpi_ut_add_reference(obj_desc);
180                 break;
181
182         case ACPI_TYPE_INTEGER:
183
184                 if (ACPI_GET_OBJECT_TYPE(source_desc) != ACPI_TYPE_INTEGER) {
185                         ACPI_ERROR((AE_INFO, "Object not a Integer, type %s",
186                                     acpi_ut_get_object_type_name(source_desc)));
187                         return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
188                 }
189
190                 /* Return an additional reference to the object */
191
192                 obj_desc = source_desc;
193                 acpi_ut_add_reference(obj_desc);
194                 break;
195
196         case ACPI_TYPE_BUFFER_FIELD:
197         case ACPI_TYPE_LOCAL_REGION_FIELD:
198         case ACPI_TYPE_LOCAL_BANK_FIELD:
199         case ACPI_TYPE_LOCAL_INDEX_FIELD:
200
201                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
202                                   "field_read Node=%p source_desc=%p Type=%X\n",
203                                   node, source_desc, entry_type));
204
205                 status =
206                     acpi_ex_read_data_from_field(walk_state, source_desc,
207                                                  &obj_desc);
208                 break;
209
210                 /* For these objects, just return the object attached to the Node */
211
212         case ACPI_TYPE_MUTEX:
213         case ACPI_TYPE_METHOD:
214         case ACPI_TYPE_POWER:
215         case ACPI_TYPE_PROCESSOR:
216         case ACPI_TYPE_THERMAL:
217         case ACPI_TYPE_EVENT:
218         case ACPI_TYPE_REGION:
219
220                 /* Return an additional reference to the object */
221
222                 obj_desc = source_desc;
223                 acpi_ut_add_reference(obj_desc);
224                 break;
225
226                 /* TYPE_ANY is untyped, and thus there is no object associated with it */
227
228         case ACPI_TYPE_ANY:
229
230                 ACPI_ERROR((AE_INFO,
231                             "Untyped entry %p, no attached object!", node));
232
233                 return_ACPI_STATUS(AE_AML_OPERAND_TYPE);        /* Cannot be AE_TYPE */
234
235         case ACPI_TYPE_LOCAL_REFERENCE:
236
237                 switch (source_desc->reference.opcode) {
238                 case AML_LOAD_OP:
239
240                         /* This is a ddb_handle */
241                         /* Return an additional reference to the object */
242
243                         obj_desc = source_desc;
244                         acpi_ut_add_reference(obj_desc);
245                         break;
246
247                 default:
248                         /* No named references are allowed here */
249
250                         ACPI_ERROR((AE_INFO,
251                                     "Unsupported Reference opcode %X (%s)",
252                                     source_desc->reference.opcode,
253                                     acpi_ps_get_opcode_name(source_desc->
254                                                             reference.opcode)));
255
256                         return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
257                 }
258                 break;
259
260         default:
261
262                 /* Default case is for unknown types */
263
264                 ACPI_ERROR((AE_INFO,
265                             "Node %p - Unknown object type %X",
266                             node, entry_type));
267
268                 return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
269
270         }                       /* switch (entry_type) */
271
272         /* Return the object descriptor */
273
274         *object_ptr = (void *)obj_desc;
275         return_ACPI_STATUS(status);
276 }