Linux Audio

Check our new training course

Loading...
v6.13.7
  1// SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0
  2/******************************************************************************
  3 *
  4 * Module Name: dsfield - Dispatcher field routines
  5 *
  6 * Copyright (C) 2000 - 2023, Intel Corp.
  7 *
  8 *****************************************************************************/
  9
 10#include <acpi/acpi.h>
 11#include "accommon.h"
 12#include "amlcode.h"
 13#include "acdispat.h"
 14#include "acinterp.h"
 15#include "acnamesp.h"
 16#include "acparser.h"
 17
 18#ifdef ACPI_EXEC_APP
 19#include "aecommon.h"
 20#endif
 21
 22#define _COMPONENT          ACPI_DISPATCHER
 23ACPI_MODULE_NAME("dsfield")
 24
 25/* Local prototypes */
 26#ifdef ACPI_ASL_COMPILER
 27#include "acdisasm.h"
 28static acpi_status
 29acpi_ds_create_external_region(acpi_status lookup_status,
 30			       union acpi_parse_object *op,
 31			       char *path,
 32			       struct acpi_walk_state *walk_state,
 33			       struct acpi_namespace_node **node);
 34#endif
 35
 36static acpi_status
 37acpi_ds_get_field_names(struct acpi_create_field_info *info,
 38			struct acpi_walk_state *walk_state,
 39			union acpi_parse_object *arg);
 40
 41#ifdef ACPI_ASL_COMPILER
 42/*******************************************************************************
 43 *
 44 * FUNCTION:    acpi_ds_create_external_region (iASL Disassembler only)
 45 *
 46 * PARAMETERS:  lookup_status   - Status from ns_lookup operation
 47 *              op              - Op containing the Field definition and args
 48 *              path            - Pathname of the region
 49 *  `           walk_state      - Current method state
 50 *              node            - Where the new region node is returned
 51 *
 52 * RETURN:      Status
 53 *
 54 * DESCRIPTION: Add region to the external list if NOT_FOUND. Create a new
 55 *              region node/object.
 56 *
 57 ******************************************************************************/
 58
 59static acpi_status
 60acpi_ds_create_external_region(acpi_status lookup_status,
 61			       union acpi_parse_object *op,
 62			       char *path,
 63			       struct acpi_walk_state *walk_state,
 64			       struct acpi_namespace_node **node)
 65{
 66	acpi_status status;
 67	union acpi_operand_object *obj_desc;
 68
 69	if (lookup_status != AE_NOT_FOUND) {
 70		return (lookup_status);
 71	}
 72
 73	/*
 74	 * Table disassembly:
 75	 * operation_region not found. Generate an External for it, and
 76	 * insert the name into the namespace.
 77	 */
 78	acpi_dm_add_op_to_external_list(op, path, ACPI_TYPE_REGION, 0, 0);
 79
 80	status = acpi_ns_lookup(walk_state->scope_info, path, ACPI_TYPE_REGION,
 81				ACPI_IMODE_LOAD_PASS1, ACPI_NS_SEARCH_PARENT,
 82				walk_state, node);
 83	if (ACPI_FAILURE(status)) {
 84		return (status);
 85	}
 86
 87	/* Must create and install a region object for the new node */
 88
 89	obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_REGION);
 90	if (!obj_desc) {
 91		return (AE_NO_MEMORY);
 92	}
 93
 94	obj_desc->region.node = *node;
 95	status = acpi_ns_attach_object(*node, obj_desc, ACPI_TYPE_REGION);
 96	return (status);
 97}
 98#endif
 99
100/*******************************************************************************
101 *
102 * FUNCTION:    acpi_ds_create_buffer_field
103 *
104 * PARAMETERS:  op                  - Current parse op (create_XXField)
105 *              walk_state          - Current state
106 *
107 * RETURN:      Status
108 *
109 * DESCRIPTION: Execute the create_field operators:
110 *              create_bit_field_op,
111 *              create_byte_field_op,
112 *              create_word_field_op,
113 *              create_dword_field_op,
114 *              create_qword_field_op,
115 *              create_field_op     (all of which define a field in a buffer)
116 *
117 ******************************************************************************/
118
119acpi_status
120acpi_ds_create_buffer_field(union acpi_parse_object *op,
121			    struct acpi_walk_state *walk_state)
122{
123	union acpi_parse_object *arg;
124	struct acpi_namespace_node *node;
125	acpi_status status;
126	union acpi_operand_object *obj_desc;
127	union acpi_operand_object *second_desc = NULL;
128	u32 flags;
129
130	ACPI_FUNCTION_TRACE(ds_create_buffer_field);
131
132	/*
133	 * Get the name_string argument (name of the new buffer_field)
134	 */
135	if (op->common.aml_opcode == AML_CREATE_FIELD_OP) {
136
137		/* For create_field, name is the 4th argument */
138
139		arg = acpi_ps_get_arg(op, 3);
140	} else {
141		/* For all other create_XXXField operators, name is the 3rd argument */
142
143		arg = acpi_ps_get_arg(op, 2);
144	}
145
146	if (!arg) {
147		return_ACPI_STATUS(AE_AML_NO_OPERAND);
148	}
149
150	if (walk_state->deferred_node) {
151		node = walk_state->deferred_node;
 
152	} else {
153		/* Execute flag should always be set when this function is entered */
154
155		if (!(walk_state->parse_flags & ACPI_PARSE_EXECUTE)) {
156			ACPI_ERROR((AE_INFO, "Parse execute mode is not set"));
157			return_ACPI_STATUS(AE_AML_INTERNAL);
158		}
159
160		/* Creating new namespace node, should not already exist */
161
162		flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
163		    ACPI_NS_ERROR_IF_FOUND;
164
165		/*
166		 * Mark node temporary if we are executing a normal control
167		 * method. (Don't mark if this is a module-level code method)
168		 */
169		if (walk_state->method_node &&
170		    !(walk_state->parse_flags & ACPI_PARSE_MODULE_LEVEL)) {
171			flags |= ACPI_NS_TEMPORARY;
172		}
173
174		/* Enter the name_string into the namespace */
175
176		status = acpi_ns_lookup(walk_state->scope_info,
177					arg->common.value.string, ACPI_TYPE_ANY,
178					ACPI_IMODE_LOAD_PASS1, flags,
179					walk_state, &node);
180		if ((walk_state->parse_flags & ACPI_PARSE_DISASSEMBLE)
181		    && status == AE_ALREADY_EXISTS) {
182			status = AE_OK;
183		} else if (ACPI_FAILURE(status)) {
184			ACPI_ERROR_NAMESPACE(walk_state->scope_info,
185					     arg->common.value.string, status);
186			return_ACPI_STATUS(status);
187		}
188	}
189
190	/*
191	 * We could put the returned object (Node) on the object stack for later,
192	 * but for now, we will put it in the "op" object that the parser uses,
193	 * so we can get it again at the end of this scope.
194	 */
195	op->common.node = node;
196
197	/*
198	 * If there is no object attached to the node, this node was just created
199	 * and we need to create the field object. Otherwise, this was a lookup
200	 * of an existing node and we don't want to create the field object again.
201	 */
202	obj_desc = acpi_ns_get_attached_object(node);
203	if (obj_desc) {
204		return_ACPI_STATUS(AE_OK);
205	}
206
207	/*
208	 * The Field definition is not fully parsed at this time.
209	 * (We must save the address of the AML for the buffer and index operands)
210	 */
211
212	/* Create the buffer field object */
213
214	obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_BUFFER_FIELD);
215	if (!obj_desc) {
216		status = AE_NO_MEMORY;
217		goto cleanup;
218	}
219
220	/*
221	 * Remember location in AML stream of the field unit opcode and operands
222	 * -- since the buffer and index operands must be evaluated.
223	 */
224	second_desc = obj_desc->common.next_object;
225	second_desc->extra.aml_start = op->named.data;
226	second_desc->extra.aml_length = op->named.length;
227	obj_desc->buffer_field.node = node;
228
229	/* Attach constructed field descriptors to parent node */
230
231	status = acpi_ns_attach_object(node, obj_desc, ACPI_TYPE_BUFFER_FIELD);
232	if (ACPI_FAILURE(status)) {
233		goto cleanup;
234	}
235
236cleanup:
237
238	/* Remove local reference to the object */
239
240	acpi_ut_remove_reference(obj_desc);
241	return_ACPI_STATUS(status);
242}
243
244/*******************************************************************************
245 *
246 * FUNCTION:    acpi_ds_get_field_names
247 *
248 * PARAMETERS:  info            - create_field info structure
249 *              walk_state      - Current method state
250 *              arg             - First parser arg for the field name list
251 *
252 * RETURN:      Status
253 *
254 * DESCRIPTION: Process all named fields in a field declaration. Names are
255 *              entered into the namespace.
256 *
257 ******************************************************************************/
258
259static acpi_status
260acpi_ds_get_field_names(struct acpi_create_field_info *info,
261			struct acpi_walk_state *walk_state,
262			union acpi_parse_object *arg)
263{
264	acpi_status status;
265	u64 position;
266	union acpi_parse_object *child;
267
268#ifdef ACPI_EXEC_APP
269	union acpi_operand_object *result_desc;
270	union acpi_operand_object *obj_desc;
271	char *name_path;
272#endif
273
274	ACPI_FUNCTION_TRACE_PTR(ds_get_field_names, info);
275
276	/* First field starts at bit zero */
277
278	info->field_bit_position = 0;
279
280	/* Process all elements in the field list (of parse nodes) */
281
282	while (arg) {
283		/*
284		 * Four types of field elements are handled:
285		 * 1) name - Enters a new named field into the namespace
286		 * 2) offset - specifies a bit offset
287		 * 3) access_as - changes the access mode/attributes
288		 * 4) connection - Associate a resource template with the field
289		 */
290		switch (arg->common.aml_opcode) {
291		case AML_INT_RESERVEDFIELD_OP:
292
293			position = (u64)info->field_bit_position +
294			    (u64)arg->common.value.size;
295
296			if (position > ACPI_UINT32_MAX) {
297				ACPI_ERROR((AE_INFO,
298					    "Bit offset within field too large (> 0xFFFFFFFF)"));
299				return_ACPI_STATUS(AE_SUPPORT);
300			}
301
302			info->field_bit_position = (u32) position;
303			break;
304
305		case AML_INT_ACCESSFIELD_OP:
306		case AML_INT_EXTACCESSFIELD_OP:
307			/*
308			 * Get new access_type, access_attribute, and access_length fields
309			 * -- to be used for all field units that follow, until the
310			 * end-of-field or another access_as keyword is encountered.
311			 * NOTE. These three bytes are encoded in the integer value
312			 * of the parseop for convenience.
313			 *
314			 * In field_flags, preserve the flag bits other than the
315			 * ACCESS_TYPE bits.
316			 */
317
318			/* access_type (byte_acc, word_acc, etc.) */
319
320			info->field_flags = (u8)
321			    ((info->
322			      field_flags & ~(AML_FIELD_ACCESS_TYPE_MASK)) |
323			     ((u8)((u32)(arg->common.value.integer & 0x07))));
324
325			/* access_attribute (attrib_quick, attrib_byte, etc.) */
326
327			info->attribute = (u8)
328			    ((arg->common.value.integer >> 8) & 0xFF);
329
330			/* access_length (for serial/buffer protocols) */
331
332			info->access_length = (u8)
333			    ((arg->common.value.integer >> 16) & 0xFF);
334			break;
335
336		case AML_INT_CONNECTION_OP:
337			/*
338			 * Clear any previous connection. New connection is used for all
339			 * fields that follow, similar to access_as
340			 */
341			info->resource_buffer = NULL;
342			info->connection_node = NULL;
343			info->pin_number_index = 0;
344
345			/*
346			 * A Connection() is either an actual resource descriptor (buffer)
347			 * or a named reference to a resource template
348			 */
349			child = arg->common.value.arg;
350			if (child->common.aml_opcode == AML_INT_BYTELIST_OP) {
351				info->resource_buffer = child->named.data;
352				info->resource_length =
353				    (u16)child->named.value.integer;
354			} else {
355				/* Lookup the Connection() namepath, it should already exist */
356
357				status = acpi_ns_lookup(walk_state->scope_info,
358							child->common.value.
359							name, ACPI_TYPE_ANY,
360							ACPI_IMODE_EXECUTE,
361							ACPI_NS_DONT_OPEN_SCOPE,
362							walk_state,
363							&info->connection_node);
364				if (ACPI_FAILURE(status)) {
365					ACPI_ERROR_NAMESPACE(walk_state->
366							     scope_info,
367							     child->common.
368							     value.name,
369							     status);
370					return_ACPI_STATUS(status);
371				}
372			}
373			break;
374
375		case AML_INT_NAMEDFIELD_OP:
376
377			/* Lookup the name, it should already exist */
378
379			status = acpi_ns_lookup(walk_state->scope_info,
380						(char *)&arg->named.name,
381						info->field_type,
382						ACPI_IMODE_EXECUTE,
383						ACPI_NS_DONT_OPEN_SCOPE,
384						walk_state, &info->field_node);
385			if (ACPI_FAILURE(status)) {
386				ACPI_ERROR_NAMESPACE(walk_state->scope_info,
387						     (char *)&arg->named.name,
388						     status);
389				return_ACPI_STATUS(status);
390			} else {
391				arg->common.node = info->field_node;
392				info->field_bit_length = arg->common.value.size;
393
394				/*
395				 * If there is no object attached to the node, this node was
396				 * just created and we need to create the field object.
397				 * Otherwise, this was a lookup of an existing node and we
398				 * don't want to create the field object again.
399				 */
400				if (!acpi_ns_get_attached_object
401				    (info->field_node)) {
402					status = acpi_ex_prep_field_value(info);
403					if (ACPI_FAILURE(status)) {
404						return_ACPI_STATUS(status);
405					}
406#ifdef ACPI_EXEC_APP
407					name_path =
408					    acpi_ns_get_external_pathname(info->
409									  field_node);
410					if (ACPI_SUCCESS
411					    (ae_lookup_init_file_entry
412					     (name_path, &obj_desc))) {
413						acpi_ex_write_data_to_field
414						    (obj_desc,
415						     acpi_ns_get_attached_object
416						     (info->field_node),
417						     &result_desc);
418						acpi_ut_remove_reference
419						    (obj_desc);
420					}
421					ACPI_FREE(name_path);
422#endif
423				}
424			}
425
426			/* Keep track of bit position for the next field */
427
428			position = (u64)info->field_bit_position +
429			    (u64)arg->common.value.size;
430
431			if (position > ACPI_UINT32_MAX) {
432				ACPI_ERROR((AE_INFO,
433					    "Field [%4.4s] bit offset too large (> 0xFFFFFFFF)",
434					    ACPI_CAST_PTR(char,
435							  &info->field_node->
436							  name)));
437				return_ACPI_STATUS(AE_SUPPORT);
438			}
439
440			info->field_bit_position += info->field_bit_length;
441			info->pin_number_index++;	/* Index relative to previous Connection() */
442			break;
443
444		default:
445
446			ACPI_ERROR((AE_INFO,
447				    "Invalid opcode in field list: 0x%X",
448				    arg->common.aml_opcode));
449			return_ACPI_STATUS(AE_AML_BAD_OPCODE);
450		}
451
452		arg = arg->common.next;
453	}
454
455	return_ACPI_STATUS(AE_OK);
456}
457
458/*******************************************************************************
459 *
460 * FUNCTION:    acpi_ds_create_field
461 *
462 * PARAMETERS:  op              - Op containing the Field definition and args
463 *              region_node     - Object for the containing Operation Region
464 *  `           walk_state      - Current method state
465 *
466 * RETURN:      Status
467 *
468 * DESCRIPTION: Create a new field in the specified operation region
469 *
470 ******************************************************************************/
471
472acpi_status
473acpi_ds_create_field(union acpi_parse_object *op,
474		     struct acpi_namespace_node *region_node,
475		     struct acpi_walk_state *walk_state)
476{
477	acpi_status status;
478	union acpi_parse_object *arg;
479	struct acpi_create_field_info info;
480
481	ACPI_FUNCTION_TRACE_PTR(ds_create_field, op);
482
483	/* First arg is the name of the parent op_region (must already exist) */
484
485	arg = op->common.value.arg;
486
487	if (!region_node) {
488		status =
489		    acpi_ns_lookup(walk_state->scope_info,
490				   arg->common.value.name, ACPI_TYPE_REGION,
491				   ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
492				   walk_state, &region_node);
493#ifdef ACPI_ASL_COMPILER
494		status = acpi_ds_create_external_region(status, arg,
495							arg->common.value.name,
496							walk_state,
497							&region_node);
498#endif
499		if (ACPI_FAILURE(status)) {
500			ACPI_ERROR_NAMESPACE(walk_state->scope_info,
501					     arg->common.value.name, status);
502			return_ACPI_STATUS(status);
503		}
504	}
505
506	memset(&info, 0, sizeof(struct acpi_create_field_info));
507
508	/* Second arg is the field flags */
509
510	arg = arg->common.next;
511	info.field_flags = (u8) arg->common.value.integer;
512	info.attribute = 0;
513
514	/* Each remaining arg is a Named Field */
515
516	info.field_type = ACPI_TYPE_LOCAL_REGION_FIELD;
517	info.region_node = region_node;
518
519	status = acpi_ds_get_field_names(&info, walk_state, arg->common.next);
520	if (ACPI_FAILURE(status)) {
521		return_ACPI_STATUS(status);
522	}
523
524	if (info.region_node->object->region.space_id ==
525	    ACPI_ADR_SPACE_PLATFORM_COMM) {
526		region_node->object->field.internal_pcc_buffer =
527		    ACPI_ALLOCATE_ZEROED(info.region_node->object->region.
528					 length);
529		if (!region_node->object->field.internal_pcc_buffer) {
530			return_ACPI_STATUS(AE_NO_MEMORY);
531		}
532	}
533
534	return_ACPI_STATUS(status);
535}
536
537/*******************************************************************************
538 *
539 * FUNCTION:    acpi_ds_init_field_objects
540 *
541 * PARAMETERS:  op              - Op containing the Field definition and args
542 *  `           walk_state      - Current method state
543 *
544 * RETURN:      Status
545 *
546 * DESCRIPTION: For each "Field Unit" name in the argument list that is
547 *              part of the field declaration, enter the name into the
548 *              namespace.
549 *
550 ******************************************************************************/
551
552acpi_status
553acpi_ds_init_field_objects(union acpi_parse_object *op,
554			   struct acpi_walk_state *walk_state)
555{
556	acpi_status status;
557	union acpi_parse_object *arg = NULL;
558	struct acpi_namespace_node *node;
559	u8 type = 0;
560	u32 flags;
561
562	ACPI_FUNCTION_TRACE_PTR(ds_init_field_objects, op);
563
564	/* Execute flag should always be set when this function is entered */
565
566	if (!(walk_state->parse_flags & ACPI_PARSE_EXECUTE)) {
567		if (walk_state->parse_flags & ACPI_PARSE_DEFERRED_OP) {
568
569			/* bank_field Op is deferred, just return OK */
570
571			return_ACPI_STATUS(AE_OK);
572		}
573
574		ACPI_ERROR((AE_INFO, "Parse deferred mode is not set"));
575		return_ACPI_STATUS(AE_AML_INTERNAL);
576	}
577
578	/*
579	 * Get the field_list argument for this opcode. This is the start of the
580	 * list of field elements.
581	 */
582	switch (walk_state->opcode) {
583	case AML_FIELD_OP:
584
585		arg = acpi_ps_get_arg(op, 2);
586		type = ACPI_TYPE_LOCAL_REGION_FIELD;
587		break;
588
589	case AML_BANK_FIELD_OP:
590
591		arg = acpi_ps_get_arg(op, 4);
592		type = ACPI_TYPE_LOCAL_BANK_FIELD;
593		break;
594
595	case AML_INDEX_FIELD_OP:
596
597		arg = acpi_ps_get_arg(op, 3);
598		type = ACPI_TYPE_LOCAL_INDEX_FIELD;
599		break;
600
601	default:
602
603		return_ACPI_STATUS(AE_BAD_PARAMETER);
604	}
605
606	/* Creating new namespace node(s), should not already exist */
607
608	flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
609	    ACPI_NS_ERROR_IF_FOUND;
610
611	/*
612	 * Mark node(s) temporary if we are executing a normal control
613	 * method. (Don't mark if this is a module-level code method)
614	 */
615	if (walk_state->method_node &&
616	    !(walk_state->parse_flags & ACPI_PARSE_MODULE_LEVEL)) {
617		flags |= ACPI_NS_TEMPORARY;
618	}
619#ifdef ACPI_EXEC_APP
620	flags |= ACPI_NS_OVERRIDE_IF_FOUND;
621#endif
622	/*
623	 * Walk the list of entries in the field_list
624	 * Note: field_list can be of zero length. In this case, Arg will be NULL.
625	 */
626	while (arg) {
627		/*
628		 * Ignore OFFSET/ACCESSAS/CONNECTION terms here; we are only interested
629		 * in the field names in order to enter them into the namespace.
630		 */
631		if (arg->common.aml_opcode == AML_INT_NAMEDFIELD_OP) {
632			status = acpi_ns_lookup(walk_state->scope_info,
633						(char *)&arg->named.name, type,
634						ACPI_IMODE_LOAD_PASS1, flags,
635						walk_state, &node);
636			if (ACPI_FAILURE(status)) {
637				ACPI_ERROR_NAMESPACE(walk_state->scope_info,
638						     (char *)&arg->named.name,
639						     status);
640				if (status != AE_ALREADY_EXISTS) {
641					return_ACPI_STATUS(status);
642				}
643
644				/* Name already exists, just ignore this error */
 
 
645			}
646
647			arg->common.node = node;
648		}
649
650		/* Get the next field element in the list */
651
652		arg = arg->common.next;
653	}
654
655	return_ACPI_STATUS(AE_OK);
656}
657
658/*******************************************************************************
659 *
660 * FUNCTION:    acpi_ds_create_bank_field
661 *
662 * PARAMETERS:  op              - Op containing the Field definition and args
663 *              region_node     - Object for the containing Operation Region
664 *              walk_state      - Current method state
665 *
666 * RETURN:      Status
667 *
668 * DESCRIPTION: Create a new bank field in the specified operation region
669 *
670 ******************************************************************************/
671
672acpi_status
673acpi_ds_create_bank_field(union acpi_parse_object *op,
674			  struct acpi_namespace_node *region_node,
675			  struct acpi_walk_state *walk_state)
676{
677	acpi_status status;
678	union acpi_parse_object *arg;
679	struct acpi_create_field_info info;
680
681	ACPI_FUNCTION_TRACE_PTR(ds_create_bank_field, op);
682
683	/* First arg is the name of the parent op_region (must already exist) */
684
685	arg = op->common.value.arg;
686	if (!region_node) {
687		status =
688		    acpi_ns_lookup(walk_state->scope_info,
689				   arg->common.value.name, ACPI_TYPE_REGION,
690				   ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
691				   walk_state, &region_node);
692#ifdef ACPI_ASL_COMPILER
693		status = acpi_ds_create_external_region(status, arg,
694							arg->common.value.name,
695							walk_state,
696							&region_node);
697#endif
698		if (ACPI_FAILURE(status)) {
699			ACPI_ERROR_NAMESPACE(walk_state->scope_info,
700					     arg->common.value.name, status);
701			return_ACPI_STATUS(status);
702		}
703	}
704
705	/* Second arg is the Bank Register (Field) (must already exist) */
706
707	arg = arg->common.next;
708	status =
709	    acpi_ns_lookup(walk_state->scope_info, arg->common.value.string,
710			   ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
711			   ACPI_NS_SEARCH_PARENT, walk_state,
712			   &info.register_node);
713	if (ACPI_FAILURE(status)) {
714		ACPI_ERROR_NAMESPACE(walk_state->scope_info,
715				     arg->common.value.string, status);
716		return_ACPI_STATUS(status);
717	}
718
719	/*
720	 * Third arg is the bank_value
721	 * This arg is a term_arg, not a constant
722	 * It will be evaluated later, by acpi_ds_eval_bank_field_operands
723	 */
724	arg = arg->common.next;
725
726	/* Fourth arg is the field flags */
727
728	arg = arg->common.next;
729	info.field_flags = (u8) arg->common.value.integer;
730
731	/* Each remaining arg is a Named Field */
732
733	info.field_type = ACPI_TYPE_LOCAL_BANK_FIELD;
734	info.region_node = region_node;
735
736	/*
737	 * Use Info.data_register_node to store bank_field Op
738	 * It's safe because data_register_node will never be used when create
739	 * bank field \we store aml_start and aml_length in the bank_field Op for
740	 * late evaluation. Used in acpi_ex_prep_field_value(Info)
741	 *
742	 * TBD: Or, should we add a field in struct acpi_create_field_info, like
743	 * "void *ParentOp"?
744	 */
745	info.data_register_node = (struct acpi_namespace_node *)op;
746
747	status = acpi_ds_get_field_names(&info, walk_state, arg->common.next);
748	return_ACPI_STATUS(status);
749}
750
751/*******************************************************************************
752 *
753 * FUNCTION:    acpi_ds_create_index_field
754 *
755 * PARAMETERS:  op              - Op containing the Field definition and args
756 *              region_node     - Object for the containing Operation Region
757 *  `           walk_state      - Current method state
758 *
759 * RETURN:      Status
760 *
761 * DESCRIPTION: Create a new index field in the specified operation region
762 *
763 ******************************************************************************/
764
765acpi_status
766acpi_ds_create_index_field(union acpi_parse_object *op,
767			   struct acpi_namespace_node *region_node,
768			   struct acpi_walk_state *walk_state)
769{
770	acpi_status status;
771	union acpi_parse_object *arg;
772	struct acpi_create_field_info info;
773
774	ACPI_FUNCTION_TRACE_PTR(ds_create_index_field, op);
775
776	/* First arg is the name of the Index register (must already exist) */
777
778	arg = op->common.value.arg;
779	status =
780	    acpi_ns_lookup(walk_state->scope_info, arg->common.value.string,
781			   ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
782			   ACPI_NS_SEARCH_PARENT, walk_state,
783			   &info.register_node);
784	if (ACPI_FAILURE(status)) {
785		ACPI_ERROR_NAMESPACE(walk_state->scope_info,
786				     arg->common.value.string, status);
787		return_ACPI_STATUS(status);
788	}
789
790	/* Second arg is the data register (must already exist) */
791
792	arg = arg->common.next;
793	status =
794	    acpi_ns_lookup(walk_state->scope_info, arg->common.value.string,
795			   ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
796			   ACPI_NS_SEARCH_PARENT, walk_state,
797			   &info.data_register_node);
798	if (ACPI_FAILURE(status)) {
799		ACPI_ERROR_NAMESPACE(walk_state->scope_info,
800				     arg->common.value.string, status);
801		return_ACPI_STATUS(status);
802	}
803
804	/* Next arg is the field flags */
805
806	arg = arg->common.next;
807	info.field_flags = (u8) arg->common.value.integer;
808
809	/* Each remaining arg is a Named Field */
810
811	info.field_type = ACPI_TYPE_LOCAL_INDEX_FIELD;
812	info.region_node = region_node;
813
814	status = acpi_ds_get_field_names(&info, walk_state, arg->common.next);
815	return_ACPI_STATUS(status);
816}
v4.17
  1// SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0
  2/******************************************************************************
  3 *
  4 * Module Name: dsfield - Dispatcher field routines
  5 *
  6 * Copyright (C) 2000 - 2018, Intel Corp.
  7 *
  8 *****************************************************************************/
  9
 10#include <acpi/acpi.h>
 11#include "accommon.h"
 12#include "amlcode.h"
 13#include "acdispat.h"
 14#include "acinterp.h"
 15#include "acnamesp.h"
 16#include "acparser.h"
 17
 
 
 
 
 18#define _COMPONENT          ACPI_DISPATCHER
 19ACPI_MODULE_NAME("dsfield")
 20
 21/* Local prototypes */
 22#ifdef ACPI_ASL_COMPILER
 23#include "acdisasm.h"
 24static acpi_status
 25acpi_ds_create_external_region(acpi_status lookup_status,
 26			       union acpi_parse_object *op,
 27			       char *path,
 28			       struct acpi_walk_state *walk_state,
 29			       struct acpi_namespace_node **node);
 30#endif
 31
 32static acpi_status
 33acpi_ds_get_field_names(struct acpi_create_field_info *info,
 34			struct acpi_walk_state *walk_state,
 35			union acpi_parse_object *arg);
 36
 37#ifdef ACPI_ASL_COMPILER
 38/*******************************************************************************
 39 *
 40 * FUNCTION:    acpi_ds_create_external_region (iASL Disassembler only)
 41 *
 42 * PARAMETERS:  lookup_status   - Status from ns_lookup operation
 43 *              op              - Op containing the Field definition and args
 44 *              path            - Pathname of the region
 45 *  `           walk_state      - Current method state
 46 *              node            - Where the new region node is returned
 47 *
 48 * RETURN:      Status
 49 *
 50 * DESCRIPTION: Add region to the external list if NOT_FOUND. Create a new
 51 *              region node/object.
 52 *
 53 ******************************************************************************/
 54
 55static acpi_status
 56acpi_ds_create_external_region(acpi_status lookup_status,
 57			       union acpi_parse_object *op,
 58			       char *path,
 59			       struct acpi_walk_state *walk_state,
 60			       struct acpi_namespace_node **node)
 61{
 62	acpi_status status;
 63	union acpi_operand_object *obj_desc;
 64
 65	if (lookup_status != AE_NOT_FOUND) {
 66		return (lookup_status);
 67	}
 68
 69	/*
 70	 * Table disassembly:
 71	 * operation_region not found. Generate an External for it, and
 72	 * insert the name into the namespace.
 73	 */
 74	acpi_dm_add_op_to_external_list(op, path, ACPI_TYPE_REGION, 0, 0);
 75
 76	status = acpi_ns_lookup(walk_state->scope_info, path, ACPI_TYPE_REGION,
 77				ACPI_IMODE_LOAD_PASS1, ACPI_NS_SEARCH_PARENT,
 78				walk_state, node);
 79	if (ACPI_FAILURE(status)) {
 80		return (status);
 81	}
 82
 83	/* Must create and install a region object for the new node */
 84
 85	obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_REGION);
 86	if (!obj_desc) {
 87		return (AE_NO_MEMORY);
 88	}
 89
 90	obj_desc->region.node = *node;
 91	status = acpi_ns_attach_object(*node, obj_desc, ACPI_TYPE_REGION);
 92	return (status);
 93}
 94#endif
 95
 96/*******************************************************************************
 97 *
 98 * FUNCTION:    acpi_ds_create_buffer_field
 99 *
100 * PARAMETERS:  op                  - Current parse op (create_XXField)
101 *              walk_state          - Current state
102 *
103 * RETURN:      Status
104 *
105 * DESCRIPTION: Execute the create_field operators:
106 *              create_bit_field_op,
107 *              create_byte_field_op,
108 *              create_word_field_op,
109 *              create_dword_field_op,
110 *              create_qword_field_op,
111 *              create_field_op     (all of which define a field in a buffer)
112 *
113 ******************************************************************************/
114
115acpi_status
116acpi_ds_create_buffer_field(union acpi_parse_object *op,
117			    struct acpi_walk_state *walk_state)
118{
119	union acpi_parse_object *arg;
120	struct acpi_namespace_node *node;
121	acpi_status status;
122	union acpi_operand_object *obj_desc;
123	union acpi_operand_object *second_desc = NULL;
124	u32 flags;
125
126	ACPI_FUNCTION_TRACE(ds_create_buffer_field);
127
128	/*
129	 * Get the name_string argument (name of the new buffer_field)
130	 */
131	if (op->common.aml_opcode == AML_CREATE_FIELD_OP) {
132
133		/* For create_field, name is the 4th argument */
134
135		arg = acpi_ps_get_arg(op, 3);
136	} else {
137		/* For all other create_XXXField operators, name is the 3rd argument */
138
139		arg = acpi_ps_get_arg(op, 2);
140	}
141
142	if (!arg) {
143		return_ACPI_STATUS(AE_AML_NO_OPERAND);
144	}
145
146	if (walk_state->deferred_node) {
147		node = walk_state->deferred_node;
148		status = AE_OK;
149	} else {
150		/* Execute flag should always be set when this function is entered */
151
152		if (!(walk_state->parse_flags & ACPI_PARSE_EXECUTE)) {
153			ACPI_ERROR((AE_INFO, "Parse execute mode is not set"));
154			return_ACPI_STATUS(AE_AML_INTERNAL);
155		}
156
157		/* Creating new namespace node, should not already exist */
158
159		flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
160		    ACPI_NS_ERROR_IF_FOUND;
161
162		/*
163		 * Mark node temporary if we are executing a normal control
164		 * method. (Don't mark if this is a module-level code method)
165		 */
166		if (walk_state->method_node &&
167		    !(walk_state->parse_flags & ACPI_PARSE_MODULE_LEVEL)) {
168			flags |= ACPI_NS_TEMPORARY;
169		}
170
171		/* Enter the name_string into the namespace */
172
173		status = acpi_ns_lookup(walk_state->scope_info,
174					arg->common.value.string, ACPI_TYPE_ANY,
175					ACPI_IMODE_LOAD_PASS1, flags,
176					walk_state, &node);
177		if (ACPI_FAILURE(status)) {
 
 
 
178			ACPI_ERROR_NAMESPACE(walk_state->scope_info,
179					     arg->common.value.string, status);
180			return_ACPI_STATUS(status);
181		}
182	}
183
184	/*
185	 * We could put the returned object (Node) on the object stack for later,
186	 * but for now, we will put it in the "op" object that the parser uses,
187	 * so we can get it again at the end of this scope.
188	 */
189	op->common.node = node;
190
191	/*
192	 * If there is no object attached to the node, this node was just created
193	 * and we need to create the field object. Otherwise, this was a lookup
194	 * of an existing node and we don't want to create the field object again.
195	 */
196	obj_desc = acpi_ns_get_attached_object(node);
197	if (obj_desc) {
198		return_ACPI_STATUS(AE_OK);
199	}
200
201	/*
202	 * The Field definition is not fully parsed at this time.
203	 * (We must save the address of the AML for the buffer and index operands)
204	 */
205
206	/* Create the buffer field object */
207
208	obj_desc = acpi_ut_create_internal_object(ACPI_TYPE_BUFFER_FIELD);
209	if (!obj_desc) {
210		status = AE_NO_MEMORY;
211		goto cleanup;
212	}
213
214	/*
215	 * Remember location in AML stream of the field unit opcode and operands
216	 * -- since the buffer and index operands must be evaluated.
217	 */
218	second_desc = obj_desc->common.next_object;
219	second_desc->extra.aml_start = op->named.data;
220	second_desc->extra.aml_length = op->named.length;
221	obj_desc->buffer_field.node = node;
222
223	/* Attach constructed field descriptors to parent node */
224
225	status = acpi_ns_attach_object(node, obj_desc, ACPI_TYPE_BUFFER_FIELD);
226	if (ACPI_FAILURE(status)) {
227		goto cleanup;
228	}
229
230cleanup:
231
232	/* Remove local reference to the object */
233
234	acpi_ut_remove_reference(obj_desc);
235	return_ACPI_STATUS(status);
236}
237
238/*******************************************************************************
239 *
240 * FUNCTION:    acpi_ds_get_field_names
241 *
242 * PARAMETERS:  info            - create_field info structure
243 *  `           walk_state      - Current method state
244 *              arg             - First parser arg for the field name list
245 *
246 * RETURN:      Status
247 *
248 * DESCRIPTION: Process all named fields in a field declaration. Names are
249 *              entered into the namespace.
250 *
251 ******************************************************************************/
252
253static acpi_status
254acpi_ds_get_field_names(struct acpi_create_field_info *info,
255			struct acpi_walk_state *walk_state,
256			union acpi_parse_object *arg)
257{
258	acpi_status status;
259	u64 position;
260	union acpi_parse_object *child;
261
 
 
 
 
 
 
262	ACPI_FUNCTION_TRACE_PTR(ds_get_field_names, info);
263
264	/* First field starts at bit zero */
265
266	info->field_bit_position = 0;
267
268	/* Process all elements in the field list (of parse nodes) */
269
270	while (arg) {
271		/*
272		 * Four types of field elements are handled:
273		 * 1) name - Enters a new named field into the namespace
274		 * 2) offset - specifies a bit offset
275		 * 3) access_as - changes the access mode/attributes
276		 * 4) connection - Associate a resource template with the field
277		 */
278		switch (arg->common.aml_opcode) {
279		case AML_INT_RESERVEDFIELD_OP:
280
281			position = (u64)info->field_bit_position +
282			    (u64)arg->common.value.size;
283
284			if (position > ACPI_UINT32_MAX) {
285				ACPI_ERROR((AE_INFO,
286					    "Bit offset within field too large (> 0xFFFFFFFF)"));
287				return_ACPI_STATUS(AE_SUPPORT);
288			}
289
290			info->field_bit_position = (u32) position;
291			break;
292
293		case AML_INT_ACCESSFIELD_OP:
294		case AML_INT_EXTACCESSFIELD_OP:
295			/*
296			 * Get new access_type, access_attribute, and access_length fields
297			 * -- to be used for all field units that follow, until the
298			 * end-of-field or another access_as keyword is encountered.
299			 * NOTE. These three bytes are encoded in the integer value
300			 * of the parseop for convenience.
301			 *
302			 * In field_flags, preserve the flag bits other than the
303			 * ACCESS_TYPE bits.
304			 */
305
306			/* access_type (byte_acc, word_acc, etc.) */
307
308			info->field_flags = (u8)
309			    ((info->
310			      field_flags & ~(AML_FIELD_ACCESS_TYPE_MASK)) |
311			     ((u8)((u32)(arg->common.value.integer & 0x07))));
312
313			/* access_attribute (attrib_quick, attrib_byte, etc.) */
314
315			info->attribute = (u8)
316			    ((arg->common.value.integer >> 8) & 0xFF);
317
318			/* access_length (for serial/buffer protocols) */
319
320			info->access_length = (u8)
321			    ((arg->common.value.integer >> 16) & 0xFF);
322			break;
323
324		case AML_INT_CONNECTION_OP:
325			/*
326			 * Clear any previous connection. New connection is used for all
327			 * fields that follow, similar to access_as
328			 */
329			info->resource_buffer = NULL;
330			info->connection_node = NULL;
331			info->pin_number_index = 0;
332
333			/*
334			 * A Connection() is either an actual resource descriptor (buffer)
335			 * or a named reference to a resource template
336			 */
337			child = arg->common.value.arg;
338			if (child->common.aml_opcode == AML_INT_BYTELIST_OP) {
339				info->resource_buffer = child->named.data;
340				info->resource_length =
341				    (u16)child->named.value.integer;
342			} else {
343				/* Lookup the Connection() namepath, it should already exist */
344
345				status = acpi_ns_lookup(walk_state->scope_info,
346							child->common.value.
347							name, ACPI_TYPE_ANY,
348							ACPI_IMODE_EXECUTE,
349							ACPI_NS_DONT_OPEN_SCOPE,
350							walk_state,
351							&info->connection_node);
352				if (ACPI_FAILURE(status)) {
353					ACPI_ERROR_NAMESPACE(walk_state->
354							     scope_info,
355							     child->common.
356							     value.name,
357							     status);
358					return_ACPI_STATUS(status);
359				}
360			}
361			break;
362
363		case AML_INT_NAMEDFIELD_OP:
364
365			/* Lookup the name, it should already exist */
366
367			status = acpi_ns_lookup(walk_state->scope_info,
368						(char *)&arg->named.name,
369						info->field_type,
370						ACPI_IMODE_EXECUTE,
371						ACPI_NS_DONT_OPEN_SCOPE,
372						walk_state, &info->field_node);
373			if (ACPI_FAILURE(status)) {
374				ACPI_ERROR_NAMESPACE(walk_state->scope_info,
375						     (char *)&arg->named.name,
376						     status);
377				return_ACPI_STATUS(status);
378			} else {
379				arg->common.node = info->field_node;
380				info->field_bit_length = arg->common.value.size;
381
382				/*
383				 * If there is no object attached to the node, this node was
384				 * just created and we need to create the field object.
385				 * Otherwise, this was a lookup of an existing node and we
386				 * don't want to create the field object again.
387				 */
388				if (!acpi_ns_get_attached_object
389				    (info->field_node)) {
390					status = acpi_ex_prep_field_value(info);
391					if (ACPI_FAILURE(status)) {
392						return_ACPI_STATUS(status);
393					}
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
394				}
395			}
396
397			/* Keep track of bit position for the next field */
398
399			position = (u64)info->field_bit_position +
400			    (u64)arg->common.value.size;
401
402			if (position > ACPI_UINT32_MAX) {
403				ACPI_ERROR((AE_INFO,
404					    "Field [%4.4s] bit offset too large (> 0xFFFFFFFF)",
405					    ACPI_CAST_PTR(char,
406							  &info->field_node->
407							  name)));
408				return_ACPI_STATUS(AE_SUPPORT);
409			}
410
411			info->field_bit_position += info->field_bit_length;
412			info->pin_number_index++;	/* Index relative to previous Connection() */
413			break;
414
415		default:
416
417			ACPI_ERROR((AE_INFO,
418				    "Invalid opcode in field list: 0x%X",
419				    arg->common.aml_opcode));
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 * FUNCTION:    acpi_ds_create_field
432 *
433 * PARAMETERS:  op              - Op containing the Field definition and args
434 *              region_node     - Object for the containing Operation Region
435 *  `           walk_state      - Current method state
436 *
437 * RETURN:      Status
438 *
439 * DESCRIPTION: Create a new field in the specified operation region
440 *
441 ******************************************************************************/
442
443acpi_status
444acpi_ds_create_field(union acpi_parse_object *op,
445		     struct acpi_namespace_node *region_node,
446		     struct acpi_walk_state *walk_state)
447{
448	acpi_status status;
449	union acpi_parse_object *arg;
450	struct acpi_create_field_info info;
451
452	ACPI_FUNCTION_TRACE_PTR(ds_create_field, op);
453
454	/* First arg is the name of the parent op_region (must already exist) */
455
456	arg = op->common.value.arg;
457
458	if (!region_node) {
459		status =
460		    acpi_ns_lookup(walk_state->scope_info,
461				   arg->common.value.name, ACPI_TYPE_REGION,
462				   ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
463				   walk_state, &region_node);
464#ifdef ACPI_ASL_COMPILER
465		status = acpi_ds_create_external_region(status, arg,
466							arg->common.value.name,
467							walk_state,
468							&region_node);
469#endif
470		if (ACPI_FAILURE(status)) {
471			ACPI_ERROR_NAMESPACE(walk_state->scope_info,
472					     arg->common.value.name, status);
473			return_ACPI_STATUS(status);
474		}
475	}
476
477	memset(&info, 0, sizeof(struct acpi_create_field_info));
478
479	/* Second arg is the field flags */
480
481	arg = arg->common.next;
482	info.field_flags = (u8) arg->common.value.integer;
483	info.attribute = 0;
484
485	/* Each remaining arg is a Named Field */
486
487	info.field_type = ACPI_TYPE_LOCAL_REGION_FIELD;
488	info.region_node = region_node;
489
490	status = acpi_ds_get_field_names(&info, walk_state, arg->common.next);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
491	return_ACPI_STATUS(status);
492}
493
494/*******************************************************************************
495 *
496 * FUNCTION:    acpi_ds_init_field_objects
497 *
498 * PARAMETERS:  op              - Op containing the Field definition and args
499 *  `           walk_state      - Current method state
500 *
501 * RETURN:      Status
502 *
503 * DESCRIPTION: For each "Field Unit" name in the argument list that is
504 *              part of the field declaration, enter the name into the
505 *              namespace.
506 *
507 ******************************************************************************/
508
509acpi_status
510acpi_ds_init_field_objects(union acpi_parse_object *op,
511			   struct acpi_walk_state *walk_state)
512{
513	acpi_status status;
514	union acpi_parse_object *arg = NULL;
515	struct acpi_namespace_node *node;
516	u8 type = 0;
517	u32 flags;
518
519	ACPI_FUNCTION_TRACE_PTR(ds_init_field_objects, op);
520
521	/* Execute flag should always be set when this function is entered */
522
523	if (!(walk_state->parse_flags & ACPI_PARSE_EXECUTE)) {
524		if (walk_state->parse_flags & ACPI_PARSE_DEFERRED_OP) {
525
526			/* bank_field Op is deferred, just return OK */
527
528			return_ACPI_STATUS(AE_OK);
529		}
530
531		ACPI_ERROR((AE_INFO, "Parse deferred mode is not set"));
532		return_ACPI_STATUS(AE_AML_INTERNAL);
533	}
534
535	/*
536	 * Get the field_list argument for this opcode. This is the start of the
537	 * list of field elements.
538	 */
539	switch (walk_state->opcode) {
540	case AML_FIELD_OP:
541
542		arg = acpi_ps_get_arg(op, 2);
543		type = ACPI_TYPE_LOCAL_REGION_FIELD;
544		break;
545
546	case AML_BANK_FIELD_OP:
547
548		arg = acpi_ps_get_arg(op, 4);
549		type = ACPI_TYPE_LOCAL_BANK_FIELD;
550		break;
551
552	case AML_INDEX_FIELD_OP:
553
554		arg = acpi_ps_get_arg(op, 3);
555		type = ACPI_TYPE_LOCAL_INDEX_FIELD;
556		break;
557
558	default:
559
560		return_ACPI_STATUS(AE_BAD_PARAMETER);
561	}
562
563	/* Creating new namespace node(s), should not already exist */
564
565	flags = ACPI_NS_NO_UPSEARCH | ACPI_NS_DONT_OPEN_SCOPE |
566	    ACPI_NS_ERROR_IF_FOUND;
567
568	/*
569	 * Mark node(s) temporary if we are executing a normal control
570	 * method. (Don't mark if this is a module-level code method)
571	 */
572	if (walk_state->method_node &&
573	    !(walk_state->parse_flags & ACPI_PARSE_MODULE_LEVEL)) {
574		flags |= ACPI_NS_TEMPORARY;
575	}
576
 
 
577	/*
578	 * Walk the list of entries in the field_list
579	 * Note: field_list can be of zero length. In this case, Arg will be NULL.
580	 */
581	while (arg) {
582		/*
583		 * Ignore OFFSET/ACCESSAS/CONNECTION terms here; we are only interested
584		 * in the field names in order to enter them into the namespace.
585		 */
586		if (arg->common.aml_opcode == AML_INT_NAMEDFIELD_OP) {
587			status = acpi_ns_lookup(walk_state->scope_info,
588						(char *)&arg->named.name, type,
589						ACPI_IMODE_LOAD_PASS1, flags,
590						walk_state, &node);
591			if (ACPI_FAILURE(status)) {
592				ACPI_ERROR_NAMESPACE(walk_state->scope_info,
593						     (char *)&arg->named.name,
594						     status);
595				if (status != AE_ALREADY_EXISTS) {
596					return_ACPI_STATUS(status);
597				}
598
599				/* Name already exists, just ignore this error */
600
601				status = AE_OK;
602			}
603
604			arg->common.node = node;
605		}
606
607		/* Get the next field element in the list */
608
609		arg = arg->common.next;
610	}
611
612	return_ACPI_STATUS(AE_OK);
613}
614
615/*******************************************************************************
616 *
617 * FUNCTION:    acpi_ds_create_bank_field
618 *
619 * PARAMETERS:  op              - Op containing the Field definition and args
620 *              region_node     - Object for the containing Operation Region
621 *              walk_state      - Current method state
622 *
623 * RETURN:      Status
624 *
625 * DESCRIPTION: Create a new bank field in the specified operation region
626 *
627 ******************************************************************************/
628
629acpi_status
630acpi_ds_create_bank_field(union acpi_parse_object *op,
631			  struct acpi_namespace_node *region_node,
632			  struct acpi_walk_state *walk_state)
633{
634	acpi_status status;
635	union acpi_parse_object *arg;
636	struct acpi_create_field_info info;
637
638	ACPI_FUNCTION_TRACE_PTR(ds_create_bank_field, op);
639
640	/* First arg is the name of the parent op_region (must already exist) */
641
642	arg = op->common.value.arg;
643	if (!region_node) {
644		status =
645		    acpi_ns_lookup(walk_state->scope_info,
646				   arg->common.value.name, ACPI_TYPE_REGION,
647				   ACPI_IMODE_EXECUTE, ACPI_NS_SEARCH_PARENT,
648				   walk_state, &region_node);
649#ifdef ACPI_ASL_COMPILER
650		status = acpi_ds_create_external_region(status, arg,
651							arg->common.value.name,
652							walk_state,
653							&region_node);
654#endif
655		if (ACPI_FAILURE(status)) {
656			ACPI_ERROR_NAMESPACE(walk_state->scope_info,
657					     arg->common.value.name, status);
658			return_ACPI_STATUS(status);
659		}
660	}
661
662	/* Second arg is the Bank Register (Field) (must already exist) */
663
664	arg = arg->common.next;
665	status =
666	    acpi_ns_lookup(walk_state->scope_info, arg->common.value.string,
667			   ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
668			   ACPI_NS_SEARCH_PARENT, walk_state,
669			   &info.register_node);
670	if (ACPI_FAILURE(status)) {
671		ACPI_ERROR_NAMESPACE(walk_state->scope_info,
672				     arg->common.value.string, status);
673		return_ACPI_STATUS(status);
674	}
675
676	/*
677	 * Third arg is the bank_value
678	 * This arg is a term_arg, not a constant
679	 * It will be evaluated later, by acpi_ds_eval_bank_field_operands
680	 */
681	arg = arg->common.next;
682
683	/* Fourth arg is the field flags */
684
685	arg = arg->common.next;
686	info.field_flags = (u8) arg->common.value.integer;
687
688	/* Each remaining arg is a Named Field */
689
690	info.field_type = ACPI_TYPE_LOCAL_BANK_FIELD;
691	info.region_node = region_node;
692
693	/*
694	 * Use Info.data_register_node to store bank_field Op
695	 * It's safe because data_register_node will never be used when create
696	 * bank field \we store aml_start and aml_length in the bank_field Op for
697	 * late evaluation. Used in acpi_ex_prep_field_value(Info)
698	 *
699	 * TBD: Or, should we add a field in struct acpi_create_field_info, like
700	 * "void *ParentOp"?
701	 */
702	info.data_register_node = (struct acpi_namespace_node *)op;
703
704	status = acpi_ds_get_field_names(&info, walk_state, arg->common.next);
705	return_ACPI_STATUS(status);
706}
707
708/*******************************************************************************
709 *
710 * FUNCTION:    acpi_ds_create_index_field
711 *
712 * PARAMETERS:  op              - Op containing the Field definition and args
713 *              region_node     - Object for the containing Operation Region
714 *  `           walk_state      - Current method state
715 *
716 * RETURN:      Status
717 *
718 * DESCRIPTION: Create a new index field in the specified operation region
719 *
720 ******************************************************************************/
721
722acpi_status
723acpi_ds_create_index_field(union acpi_parse_object *op,
724			   struct acpi_namespace_node *region_node,
725			   struct acpi_walk_state *walk_state)
726{
727	acpi_status status;
728	union acpi_parse_object *arg;
729	struct acpi_create_field_info info;
730
731	ACPI_FUNCTION_TRACE_PTR(ds_create_index_field, op);
732
733	/* First arg is the name of the Index register (must already exist) */
734
735	arg = op->common.value.arg;
736	status =
737	    acpi_ns_lookup(walk_state->scope_info, arg->common.value.string,
738			   ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
739			   ACPI_NS_SEARCH_PARENT, walk_state,
740			   &info.register_node);
741	if (ACPI_FAILURE(status)) {
742		ACPI_ERROR_NAMESPACE(walk_state->scope_info,
743				     arg->common.value.string, status);
744		return_ACPI_STATUS(status);
745	}
746
747	/* Second arg is the data register (must already exist) */
748
749	arg = arg->common.next;
750	status =
751	    acpi_ns_lookup(walk_state->scope_info, arg->common.value.string,
752			   ACPI_TYPE_ANY, ACPI_IMODE_EXECUTE,
753			   ACPI_NS_SEARCH_PARENT, walk_state,
754			   &info.data_register_node);
755	if (ACPI_FAILURE(status)) {
756		ACPI_ERROR_NAMESPACE(walk_state->scope_info,
757				     arg->common.value.string, status);
758		return_ACPI_STATUS(status);
759	}
760
761	/* Next arg is the field flags */
762
763	arg = arg->common.next;
764	info.field_flags = (u8) arg->common.value.integer;
765
766	/* Each remaining arg is a Named Field */
767
768	info.field_type = ACPI_TYPE_LOCAL_INDEX_FIELD;
769	info.region_node = region_node;
770
771	status = acpi_ds_get_field_names(&info, walk_state, arg->common.next);
772	return_ACPI_STATUS(status);
773}