xref: /haiku/src/add-ons/kernel/bus_managers/acpi/acpica/components/dispatcher/dsfield.c (revision 3c08adef21129761f27ae654a1c5d1705786691a)
1 /******************************************************************************
2  *
3  * Module Name: dsfield - Dispatcher field routines
4  *
5  *****************************************************************************/
6 
7 /******************************************************************************
8  *
9  * 1. Copyright Notice
10  *
11  * Some or all of this work - Copyright (c) 1999 - 2016, Intel Corp.
12  * All rights reserved.
13  *
14  * 2. License
15  *
16  * 2.1. This is your license from Intel Corp. under its intellectual property
17  * rights. You may have additional license terms from the party that provided
18  * you this software, covering your right to use that party's intellectual
19  * property rights.
20  *
21  * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22  * copy of the source code appearing in this file ("Covered Code") an
23  * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24  * base code distributed originally by Intel ("Original Intel Code") to copy,
25  * make derivatives, distribute, use and display any portion of the Covered
26  * Code in any form, with the right to sublicense such rights; and
27  *
28  * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29  * license (with the right to sublicense), under only those claims of Intel
30  * patents that are infringed by the Original Intel Code, to make, use, sell,
31  * offer to sell, and import the Covered Code and derivative works thereof
32  * solely to the minimum extent necessary to exercise the above copyright
33  * license, and in no event shall the patent license extend to any additions
34  * to or modifications of the Original Intel Code. No other license or right
35  * is granted directly or by implication, estoppel or otherwise;
36  *
37  * The above copyright and patent license is granted only if the following
38  * conditions are met:
39  *
40  * 3. Conditions
41  *
42  * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43  * Redistribution of source code of any substantial portion of the Covered
44  * Code or modification with rights to further distribute source must include
45  * the above Copyright Notice, the above License, this list of Conditions,
46  * and the following Disclaimer and Export Compliance provision. In addition,
47  * Licensee must cause all Covered Code to which Licensee contributes to
48  * contain a file documenting the changes Licensee made to create that Covered
49  * Code and the date of any change. Licensee must include in that file the
50  * documentation of any changes made by any predecessor Licensee. Licensee
51  * must include a prominent statement that the modification is derived,
52  * directly or indirectly, from Original Intel Code.
53  *
54  * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55  * Redistribution of source code of any substantial portion of the Covered
56  * Code or modification without rights to further distribute source must
57  * include the following Disclaimer and Export Compliance provision in the
58  * documentation and/or other materials provided with distribution. In
59  * addition, Licensee may not authorize further sublicense of source of any
60  * portion of the Covered Code, and must include terms to the effect that the
61  * license from Licensee to its licensee is limited to the intellectual
62  * property embodied in the software Licensee provides to its licensee, and
63  * not to intellectual property embodied in modifications its licensee may
64  * make.
65  *
66  * 3.3. Redistribution of Executable. Redistribution in executable form of any
67  * substantial portion of the Covered Code or modification must reproduce the
68  * above Copyright Notice, and the following Disclaimer and Export Compliance
69  * provision in the documentation and/or other materials provided with the
70  * distribution.
71  *
72  * 3.4. Intel retains all right, title, and interest in and to the Original
73  * Intel Code.
74  *
75  * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76  * Intel shall be used in advertising or otherwise to promote the sale, use or
77  * other dealings in products derived from or relating to the Covered Code
78  * without prior written authorization from Intel.
79  *
80  * 4. Disclaimer and Export Compliance
81  *
82  * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83  * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84  * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85  * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86  * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87  * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
88  * PARTICULAR PURPOSE.
89  *
90  * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91  * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92  * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93  * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94  * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95  * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96  * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
97  * LIMITED REMEDY.
98  *
99  * 4.3. Licensee shall not export, either directly or indirectly, any of this
100  * software or system incorporating such software without first obtaining any
101  * required license or other approval from the U. S. Department of Commerce or
102  * any other agency or department of the United States Government. In the
103  * event Licensee exports any such software from the United States or
104  * re-exports any such software from a foreign destination, Licensee shall
105  * ensure that the distribution and export/re-export of the software is in
106  * compliance with all laws, regulations, orders, or other restrictions of the
107  * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108  * any of its subsidiaries will export/re-export any technical data, process,
109  * software, or service, directly or indirectly, to any country for which the
110  * United States government or any agency thereof requires an export license,
111  * other governmental approval, or letter of assurance, without first obtaining
112  * such license, approval or letter.
113  *
114  *****************************************************************************/
115 
116 #include "acpi.h"
117 #include "accommon.h"
118 #include "amlcode.h"
119 #include "acdispat.h"
120 #include "acinterp.h"
121 #include "acnamesp.h"
122 #include "acparser.h"
123 
124 
125 #define _COMPONENT          ACPI_DISPATCHER
126         ACPI_MODULE_NAME    ("dsfield")
127 
128 /* Local prototypes */
129 
130 #ifdef ACPI_ASL_COMPILER
131 #include "acdisasm.h"
132 
133 static ACPI_STATUS
134 AcpiDsCreateExternalRegion (
135     ACPI_STATUS             LookupStatus,
136     ACPI_PARSE_OBJECT       *Op,
137     char                    *Path,
138     ACPI_WALK_STATE         *WalkState,
139     ACPI_NAMESPACE_NODE     **Node);
140 #endif
141 
142 static ACPI_STATUS
143 AcpiDsGetFieldNames (
144     ACPI_CREATE_FIELD_INFO  *Info,
145     ACPI_WALK_STATE         *WalkState,
146     ACPI_PARSE_OBJECT       *Arg);
147 
148 
149 #ifdef ACPI_ASL_COMPILER
150 /*******************************************************************************
151  *
152  * FUNCTION:    AcpiDsCreateExternalRegion (iASL Disassembler only)
153  *
154  * PARAMETERS:  LookupStatus    - Status from NsLookup operation
155  *              Op              - Op containing the Field definition and args
156  *              Path            - Pathname of the region
157  *  `           WalkState       - Current method state
158  *              Node            - Where the new region node is returned
159  *
160  * RETURN:      Status
161  *
162  * DESCRIPTION: Add region to the external list if NOT_FOUND. Create a new
163  *              region node/object.
164  *
165  ******************************************************************************/
166 
167 static ACPI_STATUS
168 AcpiDsCreateExternalRegion (
169     ACPI_STATUS             LookupStatus,
170     ACPI_PARSE_OBJECT       *Op,
171     char                    *Path,
172     ACPI_WALK_STATE         *WalkState,
173     ACPI_NAMESPACE_NODE     **Node)
174 {
175     ACPI_STATUS             Status;
176     ACPI_OPERAND_OBJECT     *ObjDesc;
177 
178 
179     if (LookupStatus != AE_NOT_FOUND)
180     {
181         return (LookupStatus);
182     }
183 
184     /*
185      * Table disassembly:
186      * OperationRegion not found. Generate an External for it, and
187      * insert the name into the namespace.
188      */
189     AcpiDmAddOpToExternalList (Op, Path, ACPI_TYPE_REGION, 0, 0);
190 
191     Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ACPI_TYPE_REGION,
192        ACPI_IMODE_LOAD_PASS1, ACPI_NS_SEARCH_PARENT, WalkState, Node);
193     if (ACPI_FAILURE (Status))
194     {
195         return (Status);
196     }
197 
198     /* Must create and install a region object for the new node */
199 
200     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_REGION);
201     if (!ObjDesc)
202     {
203         return (AE_NO_MEMORY);
204     }
205 
206     ObjDesc->Region.Node = *Node;
207     Status = AcpiNsAttachObject (*Node, ObjDesc, ACPI_TYPE_REGION);
208     return (Status);
209 }
210 #endif
211 
212 
213 /*******************************************************************************
214  *
215  * FUNCTION:    AcpiDsCreateBufferField
216  *
217  * PARAMETERS:  Op                  - Current parse op (CreateXXField)
218  *              WalkState           - Current state
219  *
220  * RETURN:      Status
221  *
222  * DESCRIPTION: Execute the CreateField operators:
223  *              CreateBitFieldOp,
224  *              CreateByteFieldOp,
225  *              CreateWordFieldOp,
226  *              CreateDwordFieldOp,
227  *              CreateQwordFieldOp,
228  *              CreateFieldOp       (all of which define a field in a buffer)
229  *
230  ******************************************************************************/
231 
232 ACPI_STATUS
233 AcpiDsCreateBufferField (
234     ACPI_PARSE_OBJECT       *Op,
235     ACPI_WALK_STATE         *WalkState)
236 {
237     ACPI_PARSE_OBJECT       *Arg;
238     ACPI_NAMESPACE_NODE     *Node;
239     ACPI_STATUS             Status;
240     ACPI_OPERAND_OBJECT     *ObjDesc;
241     ACPI_OPERAND_OBJECT     *SecondDesc = NULL;
242     UINT32                  Flags;
243 
244 
245     ACPI_FUNCTION_TRACE (DsCreateBufferField);
246 
247 
248     /*
249      * Get the NameString argument (name of the new BufferField)
250      */
251     if (Op->Common.AmlOpcode == AML_CREATE_FIELD_OP)
252     {
253         /* For CreateField, name is the 4th argument */
254 
255         Arg = AcpiPsGetArg (Op, 3);
256     }
257     else
258     {
259         /* For all other CreateXXXField operators, name is the 3rd argument */
260 
261         Arg = AcpiPsGetArg (Op, 2);
262     }
263 
264     if (!Arg)
265     {
266         return_ACPI_STATUS (AE_AML_NO_OPERAND);
267     }
268 
269     if (WalkState->DeferredNode)
270     {
271         Node = WalkState->DeferredNode;
272         Status = AE_OK;
273     }
274     else
275     {
276         /* Execute flag should always be set when this function is entered */
277 
278         if (!(WalkState->ParseFlags & ACPI_PARSE_EXECUTE))
279         {
280             return_ACPI_STATUS (AE_AML_INTERNAL);
281         }
282 
283         /* Creating new namespace node, should not already exist */
284 
285         Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
286             ACPI_NS_ERROR_IF_FOUND;
287 
288         /*
289          * Mark node temporary if we are executing a normal control
290          * method. (Don't mark if this is a module-level code method)
291          */
292         if (WalkState->MethodNode &&
293             !(WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL))
294         {
295             Flags |= ACPI_NS_TEMPORARY;
296         }
297 
298         /* Enter the NameString into the namespace */
299 
300         Status = AcpiNsLookup (WalkState->ScopeInfo,
301             Arg->Common.Value.String, ACPI_TYPE_ANY,
302             ACPI_IMODE_LOAD_PASS1, Flags, WalkState, &Node);
303         if (ACPI_FAILURE (Status))
304         {
305             ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
306             return_ACPI_STATUS (Status);
307         }
308     }
309 
310     /*
311      * We could put the returned object (Node) on the object stack for later,
312      * but for now, we will put it in the "op" object that the parser uses,
313      * so we can get it again at the end of this scope.
314      */
315     Op->Common.Node = Node;
316 
317     /*
318      * If there is no object attached to the node, this node was just created
319      * and we need to create the field object. Otherwise, this was a lookup
320      * of an existing node and we don't want to create the field object again.
321      */
322     ObjDesc = AcpiNsGetAttachedObject (Node);
323     if (ObjDesc)
324     {
325         return_ACPI_STATUS (AE_OK);
326     }
327 
328     /*
329      * The Field definition is not fully parsed at this time.
330      * (We must save the address of the AML for the buffer and index operands)
331      */
332 
333     /* Create the buffer field object */
334 
335     ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_BUFFER_FIELD);
336     if (!ObjDesc)
337     {
338         Status = AE_NO_MEMORY;
339         goto Cleanup;
340     }
341 
342     /*
343      * Remember location in AML stream of the field unit opcode and operands
344      * -- since the buffer and index operands must be evaluated.
345      */
346     SecondDesc = ObjDesc->Common.NextObject;
347     SecondDesc->Extra.AmlStart = Op->Named.Data;
348     SecondDesc->Extra.AmlLength = Op->Named.Length;
349     ObjDesc->BufferField.Node = Node;
350 
351     /* Attach constructed field descriptors to parent node */
352 
353     Status = AcpiNsAttachObject (Node, ObjDesc, ACPI_TYPE_BUFFER_FIELD);
354     if (ACPI_FAILURE (Status))
355     {
356         goto Cleanup;
357     }
358 
359 
360 Cleanup:
361 
362     /* Remove local reference to the object */
363 
364     AcpiUtRemoveReference (ObjDesc);
365     return_ACPI_STATUS (Status);
366 }
367 
368 
369 /*******************************************************************************
370  *
371  * FUNCTION:    AcpiDsGetFieldNames
372  *
373  * PARAMETERS:  Info            - CreateField info structure
374  *  `           WalkState       - Current method state
375  *              Arg             - First parser arg for the field name list
376  *
377  * RETURN:      Status
378  *
379  * DESCRIPTION: Process all named fields in a field declaration. Names are
380  *              entered into the namespace.
381  *
382  ******************************************************************************/
383 
384 static ACPI_STATUS
385 AcpiDsGetFieldNames (
386     ACPI_CREATE_FIELD_INFO  *Info,
387     ACPI_WALK_STATE         *WalkState,
388     ACPI_PARSE_OBJECT       *Arg)
389 {
390     ACPI_STATUS             Status;
391     UINT64                  Position;
392     ACPI_PARSE_OBJECT       *Child;
393 
394 
395     ACPI_FUNCTION_TRACE_PTR (DsGetFieldNames, Info);
396 
397 
398     /* First field starts at bit zero */
399 
400     Info->FieldBitPosition = 0;
401 
402     /* Process all elements in the field list (of parse nodes) */
403 
404     while (Arg)
405     {
406         /*
407          * Four types of field elements are handled:
408          * 1) Name - Enters a new named field into the namespace
409          * 2) Offset - specifies a bit offset
410          * 3) AccessAs - changes the access mode/attributes
411          * 4) Connection - Associate a resource template with the field
412          */
413         switch (Arg->Common.AmlOpcode)
414         {
415         case AML_INT_RESERVEDFIELD_OP:
416 
417             Position = (UINT64) Info->FieldBitPosition +
418                 (UINT64) Arg->Common.Value.Size;
419 
420             if (Position > ACPI_UINT32_MAX)
421             {
422                 ACPI_ERROR ((AE_INFO,
423                     "Bit offset within field too large (> 0xFFFFFFFF)"));
424                 return_ACPI_STATUS (AE_SUPPORT);
425             }
426 
427             Info->FieldBitPosition = (UINT32) Position;
428             break;
429 
430         case AML_INT_ACCESSFIELD_OP:
431         case AML_INT_EXTACCESSFIELD_OP:
432             /*
433              * Get new AccessType, AccessAttribute, and AccessLength fields
434              * -- to be used for all field units that follow, until the
435              * end-of-field or another AccessAs keyword is encountered.
436              * NOTE. These three bytes are encoded in the integer value
437              * of the parseop for convenience.
438              *
439              * In FieldFlags, preserve the flag bits other than the
440              * ACCESS_TYPE bits.
441              */
442 
443             /* AccessType (ByteAcc, WordAcc, etc.) */
444 
445             Info->FieldFlags = (UINT8)
446                 ((Info->FieldFlags & ~(AML_FIELD_ACCESS_TYPE_MASK)) |
447                 ((UINT8) ((UINT32) (Arg->Common.Value.Integer & 0x07))));
448 
449             /* AccessAttribute (AttribQuick, AttribByte, etc.) */
450 
451             Info->Attribute = (UINT8)
452                 ((Arg->Common.Value.Integer >> 8) & 0xFF);
453 
454             /* AccessLength (for serial/buffer protocols) */
455 
456             Info->AccessLength = (UINT8)
457                 ((Arg->Common.Value.Integer >> 16) & 0xFF);
458             break;
459 
460         case AML_INT_CONNECTION_OP:
461             /*
462              * Clear any previous connection. New connection is used for all
463              * fields that follow, similar to AccessAs
464              */
465             Info->ResourceBuffer = NULL;
466             Info->ConnectionNode = NULL;
467             Info->PinNumberIndex = 0;
468 
469             /*
470              * A Connection() is either an actual resource descriptor (buffer)
471              * or a named reference to a resource template
472              */
473             Child = Arg->Common.Value.Arg;
474             if (Child->Common.AmlOpcode == AML_INT_BYTELIST_OP)
475             {
476                 Info->ResourceBuffer = Child->Named.Data;
477                 Info->ResourceLength = (UINT16) Child->Named.Value.Integer;
478             }
479             else
480             {
481                 /* Lookup the Connection() namepath, it should already exist */
482 
483                 Status = AcpiNsLookup (WalkState->ScopeInfo,
484                     Child->Common.Value.Name, ACPI_TYPE_ANY,
485                     ACPI_IMODE_EXECUTE, ACPI_NS_DONT_OPEN_SCOPE,
486                     WalkState, &Info->ConnectionNode);
487                 if (ACPI_FAILURE (Status))
488                 {
489                     ACPI_ERROR_NAMESPACE (Child->Common.Value.Name, Status);
490                     return_ACPI_STATUS (Status);
491                 }
492             }
493             break;
494 
495         case AML_INT_NAMEDFIELD_OP:
496 
497             /* Lookup the name, it should already exist */
498 
499             Status = AcpiNsLookup (WalkState->ScopeInfo,
500                 (char *) &Arg->Named.Name, Info->FieldType,
501                 ACPI_IMODE_EXECUTE, ACPI_NS_DONT_OPEN_SCOPE,
502                 WalkState, &Info->FieldNode);
503             if (ACPI_FAILURE (Status))
504             {
505                 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
506                 return_ACPI_STATUS (Status);
507             }
508             else
509             {
510                 Arg->Common.Node = Info->FieldNode;
511                 Info->FieldBitLength = Arg->Common.Value.Size;
512 
513                 /*
514                  * If there is no object attached to the node, this node was
515                  * just created and we need to create the field object.
516                  * Otherwise, this was a lookup of an existing node and we
517                  * don't want to create the field object again.
518                  */
519                 if (!AcpiNsGetAttachedObject (Info->FieldNode))
520                 {
521                     Status = AcpiExPrepFieldValue (Info);
522                     if (ACPI_FAILURE (Status))
523                     {
524                         return_ACPI_STATUS (Status);
525                     }
526                 }
527             }
528 
529             /* Keep track of bit position for the next field */
530 
531             Position = (UINT64) Info->FieldBitPosition +
532                 (UINT64) Arg->Common.Value.Size;
533 
534             if (Position > ACPI_UINT32_MAX)
535             {
536                 ACPI_ERROR ((AE_INFO,
537                     "Field [%4.4s] bit offset too large (> 0xFFFFFFFF)",
538                     ACPI_CAST_PTR (char, &Info->FieldNode->Name)));
539                 return_ACPI_STATUS (AE_SUPPORT);
540             }
541 
542             Info->FieldBitPosition += Info->FieldBitLength;
543             Info->PinNumberIndex++; /* Index relative to previous Connection() */
544             break;
545 
546         default:
547 
548             ACPI_ERROR ((AE_INFO,
549                 "Invalid opcode in field list: 0x%X",
550                 Arg->Common.AmlOpcode));
551             return_ACPI_STATUS (AE_AML_BAD_OPCODE);
552         }
553 
554         Arg = Arg->Common.Next;
555     }
556 
557     return_ACPI_STATUS (AE_OK);
558 }
559 
560 
561 /*******************************************************************************
562  *
563  * FUNCTION:    AcpiDsCreateField
564  *
565  * PARAMETERS:  Op              - Op containing the Field definition and args
566  *              RegionNode      - Object for the containing Operation Region
567  *  `           WalkState       - Current method state
568  *
569  * RETURN:      Status
570  *
571  * DESCRIPTION: Create a new field in the specified operation region
572  *
573  ******************************************************************************/
574 
575 ACPI_STATUS
576 AcpiDsCreateField (
577     ACPI_PARSE_OBJECT       *Op,
578     ACPI_NAMESPACE_NODE     *RegionNode,
579     ACPI_WALK_STATE         *WalkState)
580 {
581     ACPI_STATUS             Status;
582     ACPI_PARSE_OBJECT       *Arg;
583     ACPI_CREATE_FIELD_INFO  Info;
584 
585 
586     ACPI_FUNCTION_TRACE_PTR (DsCreateField, Op);
587 
588 
589     /* First arg is the name of the parent OpRegion (must already exist) */
590 
591     Arg = Op->Common.Value.Arg;
592 
593     if (!RegionNode)
594     {
595         Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
596             ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
597             ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
598 #ifdef ACPI_ASL_COMPILER
599         Status = AcpiDsCreateExternalRegion (Status, Arg,
600             Arg->Common.Value.Name, WalkState, &RegionNode);
601 #endif
602         if (ACPI_FAILURE (Status))
603         {
604             ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
605             return_ACPI_STATUS (Status);
606         }
607     }
608 
609     memset (&Info, 0, sizeof (ACPI_CREATE_FIELD_INFO));
610 
611     /* Second arg is the field flags */
612 
613     Arg = Arg->Common.Next;
614     Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
615     Info.Attribute = 0;
616 
617     /* Each remaining arg is a Named Field */
618 
619     Info.FieldType = ACPI_TYPE_LOCAL_REGION_FIELD;
620     Info.RegionNode = RegionNode;
621 
622     Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
623     return_ACPI_STATUS (Status);
624 }
625 
626 
627 /*******************************************************************************
628  *
629  * FUNCTION:    AcpiDsInitFieldObjects
630  *
631  * PARAMETERS:  Op              - Op containing the Field definition and args
632  *  `           WalkState       - Current method state
633  *
634  * RETURN:      Status
635  *
636  * DESCRIPTION: For each "Field Unit" name in the argument list that is
637  *              part of the field declaration, enter the name into the
638  *              namespace.
639  *
640  ******************************************************************************/
641 
642 ACPI_STATUS
643 AcpiDsInitFieldObjects (
644     ACPI_PARSE_OBJECT       *Op,
645     ACPI_WALK_STATE         *WalkState)
646 {
647     ACPI_STATUS             Status;
648     ACPI_PARSE_OBJECT       *Arg = NULL;
649     ACPI_NAMESPACE_NODE     *Node;
650     UINT8                   Type = 0;
651     UINT32                  Flags;
652 
653 
654     ACPI_FUNCTION_TRACE_PTR (DsInitFieldObjects, Op);
655 
656 
657     /* Execute flag should always be set when this function is entered */
658 
659     if (!(WalkState->ParseFlags & ACPI_PARSE_EXECUTE))
660     {
661         if (WalkState->ParseFlags & ACPI_PARSE_DEFERRED_OP)
662         {
663             /* BankField Op is deferred, just return OK */
664 
665             return_ACPI_STATUS (AE_OK);
666         }
667 
668         return_ACPI_STATUS (AE_AML_INTERNAL);
669     }
670 
671     /*
672      * Get the FieldList argument for this opcode. This is the start of the
673      * list of field elements.
674      */
675     switch (WalkState->Opcode)
676     {
677     case AML_FIELD_OP:
678 
679         Arg = AcpiPsGetArg (Op, 2);
680         Type = ACPI_TYPE_LOCAL_REGION_FIELD;
681         break;
682 
683     case AML_BANK_FIELD_OP:
684 
685         Arg = AcpiPsGetArg (Op, 4);
686         Type = ACPI_TYPE_LOCAL_BANK_FIELD;
687         break;
688 
689     case AML_INDEX_FIELD_OP:
690 
691         Arg = AcpiPsGetArg (Op, 3);
692         Type = ACPI_TYPE_LOCAL_INDEX_FIELD;
693         break;
694 
695     default:
696 
697         return_ACPI_STATUS (AE_BAD_PARAMETER);
698     }
699 
700     /* Creating new namespace node(s), should not already exist */
701 
702     Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
703         ACPI_NS_ERROR_IF_FOUND;
704 
705     /*
706      * Mark node(s) temporary if we are executing a normal control
707      * method. (Don't mark if this is a module-level code method)
708      */
709     if (WalkState->MethodNode &&
710         !(WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL))
711     {
712         Flags |= ACPI_NS_TEMPORARY;
713     }
714 
715     /*
716      * Walk the list of entries in the FieldList
717      * Note: FieldList can be of zero length. In this case, Arg will be NULL.
718      */
719     while (Arg)
720     {
721         /*
722          * Ignore OFFSET/ACCESSAS/CONNECTION terms here; we are only interested
723          * in the field names in order to enter them into the namespace.
724          */
725         if (Arg->Common.AmlOpcode == AML_INT_NAMEDFIELD_OP)
726         {
727             Status = AcpiNsLookup (WalkState->ScopeInfo,
728                 (char *) &Arg->Named.Name, Type, ACPI_IMODE_LOAD_PASS1,
729                 Flags, WalkState, &Node);
730             if (ACPI_FAILURE (Status))
731             {
732                 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
733                 if (Status != AE_ALREADY_EXISTS)
734                 {
735                     return_ACPI_STATUS (Status);
736                 }
737 
738                 /* Name already exists, just ignore this error */
739 
740                 Status = AE_OK;
741             }
742 
743             Arg->Common.Node = Node;
744         }
745 
746         /* Get the next field element in the list */
747 
748         Arg = Arg->Common.Next;
749     }
750 
751     return_ACPI_STATUS (AE_OK);
752 }
753 
754 
755 /*******************************************************************************
756  *
757  * FUNCTION:    AcpiDsCreateBankField
758  *
759  * PARAMETERS:  Op              - Op containing the Field definition and args
760  *              RegionNode      - Object for the containing Operation Region
761  *              WalkState       - Current method state
762  *
763  * RETURN:      Status
764  *
765  * DESCRIPTION: Create a new bank field in the specified operation region
766  *
767  ******************************************************************************/
768 
769 ACPI_STATUS
770 AcpiDsCreateBankField (
771     ACPI_PARSE_OBJECT       *Op,
772     ACPI_NAMESPACE_NODE     *RegionNode,
773     ACPI_WALK_STATE         *WalkState)
774 {
775     ACPI_STATUS             Status;
776     ACPI_PARSE_OBJECT       *Arg;
777     ACPI_CREATE_FIELD_INFO  Info;
778 
779 
780     ACPI_FUNCTION_TRACE_PTR (DsCreateBankField, Op);
781 
782 
783     /* First arg is the name of the parent OpRegion (must already exist) */
784 
785     Arg = Op->Common.Value.Arg;
786     if (!RegionNode)
787     {
788         Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
789             ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
790             ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
791 #ifdef ACPI_ASL_COMPILER
792         Status = AcpiDsCreateExternalRegion (Status, Arg,
793             Arg->Common.Value.Name, WalkState, &RegionNode);
794 #endif
795         if (ACPI_FAILURE (Status))
796         {
797             ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
798             return_ACPI_STATUS (Status);
799         }
800     }
801 
802     /* Second arg is the Bank Register (Field) (must already exist) */
803 
804     Arg = Arg->Common.Next;
805     Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
806         ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
807         ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
808     if (ACPI_FAILURE (Status))
809     {
810         ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
811         return_ACPI_STATUS (Status);
812     }
813 
814     /*
815      * Third arg is the BankValue
816      * This arg is a TermArg, not a constant
817      * It will be evaluated later, by AcpiDsEvalBankFieldOperands
818      */
819     Arg = Arg->Common.Next;
820 
821     /* Fourth arg is the field flags */
822 
823     Arg = Arg->Common.Next;
824     Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
825 
826     /* Each remaining arg is a Named Field */
827 
828     Info.FieldType = ACPI_TYPE_LOCAL_BANK_FIELD;
829     Info.RegionNode = RegionNode;
830 
831     /*
832      * Use Info.DataRegisterNode to store BankField Op
833      * It's safe because DataRegisterNode will never be used when create
834      * bank field \we store AmlStart and AmlLength in the BankField Op for
835      * late evaluation. Used in AcpiExPrepFieldValue(Info)
836      *
837      * TBD: Or, should we add a field in ACPI_CREATE_FIELD_INFO, like
838      * "void *ParentOp"?
839      */
840     Info.DataRegisterNode = (ACPI_NAMESPACE_NODE*) Op;
841 
842     Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
843     return_ACPI_STATUS (Status);
844 }
845 
846 
847 /*******************************************************************************
848  *
849  * FUNCTION:    AcpiDsCreateIndexField
850  *
851  * PARAMETERS:  Op              - Op containing the Field definition and args
852  *              RegionNode      - Object for the containing Operation Region
853  *  `           WalkState       - Current method state
854  *
855  * RETURN:      Status
856  *
857  * DESCRIPTION: Create a new index field in the specified operation region
858  *
859  ******************************************************************************/
860 
861 ACPI_STATUS
862 AcpiDsCreateIndexField (
863     ACPI_PARSE_OBJECT       *Op,
864     ACPI_NAMESPACE_NODE     *RegionNode,
865     ACPI_WALK_STATE         *WalkState)
866 {
867     ACPI_STATUS             Status;
868     ACPI_PARSE_OBJECT       *Arg;
869     ACPI_CREATE_FIELD_INFO  Info;
870 
871 
872     ACPI_FUNCTION_TRACE_PTR (DsCreateIndexField, Op);
873 
874 
875     /* First arg is the name of the Index register (must already exist) */
876 
877     Arg = Op->Common.Value.Arg;
878     Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
879         ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
880         ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
881     if (ACPI_FAILURE (Status))
882     {
883         ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
884         return_ACPI_STATUS (Status);
885     }
886 
887     /* Second arg is the data register (must already exist) */
888 
889     Arg = Arg->Common.Next;
890     Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
891         ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
892         ACPI_NS_SEARCH_PARENT, WalkState, &Info.DataRegisterNode);
893     if (ACPI_FAILURE (Status))
894     {
895         ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
896         return_ACPI_STATUS (Status);
897     }
898 
899     /* Next arg is the field flags */
900 
901     Arg = Arg->Common.Next;
902     Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
903 
904     /* Each remaining arg is a Named Field */
905 
906     Info.FieldType = ACPI_TYPE_LOCAL_INDEX_FIELD;
907     Info.RegionNode = RegionNode;
908 
909     Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
910     return_ACPI_STATUS (Status);
911 }
912