sys/contrib/dev/acpica/dsfield.c

   1 /******************************************************************************
   2  *
   3  * Module Name: dsfield - Dispatcher field routines
   4  *              $Revision: 1.84 $
   5  *
   6  *****************************************************************************/
   7
   8 /******************************************************************************
   9  *
  10  * 1. Copyright Notice
  11  *
  12  * Some or all of this work - Copyright (c) 1999 - 2007, Intel Corp.
  13  * All rights reserved.
  14  *
  15  * 2. License
  16  *
  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.
  21  *
  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
  28  *
  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;
  37  *
  38  * The above copyright and patent license is granted only if the following
  39  * conditions are met:
  40  *
  41  * 3. Conditions
  42  *
  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.
  54  *
  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.
  66  *
  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.
  72  *
  73  * 3.4. Intel retains all right, title, and interest in and to the Original
  74  * Intel Code.
  75  *
  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.
  80  *
  81  * 4. Disclaimer and Export Compliance
  82  *
  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.
  90  *
  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.
  99  *
 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.
 114  *
 115  *****************************************************************************/
 116
 117 #define __DSFIELD_C__
 118
 119 #include <contrib/dev/acpica/acpi.h>
 120 #include <contrib/dev/acpica/amlcode.h>
 121 #include <contrib/dev/acpica/acdispat.h>
 122 #include <contrib/dev/acpica/acinterp.h>
 123 #include <contrib/dev/acpica/acnamesp.h>
 124 #include <contrib/dev/acpica/acparser.h>
 125
 126
 127 #define _COMPONENT          ACPI_DISPATCHER
 128         ACPI_MODULE_NAME    ("dsfield")
 129
 130 /* Local prototypes */
 131
 132 static ACPI_STATUS
 133 AcpiDsGetFieldNames (
 134     ACPI_CREATE_FIELD_INFO  *Info,
 135     ACPI_WALK_STATE         *WalkState,
 136     ACPI_PARSE_OBJECT       *Arg);
 137
 138
 139 /*******************************************************************************
 140  *
 141  * FUNCTION:    AcpiDsCreateBufferField
 142  *
 143  * PARAMETERS:  Op                  - Current parse op (CreateXXField)
 144  *              WalkState           - Current state
 145  *
 146  * RETURN:      Status
 147  *
 148  * DESCRIPTION: Execute the CreateField operators:
 149  *              CreateBitFieldOp,
 150  *              CreateByteFieldOp,
 151  *              CreateWordFieldOp,
 152  *              CreateDWordFieldOp,
 153  *              CreateQWordFieldOp,
 154  *              CreateFieldOp       (all of which define a field in a buffer)
 155  *
 156  ******************************************************************************/
 157
 158 ACPI_STATUS
 159 AcpiDsCreateBufferField (
 160     ACPI_PARSE_OBJECT       *Op,
 161     ACPI_WALK_STATE         *WalkState)
 162 {
 163     ACPI_PARSE_OBJECT       *Arg;
 164     ACPI_NAMESPACE_NODE     *Node;
 165     ACPI_STATUS             Status;
 166     ACPI_OPERAND_OBJECT     *ObjDesc;
 167     ACPI_OPERAND_OBJECT     *SecondDesc = NULL;
 168     UINT32                  Flags;
 169
 170
 171     ACPI_FUNCTION_TRACE (DsCreateBufferField);
 172
 173
 174     /* Get the NameString argument */
 175
 176     if (Op->Common.AmlOpcode == AML_CREATE_FIELD_OP)
 177     {
 178         Arg = AcpiPsGetArg (Op, 3);
 179     }
 180     else
 181     {
 182         /* Create Bit/Byte/Word/Dword field */
 183
 184         Arg = AcpiPsGetArg (Op, 2);
 185     }
 186
 187     if (!Arg)
 188     {
 189         return_ACPI_STATUS (AE_AML_NO_OPERAND);
 190     }
 191
 192     if (WalkState->DeferredNode)
 193     {
 194         Node = WalkState->DeferredNode;
 195         Status = AE_OK;
 196     }
 197     else
 198     {
 199         /*
 200          * During the load phase, we want to enter the name of the field into
 201          * the namespace.  During the execute phase (when we evaluate the size
 202          * operand), we want to lookup the name
 203          */
 204         if (WalkState->ParseFlags & ACPI_PARSE_EXECUTE)
 205         {
 206             Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE;
 207         }
 208         else
 209         {
 210             Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
 211                     ACPI_NS_ERROR_IF_FOUND;
 212         }
 213
 214         /*
 215          * Enter the NameString into the namespace
 216          */
 217         Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
 218                                 ACPI_TYPE_ANY, ACPI_IMODE_LOAD_PASS1,
 219                                 Flags, WalkState, &(Node));
 220         if (ACPI_FAILURE (Status))
 221         {
 222             ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
 223             return_ACPI_STATUS (Status);
 224         }
 225     }
 226
 227     /*
 228      * We could put the returned object (Node) on the object stack for later,
 229      * but for now, we will put it in the "op" object that the parser uses,
 230      * so we can get it again at the end of this scope
 231      */
 232     Op->Common.Node = Node;
 233
 234     /*
 235      * If there is no object attached to the node, this node was just created
 236      * and we need to create the field object.  Otherwise, this was a lookup
 237      * of an existing node and we don't want to create the field object again.
 238      */
 239     ObjDesc = AcpiNsGetAttachedObject (Node);
 240     if (ObjDesc)
 241     {
 242         return_ACPI_STATUS (AE_OK);
 243     }
 244
 245     /*
 246      * The Field definition is not fully parsed at this time.
 247      * (We must save the address of the AML for the buffer and index operands)
 248      */
 249
 250     /* Create the buffer field object */
 251
 252     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_BUFFER_FIELD);
 253     if (!ObjDesc)
 254     {
 255         Status = AE_NO_MEMORY;
 256         goto Cleanup;
 257     }
 258
 259     /*
 260      * Remember location in AML stream of the field unit
 261      * opcode and operands -- since the buffer and index
 262      * operands must be evaluated.
 263      */
 264     SecondDesc                  = ObjDesc->Common.NextObject;
 265     SecondDesc->Extra.AmlStart  = Op->Named.Data;
 266     SecondDesc->Extra.AmlLength = Op->Named.Length;
 267     ObjDesc->BufferField.Node   = Node;
 268
 269     /* Attach constructed field descriptors to parent node */
 270
 271     Status = AcpiNsAttachObject (Node, ObjDesc, ACPI_TYPE_BUFFER_FIELD);
 272     if (ACPI_FAILURE (Status))
 273     {
 274         goto Cleanup;
 275     }
 276
 277
 278 Cleanup:
 279
 280     /* Remove local reference to the object */
 281
 282     AcpiUtRemoveReference (ObjDesc);
 283     return_ACPI_STATUS (Status);
 284 }
 285
 286
 287 /*******************************************************************************
 288  *
 289  * FUNCTION:    AcpiDsGetFieldNames
 290  *
 291  * PARAMETERS:  Info            - CreateField info structure
 292  *  `           WalkState       - Current method state
 293  *              Arg             - First parser arg for the field name list
 294  *
 295  * RETURN:      Status
 296  *
 297  * DESCRIPTION: Process all named fields in a field declaration.  Names are
 298  *              entered into the namespace.
 299  *
 300  ******************************************************************************/
 301
 302 static ACPI_STATUS
 303 AcpiDsGetFieldNames (
 304     ACPI_CREATE_FIELD_INFO  *Info,
 305     ACPI_WALK_STATE         *WalkState,
 306     ACPI_PARSE_OBJECT       *Arg)
 307 {
 308     ACPI_STATUS             Status;
 309     ACPI_INTEGER            Position;
 310
 311
 312     ACPI_FUNCTION_TRACE_PTR (DsGetFieldNames, Info);
 313
 314
 315     /* First field starts at bit zero */
 316
 317     Info->FieldBitPosition = 0;
 318
 319     /* Process all elements in the field list (of parse nodes) */
 320
 321     while (Arg)
 322     {
 323         /*
 324          * Three types of field elements are handled:
 325          * 1) Offset - specifies a bit offset
 326          * 2) AccessAs - changes the access mode
 327          * 3) Name - Enters a new named field into the namespace
 328          */
 329         switch (Arg->Common.AmlOpcode)
 330         {
 331         case AML_INT_RESERVEDFIELD_OP:
 332
 333             Position = (ACPI_INTEGER) Info->FieldBitPosition
 334                         + (ACPI_INTEGER) Arg->Common.Value.Size;
 335
 336             if (Position > ACPI_UINT32_MAX)
 337             {
 338                 ACPI_ERROR ((AE_INFO,
 339                     "Bit offset within field too large (> 0xFFFFFFFF)"));
 340                 return_ACPI_STATUS (AE_SUPPORT);
 341             }
 342
 343             Info->FieldBitPosition = (UINT32) Position;
 344             break;
 345
 346
 347         case AML_INT_ACCESSFIELD_OP:
 348
 349             /*
 350              * Get a new AccessType and AccessAttribute -- to be used for all
 351              * field units that follow, until field end or another AccessAs
 352              * keyword.
 353              *
 354              * In FieldFlags, preserve the flag bits other than the
 355              * ACCESS_TYPE bits
 356              */
 357             Info->FieldFlags = (UINT8)
 358                 ((Info->FieldFlags & ~(AML_FIELD_ACCESS_TYPE_MASK)) |
 359                 ((UINT8) ((UINT32) Arg->Common.Value.Integer >> 8)));
 360
 361             Info->Attribute = (UINT8) (Arg->Common.Value.Integer);
 362             break;
 363
 364
 365         case AML_INT_NAMEDFIELD_OP:
 366
 367             /* Lookup the name */
 368
 369             Status = AcpiNsLookup (WalkState->ScopeInfo,
 370                             (char *) &Arg->Named.Name,
 371                             Info->FieldType, ACPI_IMODE_EXECUTE,
 372                             ACPI_NS_DONT_OPEN_SCOPE,
 373                             WalkState, &Info->FieldNode);
 374             if (ACPI_FAILURE (Status))
 375             {
 376                 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
 377                 if (Status != AE_ALREADY_EXISTS)
 378                 {
 379                     return_ACPI_STATUS (Status);
 380                 }
 381
 382                 /* Already exists, ignore error */
 383             }
 384             else
 385             {
 386                 Arg->Common.Node = Info->FieldNode;
 387                 Info->FieldBitLength = Arg->Common.Value.Size;
 388
 389                 /* Create and initialize an object for the new Field Node */
 390
 391                 Status = AcpiExPrepFieldValue (Info);
 392                 if (ACPI_FAILURE (Status))
 393                 {
 394                     return_ACPI_STATUS (Status);
 395                 }
 396             }
 397
 398             /* Keep track of bit position for the next field */
 399
 400             Position = (ACPI_INTEGER) Info->FieldBitPosition
 401                         + (ACPI_INTEGER) Arg->Common.Value.Size;
 402
 403             if (Position > ACPI_UINT32_MAX)
 404             {
 405                 ACPI_ERROR ((AE_INFO,
 406                     "Field [%4.4s] bit offset too large (> 0xFFFFFFFF)",
 407                     ACPI_CAST_PTR (char, &Info->FieldNode->Name)));
 408                 return_ACPI_STATUS (AE_SUPPORT);
 409             }
 410
 411             Info->FieldBitPosition += Info->FieldBitLength;
 412             break;
 413
 414
 415         default:
 416
 417             ACPI_ERROR ((AE_INFO,
 418                 "Invalid opcode in field list: %X",
 419                 Arg->Common.AmlOpcode));
 420             return_ACPI_STATUS (AE_AML_BAD_OPCODE);
 421         }
 422
 423         Arg = Arg->Common.Next;
 424     }
 425
 426     return_ACPI_STATUS (AE_OK);
 427 }
 428
 429
 430 /*******************************************************************************
 431  *
 432  * FUNCTION:    AcpiDsCreateField
 433  *
 434  * PARAMETERS:  Op              - Op containing the Field definition and args
 435  *              RegionNode      - Object for the containing Operation Region
 436  *  `           WalkState       - Current method state
 437  *
 438  * RETURN:      Status
 439  *
 440  * DESCRIPTION: Create a new field in the specified operation region
 441  *
 442  ******************************************************************************/
 443
 444 ACPI_STATUS
 445 AcpiDsCreateField (
 446     ACPI_PARSE_OBJECT       *Op,
 447     ACPI_NAMESPACE_NODE     *RegionNode,
 448     ACPI_WALK_STATE         *WalkState)
 449 {
 450     ACPI_STATUS             Status;
 451     ACPI_PARSE_OBJECT       *Arg;
 452     ACPI_CREATE_FIELD_INFO  Info;
 453
 454
 455     ACPI_FUNCTION_TRACE_PTR (DsCreateField, Op);
 456
 457
 458     /* First arg is the name of the parent OpRegion (must already exist) */
 459
 460     Arg = Op->Common.Value.Arg;
 461     if (!RegionNode)
 462     {
 463         Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
 464                         ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
 465                         ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
 466         if (ACPI_FAILURE (Status))
 467         {
 468             ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
 469             return_ACPI_STATUS (Status);
 470         }
 471     }
 472
 473     /* Second arg is the field flags */
 474
 475     Arg = Arg->Common.Next;
 476     Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
 477     Info.Attribute = 0;
 478
 479     /* Each remaining arg is a Named Field */
 480
 481     Info.FieldType = ACPI_TYPE_LOCAL_REGION_FIELD;
 482     Info.RegionNode = RegionNode;
 483
 484     Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
 485
 486     return_ACPI_STATUS (Status);
 487 }
 488
 489
 490 /*******************************************************************************
 491  *
 492  * FUNCTION:    AcpiDsInitFieldObjects
 493  *
 494  * PARAMETERS:  Op              - Op containing the Field definition and args
 495  *  `           WalkState       - Current method state
 496  *
 497  * RETURN:      Status
 498  *
 499  * DESCRIPTION: For each "Field Unit" name in the argument list that is
 500  *              part of the field declaration, enter the name into the
 501  *              namespace.
 502  *
 503  ******************************************************************************/
 504
 505 ACPI_STATUS
 506 AcpiDsInitFieldObjects (
 507     ACPI_PARSE_OBJECT       *Op,
 508     ACPI_WALK_STATE         *WalkState)
 509 {
 510     ACPI_STATUS             Status;
 511     ACPI_PARSE_OBJECT       *Arg = NULL;
 512     ACPI_NAMESPACE_NODE     *Node;
 513     UINT8                   Type = 0;
 514
 515
 516     ACPI_FUNCTION_TRACE_PTR (DsInitFieldObjects, Op);
 517
 518
 519     switch (WalkState->Opcode)
 520     {
 521     case AML_FIELD_OP:
 522         Arg = AcpiPsGetArg (Op, 2);
 523         Type = ACPI_TYPE_LOCAL_REGION_FIELD;
 524         break;
 525
 526     case AML_BANK_FIELD_OP:
 527         Arg = AcpiPsGetArg (Op, 4);
 528         Type = ACPI_TYPE_LOCAL_BANK_FIELD;
 529         break;
 530
 531     case AML_INDEX_FIELD_OP:
 532         Arg = AcpiPsGetArg (Op, 3);
 533         Type = ACPI_TYPE_LOCAL_INDEX_FIELD;
 534         break;
 535
 536     default:
 537         return_ACPI_STATUS (AE_BAD_PARAMETER);
 538     }
 539
 540     /*
 541      * Walk the list of entries in the FieldList
 542      */
 543     while (Arg)
 544     {
 545         /* Ignore OFFSET and ACCESSAS terms here */
 546
 547         if (Arg->Common.AmlOpcode == AML_INT_NAMEDFIELD_OP)
 548         {
 549             Status = AcpiNsLookup (WalkState->ScopeInfo,
 550                             (char *) &Arg->Named.Name,
 551                             Type, ACPI_IMODE_LOAD_PASS1,
 552                             ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
 553                             ACPI_NS_ERROR_IF_FOUND,
 554                             WalkState, &Node);
 555             if (ACPI_FAILURE (Status))
 556             {
 557                 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
 558                 if (Status != AE_ALREADY_EXISTS)
 559                 {
 560                     return_ACPI_STATUS (Status);
 561                 }
 562
 563                 /* Name already exists, just ignore this error */
 564
 565                 Status = AE_OK;
 566             }
 567
 568             Arg->Common.Node = Node;
 569         }
 570
 571         /* Move to next field in the list */
 572
 573         Arg = Arg->Common.Next;
 574     }
 575
 576     return_ACPI_STATUS (AE_OK);
 577 }
 578
 579
 580 /*******************************************************************************
 581  *
 582  * FUNCTION:    AcpiDsCreateBankField
 583  *
 584  * PARAMETERS:  Op              - Op containing the Field definition and args
 585  *              RegionNode      - Object for the containing Operation Region
 586  *  `           WalkState       - Current method state
 587  *
 588  * RETURN:      Status
 589  *
 590  * DESCRIPTION: Create a new bank field in the specified operation region
 591  *
 592  ******************************************************************************/
 593
 594 ACPI_STATUS
 595 AcpiDsCreateBankField (
 596     ACPI_PARSE_OBJECT       *Op,
 597     ACPI_NAMESPACE_NODE     *RegionNode,
 598     ACPI_WALK_STATE         *WalkState)
 599 {
 600     ACPI_STATUS             Status;
 601     ACPI_PARSE_OBJECT       *Arg;
 602     ACPI_CREATE_FIELD_INFO  Info;
 603
 604
 605     ACPI_FUNCTION_TRACE_PTR (DsCreateBankField, Op);
 606
 607
 608     /* First arg is the name of the parent OpRegion (must already exist) */
 609
 610     Arg = Op->Common.Value.Arg;
 611     if (!RegionNode)
 612     {
 613         Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
 614                         ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
 615                         ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
 616         if (ACPI_FAILURE (Status))
 617         {
 618             ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
 619             return_ACPI_STATUS (Status);
 620         }
 621     }
 622
 623     /* Second arg is the Bank Register (Field) (must already exist) */
 624
 625     Arg = Arg->Common.Next;
 626     Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
 627                     ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
 628                     ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
 629     if (ACPI_FAILURE (Status))
 630     {
 631         ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
 632         return_ACPI_STATUS (Status);
 633     }
 634
 635     /* Third arg is the BankValue */
 636
 637     /* TBD: This arg is a TermArg, not a constant, and must be evaluated */
 638
 639     Arg = Arg->Common.Next;
 640
 641     /* Currently, only the following constants are supported */
 642
 643     switch (Arg->Common.AmlOpcode)
 644     {
 645     case AML_ZERO_OP:
 646         Info.BankValue = 0;
 647         break;
 648
 649     case AML_ONE_OP:
 650         Info.BankValue = 1;
 651         break;
 652
 653     case AML_BYTE_OP:
 654     case AML_WORD_OP:
 655     case AML_DWORD_OP:
 656     case AML_QWORD_OP:
 657         Info.BankValue = (UINT32) Arg->Common.Value.Integer;
 658         break;
 659
 660     default:
 661         Info.BankValue = 0;
 662         ACPI_ERROR ((AE_INFO, "Non-constant BankValue for BankField is not implemented"));
 663     }
 664
 665     /* Fourth arg is the field flags */
 666
 667     Arg = Arg->Common.Next;
 668     Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
 669
 670     /* Each remaining arg is a Named Field */
 671
 672     Info.FieldType = ACPI_TYPE_LOCAL_BANK_FIELD;
 673     Info.RegionNode = RegionNode;
 674
 675     Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
 676
 677     return_ACPI_STATUS (Status);
 678 }
 679
 680
 681 /*******************************************************************************
 682  *
 683  * FUNCTION:    AcpiDsCreateIndexField
 684  *
 685  * PARAMETERS:  Op              - Op containing the Field definition and args
 686  *              RegionNode      - Object for the containing Operation Region
 687  *  `           WalkState       - Current method state
 688  *
 689  * RETURN:      Status
 690  *
 691  * DESCRIPTION: Create a new index field in the specified operation region
 692  *
 693  ******************************************************************************/
 694
 695 ACPI_STATUS
 696 AcpiDsCreateIndexField (
 697     ACPI_PARSE_OBJECT       *Op,
 698     ACPI_NAMESPACE_NODE     *RegionNode,
 699     ACPI_WALK_STATE         *WalkState)
 700 {
 701     ACPI_STATUS             Status;
 702     ACPI_PARSE_OBJECT       *Arg;
 703     ACPI_CREATE_FIELD_INFO  Info;
 704
 705
 706     ACPI_FUNCTION_TRACE_PTR (DsCreateIndexField, Op);
 707
 708
 709     /* First arg is the name of the Index register (must already exist) */
 710
 711     Arg = Op->Common.Value.Arg;
 712     Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
 713                     ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
 714                     ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
 715     if (ACPI_FAILURE (Status))
 716     {
 717         ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
 718         return_ACPI_STATUS (Status);
 719     }
 720
 721     /* Second arg is the data register (must already exist) */
 722
 723     Arg = Arg->Common.Next;
 724     Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
 725                     ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
 726                     ACPI_NS_SEARCH_PARENT, WalkState, &Info.DataRegisterNode);
 727     if (ACPI_FAILURE (Status))
 728     {
 729         ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
 730         return_ACPI_STATUS (Status);
 731     }
 732
 733     /* Next arg is the field flags */
 734
 735     Arg = Arg->Common.Next;
 736     Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
 737
 738     /* Each remaining arg is a Named Field */
 739
 740     Info.FieldType = ACPI_TYPE_LOCAL_INDEX_FIELD;
 741     Info.RegionNode = RegionNode;
 742
 743     Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
 744
 745     return_ACPI_STATUS (Status);
 746 }
 747
 748