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
23 ACPI_MODULE_NAME("dsfield")
24 
25 /* Local prototypes */
26 #ifdef ACPI_ASL_COMPILER
27 #include "acdisasm.h"
28 static acpi_status
29 acpi_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 
36 static acpi_status
37 acpi_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 
59 static acpi_status
acpi_ds_create_external_region(acpi_status lookup_status,union acpi_parse_object * op,char * path,struct acpi_walk_state * walk_state,struct acpi_namespace_node ** node)60 acpi_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 
119 acpi_status
acpi_ds_create_buffer_field(union acpi_parse_object * op,struct acpi_walk_state * walk_state)120 acpi_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 
236 cleanup:
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 
259 static acpi_status
acpi_ds_get_field_names(struct acpi_create_field_info * info,struct acpi_walk_state * walk_state,union acpi_parse_object * arg)260 acpi_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 
472 acpi_status
acpi_ds_create_field(union acpi_parse_object * op,struct acpi_namespace_node * region_node,struct acpi_walk_state * walk_state)473 acpi_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 
552 acpi_status
acpi_ds_init_field_objects(union acpi_parse_object * op,struct acpi_walk_state * walk_state)553 acpi_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 
672 acpi_status
acpi_ds_create_bank_field(union acpi_parse_object * op,struct acpi_namespace_node * region_node,struct acpi_walk_state * walk_state)673 acpi_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 
765 acpi_status
acpi_ds_create_index_field(union acpi_parse_object * op,struct acpi_namespace_node * region_node,struct acpi_walk_state * walk_state)766 acpi_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 }
817