Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | |
2 | /****************************************************************************** | |
3 | * | |
4 | * Module Name: exstoren - AML Interpreter object store support, | |
5 | * Store to Node (namespace object) | |
6 | * | |
7 | *****************************************************************************/ | |
8 | ||
9 | /* | |
75a44ce0 | 10 | * Copyright (C) 2000 - 2008, Intel Corp. |
1da177e4 LT |
11 | * All rights reserved. |
12 | * | |
13 | * Redistribution and use in source and binary forms, with or without | |
14 | * modification, are permitted provided that the following conditions | |
15 | * are met: | |
16 | * 1. Redistributions of source code must retain the above copyright | |
17 | * notice, this list of conditions, and the following disclaimer, | |
18 | * without modification. | |
19 | * 2. Redistributions in binary form must reproduce at minimum a disclaimer | |
20 | * substantially similar to the "NO WARRANTY" disclaimer below | |
21 | * ("Disclaimer") and any redistribution must be conditioned upon | |
22 | * including a substantially similar Disclaimer requirement for further | |
23 | * binary redistribution. | |
24 | * 3. Neither the names of the above-listed copyright holders nor the names | |
25 | * of any contributors may be used to endorse or promote products derived | |
26 | * from this software without specific prior written permission. | |
27 | * | |
28 | * Alternatively, this software may be distributed under the terms of the | |
29 | * GNU General Public License ("GPL") version 2 as published by the Free | |
30 | * Software Foundation. | |
31 | * | |
32 | * NO WARRANTY | |
33 | * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS | |
34 | * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT | |
35 | * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR | |
36 | * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT | |
37 | * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
38 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
39 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
40 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, | |
41 | * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING | |
42 | * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | |
43 | * POSSIBILITY OF SUCH DAMAGES. | |
44 | */ | |
45 | ||
1da177e4 LT |
46 | #include <acpi/acpi.h> |
47 | #include <acpi/acinterp.h> | |
48 | #include <acpi/amlcode.h> | |
49 | ||
1da177e4 | 50 | #define _COMPONENT ACPI_EXECUTER |
4be44fcd | 51 | ACPI_MODULE_NAME("exstoren") |
1da177e4 LT |
52 | |
53 | /******************************************************************************* | |
54 | * | |
55 | * FUNCTION: acpi_ex_resolve_object | |
56 | * | |
57 | * PARAMETERS: source_desc_ptr - Pointer to the source object | |
58 | * target_type - Current type of the target | |
59 | * walk_state - Current walk state | |
60 | * | |
61 | * RETURN: Status, resolved object in source_desc_ptr. | |
62 | * | |
63 | * DESCRIPTION: Resolve an object. If the object is a reference, dereference | |
64 | * it and return the actual object in the source_desc_ptr. | |
65 | * | |
66 | ******************************************************************************/ | |
1da177e4 | 67 | acpi_status |
4be44fcd LB |
68 | acpi_ex_resolve_object(union acpi_operand_object **source_desc_ptr, |
69 | acpi_object_type target_type, | |
70 | struct acpi_walk_state *walk_state) | |
1da177e4 | 71 | { |
4be44fcd LB |
72 | union acpi_operand_object *source_desc = *source_desc_ptr; |
73 | acpi_status status = AE_OK; | |
1da177e4 | 74 | |
b229cf92 | 75 | ACPI_FUNCTION_TRACE(ex_resolve_object); |
1da177e4 | 76 | |
44f6c012 RM |
77 | /* Ensure we have a Target that can be stored to */ |
78 | ||
1da177e4 LT |
79 | switch (target_type) { |
80 | case ACPI_TYPE_BUFFER_FIELD: | |
81 | case ACPI_TYPE_LOCAL_REGION_FIELD: | |
82 | case ACPI_TYPE_LOCAL_BANK_FIELD: | |
83 | case ACPI_TYPE_LOCAL_INDEX_FIELD: | |
84 | /* | |
85 | * These cases all require only Integers or values that | |
86 | * can be converted to Integers (Strings or Buffers) | |
87 | */ | |
88 | ||
89 | case ACPI_TYPE_INTEGER: | |
90 | case ACPI_TYPE_STRING: | |
91 | case ACPI_TYPE_BUFFER: | |
92 | ||
93 | /* | |
94 | * Stores into a Field/Region or into a Integer/Buffer/String | |
95 | * are all essentially the same. This case handles the | |
96 | * "interchangeable" types Integer, String, and Buffer. | |
97 | */ | |
4be44fcd LB |
98 | if (ACPI_GET_OBJECT_TYPE(source_desc) == |
99 | ACPI_TYPE_LOCAL_REFERENCE) { | |
52fc0b02 | 100 | |
1da177e4 LT |
101 | /* Resolve a reference object first */ |
102 | ||
4be44fcd LB |
103 | status = |
104 | acpi_ex_resolve_to_value(source_desc_ptr, | |
105 | walk_state); | |
106 | if (ACPI_FAILURE(status)) { | |
1da177e4 LT |
107 | break; |
108 | } | |
109 | } | |
110 | ||
111 | /* For copy_object, no further validation necessary */ | |
112 | ||
113 | if (walk_state->opcode == AML_COPY_OP) { | |
114 | break; | |
115 | } | |
116 | ||
44f6c012 RM |
117 | /* Must have a Integer, Buffer, or String */ |
118 | ||
4be44fcd LB |
119 | if ((ACPI_GET_OBJECT_TYPE(source_desc) != ACPI_TYPE_INTEGER) && |
120 | (ACPI_GET_OBJECT_TYPE(source_desc) != ACPI_TYPE_BUFFER) && | |
121 | (ACPI_GET_OBJECT_TYPE(source_desc) != ACPI_TYPE_STRING) && | |
122 | !((ACPI_GET_OBJECT_TYPE(source_desc) == | |
123 | ACPI_TYPE_LOCAL_REFERENCE) | |
1044f1f6 BM |
124 | && (source_desc->reference.class == |
125 | ACPI_REFCLASS_TABLE))) { | |
52fc0b02 | 126 | |
44f6c012 RM |
127 | /* Conversion successful but still not a valid type */ |
128 | ||
b8e4d893 BM |
129 | ACPI_ERROR((AE_INFO, |
130 | "Cannot assign type %s to %s (must be type Int/Str/Buf)", | |
131 | acpi_ut_get_object_type_name(source_desc), | |
132 | acpi_ut_get_type_name(target_type))); | |
1da177e4 LT |
133 | status = AE_AML_OPERAND_TYPE; |
134 | } | |
135 | break; | |
136 | ||
1da177e4 LT |
137 | case ACPI_TYPE_LOCAL_ALIAS: |
138 | case ACPI_TYPE_LOCAL_METHOD_ALIAS: | |
139 | ||
b8e4d893 BM |
140 | /* |
141 | * All aliases should have been resolved earlier, during the | |
142 | * operand resolution phase. | |
143 | */ | |
144 | ACPI_ERROR((AE_INFO, "Store into an unresolved Alias object")); | |
1da177e4 LT |
145 | status = AE_AML_INTERNAL; |
146 | break; | |
147 | ||
1da177e4 LT |
148 | case ACPI_TYPE_PACKAGE: |
149 | default: | |
150 | ||
151 | /* | |
152 | * All other types than Alias and the various Fields come here, | |
153 | * including the untyped case - ACPI_TYPE_ANY. | |
154 | */ | |
155 | break; | |
156 | } | |
157 | ||
4be44fcd | 158 | return_ACPI_STATUS(status); |
1da177e4 LT |
159 | } |
160 | ||
1da177e4 LT |
161 | /******************************************************************************* |
162 | * | |
163 | * FUNCTION: acpi_ex_store_object_to_object | |
164 | * | |
165 | * PARAMETERS: source_desc - Object to store | |
166 | * dest_desc - Object to receive a copy of the source | |
167 | * new_desc - New object if dest_desc is obsoleted | |
168 | * walk_state - Current walk state | |
169 | * | |
170 | * RETURN: Status | |
171 | * | |
172 | * DESCRIPTION: "Store" an object to another object. This may include | |
173 | * converting the source type to the target type (implicit | |
174 | * conversion), and a copy of the value of the source to | |
175 | * the target. | |
176 | * | |
177 | * The Assignment of an object to another (not named) object | |
178 | * is handled here. | |
179 | * The Source passed in will replace the current value (if any) | |
180 | * with the input value. | |
181 | * | |
182 | * When storing into an object the data is converted to the | |
183 | * target object type then stored in the object. This means | |
184 | * that the target object type (for an initialized target) will | |
185 | * not be changed by a store operation. | |
186 | * | |
187 | * This module allows destination types of Number, String, | |
188 | * Buffer, and Package. | |
189 | * | |
190 | * Assumes parameters are already validated. NOTE: source_desc | |
191 | * resolution (from a reference object) must be performed by | |
192 | * the caller if necessary. | |
193 | * | |
194 | ******************************************************************************/ | |
195 | ||
196 | acpi_status | |
4be44fcd LB |
197 | acpi_ex_store_object_to_object(union acpi_operand_object *source_desc, |
198 | union acpi_operand_object *dest_desc, | |
199 | union acpi_operand_object **new_desc, | |
200 | struct acpi_walk_state *walk_state) | |
1da177e4 | 201 | { |
4be44fcd LB |
202 | union acpi_operand_object *actual_src_desc; |
203 | acpi_status status = AE_OK; | |
1da177e4 | 204 | |
b229cf92 | 205 | ACPI_FUNCTION_TRACE_PTR(ex_store_object_to_object, source_desc); |
1da177e4 LT |
206 | |
207 | actual_src_desc = source_desc; | |
208 | if (!dest_desc) { | |
209 | /* | |
210 | * There is no destination object (An uninitialized node or | |
211 | * package element), so we can simply copy the source object | |
212 | * creating a new destination object | |
213 | */ | |
4be44fcd LB |
214 | status = |
215 | acpi_ut_copy_iobject_to_iobject(actual_src_desc, new_desc, | |
216 | walk_state); | |
217 | return_ACPI_STATUS(status); | |
1da177e4 LT |
218 | } |
219 | ||
4be44fcd LB |
220 | if (ACPI_GET_OBJECT_TYPE(source_desc) != |
221 | ACPI_GET_OBJECT_TYPE(dest_desc)) { | |
1da177e4 LT |
222 | /* |
223 | * The source type does not match the type of the destination. | |
224 | * Perform the "implicit conversion" of the source to the current type | |
225 | * of the target as per the ACPI specification. | |
226 | * | |
227 | * If no conversion performed, actual_src_desc = source_desc. | |
228 | * Otherwise, actual_src_desc is a temporary object to hold the | |
229 | * converted object. | |
230 | */ | |
4be44fcd LB |
231 | status = |
232 | acpi_ex_convert_to_target_type(ACPI_GET_OBJECT_TYPE | |
233 | (dest_desc), source_desc, | |
234 | &actual_src_desc, | |
235 | walk_state); | |
236 | if (ACPI_FAILURE(status)) { | |
237 | return_ACPI_STATUS(status); | |
1da177e4 LT |
238 | } |
239 | ||
240 | if (source_desc == actual_src_desc) { | |
241 | /* | |
242 | * No conversion was performed. Return the source_desc as the | |
243 | * new object. | |
244 | */ | |
245 | *new_desc = source_desc; | |
4be44fcd | 246 | return_ACPI_STATUS(AE_OK); |
1da177e4 LT |
247 | } |
248 | } | |
249 | ||
250 | /* | |
251 | * We now have two objects of identical types, and we can perform a | |
252 | * copy of the *value* of the source object. | |
253 | */ | |
4be44fcd | 254 | switch (ACPI_GET_OBJECT_TYPE(dest_desc)) { |
1da177e4 LT |
255 | case ACPI_TYPE_INTEGER: |
256 | ||
257 | dest_desc->integer.value = actual_src_desc->integer.value; | |
258 | ||
259 | /* Truncate value if we are executing from a 32-bit ACPI table */ | |
260 | ||
4be44fcd | 261 | acpi_ex_truncate_for32bit_table(dest_desc); |
1da177e4 LT |
262 | break; |
263 | ||
264 | case ACPI_TYPE_STRING: | |
265 | ||
4be44fcd LB |
266 | status = |
267 | acpi_ex_store_string_to_string(actual_src_desc, dest_desc); | |
1da177e4 LT |
268 | break; |
269 | ||
270 | case ACPI_TYPE_BUFFER: | |
271 | ||
4be44fcd LB |
272 | status = |
273 | acpi_ex_store_buffer_to_buffer(actual_src_desc, dest_desc); | |
1da177e4 LT |
274 | break; |
275 | ||
276 | case ACPI_TYPE_PACKAGE: | |
277 | ||
4be44fcd LB |
278 | status = |
279 | acpi_ut_copy_iobject_to_iobject(actual_src_desc, &dest_desc, | |
280 | walk_state); | |
1da177e4 LT |
281 | break; |
282 | ||
283 | default: | |
284 | /* | |
285 | * All other types come here. | |
286 | */ | |
b8e4d893 BM |
287 | ACPI_WARNING((AE_INFO, "Store into type %s not implemented", |
288 | acpi_ut_get_object_type_name(dest_desc))); | |
1da177e4 LT |
289 | |
290 | status = AE_NOT_IMPLEMENTED; | |
291 | break; | |
292 | } | |
293 | ||
294 | if (actual_src_desc != source_desc) { | |
52fc0b02 | 295 | |
1da177e4 LT |
296 | /* Delete the intermediate (temporary) source object */ |
297 | ||
4be44fcd | 298 | acpi_ut_remove_reference(actual_src_desc); |
1da177e4 LT |
299 | } |
300 | ||
301 | *new_desc = dest_desc; | |
4be44fcd | 302 | return_ACPI_STATUS(status); |
1da177e4 | 303 | } |