ACPI: ACPICA 20060512
[linux-2.6] / drivers / acpi / executer / exconfig.c
1 /******************************************************************************
2  *
3  * Module Name: exconfig - Namespace reconfiguration (Load/Unload opcodes)
4  *
5  *****************************************************************************/
6
7 /*
8  * Copyright (C) 2000 - 2006, R. Byron Moore
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
44 #include <acpi/acpi.h>
45 #include <acpi/acinterp.h>
46 #include <acpi/amlcode.h>
47 #include <acpi/acnamesp.h>
48 #include <acpi/acevents.h>
49 #include <acpi/actables.h>
50 #include <acpi/acdispat.h>
51
52 #define _COMPONENT          ACPI_EXECUTER
53 ACPI_MODULE_NAME("exconfig")
54
55 /* Local prototypes */
56 static acpi_status
57 acpi_ex_add_table(struct acpi_table_header *table,
58                   struct acpi_namespace_node *parent_node,
59                   union acpi_operand_object **ddb_handle);
60
61 /*******************************************************************************
62  *
63  * FUNCTION:    acpi_ex_add_table
64  *
65  * PARAMETERS:  Table               - Pointer to raw table
66  *              parent_node         - Where to load the table (scope)
67  *              ddb_handle          - Where to return the table handle.
68  *
69  * RETURN:      Status
70  *
71  * DESCRIPTION: Common function to Install and Load an ACPI table with a
72  *              returned table handle.
73  *
74  ******************************************************************************/
75
76 static acpi_status
77 acpi_ex_add_table(struct acpi_table_header *table,
78                   struct acpi_namespace_node *parent_node,
79                   union acpi_operand_object **ddb_handle)
80 {
81         acpi_status status;
82         struct acpi_table_desc table_info;
83         union acpi_operand_object *obj_desc;
84
85         ACPI_FUNCTION_TRACE(ex_add_table);
86
87         /* Create an object to be the table handle */
88
89         obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_LOCAL_REFERENCE);
90         if (!obj_desc) {
91                 return_ACPI_STATUS(AE_NO_MEMORY);
92         }
93
94         /* Init the table handle */
95
96         obj_desc->reference.opcode = AML_LOAD_OP;
97         *ddb_handle = obj_desc;
98
99         /* Install the new table into the local data structures */
100
101         ACPI_MEMSET(&table_info, 0, sizeof(struct acpi_table_desc));
102
103         table_info.type = ACPI_TABLE_ID_SSDT;
104         table_info.pointer = table;
105         table_info.length = (acpi_size) table->length;
106         table_info.allocation = ACPI_MEM_ALLOCATED;
107
108         status = acpi_tb_install_table(&table_info);
109         obj_desc->reference.object = table_info.installed_desc;
110
111         if (ACPI_FAILURE(status)) {
112                 if (status == AE_ALREADY_EXISTS) {
113
114                         /* Table already exists, just return the handle */
115
116                         return_ACPI_STATUS(AE_OK);
117                 }
118                 goto cleanup;
119         }
120
121         /* Add the table to the namespace */
122
123         status = acpi_ns_load_table(table_info.installed_desc, parent_node);
124         if (ACPI_FAILURE(status)) {
125
126                 /* Uninstall table on error */
127
128                 (void)acpi_tb_uninstall_table(table_info.installed_desc);
129                 goto cleanup;
130         }
131
132         return_ACPI_STATUS(AE_OK);
133
134       cleanup:
135         acpi_ut_remove_reference(obj_desc);
136         *ddb_handle = NULL;
137         return_ACPI_STATUS(status);
138 }
139
140 /*******************************************************************************
141  *
142  * FUNCTION:    acpi_ex_load_table_op
143  *
144  * PARAMETERS:  walk_state          - Current state with operands
145  *              return_desc         - Where to store the return object
146  *
147  * RETURN:      Status
148  *
149  * DESCRIPTION: Load an ACPI table
150  *
151  ******************************************************************************/
152
153 acpi_status
154 acpi_ex_load_table_op(struct acpi_walk_state *walk_state,
155                       union acpi_operand_object **return_desc)
156 {
157         acpi_status status;
158         union acpi_operand_object **operand = &walk_state->operands[0];
159         struct acpi_table_header *table;
160         struct acpi_namespace_node *parent_node;
161         struct acpi_namespace_node *start_node;
162         struct acpi_namespace_node *parameter_node = NULL;
163         union acpi_operand_object *ddb_handle;
164
165         ACPI_FUNCTION_TRACE(ex_load_table_op);
166
167 #if 0
168         /*
169          * Make sure that the signature does not match one of the tables that
170          * is already loaded.
171          */
172         status = acpi_tb_match_signature(operand[0]->string.pointer, NULL);
173         if (status == AE_OK) {
174
175                 /* Signature matched -- don't allow override */
176
177                 return_ACPI_STATUS(AE_ALREADY_EXISTS);
178         }
179 #endif
180
181         /* Find the ACPI table */
182
183         status = acpi_tb_find_table(operand[0]->string.pointer,
184                                     operand[1]->string.pointer,
185                                     operand[2]->string.pointer, &table);
186         if (ACPI_FAILURE(status)) {
187                 if (status != AE_NOT_FOUND) {
188                         return_ACPI_STATUS(status);
189                 }
190
191                 /* Table not found, return an Integer=0 and AE_OK */
192
193                 ddb_handle = acpi_ut_create_internal_object(ACPI_TYPE_INTEGER);
194                 if (!ddb_handle) {
195                         return_ACPI_STATUS(AE_NO_MEMORY);
196                 }
197
198                 ddb_handle->integer.value = 0;
199                 *return_desc = ddb_handle;
200
201                 return_ACPI_STATUS(AE_OK);
202         }
203
204         /* Default nodes */
205
206         start_node = walk_state->scope_info->scope.node;
207         parent_node = acpi_gbl_root_node;
208
209         /* root_path (optional parameter) */
210
211         if (operand[3]->string.length > 0) {
212                 /*
213                  * Find the node referenced by the root_path_string. This is the
214                  * location within the namespace where the table will be loaded.
215                  */
216                 status =
217                     acpi_ns_get_node_by_path(operand[3]->string.pointer,
218                                              start_node, ACPI_NS_SEARCH_PARENT,
219                                              &parent_node);
220                 if (ACPI_FAILURE(status)) {
221                         return_ACPI_STATUS(status);
222                 }
223         }
224
225         /* parameter_path (optional parameter) */
226
227         if (operand[4]->string.length > 0) {
228                 if ((operand[4]->string.pointer[0] != '\\') &&
229                     (operand[4]->string.pointer[0] != '^')) {
230                         /*
231                          * Path is not absolute, so it will be relative to the node
232                          * referenced by the root_path_string (or the NS root if omitted)
233                          */
234                         start_node = parent_node;
235                 }
236
237                 /* Find the node referenced by the parameter_path_string */
238
239                 status =
240                     acpi_ns_get_node_by_path(operand[4]->string.pointer,
241                                              start_node, ACPI_NS_SEARCH_PARENT,
242                                              &parameter_node);
243                 if (ACPI_FAILURE(status)) {
244                         return_ACPI_STATUS(status);
245                 }
246         }
247
248         /* Load the table into the namespace */
249
250         status = acpi_ex_add_table(table, parent_node, &ddb_handle);
251         if (ACPI_FAILURE(status)) {
252                 return_ACPI_STATUS(status);
253         }
254
255         /* Parameter Data (optional) */
256
257         if (parameter_node) {
258
259                 /* Store the parameter data into the optional parameter object */
260
261                 status = acpi_ex_store(operand[5],
262                                        ACPI_CAST_PTR(union acpi_operand_object,
263                                                      parameter_node),
264                                        walk_state);
265                 if (ACPI_FAILURE(status)) {
266                         (void)acpi_ex_unload_table(ddb_handle);
267                         return_ACPI_STATUS(status);
268                 }
269         }
270
271         *return_desc = ddb_handle;
272         return_ACPI_STATUS(status);
273 }
274
275 /*******************************************************************************
276  *
277  * FUNCTION:    acpi_ex_load_op
278  *
279  * PARAMETERS:  obj_desc        - Region or Field where the table will be
280  *                                obtained
281  *              Target          - Where a handle to the table will be stored
282  *              walk_state      - Current state
283  *
284  * RETURN:      Status
285  *
286  * DESCRIPTION: Load an ACPI table from a field or operation region
287  *
288  ******************************************************************************/
289
290 acpi_status
291 acpi_ex_load_op(union acpi_operand_object *obj_desc,
292                 union acpi_operand_object *target,
293                 struct acpi_walk_state *walk_state)
294 {
295         acpi_status status;
296         union acpi_operand_object *ddb_handle;
297         union acpi_operand_object *buffer_desc = NULL;
298         struct acpi_table_header *table_ptr = NULL;
299         acpi_physical_address address;
300         struct acpi_table_header table_header;
301         acpi_integer temp;
302         u32 i;
303
304         ACPI_FUNCTION_TRACE(ex_load_op);
305
306         /* Object can be either an op_region or a Field */
307
308         switch (ACPI_GET_OBJECT_TYPE(obj_desc)) {
309         case ACPI_TYPE_REGION:
310
311                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Load from Region %p %s\n",
312                                   obj_desc,
313                                   acpi_ut_get_object_type_name(obj_desc)));
314
315                 /*
316                  * If the Region Address and Length have not been previously evaluated,
317                  * evaluate them now and save the results.
318                  */
319                 if (!(obj_desc->common.flags & AOPOBJ_DATA_VALID)) {
320                         status = acpi_ds_get_region_arguments(obj_desc);
321                         if (ACPI_FAILURE(status)) {
322                                 return_ACPI_STATUS(status);
323                         }
324                 }
325
326                 /* Get the base physical address of the region */
327
328                 address = obj_desc->region.address;
329
330                 /* Get part of the table header to get the table length */
331
332                 table_header.length = 0;
333                 for (i = 0; i < 8; i++) {
334                         status =
335                             acpi_ev_address_space_dispatch(obj_desc, ACPI_READ,
336                                                            (acpi_physical_address)
337                                                            (i + address), 8,
338                                                            &temp);
339                         if (ACPI_FAILURE(status)) {
340                                 return_ACPI_STATUS(status);
341                         }
342
343                         /* Get the one valid byte of the returned 64-bit value */
344
345                         ACPI_CAST_PTR(u8, &table_header)[i] = (u8) temp;
346                 }
347
348                 /* Sanity check the table length */
349
350                 if (table_header.length < sizeof(struct acpi_table_header)) {
351                         return_ACPI_STATUS(AE_BAD_HEADER);
352                 }
353
354                 /* Allocate a buffer for the entire table */
355
356                 table_ptr = ACPI_ALLOCATE(table_header.length);
357                 if (!table_ptr) {
358                         return_ACPI_STATUS(AE_NO_MEMORY);
359                 }
360
361                 /* Get the entire table from the op region */
362
363                 for (i = 0; i < table_header.length; i++) {
364                         status =
365                             acpi_ev_address_space_dispatch(obj_desc, ACPI_READ,
366                                                            (acpi_physical_address)
367                                                            (i + address), 8,
368                                                            &temp);
369                         if (ACPI_FAILURE(status)) {
370                                 goto cleanup;
371                         }
372
373                         /* Get the one valid byte of the returned 64-bit value */
374
375                         ACPI_CAST_PTR(u8, table_ptr)[i] = (u8) temp;
376                 }
377                 break;
378
379         case ACPI_TYPE_LOCAL_REGION_FIELD:
380         case ACPI_TYPE_LOCAL_BANK_FIELD:
381         case ACPI_TYPE_LOCAL_INDEX_FIELD:
382
383                 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Load from Field %p %s\n",
384                                   obj_desc,
385                                   acpi_ut_get_object_type_name(obj_desc)));
386
387                 /*
388                  * The length of the field must be at least as large as the table.
389                  * Read the entire field and thus the entire table.  Buffer is
390                  * allocated during the read.
391                  */
392                 status =
393                     acpi_ex_read_data_from_field(walk_state, obj_desc,
394                                                  &buffer_desc);
395                 if (ACPI_FAILURE(status)) {
396                         return_ACPI_STATUS(status);
397                 }
398
399                 table_ptr = ACPI_CAST_PTR(struct acpi_table_header,
400                                           buffer_desc->buffer.pointer);
401
402                 /* All done with the buffer_desc, delete it */
403
404                 buffer_desc->buffer.pointer = NULL;
405                 acpi_ut_remove_reference(buffer_desc);
406
407                 /* Sanity check the table length */
408
409                 if (table_ptr->length < sizeof(struct acpi_table_header)) {
410                         status = AE_BAD_HEADER;
411                         goto cleanup;
412                 }
413                 break;
414
415         default:
416                 return_ACPI_STATUS(AE_AML_OPERAND_TYPE);
417         }
418
419         /* The table must be either an SSDT or a PSDT */
420
421         if ((!ACPI_COMPARE_NAME(table_ptr->signature, PSDT_SIG)) &&
422             (!ACPI_COMPARE_NAME(table_ptr->signature, SSDT_SIG))) {
423                 ACPI_ERROR((AE_INFO,
424                             "Table has invalid signature [%4.4s], must be SSDT or PSDT",
425                             table_ptr->signature));
426                 status = AE_BAD_SIGNATURE;
427                 goto cleanup;
428         }
429
430         /* Install the new table into the local data structures */
431
432         status = acpi_ex_add_table(table_ptr, acpi_gbl_root_node, &ddb_handle);
433         if (ACPI_FAILURE(status)) {
434
435                 /* On error, table_ptr was deallocated above */
436
437                 return_ACPI_STATUS(status);
438         }
439
440         /* Store the ddb_handle into the Target operand */
441
442         status = acpi_ex_store(ddb_handle, target, walk_state);
443         if (ACPI_FAILURE(status)) {
444                 (void)acpi_ex_unload_table(ddb_handle);
445
446                 /* table_ptr was deallocated above */
447
448                 return_ACPI_STATUS(status);
449         }
450
451       cleanup:
452         if (ACPI_FAILURE(status)) {
453                 ACPI_FREE(table_ptr);
454         }
455         return_ACPI_STATUS(status);
456 }
457
458 /*******************************************************************************
459  *
460  * FUNCTION:    acpi_ex_unload_table
461  *
462  * PARAMETERS:  ddb_handle          - Handle to a previously loaded table
463  *
464  * RETURN:      Status
465  *
466  * DESCRIPTION: Unload an ACPI table
467  *
468  ******************************************************************************/
469
470 acpi_status acpi_ex_unload_table(union acpi_operand_object *ddb_handle)
471 {
472         acpi_status status = AE_OK;
473         union acpi_operand_object *table_desc = ddb_handle;
474         struct acpi_table_desc *table_info;
475
476         ACPI_FUNCTION_TRACE(ex_unload_table);
477
478         /*
479          * Validate the handle
480          * Although the handle is partially validated in acpi_ex_reconfiguration(),
481          * when it calls acpi_ex_resolve_operands(), the handle is more completely
482          * validated here.
483          */
484         if ((!ddb_handle) ||
485             (ACPI_GET_DESCRIPTOR_TYPE(ddb_handle) != ACPI_DESC_TYPE_OPERAND) ||
486             (ACPI_GET_OBJECT_TYPE(ddb_handle) != ACPI_TYPE_LOCAL_REFERENCE)) {
487                 return_ACPI_STATUS(AE_BAD_PARAMETER);
488         }
489
490         /* Get the actual table descriptor from the ddb_handle */
491
492         table_info = (struct acpi_table_desc *)table_desc->reference.object;
493
494         /*
495          * Delete the entire namespace under this table Node
496          * (Offset contains the table_id)
497          */
498         acpi_ns_delete_namespace_by_owner(table_info->owner_id);
499         acpi_ut_release_owner_id(&table_info->owner_id);
500
501         /* Delete the table itself */
502
503         (void)acpi_tb_uninstall_table(table_info->installed_desc);
504
505         /* Delete the table descriptor (ddb_handle) */
506
507         acpi_ut_remove_reference(table_desc);
508         return_ACPI_STATUS(status);
509 }