blob: 37d0d39e60a6e8a9d25d51b12d2802c0faffabab [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/******************************************************************************
2 *
3 * Module Name: exconvrt - Object conversion routines
4 *
5 *****************************************************************************/
6
7/*
Len Brown75a44ce2008-04-23 23:00:13 -04008 * Copyright (C) 2000 - 2008, Intel Corp.
Linus Torvalds1da177e2005-04-16 15:20:36 -07009 * 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
Linus Torvalds1da177e2005-04-16 15:20:36 -070044#include <acpi/acpi.h>
Len Browne2f7a772009-01-09 00:30:03 -050045#include "accommon.h"
46#include "acinterp.h"
47#include "amlcode.h"
Linus Torvalds1da177e2005-04-16 15:20:36 -070048
Linus Torvalds1da177e2005-04-16 15:20:36 -070049#define _COMPONENT ACPI_EXECUTER
Len Brown4be44fc2005-08-05 00:44:28 -040050ACPI_MODULE_NAME("exconvrt")
Linus Torvalds1da177e2005-04-16 15:20:36 -070051
Robert Moore44f6c012005-04-18 22:49:35 -040052/* Local prototypes */
Robert Moore44f6c012005-04-18 22:49:35 -040053static u32
Len Brown4be44fc2005-08-05 00:44:28 -040054acpi_ex_convert_to_ascii(acpi_integer integer,
55 u16 base, u8 * string, u8 max_length);
Linus Torvalds1da177e2005-04-16 15:20:36 -070056
57/*******************************************************************************
58 *
59 * FUNCTION: acpi_ex_convert_to_integer
60 *
Bob Moore2425a092008-09-27 10:42:02 +080061 * PARAMETERS: obj_desc - Object to be converted. Must be an
Linus Torvalds1da177e2005-04-16 15:20:36 -070062 * Integer, Buffer, or String
63 * result_desc - Where the new Integer object is returned
64 * Flags - Used for string conversion
65 *
66 * RETURN: Status
67 *
68 * DESCRIPTION: Convert an ACPI Object to an integer.
69 *
70 ******************************************************************************/
71
72acpi_status
Len Brown4be44fc2005-08-05 00:44:28 -040073acpi_ex_convert_to_integer(union acpi_operand_object *obj_desc,
74 union acpi_operand_object **result_desc, u32 flags)
Linus Torvalds1da177e2005-04-16 15:20:36 -070075{
Len Brown4be44fc2005-08-05 00:44:28 -040076 union acpi_operand_object *return_desc;
77 u8 *pointer;
78 acpi_integer result;
79 u32 i;
80 u32 count;
81 acpi_status status;
Linus Torvalds1da177e2005-04-16 15:20:36 -070082
Bob Mooreb229cf92006-04-21 17:15:00 -040083 ACPI_FUNCTION_TRACE_PTR(ex_convert_to_integer, obj_desc);
Linus Torvalds1da177e2005-04-16 15:20:36 -070084
Bob Moore3371c192009-02-18 14:44:03 +080085 switch (obj_desc->common.type) {
Linus Torvalds1da177e2005-04-16 15:20:36 -070086 case ACPI_TYPE_INTEGER:
87
88 /* No conversion necessary */
89
90 *result_desc = obj_desc;
Len Brown4be44fc2005-08-05 00:44:28 -040091 return_ACPI_STATUS(AE_OK);
Linus Torvalds1da177e2005-04-16 15:20:36 -070092
93 case ACPI_TYPE_BUFFER:
94 case ACPI_TYPE_STRING:
95
96 /* Note: Takes advantage of common buffer/string fields */
97
98 pointer = obj_desc->buffer.pointer;
Len Brown4be44fc2005-08-05 00:44:28 -040099 count = obj_desc->buffer.length;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700100 break;
101
102 default:
Len Brown4be44fc2005-08-05 00:44:28 -0400103 return_ACPI_STATUS(AE_TYPE);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700104 }
105
106 /*
Bob Moore2425a092008-09-27 10:42:02 +0800107 * Convert the buffer/string to an integer. Note that both buffers and
Linus Torvalds1da177e2005-04-16 15:20:36 -0700108 * strings are treated as raw data - we don't convert ascii to hex for
109 * strings.
110 *
111 * There are two terminating conditions for the loop:
112 * 1) The size of an integer has been reached, or
113 * 2) The end of the buffer or string has been reached
114 */
115 result = 0;
116
Robert Moore44f6c012005-04-18 22:49:35 -0400117 /* String conversion is different than Buffer conversion */
118
Bob Moore3371c192009-02-18 14:44:03 +0800119 switch (obj_desc->common.type) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700120 case ACPI_TYPE_STRING:
121
122 /*
123 * Convert string to an integer - for most cases, the string must be
Bob Moore2425a092008-09-27 10:42:02 +0800124 * hexadecimal as per the ACPI specification. The only exception (as
Linus Torvalds1da177e2005-04-16 15:20:36 -0700125 * of ACPI 3.0) is that the to_integer() operator allows both decimal
126 * and hexadecimal strings (hex prefixed with "0x").
127 */
Len Brown4be44fc2005-08-05 00:44:28 -0400128 status = acpi_ut_strtoul64((char *)pointer, flags, &result);
129 if (ACPI_FAILURE(status)) {
130 return_ACPI_STATUS(status);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700131 }
132 break;
133
Linus Torvalds1da177e2005-04-16 15:20:36 -0700134 case ACPI_TYPE_BUFFER:
135
136 /* Check for zero-length buffer */
137
138 if (!count) {
Len Brown4be44fc2005-08-05 00:44:28 -0400139 return_ACPI_STATUS(AE_AML_BUFFER_LIMIT);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700140 }
141
142 /* Transfer no more than an integer's worth of data */
143
144 if (count > acpi_gbl_integer_byte_width) {
145 count = acpi_gbl_integer_byte_width;
146 }
147
148 /*
149 * Convert buffer to an integer - we simply grab enough raw data
150 * from the buffer to fill an integer
151 */
152 for (i = 0; i < count; i++) {
153 /*
154 * Get next byte and shift it into the Result.
155 * Little endian is used, meaning that the first byte of the buffer
156 * is the LSB of the integer
157 */
158 result |= (((acpi_integer) pointer[i]) << (i * 8));
159 }
160 break;
161
Linus Torvalds1da177e2005-04-16 15:20:36 -0700162 default:
Bob Moore2425a092008-09-27 10:42:02 +0800163
Linus Torvalds1da177e2005-04-16 15:20:36 -0700164 /* No other types can get here */
165 break;
166 }
167
Robert Moore44f6c012005-04-18 22:49:35 -0400168 /* Create a new integer */
169
Len Brown4be44fc2005-08-05 00:44:28 -0400170 return_desc = acpi_ut_create_internal_object(ACPI_TYPE_INTEGER);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700171 if (!return_desc) {
Len Brown4be44fc2005-08-05 00:44:28 -0400172 return_ACPI_STATUS(AE_NO_MEMORY);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700173 }
174
Bob Mooref6dd9222006-07-07 20:44:38 -0400175 ACPI_DEBUG_PRINT((ACPI_DB_EXEC, "Converted value: %8.8X%8.8X\n",
176 ACPI_FORMAT_UINT64(result)));
177
Linus Torvalds1da177e2005-04-16 15:20:36 -0700178 /* Save the Result */
179
180 return_desc->integer.value = result;
Len Brown4be44fc2005-08-05 00:44:28 -0400181 acpi_ex_truncate_for32bit_table(return_desc);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700182 *result_desc = return_desc;
Len Brown4be44fc2005-08-05 00:44:28 -0400183 return_ACPI_STATUS(AE_OK);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700184}
185
Linus Torvalds1da177e2005-04-16 15:20:36 -0700186/*******************************************************************************
187 *
188 * FUNCTION: acpi_ex_convert_to_buffer
189 *
Bob Moore2425a092008-09-27 10:42:02 +0800190 * PARAMETERS: obj_desc - Object to be converted. Must be an
Linus Torvalds1da177e2005-04-16 15:20:36 -0700191 * Integer, Buffer, or String
192 * result_desc - Where the new buffer object is returned
193 *
194 * RETURN: Status
195 *
196 * DESCRIPTION: Convert an ACPI Object to a Buffer
197 *
198 ******************************************************************************/
199
200acpi_status
Len Brown4be44fc2005-08-05 00:44:28 -0400201acpi_ex_convert_to_buffer(union acpi_operand_object *obj_desc,
202 union acpi_operand_object **result_desc)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700203{
Len Brown4be44fc2005-08-05 00:44:28 -0400204 union acpi_operand_object *return_desc;
205 u8 *new_buf;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700206
Bob Mooreb229cf92006-04-21 17:15:00 -0400207 ACPI_FUNCTION_TRACE_PTR(ex_convert_to_buffer, obj_desc);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700208
Bob Moore3371c192009-02-18 14:44:03 +0800209 switch (obj_desc->common.type) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700210 case ACPI_TYPE_BUFFER:
211
212 /* No conversion necessary */
213
214 *result_desc = obj_desc;
Len Brown4be44fc2005-08-05 00:44:28 -0400215 return_ACPI_STATUS(AE_OK);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700216
217 case ACPI_TYPE_INTEGER:
218
219 /*
220 * Create a new Buffer object.
221 * Need enough space for one integer
222 */
Len Brown4be44fc2005-08-05 00:44:28 -0400223 return_desc =
224 acpi_ut_create_buffer_object(acpi_gbl_integer_byte_width);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700225 if (!return_desc) {
Len Brown4be44fc2005-08-05 00:44:28 -0400226 return_ACPI_STATUS(AE_NO_MEMORY);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700227 }
228
229 /* Copy the integer to the buffer, LSB first */
230
231 new_buf = return_desc->buffer.pointer;
Len Brown4be44fc2005-08-05 00:44:28 -0400232 ACPI_MEMCPY(new_buf,
233 &obj_desc->integer.value,
234 acpi_gbl_integer_byte_width);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700235 break;
236
Linus Torvalds1da177e2005-04-16 15:20:36 -0700237 case ACPI_TYPE_STRING:
238
239 /*
240 * Create a new Buffer object
241 * Size will be the string length
242 *
243 * NOTE: Add one to the string length to include the null terminator.
244 * The ACPI spec is unclear on this subject, but there is existing
245 * ASL/AML code that depends on the null being transferred to the new
246 * buffer.
247 */
Len Brown4be44fc2005-08-05 00:44:28 -0400248 return_desc = acpi_ut_create_buffer_object((acpi_size)
249 obj_desc->string.
250 length + 1);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700251 if (!return_desc) {
Len Brown4be44fc2005-08-05 00:44:28 -0400252 return_ACPI_STATUS(AE_NO_MEMORY);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700253 }
254
255 /* Copy the string to the buffer */
256
257 new_buf = return_desc->buffer.pointer;
Len Brown4be44fc2005-08-05 00:44:28 -0400258 ACPI_STRNCPY((char *)new_buf, (char *)obj_desc->string.pointer,
259 obj_desc->string.length);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700260 break;
261
Linus Torvalds1da177e2005-04-16 15:20:36 -0700262 default:
Len Brown4be44fc2005-08-05 00:44:28 -0400263 return_ACPI_STATUS(AE_TYPE);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700264 }
265
266 /* Mark buffer initialized */
267
268 return_desc->common.flags |= AOPOBJ_DATA_VALID;
269 *result_desc = return_desc;
Len Brown4be44fc2005-08-05 00:44:28 -0400270 return_ACPI_STATUS(AE_OK);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700271}
272
Linus Torvalds1da177e2005-04-16 15:20:36 -0700273/*******************************************************************************
274 *
275 * FUNCTION: acpi_ex_convert_to_ascii
276 *
277 * PARAMETERS: Integer - Value to be converted
278 * Base - ACPI_STRING_DECIMAL or ACPI_STRING_HEX
279 * String - Where the string is returned
280 * data_width - Size of data item to be converted, in bytes
281 *
282 * RETURN: Actual string length
283 *
284 * DESCRIPTION: Convert an ACPI Integer to a hex or decimal string
285 *
286 ******************************************************************************/
287
Robert Moore44f6c012005-04-18 22:49:35 -0400288static u32
Len Brown4be44fc2005-08-05 00:44:28 -0400289acpi_ex_convert_to_ascii(acpi_integer integer,
290 u16 base, u8 * string, u8 data_width)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700291{
Len Brown4be44fc2005-08-05 00:44:28 -0400292 acpi_integer digit;
Bob Moore67a119f2008-06-10 13:42:13 +0800293 u32 i;
294 u32 j;
295 u32 k = 0;
296 u32 hex_length;
297 u32 decimal_length;
Len Brown4be44fc2005-08-05 00:44:28 -0400298 u32 remainder;
299 u8 supress_zeros;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700300
Len Brown4be44fc2005-08-05 00:44:28 -0400301 ACPI_FUNCTION_ENTRY();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700302
303 switch (base) {
304 case 10:
305
306 /* Setup max length for the decimal number */
307
308 switch (data_width) {
309 case 1:
310 decimal_length = ACPI_MAX8_DECIMAL_DIGITS;
311 break;
312
313 case 4:
314 decimal_length = ACPI_MAX32_DECIMAL_DIGITS;
315 break;
316
317 case 8:
318 default:
319 decimal_length = ACPI_MAX64_DECIMAL_DIGITS;
320 break;
321 }
322
Len Brown4be44fc2005-08-05 00:44:28 -0400323 supress_zeros = TRUE; /* No leading zeros */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700324 remainder = 0;
325
326 for (i = decimal_length; i > 0; i--) {
Bob Moore52fc0b02006-10-02 00:00:00 -0400327
Linus Torvalds1da177e2005-04-16 15:20:36 -0700328 /* Divide by nth factor of 10 */
329
330 digit = integer;
331 for (j = 0; j < i; j++) {
Len Brown4be44fc2005-08-05 00:44:28 -0400332 (void)acpi_ut_short_divide(digit, 10, &digit,
333 &remainder);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700334 }
335
336 /* Handle leading zeros */
337
338 if (remainder != 0) {
339 supress_zeros = FALSE;
340 }
341
342 if (!supress_zeros) {
343 string[k] = (u8) (ACPI_ASCII_ZERO + remainder);
344 k++;
345 }
346 }
347 break;
348
349 case 16:
350
Robert Moore44f6c012005-04-18 22:49:35 -0400351 /* hex_length: 2 ascii hex chars per data byte */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700352
Bob Moore67a119f2008-06-10 13:42:13 +0800353 hex_length = ACPI_MUL_2(data_width);
Len Brown4be44fc2005-08-05 00:44:28 -0400354 for (i = 0, j = (hex_length - 1); i < hex_length; i++, j--) {
Bob Moore52fc0b02006-10-02 00:00:00 -0400355
Linus Torvalds1da177e2005-04-16 15:20:36 -0700356 /* Get one hex digit, most significant digits first */
357
Len Brown4be44fc2005-08-05 00:44:28 -0400358 string[k] =
359 (u8) acpi_ut_hex_to_ascii_char(integer,
360 ACPI_MUL_4(j));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700361 k++;
362 }
363 break;
364
365 default:
366 return (0);
367 }
368
369 /*
Bob Moore2425a092008-09-27 10:42:02 +0800370 * Since leading zeros are suppressed, we must check for the case where
Linus Torvalds1da177e2005-04-16 15:20:36 -0700371 * the integer equals 0
372 *
373 * Finally, null terminate the string and return the length
374 */
375 if (!k) {
Len Brown4be44fc2005-08-05 00:44:28 -0400376 string[0] = ACPI_ASCII_ZERO;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700377 k = 1;
378 }
379
Len Brown4be44fc2005-08-05 00:44:28 -0400380 string[k] = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700381 return ((u32) k);
382}
383
Linus Torvalds1da177e2005-04-16 15:20:36 -0700384/*******************************************************************************
385 *
386 * FUNCTION: acpi_ex_convert_to_string
387 *
Bob Moore2425a092008-09-27 10:42:02 +0800388 * PARAMETERS: obj_desc - Object to be converted. Must be an
Linus Torvalds1da177e2005-04-16 15:20:36 -0700389 * Integer, Buffer, or String
390 * result_desc - Where the string object is returned
391 * Type - String flags (base and conversion type)
392 *
393 * RETURN: Status
394 *
395 * DESCRIPTION: Convert an ACPI Object to a string
396 *
397 ******************************************************************************/
398
399acpi_status
Len Brown4be44fc2005-08-05 00:44:28 -0400400acpi_ex_convert_to_string(union acpi_operand_object * obj_desc,
401 union acpi_operand_object ** result_desc, u32 type)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700402{
Len Brown4be44fc2005-08-05 00:44:28 -0400403 union acpi_operand_object *return_desc;
404 u8 *new_buf;
405 u32 i;
406 u32 string_length = 0;
407 u16 base = 16;
408 u8 separator = ',';
Linus Torvalds1da177e2005-04-16 15:20:36 -0700409
Bob Mooreb229cf92006-04-21 17:15:00 -0400410 ACPI_FUNCTION_TRACE_PTR(ex_convert_to_string, obj_desc);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700411
Bob Moore3371c192009-02-18 14:44:03 +0800412 switch (obj_desc->common.type) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700413 case ACPI_TYPE_STRING:
414
415 /* No conversion necessary */
416
417 *result_desc = obj_desc;
Len Brown4be44fc2005-08-05 00:44:28 -0400418 return_ACPI_STATUS(AE_OK);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700419
420 case ACPI_TYPE_INTEGER:
421
422 switch (type) {
423 case ACPI_EXPLICIT_CONVERT_DECIMAL:
424
425 /* Make room for maximum decimal number */
426
427 string_length = ACPI_MAX_DECIMAL_DIGITS;
428 base = 10;
429 break;
430
431 default:
432
433 /* Two hex string characters for each integer byte */
434
Len Brown4be44fc2005-08-05 00:44:28 -0400435 string_length = ACPI_MUL_2(acpi_gbl_integer_byte_width);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700436 break;
437 }
438
439 /*
440 * Create a new String
441 * Need enough space for one ASCII integer (plus null terminator)
442 */
Len Brown4be44fc2005-08-05 00:44:28 -0400443 return_desc =
444 acpi_ut_create_string_object((acpi_size) string_length);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700445 if (!return_desc) {
Len Brown4be44fc2005-08-05 00:44:28 -0400446 return_ACPI_STATUS(AE_NO_MEMORY);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700447 }
448
449 new_buf = return_desc->buffer.pointer;
450
451 /* Convert integer to string */
452
Len Brown4be44fc2005-08-05 00:44:28 -0400453 string_length =
454 acpi_ex_convert_to_ascii(obj_desc->integer.value, base,
455 new_buf,
456 acpi_gbl_integer_byte_width);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700457
458 /* Null terminate at the correct place */
459
460 return_desc->string.length = string_length;
Len Brown4be44fc2005-08-05 00:44:28 -0400461 new_buf[string_length] = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700462 break;
463
Linus Torvalds1da177e2005-04-16 15:20:36 -0700464 case ACPI_TYPE_BUFFER:
465
466 /* Setup string length, base, and separator */
467
468 switch (type) {
Len Brown4be44fc2005-08-05 00:44:28 -0400469 case ACPI_EXPLICIT_CONVERT_DECIMAL: /* Used by to_decimal_string */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700470 /*
471 * From ACPI: "If Data is a buffer, it is converted to a string of
472 * decimal values separated by commas."
473 */
474 base = 10;
475
476 /*
Bob Moore2425a092008-09-27 10:42:02 +0800477 * Calculate the final string length. Individual string values
Linus Torvalds1da177e2005-04-16 15:20:36 -0700478 * are variable length (include separator for each)
479 */
480 for (i = 0; i < obj_desc->buffer.length; i++) {
481 if (obj_desc->buffer.pointer[i] >= 100) {
482 string_length += 4;
Len Brown4be44fc2005-08-05 00:44:28 -0400483 } else if (obj_desc->buffer.pointer[i] >= 10) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700484 string_length += 3;
Len Brown4be44fc2005-08-05 00:44:28 -0400485 } else {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700486 string_length += 2;
487 }
488 }
489 break;
490
491 case ACPI_IMPLICIT_CONVERT_HEX:
492 /*
493 * From the ACPI spec:
494 *"The entire contents of the buffer are converted to a string of
495 * two-character hexadecimal numbers, each separated by a space."
496 */
497 separator = ' ';
498 string_length = (obj_desc->buffer.length * 3);
499 break;
500
Len Brown4be44fc2005-08-05 00:44:28 -0400501 case ACPI_EXPLICIT_CONVERT_HEX: /* Used by to_hex_string */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700502 /*
503 * From ACPI: "If Data is a buffer, it is converted to a string of
504 * hexadecimal values separated by commas."
505 */
506 string_length = (obj_desc->buffer.length * 3);
507 break;
508
509 default:
Len Brown4be44fc2005-08-05 00:44:28 -0400510 return_ACPI_STATUS(AE_BAD_PARAMETER);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700511 }
512
513 /*
Bob Moorec51a4de2005-11-17 13:07:00 -0500514 * Create a new string object and string buffer
Linus Torvalds1da177e2005-04-16 15:20:36 -0700515 * (-1 because of extra separator included in string_length from above)
Bob Moore4ca846e2008-09-27 13:27:51 +0800516 * Allow creation of zero-length strings from zero-length buffers.
Linus Torvalds1da177e2005-04-16 15:20:36 -0700517 */
Bob Moore4ca846e2008-09-27 13:27:51 +0800518 if (string_length) {
519 string_length--;
520 }
521
Len Brownfd350942007-05-09 23:34:35 -0400522 return_desc = acpi_ut_create_string_object((acpi_size)
Bob Moore4ca846e2008-09-27 13:27:51 +0800523 string_length);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700524 if (!return_desc) {
Len Brown4be44fc2005-08-05 00:44:28 -0400525 return_ACPI_STATUS(AE_NO_MEMORY);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700526 }
527
528 new_buf = return_desc->buffer.pointer;
529
530 /*
531 * Convert buffer bytes to hex or decimal values
532 * (separated by commas or spaces)
533 */
534 for (i = 0; i < obj_desc->buffer.length; i++) {
Len Brown4be44fc2005-08-05 00:44:28 -0400535 new_buf += acpi_ex_convert_to_ascii((acpi_integer)
536 obj_desc->buffer.
537 pointer[i], base,
538 new_buf, 1);
539 *new_buf++ = separator; /* each separated by a comma or space */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700540 }
541
Robert Moore44f6c012005-04-18 22:49:35 -0400542 /*
543 * Null terminate the string
544 * (overwrites final comma/space from above)
545 */
Bob Moore4ca846e2008-09-27 13:27:51 +0800546 if (obj_desc->buffer.length) {
547 new_buf--;
548 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700549 *new_buf = 0;
550 break;
551
552 default:
Len Brown4be44fc2005-08-05 00:44:28 -0400553 return_ACPI_STATUS(AE_TYPE);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700554 }
555
556 *result_desc = return_desc;
Len Brown4be44fc2005-08-05 00:44:28 -0400557 return_ACPI_STATUS(AE_OK);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700558}
559
Linus Torvalds1da177e2005-04-16 15:20:36 -0700560/*******************************************************************************
561 *
562 * FUNCTION: acpi_ex_convert_to_target_type
563 *
564 * PARAMETERS: destination_type - Current type of the destination
565 * source_desc - Source object to be converted.
566 * result_desc - Where the converted object is returned
567 * walk_state - Current method state
568 *
569 * RETURN: Status
570 *
571 * DESCRIPTION: Implements "implicit conversion" rules for storing an object.
572 *
573 ******************************************************************************/
574
575acpi_status
Len Brown4be44fc2005-08-05 00:44:28 -0400576acpi_ex_convert_to_target_type(acpi_object_type destination_type,
577 union acpi_operand_object *source_desc,
578 union acpi_operand_object **result_desc,
579 struct acpi_walk_state *walk_state)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700580{
Len Brown4be44fc2005-08-05 00:44:28 -0400581 acpi_status status = AE_OK;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700582
Bob Mooreb229cf92006-04-21 17:15:00 -0400583 ACPI_FUNCTION_TRACE(ex_convert_to_target_type);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700584
585 /* Default behavior */
586
587 *result_desc = source_desc;
588
589 /*
590 * If required by the target,
591 * perform implicit conversion on the source before we store it.
592 */
Len Brown4be44fc2005-08-05 00:44:28 -0400593 switch (GET_CURRENT_ARG_TYPE(walk_state->op_info->runtime_args)) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700594 case ARGI_SIMPLE_TARGET:
595 case ARGI_FIXED_TARGET:
Len Brown4be44fc2005-08-05 00:44:28 -0400596 case ARGI_INTEGER_REF: /* Handles Increment, Decrement cases */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700597
598 switch (destination_type) {
599 case ACPI_TYPE_LOCAL_REGION_FIELD:
600 /*
601 * Named field can always handle conversions
602 */
603 break;
604
605 default:
606 /* No conversion allowed for these types */
607
Bob Moore3371c192009-02-18 14:44:03 +0800608 if (destination_type != source_desc->common.type) {
Len Brown4be44fc2005-08-05 00:44:28 -0400609 ACPI_DEBUG_PRINT((ACPI_DB_INFO,
610 "Explicit operator, will store (%s) over existing type (%s)\n",
611 acpi_ut_get_object_type_name
612 (source_desc),
613 acpi_ut_get_type_name
614 (destination_type)));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700615 status = AE_TYPE;
616 }
617 }
618 break;
619
Linus Torvalds1da177e2005-04-16 15:20:36 -0700620 case ARGI_TARGETREF:
621
622 switch (destination_type) {
623 case ACPI_TYPE_INTEGER:
624 case ACPI_TYPE_BUFFER_FIELD:
625 case ACPI_TYPE_LOCAL_BANK_FIELD:
626 case ACPI_TYPE_LOCAL_INDEX_FIELD:
627 /*
Bob Moore2425a092008-09-27 10:42:02 +0800628 * These types require an Integer operand. We can convert
Linus Torvalds1da177e2005-04-16 15:20:36 -0700629 * a Buffer or a String to an Integer if necessary.
630 */
Len Brown4be44fc2005-08-05 00:44:28 -0400631 status =
632 acpi_ex_convert_to_integer(source_desc, result_desc,
633 16);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700634 break;
635
Linus Torvalds1da177e2005-04-16 15:20:36 -0700636 case ACPI_TYPE_STRING:
Linus Torvalds1da177e2005-04-16 15:20:36 -0700637 /*
Bob Moore2425a092008-09-27 10:42:02 +0800638 * The operand must be a String. We can convert an
Linus Torvalds1da177e2005-04-16 15:20:36 -0700639 * Integer or Buffer if necessary
640 */
Len Brown4be44fc2005-08-05 00:44:28 -0400641 status =
642 acpi_ex_convert_to_string(source_desc, result_desc,
643 ACPI_IMPLICIT_CONVERT_HEX);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700644 break;
645
Linus Torvalds1da177e2005-04-16 15:20:36 -0700646 case ACPI_TYPE_BUFFER:
Linus Torvalds1da177e2005-04-16 15:20:36 -0700647 /*
Bob Moore2425a092008-09-27 10:42:02 +0800648 * The operand must be a Buffer. We can convert an
Linus Torvalds1da177e2005-04-16 15:20:36 -0700649 * Integer or String if necessary
650 */
Len Brown4be44fc2005-08-05 00:44:28 -0400651 status =
652 acpi_ex_convert_to_buffer(source_desc, result_desc);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700653 break;
654
Linus Torvalds1da177e2005-04-16 15:20:36 -0700655 default:
Bob Mooreb8e4d892006-01-27 16:43:00 -0500656 ACPI_ERROR((AE_INFO,
657 "Bad destination type during conversion: %X",
658 destination_type));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700659 status = AE_AML_INTERNAL;
660 break;
661 }
662 break;
663
Linus Torvalds1da177e2005-04-16 15:20:36 -0700664 case ARGI_REFERENCE:
665 /*
666 * create_xxxx_field cases - we are storing the field object into the name
667 */
668 break;
669
Linus Torvalds1da177e2005-04-16 15:20:36 -0700670 default:
Bob Mooreb8e4d892006-01-27 16:43:00 -0500671 ACPI_ERROR((AE_INFO,
Bob Mooreb229cf92006-04-21 17:15:00 -0400672 "Unknown Target type ID 0x%X AmlOpcode %X DestType %s",
Bob Mooreb8e4d892006-01-27 16:43:00 -0500673 GET_CURRENT_ARG_TYPE(walk_state->op_info->
674 runtime_args),
675 walk_state->opcode,
676 acpi_ut_get_type_name(destination_type)));
Bob Moore4a90c7e2006-01-13 16:22:00 -0500677 status = AE_AML_INTERNAL;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700678 }
679
680 /*
681 * Source-to-Target conversion semantics:
682 *
683 * If conversion to the target type cannot be performed, then simply
684 * overwrite the target with the new object and type.
685 */
686 if (status == AE_TYPE) {
687 status = AE_OK;
688 }
689
Len Brown4be44fc2005-08-05 00:44:28 -0400690 return_ACPI_STATUS(status);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700691}