Import acpica-unix-20061109 from Intel.
[dragonfly.git] / sys / contrib / dev / acpica-unix-20061109 / interpreter / executer / exconvrt.c
bloba5882b183a208b0d2de34275f59f8b32ea271f09
1 /******************************************************************************
3 * Module Name: exconvrt - Object conversion routines
4 * $Revision: 1.73 $
6 *****************************************************************************/
8 /******************************************************************************
10 * 1. Copyright Notice
12 * Some or all of this work - Copyright (c) 1999 - 2006, Intel Corp.
13 * All rights reserved.
15 * 2. License
17 * 2.1. This is your license from Intel Corp. under its intellectual property
18 * rights. You may have additional license terms from the party that provided
19 * you this software, covering your right to use that party's intellectual
20 * property rights.
22 * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
23 * copy of the source code appearing in this file ("Covered Code") an
24 * irrevocable, perpetual, worldwide license under Intel's copyrights in the
25 * base code distributed originally by Intel ("Original Intel Code") to copy,
26 * make derivatives, distribute, use and display any portion of the Covered
27 * Code in any form, with the right to sublicense such rights; and
29 * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
30 * license (with the right to sublicense), under only those claims of Intel
31 * patents that are infringed by the Original Intel Code, to make, use, sell,
32 * offer to sell, and import the Covered Code and derivative works thereof
33 * solely to the minimum extent necessary to exercise the above copyright
34 * license, and in no event shall the patent license extend to any additions
35 * to or modifications of the Original Intel Code. No other license or right
36 * is granted directly or by implication, estoppel or otherwise;
38 * The above copyright and patent license is granted only if the following
39 * conditions are met:
41 * 3. Conditions
43 * 3.1. Redistribution of Source with Rights to Further Distribute Source.
44 * Redistribution of source code of any substantial portion of the Covered
45 * Code or modification with rights to further distribute source must include
46 * the above Copyright Notice, the above License, this list of Conditions,
47 * and the following Disclaimer and Export Compliance provision. In addition,
48 * Licensee must cause all Covered Code to which Licensee contributes to
49 * contain a file documenting the changes Licensee made to create that Covered
50 * Code and the date of any change. Licensee must include in that file the
51 * documentation of any changes made by any predecessor Licensee. Licensee
52 * must include a prominent statement that the modification is derived,
53 * directly or indirectly, from Original Intel Code.
55 * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
56 * Redistribution of source code of any substantial portion of the Covered
57 * Code or modification without rights to further distribute source must
58 * include the following Disclaimer and Export Compliance provision in the
59 * documentation and/or other materials provided with distribution. In
60 * addition, Licensee may not authorize further sublicense of source of any
61 * portion of the Covered Code, and must include terms to the effect that the
62 * license from Licensee to its licensee is limited to the intellectual
63 * property embodied in the software Licensee provides to its licensee, and
64 * not to intellectual property embodied in modifications its licensee may
65 * make.
67 * 3.3. Redistribution of Executable. Redistribution in executable form of any
68 * substantial portion of the Covered Code or modification must reproduce the
69 * above Copyright Notice, and the following Disclaimer and Export Compliance
70 * provision in the documentation and/or other materials provided with the
71 * distribution.
73 * 3.4. Intel retains all right, title, and interest in and to the Original
74 * Intel Code.
76 * 3.5. Neither the name Intel nor any other trademark owned or controlled by
77 * Intel shall be used in advertising or otherwise to promote the sale, use or
78 * other dealings in products derived from or relating to the Covered Code
79 * without prior written authorization from Intel.
81 * 4. Disclaimer and Export Compliance
83 * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
84 * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
85 * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
86 * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
87 * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
88 * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
89 * PARTICULAR PURPOSE.
91 * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
92 * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
93 * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
94 * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
95 * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
96 * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
97 * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
98 * LIMITED REMEDY.
100 * 4.3. Licensee shall not export, either directly or indirectly, any of this
101 * software or system incorporating such software without first obtaining any
102 * required license or other approval from the U. S. Department of Commerce or
103 * any other agency or department of the United States Government. In the
104 * event Licensee exports any such software from the United States or
105 * re-exports any such software from a foreign destination, Licensee shall
106 * ensure that the distribution and export/re-export of the software is in
107 * compliance with all laws, regulations, orders, or other restrictions of the
108 * U.S. Export Administration Regulations. Licensee agrees that neither it nor
109 * any of its subsidiaries will export/re-export any technical data, process,
110 * software, or service, directly or indirectly, to any country for which the
111 * United States government or any agency thereof requires an export license,
112 * other governmental approval, or letter of assurance, without first obtaining
113 * such license, approval or letter.
115 *****************************************************************************/
118 #define __EXCONVRT_C__
120 #include "acpi.h"
121 #include "acinterp.h"
122 #include "amlcode.h"
125 #define _COMPONENT ACPI_EXECUTER
126 ACPI_MODULE_NAME ("exconvrt")
128 /* Local prototypes */
130 static UINT32
131 AcpiExConvertToAscii (
132 ACPI_INTEGER Integer,
133 UINT16 Base,
134 UINT8 *String,
135 UINT8 MaxLength);
138 /*******************************************************************************
140 * FUNCTION: AcpiExConvertToInteger
142 * PARAMETERS: ObjDesc - Object to be converted. Must be an
143 * Integer, Buffer, or String
144 * ResultDesc - Where the new Integer object is returned
145 * Flags - Used for string conversion
147 * RETURN: Status
149 * DESCRIPTION: Convert an ACPI Object to an integer.
151 ******************************************************************************/
153 ACPI_STATUS
154 AcpiExConvertToInteger (
155 ACPI_OPERAND_OBJECT *ObjDesc,
156 ACPI_OPERAND_OBJECT **ResultDesc,
157 UINT32 Flags)
159 ACPI_OPERAND_OBJECT *ReturnDesc;
160 UINT8 *Pointer;
161 ACPI_INTEGER Result;
162 UINT32 i;
163 UINT32 Count;
164 ACPI_STATUS Status;
167 ACPI_FUNCTION_TRACE_PTR (ExConvertToInteger, ObjDesc);
170 switch (ACPI_GET_OBJECT_TYPE (ObjDesc))
172 case ACPI_TYPE_INTEGER:
174 /* No conversion necessary */
176 *ResultDesc = ObjDesc;
177 return_ACPI_STATUS (AE_OK);
179 case ACPI_TYPE_BUFFER:
180 case ACPI_TYPE_STRING:
182 /* Note: Takes advantage of common buffer/string fields */
184 Pointer = ObjDesc->Buffer.Pointer;
185 Count = ObjDesc->Buffer.Length;
186 break;
188 default:
189 return_ACPI_STATUS (AE_TYPE);
193 * Convert the buffer/string to an integer. Note that both buffers and
194 * strings are treated as raw data - we don't convert ascii to hex for
195 * strings.
197 * There are two terminating conditions for the loop:
198 * 1) The size of an integer has been reached, or
199 * 2) The end of the buffer or string has been reached
201 Result = 0;
203 /* String conversion is different than Buffer conversion */
205 switch (ACPI_GET_OBJECT_TYPE (ObjDesc))
207 case ACPI_TYPE_STRING:
210 * Convert string to an integer - for most cases, the string must be
211 * hexadecimal as per the ACPI specification. The only exception (as
212 * of ACPI 3.0) is that the ToInteger() operator allows both decimal
213 * and hexadecimal strings (hex prefixed with "0x").
215 Status = AcpiUtStrtoul64 ((char *) Pointer, Flags, &Result);
216 if (ACPI_FAILURE (Status))
218 return_ACPI_STATUS (Status);
220 break;
223 case ACPI_TYPE_BUFFER:
225 /* Check for zero-length buffer */
227 if (!Count)
229 return_ACPI_STATUS (AE_AML_BUFFER_LIMIT);
232 /* Transfer no more than an integer's worth of data */
234 if (Count > AcpiGbl_IntegerByteWidth)
236 Count = AcpiGbl_IntegerByteWidth;
240 * Convert buffer to an integer - we simply grab enough raw data
241 * from the buffer to fill an integer
243 for (i = 0; i < Count; i++)
246 * Get next byte and shift it into the Result.
247 * Little endian is used, meaning that the first byte of the buffer
248 * is the LSB of the integer
250 Result |= (((ACPI_INTEGER) Pointer[i]) << (i * 8));
252 break;
255 default:
256 /* No other types can get here */
257 break;
260 /* Create a new integer */
262 ReturnDesc = AcpiUtCreateInternalObject (ACPI_TYPE_INTEGER);
263 if (!ReturnDesc)
265 return_ACPI_STATUS (AE_NO_MEMORY);
268 ACPI_DEBUG_PRINT ((ACPI_DB_EXEC, "Converted value: %8.8X%8.8X\n",
269 ACPI_FORMAT_UINT64 (Result)));
271 /* Save the Result */
273 ReturnDesc->Integer.Value = Result;
274 AcpiExTruncateFor32bitTable (ReturnDesc);
275 *ResultDesc = ReturnDesc;
276 return_ACPI_STATUS (AE_OK);
280 /*******************************************************************************
282 * FUNCTION: AcpiExConvertToBuffer
284 * PARAMETERS: ObjDesc - Object to be converted. Must be an
285 * Integer, Buffer, or String
286 * ResultDesc - Where the new buffer object is returned
288 * RETURN: Status
290 * DESCRIPTION: Convert an ACPI Object to a Buffer
292 ******************************************************************************/
294 ACPI_STATUS
295 AcpiExConvertToBuffer (
296 ACPI_OPERAND_OBJECT *ObjDesc,
297 ACPI_OPERAND_OBJECT **ResultDesc)
299 ACPI_OPERAND_OBJECT *ReturnDesc;
300 UINT8 *NewBuf;
303 ACPI_FUNCTION_TRACE_PTR (ExConvertToBuffer, ObjDesc);
306 switch (ACPI_GET_OBJECT_TYPE (ObjDesc))
308 case ACPI_TYPE_BUFFER:
310 /* No conversion necessary */
312 *ResultDesc = ObjDesc;
313 return_ACPI_STATUS (AE_OK);
316 case ACPI_TYPE_INTEGER:
319 * Create a new Buffer object.
320 * Need enough space for one integer
322 ReturnDesc = AcpiUtCreateBufferObject (AcpiGbl_IntegerByteWidth);
323 if (!ReturnDesc)
325 return_ACPI_STATUS (AE_NO_MEMORY);
328 /* Copy the integer to the buffer, LSB first */
330 NewBuf = ReturnDesc->Buffer.Pointer;
331 ACPI_MEMCPY (NewBuf,
332 &ObjDesc->Integer.Value,
333 AcpiGbl_IntegerByteWidth);
334 break;
337 case ACPI_TYPE_STRING:
340 * Create a new Buffer object
341 * Size will be the string length
343 * NOTE: Add one to the string length to include the null terminator.
344 * The ACPI spec is unclear on this subject, but there is existing
345 * ASL/AML code that depends on the null being transferred to the new
346 * buffer.
348 ReturnDesc = AcpiUtCreateBufferObject (
349 (ACPI_SIZE) ObjDesc->String.Length + 1);
350 if (!ReturnDesc)
352 return_ACPI_STATUS (AE_NO_MEMORY);
355 /* Copy the string to the buffer */
357 NewBuf = ReturnDesc->Buffer.Pointer;
358 ACPI_STRNCPY ((char *) NewBuf, (char *) ObjDesc->String.Pointer,
359 ObjDesc->String.Length);
360 break;
363 default:
364 return_ACPI_STATUS (AE_TYPE);
367 /* Mark buffer initialized */
369 ReturnDesc->Common.Flags |= AOPOBJ_DATA_VALID;
370 *ResultDesc = ReturnDesc;
371 return_ACPI_STATUS (AE_OK);
375 /*******************************************************************************
377 * FUNCTION: AcpiExConvertToAscii
379 * PARAMETERS: Integer - Value to be converted
380 * Base - ACPI_STRING_DECIMAL or ACPI_STRING_HEX
381 * String - Where the string is returned
382 * DataWidth - Size of data item to be converted, in bytes
384 * RETURN: Actual string length
386 * DESCRIPTION: Convert an ACPI Integer to a hex or decimal string
388 ******************************************************************************/
390 static UINT32
391 AcpiExConvertToAscii (
392 ACPI_INTEGER Integer,
393 UINT16 Base,
394 UINT8 *String,
395 UINT8 DataWidth)
397 ACPI_INTEGER Digit;
398 ACPI_NATIVE_UINT i;
399 ACPI_NATIVE_UINT j;
400 ACPI_NATIVE_UINT k = 0;
401 ACPI_NATIVE_UINT HexLength;
402 ACPI_NATIVE_UINT DecimalLength;
403 UINT32 Remainder;
404 BOOLEAN SupressZeros;
407 ACPI_FUNCTION_ENTRY ();
410 switch (Base)
412 case 10:
414 /* Setup max length for the decimal number */
416 switch (DataWidth)
418 case 1:
419 DecimalLength = ACPI_MAX8_DECIMAL_DIGITS;
420 break;
422 case 4:
423 DecimalLength = ACPI_MAX32_DECIMAL_DIGITS;
424 break;
426 case 8:
427 default:
428 DecimalLength = ACPI_MAX64_DECIMAL_DIGITS;
429 break;
432 SupressZeros = TRUE; /* No leading zeros */
433 Remainder = 0;
435 for (i = DecimalLength; i > 0; i--)
437 /* Divide by nth factor of 10 */
439 Digit = Integer;
440 for (j = 0; j < i; j++)
442 (void) AcpiUtShortDivide (Digit, 10, &Digit, &Remainder);
445 /* Handle leading zeros */
447 if (Remainder != 0)
449 SupressZeros = FALSE;
452 if (!SupressZeros)
454 String[k] = (UINT8) (ACPI_ASCII_ZERO + Remainder);
455 k++;
458 break;
460 case 16:
462 /* HexLength: 2 ascii hex chars per data byte */
464 HexLength = (ACPI_NATIVE_UINT) ACPI_MUL_2 (DataWidth);
465 for (i = 0, j = (HexLength-1); i < HexLength; i++, j--)
467 /* Get one hex digit, most significant digits first */
469 String[k] = (UINT8) AcpiUtHexToAsciiChar (Integer, ACPI_MUL_4 (j));
470 k++;
472 break;
474 default:
475 return (0);
479 * Since leading zeros are supressed, we must check for the case where
480 * the integer equals 0
482 * Finally, null terminate the string and return the length
484 if (!k)
486 String [0] = ACPI_ASCII_ZERO;
487 k = 1;
490 String [k] = 0;
491 return ((UINT32) k);
495 /*******************************************************************************
497 * FUNCTION: AcpiExConvertToString
499 * PARAMETERS: ObjDesc - Object to be converted. Must be an
500 * Integer, Buffer, or String
501 * ResultDesc - Where the string object is returned
502 * Type - String flags (base and conversion type)
504 * RETURN: Status
506 * DESCRIPTION: Convert an ACPI Object to a string
508 ******************************************************************************/
510 ACPI_STATUS
511 AcpiExConvertToString (
512 ACPI_OPERAND_OBJECT *ObjDesc,
513 ACPI_OPERAND_OBJECT **ResultDesc,
514 UINT32 Type)
516 ACPI_OPERAND_OBJECT *ReturnDesc;
517 UINT8 *NewBuf;
518 UINT32 i;
519 UINT32 StringLength = 0;
520 UINT16 Base = 16;
521 UINT8 Separator = ',';
524 ACPI_FUNCTION_TRACE_PTR (ExConvertToString, ObjDesc);
527 switch (ACPI_GET_OBJECT_TYPE (ObjDesc))
529 case ACPI_TYPE_STRING:
531 /* No conversion necessary */
533 *ResultDesc = ObjDesc;
534 return_ACPI_STATUS (AE_OK);
537 case ACPI_TYPE_INTEGER:
539 switch (Type)
541 case ACPI_EXPLICIT_CONVERT_DECIMAL:
543 /* Make room for maximum decimal number */
545 StringLength = ACPI_MAX_DECIMAL_DIGITS;
546 Base = 10;
547 break;
549 default:
551 /* Two hex string characters for each integer byte */
553 StringLength = ACPI_MUL_2 (AcpiGbl_IntegerByteWidth);
554 break;
558 * Create a new String
559 * Need enough space for one ASCII integer (plus null terminator)
561 ReturnDesc = AcpiUtCreateStringObject ((ACPI_SIZE) StringLength);
562 if (!ReturnDesc)
564 return_ACPI_STATUS (AE_NO_MEMORY);
567 NewBuf = ReturnDesc->Buffer.Pointer;
569 /* Convert integer to string */
571 StringLength = AcpiExConvertToAscii (ObjDesc->Integer.Value, Base,
572 NewBuf, AcpiGbl_IntegerByteWidth);
574 /* Null terminate at the correct place */
576 ReturnDesc->String.Length = StringLength;
577 NewBuf [StringLength] = 0;
578 break;
581 case ACPI_TYPE_BUFFER:
583 /* Setup string length, base, and separator */
585 switch (Type)
587 case ACPI_EXPLICIT_CONVERT_DECIMAL: /* Used by ToDecimalString */
589 * From ACPI: "If Data is a buffer, it is converted to a string of
590 * decimal values separated by commas."
592 Base = 10;
595 * Calculate the final string length. Individual string values
596 * are variable length (include separator for each)
598 for (i = 0; i < ObjDesc->Buffer.Length; i++)
600 if (ObjDesc->Buffer.Pointer[i] >= 100)
602 StringLength += 4;
604 else if (ObjDesc->Buffer.Pointer[i] >= 10)
606 StringLength += 3;
608 else
610 StringLength += 2;
613 break;
615 case ACPI_IMPLICIT_CONVERT_HEX:
617 * From the ACPI spec:
618 *"The entire contents of the buffer are converted to a string of
619 * two-character hexadecimal numbers, each separated by a space."
621 Separator = ' ';
622 StringLength = (ObjDesc->Buffer.Length * 3);
623 break;
625 case ACPI_EXPLICIT_CONVERT_HEX: /* Used by ToHexString */
627 * From ACPI: "If Data is a buffer, it is converted to a string of
628 * hexadecimal values separated by commas."
630 StringLength = (ObjDesc->Buffer.Length * 3);
631 break;
633 default:
634 return_ACPI_STATUS (AE_BAD_PARAMETER);
638 * Create a new string object and string buffer
639 * (-1 because of extra separator included in StringLength from above)
641 ReturnDesc = AcpiUtCreateStringObject ((ACPI_SIZE) (StringLength - 1));
642 if (!ReturnDesc)
644 return_ACPI_STATUS (AE_NO_MEMORY);
647 NewBuf = ReturnDesc->Buffer.Pointer;
650 * Convert buffer bytes to hex or decimal values
651 * (separated by commas or spaces)
653 for (i = 0; i < ObjDesc->Buffer.Length; i++)
655 NewBuf += AcpiExConvertToAscii (
656 (ACPI_INTEGER) ObjDesc->Buffer.Pointer[i], Base,
657 NewBuf, 1);
658 *NewBuf++ = Separator; /* each separated by a comma or space */
662 * Null terminate the string
663 * (overwrites final comma/space from above)
665 NewBuf--;
666 *NewBuf = 0;
667 break;
669 default:
670 return_ACPI_STATUS (AE_TYPE);
673 *ResultDesc = ReturnDesc;
674 return_ACPI_STATUS (AE_OK);
678 /*******************************************************************************
680 * FUNCTION: AcpiExConvertToTargetType
682 * PARAMETERS: DestinationType - Current type of the destination
683 * SourceDesc - Source object to be converted.
684 * ResultDesc - Where the converted object is returned
685 * WalkState - Current method state
687 * RETURN: Status
689 * DESCRIPTION: Implements "implicit conversion" rules for storing an object.
691 ******************************************************************************/
693 ACPI_STATUS
694 AcpiExConvertToTargetType (
695 ACPI_OBJECT_TYPE DestinationType,
696 ACPI_OPERAND_OBJECT *SourceDesc,
697 ACPI_OPERAND_OBJECT **ResultDesc,
698 ACPI_WALK_STATE *WalkState)
700 ACPI_STATUS Status = AE_OK;
703 ACPI_FUNCTION_TRACE (ExConvertToTargetType);
706 /* Default behavior */
708 *ResultDesc = SourceDesc;
711 * If required by the target,
712 * perform implicit conversion on the source before we store it.
714 switch (GET_CURRENT_ARG_TYPE (WalkState->OpInfo->RuntimeArgs))
716 case ARGI_SIMPLE_TARGET:
717 case ARGI_FIXED_TARGET:
718 case ARGI_INTEGER_REF: /* Handles Increment, Decrement cases */
720 switch (DestinationType)
722 case ACPI_TYPE_LOCAL_REGION_FIELD:
724 * Named field can always handle conversions
726 break;
728 default:
729 /* No conversion allowed for these types */
731 if (DestinationType != ACPI_GET_OBJECT_TYPE (SourceDesc))
733 ACPI_DEBUG_PRINT ((ACPI_DB_INFO,
734 "Explicit operator, will store (%s) over existing type (%s)\n",
735 AcpiUtGetObjectTypeName (SourceDesc),
736 AcpiUtGetTypeName (DestinationType)));
737 Status = AE_TYPE;
740 break;
743 case ARGI_TARGETREF:
745 switch (DestinationType)
747 case ACPI_TYPE_INTEGER:
748 case ACPI_TYPE_BUFFER_FIELD:
749 case ACPI_TYPE_LOCAL_BANK_FIELD:
750 case ACPI_TYPE_LOCAL_INDEX_FIELD:
752 * These types require an Integer operand. We can convert
753 * a Buffer or a String to an Integer if necessary.
755 Status = AcpiExConvertToInteger (SourceDesc, ResultDesc,
756 16);
757 break;
760 case ACPI_TYPE_STRING:
762 * The operand must be a String. We can convert an
763 * Integer or Buffer if necessary
765 Status = AcpiExConvertToString (SourceDesc, ResultDesc,
766 ACPI_IMPLICIT_CONVERT_HEX);
767 break;
770 case ACPI_TYPE_BUFFER:
772 * The operand must be a Buffer. We can convert an
773 * Integer or String if necessary
775 Status = AcpiExConvertToBuffer (SourceDesc, ResultDesc);
776 break;
779 default:
780 ACPI_ERROR ((AE_INFO, "Bad destination type during conversion: %X",
781 DestinationType));
782 Status = AE_AML_INTERNAL;
783 break;
785 break;
788 case ARGI_REFERENCE:
790 * CreateXxxxField cases - we are storing the field object into the name
792 break;
795 default:
796 ACPI_ERROR ((AE_INFO,
797 "Unknown Target type ID 0x%X AmlOpcode %X DestType %s",
798 GET_CURRENT_ARG_TYPE (WalkState->OpInfo->RuntimeArgs),
799 WalkState->Opcode, AcpiUtGetTypeName (DestinationType)));
800 Status = AE_AML_INTERNAL;
804 * Source-to-Target conversion semantics:
806 * If conversion to the target type cannot be performed, then simply
807 * overwrite the target with the new object and type.
809 if (Status == AE_TYPE)
811 Status = AE_OK;
814 return_ACPI_STATUS (Status);