1/******************************************************************************
2 *
3 * Module Name: dsfield - Dispatcher field routines
4 *
5 *****************************************************************************/
6
7/*
8 * Copyright (C) 2000 - 2012, Intel Corp.
9 * All rights reserved.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions, and the following disclaimer,
16 * without modification.
17 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18 * substantially similar to the "NO WARRANTY" disclaimer below
19 * ("Disclaimer") and any redistribution must be conditioned upon
20 * including a substantially similar Disclaimer requirement for further
21 * binary redistribution.
22 * 3. Neither the names of the above-listed copyright holders nor the names
23 * of any contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * Alternatively, this software may be distributed under the terms of the
27 * GNU General Public License ("GPL") version 2 as published by the Free
28 * Software Foundation.
29 *
30 * NO WARRANTY
31 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 * POSSIBILITY OF SUCH DAMAGES.
42 */
43
44#define __DSFIELD_C__
45
46#include <contrib/dev/acpica/include/acpi.h>
47#include <contrib/dev/acpica/include/accommon.h>
48#include <contrib/dev/acpica/include/amlcode.h>
49#include <contrib/dev/acpica/include/acdispat.h>
50#include <contrib/dev/acpica/include/acinterp.h>
51#include <contrib/dev/acpica/include/acnamesp.h>
52#include <contrib/dev/acpica/include/acparser.h>
53
54
55#define _COMPONENT ACPI_DISPATCHER
56 ACPI_MODULE_NAME ("dsfield")
57
58/* Local prototypes */
59
60#ifdef ACPI_ASL_COMPILER
61#include <contrib/dev/acpica/include/acdisasm.h>
62
63static ACPI_STATUS
64AcpiDsCreateExternalRegion (
65 ACPI_STATUS LookupStatus,
66 ACPI_PARSE_OBJECT *Op,
67 char *Path,
68 ACPI_WALK_STATE *WalkState,
69 ACPI_NAMESPACE_NODE **Node);
70#endif
71
72static ACPI_STATUS
73AcpiDsGetFieldNames (
74 ACPI_CREATE_FIELD_INFO *Info,
75 ACPI_WALK_STATE *WalkState,
76 ACPI_PARSE_OBJECT *Arg);
77
78
79#ifdef ACPI_ASL_COMPILER
80/*******************************************************************************
81 *
82 * FUNCTION: AcpiDsCreateExternalRegion (iASL Disassembler only)
83 *
84 * PARAMETERS: LookupStatus - Status from NsLookup operation
85 * Op - Op containing the Field definition and args
86 * Path - Pathname of the region
87 * ` WalkState - Current method state
88 * Node - Where the new region node is returned
89 *
90 * RETURN: Status
91 *
92 * DESCRIPTION: Add region to the external list if NOT_FOUND. Create a new
93 * region node/object.
94 *
95 ******************************************************************************/
96
97static ACPI_STATUS
98AcpiDsCreateExternalRegion (
99 ACPI_STATUS LookupStatus,
100 ACPI_PARSE_OBJECT *Op,
101 char *Path,
102 ACPI_WALK_STATE *WalkState,
103 ACPI_NAMESPACE_NODE **Node)
104{
105 ACPI_STATUS Status;
106 ACPI_OPERAND_OBJECT *ObjDesc;
107
108
109 if (LookupStatus != AE_NOT_FOUND)
110 {
111 return (LookupStatus);
112 }
113
114 /*
115 * Table disassembly:
116 * OperationRegion not found. Generate an External for it, and
117 * insert the name into the namespace.
118 */
119 AcpiDmAddToExternalList (Op, Path, ACPI_TYPE_REGION, 0);
120 Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ACPI_TYPE_REGION,
121 ACPI_IMODE_LOAD_PASS1, ACPI_NS_SEARCH_PARENT, WalkState, Node);
122 if (ACPI_FAILURE (Status))
123 {
124 return (Status);
125 }
126
127 /* Must create and install a region object for the new node */
128
129 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_REGION);
130 if (!ObjDesc)
131 {
132 return (AE_NO_MEMORY);
133 }
134
135 ObjDesc->Region.Node = *Node;
136 Status = AcpiNsAttachObject (*Node, ObjDesc, ACPI_TYPE_REGION);
137 return (Status);
138}
139#endif
140
141
142/*******************************************************************************
143 *
144 * FUNCTION: AcpiDsCreateBufferField
145 *
146 * PARAMETERS: Op - Current parse op (CreateXXField)
147 * WalkState - Current state
148 *
149 * RETURN: Status
150 *
151 * DESCRIPTION: Execute the CreateField operators:
152 * CreateBitFieldOp,
153 * CreateByteFieldOp,
154 * CreateWordFieldOp,
155 * CreateDWordFieldOp,
156 * CreateQWordFieldOp,
157 * CreateFieldOp (all of which define a field in a buffer)
158 *
159 ******************************************************************************/
160
161ACPI_STATUS
162AcpiDsCreateBufferField (
163 ACPI_PARSE_OBJECT *Op,
164 ACPI_WALK_STATE *WalkState)
165{
166 ACPI_PARSE_OBJECT *Arg;
167 ACPI_NAMESPACE_NODE *Node;
168 ACPI_STATUS Status;
169 ACPI_OPERAND_OBJECT *ObjDesc;
170 ACPI_OPERAND_OBJECT *SecondDesc = NULL;
171 UINT32 Flags;
172
173
174 ACPI_FUNCTION_TRACE (DsCreateBufferField);
175
176
177 /*
178 * Get the NameString argument (name of the new BufferField)
179 */
180 if (Op->Common.AmlOpcode == AML_CREATE_FIELD_OP)
181 {
182 /* For CreateField, name is the 4th argument */
183
184 Arg = AcpiPsGetArg (Op, 3);
185 }
186 else
187 {
188 /* For all other CreateXXXField operators, name is the 3rd argument */
189
190 Arg = AcpiPsGetArg (Op, 2);
191 }
192
193 if (!Arg)
194 {
195 return_ACPI_STATUS (AE_AML_NO_OPERAND);
196 }
197
198 if (WalkState->DeferredNode)
199 {
200 Node = WalkState->DeferredNode;
201 Status = AE_OK;
202 }
203 else
204 {
205 /* Execute flag should always be set when this function is entered */
206
207 if (!(WalkState->ParseFlags & ACPI_PARSE_EXECUTE))
208 {
209 return_ACPI_STATUS (AE_AML_INTERNAL);
210 }
211
212 /* Creating new namespace node, should not already exist */
213
214 Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
215 ACPI_NS_ERROR_IF_FOUND;
216
217 /*
218 * Mark node temporary if we are executing a normal control
219 * method. (Don't mark if this is a module-level code method)
220 */
221 if (WalkState->MethodNode &&
222 !(WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL))
223 {
224 Flags |= ACPI_NS_TEMPORARY;
225 }
226
227 /* Enter the NameString into the namespace */
228
229 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
230 ACPI_TYPE_ANY, ACPI_IMODE_LOAD_PASS1,
231 Flags, WalkState, &Node);
232 if (ACPI_FAILURE (Status))
233 {
234 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
235 return_ACPI_STATUS (Status);
236 }
237 }
238
239 /*
240 * We could put the returned object (Node) on the object stack for later,
241 * but for now, we will put it in the "op" object that the parser uses,
242 * so we can get it again at the end of this scope.
243 */
244 Op->Common.Node = Node;
245
246 /*
247 * If there is no object attached to the node, this node was just created
248 * and we need to create the field object. Otherwise, this was a lookup
249 * of an existing node and we don't want to create the field object again.
250 */
251 ObjDesc = AcpiNsGetAttachedObject (Node);
252 if (ObjDesc)
253 {
254 return_ACPI_STATUS (AE_OK);
255 }
256
257 /*
258 * The Field definition is not fully parsed at this time.
259 * (We must save the address of the AML for the buffer and index operands)
260 */
261
262 /* Create the buffer field object */
263
264 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_BUFFER_FIELD);
265 if (!ObjDesc)
266 {
267 Status = AE_NO_MEMORY;
268 goto Cleanup;
269 }
270
271 /*
272 * Remember location in AML stream of the field unit opcode and operands --
273 * since the buffer and index operands must be evaluated.
274 */
275 SecondDesc = ObjDesc->Common.NextObject;
276 SecondDesc->Extra.AmlStart = Op->Named.Data;
277 SecondDesc->Extra.AmlLength = Op->Named.Length;
278 ObjDesc->BufferField.Node = Node;
279
280 /* Attach constructed field descriptors to parent node */
281
282 Status = AcpiNsAttachObject (Node, ObjDesc, ACPI_TYPE_BUFFER_FIELD);
283 if (ACPI_FAILURE (Status))
284 {
285 goto Cleanup;
286 }
287
288
289Cleanup:
290
291 /* Remove local reference to the object */
292
293 AcpiUtRemoveReference (ObjDesc);
294 return_ACPI_STATUS (Status);
295}
296
297
298/*******************************************************************************
299 *
300 * FUNCTION: AcpiDsGetFieldNames
301 *
302 * PARAMETERS: Info - CreateField info structure
303 * ` WalkState - Current method state
304 * Arg - First parser arg for the field name list
305 *
306 * RETURN: Status
307 *
308 * DESCRIPTION: Process all named fields in a field declaration. Names are
309 * entered into the namespace.
310 *
311 ******************************************************************************/
312
313static ACPI_STATUS
314AcpiDsGetFieldNames (
315 ACPI_CREATE_FIELD_INFO *Info,
316 ACPI_WALK_STATE *WalkState,
317 ACPI_PARSE_OBJECT *Arg)
318{
319 ACPI_STATUS Status;
320 UINT64 Position;
321 ACPI_PARSE_OBJECT *Child;
322
323
324 ACPI_FUNCTION_TRACE_PTR (DsGetFieldNames, Info);
325
326
327 /* First field starts at bit zero */
328
329 Info->FieldBitPosition = 0;
330
331 /* Process all elements in the field list (of parse nodes) */
332
333 while (Arg)
334 {
335 /*
336 * Four types of field elements are handled:
337 * 1) Name - Enters a new named field into the namespace
338 * 2) Offset - specifies a bit offset
339 * 3) AccessAs - changes the access mode/attributes
340 * 4) Connection - Associate a resource template with the field
341 */
342 switch (Arg->Common.AmlOpcode)
343 {
344 case AML_INT_RESERVEDFIELD_OP:
345
346 Position = (UINT64) Info->FieldBitPosition
347 + (UINT64) Arg->Common.Value.Size;
348
349 if (Position > ACPI_UINT32_MAX)
350 {
351 ACPI_ERROR ((AE_INFO,
352 "Bit offset within field too large (> 0xFFFFFFFF)"));
353 return_ACPI_STATUS (AE_SUPPORT);
354 }
355
356 Info->FieldBitPosition = (UINT32) Position;
357 break;
358
359 case AML_INT_ACCESSFIELD_OP:
360 case AML_INT_EXTACCESSFIELD_OP:
361 /*
362 * Get new AccessType, AccessAttribute, and AccessLength fields
363 * -- to be used for all field units that follow, until the
364 * end-of-field or another AccessAs keyword is encountered.
365 * NOTE. These three bytes are encoded in the integer value
366 * of the parseop for convenience.
367 *
368 * In FieldFlags, preserve the flag bits other than the
369 * ACCESS_TYPE bits.
370 */
371
372 /* AccessType (ByteAcc, WordAcc, etc.) */
373
374 Info->FieldFlags = (UINT8)
375 ((Info->FieldFlags & ~(AML_FIELD_ACCESS_TYPE_MASK)) |
376 ((UINT8) ((UINT32) (Arg->Common.Value.Integer & 0x07))));
377
378 /* AccessAttribute (AttribQuick, AttribByte, etc.) */
379
380 Info->Attribute = (UINT8) ((Arg->Common.Value.Integer >> 8) & 0xFF);
381
382 /* AccessLength (for serial/buffer protocols) */
383
384 Info->AccessLength = (UINT8) ((Arg->Common.Value.Integer >> 16) & 0xFF);
385 break;
386
387 case AML_INT_CONNECTION_OP:
388 /*
389 * Clear any previous connection. New connection is used for all
390 * fields that follow, similar to AccessAs
391 */
392 Info->ResourceBuffer = NULL;
393 Info->ConnectionNode = NULL;
394
395 /*
396 * A Connection() is either an actual resource descriptor (buffer)
397 * or a named reference to a resource template
398 */
399 Child = Arg->Common.Value.Arg;
400 if (Child->Common.AmlOpcode == AML_INT_BYTELIST_OP)
401 {
402 Info->ResourceBuffer = Child->Named.Data;
403 Info->ResourceLength = (UINT16) Child->Named.Value.Integer;
404 }
405 else
406 {
407 /* Lookup the Connection() namepath, it should already exist */
408
409 Status = AcpiNsLookup (WalkState->ScopeInfo,
410 Child->Common.Value.Name, ACPI_TYPE_ANY,
411 ACPI_IMODE_EXECUTE, ACPI_NS_DONT_OPEN_SCOPE,
412 WalkState, &Info->ConnectionNode);
413 if (ACPI_FAILURE (Status))
414 {
415 ACPI_ERROR_NAMESPACE (Child->Common.Value.Name, Status);
416 return_ACPI_STATUS (Status);
417 }
418 }
419 break;
420
421 case AML_INT_NAMEDFIELD_OP:
422
423 /* Lookup the name, it should already exist */
424
425 Status = AcpiNsLookup (WalkState->ScopeInfo,
426 (char *) &Arg->Named.Name, Info->FieldType,
427 ACPI_IMODE_EXECUTE, ACPI_NS_DONT_OPEN_SCOPE,
428 WalkState, &Info->FieldNode);
429 if (ACPI_FAILURE (Status))
430 {
431 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
432 return_ACPI_STATUS (Status);
433 }
434 else
435 {
436 Arg->Common.Node = Info->FieldNode;
437 Info->FieldBitLength = Arg->Common.Value.Size;
438
439 /*
440 * If there is no object attached to the node, this node was
441 * just created and we need to create the field object.
442 * Otherwise, this was a lookup of an existing node and we
443 * don't want to create the field object again.
444 */
445 if (!AcpiNsGetAttachedObject (Info->FieldNode))
446 {
447 Status = AcpiExPrepFieldValue (Info);
448 if (ACPI_FAILURE (Status))
449 {
450 return_ACPI_STATUS (Status);
451 }
452 }
453 }
454
455 /* Keep track of bit position for the next field */
456
457 Position = (UINT64) Info->FieldBitPosition
458 + (UINT64) Arg->Common.Value.Size;
459
460 if (Position > ACPI_UINT32_MAX)
461 {
462 ACPI_ERROR ((AE_INFO,
463 "Field [%4.4s] bit offset too large (> 0xFFFFFFFF)",
464 ACPI_CAST_PTR (char, &Info->FieldNode->Name)));
465 return_ACPI_STATUS (AE_SUPPORT);
466 }
467
468 Info->FieldBitPosition += Info->FieldBitLength;
469 break;
470
471 default:
472
473 ACPI_ERROR ((AE_INFO,
474 "Invalid opcode in field list: 0x%X", Arg->Common.AmlOpcode));
475 return_ACPI_STATUS (AE_AML_BAD_OPCODE);
476 }
477
478 Arg = Arg->Common.Next;
479 }
480
481 return_ACPI_STATUS (AE_OK);
482}
483
484
485/*******************************************************************************
486 *
487 * FUNCTION: AcpiDsCreateField
488 *
489 * PARAMETERS: Op - Op containing the Field definition and args
490 * RegionNode - Object for the containing Operation Region
491 * ` WalkState - Current method state
492 *
493 * RETURN: Status
494 *
495 * DESCRIPTION: Create a new field in the specified operation region
496 *
497 ******************************************************************************/
498
499ACPI_STATUS
500AcpiDsCreateField (
501 ACPI_PARSE_OBJECT *Op,
502 ACPI_NAMESPACE_NODE *RegionNode,
503 ACPI_WALK_STATE *WalkState)
504{
505 ACPI_STATUS Status;
506 ACPI_PARSE_OBJECT *Arg;
507 ACPI_CREATE_FIELD_INFO Info;
508
509
510 ACPI_FUNCTION_TRACE_PTR (DsCreateField, Op);
511
512
513 /* First arg is the name of the parent OpRegion (must already exist) */
514
515 Arg = Op->Common.Value.Arg;
516
517 if (!RegionNode)
518 {
519 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
520 ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
521 ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
522#ifdef ACPI_ASL_COMPILER
523 Status = AcpiDsCreateExternalRegion (Status, Arg,
524 Arg->Common.Value.Name, WalkState, &RegionNode);
525#endif
526 if (ACPI_FAILURE (Status))
527 {
528 ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
529 return_ACPI_STATUS (Status);
530 }
531 }
532
533 ACPI_MEMSET (&Info, 0, sizeof (ACPI_CREATE_FIELD_INFO));
534
535 /* Second arg is the field flags */
536
537 Arg = Arg->Common.Next;
538 Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
539 Info.Attribute = 0;
540
541 /* Each remaining arg is a Named Field */
542
543 Info.FieldType = ACPI_TYPE_LOCAL_REGION_FIELD;
544 Info.RegionNode = RegionNode;
545
546 Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
547 return_ACPI_STATUS (Status);
548}
549
550
551/*******************************************************************************
552 *
553 * FUNCTION: AcpiDsInitFieldObjects
554 *
555 * PARAMETERS: Op - Op containing the Field definition and args
556 * ` WalkState - Current method state
557 *
558 * RETURN: Status
559 *
560 * DESCRIPTION: For each "Field Unit" name in the argument list that is
561 * part of the field declaration, enter the name into the
562 * namespace.
563 *
564 ******************************************************************************/
565
566ACPI_STATUS
567AcpiDsInitFieldObjects (
568 ACPI_PARSE_OBJECT *Op,
569 ACPI_WALK_STATE *WalkState)
570{
571 ACPI_STATUS Status;
572 ACPI_PARSE_OBJECT *Arg = NULL;
573 ACPI_NAMESPACE_NODE *Node;
574 UINT8 Type = 0;
575 UINT32 Flags;
576
577
578 ACPI_FUNCTION_TRACE_PTR (DsInitFieldObjects, Op);
579
580
581 /* Execute flag should always be set when this function is entered */
582
583 if (!(WalkState->ParseFlags & ACPI_PARSE_EXECUTE))
584 {
585 if (WalkState->ParseFlags & ACPI_PARSE_DEFERRED_OP)
586 {
587 /* BankField Op is deferred, just return OK */
588
589 return_ACPI_STATUS (AE_OK);
590 }
591
592 return_ACPI_STATUS (AE_AML_INTERNAL);
593 }
594
595 /*
596 * Get the FieldList argument for this opcode. This is the start of the
597 * list of field elements.
598 */
599 switch (WalkState->Opcode)
600 {
601 case AML_FIELD_OP:
602 Arg = AcpiPsGetArg (Op, 2);
603 Type = ACPI_TYPE_LOCAL_REGION_FIELD;
604 break;
605
606 case AML_BANK_FIELD_OP:
607 Arg = AcpiPsGetArg (Op, 4);
608 Type = ACPI_TYPE_LOCAL_BANK_FIELD;
609 break;
610
611 case AML_INDEX_FIELD_OP:
612 Arg = AcpiPsGetArg (Op, 3);
613 Type = ACPI_TYPE_LOCAL_INDEX_FIELD;
614 break;
615
616 default:
617 return_ACPI_STATUS (AE_BAD_PARAMETER);
618 }
619
620 /* Creating new namespace node(s), should not already exist */
621
622 Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
623 ACPI_NS_ERROR_IF_FOUND;
624
625 /*
626 * Mark node(s) temporary if we are executing a normal control
627 * method. (Don't mark if this is a module-level code method)
628 */
629 if (WalkState->MethodNode &&
630 !(WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL))
631 {
632 Flags |= ACPI_NS_TEMPORARY;
633 }
634
635 /*
636 * Walk the list of entries in the FieldList
637 * Note: FieldList can be of zero length. In this case, Arg will be NULL.
638 */
639 while (Arg)
640 {
641 /*
642 * Ignore OFFSET/ACCESSAS/CONNECTION terms here; we are only interested
643 * in the field names in order to enter them into the namespace.
644 */
645 if (Arg->Common.AmlOpcode == AML_INT_NAMEDFIELD_OP)
646 {
647 Status = AcpiNsLookup (WalkState->ScopeInfo,
648 (char *) &Arg->Named.Name, Type, ACPI_IMODE_LOAD_PASS1,
649 Flags, WalkState, &Node);
650 if (ACPI_FAILURE (Status))
651 {
652 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
653 if (Status != AE_ALREADY_EXISTS)
654 {
655 return_ACPI_STATUS (Status);
656 }
657
658 /* Name already exists, just ignore this error */
659
660 Status = AE_OK;
661 }
662
663 Arg->Common.Node = Node;
664 }
665
666 /* Get the next field element in the list */
667
668 Arg = Arg->Common.Next;
669 }
670
671 return_ACPI_STATUS (AE_OK);
672}
673
674
675/*******************************************************************************
676 *
677 * FUNCTION: AcpiDsCreateBankField
678 *
679 * PARAMETERS: Op - Op containing the Field definition and args
680 * RegionNode - Object for the containing Operation Region
681 * WalkState - Current method state
682 *
683 * RETURN: Status
684 *
685 * DESCRIPTION: Create a new bank field in the specified operation region
686 *
687 ******************************************************************************/
688
689ACPI_STATUS
690AcpiDsCreateBankField (
691 ACPI_PARSE_OBJECT *Op,
692 ACPI_NAMESPACE_NODE *RegionNode,
693 ACPI_WALK_STATE *WalkState)
694{
695 ACPI_STATUS Status;
696 ACPI_PARSE_OBJECT *Arg;
697 ACPI_CREATE_FIELD_INFO Info;
698
699
700 ACPI_FUNCTION_TRACE_PTR (DsCreateBankField, Op);
701
702
703 /* First arg is the name of the parent OpRegion (must already exist) */
704
705 Arg = Op->Common.Value.Arg;
706 if (!RegionNode)
707 {
708 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
709 ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
710 ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
711#ifdef ACPI_ASL_COMPILER
712 Status = AcpiDsCreateExternalRegion (Status, Arg,
713 Arg->Common.Value.Name, WalkState, &RegionNode);
714#endif
715 if (ACPI_FAILURE (Status))
716 {
717 ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
718 return_ACPI_STATUS (Status);
719 }
720 }
721
722 /* Second arg is the Bank Register (Field) (must already exist) */
723
724 Arg = Arg->Common.Next;
725 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
726 ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
727 ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
728 if (ACPI_FAILURE (Status))
729 {
730 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
731 return_ACPI_STATUS (Status);
732 }
733
734 /*
735 * Third arg is the BankValue
736 * This arg is a TermArg, not a constant
737 * It will be evaluated later, by AcpiDsEvalBankFieldOperands
738 */
739 Arg = Arg->Common.Next;
740
741 /* Fourth arg is the field flags */
742
743 Arg = Arg->Common.Next;
744 Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
745
746 /* Each remaining arg is a Named Field */
747
748 Info.FieldType = ACPI_TYPE_LOCAL_BANK_FIELD;
749 Info.RegionNode = RegionNode;
750
751 /*
752 * Use Info.DataRegisterNode to store BankField Op
753 * It's safe because DataRegisterNode will never be used when create bank field
754 * We store AmlStart and AmlLength in the BankField Op for late evaluation
755 * Used in AcpiExPrepFieldValue(Info)
756 *
757 * TBD: Or, should we add a field in ACPI_CREATE_FIELD_INFO, like "void *ParentOp"?
758 */
759 Info.DataRegisterNode = (ACPI_NAMESPACE_NODE*) Op;
760
761 Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
762 return_ACPI_STATUS (Status);
763}
764
765
766/*******************************************************************************
767 *
768 * FUNCTION: AcpiDsCreateIndexField
769 *
770 * PARAMETERS: Op - Op containing the Field definition and args
771 * RegionNode - Object for the containing Operation Region
772 * ` WalkState - Current method state
773 *
774 * RETURN: Status
775 *
776 * DESCRIPTION: Create a new index field in the specified operation region
777 *
778 ******************************************************************************/
779
780ACPI_STATUS
781AcpiDsCreateIndexField (
782 ACPI_PARSE_OBJECT *Op,
783 ACPI_NAMESPACE_NODE *RegionNode,
784 ACPI_WALK_STATE *WalkState)
785{
786 ACPI_STATUS Status;
787 ACPI_PARSE_OBJECT *Arg;
788 ACPI_CREATE_FIELD_INFO Info;
789
790
791 ACPI_FUNCTION_TRACE_PTR (DsCreateIndexField, Op);
792
793
794 /* First arg is the name of the Index register (must already exist) */
795
796 Arg = Op->Common.Value.Arg;
797 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
798 ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
799 ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
800 if (ACPI_FAILURE (Status))
801 {
802 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
803 return_ACPI_STATUS (Status);
804 }
805
806 /* Second arg is the data register (must already exist) */
807
808 Arg = Arg->Common.Next;
809 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
810 ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
811 ACPI_NS_SEARCH_PARENT, WalkState, &Info.DataRegisterNode);
812 if (ACPI_FAILURE (Status))
813 {
814 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
815 return_ACPI_STATUS (Status);
816 }
817
818 /* Next arg is the field flags */
819
820 Arg = Arg->Common.Next;
821 Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
822
823 /* Each remaining arg is a Named Field */
824
825 Info.FieldType = ACPI_TYPE_LOCAL_INDEX_FIELD;
826 Info.RegionNode = RegionNode;
827
828 Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
829 return_ACPI_STATUS (Status);
830}
831
832
2 *
3 * Module Name: dsfield - Dispatcher field routines
4 *
5 *****************************************************************************/
6
7/*
8 * Copyright (C) 2000 - 2012, Intel Corp.
9 * All rights reserved.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions, and the following disclaimer,
16 * without modification.
17 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18 * substantially similar to the "NO WARRANTY" disclaimer below
19 * ("Disclaimer") and any redistribution must be conditioned upon
20 * including a substantially similar Disclaimer requirement for further
21 * binary redistribution.
22 * 3. Neither the names of the above-listed copyright holders nor the names
23 * of any contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * Alternatively, this software may be distributed under the terms of the
27 * GNU General Public License ("GPL") version 2 as published by the Free
28 * Software Foundation.
29 *
30 * NO WARRANTY
31 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35 * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41 * POSSIBILITY OF SUCH DAMAGES.
42 */
43
44#define __DSFIELD_C__
45
46#include <contrib/dev/acpica/include/acpi.h>
47#include <contrib/dev/acpica/include/accommon.h>
48#include <contrib/dev/acpica/include/amlcode.h>
49#include <contrib/dev/acpica/include/acdispat.h>
50#include <contrib/dev/acpica/include/acinterp.h>
51#include <contrib/dev/acpica/include/acnamesp.h>
52#include <contrib/dev/acpica/include/acparser.h>
53
54
55#define _COMPONENT ACPI_DISPATCHER
56 ACPI_MODULE_NAME ("dsfield")
57
58/* Local prototypes */
59
60#ifdef ACPI_ASL_COMPILER
61#include <contrib/dev/acpica/include/acdisasm.h>
62
63static ACPI_STATUS
64AcpiDsCreateExternalRegion (
65 ACPI_STATUS LookupStatus,
66 ACPI_PARSE_OBJECT *Op,
67 char *Path,
68 ACPI_WALK_STATE *WalkState,
69 ACPI_NAMESPACE_NODE **Node);
70#endif
71
72static ACPI_STATUS
73AcpiDsGetFieldNames (
74 ACPI_CREATE_FIELD_INFO *Info,
75 ACPI_WALK_STATE *WalkState,
76 ACPI_PARSE_OBJECT *Arg);
77
78
79#ifdef ACPI_ASL_COMPILER
80/*******************************************************************************
81 *
82 * FUNCTION: AcpiDsCreateExternalRegion (iASL Disassembler only)
83 *
84 * PARAMETERS: LookupStatus - Status from NsLookup operation
85 * Op - Op containing the Field definition and args
86 * Path - Pathname of the region
87 * ` WalkState - Current method state
88 * Node - Where the new region node is returned
89 *
90 * RETURN: Status
91 *
92 * DESCRIPTION: Add region to the external list if NOT_FOUND. Create a new
93 * region node/object.
94 *
95 ******************************************************************************/
96
97static ACPI_STATUS
98AcpiDsCreateExternalRegion (
99 ACPI_STATUS LookupStatus,
100 ACPI_PARSE_OBJECT *Op,
101 char *Path,
102 ACPI_WALK_STATE *WalkState,
103 ACPI_NAMESPACE_NODE **Node)
104{
105 ACPI_STATUS Status;
106 ACPI_OPERAND_OBJECT *ObjDesc;
107
108
109 if (LookupStatus != AE_NOT_FOUND)
110 {
111 return (LookupStatus);
112 }
113
114 /*
115 * Table disassembly:
116 * OperationRegion not found. Generate an External for it, and
117 * insert the name into the namespace.
118 */
119 AcpiDmAddToExternalList (Op, Path, ACPI_TYPE_REGION, 0);
120 Status = AcpiNsLookup (WalkState->ScopeInfo, Path, ACPI_TYPE_REGION,
121 ACPI_IMODE_LOAD_PASS1, ACPI_NS_SEARCH_PARENT, WalkState, Node);
122 if (ACPI_FAILURE (Status))
123 {
124 return (Status);
125 }
126
127 /* Must create and install a region object for the new node */
128
129 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_REGION);
130 if (!ObjDesc)
131 {
132 return (AE_NO_MEMORY);
133 }
134
135 ObjDesc->Region.Node = *Node;
136 Status = AcpiNsAttachObject (*Node, ObjDesc, ACPI_TYPE_REGION);
137 return (Status);
138}
139#endif
140
141
142/*******************************************************************************
143 *
144 * FUNCTION: AcpiDsCreateBufferField
145 *
146 * PARAMETERS: Op - Current parse op (CreateXXField)
147 * WalkState - Current state
148 *
149 * RETURN: Status
150 *
151 * DESCRIPTION: Execute the CreateField operators:
152 * CreateBitFieldOp,
153 * CreateByteFieldOp,
154 * CreateWordFieldOp,
155 * CreateDWordFieldOp,
156 * CreateQWordFieldOp,
157 * CreateFieldOp (all of which define a field in a buffer)
158 *
159 ******************************************************************************/
160
161ACPI_STATUS
162AcpiDsCreateBufferField (
163 ACPI_PARSE_OBJECT *Op,
164 ACPI_WALK_STATE *WalkState)
165{
166 ACPI_PARSE_OBJECT *Arg;
167 ACPI_NAMESPACE_NODE *Node;
168 ACPI_STATUS Status;
169 ACPI_OPERAND_OBJECT *ObjDesc;
170 ACPI_OPERAND_OBJECT *SecondDesc = NULL;
171 UINT32 Flags;
172
173
174 ACPI_FUNCTION_TRACE (DsCreateBufferField);
175
176
177 /*
178 * Get the NameString argument (name of the new BufferField)
179 */
180 if (Op->Common.AmlOpcode == AML_CREATE_FIELD_OP)
181 {
182 /* For CreateField, name is the 4th argument */
183
184 Arg = AcpiPsGetArg (Op, 3);
185 }
186 else
187 {
188 /* For all other CreateXXXField operators, name is the 3rd argument */
189
190 Arg = AcpiPsGetArg (Op, 2);
191 }
192
193 if (!Arg)
194 {
195 return_ACPI_STATUS (AE_AML_NO_OPERAND);
196 }
197
198 if (WalkState->DeferredNode)
199 {
200 Node = WalkState->DeferredNode;
201 Status = AE_OK;
202 }
203 else
204 {
205 /* Execute flag should always be set when this function is entered */
206
207 if (!(WalkState->ParseFlags & ACPI_PARSE_EXECUTE))
208 {
209 return_ACPI_STATUS (AE_AML_INTERNAL);
210 }
211
212 /* Creating new namespace node, should not already exist */
213
214 Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
215 ACPI_NS_ERROR_IF_FOUND;
216
217 /*
218 * Mark node temporary if we are executing a normal control
219 * method. (Don't mark if this is a module-level code method)
220 */
221 if (WalkState->MethodNode &&
222 !(WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL))
223 {
224 Flags |= ACPI_NS_TEMPORARY;
225 }
226
227 /* Enter the NameString into the namespace */
228
229 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
230 ACPI_TYPE_ANY, ACPI_IMODE_LOAD_PASS1,
231 Flags, WalkState, &Node);
232 if (ACPI_FAILURE (Status))
233 {
234 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
235 return_ACPI_STATUS (Status);
236 }
237 }
238
239 /*
240 * We could put the returned object (Node) on the object stack for later,
241 * but for now, we will put it in the "op" object that the parser uses,
242 * so we can get it again at the end of this scope.
243 */
244 Op->Common.Node = Node;
245
246 /*
247 * If there is no object attached to the node, this node was just created
248 * and we need to create the field object. Otherwise, this was a lookup
249 * of an existing node and we don't want to create the field object again.
250 */
251 ObjDesc = AcpiNsGetAttachedObject (Node);
252 if (ObjDesc)
253 {
254 return_ACPI_STATUS (AE_OK);
255 }
256
257 /*
258 * The Field definition is not fully parsed at this time.
259 * (We must save the address of the AML for the buffer and index operands)
260 */
261
262 /* Create the buffer field object */
263
264 ObjDesc = AcpiUtCreateInternalObject (ACPI_TYPE_BUFFER_FIELD);
265 if (!ObjDesc)
266 {
267 Status = AE_NO_MEMORY;
268 goto Cleanup;
269 }
270
271 /*
272 * Remember location in AML stream of the field unit opcode and operands --
273 * since the buffer and index operands must be evaluated.
274 */
275 SecondDesc = ObjDesc->Common.NextObject;
276 SecondDesc->Extra.AmlStart = Op->Named.Data;
277 SecondDesc->Extra.AmlLength = Op->Named.Length;
278 ObjDesc->BufferField.Node = Node;
279
280 /* Attach constructed field descriptors to parent node */
281
282 Status = AcpiNsAttachObject (Node, ObjDesc, ACPI_TYPE_BUFFER_FIELD);
283 if (ACPI_FAILURE (Status))
284 {
285 goto Cleanup;
286 }
287
288
289Cleanup:
290
291 /* Remove local reference to the object */
292
293 AcpiUtRemoveReference (ObjDesc);
294 return_ACPI_STATUS (Status);
295}
296
297
298/*******************************************************************************
299 *
300 * FUNCTION: AcpiDsGetFieldNames
301 *
302 * PARAMETERS: Info - CreateField info structure
303 * ` WalkState - Current method state
304 * Arg - First parser arg for the field name list
305 *
306 * RETURN: Status
307 *
308 * DESCRIPTION: Process all named fields in a field declaration. Names are
309 * entered into the namespace.
310 *
311 ******************************************************************************/
312
313static ACPI_STATUS
314AcpiDsGetFieldNames (
315 ACPI_CREATE_FIELD_INFO *Info,
316 ACPI_WALK_STATE *WalkState,
317 ACPI_PARSE_OBJECT *Arg)
318{
319 ACPI_STATUS Status;
320 UINT64 Position;
321 ACPI_PARSE_OBJECT *Child;
322
323
324 ACPI_FUNCTION_TRACE_PTR (DsGetFieldNames, Info);
325
326
327 /* First field starts at bit zero */
328
329 Info->FieldBitPosition = 0;
330
331 /* Process all elements in the field list (of parse nodes) */
332
333 while (Arg)
334 {
335 /*
336 * Four types of field elements are handled:
337 * 1) Name - Enters a new named field into the namespace
338 * 2) Offset - specifies a bit offset
339 * 3) AccessAs - changes the access mode/attributes
340 * 4) Connection - Associate a resource template with the field
341 */
342 switch (Arg->Common.AmlOpcode)
343 {
344 case AML_INT_RESERVEDFIELD_OP:
345
346 Position = (UINT64) Info->FieldBitPosition
347 + (UINT64) Arg->Common.Value.Size;
348
349 if (Position > ACPI_UINT32_MAX)
350 {
351 ACPI_ERROR ((AE_INFO,
352 "Bit offset within field too large (> 0xFFFFFFFF)"));
353 return_ACPI_STATUS (AE_SUPPORT);
354 }
355
356 Info->FieldBitPosition = (UINT32) Position;
357 break;
358
359 case AML_INT_ACCESSFIELD_OP:
360 case AML_INT_EXTACCESSFIELD_OP:
361 /*
362 * Get new AccessType, AccessAttribute, and AccessLength fields
363 * -- to be used for all field units that follow, until the
364 * end-of-field or another AccessAs keyword is encountered.
365 * NOTE. These three bytes are encoded in the integer value
366 * of the parseop for convenience.
367 *
368 * In FieldFlags, preserve the flag bits other than the
369 * ACCESS_TYPE bits.
370 */
371
372 /* AccessType (ByteAcc, WordAcc, etc.) */
373
374 Info->FieldFlags = (UINT8)
375 ((Info->FieldFlags & ~(AML_FIELD_ACCESS_TYPE_MASK)) |
376 ((UINT8) ((UINT32) (Arg->Common.Value.Integer & 0x07))));
377
378 /* AccessAttribute (AttribQuick, AttribByte, etc.) */
379
380 Info->Attribute = (UINT8) ((Arg->Common.Value.Integer >> 8) & 0xFF);
381
382 /* AccessLength (for serial/buffer protocols) */
383
384 Info->AccessLength = (UINT8) ((Arg->Common.Value.Integer >> 16) & 0xFF);
385 break;
386
387 case AML_INT_CONNECTION_OP:
388 /*
389 * Clear any previous connection. New connection is used for all
390 * fields that follow, similar to AccessAs
391 */
392 Info->ResourceBuffer = NULL;
393 Info->ConnectionNode = NULL;
394
395 /*
396 * A Connection() is either an actual resource descriptor (buffer)
397 * or a named reference to a resource template
398 */
399 Child = Arg->Common.Value.Arg;
400 if (Child->Common.AmlOpcode == AML_INT_BYTELIST_OP)
401 {
402 Info->ResourceBuffer = Child->Named.Data;
403 Info->ResourceLength = (UINT16) Child->Named.Value.Integer;
404 }
405 else
406 {
407 /* Lookup the Connection() namepath, it should already exist */
408
409 Status = AcpiNsLookup (WalkState->ScopeInfo,
410 Child->Common.Value.Name, ACPI_TYPE_ANY,
411 ACPI_IMODE_EXECUTE, ACPI_NS_DONT_OPEN_SCOPE,
412 WalkState, &Info->ConnectionNode);
413 if (ACPI_FAILURE (Status))
414 {
415 ACPI_ERROR_NAMESPACE (Child->Common.Value.Name, Status);
416 return_ACPI_STATUS (Status);
417 }
418 }
419 break;
420
421 case AML_INT_NAMEDFIELD_OP:
422
423 /* Lookup the name, it should already exist */
424
425 Status = AcpiNsLookup (WalkState->ScopeInfo,
426 (char *) &Arg->Named.Name, Info->FieldType,
427 ACPI_IMODE_EXECUTE, ACPI_NS_DONT_OPEN_SCOPE,
428 WalkState, &Info->FieldNode);
429 if (ACPI_FAILURE (Status))
430 {
431 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
432 return_ACPI_STATUS (Status);
433 }
434 else
435 {
436 Arg->Common.Node = Info->FieldNode;
437 Info->FieldBitLength = Arg->Common.Value.Size;
438
439 /*
440 * If there is no object attached to the node, this node was
441 * just created and we need to create the field object.
442 * Otherwise, this was a lookup of an existing node and we
443 * don't want to create the field object again.
444 */
445 if (!AcpiNsGetAttachedObject (Info->FieldNode))
446 {
447 Status = AcpiExPrepFieldValue (Info);
448 if (ACPI_FAILURE (Status))
449 {
450 return_ACPI_STATUS (Status);
451 }
452 }
453 }
454
455 /* Keep track of bit position for the next field */
456
457 Position = (UINT64) Info->FieldBitPosition
458 + (UINT64) Arg->Common.Value.Size;
459
460 if (Position > ACPI_UINT32_MAX)
461 {
462 ACPI_ERROR ((AE_INFO,
463 "Field [%4.4s] bit offset too large (> 0xFFFFFFFF)",
464 ACPI_CAST_PTR (char, &Info->FieldNode->Name)));
465 return_ACPI_STATUS (AE_SUPPORT);
466 }
467
468 Info->FieldBitPosition += Info->FieldBitLength;
469 break;
470
471 default:
472
473 ACPI_ERROR ((AE_INFO,
474 "Invalid opcode in field list: 0x%X", Arg->Common.AmlOpcode));
475 return_ACPI_STATUS (AE_AML_BAD_OPCODE);
476 }
477
478 Arg = Arg->Common.Next;
479 }
480
481 return_ACPI_STATUS (AE_OK);
482}
483
484
485/*******************************************************************************
486 *
487 * FUNCTION: AcpiDsCreateField
488 *
489 * PARAMETERS: Op - Op containing the Field definition and args
490 * RegionNode - Object for the containing Operation Region
491 * ` WalkState - Current method state
492 *
493 * RETURN: Status
494 *
495 * DESCRIPTION: Create a new field in the specified operation region
496 *
497 ******************************************************************************/
498
499ACPI_STATUS
500AcpiDsCreateField (
501 ACPI_PARSE_OBJECT *Op,
502 ACPI_NAMESPACE_NODE *RegionNode,
503 ACPI_WALK_STATE *WalkState)
504{
505 ACPI_STATUS Status;
506 ACPI_PARSE_OBJECT *Arg;
507 ACPI_CREATE_FIELD_INFO Info;
508
509
510 ACPI_FUNCTION_TRACE_PTR (DsCreateField, Op);
511
512
513 /* First arg is the name of the parent OpRegion (must already exist) */
514
515 Arg = Op->Common.Value.Arg;
516
517 if (!RegionNode)
518 {
519 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
520 ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
521 ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
522#ifdef ACPI_ASL_COMPILER
523 Status = AcpiDsCreateExternalRegion (Status, Arg,
524 Arg->Common.Value.Name, WalkState, &RegionNode);
525#endif
526 if (ACPI_FAILURE (Status))
527 {
528 ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
529 return_ACPI_STATUS (Status);
530 }
531 }
532
533 ACPI_MEMSET (&Info, 0, sizeof (ACPI_CREATE_FIELD_INFO));
534
535 /* Second arg is the field flags */
536
537 Arg = Arg->Common.Next;
538 Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
539 Info.Attribute = 0;
540
541 /* Each remaining arg is a Named Field */
542
543 Info.FieldType = ACPI_TYPE_LOCAL_REGION_FIELD;
544 Info.RegionNode = RegionNode;
545
546 Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
547 return_ACPI_STATUS (Status);
548}
549
550
551/*******************************************************************************
552 *
553 * FUNCTION: AcpiDsInitFieldObjects
554 *
555 * PARAMETERS: Op - Op containing the Field definition and args
556 * ` WalkState - Current method state
557 *
558 * RETURN: Status
559 *
560 * DESCRIPTION: For each "Field Unit" name in the argument list that is
561 * part of the field declaration, enter the name into the
562 * namespace.
563 *
564 ******************************************************************************/
565
566ACPI_STATUS
567AcpiDsInitFieldObjects (
568 ACPI_PARSE_OBJECT *Op,
569 ACPI_WALK_STATE *WalkState)
570{
571 ACPI_STATUS Status;
572 ACPI_PARSE_OBJECT *Arg = NULL;
573 ACPI_NAMESPACE_NODE *Node;
574 UINT8 Type = 0;
575 UINT32 Flags;
576
577
578 ACPI_FUNCTION_TRACE_PTR (DsInitFieldObjects, Op);
579
580
581 /* Execute flag should always be set when this function is entered */
582
583 if (!(WalkState->ParseFlags & ACPI_PARSE_EXECUTE))
584 {
585 if (WalkState->ParseFlags & ACPI_PARSE_DEFERRED_OP)
586 {
587 /* BankField Op is deferred, just return OK */
588
589 return_ACPI_STATUS (AE_OK);
590 }
591
592 return_ACPI_STATUS (AE_AML_INTERNAL);
593 }
594
595 /*
596 * Get the FieldList argument for this opcode. This is the start of the
597 * list of field elements.
598 */
599 switch (WalkState->Opcode)
600 {
601 case AML_FIELD_OP:
602 Arg = AcpiPsGetArg (Op, 2);
603 Type = ACPI_TYPE_LOCAL_REGION_FIELD;
604 break;
605
606 case AML_BANK_FIELD_OP:
607 Arg = AcpiPsGetArg (Op, 4);
608 Type = ACPI_TYPE_LOCAL_BANK_FIELD;
609 break;
610
611 case AML_INDEX_FIELD_OP:
612 Arg = AcpiPsGetArg (Op, 3);
613 Type = ACPI_TYPE_LOCAL_INDEX_FIELD;
614 break;
615
616 default:
617 return_ACPI_STATUS (AE_BAD_PARAMETER);
618 }
619
620 /* Creating new namespace node(s), should not already exist */
621
622 Flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
623 ACPI_NS_ERROR_IF_FOUND;
624
625 /*
626 * Mark node(s) temporary if we are executing a normal control
627 * method. (Don't mark if this is a module-level code method)
628 */
629 if (WalkState->MethodNode &&
630 !(WalkState->ParseFlags & ACPI_PARSE_MODULE_LEVEL))
631 {
632 Flags |= ACPI_NS_TEMPORARY;
633 }
634
635 /*
636 * Walk the list of entries in the FieldList
637 * Note: FieldList can be of zero length. In this case, Arg will be NULL.
638 */
639 while (Arg)
640 {
641 /*
642 * Ignore OFFSET/ACCESSAS/CONNECTION terms here; we are only interested
643 * in the field names in order to enter them into the namespace.
644 */
645 if (Arg->Common.AmlOpcode == AML_INT_NAMEDFIELD_OP)
646 {
647 Status = AcpiNsLookup (WalkState->ScopeInfo,
648 (char *) &Arg->Named.Name, Type, ACPI_IMODE_LOAD_PASS1,
649 Flags, WalkState, &Node);
650 if (ACPI_FAILURE (Status))
651 {
652 ACPI_ERROR_NAMESPACE ((char *) &Arg->Named.Name, Status);
653 if (Status != AE_ALREADY_EXISTS)
654 {
655 return_ACPI_STATUS (Status);
656 }
657
658 /* Name already exists, just ignore this error */
659
660 Status = AE_OK;
661 }
662
663 Arg->Common.Node = Node;
664 }
665
666 /* Get the next field element in the list */
667
668 Arg = Arg->Common.Next;
669 }
670
671 return_ACPI_STATUS (AE_OK);
672}
673
674
675/*******************************************************************************
676 *
677 * FUNCTION: AcpiDsCreateBankField
678 *
679 * PARAMETERS: Op - Op containing the Field definition and args
680 * RegionNode - Object for the containing Operation Region
681 * WalkState - Current method state
682 *
683 * RETURN: Status
684 *
685 * DESCRIPTION: Create a new bank field in the specified operation region
686 *
687 ******************************************************************************/
688
689ACPI_STATUS
690AcpiDsCreateBankField (
691 ACPI_PARSE_OBJECT *Op,
692 ACPI_NAMESPACE_NODE *RegionNode,
693 ACPI_WALK_STATE *WalkState)
694{
695 ACPI_STATUS Status;
696 ACPI_PARSE_OBJECT *Arg;
697 ACPI_CREATE_FIELD_INFO Info;
698
699
700 ACPI_FUNCTION_TRACE_PTR (DsCreateBankField, Op);
701
702
703 /* First arg is the name of the parent OpRegion (must already exist) */
704
705 Arg = Op->Common.Value.Arg;
706 if (!RegionNode)
707 {
708 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.Name,
709 ACPI_TYPE_REGION, ACPI_IMODE_EXECUTE,
710 ACPI_NS_SEARCH_PARENT, WalkState, &RegionNode);
711#ifdef ACPI_ASL_COMPILER
712 Status = AcpiDsCreateExternalRegion (Status, Arg,
713 Arg->Common.Value.Name, WalkState, &RegionNode);
714#endif
715 if (ACPI_FAILURE (Status))
716 {
717 ACPI_ERROR_NAMESPACE (Arg->Common.Value.Name, Status);
718 return_ACPI_STATUS (Status);
719 }
720 }
721
722 /* Second arg is the Bank Register (Field) (must already exist) */
723
724 Arg = Arg->Common.Next;
725 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
726 ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
727 ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
728 if (ACPI_FAILURE (Status))
729 {
730 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
731 return_ACPI_STATUS (Status);
732 }
733
734 /*
735 * Third arg is the BankValue
736 * This arg is a TermArg, not a constant
737 * It will be evaluated later, by AcpiDsEvalBankFieldOperands
738 */
739 Arg = Arg->Common.Next;
740
741 /* Fourth arg is the field flags */
742
743 Arg = Arg->Common.Next;
744 Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
745
746 /* Each remaining arg is a Named Field */
747
748 Info.FieldType = ACPI_TYPE_LOCAL_BANK_FIELD;
749 Info.RegionNode = RegionNode;
750
751 /*
752 * Use Info.DataRegisterNode to store BankField Op
753 * It's safe because DataRegisterNode will never be used when create bank field
754 * We store AmlStart and AmlLength in the BankField Op for late evaluation
755 * Used in AcpiExPrepFieldValue(Info)
756 *
757 * TBD: Or, should we add a field in ACPI_CREATE_FIELD_INFO, like "void *ParentOp"?
758 */
759 Info.DataRegisterNode = (ACPI_NAMESPACE_NODE*) Op;
760
761 Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
762 return_ACPI_STATUS (Status);
763}
764
765
766/*******************************************************************************
767 *
768 * FUNCTION: AcpiDsCreateIndexField
769 *
770 * PARAMETERS: Op - Op containing the Field definition and args
771 * RegionNode - Object for the containing Operation Region
772 * ` WalkState - Current method state
773 *
774 * RETURN: Status
775 *
776 * DESCRIPTION: Create a new index field in the specified operation region
777 *
778 ******************************************************************************/
779
780ACPI_STATUS
781AcpiDsCreateIndexField (
782 ACPI_PARSE_OBJECT *Op,
783 ACPI_NAMESPACE_NODE *RegionNode,
784 ACPI_WALK_STATE *WalkState)
785{
786 ACPI_STATUS Status;
787 ACPI_PARSE_OBJECT *Arg;
788 ACPI_CREATE_FIELD_INFO Info;
789
790
791 ACPI_FUNCTION_TRACE_PTR (DsCreateIndexField, Op);
792
793
794 /* First arg is the name of the Index register (must already exist) */
795
796 Arg = Op->Common.Value.Arg;
797 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
798 ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
799 ACPI_NS_SEARCH_PARENT, WalkState, &Info.RegisterNode);
800 if (ACPI_FAILURE (Status))
801 {
802 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
803 return_ACPI_STATUS (Status);
804 }
805
806 /* Second arg is the data register (must already exist) */
807
808 Arg = Arg->Common.Next;
809 Status = AcpiNsLookup (WalkState->ScopeInfo, Arg->Common.Value.String,
810 ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
811 ACPI_NS_SEARCH_PARENT, WalkState, &Info.DataRegisterNode);
812 if (ACPI_FAILURE (Status))
813 {
814 ACPI_ERROR_NAMESPACE (Arg->Common.Value.String, Status);
815 return_ACPI_STATUS (Status);
816 }
817
818 /* Next arg is the field flags */
819
820 Arg = Arg->Common.Next;
821 Info.FieldFlags = (UINT8) Arg->Common.Value.Integer;
822
823 /* Each remaining arg is a Named Field */
824
825 Info.FieldType = ACPI_TYPE_LOCAL_INDEX_FIELD;
826 Info.RegionNode = RegionNode;
827
828 Status = AcpiDsGetFieldNames (&Info, WalkState, Arg->Common.Next);
829 return_ACPI_STATUS (Status);
830}
831
832