Loading...
1// SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0
2/******************************************************************************
3 *
4 * Module Name: exdebug - Support for stores to the AML Debug Object
5 *
6 * Copyright (C) 2000 - 2023, Intel Corp.
7 *
8 *****************************************************************************/
9
10#include <acpi/acpi.h>
11#include "accommon.h"
12#include "acinterp.h"
13
14#define _COMPONENT ACPI_EXECUTER
15ACPI_MODULE_NAME("exdebug")
16
17#ifndef ACPI_NO_ERROR_MESSAGES
18/*******************************************************************************
19 *
20 * FUNCTION: acpi_ex_do_debug_object
21 *
22 * PARAMETERS: source_desc - Object to be output to "Debug Object"
23 * level - Indentation level (used for packages)
24 * index - Current package element, zero if not pkg
25 *
26 * RETURN: None
27 *
28 * DESCRIPTION: Handles stores to the AML Debug Object. For example:
29 * Store(INT1, Debug)
30 *
31 * This function is not compiled if ACPI_NO_ERROR_MESSAGES is set.
32 *
33 * This function is only enabled if acpi_gbl_enable_aml_debug_object is set, or
34 * if ACPI_LV_DEBUG_OBJECT is set in the acpi_dbg_level. Thus, in the normal
35 * operational case, stores to the debug object are ignored but can be easily
36 * enabled if necessary.
37 *
38 ******************************************************************************/
39void
40acpi_ex_do_debug_object(union acpi_operand_object *source_desc,
41 u32 level, u32 index)
42{
43 u32 i;
44 u32 timer;
45 union acpi_operand_object *object_desc;
46 u32 value;
47
48 ACPI_FUNCTION_TRACE_PTR(ex_do_debug_object, source_desc);
49
50 /* Output must be enabled via the debug_object global or the dbg_level */
51
52 if (!acpi_gbl_enable_aml_debug_object &&
53 !(acpi_dbg_level & ACPI_LV_DEBUG_OBJECT)) {
54 return_VOID;
55 }
56
57 /* Newline -- don't emit the line header */
58
59 if (source_desc &&
60 (ACPI_GET_DESCRIPTOR_TYPE(source_desc) == ACPI_DESC_TYPE_OPERAND) &&
61 (source_desc->common.type == ACPI_TYPE_STRING)) {
62 if ((source_desc->string.length == 1) &&
63 (*source_desc->string.pointer == '\n')) {
64 acpi_os_printf("\n");
65 return_VOID;
66 }
67 }
68
69 /*
70 * Print line header as long as we are not in the middle of an
71 * object display
72 */
73 if (!((level > 0) && index == 0)) {
74 if (acpi_gbl_display_debug_timer) {
75 /*
76 * We will emit the current timer value (in microseconds) with each
77 * debug output. Only need the lower 26 bits. This allows for 67
78 * million microseconds or 67 seconds before rollover.
79 *
80 * Convert 100 nanosecond units to microseconds
81 */
82 timer = ((u32)acpi_os_get_timer() / 10);
83 timer &= 0x03FFFFFF;
84
85 acpi_os_printf("ACPI Debug: T=0x%8.8X %*s", timer,
86 level, " ");
87 } else {
88 acpi_os_printf("ACPI Debug: %*s", level, " ");
89 }
90 }
91
92 /* Display the index for package output only */
93
94 if (index > 0) {
95 acpi_os_printf("(%.2u) ", index - 1);
96 }
97
98 if (!source_desc) {
99 acpi_os_printf("[Null Object]\n");
100 return_VOID;
101 }
102
103 if (ACPI_GET_DESCRIPTOR_TYPE(source_desc) == ACPI_DESC_TYPE_OPERAND) {
104
105 /* No object type prefix needed for integers and strings */
106
107 if ((source_desc->common.type != ACPI_TYPE_INTEGER) &&
108 (source_desc->common.type != ACPI_TYPE_STRING)) {
109 acpi_os_printf("%s ",
110 acpi_ut_get_object_type_name
111 (source_desc));
112 }
113
114 if (!acpi_ut_valid_internal_object(source_desc)) {
115 acpi_os_printf("%p, Invalid Internal Object!\n",
116 source_desc);
117 return_VOID;
118 }
119 } else if (ACPI_GET_DESCRIPTOR_TYPE(source_desc) ==
120 ACPI_DESC_TYPE_NAMED) {
121 acpi_os_printf("%s (Node %p)\n",
122 acpi_ut_get_type_name(((struct
123 acpi_namespace_node *)
124 source_desc)->type),
125 source_desc);
126 return_VOID;
127 } else {
128 return_VOID;
129 }
130
131 /* source_desc is of type ACPI_DESC_TYPE_OPERAND */
132
133 switch (source_desc->common.type) {
134 case ACPI_TYPE_INTEGER:
135
136 /* Output correct integer width */
137
138 if (acpi_gbl_integer_byte_width == 4) {
139 acpi_os_printf("0x%8.8X\n",
140 (u32)source_desc->integer.value);
141 } else {
142 acpi_os_printf("0x%8.8X%8.8X\n",
143 ACPI_FORMAT_UINT64(source_desc->integer.
144 value));
145 }
146 break;
147
148 case ACPI_TYPE_BUFFER:
149
150 acpi_os_printf("[0x%.2X]\n", (u32)source_desc->buffer.length);
151 acpi_ut_dump_buffer(source_desc->buffer.pointer,
152 (source_desc->buffer.length < 256) ?
153 source_desc->buffer.length : 256,
154 DB_BYTE_DISPLAY, 0);
155 break;
156
157 case ACPI_TYPE_STRING:
158
159 acpi_os_printf("\"%s\"\n", source_desc->string.pointer);
160 break;
161
162 case ACPI_TYPE_PACKAGE:
163
164 acpi_os_printf("(Contains 0x%.2X Elements):\n",
165 source_desc->package.count);
166
167 /* Output the entire contents of the package */
168
169 for (i = 0; i < source_desc->package.count; i++) {
170 acpi_ex_do_debug_object(source_desc->package.
171 elements[i], level + 4, i + 1);
172 }
173 break;
174
175 case ACPI_TYPE_LOCAL_REFERENCE:
176
177 acpi_os_printf("[%s] ",
178 acpi_ut_get_reference_name(source_desc));
179
180 /* Decode the reference */
181
182 switch (source_desc->reference.class) {
183 case ACPI_REFCLASS_INDEX:
184
185 acpi_os_printf("0x%X\n", source_desc->reference.value);
186 break;
187
188 case ACPI_REFCLASS_TABLE:
189
190 /* Case for ddb_handle */
191
192 acpi_os_printf("Table Index 0x%X\n",
193 source_desc->reference.value);
194 return_VOID;
195
196 default:
197
198 break;
199 }
200
201 acpi_os_printf(" ");
202
203 /* Check for valid node first, then valid object */
204
205 if (source_desc->reference.node) {
206 if (ACPI_GET_DESCRIPTOR_TYPE
207 (source_desc->reference.node) !=
208 ACPI_DESC_TYPE_NAMED) {
209 acpi_os_printf
210 (" %p - Not a valid namespace node\n",
211 source_desc->reference.node);
212 } else {
213 acpi_os_printf("Node %p [%4.4s] ",
214 source_desc->reference.node,
215 (source_desc->reference.node)->
216 name.ascii);
217
218 switch ((source_desc->reference.node)->type) {
219
220 /* These types have no attached object */
221
222 case ACPI_TYPE_DEVICE:
223 acpi_os_printf("Device\n");
224 break;
225
226 case ACPI_TYPE_THERMAL:
227 acpi_os_printf("Thermal Zone\n");
228 break;
229
230 default:
231
232 acpi_ex_do_debug_object((source_desc->
233 reference.
234 node)->object,
235 level + 4, 0);
236 break;
237 }
238 }
239 } else if (source_desc->reference.object) {
240 if (ACPI_GET_DESCRIPTOR_TYPE
241 (source_desc->reference.object) ==
242 ACPI_DESC_TYPE_NAMED) {
243
244 /* Reference object is a namespace node */
245
246 acpi_ex_do_debug_object(ACPI_CAST_PTR
247 (union
248 acpi_operand_object,
249 source_desc->reference.
250 object), level + 4, 0);
251 } else {
252 object_desc = source_desc->reference.object;
253 value = source_desc->reference.value;
254
255 switch (object_desc->common.type) {
256 case ACPI_TYPE_BUFFER:
257
258 acpi_os_printf("Buffer[%u] = 0x%2.2X\n",
259 value,
260 *source_desc->reference.
261 index_pointer);
262 break;
263
264 case ACPI_TYPE_STRING:
265
266 acpi_os_printf
267 ("String[%u] = \"%c\" (0x%2.2X)\n",
268 value,
269 *source_desc->reference.
270 index_pointer,
271 *source_desc->reference.
272 index_pointer);
273 break;
274
275 case ACPI_TYPE_PACKAGE:
276
277 acpi_os_printf("Package[%u] = ", value);
278 if (!(*source_desc->reference.where)) {
279 acpi_os_printf
280 ("[Uninitialized Package Element]\n");
281 } else {
282 acpi_ex_do_debug_object
283 (*source_desc->reference.
284 where, level + 4, 0);
285 }
286 break;
287
288 default:
289
290 acpi_os_printf
291 ("Unknown Reference object type %X\n",
292 object_desc->common.type);
293 break;
294 }
295 }
296 }
297 break;
298
299 default:
300
301 acpi_os_printf("(Descriptor %p)\n", source_desc);
302 break;
303 }
304
305 ACPI_DEBUG_PRINT_RAW((ACPI_DB_EXEC, "\n"));
306 return_VOID;
307}
308#endif
1/******************************************************************************
2 *
3 * Module Name: exdebug - Support for stores to the AML Debug Object
4 *
5 *****************************************************************************/
6
7/*
8 * Copyright (C) 2000 - 2016, 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 "acinterp.h"
47
48#define _COMPONENT ACPI_EXECUTER
49ACPI_MODULE_NAME("exdebug")
50
51#ifndef ACPI_NO_ERROR_MESSAGES
52/*******************************************************************************
53 *
54 * FUNCTION: acpi_ex_do_debug_object
55 *
56 * PARAMETERS: source_desc - Object to be output to "Debug Object"
57 * level - Indentation level (used for packages)
58 * index - Current package element, zero if not pkg
59 *
60 * RETURN: None
61 *
62 * DESCRIPTION: Handles stores to the AML Debug Object. For example:
63 * Store(INT1, Debug)
64 *
65 * This function is not compiled if ACPI_NO_ERROR_MESSAGES is set.
66 *
67 * This function is only enabled if acpi_gbl_enable_aml_debug_object is set, or
68 * if ACPI_LV_DEBUG_OBJECT is set in the acpi_dbg_level. Thus, in the normal
69 * operational case, stores to the debug object are ignored but can be easily
70 * enabled if necessary.
71 *
72 ******************************************************************************/
73void
74acpi_ex_do_debug_object(union acpi_operand_object *source_desc,
75 u32 level, u32 index)
76{
77 u32 i;
78 u32 timer;
79 union acpi_operand_object *object_desc;
80 u32 value;
81
82 ACPI_FUNCTION_TRACE_PTR(ex_do_debug_object, source_desc);
83
84 /* Output must be enabled via the debug_object global or the dbg_level */
85
86 if (!acpi_gbl_enable_aml_debug_object &&
87 !(acpi_dbg_level & ACPI_LV_DEBUG_OBJECT)) {
88 return_VOID;
89 }
90
91 /* Null string or newline -- don't emit the line header */
92
93 if (source_desc &&
94 (ACPI_GET_DESCRIPTOR_TYPE(source_desc) == ACPI_DESC_TYPE_OPERAND) &&
95 (source_desc->common.type == ACPI_TYPE_STRING)) {
96 if ((source_desc->string.length == 0) ||
97 ((source_desc->string.length == 1) &&
98 (*source_desc->string.pointer == '\n'))) {
99 acpi_os_printf("\n");
100 return_VOID;
101 }
102 }
103
104 /*
105 * Print line header as long as we are not in the middle of an
106 * object display
107 */
108 if (!((level > 0) && index == 0)) {
109 if (acpi_gbl_display_debug_timer) {
110 /*
111 * We will emit the current timer value (in microseconds) with each
112 * debug output. Only need the lower 26 bits. This allows for 67
113 * million microseconds or 67 seconds before rollover.
114 *
115 * Convert 100 nanosecond units to microseconds
116 */
117 timer = ((u32)acpi_os_get_timer() / 10);
118 timer &= 0x03FFFFFF;
119
120 acpi_os_printf("[ACPI Debug T=0x%8.8X] %*s", timer,
121 level, " ");
122 } else {
123 acpi_os_printf("[ACPI Debug] %*s", level, " ");
124 }
125 }
126
127 /* Display the index for package output only */
128
129 if (index > 0) {
130 acpi_os_printf("(%.2u) ", index - 1);
131 }
132
133 if (!source_desc) {
134 acpi_os_printf("[Null Object]\n");
135 return_VOID;
136 }
137
138 if (ACPI_GET_DESCRIPTOR_TYPE(source_desc) == ACPI_DESC_TYPE_OPERAND) {
139
140 /* No object type prefix needed for integers and strings */
141
142 if ((source_desc->common.type != ACPI_TYPE_INTEGER) &&
143 (source_desc->common.type != ACPI_TYPE_STRING)) {
144 acpi_os_printf("%s ",
145 acpi_ut_get_object_type_name
146 (source_desc));
147 }
148
149 if (!acpi_ut_valid_internal_object(source_desc)) {
150 acpi_os_printf("%p, Invalid Internal Object!\n",
151 source_desc);
152 return_VOID;
153 }
154 } else if (ACPI_GET_DESCRIPTOR_TYPE(source_desc) ==
155 ACPI_DESC_TYPE_NAMED) {
156 acpi_os_printf("%s (Node %p)\n",
157 acpi_ut_get_type_name(((struct
158 acpi_namespace_node *)
159 source_desc)->type),
160 source_desc);
161 return_VOID;
162 } else {
163 return_VOID;
164 }
165
166 /* source_desc is of type ACPI_DESC_TYPE_OPERAND */
167
168 switch (source_desc->common.type) {
169 case ACPI_TYPE_INTEGER:
170
171 /* Output correct integer width */
172
173 if (acpi_gbl_integer_byte_width == 4) {
174 acpi_os_printf("0x%8.8X\n",
175 (u32)source_desc->integer.value);
176 } else {
177 acpi_os_printf("0x%8.8X%8.8X\n",
178 ACPI_FORMAT_UINT64(source_desc->integer.
179 value));
180 }
181 break;
182
183 case ACPI_TYPE_BUFFER:
184
185 acpi_os_printf("[0x%.2X]\n", (u32)source_desc->buffer.length);
186 acpi_ut_dump_buffer(source_desc->buffer.pointer,
187 (source_desc->buffer.length < 256) ?
188 source_desc->buffer.length : 256,
189 DB_BYTE_DISPLAY, 0);
190 break;
191
192 case ACPI_TYPE_STRING:
193
194 acpi_os_printf("\"%s\"\n", source_desc->string.pointer);
195 break;
196
197 case ACPI_TYPE_PACKAGE:
198
199 acpi_os_printf("(Contains 0x%.2X Elements):\n",
200 source_desc->package.count);
201
202 /* Output the entire contents of the package */
203
204 for (i = 0; i < source_desc->package.count; i++) {
205 acpi_ex_do_debug_object(source_desc->package.
206 elements[i], level + 4, i + 1);
207 }
208 break;
209
210 case ACPI_TYPE_LOCAL_REFERENCE:
211
212 acpi_os_printf("[%s] ",
213 acpi_ut_get_reference_name(source_desc));
214
215 /* Decode the reference */
216
217 switch (source_desc->reference.class) {
218 case ACPI_REFCLASS_INDEX:
219
220 acpi_os_printf("0x%X\n", source_desc->reference.value);
221 break;
222
223 case ACPI_REFCLASS_TABLE:
224
225 /* Case for ddb_handle */
226
227 acpi_os_printf("Table Index 0x%X\n",
228 source_desc->reference.value);
229 return_VOID;
230
231 default:
232
233 break;
234 }
235
236 acpi_os_printf(" ");
237
238 /* Check for valid node first, then valid object */
239
240 if (source_desc->reference.node) {
241 if (ACPI_GET_DESCRIPTOR_TYPE
242 (source_desc->reference.node) !=
243 ACPI_DESC_TYPE_NAMED) {
244 acpi_os_printf
245 (" %p - Not a valid namespace node\n",
246 source_desc->reference.node);
247 } else {
248 acpi_os_printf("Node %p [%4.4s] ",
249 source_desc->reference.node,
250 (source_desc->reference.node)->
251 name.ascii);
252
253 switch ((source_desc->reference.node)->type) {
254
255 /* These types have no attached object */
256
257 case ACPI_TYPE_DEVICE:
258 acpi_os_printf("Device\n");
259 break;
260
261 case ACPI_TYPE_THERMAL:
262 acpi_os_printf("Thermal Zone\n");
263 break;
264
265 default:
266
267 acpi_ex_do_debug_object((source_desc->
268 reference.
269 node)->object,
270 level + 4, 0);
271 break;
272 }
273 }
274 } else if (source_desc->reference.object) {
275 if (ACPI_GET_DESCRIPTOR_TYPE
276 (source_desc->reference.object) ==
277 ACPI_DESC_TYPE_NAMED) {
278
279 /* Reference object is a namespace node */
280
281 acpi_ex_do_debug_object(ACPI_CAST_PTR
282 (union
283 acpi_operand_object,
284 source_desc->reference.
285 object), level + 4, 0);
286 } else {
287 object_desc = source_desc->reference.object;
288 value = source_desc->reference.value;
289
290 switch (object_desc->common.type) {
291 case ACPI_TYPE_BUFFER:
292
293 acpi_os_printf("Buffer[%u] = 0x%2.2X\n",
294 value,
295 *source_desc->reference.
296 index_pointer);
297 break;
298
299 case ACPI_TYPE_STRING:
300
301 acpi_os_printf
302 ("String[%u] = \"%c\" (0x%2.2X)\n",
303 value,
304 *source_desc->reference.
305 index_pointer,
306 *source_desc->reference.
307 index_pointer);
308 break;
309
310 case ACPI_TYPE_PACKAGE:
311
312 acpi_os_printf("Package[%u] = ", value);
313 if (!(*source_desc->reference.where)) {
314 acpi_os_printf
315 ("[Uninitialized Package Element]\n");
316 } else {
317 acpi_ex_do_debug_object
318 (*source_desc->reference.
319 where, level + 4, 0);
320 }
321 break;
322
323 default:
324
325 acpi_os_printf
326 ("Unknown Reference object type %X\n",
327 object_desc->common.type);
328 break;
329 }
330 }
331 }
332 break;
333
334 default:
335
336 acpi_os_printf("(Descriptor %p)\n", source_desc);
337 break;
338 }
339
340 ACPI_DEBUG_PRINT_RAW((ACPI_DB_EXEC, "\n"));
341 return_VOID;
342}
343#endif