xref: /onnv-gate/usr/src/uts/intel/io/acpica/executer/exoparg3.c (revision 9980:13d7f3eec672)
17851SDana.Myers@Sun.COM 
27851SDana.Myers@Sun.COM /******************************************************************************
37851SDana.Myers@Sun.COM  *
47851SDana.Myers@Sun.COM  * Module Name: exoparg3 - AML execution - opcodes with 3 arguments
57851SDana.Myers@Sun.COM  *
67851SDana.Myers@Sun.COM  *****************************************************************************/
77851SDana.Myers@Sun.COM 
87851SDana.Myers@Sun.COM /******************************************************************************
97851SDana.Myers@Sun.COM  *
107851SDana.Myers@Sun.COM  * 1. Copyright Notice
117851SDana.Myers@Sun.COM  *
12*9980SDana.Myers@Sun.COM  * Some or all of this work - Copyright (c) 1999 - 2009, Intel Corp.
137851SDana.Myers@Sun.COM  * All rights reserved.
147851SDana.Myers@Sun.COM  *
157851SDana.Myers@Sun.COM  * 2. License
167851SDana.Myers@Sun.COM  *
177851SDana.Myers@Sun.COM  * 2.1. This is your license from Intel Corp. under its intellectual property
187851SDana.Myers@Sun.COM  * rights.  You may have additional license terms from the party that provided
197851SDana.Myers@Sun.COM  * you this software, covering your right to use that party's intellectual
207851SDana.Myers@Sun.COM  * property rights.
217851SDana.Myers@Sun.COM  *
227851SDana.Myers@Sun.COM  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
237851SDana.Myers@Sun.COM  * copy of the source code appearing in this file ("Covered Code") an
247851SDana.Myers@Sun.COM  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
257851SDana.Myers@Sun.COM  * base code distributed originally by Intel ("Original Intel Code") to copy,
267851SDana.Myers@Sun.COM  * make derivatives, distribute, use and display any portion of the Covered
277851SDana.Myers@Sun.COM  * Code in any form, with the right to sublicense such rights; and
287851SDana.Myers@Sun.COM  *
297851SDana.Myers@Sun.COM  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
307851SDana.Myers@Sun.COM  * license (with the right to sublicense), under only those claims of Intel
317851SDana.Myers@Sun.COM  * patents that are infringed by the Original Intel Code, to make, use, sell,
327851SDana.Myers@Sun.COM  * offer to sell, and import the Covered Code and derivative works thereof
337851SDana.Myers@Sun.COM  * solely to the minimum extent necessary to exercise the above copyright
347851SDana.Myers@Sun.COM  * license, and in no event shall the patent license extend to any additions
357851SDana.Myers@Sun.COM  * to or modifications of the Original Intel Code.  No other license or right
367851SDana.Myers@Sun.COM  * is granted directly or by implication, estoppel or otherwise;
377851SDana.Myers@Sun.COM  *
387851SDana.Myers@Sun.COM  * The above copyright and patent license is granted only if the following
397851SDana.Myers@Sun.COM  * conditions are met:
407851SDana.Myers@Sun.COM  *
417851SDana.Myers@Sun.COM  * 3. Conditions
427851SDana.Myers@Sun.COM  *
437851SDana.Myers@Sun.COM  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
447851SDana.Myers@Sun.COM  * Redistribution of source code of any substantial portion of the Covered
457851SDana.Myers@Sun.COM  * Code or modification with rights to further distribute source must include
467851SDana.Myers@Sun.COM  * the above Copyright Notice, the above License, this list of Conditions,
477851SDana.Myers@Sun.COM  * and the following Disclaimer and Export Compliance provision.  In addition,
487851SDana.Myers@Sun.COM  * Licensee must cause all Covered Code to which Licensee contributes to
497851SDana.Myers@Sun.COM  * contain a file documenting the changes Licensee made to create that Covered
507851SDana.Myers@Sun.COM  * Code and the date of any change.  Licensee must include in that file the
517851SDana.Myers@Sun.COM  * documentation of any changes made by any predecessor Licensee.  Licensee
527851SDana.Myers@Sun.COM  * must include a prominent statement that the modification is derived,
537851SDana.Myers@Sun.COM  * directly or indirectly, from Original Intel Code.
547851SDana.Myers@Sun.COM  *
557851SDana.Myers@Sun.COM  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
567851SDana.Myers@Sun.COM  * Redistribution of source code of any substantial portion of the Covered
577851SDana.Myers@Sun.COM  * Code or modification without rights to further distribute source must
587851SDana.Myers@Sun.COM  * include the following Disclaimer and Export Compliance provision in the
597851SDana.Myers@Sun.COM  * documentation and/or other materials provided with distribution.  In
607851SDana.Myers@Sun.COM  * addition, Licensee may not authorize further sublicense of source of any
617851SDana.Myers@Sun.COM  * portion of the Covered Code, and must include terms to the effect that the
627851SDana.Myers@Sun.COM  * license from Licensee to its licensee is limited to the intellectual
637851SDana.Myers@Sun.COM  * property embodied in the software Licensee provides to its licensee, and
647851SDana.Myers@Sun.COM  * not to intellectual property embodied in modifications its licensee may
657851SDana.Myers@Sun.COM  * make.
667851SDana.Myers@Sun.COM  *
677851SDana.Myers@Sun.COM  * 3.3. Redistribution of Executable. Redistribution in executable form of any
687851SDana.Myers@Sun.COM  * substantial portion of the Covered Code or modification must reproduce the
697851SDana.Myers@Sun.COM  * above Copyright Notice, and the following Disclaimer and Export Compliance
707851SDana.Myers@Sun.COM  * provision in the documentation and/or other materials provided with the
717851SDana.Myers@Sun.COM  * distribution.
727851SDana.Myers@Sun.COM  *
737851SDana.Myers@Sun.COM  * 3.4. Intel retains all right, title, and interest in and to the Original
747851SDana.Myers@Sun.COM  * Intel Code.
757851SDana.Myers@Sun.COM  *
767851SDana.Myers@Sun.COM  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
777851SDana.Myers@Sun.COM  * Intel shall be used in advertising or otherwise to promote the sale, use or
787851SDana.Myers@Sun.COM  * other dealings in products derived from or relating to the Covered Code
797851SDana.Myers@Sun.COM  * without prior written authorization from Intel.
807851SDana.Myers@Sun.COM  *
817851SDana.Myers@Sun.COM  * 4. Disclaimer and Export Compliance
827851SDana.Myers@Sun.COM  *
837851SDana.Myers@Sun.COM  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
847851SDana.Myers@Sun.COM  * HERE.  ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
857851SDana.Myers@Sun.COM  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT,  ASSISTANCE,
867851SDana.Myers@Sun.COM  * INSTALLATION, TRAINING OR OTHER SERVICES.  INTEL WILL NOT PROVIDE ANY
877851SDana.Myers@Sun.COM 
887851SDana.Myers@Sun.COM  * UPDATES, ENHANCEMENTS OR EXTENSIONS.  INTEL SPECIFICALLY DISCLAIMS ANY
897851SDana.Myers@Sun.COM  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
907851SDana.Myers@Sun.COM  * PARTICULAR PURPOSE.
917851SDana.Myers@Sun.COM  *
927851SDana.Myers@Sun.COM  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
937851SDana.Myers@Sun.COM  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
947851SDana.Myers@Sun.COM  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
957851SDana.Myers@Sun.COM  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
967851SDana.Myers@Sun.COM  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
977851SDana.Myers@Sun.COM  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES.  THESE LIMITATIONS
987851SDana.Myers@Sun.COM  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
997851SDana.Myers@Sun.COM  * LIMITED REMEDY.
1007851SDana.Myers@Sun.COM  *
1017851SDana.Myers@Sun.COM  * 4.3. Licensee shall not export, either directly or indirectly, any of this
1027851SDana.Myers@Sun.COM  * software or system incorporating such software without first obtaining any
1037851SDana.Myers@Sun.COM  * required license or other approval from the U. S. Department of Commerce or
1047851SDana.Myers@Sun.COM  * any other agency or department of the United States Government.  In the
1057851SDana.Myers@Sun.COM  * event Licensee exports any such software from the United States or
1067851SDana.Myers@Sun.COM  * re-exports any such software from a foreign destination, Licensee shall
1077851SDana.Myers@Sun.COM  * ensure that the distribution and export/re-export of the software is in
1087851SDana.Myers@Sun.COM  * compliance with all laws, regulations, orders, or other restrictions of the
1097851SDana.Myers@Sun.COM  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
1107851SDana.Myers@Sun.COM  * any of its subsidiaries will export/re-export any technical data, process,
1117851SDana.Myers@Sun.COM  * software, or service, directly or indirectly, to any country for which the
1127851SDana.Myers@Sun.COM  * United States government or any agency thereof requires an export license,
1137851SDana.Myers@Sun.COM  * other governmental approval, or letter of assurance, without first obtaining
1147851SDana.Myers@Sun.COM  * such license, approval or letter.
1157851SDana.Myers@Sun.COM  *
1167851SDana.Myers@Sun.COM  *****************************************************************************/
1177851SDana.Myers@Sun.COM 
1187851SDana.Myers@Sun.COM #define __EXOPARG3_C__
1197851SDana.Myers@Sun.COM 
1207851SDana.Myers@Sun.COM #include "acpi.h"
121*9980SDana.Myers@Sun.COM #include "accommon.h"
1227851SDana.Myers@Sun.COM #include "acinterp.h"
1237851SDana.Myers@Sun.COM #include "acparser.h"
1247851SDana.Myers@Sun.COM #include "amlcode.h"
1257851SDana.Myers@Sun.COM 
1267851SDana.Myers@Sun.COM 
1277851SDana.Myers@Sun.COM #define _COMPONENT          ACPI_EXECUTER
1287851SDana.Myers@Sun.COM         ACPI_MODULE_NAME    ("exoparg3")
1297851SDana.Myers@Sun.COM 
1307851SDana.Myers@Sun.COM 
1317851SDana.Myers@Sun.COM /*!
1327851SDana.Myers@Sun.COM  * Naming convention for AML interpreter execution routines.
1337851SDana.Myers@Sun.COM  *
1347851SDana.Myers@Sun.COM  * The routines that begin execution of AML opcodes are named with a common
1357851SDana.Myers@Sun.COM  * convention based upon the number of arguments, the number of target operands,
1367851SDana.Myers@Sun.COM  * and whether or not a value is returned:
1377851SDana.Myers@Sun.COM  *
1387851SDana.Myers@Sun.COM  *      AcpiExOpcode_xA_yT_zR
1397851SDana.Myers@Sun.COM  *
1407851SDana.Myers@Sun.COM  * Where:
1417851SDana.Myers@Sun.COM  *
1427851SDana.Myers@Sun.COM  * xA - ARGUMENTS:    The number of arguments (input operands) that are
1437851SDana.Myers@Sun.COM  *                    required for this opcode type (1 through 6 args).
1447851SDana.Myers@Sun.COM  * yT - TARGETS:      The number of targets (output operands) that are required
1457851SDana.Myers@Sun.COM  *                    for this opcode type (0, 1, or 2 targets).
1467851SDana.Myers@Sun.COM  * zR - RETURN VALUE: Indicates whether this opcode type returns a value
1477851SDana.Myers@Sun.COM  *                    as the function return (0 or 1).
1487851SDana.Myers@Sun.COM  *
1497851SDana.Myers@Sun.COM  * The AcpiExOpcode* functions are called via the Dispatcher component with
1507851SDana.Myers@Sun.COM  * fully resolved operands.
1517851SDana.Myers@Sun.COM !*/
1527851SDana.Myers@Sun.COM 
1537851SDana.Myers@Sun.COM 
1547851SDana.Myers@Sun.COM /*******************************************************************************
1557851SDana.Myers@Sun.COM  *
1567851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExOpcode_3A_0T_0R
1577851SDana.Myers@Sun.COM  *
1587851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState           - Current walk state
1597851SDana.Myers@Sun.COM  *
1607851SDana.Myers@Sun.COM  * RETURN:      Status
1617851SDana.Myers@Sun.COM  *
1627851SDana.Myers@Sun.COM  * DESCRIPTION: Execute Triadic operator (3 operands)
1637851SDana.Myers@Sun.COM  *
1647851SDana.Myers@Sun.COM  ******************************************************************************/
1657851SDana.Myers@Sun.COM 
1667851SDana.Myers@Sun.COM ACPI_STATUS
AcpiExOpcode_3A_0T_0R(ACPI_WALK_STATE * WalkState)1677851SDana.Myers@Sun.COM AcpiExOpcode_3A_0T_0R (
1687851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
1697851SDana.Myers@Sun.COM {
1707851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
1717851SDana.Myers@Sun.COM     ACPI_SIGNAL_FATAL_INFO  *Fatal;
1727851SDana.Myers@Sun.COM     ACPI_STATUS             Status = AE_OK;
1737851SDana.Myers@Sun.COM 
1747851SDana.Myers@Sun.COM 
1757851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_STR (ExOpcode_3A_0T_0R,
1767851SDana.Myers@Sun.COM         AcpiPsGetOpcodeName (WalkState->Opcode));
1777851SDana.Myers@Sun.COM 
1787851SDana.Myers@Sun.COM 
1797851SDana.Myers@Sun.COM     switch (WalkState->Opcode)
1807851SDana.Myers@Sun.COM     {
1817851SDana.Myers@Sun.COM     case AML_FATAL_OP:          /* Fatal (FatalType  FatalCode  FatalArg) */
1827851SDana.Myers@Sun.COM 
1837851SDana.Myers@Sun.COM         ACPI_DEBUG_PRINT ((ACPI_DB_INFO,
1847851SDana.Myers@Sun.COM             "FatalOp: Type %X Code %X Arg %X <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<\n",
1857851SDana.Myers@Sun.COM             (UINT32) Operand[0]->Integer.Value,
1867851SDana.Myers@Sun.COM             (UINT32) Operand[1]->Integer.Value,
1877851SDana.Myers@Sun.COM             (UINT32) Operand[2]->Integer.Value));
1887851SDana.Myers@Sun.COM 
1897851SDana.Myers@Sun.COM         Fatal = ACPI_ALLOCATE (sizeof (ACPI_SIGNAL_FATAL_INFO));
1907851SDana.Myers@Sun.COM         if (Fatal)
1917851SDana.Myers@Sun.COM         {
1927851SDana.Myers@Sun.COM             Fatal->Type     = (UINT32) Operand[0]->Integer.Value;
1937851SDana.Myers@Sun.COM             Fatal->Code     = (UINT32) Operand[1]->Integer.Value;
1947851SDana.Myers@Sun.COM             Fatal->Argument = (UINT32) Operand[2]->Integer.Value;
1957851SDana.Myers@Sun.COM         }
1967851SDana.Myers@Sun.COM 
1977851SDana.Myers@Sun.COM         /* Always signal the OS! */
1987851SDana.Myers@Sun.COM 
1997851SDana.Myers@Sun.COM         Status = AcpiOsSignal (ACPI_SIGNAL_FATAL, Fatal);
2007851SDana.Myers@Sun.COM 
2017851SDana.Myers@Sun.COM         /* Might return while OS is shutting down, just continue */
2027851SDana.Myers@Sun.COM 
2037851SDana.Myers@Sun.COM         ACPI_FREE (Fatal);
2047851SDana.Myers@Sun.COM         break;
2057851SDana.Myers@Sun.COM 
2067851SDana.Myers@Sun.COM 
2077851SDana.Myers@Sun.COM     default:
2087851SDana.Myers@Sun.COM 
2097851SDana.Myers@Sun.COM         ACPI_ERROR ((AE_INFO, "Unknown AML opcode %X",
2107851SDana.Myers@Sun.COM             WalkState->Opcode));
2117851SDana.Myers@Sun.COM         Status = AE_AML_BAD_OPCODE;
2127851SDana.Myers@Sun.COM         goto Cleanup;
2137851SDana.Myers@Sun.COM     }
2147851SDana.Myers@Sun.COM 
2157851SDana.Myers@Sun.COM 
2167851SDana.Myers@Sun.COM Cleanup:
2177851SDana.Myers@Sun.COM 
2187851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
2197851SDana.Myers@Sun.COM }
2207851SDana.Myers@Sun.COM 
2217851SDana.Myers@Sun.COM 
2227851SDana.Myers@Sun.COM /*******************************************************************************
2237851SDana.Myers@Sun.COM  *
2247851SDana.Myers@Sun.COM  * FUNCTION:    AcpiExOpcode_3A_1T_1R
2257851SDana.Myers@Sun.COM  *
2267851SDana.Myers@Sun.COM  * PARAMETERS:  WalkState           - Current walk state
2277851SDana.Myers@Sun.COM  *
2287851SDana.Myers@Sun.COM  * RETURN:      Status
2297851SDana.Myers@Sun.COM  *
2307851SDana.Myers@Sun.COM  * DESCRIPTION: Execute Triadic operator (3 operands)
2317851SDana.Myers@Sun.COM  *
2327851SDana.Myers@Sun.COM  ******************************************************************************/
2337851SDana.Myers@Sun.COM 
2347851SDana.Myers@Sun.COM ACPI_STATUS
AcpiExOpcode_3A_1T_1R(ACPI_WALK_STATE * WalkState)2357851SDana.Myers@Sun.COM AcpiExOpcode_3A_1T_1R (
2367851SDana.Myers@Sun.COM     ACPI_WALK_STATE         *WalkState)
2377851SDana.Myers@Sun.COM {
2387851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     **Operand = &WalkState->Operands[0];
2397851SDana.Myers@Sun.COM     ACPI_OPERAND_OBJECT     *ReturnDesc = NULL;
2407851SDana.Myers@Sun.COM     char                    *Buffer = NULL;
2417851SDana.Myers@Sun.COM     ACPI_STATUS             Status = AE_OK;
2427851SDana.Myers@Sun.COM     ACPI_INTEGER            Index;
2437851SDana.Myers@Sun.COM     ACPI_SIZE               Length;
2447851SDana.Myers@Sun.COM 
2457851SDana.Myers@Sun.COM 
2467851SDana.Myers@Sun.COM     ACPI_FUNCTION_TRACE_STR (ExOpcode_3A_1T_1R,
2477851SDana.Myers@Sun.COM         AcpiPsGetOpcodeName (WalkState->Opcode));
2487851SDana.Myers@Sun.COM 
2497851SDana.Myers@Sun.COM 
2507851SDana.Myers@Sun.COM     switch (WalkState->Opcode)
2517851SDana.Myers@Sun.COM     {
2527851SDana.Myers@Sun.COM     case AML_MID_OP:    /* Mid (Source[0], Index[1], Length[2], Result[3]) */
2537851SDana.Myers@Sun.COM 
2547851SDana.Myers@Sun.COM         /*
2557851SDana.Myers@Sun.COM          * Create the return object.  The Source operand is guaranteed to be
2567851SDana.Myers@Sun.COM          * either a String or a Buffer, so just use its type.
2577851SDana.Myers@Sun.COM          */
2587851SDana.Myers@Sun.COM         ReturnDesc = AcpiUtCreateInternalObject (
259*9980SDana.Myers@Sun.COM                         (Operand[0])->Common.Type);
2607851SDana.Myers@Sun.COM         if (!ReturnDesc)
2617851SDana.Myers@Sun.COM         {
2627851SDana.Myers@Sun.COM             Status = AE_NO_MEMORY;
2637851SDana.Myers@Sun.COM             goto Cleanup;
2647851SDana.Myers@Sun.COM         }
2657851SDana.Myers@Sun.COM 
2667851SDana.Myers@Sun.COM         /* Get the Integer values from the objects */
2677851SDana.Myers@Sun.COM 
2687851SDana.Myers@Sun.COM         Index = Operand[1]->Integer.Value;
2697851SDana.Myers@Sun.COM         Length = (ACPI_SIZE) Operand[2]->Integer.Value;
2707851SDana.Myers@Sun.COM 
2717851SDana.Myers@Sun.COM         /*
2727851SDana.Myers@Sun.COM          * If the index is beyond the length of the String/Buffer, or if the
2737851SDana.Myers@Sun.COM          * requested length is zero, return a zero-length String/Buffer
2747851SDana.Myers@Sun.COM          */
2757851SDana.Myers@Sun.COM         if (Index >= Operand[0]->String.Length)
2767851SDana.Myers@Sun.COM         {
2777851SDana.Myers@Sun.COM             Length = 0;
2787851SDana.Myers@Sun.COM         }
2797851SDana.Myers@Sun.COM 
2807851SDana.Myers@Sun.COM         /* Truncate request if larger than the actual String/Buffer */
2817851SDana.Myers@Sun.COM 
2827851SDana.Myers@Sun.COM         else if ((Index + Length) > Operand[0]->String.Length)
2837851SDana.Myers@Sun.COM         {
2847851SDana.Myers@Sun.COM             Length = (ACPI_SIZE) Operand[0]->String.Length -
2857851SDana.Myers@Sun.COM                         (ACPI_SIZE) Index;
2867851SDana.Myers@Sun.COM         }
2877851SDana.Myers@Sun.COM 
2887851SDana.Myers@Sun.COM         /* Strings always have a sub-pointer, not so for buffers */
2897851SDana.Myers@Sun.COM 
290*9980SDana.Myers@Sun.COM         switch ((Operand[0])->Common.Type)
2917851SDana.Myers@Sun.COM         {
2927851SDana.Myers@Sun.COM         case ACPI_TYPE_STRING:
2937851SDana.Myers@Sun.COM 
2947851SDana.Myers@Sun.COM             /* Always allocate a new buffer for the String */
2957851SDana.Myers@Sun.COM 
2967851SDana.Myers@Sun.COM             Buffer = ACPI_ALLOCATE_ZEROED ((ACPI_SIZE) Length + 1);
2977851SDana.Myers@Sun.COM             if (!Buffer)
2987851SDana.Myers@Sun.COM             {
2997851SDana.Myers@Sun.COM                 Status = AE_NO_MEMORY;
3007851SDana.Myers@Sun.COM                 goto Cleanup;
3017851SDana.Myers@Sun.COM             }
3027851SDana.Myers@Sun.COM             break;
3037851SDana.Myers@Sun.COM 
3047851SDana.Myers@Sun.COM         case ACPI_TYPE_BUFFER:
3057851SDana.Myers@Sun.COM 
3067851SDana.Myers@Sun.COM             /* If the requested length is zero, don't allocate a buffer */
3077851SDana.Myers@Sun.COM 
3087851SDana.Myers@Sun.COM             if (Length > 0)
3097851SDana.Myers@Sun.COM             {
3107851SDana.Myers@Sun.COM                 /* Allocate a new buffer for the Buffer */
3117851SDana.Myers@Sun.COM 
3127851SDana.Myers@Sun.COM                 Buffer = ACPI_ALLOCATE_ZEROED (Length);
3137851SDana.Myers@Sun.COM                 if (!Buffer)
3147851SDana.Myers@Sun.COM                 {
3157851SDana.Myers@Sun.COM                     Status = AE_NO_MEMORY;
3167851SDana.Myers@Sun.COM                     goto Cleanup;
3177851SDana.Myers@Sun.COM                 }
3187851SDana.Myers@Sun.COM             }
3197851SDana.Myers@Sun.COM             break;
3207851SDana.Myers@Sun.COM 
3217851SDana.Myers@Sun.COM         default:                        /* Should not happen */
3227851SDana.Myers@Sun.COM 
3237851SDana.Myers@Sun.COM             Status = AE_AML_OPERAND_TYPE;
3247851SDana.Myers@Sun.COM             goto Cleanup;
3257851SDana.Myers@Sun.COM         }
3267851SDana.Myers@Sun.COM 
3277851SDana.Myers@Sun.COM         if (Buffer)
3287851SDana.Myers@Sun.COM         {
3297851SDana.Myers@Sun.COM             /* We have a buffer, copy the portion requested */
3307851SDana.Myers@Sun.COM 
3317851SDana.Myers@Sun.COM             ACPI_MEMCPY (Buffer, Operand[0]->String.Pointer + Index,
3327851SDana.Myers@Sun.COM                          Length);
3337851SDana.Myers@Sun.COM         }
3347851SDana.Myers@Sun.COM 
3357851SDana.Myers@Sun.COM         /* Set the length of the new String/Buffer */
3367851SDana.Myers@Sun.COM 
3377851SDana.Myers@Sun.COM         ReturnDesc->String.Pointer = Buffer;
3387851SDana.Myers@Sun.COM         ReturnDesc->String.Length = (UINT32) Length;
3397851SDana.Myers@Sun.COM 
3407851SDana.Myers@Sun.COM         /* Mark buffer initialized */
3417851SDana.Myers@Sun.COM 
3427851SDana.Myers@Sun.COM         ReturnDesc->Buffer.Flags |= AOPOBJ_DATA_VALID;
3437851SDana.Myers@Sun.COM         break;
3447851SDana.Myers@Sun.COM 
3457851SDana.Myers@Sun.COM 
3467851SDana.Myers@Sun.COM     default:
3477851SDana.Myers@Sun.COM 
3487851SDana.Myers@Sun.COM         ACPI_ERROR ((AE_INFO, "Unknown AML opcode %X",
3497851SDana.Myers@Sun.COM             WalkState->Opcode));
3507851SDana.Myers@Sun.COM         Status = AE_AML_BAD_OPCODE;
3517851SDana.Myers@Sun.COM         goto Cleanup;
3527851SDana.Myers@Sun.COM     }
3537851SDana.Myers@Sun.COM 
3547851SDana.Myers@Sun.COM     /* Store the result in the target */
3557851SDana.Myers@Sun.COM 
3567851SDana.Myers@Sun.COM     Status = AcpiExStore (ReturnDesc, Operand[3], WalkState);
3577851SDana.Myers@Sun.COM 
3587851SDana.Myers@Sun.COM Cleanup:
3597851SDana.Myers@Sun.COM 
3607851SDana.Myers@Sun.COM     /* Delete return object on error */
3617851SDana.Myers@Sun.COM 
3627851SDana.Myers@Sun.COM     if (ACPI_FAILURE (Status) || WalkState->ResultObj)
3637851SDana.Myers@Sun.COM     {
3647851SDana.Myers@Sun.COM         AcpiUtRemoveReference (ReturnDesc);
3657851SDana.Myers@Sun.COM         WalkState->ResultObj = NULL;
3667851SDana.Myers@Sun.COM     }
3677851SDana.Myers@Sun.COM 
3687851SDana.Myers@Sun.COM     /* Set the return object and exit */
3697851SDana.Myers@Sun.COM 
3707851SDana.Myers@Sun.COM     else
3717851SDana.Myers@Sun.COM     {
3727851SDana.Myers@Sun.COM         WalkState->ResultObj = ReturnDesc;
3737851SDana.Myers@Sun.COM     }
3747851SDana.Myers@Sun.COM     return_ACPI_STATUS (Status);
3757851SDana.Myers@Sun.COM }
3767851SDana.Myers@Sun.COM 
3777851SDana.Myers@Sun.COM 
378