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
132static ACPI_STATUS
133AcpiDsGetFieldNames (
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
158ACPI_STATUS
159AcpiDsCreateBufferField (
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
278Cleanup:
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
302static ACPI_STATUS
303AcpiDsGetFieldNames (
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
444ACPI_STATUS
445AcpiDsCreateField (
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
505ACPI_STATUS
506AcpiDsInitFieldObjects (
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
594ACPI_STATUS
595AcpiDsCreateBankField (
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
695ACPI_STATUS
696AcpiDsCreateIndexField (
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
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
132static ACPI_STATUS
133AcpiDsGetFieldNames (
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
158ACPI_STATUS
159AcpiDsCreateBufferField (
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
278Cleanup:
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
302static ACPI_STATUS
303AcpiDsGetFieldNames (
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
444ACPI_STATUS
445AcpiDsCreateField (
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
505ACPI_STATUS
506AcpiDsInitFieldObjects (
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
594ACPI_STATUS
595AcpiDsCreateBankField (
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
695ACPI_STATUS
696AcpiDsCreateIndexField (
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