Loading...
1/******************************************************************************
2 *
3 * Module Name: pstree - Parser op tree manipulation/traversal/search
4 *
5 *****************************************************************************/
6
7/*
8 * Copyright (C) 2000 - 2011, 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#include <acpi/acpi.h>
45#include "accommon.h"
46#include "acparser.h"
47#include "amlcode.h"
48
49#define _COMPONENT ACPI_PARSER
50ACPI_MODULE_NAME("pstree")
51
52/* Local prototypes */
53#ifdef ACPI_OBSOLETE_FUNCTIONS
54union acpi_parse_object *acpi_ps_get_child(union acpi_parse_object *op);
55#endif
56
57/*******************************************************************************
58 *
59 * FUNCTION: acpi_ps_get_arg
60 *
61 * PARAMETERS: Op - Get an argument for this op
62 * Argn - Nth argument to get
63 *
64 * RETURN: The argument (as an Op object). NULL if argument does not exist
65 *
66 * DESCRIPTION: Get the specified op's argument.
67 *
68 ******************************************************************************/
69
70union acpi_parse_object *acpi_ps_get_arg(union acpi_parse_object *op, u32 argn)
71{
72 union acpi_parse_object *arg = NULL;
73 const struct acpi_opcode_info *op_info;
74
75 ACPI_FUNCTION_ENTRY();
76
77 /* Get the info structure for this opcode */
78
79 op_info = acpi_ps_get_opcode_info(op->common.aml_opcode);
80 if (op_info->class == AML_CLASS_UNKNOWN) {
81
82 /* Invalid opcode or ASCII character */
83
84 return (NULL);
85 }
86
87 /* Check if this opcode requires argument sub-objects */
88
89 if (!(op_info->flags & AML_HAS_ARGS)) {
90
91 /* Has no linked argument objects */
92
93 return (NULL);
94 }
95
96 /* Get the requested argument object */
97
98 arg = op->common.value.arg;
99 while (arg && argn) {
100 argn--;
101 arg = arg->common.next;
102 }
103
104 return (arg);
105}
106
107/*******************************************************************************
108 *
109 * FUNCTION: acpi_ps_append_arg
110 *
111 * PARAMETERS: Op - Append an argument to this Op.
112 * Arg - Argument Op to append
113 *
114 * RETURN: None.
115 *
116 * DESCRIPTION: Append an argument to an op's argument list (a NULL arg is OK)
117 *
118 ******************************************************************************/
119
120void
121acpi_ps_append_arg(union acpi_parse_object *op, union acpi_parse_object *arg)
122{
123 union acpi_parse_object *prev_arg;
124 const struct acpi_opcode_info *op_info;
125
126 ACPI_FUNCTION_ENTRY();
127
128 if (!op) {
129 return;
130 }
131
132 /* Get the info structure for this opcode */
133
134 op_info = acpi_ps_get_opcode_info(op->common.aml_opcode);
135 if (op_info->class == AML_CLASS_UNKNOWN) {
136
137 /* Invalid opcode */
138
139 ACPI_ERROR((AE_INFO, "Invalid AML Opcode: 0x%2.2X",
140 op->common.aml_opcode));
141 return;
142 }
143
144 /* Check if this opcode requires argument sub-objects */
145
146 if (!(op_info->flags & AML_HAS_ARGS)) {
147
148 /* Has no linked argument objects */
149
150 return;
151 }
152
153 /* Append the argument to the linked argument list */
154
155 if (op->common.value.arg) {
156
157 /* Append to existing argument list */
158
159 prev_arg = op->common.value.arg;
160 while (prev_arg->common.next) {
161 prev_arg = prev_arg->common.next;
162 }
163 prev_arg->common.next = arg;
164 } else {
165 /* No argument list, this will be the first argument */
166
167 op->common.value.arg = arg;
168 }
169
170 /* Set the parent in this arg and any args linked after it */
171
172 while (arg) {
173 arg->common.parent = op;
174 arg = arg->common.next;
175
176 op->common.arg_list_length++;
177 }
178}
179
180#ifdef ACPI_FUTURE_USAGE
181/*******************************************************************************
182 *
183 * FUNCTION: acpi_ps_get_depth_next
184 *
185 * PARAMETERS: Origin - Root of subtree to search
186 * Op - Last (previous) Op that was found
187 *
188 * RETURN: Next Op found in the search.
189 *
190 * DESCRIPTION: Get next op in tree (walking the tree in depth-first order)
191 * Return NULL when reaching "origin" or when walking up from root
192 *
193 ******************************************************************************/
194
195union acpi_parse_object *acpi_ps_get_depth_next(union acpi_parse_object *origin,
196 union acpi_parse_object *op)
197{
198 union acpi_parse_object *next = NULL;
199 union acpi_parse_object *parent;
200 union acpi_parse_object *arg;
201
202 ACPI_FUNCTION_ENTRY();
203
204 if (!op) {
205 return (NULL);
206 }
207
208 /* Look for an argument or child */
209
210 next = acpi_ps_get_arg(op, 0);
211 if (next) {
212 return (next);
213 }
214
215 /* Look for a sibling */
216
217 next = op->common.next;
218 if (next) {
219 return (next);
220 }
221
222 /* Look for a sibling of parent */
223
224 parent = op->common.parent;
225
226 while (parent) {
227 arg = acpi_ps_get_arg(parent, 0);
228 while (arg && (arg != origin) && (arg != op)) {
229 arg = arg->common.next;
230 }
231
232 if (arg == origin) {
233
234 /* Reached parent of origin, end search */
235
236 return (NULL);
237 }
238
239 if (parent->common.next) {
240
241 /* Found sibling of parent */
242
243 return (parent->common.next);
244 }
245
246 op = parent;
247 parent = parent->common.parent;
248 }
249
250 return (next);
251}
252
253#ifdef ACPI_OBSOLETE_FUNCTIONS
254/*******************************************************************************
255 *
256 * FUNCTION: acpi_ps_get_child
257 *
258 * PARAMETERS: Op - Get the child of this Op
259 *
260 * RETURN: Child Op, Null if none is found.
261 *
262 * DESCRIPTION: Get op's children or NULL if none
263 *
264 ******************************************************************************/
265
266union acpi_parse_object *acpi_ps_get_child(union acpi_parse_object *op)
267{
268 union acpi_parse_object *child = NULL;
269
270 ACPI_FUNCTION_ENTRY();
271
272 switch (op->common.aml_opcode) {
273 case AML_SCOPE_OP:
274 case AML_ELSE_OP:
275 case AML_DEVICE_OP:
276 case AML_THERMAL_ZONE_OP:
277 case AML_INT_METHODCALL_OP:
278
279 child = acpi_ps_get_arg(op, 0);
280 break;
281
282 case AML_BUFFER_OP:
283 case AML_PACKAGE_OP:
284 case AML_METHOD_OP:
285 case AML_IF_OP:
286 case AML_WHILE_OP:
287 case AML_FIELD_OP:
288
289 child = acpi_ps_get_arg(op, 1);
290 break;
291
292 case AML_POWER_RES_OP:
293 case AML_INDEX_FIELD_OP:
294
295 child = acpi_ps_get_arg(op, 2);
296 break;
297
298 case AML_PROCESSOR_OP:
299 case AML_BANK_FIELD_OP:
300
301 child = acpi_ps_get_arg(op, 3);
302 break;
303
304 default:
305 /* All others have no children */
306 break;
307 }
308
309 return (child);
310}
311#endif
312#endif /* ACPI_FUTURE_USAGE */
1// SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0
2/******************************************************************************
3 *
4 * Module Name: pstree - Parser op tree manipulation/traversal/search
5 *
6 * Copyright (C) 2000 - 2021, Intel Corp.
7 *
8 *****************************************************************************/
9
10#include <acpi/acpi.h>
11#include "accommon.h"
12#include "acparser.h"
13#include "amlcode.h"
14#include "acconvert.h"
15
16#define _COMPONENT ACPI_PARSER
17ACPI_MODULE_NAME("pstree")
18
19/* Local prototypes */
20#ifdef ACPI_OBSOLETE_FUNCTIONS
21union acpi_parse_object *acpi_ps_get_child(union acpi_parse_object *op);
22#endif
23
24/*******************************************************************************
25 *
26 * FUNCTION: acpi_ps_get_arg
27 *
28 * PARAMETERS: op - Get an argument for this op
29 * argn - Nth argument to get
30 *
31 * RETURN: The argument (as an Op object). NULL if argument does not exist
32 *
33 * DESCRIPTION: Get the specified op's argument.
34 *
35 ******************************************************************************/
36
37union acpi_parse_object *acpi_ps_get_arg(union acpi_parse_object *op, u32 argn)
38{
39 union acpi_parse_object *arg = NULL;
40 const struct acpi_opcode_info *op_info;
41
42 ACPI_FUNCTION_ENTRY();
43
44/*
45 if (Op->Common.aml_opcode == AML_INT_CONNECTION_OP)
46 {
47 return (Op->Common.Value.Arg);
48 }
49*/
50 /* Get the info structure for this opcode */
51
52 op_info = acpi_ps_get_opcode_info(op->common.aml_opcode);
53 if (op_info->class == AML_CLASS_UNKNOWN) {
54
55 /* Invalid opcode or ASCII character */
56
57 return (NULL);
58 }
59
60 /* Check if this opcode requires argument sub-objects */
61
62 if (!(op_info->flags & AML_HAS_ARGS)) {
63
64 /* Has no linked argument objects */
65
66 return (NULL);
67 }
68
69 /* Get the requested argument object */
70
71 arg = op->common.value.arg;
72 while (arg && argn) {
73 argn--;
74 arg = arg->common.next;
75 }
76
77 return (arg);
78}
79
80/*******************************************************************************
81 *
82 * FUNCTION: acpi_ps_append_arg
83 *
84 * PARAMETERS: op - Append an argument to this Op.
85 * arg - Argument Op to append
86 *
87 * RETURN: None.
88 *
89 * DESCRIPTION: Append an argument to an op's argument list (a NULL arg is OK)
90 *
91 ******************************************************************************/
92
93void
94acpi_ps_append_arg(union acpi_parse_object *op, union acpi_parse_object *arg)
95{
96 union acpi_parse_object *prev_arg;
97 const struct acpi_opcode_info *op_info;
98
99 ACPI_FUNCTION_TRACE(ps_append_arg);
100
101 if (!op) {
102 return_VOID;
103 }
104
105 /* Get the info structure for this opcode */
106
107 op_info = acpi_ps_get_opcode_info(op->common.aml_opcode);
108 if (op_info->class == AML_CLASS_UNKNOWN) {
109
110 /* Invalid opcode */
111
112 ACPI_ERROR((AE_INFO, "Invalid AML Opcode: 0x%2.2X",
113 op->common.aml_opcode));
114 return_VOID;
115 }
116
117 /* Check if this opcode requires argument sub-objects */
118
119 if (!(op_info->flags & AML_HAS_ARGS)) {
120
121 /* Has no linked argument objects */
122
123 return_VOID;
124 }
125
126 /* Append the argument to the linked argument list */
127
128 if (op->common.value.arg) {
129
130 /* Append to existing argument list */
131
132 prev_arg = op->common.value.arg;
133 while (prev_arg->common.next) {
134 prev_arg = prev_arg->common.next;
135 }
136 prev_arg->common.next = arg;
137 } else {
138 /* No argument list, this will be the first argument */
139
140 op->common.value.arg = arg;
141 }
142
143 /* Set the parent in this arg and any args linked after it */
144
145 while (arg) {
146 arg->common.parent = op;
147 arg = arg->common.next;
148
149 op->common.arg_list_length++;
150 }
151
152 return_VOID;
153}
154
155/*******************************************************************************
156 *
157 * FUNCTION: acpi_ps_get_depth_next
158 *
159 * PARAMETERS: origin - Root of subtree to search
160 * op - Last (previous) Op that was found
161 *
162 * RETURN: Next Op found in the search.
163 *
164 * DESCRIPTION: Get next op in tree (walking the tree in depth-first order)
165 * Return NULL when reaching "origin" or when walking up from root
166 *
167 ******************************************************************************/
168
169union acpi_parse_object *acpi_ps_get_depth_next(union acpi_parse_object *origin,
170 union acpi_parse_object *op)
171{
172 union acpi_parse_object *next = NULL;
173 union acpi_parse_object *parent;
174 union acpi_parse_object *arg;
175
176 ACPI_FUNCTION_ENTRY();
177
178 if (!op) {
179 return (NULL);
180 }
181
182 /* Look for an argument or child */
183
184 next = acpi_ps_get_arg(op, 0);
185 if (next) {
186 ASL_CV_LABEL_FILENODE(next);
187 return (next);
188 }
189
190 /* Look for a sibling */
191
192 next = op->common.next;
193 if (next) {
194 ASL_CV_LABEL_FILENODE(next);
195 return (next);
196 }
197
198 /* Look for a sibling of parent */
199
200 parent = op->common.parent;
201
202 while (parent) {
203 arg = acpi_ps_get_arg(parent, 0);
204 while (arg && (arg != origin) && (arg != op)) {
205
206 ASL_CV_LABEL_FILENODE(arg);
207 arg = arg->common.next;
208 }
209
210 if (arg == origin) {
211
212 /* Reached parent of origin, end search */
213
214 return (NULL);
215 }
216
217 if (parent->common.next) {
218
219 /* Found sibling of parent */
220
221 ASL_CV_LABEL_FILENODE(parent->common.next);
222 return (parent->common.next);
223 }
224
225 op = parent;
226 parent = parent->common.parent;
227 }
228
229 ASL_CV_LABEL_FILENODE(next);
230 return (next);
231}
232
233#ifdef ACPI_OBSOLETE_FUNCTIONS
234/*******************************************************************************
235 *
236 * FUNCTION: acpi_ps_get_child
237 *
238 * PARAMETERS: op - Get the child of this Op
239 *
240 * RETURN: Child Op, Null if none is found.
241 *
242 * DESCRIPTION: Get op's children or NULL if none
243 *
244 ******************************************************************************/
245
246union acpi_parse_object *acpi_ps_get_child(union acpi_parse_object *op)
247{
248 union acpi_parse_object *child = NULL;
249
250 ACPI_FUNCTION_ENTRY();
251
252 switch (op->common.aml_opcode) {
253 case AML_SCOPE_OP:
254 case AML_ELSE_OP:
255 case AML_DEVICE_OP:
256 case AML_THERMAL_ZONE_OP:
257 case AML_INT_METHODCALL_OP:
258
259 child = acpi_ps_get_arg(op, 0);
260 break;
261
262 case AML_BUFFER_OP:
263 case AML_PACKAGE_OP:
264 case AML_VARIABLE_PACKAGE_OP:
265 case AML_METHOD_OP:
266 case AML_IF_OP:
267 case AML_WHILE_OP:
268 case AML_FIELD_OP:
269
270 child = acpi_ps_get_arg(op, 1);
271 break;
272
273 case AML_POWER_RESOURCE_OP:
274 case AML_INDEX_FIELD_OP:
275
276 child = acpi_ps_get_arg(op, 2);
277 break;
278
279 case AML_PROCESSOR_OP:
280 case AML_BANK_FIELD_OP:
281
282 child = acpi_ps_get_arg(op, 3);
283 break;
284
285 default:
286
287 /* All others have no children */
288
289 break;
290 }
291
292 return (child);
293}
294#endif