1*7851SDana.Myers@Sun.COM /****************************************************************************** 2*7851SDana.Myers@Sun.COM * 3*7851SDana.Myers@Sun.COM * Module Name: psargs - Parse AML opcode arguments 4*7851SDana.Myers@Sun.COM * $Revision: 1.95 $ 5*7851SDana.Myers@Sun.COM * 6*7851SDana.Myers@Sun.COM *****************************************************************************/ 7*7851SDana.Myers@Sun.COM 8*7851SDana.Myers@Sun.COM /****************************************************************************** 9*7851SDana.Myers@Sun.COM * 10*7851SDana.Myers@Sun.COM * 1. Copyright Notice 11*7851SDana.Myers@Sun.COM * 12*7851SDana.Myers@Sun.COM * Some or all of this work - Copyright (c) 1999 - 2008, Intel Corp. 13*7851SDana.Myers@Sun.COM * All rights reserved. 14*7851SDana.Myers@Sun.COM * 15*7851SDana.Myers@Sun.COM * 2. License 16*7851SDana.Myers@Sun.COM * 17*7851SDana.Myers@Sun.COM * 2.1. This is your license from Intel Corp. under its intellectual property 18*7851SDana.Myers@Sun.COM * rights. You may have additional license terms from the party that provided 19*7851SDana.Myers@Sun.COM * you this software, covering your right to use that party's intellectual 20*7851SDana.Myers@Sun.COM * property rights. 21*7851SDana.Myers@Sun.COM * 22*7851SDana.Myers@Sun.COM * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a 23*7851SDana.Myers@Sun.COM * copy of the source code appearing in this file ("Covered Code") an 24*7851SDana.Myers@Sun.COM * irrevocable, perpetual, worldwide license under Intel's copyrights in the 25*7851SDana.Myers@Sun.COM * base code distributed originally by Intel ("Original Intel Code") to copy, 26*7851SDana.Myers@Sun.COM * make derivatives, distribute, use and display any portion of the Covered 27*7851SDana.Myers@Sun.COM * Code in any form, with the right to sublicense such rights; and 28*7851SDana.Myers@Sun.COM * 29*7851SDana.Myers@Sun.COM * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent 30*7851SDana.Myers@Sun.COM * license (with the right to sublicense), under only those claims of Intel 31*7851SDana.Myers@Sun.COM * patents that are infringed by the Original Intel Code, to make, use, sell, 32*7851SDana.Myers@Sun.COM * offer to sell, and import the Covered Code and derivative works thereof 33*7851SDana.Myers@Sun.COM * solely to the minimum extent necessary to exercise the above copyright 34*7851SDana.Myers@Sun.COM * license, and in no event shall the patent license extend to any additions 35*7851SDana.Myers@Sun.COM * to or modifications of the Original Intel Code. No other license or right 36*7851SDana.Myers@Sun.COM * is granted directly or by implication, estoppel or otherwise; 37*7851SDana.Myers@Sun.COM * 38*7851SDana.Myers@Sun.COM * The above copyright and patent license is granted only if the following 39*7851SDana.Myers@Sun.COM * conditions are met: 40*7851SDana.Myers@Sun.COM * 41*7851SDana.Myers@Sun.COM * 3. Conditions 42*7851SDana.Myers@Sun.COM * 43*7851SDana.Myers@Sun.COM * 3.1. Redistribution of Source with Rights to Further Distribute Source. 44*7851SDana.Myers@Sun.COM * Redistribution of source code of any substantial portion of the Covered 45*7851SDana.Myers@Sun.COM * Code or modification with rights to further distribute source must include 46*7851SDana.Myers@Sun.COM * the above Copyright Notice, the above License, this list of Conditions, 47*7851SDana.Myers@Sun.COM * and the following Disclaimer and Export Compliance provision. In addition, 48*7851SDana.Myers@Sun.COM * Licensee must cause all Covered Code to which Licensee contributes to 49*7851SDana.Myers@Sun.COM * contain a file documenting the changes Licensee made to create that Covered 50*7851SDana.Myers@Sun.COM * Code and the date of any change. Licensee must include in that file the 51*7851SDana.Myers@Sun.COM * documentation of any changes made by any predecessor Licensee. Licensee 52*7851SDana.Myers@Sun.COM * must include a prominent statement that the modification is derived, 53*7851SDana.Myers@Sun.COM * directly or indirectly, from Original Intel Code. 54*7851SDana.Myers@Sun.COM * 55*7851SDana.Myers@Sun.COM * 3.2. Redistribution of Source with no Rights to Further Distribute Source. 56*7851SDana.Myers@Sun.COM * Redistribution of source code of any substantial portion of the Covered 57*7851SDana.Myers@Sun.COM * Code or modification without rights to further distribute source must 58*7851SDana.Myers@Sun.COM * include the following Disclaimer and Export Compliance provision in the 59*7851SDana.Myers@Sun.COM * documentation and/or other materials provided with distribution. In 60*7851SDana.Myers@Sun.COM * addition, Licensee may not authorize further sublicense of source of any 61*7851SDana.Myers@Sun.COM * portion of the Covered Code, and must include terms to the effect that the 62*7851SDana.Myers@Sun.COM * license from Licensee to its licensee is limited to the intellectual 63*7851SDana.Myers@Sun.COM * property embodied in the software Licensee provides to its licensee, and 64*7851SDana.Myers@Sun.COM * not to intellectual property embodied in modifications its licensee may 65*7851SDana.Myers@Sun.COM * make. 66*7851SDana.Myers@Sun.COM * 67*7851SDana.Myers@Sun.COM * 3.3. Redistribution of Executable. Redistribution in executable form of any 68*7851SDana.Myers@Sun.COM * substantial portion of the Covered Code or modification must reproduce the 69*7851SDana.Myers@Sun.COM * above Copyright Notice, and the following Disclaimer and Export Compliance 70*7851SDana.Myers@Sun.COM * provision in the documentation and/or other materials provided with the 71*7851SDana.Myers@Sun.COM * distribution. 72*7851SDana.Myers@Sun.COM * 73*7851SDana.Myers@Sun.COM * 3.4. Intel retains all right, title, and interest in and to the Original 74*7851SDana.Myers@Sun.COM * Intel Code. 75*7851SDana.Myers@Sun.COM * 76*7851SDana.Myers@Sun.COM * 3.5. Neither the name Intel nor any other trademark owned or controlled by 77*7851SDana.Myers@Sun.COM * Intel shall be used in advertising or otherwise to promote the sale, use or 78*7851SDana.Myers@Sun.COM * other dealings in products derived from or relating to the Covered Code 79*7851SDana.Myers@Sun.COM * without prior written authorization from Intel. 80*7851SDana.Myers@Sun.COM * 81*7851SDana.Myers@Sun.COM * 4. Disclaimer and Export Compliance 82*7851SDana.Myers@Sun.COM * 83*7851SDana.Myers@Sun.COM * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED 84*7851SDana.Myers@Sun.COM * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE 85*7851SDana.Myers@Sun.COM * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE, 86*7851SDana.Myers@Sun.COM * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY 87*7851SDana.Myers@Sun.COM * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY 88*7851SDana.Myers@Sun.COM * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A 89*7851SDana.Myers@Sun.COM * PARTICULAR PURPOSE. 90*7851SDana.Myers@Sun.COM * 91*7851SDana.Myers@Sun.COM * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES 92*7851SDana.Myers@Sun.COM * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR 93*7851SDana.Myers@Sun.COM * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT, 94*7851SDana.Myers@Sun.COM * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY 95*7851SDana.Myers@Sun.COM * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL 96*7851SDana.Myers@Sun.COM * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS 97*7851SDana.Myers@Sun.COM * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY 98*7851SDana.Myers@Sun.COM * LIMITED REMEDY. 99*7851SDana.Myers@Sun.COM * 100*7851SDana.Myers@Sun.COM * 4.3. Licensee shall not export, either directly or indirectly, any of this 101*7851SDana.Myers@Sun.COM * software or system incorporating such software without first obtaining any 102*7851SDana.Myers@Sun.COM * required license or other approval from the U. S. Department of Commerce or 103*7851SDana.Myers@Sun.COM * any other agency or department of the United States Government. In the 104*7851SDana.Myers@Sun.COM * event Licensee exports any such software from the United States or 105*7851SDana.Myers@Sun.COM * re-exports any such software from a foreign destination, Licensee shall 106*7851SDana.Myers@Sun.COM * ensure that the distribution and export/re-export of the software is in 107*7851SDana.Myers@Sun.COM * compliance with all laws, regulations, orders, or other restrictions of the 108*7851SDana.Myers@Sun.COM * U.S. Export Administration Regulations. Licensee agrees that neither it nor 109*7851SDana.Myers@Sun.COM * any of its subsidiaries will export/re-export any technical data, process, 110*7851SDana.Myers@Sun.COM * software, or service, directly or indirectly, to any country for which the 111*7851SDana.Myers@Sun.COM * United States government or any agency thereof requires an export license, 112*7851SDana.Myers@Sun.COM * other governmental approval, or letter of assurance, without first obtaining 113*7851SDana.Myers@Sun.COM * such license, approval or letter. 114*7851SDana.Myers@Sun.COM * 115*7851SDana.Myers@Sun.COM *****************************************************************************/ 116*7851SDana.Myers@Sun.COM 117*7851SDana.Myers@Sun.COM #define __PSARGS_C__ 118*7851SDana.Myers@Sun.COM 119*7851SDana.Myers@Sun.COM #include "acpi.h" 120*7851SDana.Myers@Sun.COM #include "acparser.h" 121*7851SDana.Myers@Sun.COM #include "amlcode.h" 122*7851SDana.Myers@Sun.COM #include "acnamesp.h" 123*7851SDana.Myers@Sun.COM #include "acdispat.h" 124*7851SDana.Myers@Sun.COM 125*7851SDana.Myers@Sun.COM #define _COMPONENT ACPI_PARSER 126*7851SDana.Myers@Sun.COM ACPI_MODULE_NAME ("psargs") 127*7851SDana.Myers@Sun.COM 128*7851SDana.Myers@Sun.COM /* Local prototypes */ 129*7851SDana.Myers@Sun.COM 130*7851SDana.Myers@Sun.COM static UINT32 131*7851SDana.Myers@Sun.COM AcpiPsGetNextPackageLength ( 132*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState); 133*7851SDana.Myers@Sun.COM 134*7851SDana.Myers@Sun.COM static ACPI_PARSE_OBJECT * 135*7851SDana.Myers@Sun.COM AcpiPsGetNextField ( 136*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState); 137*7851SDana.Myers@Sun.COM 138*7851SDana.Myers@Sun.COM 139*7851SDana.Myers@Sun.COM /******************************************************************************* 140*7851SDana.Myers@Sun.COM * 141*7851SDana.Myers@Sun.COM * FUNCTION: AcpiPsGetNextPackageLength 142*7851SDana.Myers@Sun.COM * 143*7851SDana.Myers@Sun.COM * PARAMETERS: ParserState - Current parser state object 144*7851SDana.Myers@Sun.COM * 145*7851SDana.Myers@Sun.COM * RETURN: Decoded package length. On completion, the AML pointer points 146*7851SDana.Myers@Sun.COM * past the length byte or bytes. 147*7851SDana.Myers@Sun.COM * 148*7851SDana.Myers@Sun.COM * DESCRIPTION: Decode and return a package length field. 149*7851SDana.Myers@Sun.COM * Note: Largest package length is 28 bits, from ACPI specification 150*7851SDana.Myers@Sun.COM * 151*7851SDana.Myers@Sun.COM ******************************************************************************/ 152*7851SDana.Myers@Sun.COM 153*7851SDana.Myers@Sun.COM static UINT32 154*7851SDana.Myers@Sun.COM AcpiPsGetNextPackageLength ( 155*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState) 156*7851SDana.Myers@Sun.COM { 157*7851SDana.Myers@Sun.COM UINT8 *Aml = ParserState->Aml; 158*7851SDana.Myers@Sun.COM UINT32 PackageLength = 0; 159*7851SDana.Myers@Sun.COM UINT32 ByteCount; 160*7851SDana.Myers@Sun.COM UINT8 ByteZeroMask = 0x3F; /* Default [0:5] */ 161*7851SDana.Myers@Sun.COM 162*7851SDana.Myers@Sun.COM 163*7851SDana.Myers@Sun.COM ACPI_FUNCTION_TRACE (PsGetNextPackageLength); 164*7851SDana.Myers@Sun.COM 165*7851SDana.Myers@Sun.COM 166*7851SDana.Myers@Sun.COM /* 167*7851SDana.Myers@Sun.COM * Byte 0 bits [6:7] contain the number of additional bytes 168*7851SDana.Myers@Sun.COM * used to encode the package length, either 0,1,2, or 3 169*7851SDana.Myers@Sun.COM */ 170*7851SDana.Myers@Sun.COM ByteCount = (Aml[0] >> 6); 171*7851SDana.Myers@Sun.COM ParserState->Aml += ((ACPI_SIZE) ByteCount + 1); 172*7851SDana.Myers@Sun.COM 173*7851SDana.Myers@Sun.COM /* Get bytes 3, 2, 1 as needed */ 174*7851SDana.Myers@Sun.COM 175*7851SDana.Myers@Sun.COM while (ByteCount) 176*7851SDana.Myers@Sun.COM { 177*7851SDana.Myers@Sun.COM /* 178*7851SDana.Myers@Sun.COM * Final bit positions for the package length bytes: 179*7851SDana.Myers@Sun.COM * Byte3->[20:27] 180*7851SDana.Myers@Sun.COM * Byte2->[12:19] 181*7851SDana.Myers@Sun.COM * Byte1->[04:11] 182*7851SDana.Myers@Sun.COM * Byte0->[00:03] 183*7851SDana.Myers@Sun.COM */ 184*7851SDana.Myers@Sun.COM PackageLength |= (Aml[ByteCount] << ((ByteCount << 3) - 4)); 185*7851SDana.Myers@Sun.COM 186*7851SDana.Myers@Sun.COM ByteZeroMask = 0x0F; /* Use bits [0:3] of byte 0 */ 187*7851SDana.Myers@Sun.COM ByteCount--; 188*7851SDana.Myers@Sun.COM } 189*7851SDana.Myers@Sun.COM 190*7851SDana.Myers@Sun.COM /* Byte 0 is a special case, either bits [0:3] or [0:5] are used */ 191*7851SDana.Myers@Sun.COM 192*7851SDana.Myers@Sun.COM PackageLength |= (Aml[0] & ByteZeroMask); 193*7851SDana.Myers@Sun.COM return_UINT32 (PackageLength); 194*7851SDana.Myers@Sun.COM } 195*7851SDana.Myers@Sun.COM 196*7851SDana.Myers@Sun.COM 197*7851SDana.Myers@Sun.COM /******************************************************************************* 198*7851SDana.Myers@Sun.COM * 199*7851SDana.Myers@Sun.COM * FUNCTION: AcpiPsGetNextPackageEnd 200*7851SDana.Myers@Sun.COM * 201*7851SDana.Myers@Sun.COM * PARAMETERS: ParserState - Current parser state object 202*7851SDana.Myers@Sun.COM * 203*7851SDana.Myers@Sun.COM * RETURN: Pointer to end-of-package +1 204*7851SDana.Myers@Sun.COM * 205*7851SDana.Myers@Sun.COM * DESCRIPTION: Get next package length and return a pointer past the end of 206*7851SDana.Myers@Sun.COM * the package. Consumes the package length field 207*7851SDana.Myers@Sun.COM * 208*7851SDana.Myers@Sun.COM ******************************************************************************/ 209*7851SDana.Myers@Sun.COM 210*7851SDana.Myers@Sun.COM UINT8 * 211*7851SDana.Myers@Sun.COM AcpiPsGetNextPackageEnd ( 212*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState) 213*7851SDana.Myers@Sun.COM { 214*7851SDana.Myers@Sun.COM UINT8 *Start = ParserState->Aml; 215*7851SDana.Myers@Sun.COM UINT32 PackageLength; 216*7851SDana.Myers@Sun.COM 217*7851SDana.Myers@Sun.COM 218*7851SDana.Myers@Sun.COM ACPI_FUNCTION_TRACE (PsGetNextPackageEnd); 219*7851SDana.Myers@Sun.COM 220*7851SDana.Myers@Sun.COM 221*7851SDana.Myers@Sun.COM /* Function below updates ParserState->Aml */ 222*7851SDana.Myers@Sun.COM 223*7851SDana.Myers@Sun.COM PackageLength = AcpiPsGetNextPackageLength (ParserState); 224*7851SDana.Myers@Sun.COM 225*7851SDana.Myers@Sun.COM return_PTR (Start + PackageLength); /* end of package */ 226*7851SDana.Myers@Sun.COM } 227*7851SDana.Myers@Sun.COM 228*7851SDana.Myers@Sun.COM 229*7851SDana.Myers@Sun.COM /******************************************************************************* 230*7851SDana.Myers@Sun.COM * 231*7851SDana.Myers@Sun.COM * FUNCTION: AcpiPsGetNextNamestring 232*7851SDana.Myers@Sun.COM * 233*7851SDana.Myers@Sun.COM * PARAMETERS: ParserState - Current parser state object 234*7851SDana.Myers@Sun.COM * 235*7851SDana.Myers@Sun.COM * RETURN: Pointer to the start of the name string (pointer points into 236*7851SDana.Myers@Sun.COM * the AML. 237*7851SDana.Myers@Sun.COM * 238*7851SDana.Myers@Sun.COM * DESCRIPTION: Get next raw namestring within the AML stream. Handles all name 239*7851SDana.Myers@Sun.COM * prefix characters. Set parser state to point past the string. 240*7851SDana.Myers@Sun.COM * (Name is consumed from the AML.) 241*7851SDana.Myers@Sun.COM * 242*7851SDana.Myers@Sun.COM ******************************************************************************/ 243*7851SDana.Myers@Sun.COM 244*7851SDana.Myers@Sun.COM char * 245*7851SDana.Myers@Sun.COM AcpiPsGetNextNamestring ( 246*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState) 247*7851SDana.Myers@Sun.COM { 248*7851SDana.Myers@Sun.COM UINT8 *Start = ParserState->Aml; 249*7851SDana.Myers@Sun.COM UINT8 *End = ParserState->Aml; 250*7851SDana.Myers@Sun.COM 251*7851SDana.Myers@Sun.COM 252*7851SDana.Myers@Sun.COM ACPI_FUNCTION_TRACE (PsGetNextNamestring); 253*7851SDana.Myers@Sun.COM 254*7851SDana.Myers@Sun.COM 255*7851SDana.Myers@Sun.COM /* Point past any namestring prefix characters (backslash or carat) */ 256*7851SDana.Myers@Sun.COM 257*7851SDana.Myers@Sun.COM while (AcpiPsIsPrefixChar (*End)) 258*7851SDana.Myers@Sun.COM { 259*7851SDana.Myers@Sun.COM End++; 260*7851SDana.Myers@Sun.COM } 261*7851SDana.Myers@Sun.COM 262*7851SDana.Myers@Sun.COM /* Decode the path prefix character */ 263*7851SDana.Myers@Sun.COM 264*7851SDana.Myers@Sun.COM switch (*End) 265*7851SDana.Myers@Sun.COM { 266*7851SDana.Myers@Sun.COM case 0: 267*7851SDana.Myers@Sun.COM 268*7851SDana.Myers@Sun.COM /* NullName */ 269*7851SDana.Myers@Sun.COM 270*7851SDana.Myers@Sun.COM if (End == Start) 271*7851SDana.Myers@Sun.COM { 272*7851SDana.Myers@Sun.COM Start = NULL; 273*7851SDana.Myers@Sun.COM } 274*7851SDana.Myers@Sun.COM End++; 275*7851SDana.Myers@Sun.COM break; 276*7851SDana.Myers@Sun.COM 277*7851SDana.Myers@Sun.COM case AML_DUAL_NAME_PREFIX: 278*7851SDana.Myers@Sun.COM 279*7851SDana.Myers@Sun.COM /* Two name segments */ 280*7851SDana.Myers@Sun.COM 281*7851SDana.Myers@Sun.COM End += 1 + (2 * ACPI_NAME_SIZE); 282*7851SDana.Myers@Sun.COM break; 283*7851SDana.Myers@Sun.COM 284*7851SDana.Myers@Sun.COM case AML_MULTI_NAME_PREFIX_OP: 285*7851SDana.Myers@Sun.COM 286*7851SDana.Myers@Sun.COM /* Multiple name segments, 4 chars each, count in next byte */ 287*7851SDana.Myers@Sun.COM 288*7851SDana.Myers@Sun.COM End += 2 + (*(End + 1) * ACPI_NAME_SIZE); 289*7851SDana.Myers@Sun.COM break; 290*7851SDana.Myers@Sun.COM 291*7851SDana.Myers@Sun.COM default: 292*7851SDana.Myers@Sun.COM 293*7851SDana.Myers@Sun.COM /* Single name segment */ 294*7851SDana.Myers@Sun.COM 295*7851SDana.Myers@Sun.COM End += ACPI_NAME_SIZE; 296*7851SDana.Myers@Sun.COM break; 297*7851SDana.Myers@Sun.COM } 298*7851SDana.Myers@Sun.COM 299*7851SDana.Myers@Sun.COM ParserState->Aml = End; 300*7851SDana.Myers@Sun.COM return_PTR ((char *) Start); 301*7851SDana.Myers@Sun.COM } 302*7851SDana.Myers@Sun.COM 303*7851SDana.Myers@Sun.COM 304*7851SDana.Myers@Sun.COM /******************************************************************************* 305*7851SDana.Myers@Sun.COM * 306*7851SDana.Myers@Sun.COM * FUNCTION: AcpiPsGetNextNamepath 307*7851SDana.Myers@Sun.COM * 308*7851SDana.Myers@Sun.COM * PARAMETERS: ParserState - Current parser state object 309*7851SDana.Myers@Sun.COM * Arg - Where the namepath will be stored 310*7851SDana.Myers@Sun.COM * ArgCount - If the namepath points to a control method 311*7851SDana.Myers@Sun.COM * the method's argument is returned here. 312*7851SDana.Myers@Sun.COM * PossibleMethodCall - Whether the namepath can possibly be the 313*7851SDana.Myers@Sun.COM * start of a method call 314*7851SDana.Myers@Sun.COM * 315*7851SDana.Myers@Sun.COM * RETURN: Status 316*7851SDana.Myers@Sun.COM * 317*7851SDana.Myers@Sun.COM * DESCRIPTION: Get next name (if method call, return # of required args). 318*7851SDana.Myers@Sun.COM * Names are looked up in the internal namespace to determine 319*7851SDana.Myers@Sun.COM * if the name represents a control method. If a method 320*7851SDana.Myers@Sun.COM * is found, the number of arguments to the method is returned. 321*7851SDana.Myers@Sun.COM * This information is critical for parsing to continue correctly. 322*7851SDana.Myers@Sun.COM * 323*7851SDana.Myers@Sun.COM ******************************************************************************/ 324*7851SDana.Myers@Sun.COM 325*7851SDana.Myers@Sun.COM ACPI_STATUS 326*7851SDana.Myers@Sun.COM AcpiPsGetNextNamepath ( 327*7851SDana.Myers@Sun.COM ACPI_WALK_STATE *WalkState, 328*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState, 329*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *Arg, 330*7851SDana.Myers@Sun.COM BOOLEAN PossibleMethodCall) 331*7851SDana.Myers@Sun.COM { 332*7851SDana.Myers@Sun.COM ACPI_STATUS Status; 333*7851SDana.Myers@Sun.COM char *Path; 334*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *NameOp; 335*7851SDana.Myers@Sun.COM ACPI_OPERAND_OBJECT *MethodDesc; 336*7851SDana.Myers@Sun.COM ACPI_NAMESPACE_NODE *Node; 337*7851SDana.Myers@Sun.COM UINT8 *Start = ParserState->Aml; 338*7851SDana.Myers@Sun.COM 339*7851SDana.Myers@Sun.COM 340*7851SDana.Myers@Sun.COM ACPI_FUNCTION_TRACE (PsGetNextNamepath); 341*7851SDana.Myers@Sun.COM 342*7851SDana.Myers@Sun.COM 343*7851SDana.Myers@Sun.COM Path = AcpiPsGetNextNamestring (ParserState); 344*7851SDana.Myers@Sun.COM AcpiPsInitOp (Arg, AML_INT_NAMEPATH_OP); 345*7851SDana.Myers@Sun.COM 346*7851SDana.Myers@Sun.COM /* Null path case is allowed, just exit */ 347*7851SDana.Myers@Sun.COM 348*7851SDana.Myers@Sun.COM if (!Path) 349*7851SDana.Myers@Sun.COM { 350*7851SDana.Myers@Sun.COM Arg->Common.Value.Name = Path; 351*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_OK); 352*7851SDana.Myers@Sun.COM } 353*7851SDana.Myers@Sun.COM 354*7851SDana.Myers@Sun.COM /* 355*7851SDana.Myers@Sun.COM * Lookup the name in the internal namespace, starting with the current 356*7851SDana.Myers@Sun.COM * scope. We don't want to add anything new to the namespace here, 357*7851SDana.Myers@Sun.COM * however, so we use MODE_EXECUTE. 358*7851SDana.Myers@Sun.COM * Allow searching of the parent tree, but don't open a new scope - 359*7851SDana.Myers@Sun.COM * we just want to lookup the object (must be mode EXECUTE to perform 360*7851SDana.Myers@Sun.COM * the upsearch) 361*7851SDana.Myers@Sun.COM */ 362*7851SDana.Myers@Sun.COM Status = AcpiNsLookup (WalkState->ScopeInfo, Path, 363*7851SDana.Myers@Sun.COM ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE, 364*7851SDana.Myers@Sun.COM ACPI_NS_SEARCH_PARENT | ACPI_NS_DONT_OPEN_SCOPE, NULL, &Node); 365*7851SDana.Myers@Sun.COM 366*7851SDana.Myers@Sun.COM /* 367*7851SDana.Myers@Sun.COM * If this name is a control method invocation, we must 368*7851SDana.Myers@Sun.COM * setup the method call 369*7851SDana.Myers@Sun.COM */ 370*7851SDana.Myers@Sun.COM if (ACPI_SUCCESS (Status) && 371*7851SDana.Myers@Sun.COM PossibleMethodCall && 372*7851SDana.Myers@Sun.COM (Node->Type == ACPI_TYPE_METHOD)) 373*7851SDana.Myers@Sun.COM { 374*7851SDana.Myers@Sun.COM if (WalkState->Opcode == AML_UNLOAD_OP) 375*7851SDana.Myers@Sun.COM { 376*7851SDana.Myers@Sun.COM /* 377*7851SDana.Myers@Sun.COM * AcpiPsGetNextNamestring has increased the AML pointer, 378*7851SDana.Myers@Sun.COM * so we need to restore the saved AML pointer for method call. 379*7851SDana.Myers@Sun.COM */ 380*7851SDana.Myers@Sun.COM WalkState->ParserState.Aml = Start; 381*7851SDana.Myers@Sun.COM WalkState->ArgCount = 1; 382*7851SDana.Myers@Sun.COM AcpiPsInitOp (Arg, AML_INT_METHODCALL_OP); 383*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_OK); 384*7851SDana.Myers@Sun.COM } 385*7851SDana.Myers@Sun.COM 386*7851SDana.Myers@Sun.COM /* This name is actually a control method invocation */ 387*7851SDana.Myers@Sun.COM 388*7851SDana.Myers@Sun.COM MethodDesc = AcpiNsGetAttachedObject (Node); 389*7851SDana.Myers@Sun.COM ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, 390*7851SDana.Myers@Sun.COM "Control Method - %p Desc %p Path=%p\n", Node, MethodDesc, Path)); 391*7851SDana.Myers@Sun.COM 392*7851SDana.Myers@Sun.COM NameOp = AcpiPsAllocOp (AML_INT_NAMEPATH_OP); 393*7851SDana.Myers@Sun.COM if (!NameOp) 394*7851SDana.Myers@Sun.COM { 395*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_NO_MEMORY); 396*7851SDana.Myers@Sun.COM } 397*7851SDana.Myers@Sun.COM 398*7851SDana.Myers@Sun.COM /* Change Arg into a METHOD CALL and attach name to it */ 399*7851SDana.Myers@Sun.COM 400*7851SDana.Myers@Sun.COM AcpiPsInitOp (Arg, AML_INT_METHODCALL_OP); 401*7851SDana.Myers@Sun.COM NameOp->Common.Value.Name = Path; 402*7851SDana.Myers@Sun.COM 403*7851SDana.Myers@Sun.COM /* Point METHODCALL/NAME to the METHOD Node */ 404*7851SDana.Myers@Sun.COM 405*7851SDana.Myers@Sun.COM NameOp->Common.Node = Node; 406*7851SDana.Myers@Sun.COM AcpiPsAppendArg (Arg, NameOp); 407*7851SDana.Myers@Sun.COM 408*7851SDana.Myers@Sun.COM if (!MethodDesc) 409*7851SDana.Myers@Sun.COM { 410*7851SDana.Myers@Sun.COM ACPI_ERROR ((AE_INFO, 411*7851SDana.Myers@Sun.COM "Control Method %p has no attached object", 412*7851SDana.Myers@Sun.COM Node)); 413*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_AML_INTERNAL); 414*7851SDana.Myers@Sun.COM } 415*7851SDana.Myers@Sun.COM 416*7851SDana.Myers@Sun.COM ACPI_DEBUG_PRINT ((ACPI_DB_PARSE, 417*7851SDana.Myers@Sun.COM "Control Method - %p Args %X\n", 418*7851SDana.Myers@Sun.COM Node, MethodDesc->Method.ParamCount)); 419*7851SDana.Myers@Sun.COM 420*7851SDana.Myers@Sun.COM /* Get the number of arguments to expect */ 421*7851SDana.Myers@Sun.COM 422*7851SDana.Myers@Sun.COM WalkState->ArgCount = MethodDesc->Method.ParamCount; 423*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_OK); 424*7851SDana.Myers@Sun.COM } 425*7851SDana.Myers@Sun.COM 426*7851SDana.Myers@Sun.COM /* 427*7851SDana.Myers@Sun.COM * Special handling if the name was not found during the lookup - 428*7851SDana.Myers@Sun.COM * some NotFound cases are allowed 429*7851SDana.Myers@Sun.COM */ 430*7851SDana.Myers@Sun.COM if (Status == AE_NOT_FOUND) 431*7851SDana.Myers@Sun.COM { 432*7851SDana.Myers@Sun.COM /* 1) NotFound is ok during load pass 1/2 (allow forward references) */ 433*7851SDana.Myers@Sun.COM 434*7851SDana.Myers@Sun.COM if ((WalkState->ParseFlags & ACPI_PARSE_MODE_MASK) != 435*7851SDana.Myers@Sun.COM ACPI_PARSE_EXECUTE) 436*7851SDana.Myers@Sun.COM { 437*7851SDana.Myers@Sun.COM Status = AE_OK; 438*7851SDana.Myers@Sun.COM } 439*7851SDana.Myers@Sun.COM 440*7851SDana.Myers@Sun.COM /* 2) NotFound during a CondRefOf(x) is ok by definition */ 441*7851SDana.Myers@Sun.COM 442*7851SDana.Myers@Sun.COM else if (WalkState->Op->Common.AmlOpcode == AML_COND_REF_OF_OP) 443*7851SDana.Myers@Sun.COM { 444*7851SDana.Myers@Sun.COM Status = AE_OK; 445*7851SDana.Myers@Sun.COM } 446*7851SDana.Myers@Sun.COM 447*7851SDana.Myers@Sun.COM /* 448*7851SDana.Myers@Sun.COM * 3) NotFound while building a Package is ok at this point, we 449*7851SDana.Myers@Sun.COM * may flag as an error later if slack mode is not enabled. 450*7851SDana.Myers@Sun.COM * (Some ASL code depends on allowing this behavior) 451*7851SDana.Myers@Sun.COM */ 452*7851SDana.Myers@Sun.COM else if ((Arg->Common.Parent) && 453*7851SDana.Myers@Sun.COM ((Arg->Common.Parent->Common.AmlOpcode == AML_PACKAGE_OP) || 454*7851SDana.Myers@Sun.COM (Arg->Common.Parent->Common.AmlOpcode == AML_VAR_PACKAGE_OP))) 455*7851SDana.Myers@Sun.COM { 456*7851SDana.Myers@Sun.COM Status = AE_OK; 457*7851SDana.Myers@Sun.COM } 458*7851SDana.Myers@Sun.COM } 459*7851SDana.Myers@Sun.COM 460*7851SDana.Myers@Sun.COM /* Final exception check (may have been changed from code above) */ 461*7851SDana.Myers@Sun.COM 462*7851SDana.Myers@Sun.COM if (ACPI_FAILURE (Status)) 463*7851SDana.Myers@Sun.COM { 464*7851SDana.Myers@Sun.COM ACPI_ERROR_NAMESPACE (Path, Status); 465*7851SDana.Myers@Sun.COM 466*7851SDana.Myers@Sun.COM if ((WalkState->ParseFlags & ACPI_PARSE_MODE_MASK) == 467*7851SDana.Myers@Sun.COM ACPI_PARSE_EXECUTE) 468*7851SDana.Myers@Sun.COM { 469*7851SDana.Myers@Sun.COM /* Report a control method execution error */ 470*7851SDana.Myers@Sun.COM 471*7851SDana.Myers@Sun.COM Status = AcpiDsMethodError (Status, WalkState); 472*7851SDana.Myers@Sun.COM } 473*7851SDana.Myers@Sun.COM } 474*7851SDana.Myers@Sun.COM 475*7851SDana.Myers@Sun.COM /* Save the namepath */ 476*7851SDana.Myers@Sun.COM 477*7851SDana.Myers@Sun.COM Arg->Common.Value.Name = Path; 478*7851SDana.Myers@Sun.COM return_ACPI_STATUS (Status); 479*7851SDana.Myers@Sun.COM } 480*7851SDana.Myers@Sun.COM 481*7851SDana.Myers@Sun.COM 482*7851SDana.Myers@Sun.COM /******************************************************************************* 483*7851SDana.Myers@Sun.COM * 484*7851SDana.Myers@Sun.COM * FUNCTION: AcpiPsGetNextSimpleArg 485*7851SDana.Myers@Sun.COM * 486*7851SDana.Myers@Sun.COM * PARAMETERS: ParserState - Current parser state object 487*7851SDana.Myers@Sun.COM * ArgType - The argument type (AML_*_ARG) 488*7851SDana.Myers@Sun.COM * Arg - Where the argument is returned 489*7851SDana.Myers@Sun.COM * 490*7851SDana.Myers@Sun.COM * RETURN: None 491*7851SDana.Myers@Sun.COM * 492*7851SDana.Myers@Sun.COM * DESCRIPTION: Get the next simple argument (constant, string, or namestring) 493*7851SDana.Myers@Sun.COM * 494*7851SDana.Myers@Sun.COM ******************************************************************************/ 495*7851SDana.Myers@Sun.COM 496*7851SDana.Myers@Sun.COM void 497*7851SDana.Myers@Sun.COM AcpiPsGetNextSimpleArg ( 498*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState, 499*7851SDana.Myers@Sun.COM UINT32 ArgType, 500*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *Arg) 501*7851SDana.Myers@Sun.COM { 502*7851SDana.Myers@Sun.COM UINT32 Length; 503*7851SDana.Myers@Sun.COM UINT16 Opcode; 504*7851SDana.Myers@Sun.COM UINT8 *Aml = ParserState->Aml; 505*7851SDana.Myers@Sun.COM 506*7851SDana.Myers@Sun.COM 507*7851SDana.Myers@Sun.COM ACPI_FUNCTION_TRACE_U32 (PsGetNextSimpleArg, ArgType); 508*7851SDana.Myers@Sun.COM 509*7851SDana.Myers@Sun.COM 510*7851SDana.Myers@Sun.COM switch (ArgType) 511*7851SDana.Myers@Sun.COM { 512*7851SDana.Myers@Sun.COM case ARGP_BYTEDATA: 513*7851SDana.Myers@Sun.COM 514*7851SDana.Myers@Sun.COM /* Get 1 byte from the AML stream */ 515*7851SDana.Myers@Sun.COM 516*7851SDana.Myers@Sun.COM Opcode = AML_BYTE_OP; 517*7851SDana.Myers@Sun.COM Arg->Common.Value.Integer = (ACPI_INTEGER) *Aml; 518*7851SDana.Myers@Sun.COM Length = 1; 519*7851SDana.Myers@Sun.COM break; 520*7851SDana.Myers@Sun.COM 521*7851SDana.Myers@Sun.COM 522*7851SDana.Myers@Sun.COM case ARGP_WORDDATA: 523*7851SDana.Myers@Sun.COM 524*7851SDana.Myers@Sun.COM /* Get 2 bytes from the AML stream */ 525*7851SDana.Myers@Sun.COM 526*7851SDana.Myers@Sun.COM Opcode = AML_WORD_OP; 527*7851SDana.Myers@Sun.COM ACPI_MOVE_16_TO_64 (&Arg->Common.Value.Integer, Aml); 528*7851SDana.Myers@Sun.COM Length = 2; 529*7851SDana.Myers@Sun.COM break; 530*7851SDana.Myers@Sun.COM 531*7851SDana.Myers@Sun.COM 532*7851SDana.Myers@Sun.COM case ARGP_DWORDDATA: 533*7851SDana.Myers@Sun.COM 534*7851SDana.Myers@Sun.COM /* Get 4 bytes from the AML stream */ 535*7851SDana.Myers@Sun.COM 536*7851SDana.Myers@Sun.COM Opcode = AML_DWORD_OP; 537*7851SDana.Myers@Sun.COM ACPI_MOVE_32_TO_64 (&Arg->Common.Value.Integer, Aml); 538*7851SDana.Myers@Sun.COM Length = 4; 539*7851SDana.Myers@Sun.COM break; 540*7851SDana.Myers@Sun.COM 541*7851SDana.Myers@Sun.COM 542*7851SDana.Myers@Sun.COM case ARGP_QWORDDATA: 543*7851SDana.Myers@Sun.COM 544*7851SDana.Myers@Sun.COM /* Get 8 bytes from the AML stream */ 545*7851SDana.Myers@Sun.COM 546*7851SDana.Myers@Sun.COM Opcode = AML_QWORD_OP; 547*7851SDana.Myers@Sun.COM ACPI_MOVE_64_TO_64 (&Arg->Common.Value.Integer, Aml); 548*7851SDana.Myers@Sun.COM Length = 8; 549*7851SDana.Myers@Sun.COM break; 550*7851SDana.Myers@Sun.COM 551*7851SDana.Myers@Sun.COM 552*7851SDana.Myers@Sun.COM case ARGP_CHARLIST: 553*7851SDana.Myers@Sun.COM 554*7851SDana.Myers@Sun.COM /* Get a pointer to the string, point past the string */ 555*7851SDana.Myers@Sun.COM 556*7851SDana.Myers@Sun.COM Opcode = AML_STRING_OP; 557*7851SDana.Myers@Sun.COM Arg->Common.Value.String = ACPI_CAST_PTR (char, Aml); 558*7851SDana.Myers@Sun.COM 559*7851SDana.Myers@Sun.COM /* Find the null terminator */ 560*7851SDana.Myers@Sun.COM 561*7851SDana.Myers@Sun.COM Length = 0; 562*7851SDana.Myers@Sun.COM while (Aml[Length]) 563*7851SDana.Myers@Sun.COM { 564*7851SDana.Myers@Sun.COM Length++; 565*7851SDana.Myers@Sun.COM } 566*7851SDana.Myers@Sun.COM Length++; 567*7851SDana.Myers@Sun.COM break; 568*7851SDana.Myers@Sun.COM 569*7851SDana.Myers@Sun.COM 570*7851SDana.Myers@Sun.COM case ARGP_NAME: 571*7851SDana.Myers@Sun.COM case ARGP_NAMESTRING: 572*7851SDana.Myers@Sun.COM 573*7851SDana.Myers@Sun.COM AcpiPsInitOp (Arg, AML_INT_NAMEPATH_OP); 574*7851SDana.Myers@Sun.COM Arg->Common.Value.Name = AcpiPsGetNextNamestring (ParserState); 575*7851SDana.Myers@Sun.COM return_VOID; 576*7851SDana.Myers@Sun.COM 577*7851SDana.Myers@Sun.COM 578*7851SDana.Myers@Sun.COM default: 579*7851SDana.Myers@Sun.COM 580*7851SDana.Myers@Sun.COM ACPI_ERROR ((AE_INFO, "Invalid ArgType %X", ArgType)); 581*7851SDana.Myers@Sun.COM return_VOID; 582*7851SDana.Myers@Sun.COM } 583*7851SDana.Myers@Sun.COM 584*7851SDana.Myers@Sun.COM AcpiPsInitOp (Arg, Opcode); 585*7851SDana.Myers@Sun.COM ParserState->Aml += Length; 586*7851SDana.Myers@Sun.COM return_VOID; 587*7851SDana.Myers@Sun.COM } 588*7851SDana.Myers@Sun.COM 589*7851SDana.Myers@Sun.COM 590*7851SDana.Myers@Sun.COM /******************************************************************************* 591*7851SDana.Myers@Sun.COM * 592*7851SDana.Myers@Sun.COM * FUNCTION: AcpiPsGetNextField 593*7851SDana.Myers@Sun.COM * 594*7851SDana.Myers@Sun.COM * PARAMETERS: ParserState - Current parser state object 595*7851SDana.Myers@Sun.COM * 596*7851SDana.Myers@Sun.COM * RETURN: A newly allocated FIELD op 597*7851SDana.Myers@Sun.COM * 598*7851SDana.Myers@Sun.COM * DESCRIPTION: Get next field (NamedField, ReservedField, or AccessField) 599*7851SDana.Myers@Sun.COM * 600*7851SDana.Myers@Sun.COM ******************************************************************************/ 601*7851SDana.Myers@Sun.COM 602*7851SDana.Myers@Sun.COM static ACPI_PARSE_OBJECT * 603*7851SDana.Myers@Sun.COM AcpiPsGetNextField ( 604*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState) 605*7851SDana.Myers@Sun.COM { 606*7851SDana.Myers@Sun.COM UINT32 AmlOffset = (UINT32) 607*7851SDana.Myers@Sun.COM ACPI_PTR_DIFF (ParserState->Aml, 608*7851SDana.Myers@Sun.COM ParserState->AmlStart); 609*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *Field; 610*7851SDana.Myers@Sun.COM UINT16 Opcode; 611*7851SDana.Myers@Sun.COM UINT32 Name; 612*7851SDana.Myers@Sun.COM 613*7851SDana.Myers@Sun.COM 614*7851SDana.Myers@Sun.COM ACPI_FUNCTION_TRACE (PsGetNextField); 615*7851SDana.Myers@Sun.COM 616*7851SDana.Myers@Sun.COM 617*7851SDana.Myers@Sun.COM /* Determine field type */ 618*7851SDana.Myers@Sun.COM 619*7851SDana.Myers@Sun.COM switch (ACPI_GET8 (ParserState->Aml)) 620*7851SDana.Myers@Sun.COM { 621*7851SDana.Myers@Sun.COM default: 622*7851SDana.Myers@Sun.COM 623*7851SDana.Myers@Sun.COM Opcode = AML_INT_NAMEDFIELD_OP; 624*7851SDana.Myers@Sun.COM break; 625*7851SDana.Myers@Sun.COM 626*7851SDana.Myers@Sun.COM case 0x00: 627*7851SDana.Myers@Sun.COM 628*7851SDana.Myers@Sun.COM Opcode = AML_INT_RESERVEDFIELD_OP; 629*7851SDana.Myers@Sun.COM ParserState->Aml++; 630*7851SDana.Myers@Sun.COM break; 631*7851SDana.Myers@Sun.COM 632*7851SDana.Myers@Sun.COM case 0x01: 633*7851SDana.Myers@Sun.COM 634*7851SDana.Myers@Sun.COM Opcode = AML_INT_ACCESSFIELD_OP; 635*7851SDana.Myers@Sun.COM ParserState->Aml++; 636*7851SDana.Myers@Sun.COM break; 637*7851SDana.Myers@Sun.COM } 638*7851SDana.Myers@Sun.COM 639*7851SDana.Myers@Sun.COM /* Allocate a new field op */ 640*7851SDana.Myers@Sun.COM 641*7851SDana.Myers@Sun.COM Field = AcpiPsAllocOp (Opcode); 642*7851SDana.Myers@Sun.COM if (!Field) 643*7851SDana.Myers@Sun.COM { 644*7851SDana.Myers@Sun.COM return_PTR (NULL); 645*7851SDana.Myers@Sun.COM } 646*7851SDana.Myers@Sun.COM 647*7851SDana.Myers@Sun.COM Field->Common.AmlOffset = AmlOffset; 648*7851SDana.Myers@Sun.COM 649*7851SDana.Myers@Sun.COM /* Decode the field type */ 650*7851SDana.Myers@Sun.COM 651*7851SDana.Myers@Sun.COM switch (Opcode) 652*7851SDana.Myers@Sun.COM { 653*7851SDana.Myers@Sun.COM case AML_INT_NAMEDFIELD_OP: 654*7851SDana.Myers@Sun.COM 655*7851SDana.Myers@Sun.COM /* Get the 4-character name */ 656*7851SDana.Myers@Sun.COM 657*7851SDana.Myers@Sun.COM ACPI_MOVE_32_TO_32 (&Name, ParserState->Aml); 658*7851SDana.Myers@Sun.COM AcpiPsSetName (Field, Name); 659*7851SDana.Myers@Sun.COM ParserState->Aml += ACPI_NAME_SIZE; 660*7851SDana.Myers@Sun.COM 661*7851SDana.Myers@Sun.COM /* Get the length which is encoded as a package length */ 662*7851SDana.Myers@Sun.COM 663*7851SDana.Myers@Sun.COM Field->Common.Value.Size = AcpiPsGetNextPackageLength (ParserState); 664*7851SDana.Myers@Sun.COM break; 665*7851SDana.Myers@Sun.COM 666*7851SDana.Myers@Sun.COM 667*7851SDana.Myers@Sun.COM case AML_INT_RESERVEDFIELD_OP: 668*7851SDana.Myers@Sun.COM 669*7851SDana.Myers@Sun.COM /* Get the length which is encoded as a package length */ 670*7851SDana.Myers@Sun.COM 671*7851SDana.Myers@Sun.COM Field->Common.Value.Size = AcpiPsGetNextPackageLength (ParserState); 672*7851SDana.Myers@Sun.COM break; 673*7851SDana.Myers@Sun.COM 674*7851SDana.Myers@Sun.COM 675*7851SDana.Myers@Sun.COM case AML_INT_ACCESSFIELD_OP: 676*7851SDana.Myers@Sun.COM 677*7851SDana.Myers@Sun.COM /* 678*7851SDana.Myers@Sun.COM * Get AccessType and AccessAttrib and merge into the field Op 679*7851SDana.Myers@Sun.COM * AccessType is first operand, AccessAttribute is second 680*7851SDana.Myers@Sun.COM */ 681*7851SDana.Myers@Sun.COM Field->Common.Value.Integer = (((UINT32) ACPI_GET8 (ParserState->Aml) << 8)); 682*7851SDana.Myers@Sun.COM ParserState->Aml++; 683*7851SDana.Myers@Sun.COM Field->Common.Value.Integer |= ACPI_GET8 (ParserState->Aml); 684*7851SDana.Myers@Sun.COM ParserState->Aml++; 685*7851SDana.Myers@Sun.COM break; 686*7851SDana.Myers@Sun.COM 687*7851SDana.Myers@Sun.COM default: 688*7851SDana.Myers@Sun.COM 689*7851SDana.Myers@Sun.COM /* Opcode was set in previous switch */ 690*7851SDana.Myers@Sun.COM break; 691*7851SDana.Myers@Sun.COM } 692*7851SDana.Myers@Sun.COM 693*7851SDana.Myers@Sun.COM return_PTR (Field); 694*7851SDana.Myers@Sun.COM } 695*7851SDana.Myers@Sun.COM 696*7851SDana.Myers@Sun.COM 697*7851SDana.Myers@Sun.COM /******************************************************************************* 698*7851SDana.Myers@Sun.COM * 699*7851SDana.Myers@Sun.COM * FUNCTION: AcpiPsGetNextArg 700*7851SDana.Myers@Sun.COM * 701*7851SDana.Myers@Sun.COM * PARAMETERS: WalkState - Current state 702*7851SDana.Myers@Sun.COM * ParserState - Current parser state object 703*7851SDana.Myers@Sun.COM * ArgType - The argument type (AML_*_ARG) 704*7851SDana.Myers@Sun.COM * ReturnArg - Where the next arg is returned 705*7851SDana.Myers@Sun.COM * 706*7851SDana.Myers@Sun.COM * RETURN: Status, and an op object containing the next argument. 707*7851SDana.Myers@Sun.COM * 708*7851SDana.Myers@Sun.COM * DESCRIPTION: Get next argument (including complex list arguments that require 709*7851SDana.Myers@Sun.COM * pushing the parser stack) 710*7851SDana.Myers@Sun.COM * 711*7851SDana.Myers@Sun.COM ******************************************************************************/ 712*7851SDana.Myers@Sun.COM 713*7851SDana.Myers@Sun.COM ACPI_STATUS 714*7851SDana.Myers@Sun.COM AcpiPsGetNextArg ( 715*7851SDana.Myers@Sun.COM ACPI_WALK_STATE *WalkState, 716*7851SDana.Myers@Sun.COM ACPI_PARSE_STATE *ParserState, 717*7851SDana.Myers@Sun.COM UINT32 ArgType, 718*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT **ReturnArg) 719*7851SDana.Myers@Sun.COM { 720*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *Arg = NULL; 721*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *Prev = NULL; 722*7851SDana.Myers@Sun.COM ACPI_PARSE_OBJECT *Field; 723*7851SDana.Myers@Sun.COM UINT32 Subop; 724*7851SDana.Myers@Sun.COM ACPI_STATUS Status = AE_OK; 725*7851SDana.Myers@Sun.COM 726*7851SDana.Myers@Sun.COM 727*7851SDana.Myers@Sun.COM ACPI_FUNCTION_TRACE_PTR (PsGetNextArg, ParserState); 728*7851SDana.Myers@Sun.COM 729*7851SDana.Myers@Sun.COM 730*7851SDana.Myers@Sun.COM switch (ArgType) 731*7851SDana.Myers@Sun.COM { 732*7851SDana.Myers@Sun.COM case ARGP_BYTEDATA: 733*7851SDana.Myers@Sun.COM case ARGP_WORDDATA: 734*7851SDana.Myers@Sun.COM case ARGP_DWORDDATA: 735*7851SDana.Myers@Sun.COM case ARGP_CHARLIST: 736*7851SDana.Myers@Sun.COM case ARGP_NAME: 737*7851SDana.Myers@Sun.COM case ARGP_NAMESTRING: 738*7851SDana.Myers@Sun.COM 739*7851SDana.Myers@Sun.COM /* Constants, strings, and namestrings are all the same size */ 740*7851SDana.Myers@Sun.COM 741*7851SDana.Myers@Sun.COM Arg = AcpiPsAllocOp (AML_BYTE_OP); 742*7851SDana.Myers@Sun.COM if (!Arg) 743*7851SDana.Myers@Sun.COM { 744*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_NO_MEMORY); 745*7851SDana.Myers@Sun.COM } 746*7851SDana.Myers@Sun.COM AcpiPsGetNextSimpleArg (ParserState, ArgType, Arg); 747*7851SDana.Myers@Sun.COM break; 748*7851SDana.Myers@Sun.COM 749*7851SDana.Myers@Sun.COM 750*7851SDana.Myers@Sun.COM case ARGP_PKGLENGTH: 751*7851SDana.Myers@Sun.COM 752*7851SDana.Myers@Sun.COM /* Package length, nothing returned */ 753*7851SDana.Myers@Sun.COM 754*7851SDana.Myers@Sun.COM ParserState->PkgEnd = AcpiPsGetNextPackageEnd (ParserState); 755*7851SDana.Myers@Sun.COM break; 756*7851SDana.Myers@Sun.COM 757*7851SDana.Myers@Sun.COM 758*7851SDana.Myers@Sun.COM case ARGP_FIELDLIST: 759*7851SDana.Myers@Sun.COM 760*7851SDana.Myers@Sun.COM if (ParserState->Aml < ParserState->PkgEnd) 761*7851SDana.Myers@Sun.COM { 762*7851SDana.Myers@Sun.COM /* Non-empty list */ 763*7851SDana.Myers@Sun.COM 764*7851SDana.Myers@Sun.COM while (ParserState->Aml < ParserState->PkgEnd) 765*7851SDana.Myers@Sun.COM { 766*7851SDana.Myers@Sun.COM Field = AcpiPsGetNextField (ParserState); 767*7851SDana.Myers@Sun.COM if (!Field) 768*7851SDana.Myers@Sun.COM { 769*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_NO_MEMORY); 770*7851SDana.Myers@Sun.COM } 771*7851SDana.Myers@Sun.COM 772*7851SDana.Myers@Sun.COM if (Prev) 773*7851SDana.Myers@Sun.COM { 774*7851SDana.Myers@Sun.COM Prev->Common.Next = Field; 775*7851SDana.Myers@Sun.COM } 776*7851SDana.Myers@Sun.COM else 777*7851SDana.Myers@Sun.COM { 778*7851SDana.Myers@Sun.COM Arg = Field; 779*7851SDana.Myers@Sun.COM } 780*7851SDana.Myers@Sun.COM Prev = Field; 781*7851SDana.Myers@Sun.COM } 782*7851SDana.Myers@Sun.COM 783*7851SDana.Myers@Sun.COM /* Skip to End of byte data */ 784*7851SDana.Myers@Sun.COM 785*7851SDana.Myers@Sun.COM ParserState->Aml = ParserState->PkgEnd; 786*7851SDana.Myers@Sun.COM } 787*7851SDana.Myers@Sun.COM break; 788*7851SDana.Myers@Sun.COM 789*7851SDana.Myers@Sun.COM 790*7851SDana.Myers@Sun.COM case ARGP_BYTELIST: 791*7851SDana.Myers@Sun.COM 792*7851SDana.Myers@Sun.COM if (ParserState->Aml < ParserState->PkgEnd) 793*7851SDana.Myers@Sun.COM { 794*7851SDana.Myers@Sun.COM /* Non-empty list */ 795*7851SDana.Myers@Sun.COM 796*7851SDana.Myers@Sun.COM Arg = AcpiPsAllocOp (AML_INT_BYTELIST_OP); 797*7851SDana.Myers@Sun.COM if (!Arg) 798*7851SDana.Myers@Sun.COM { 799*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_NO_MEMORY); 800*7851SDana.Myers@Sun.COM } 801*7851SDana.Myers@Sun.COM 802*7851SDana.Myers@Sun.COM /* Fill in bytelist data */ 803*7851SDana.Myers@Sun.COM 804*7851SDana.Myers@Sun.COM Arg->Common.Value.Size = (UINT32) 805*7851SDana.Myers@Sun.COM ACPI_PTR_DIFF (ParserState->PkgEnd, ParserState->Aml); 806*7851SDana.Myers@Sun.COM Arg->Named.Data = ParserState->Aml; 807*7851SDana.Myers@Sun.COM 808*7851SDana.Myers@Sun.COM /* Skip to End of byte data */ 809*7851SDana.Myers@Sun.COM 810*7851SDana.Myers@Sun.COM ParserState->Aml = ParserState->PkgEnd; 811*7851SDana.Myers@Sun.COM } 812*7851SDana.Myers@Sun.COM break; 813*7851SDana.Myers@Sun.COM 814*7851SDana.Myers@Sun.COM 815*7851SDana.Myers@Sun.COM case ARGP_TARGET: 816*7851SDana.Myers@Sun.COM case ARGP_SUPERNAME: 817*7851SDana.Myers@Sun.COM case ARGP_SIMPLENAME: 818*7851SDana.Myers@Sun.COM 819*7851SDana.Myers@Sun.COM Subop = AcpiPsPeekOpcode (ParserState); 820*7851SDana.Myers@Sun.COM if (Subop == 0 || 821*7851SDana.Myers@Sun.COM AcpiPsIsLeadingChar (Subop) || 822*7851SDana.Myers@Sun.COM AcpiPsIsPrefixChar (Subop)) 823*7851SDana.Myers@Sun.COM { 824*7851SDana.Myers@Sun.COM /* NullName or NameString */ 825*7851SDana.Myers@Sun.COM 826*7851SDana.Myers@Sun.COM Arg = AcpiPsAllocOp (AML_INT_NAMEPATH_OP); 827*7851SDana.Myers@Sun.COM if (!Arg) 828*7851SDana.Myers@Sun.COM { 829*7851SDana.Myers@Sun.COM return_ACPI_STATUS (AE_NO_MEMORY); 830*7851SDana.Myers@Sun.COM } 831*7851SDana.Myers@Sun.COM 832*7851SDana.Myers@Sun.COM /* To support SuperName arg of Unload */ 833*7851SDana.Myers@Sun.COM 834*7851SDana.Myers@Sun.COM if (WalkState->Opcode == AML_UNLOAD_OP) 835*7851SDana.Myers@Sun.COM { 836*7851SDana.Myers@Sun.COM Status = AcpiPsGetNextNamepath (WalkState, ParserState, Arg, 1); 837*7851SDana.Myers@Sun.COM 838*7851SDana.Myers@Sun.COM /* 839*7851SDana.Myers@Sun.COM * If the SuperName arg of Unload is a method call, 840*7851SDana.Myers@Sun.COM * we have restored the AML pointer, just free this Arg 841*7851SDana.Myers@Sun.COM */ 842*7851SDana.Myers@Sun.COM if (Arg->Common.AmlOpcode == AML_INT_METHODCALL_OP) 843*7851SDana.Myers@Sun.COM { 844*7851SDana.Myers@Sun.COM AcpiPsFreeOp (Arg); 845*7851SDana.Myers@Sun.COM Arg = NULL; 846*7851SDana.Myers@Sun.COM } 847*7851SDana.Myers@Sun.COM } 848*7851SDana.Myers@Sun.COM else 849*7851SDana.Myers@Sun.COM { 850*7851SDana.Myers@Sun.COM Status = AcpiPsGetNextNamepath (WalkState, ParserState, Arg, 0); 851*7851SDana.Myers@Sun.COM } 852*7851SDana.Myers@Sun.COM } 853*7851SDana.Myers@Sun.COM else 854*7851SDana.Myers@Sun.COM { 855*7851SDana.Myers@Sun.COM /* Single complex argument, nothing returned */ 856*7851SDana.Myers@Sun.COM 857*7851SDana.Myers@Sun.COM WalkState->ArgCount = 1; 858*7851SDana.Myers@Sun.COM } 859*7851SDana.Myers@Sun.COM break; 860*7851SDana.Myers@Sun.COM 861*7851SDana.Myers@Sun.COM 862*7851SDana.Myers@Sun.COM case ARGP_DATAOBJ: 863*7851SDana.Myers@Sun.COM case ARGP_TERMARG: 864*7851SDana.Myers@Sun.COM 865*7851SDana.Myers@Sun.COM /* Single complex argument, nothing returned */ 866*7851SDana.Myers@Sun.COM 867*7851SDana.Myers@Sun.COM WalkState->ArgCount = 1; 868*7851SDana.Myers@Sun.COM break; 869*7851SDana.Myers@Sun.COM 870*7851SDana.Myers@Sun.COM 871*7851SDana.Myers@Sun.COM case ARGP_DATAOBJLIST: 872*7851SDana.Myers@Sun.COM case ARGP_TERMLIST: 873*7851SDana.Myers@Sun.COM case ARGP_OBJLIST: 874*7851SDana.Myers@Sun.COM 875*7851SDana.Myers@Sun.COM if (ParserState->Aml < ParserState->PkgEnd) 876*7851SDana.Myers@Sun.COM { 877*7851SDana.Myers@Sun.COM /* Non-empty list of variable arguments, nothing returned */ 878*7851SDana.Myers@Sun.COM 879*7851SDana.Myers@Sun.COM WalkState->ArgCount = ACPI_VAR_ARGS; 880*7851SDana.Myers@Sun.COM } 881*7851SDana.Myers@Sun.COM break; 882*7851SDana.Myers@Sun.COM 883*7851SDana.Myers@Sun.COM 884*7851SDana.Myers@Sun.COM default: 885*7851SDana.Myers@Sun.COM 886*7851SDana.Myers@Sun.COM ACPI_ERROR ((AE_INFO, "Invalid ArgType: %X", ArgType)); 887*7851SDana.Myers@Sun.COM Status = AE_AML_OPERAND_TYPE; 888*7851SDana.Myers@Sun.COM break; 889*7851SDana.Myers@Sun.COM } 890*7851SDana.Myers@Sun.COM 891*7851SDana.Myers@Sun.COM *ReturnArg = Arg; 892*7851SDana.Myers@Sun.COM return_ACPI_STATUS (Status); 893*7851SDana.Myers@Sun.COM } 894