1 | // SPDX-License-Identifier: BSD-3-Clause OR GPL-2.0 |
2 | /****************************************************************************** |
3 | * |
4 | * Module Name: nsrepair2 - Repair for objects returned by specific |
5 | * predefined methods |
6 | * |
7 | * Copyright (C) 2000 - 2023, Intel Corp. |
8 | * |
9 | *****************************************************************************/ |
10 | |
11 | #include <acpi/acpi.h> |
12 | #include "accommon.h" |
13 | #include "acnamesp.h" |
14 | |
15 | #define _COMPONENT ACPI_NAMESPACE |
16 | ACPI_MODULE_NAME("nsrepair2" ) |
17 | |
18 | /* |
19 | * Information structure and handler for ACPI predefined names that can |
20 | * be repaired on a per-name basis. |
21 | */ |
22 | typedef |
23 | acpi_status (*acpi_repair_function) (struct acpi_evaluate_info * info, |
24 | union acpi_operand_object ** |
25 | return_object_ptr); |
26 | |
27 | typedef struct acpi_repair_info { |
28 | char name[ACPI_NAMESEG_SIZE]; |
29 | acpi_repair_function repair_function; |
30 | |
31 | } acpi_repair_info; |
32 | |
33 | /* Local prototypes */ |
34 | |
35 | static const struct acpi_repair_info *acpi_ns_match_complex_repair(struct |
36 | acpi_namespace_node |
37 | *node); |
38 | |
39 | static acpi_status |
40 | acpi_ns_repair_ALR(struct acpi_evaluate_info *info, |
41 | union acpi_operand_object **return_object_ptr); |
42 | |
43 | static acpi_status |
44 | acpi_ns_repair_CID(struct acpi_evaluate_info *info, |
45 | union acpi_operand_object **return_object_ptr); |
46 | |
47 | static acpi_status |
48 | acpi_ns_repair_CST(struct acpi_evaluate_info *info, |
49 | union acpi_operand_object **return_object_ptr); |
50 | |
51 | static acpi_status |
52 | acpi_ns_repair_FDE(struct acpi_evaluate_info *info, |
53 | union acpi_operand_object **return_object_ptr); |
54 | |
55 | static acpi_status |
56 | acpi_ns_repair_HID(struct acpi_evaluate_info *info, |
57 | union acpi_operand_object **return_object_ptr); |
58 | |
59 | static acpi_status |
60 | acpi_ns_repair_PRT(struct acpi_evaluate_info *info, |
61 | union acpi_operand_object **return_object_ptr); |
62 | |
63 | static acpi_status |
64 | acpi_ns_repair_PSS(struct acpi_evaluate_info *info, |
65 | union acpi_operand_object **return_object_ptr); |
66 | |
67 | static acpi_status |
68 | acpi_ns_repair_TSS(struct acpi_evaluate_info *info, |
69 | union acpi_operand_object **return_object_ptr); |
70 | |
71 | static acpi_status |
72 | acpi_ns_check_sorted_list(struct acpi_evaluate_info *info, |
73 | union acpi_operand_object *return_object, |
74 | u32 start_index, |
75 | u32 expected_count, |
76 | u32 sort_index, |
77 | u8 sort_direction, char *sort_key_name); |
78 | |
79 | /* Values for sort_direction above */ |
80 | |
81 | #define ACPI_SORT_ASCENDING 0 |
82 | #define ACPI_SORT_DESCENDING 1 |
83 | |
84 | static void |
85 | acpi_ns_remove_element(union acpi_operand_object *obj_desc, u32 index); |
86 | |
87 | static void |
88 | acpi_ns_sort_list(union acpi_operand_object **elements, |
89 | u32 count, u32 index, u8 sort_direction); |
90 | |
91 | /* |
92 | * This table contains the names of the predefined methods for which we can |
93 | * perform more complex repairs. |
94 | * |
95 | * As necessary: |
96 | * |
97 | * _ALR: Sort the list ascending by ambient_illuminance |
98 | * _CID: Strings: uppercase all, remove any leading asterisk |
99 | * _CST: Sort the list ascending by C state type |
100 | * _FDE: Convert Buffer of BYTEs to a Buffer of DWORDs |
101 | * _GTM: Convert Buffer of BYTEs to a Buffer of DWORDs |
102 | * _HID: Strings: uppercase all, remove any leading asterisk |
103 | * _PRT: Fix reversed source_name and source_index |
104 | * _PSS: Sort the list descending by Power |
105 | * _TSS: Sort the list descending by Power |
106 | * |
107 | * Names that must be packages, but cannot be sorted: |
108 | * |
109 | * _BCL: Values are tied to the Package index where they appear, and cannot |
110 | * be moved or sorted. These index values are used for _BQC and _BCM. |
111 | * However, we can fix the case where a buffer is returned, by converting |
112 | * it to a Package of integers. |
113 | */ |
114 | static const struct acpi_repair_info acpi_ns_repairable_names[] = { |
115 | {.name: "_ALR" , .repair_function: acpi_ns_repair_ALR}, |
116 | {"_CID" , acpi_ns_repair_CID}, |
117 | {"_CST" , acpi_ns_repair_CST}, |
118 | {"_FDE" , acpi_ns_repair_FDE}, |
119 | {"_GTM" , acpi_ns_repair_FDE}, /* _GTM has same repair as _FDE */ |
120 | {"_HID" , acpi_ns_repair_HID}, |
121 | {"_PRT" , acpi_ns_repair_PRT}, |
122 | {"_PSS" , acpi_ns_repair_PSS}, |
123 | {"_TSS" , acpi_ns_repair_TSS}, |
124 | {{0, 0, 0, 0}, NULL} /* Table terminator */ |
125 | }; |
126 | |
127 | #define ACPI_FDE_FIELD_COUNT 5 |
128 | #define ACPI_FDE_BYTE_BUFFER_SIZE 5 |
129 | #define ACPI_FDE_DWORD_BUFFER_SIZE (ACPI_FDE_FIELD_COUNT * (u32) sizeof (u32)) |
130 | |
131 | /****************************************************************************** |
132 | * |
133 | * FUNCTION: acpi_ns_complex_repairs |
134 | * |
135 | * PARAMETERS: info - Method execution information block |
136 | * node - Namespace node for the method/object |
137 | * validate_status - Original status of earlier validation |
138 | * return_object_ptr - Pointer to the object returned from the |
139 | * evaluation of a method or object |
140 | * |
141 | * RETURN: Status. AE_OK if repair was successful. If name is not |
142 | * matched, validate_status is returned. |
143 | * |
144 | * DESCRIPTION: Attempt to repair/convert a return object of a type that was |
145 | * not expected. |
146 | * |
147 | *****************************************************************************/ |
148 | |
149 | acpi_status |
150 | acpi_ns_complex_repairs(struct acpi_evaluate_info *info, |
151 | struct acpi_namespace_node *node, |
152 | acpi_status validate_status, |
153 | union acpi_operand_object **return_object_ptr) |
154 | { |
155 | const struct acpi_repair_info *predefined; |
156 | acpi_status status; |
157 | |
158 | ACPI_FUNCTION_TRACE(ns_complex_repairs); |
159 | |
160 | /* Check if this name is in the list of repairable names */ |
161 | |
162 | predefined = acpi_ns_match_complex_repair(node); |
163 | if (!predefined) { |
164 | return_ACPI_STATUS(validate_status); |
165 | } |
166 | |
167 | status = predefined->repair_function(info, return_object_ptr); |
168 | return_ACPI_STATUS(status); |
169 | } |
170 | |
171 | /****************************************************************************** |
172 | * |
173 | * FUNCTION: acpi_ns_match_complex_repair |
174 | * |
175 | * PARAMETERS: node - Namespace node for the method/object |
176 | * |
177 | * RETURN: Pointer to entry in repair table. NULL indicates not found. |
178 | * |
179 | * DESCRIPTION: Check an object name against the repairable object list. |
180 | * |
181 | *****************************************************************************/ |
182 | |
183 | static const struct acpi_repair_info *acpi_ns_match_complex_repair(struct |
184 | acpi_namespace_node |
185 | *node) |
186 | { |
187 | const struct acpi_repair_info *this_name; |
188 | |
189 | /* Search info table for a repairable predefined method/object name */ |
190 | |
191 | this_name = acpi_ns_repairable_names; |
192 | while (this_name->repair_function) { |
193 | if (ACPI_COMPARE_NAMESEG(node->name.ascii, this_name->name)) { |
194 | return (this_name); |
195 | } |
196 | |
197 | this_name++; |
198 | } |
199 | |
200 | return (NULL); /* Not found */ |
201 | } |
202 | |
203 | /****************************************************************************** |
204 | * |
205 | * FUNCTION: acpi_ns_repair_ALR |
206 | * |
207 | * PARAMETERS: info - Method execution information block |
208 | * return_object_ptr - Pointer to the object returned from the |
209 | * evaluation of a method or object |
210 | * |
211 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
212 | * |
213 | * DESCRIPTION: Repair for the _ALR object. If necessary, sort the object list |
214 | * ascending by the ambient illuminance values. |
215 | * |
216 | *****************************************************************************/ |
217 | |
218 | static acpi_status |
219 | acpi_ns_repair_ALR(struct acpi_evaluate_info *info, |
220 | union acpi_operand_object **return_object_ptr) |
221 | { |
222 | union acpi_operand_object *return_object = *return_object_ptr; |
223 | acpi_status status; |
224 | |
225 | status = acpi_ns_check_sorted_list(info, return_object, start_index: 0, expected_count: 2, sort_index: 1, |
226 | ACPI_SORT_ASCENDING, |
227 | sort_key_name: "AmbientIlluminance" ); |
228 | |
229 | return (status); |
230 | } |
231 | |
232 | /****************************************************************************** |
233 | * |
234 | * FUNCTION: acpi_ns_repair_FDE |
235 | * |
236 | * PARAMETERS: info - Method execution information block |
237 | * return_object_ptr - Pointer to the object returned from the |
238 | * evaluation of a method or object |
239 | * |
240 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
241 | * |
242 | * DESCRIPTION: Repair for the _FDE and _GTM objects. The expected return |
243 | * value is a Buffer of 5 DWORDs. This function repairs a common |
244 | * problem where the return value is a Buffer of BYTEs, not |
245 | * DWORDs. |
246 | * |
247 | *****************************************************************************/ |
248 | |
249 | static acpi_status |
250 | acpi_ns_repair_FDE(struct acpi_evaluate_info *info, |
251 | union acpi_operand_object **return_object_ptr) |
252 | { |
253 | union acpi_operand_object *return_object = *return_object_ptr; |
254 | union acpi_operand_object *buffer_object; |
255 | u8 *byte_buffer; |
256 | u32 *dword_buffer; |
257 | u32 i; |
258 | |
259 | ACPI_FUNCTION_NAME(ns_repair_FDE); |
260 | |
261 | switch (return_object->common.type) { |
262 | case ACPI_TYPE_BUFFER: |
263 | |
264 | /* This is the expected type. Length should be (at least) 5 DWORDs */ |
265 | |
266 | if (return_object->buffer.length >= ACPI_FDE_DWORD_BUFFER_SIZE) { |
267 | return (AE_OK); |
268 | } |
269 | |
270 | /* We can only repair if we have exactly 5 BYTEs */ |
271 | |
272 | if (return_object->buffer.length != ACPI_FDE_BYTE_BUFFER_SIZE) { |
273 | ACPI_WARN_PREDEFINED((AE_INFO, |
274 | info->full_pathname, |
275 | info->node_flags, |
276 | "Incorrect return buffer length %u, expected %u" , |
277 | return_object->buffer.length, |
278 | ACPI_FDE_DWORD_BUFFER_SIZE)); |
279 | |
280 | return (AE_AML_OPERAND_TYPE); |
281 | } |
282 | |
283 | /* Create the new (larger) buffer object */ |
284 | |
285 | buffer_object = |
286 | acpi_ut_create_buffer_object(ACPI_FDE_DWORD_BUFFER_SIZE); |
287 | if (!buffer_object) { |
288 | return (AE_NO_MEMORY); |
289 | } |
290 | |
291 | /* Expand each byte to a DWORD */ |
292 | |
293 | byte_buffer = return_object->buffer.pointer; |
294 | dword_buffer = ACPI_CAST_PTR(u32, |
295 | buffer_object->buffer.pointer); |
296 | |
297 | for (i = 0; i < ACPI_FDE_FIELD_COUNT; i++) { |
298 | *dword_buffer = (u32) *byte_buffer; |
299 | dword_buffer++; |
300 | byte_buffer++; |
301 | } |
302 | |
303 | ACPI_DEBUG_PRINT((ACPI_DB_REPAIR, |
304 | "%s Expanded Byte Buffer to expected DWord Buffer\n" , |
305 | info->full_pathname)); |
306 | break; |
307 | |
308 | default: |
309 | |
310 | return (AE_AML_OPERAND_TYPE); |
311 | } |
312 | |
313 | /* Delete the original return object, return the new buffer object */ |
314 | |
315 | acpi_ut_remove_reference(object: return_object); |
316 | *return_object_ptr = buffer_object; |
317 | |
318 | info->return_flags |= ACPI_OBJECT_REPAIRED; |
319 | return (AE_OK); |
320 | } |
321 | |
322 | /****************************************************************************** |
323 | * |
324 | * FUNCTION: acpi_ns_repair_CID |
325 | * |
326 | * PARAMETERS: info - Method execution information block |
327 | * return_object_ptr - Pointer to the object returned from the |
328 | * evaluation of a method or object |
329 | * |
330 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
331 | * |
332 | * DESCRIPTION: Repair for the _CID object. If a string, ensure that all |
333 | * letters are uppercase and that there is no leading asterisk. |
334 | * If a Package, ensure same for all string elements. |
335 | * |
336 | *****************************************************************************/ |
337 | |
338 | static acpi_status |
339 | acpi_ns_repair_CID(struct acpi_evaluate_info *info, |
340 | union acpi_operand_object **return_object_ptr) |
341 | { |
342 | acpi_status status; |
343 | union acpi_operand_object *return_object = *return_object_ptr; |
344 | union acpi_operand_object **element_ptr; |
345 | union acpi_operand_object *original_element; |
346 | u16 original_ref_count; |
347 | u32 i; |
348 | |
349 | ACPI_FUNCTION_TRACE(ns_repair_CID); |
350 | |
351 | /* Check for _CID as a simple string */ |
352 | |
353 | if (return_object->common.type == ACPI_TYPE_STRING) { |
354 | status = acpi_ns_repair_HID(info, return_object_ptr); |
355 | return_ACPI_STATUS(status); |
356 | } |
357 | |
358 | /* Exit if not a Package */ |
359 | |
360 | if (return_object->common.type != ACPI_TYPE_PACKAGE) { |
361 | return_ACPI_STATUS(AE_OK); |
362 | } |
363 | |
364 | /* Examine each element of the _CID package */ |
365 | |
366 | element_ptr = return_object->package.elements; |
367 | for (i = 0; i < return_object->package.count; i++) { |
368 | original_element = *element_ptr; |
369 | original_ref_count = original_element->common.reference_count; |
370 | |
371 | status = acpi_ns_repair_HID(info, return_object_ptr: element_ptr); |
372 | if (ACPI_FAILURE(status)) { |
373 | return_ACPI_STATUS(status); |
374 | } |
375 | |
376 | if (original_element != *element_ptr) { |
377 | |
378 | /* Update reference count of new object */ |
379 | |
380 | (*element_ptr)->common.reference_count = |
381 | original_ref_count; |
382 | } |
383 | |
384 | element_ptr++; |
385 | } |
386 | |
387 | return_ACPI_STATUS(AE_OK); |
388 | } |
389 | |
390 | /****************************************************************************** |
391 | * |
392 | * FUNCTION: acpi_ns_repair_CST |
393 | * |
394 | * PARAMETERS: info - Method execution information block |
395 | * return_object_ptr - Pointer to the object returned from the |
396 | * evaluation of a method or object |
397 | * |
398 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
399 | * |
400 | * DESCRIPTION: Repair for the _CST object: |
401 | * 1. Sort the list ascending by C state type |
402 | * 2. Ensure type cannot be zero |
403 | * 3. A subpackage count of zero means _CST is meaningless |
404 | * 4. Count must match the number of C state subpackages |
405 | * |
406 | *****************************************************************************/ |
407 | |
408 | static acpi_status |
409 | acpi_ns_repair_CST(struct acpi_evaluate_info *info, |
410 | union acpi_operand_object **return_object_ptr) |
411 | { |
412 | union acpi_operand_object *return_object = *return_object_ptr; |
413 | union acpi_operand_object **outer_elements; |
414 | u32 outer_element_count; |
415 | union acpi_operand_object *obj_desc; |
416 | acpi_status status; |
417 | u8 removing; |
418 | u32 i; |
419 | |
420 | ACPI_FUNCTION_NAME(ns_repair_CST); |
421 | |
422 | /* |
423 | * Check if the C-state type values are proportional. |
424 | */ |
425 | outer_element_count = return_object->package.count - 1; |
426 | i = 0; |
427 | while (i < outer_element_count) { |
428 | outer_elements = &return_object->package.elements[i + 1]; |
429 | removing = FALSE; |
430 | |
431 | if ((*outer_elements)->package.count == 0) { |
432 | ACPI_WARN_PREDEFINED((AE_INFO, |
433 | info->full_pathname, |
434 | info->node_flags, |
435 | "SubPackage[%u] - removing entry due to zero count" , |
436 | i)); |
437 | removing = TRUE; |
438 | goto remove_element; |
439 | } |
440 | |
441 | obj_desc = (*outer_elements)->package.elements[1]; /* Index1 = Type */ |
442 | if ((u32)obj_desc->integer.value == 0) { |
443 | ACPI_WARN_PREDEFINED((AE_INFO, |
444 | info->full_pathname, |
445 | info->node_flags, |
446 | "SubPackage[%u] - removing entry due to invalid Type(0)" , |
447 | i)); |
448 | removing = TRUE; |
449 | } |
450 | |
451 | remove_element: |
452 | if (removing) { |
453 | acpi_ns_remove_element(obj_desc: return_object, index: i + 1); |
454 | outer_element_count--; |
455 | } else { |
456 | i++; |
457 | } |
458 | } |
459 | |
460 | /* Update top-level package count, Type "Integer" checked elsewhere */ |
461 | |
462 | obj_desc = return_object->package.elements[0]; |
463 | obj_desc->integer.value = outer_element_count; |
464 | |
465 | /* |
466 | * Entries (subpackages) in the _CST Package must be sorted by the |
467 | * C-state type, in ascending order. |
468 | */ |
469 | status = acpi_ns_check_sorted_list(info, return_object, start_index: 1, expected_count: 4, sort_index: 1, |
470 | ACPI_SORT_ASCENDING, sort_key_name: "C-State Type" ); |
471 | if (ACPI_FAILURE(status)) { |
472 | return (status); |
473 | } |
474 | |
475 | return (AE_OK); |
476 | } |
477 | |
478 | /****************************************************************************** |
479 | * |
480 | * FUNCTION: acpi_ns_repair_HID |
481 | * |
482 | * PARAMETERS: info - Method execution information block |
483 | * return_object_ptr - Pointer to the object returned from the |
484 | * evaluation of a method or object |
485 | * |
486 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
487 | * |
488 | * DESCRIPTION: Repair for the _HID object. If a string, ensure that all |
489 | * letters are uppercase and that there is no leading asterisk. |
490 | * |
491 | *****************************************************************************/ |
492 | |
493 | static acpi_status |
494 | acpi_ns_repair_HID(struct acpi_evaluate_info *info, |
495 | union acpi_operand_object **return_object_ptr) |
496 | { |
497 | union acpi_operand_object *return_object = *return_object_ptr; |
498 | union acpi_operand_object *new_string; |
499 | char *source; |
500 | char *dest; |
501 | |
502 | ACPI_FUNCTION_TRACE(ns_repair_HID); |
503 | |
504 | /* We only care about string _HID objects (not integers) */ |
505 | |
506 | if (return_object->common.type != ACPI_TYPE_STRING) { |
507 | return_ACPI_STATUS(AE_OK); |
508 | } |
509 | |
510 | if (return_object->string.length == 0) { |
511 | ACPI_WARN_PREDEFINED((AE_INFO, |
512 | info->full_pathname, info->node_flags, |
513 | "Invalid zero-length _HID or _CID string" )); |
514 | |
515 | /* Return AE_OK anyway, let driver handle it */ |
516 | |
517 | info->return_flags |= ACPI_OBJECT_REPAIRED; |
518 | return_ACPI_STATUS(AE_OK); |
519 | } |
520 | |
521 | /* It is simplest to always create a new string object */ |
522 | |
523 | new_string = acpi_ut_create_string_object(string_size: return_object->string.length); |
524 | if (!new_string) { |
525 | return_ACPI_STATUS(AE_NO_MEMORY); |
526 | } |
527 | |
528 | /* |
529 | * Remove a leading asterisk if present. For some unknown reason, there |
530 | * are many machines in the field that contains IDs like this. |
531 | * |
532 | * Examples: "*PNP0C03", "*ACPI0003" |
533 | */ |
534 | source = return_object->string.pointer; |
535 | if (*source == '*') { |
536 | source++; |
537 | new_string->string.length--; |
538 | |
539 | ACPI_DEBUG_PRINT((ACPI_DB_REPAIR, |
540 | "%s: Removed invalid leading asterisk\n" , |
541 | info->full_pathname)); |
542 | } |
543 | |
544 | /* |
545 | * Copy and uppercase the string. From the ACPI 5.0 specification: |
546 | * |
547 | * A valid PNP ID must be of the form "AAA####" where A is an uppercase |
548 | * letter and # is a hex digit. A valid ACPI ID must be of the form |
549 | * "NNNN####" where N is an uppercase letter or decimal digit, and |
550 | * # is a hex digit. |
551 | */ |
552 | for (dest = new_string->string.pointer; *source; dest++, source++) { |
553 | *dest = (char)toupper((int)*source); |
554 | } |
555 | |
556 | acpi_ut_remove_reference(object: return_object); |
557 | *return_object_ptr = new_string; |
558 | return_ACPI_STATUS(AE_OK); |
559 | } |
560 | |
561 | /****************************************************************************** |
562 | * |
563 | * FUNCTION: acpi_ns_repair_PRT |
564 | * |
565 | * PARAMETERS: info - Method execution information block |
566 | * return_object_ptr - Pointer to the object returned from the |
567 | * evaluation of a method or object |
568 | * |
569 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
570 | * |
571 | * DESCRIPTION: Repair for the _PRT object. If necessary, fix reversed |
572 | * source_name and source_index field, a common BIOS bug. |
573 | * |
574 | *****************************************************************************/ |
575 | |
576 | static acpi_status |
577 | acpi_ns_repair_PRT(struct acpi_evaluate_info *info, |
578 | union acpi_operand_object **return_object_ptr) |
579 | { |
580 | union acpi_operand_object *package_object = *return_object_ptr; |
581 | union acpi_operand_object **top_object_list; |
582 | union acpi_operand_object **sub_object_list; |
583 | union acpi_operand_object *obj_desc; |
584 | union acpi_operand_object *sub_package; |
585 | u32 element_count; |
586 | u32 index; |
587 | |
588 | /* Each element in the _PRT package is a subpackage */ |
589 | |
590 | top_object_list = package_object->package.elements; |
591 | element_count = package_object->package.count; |
592 | |
593 | /* Examine each subpackage */ |
594 | |
595 | for (index = 0; index < element_count; index++, top_object_list++) { |
596 | sub_package = *top_object_list; |
597 | sub_object_list = sub_package->package.elements; |
598 | |
599 | /* Check for minimum required element count */ |
600 | |
601 | if (sub_package->package.count < 4) { |
602 | continue; |
603 | } |
604 | |
605 | /* |
606 | * If the BIOS has erroneously reversed the _PRT source_name (index 2) |
607 | * and the source_index (index 3), fix it. _PRT is important enough to |
608 | * workaround this BIOS error. This also provides compatibility with |
609 | * other ACPI implementations. |
610 | */ |
611 | obj_desc = sub_object_list[3]; |
612 | if (!obj_desc || (obj_desc->common.type != ACPI_TYPE_INTEGER)) { |
613 | sub_object_list[3] = sub_object_list[2]; |
614 | sub_object_list[2] = obj_desc; |
615 | info->return_flags |= ACPI_OBJECT_REPAIRED; |
616 | |
617 | ACPI_WARN_PREDEFINED((AE_INFO, |
618 | info->full_pathname, |
619 | info->node_flags, |
620 | "PRT[%X]: Fixed reversed SourceName and SourceIndex" , |
621 | index)); |
622 | } |
623 | } |
624 | |
625 | return (AE_OK); |
626 | } |
627 | |
628 | /****************************************************************************** |
629 | * |
630 | * FUNCTION: acpi_ns_repair_PSS |
631 | * |
632 | * PARAMETERS: info - Method execution information block |
633 | * return_object_ptr - Pointer to the object returned from the |
634 | * evaluation of a method or object |
635 | * |
636 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
637 | * |
638 | * DESCRIPTION: Repair for the _PSS object. If necessary, sort the object list |
639 | * by the CPU frequencies. Check that the power dissipation values |
640 | * are all proportional to CPU frequency (i.e., sorting by |
641 | * frequency should be the same as sorting by power.) |
642 | * |
643 | *****************************************************************************/ |
644 | |
645 | static acpi_status |
646 | acpi_ns_repair_PSS(struct acpi_evaluate_info *info, |
647 | union acpi_operand_object **return_object_ptr) |
648 | { |
649 | union acpi_operand_object *return_object = *return_object_ptr; |
650 | union acpi_operand_object **outer_elements; |
651 | u32 outer_element_count; |
652 | union acpi_operand_object **elements; |
653 | union acpi_operand_object *obj_desc; |
654 | u32 previous_value; |
655 | acpi_status status; |
656 | u32 i; |
657 | |
658 | /* |
659 | * Entries (subpackages) in the _PSS Package must be sorted by power |
660 | * dissipation, in descending order. If it appears that the list is |
661 | * incorrectly sorted, sort it. We sort by cpu_frequency, since this |
662 | * should be proportional to the power. |
663 | */ |
664 | status = acpi_ns_check_sorted_list(info, return_object, start_index: 0, expected_count: 6, sort_index: 0, |
665 | ACPI_SORT_DESCENDING, |
666 | sort_key_name: "CpuFrequency" ); |
667 | if (ACPI_FAILURE(status)) { |
668 | return (status); |
669 | } |
670 | |
671 | /* |
672 | * We now know the list is correctly sorted by CPU frequency. Check if |
673 | * the power dissipation values are proportional. |
674 | */ |
675 | previous_value = ACPI_UINT32_MAX; |
676 | outer_elements = return_object->package.elements; |
677 | outer_element_count = return_object->package.count; |
678 | |
679 | for (i = 0; i < outer_element_count; i++) { |
680 | elements = (*outer_elements)->package.elements; |
681 | obj_desc = elements[1]; /* Index1 = power_dissipation */ |
682 | |
683 | if ((u32)obj_desc->integer.value > previous_value) { |
684 | ACPI_WARN_PREDEFINED((AE_INFO, |
685 | info->full_pathname, |
686 | info->node_flags, |
687 | "SubPackage[%u,%u] - suspicious power dissipation values" , |
688 | i - 1, i)); |
689 | } |
690 | |
691 | previous_value = (u32) obj_desc->integer.value; |
692 | outer_elements++; |
693 | } |
694 | |
695 | return (AE_OK); |
696 | } |
697 | |
698 | /****************************************************************************** |
699 | * |
700 | * FUNCTION: acpi_ns_repair_TSS |
701 | * |
702 | * PARAMETERS: info - Method execution information block |
703 | * return_object_ptr - Pointer to the object returned from the |
704 | * evaluation of a method or object |
705 | * |
706 | * RETURN: Status. AE_OK if object is OK or was repaired successfully |
707 | * |
708 | * DESCRIPTION: Repair for the _TSS object. If necessary, sort the object list |
709 | * descending by the power dissipation values. |
710 | * |
711 | *****************************************************************************/ |
712 | |
713 | static acpi_status |
714 | acpi_ns_repair_TSS(struct acpi_evaluate_info *info, |
715 | union acpi_operand_object **return_object_ptr) |
716 | { |
717 | union acpi_operand_object *return_object = *return_object_ptr; |
718 | acpi_status status; |
719 | struct acpi_namespace_node *node; |
720 | |
721 | /* |
722 | * We can only sort the _TSS return package if there is no _PSS in the |
723 | * same scope. This is because if _PSS is present, the ACPI specification |
724 | * dictates that the _TSS Power Dissipation field is to be ignored, and |
725 | * therefore some BIOSs leave garbage values in the _TSS Power field(s). |
726 | * In this case, it is best to just return the _TSS package as-is. |
727 | * (May, 2011) |
728 | */ |
729 | status = acpi_ns_get_node(prefix_node: info->node, external_pathname: "^_PSS" , |
730 | ACPI_NS_NO_UPSEARCH, out_node: &node); |
731 | if (ACPI_SUCCESS(status)) { |
732 | return (AE_OK); |
733 | } |
734 | |
735 | status = acpi_ns_check_sorted_list(info, return_object, start_index: 0, expected_count: 5, sort_index: 1, |
736 | ACPI_SORT_DESCENDING, |
737 | sort_key_name: "PowerDissipation" ); |
738 | |
739 | return (status); |
740 | } |
741 | |
742 | /****************************************************************************** |
743 | * |
744 | * FUNCTION: acpi_ns_check_sorted_list |
745 | * |
746 | * PARAMETERS: info - Method execution information block |
747 | * return_object - Pointer to the top-level returned object |
748 | * start_index - Index of the first subpackage |
749 | * expected_count - Minimum length of each subpackage |
750 | * sort_index - Subpackage entry to sort on |
751 | * sort_direction - Ascending or descending |
752 | * sort_key_name - Name of the sort_index field |
753 | * |
754 | * RETURN: Status. AE_OK if the list is valid and is sorted correctly or |
755 | * has been repaired by sorting the list. |
756 | * |
757 | * DESCRIPTION: Check if the package list is valid and sorted correctly by the |
758 | * sort_index. If not, then sort the list. |
759 | * |
760 | *****************************************************************************/ |
761 | |
762 | static acpi_status |
763 | acpi_ns_check_sorted_list(struct acpi_evaluate_info *info, |
764 | union acpi_operand_object *return_object, |
765 | u32 start_index, |
766 | u32 expected_count, |
767 | u32 sort_index, |
768 | u8 sort_direction, char *sort_key_name) |
769 | { |
770 | u32 outer_element_count; |
771 | union acpi_operand_object **outer_elements; |
772 | union acpi_operand_object **elements; |
773 | union acpi_operand_object *obj_desc; |
774 | u32 i; |
775 | u32 previous_value; |
776 | |
777 | ACPI_FUNCTION_NAME(ns_check_sorted_list); |
778 | |
779 | /* The top-level object must be a package */ |
780 | |
781 | if (return_object->common.type != ACPI_TYPE_PACKAGE) { |
782 | return (AE_AML_OPERAND_TYPE); |
783 | } |
784 | |
785 | /* |
786 | * NOTE: assumes list of subpackages contains no NULL elements. |
787 | * Any NULL elements should have been removed by earlier call |
788 | * to acpi_ns_remove_null_elements. |
789 | */ |
790 | outer_element_count = return_object->package.count; |
791 | if (!outer_element_count || start_index >= outer_element_count) { |
792 | return (AE_AML_PACKAGE_LIMIT); |
793 | } |
794 | |
795 | outer_elements = &return_object->package.elements[start_index]; |
796 | outer_element_count -= start_index; |
797 | |
798 | previous_value = 0; |
799 | if (sort_direction == ACPI_SORT_DESCENDING) { |
800 | previous_value = ACPI_UINT32_MAX; |
801 | } |
802 | |
803 | /* Examine each subpackage */ |
804 | |
805 | for (i = 0; i < outer_element_count; i++) { |
806 | |
807 | /* Each element of the top-level package must also be a package */ |
808 | |
809 | if ((*outer_elements)->common.type != ACPI_TYPE_PACKAGE) { |
810 | return (AE_AML_OPERAND_TYPE); |
811 | } |
812 | |
813 | /* Each subpackage must have the minimum length */ |
814 | |
815 | if ((*outer_elements)->package.count < expected_count) { |
816 | return (AE_AML_PACKAGE_LIMIT); |
817 | } |
818 | |
819 | elements = (*outer_elements)->package.elements; |
820 | obj_desc = elements[sort_index]; |
821 | |
822 | if (obj_desc->common.type != ACPI_TYPE_INTEGER) { |
823 | return (AE_AML_OPERAND_TYPE); |
824 | } |
825 | |
826 | /* |
827 | * The list must be sorted in the specified order. If we detect a |
828 | * discrepancy, sort the entire list. |
829 | */ |
830 | if (((sort_direction == ACPI_SORT_ASCENDING) && |
831 | (obj_desc->integer.value < previous_value)) || |
832 | ((sort_direction == ACPI_SORT_DESCENDING) && |
833 | (obj_desc->integer.value > previous_value))) { |
834 | acpi_ns_sort_list(elements: &return_object->package. |
835 | elements[start_index], |
836 | count: outer_element_count, index: sort_index, |
837 | sort_direction); |
838 | |
839 | info->return_flags |= ACPI_OBJECT_REPAIRED; |
840 | |
841 | ACPI_DEBUG_PRINT((ACPI_DB_REPAIR, |
842 | "%s: Repaired unsorted list - now sorted by %s\n" , |
843 | info->full_pathname, sort_key_name)); |
844 | return (AE_OK); |
845 | } |
846 | |
847 | previous_value = (u32) obj_desc->integer.value; |
848 | outer_elements++; |
849 | } |
850 | |
851 | return (AE_OK); |
852 | } |
853 | |
854 | /****************************************************************************** |
855 | * |
856 | * FUNCTION: acpi_ns_sort_list |
857 | * |
858 | * PARAMETERS: elements - Package object element list |
859 | * count - Element count for above |
860 | * index - Sort by which package element |
861 | * sort_direction - Ascending or Descending sort |
862 | * |
863 | * RETURN: None |
864 | * |
865 | * DESCRIPTION: Sort the objects that are in a package element list. |
866 | * |
867 | * NOTE: Assumes that all NULL elements have been removed from the package, |
868 | * and that all elements have been verified to be of type Integer. |
869 | * |
870 | *****************************************************************************/ |
871 | |
872 | static void |
873 | acpi_ns_sort_list(union acpi_operand_object **elements, |
874 | u32 count, u32 index, u8 sort_direction) |
875 | { |
876 | union acpi_operand_object *obj_desc1; |
877 | union acpi_operand_object *obj_desc2; |
878 | union acpi_operand_object *temp_obj; |
879 | u32 i; |
880 | u32 j; |
881 | |
882 | /* Simple bubble sort */ |
883 | |
884 | for (i = 1; i < count; i++) { |
885 | for (j = (count - 1); j >= i; j--) { |
886 | obj_desc1 = elements[j - 1]->package.elements[index]; |
887 | obj_desc2 = elements[j]->package.elements[index]; |
888 | |
889 | if (((sort_direction == ACPI_SORT_ASCENDING) && |
890 | (obj_desc1->integer.value > |
891 | obj_desc2->integer.value)) |
892 | || ((sort_direction == ACPI_SORT_DESCENDING) |
893 | && (obj_desc1->integer.value < |
894 | obj_desc2->integer.value))) { |
895 | temp_obj = elements[j - 1]; |
896 | elements[j - 1] = elements[j]; |
897 | elements[j] = temp_obj; |
898 | } |
899 | } |
900 | } |
901 | } |
902 | |
903 | /****************************************************************************** |
904 | * |
905 | * FUNCTION: acpi_ns_remove_element |
906 | * |
907 | * PARAMETERS: obj_desc - Package object element list |
908 | * index - Index of element to remove |
909 | * |
910 | * RETURN: None |
911 | * |
912 | * DESCRIPTION: Remove the requested element of a package and delete it. |
913 | * |
914 | *****************************************************************************/ |
915 | |
916 | static void |
917 | acpi_ns_remove_element(union acpi_operand_object *obj_desc, u32 index) |
918 | { |
919 | union acpi_operand_object **source; |
920 | union acpi_operand_object **dest; |
921 | u32 count; |
922 | u32 new_count; |
923 | u32 i; |
924 | |
925 | ACPI_FUNCTION_NAME(ns_remove_element); |
926 | |
927 | count = obj_desc->package.count; |
928 | new_count = count - 1; |
929 | |
930 | source = obj_desc->package.elements; |
931 | dest = source; |
932 | |
933 | /* Examine all elements of the package object, remove matched index */ |
934 | |
935 | for (i = 0; i < count; i++) { |
936 | if (i == index) { |
937 | acpi_ut_remove_reference(object: *source); /* Remove one ref for being in pkg */ |
938 | acpi_ut_remove_reference(object: *source); |
939 | } else { |
940 | *dest = *source; |
941 | dest++; |
942 | } |
943 | |
944 | source++; |
945 | } |
946 | |
947 | /* NULL terminate list and update the package count */ |
948 | |
949 | *dest = NULL; |
950 | obj_desc->package.count = new_count; |
951 | } |
952 | |