1 /*******************************************************************************
3 * Module Name: dbtest - Various debug-related tests
5 ******************************************************************************/
7 /******************************************************************************
11 * Some or all of this work - Copyright (c) 1999 - 2021, Intel Corp.
12 * All rights reserved.
16 * 2.1. This is your license from Intel Corp. under its intellectual property
17 * rights. You may have additional license terms from the party that provided
18 * you this software, covering your right to use that party's intellectual
21 * 2.2. Intel grants, free of charge, to any person ("Licensee") obtaining a
22 * copy of the source code appearing in this file ("Covered Code") an
23 * irrevocable, perpetual, worldwide license under Intel's copyrights in the
24 * base code distributed originally by Intel ("Original Intel Code") to copy,
25 * make derivatives, distribute, use and display any portion of the Covered
26 * Code in any form, with the right to sublicense such rights; and
28 * 2.3. Intel grants Licensee a non-exclusive and non-transferable patent
29 * license (with the right to sublicense), under only those claims of Intel
30 * patents that are infringed by the Original Intel Code, to make, use, sell,
31 * offer to sell, and import the Covered Code and derivative works thereof
32 * solely to the minimum extent necessary to exercise the above copyright
33 * license, and in no event shall the patent license extend to any additions
34 * to or modifications of the Original Intel Code. No other license or right
35 * is granted directly or by implication, estoppel or otherwise;
37 * The above copyright and patent license is granted only if the following
42 * 3.1. Redistribution of Source with Rights to Further Distribute Source.
43 * Redistribution of source code of any substantial portion of the Covered
44 * Code or modification with rights to further distribute source must include
45 * the above Copyright Notice, the above License, this list of Conditions,
46 * and the following Disclaimer and Export Compliance provision. In addition,
47 * Licensee must cause all Covered Code to which Licensee contributes to
48 * contain a file documenting the changes Licensee made to create that Covered
49 * Code and the date of any change. Licensee must include in that file the
50 * documentation of any changes made by any predecessor Licensee. Licensee
51 * must include a prominent statement that the modification is derived,
52 * directly or indirectly, from Original Intel Code.
54 * 3.2. Redistribution of Source with no Rights to Further Distribute Source.
55 * Redistribution of source code of any substantial portion of the Covered
56 * Code or modification without rights to further distribute source must
57 * include the following Disclaimer and Export Compliance provision in the
58 * documentation and/or other materials provided with distribution. In
59 * addition, Licensee may not authorize further sublicense of source of any
60 * portion of the Covered Code, and must include terms to the effect that the
61 * license from Licensee to its licensee is limited to the intellectual
62 * property embodied in the software Licensee provides to its licensee, and
63 * not to intellectual property embodied in modifications its licensee may
66 * 3.3. Redistribution of Executable. Redistribution in executable form of any
67 * substantial portion of the Covered Code or modification must reproduce the
68 * above Copyright Notice, and the following Disclaimer and Export Compliance
69 * provision in the documentation and/or other materials provided with the
72 * 3.4. Intel retains all right, title, and interest in and to the Original
75 * 3.5. Neither the name Intel nor any other trademark owned or controlled by
76 * Intel shall be used in advertising or otherwise to promote the sale, use or
77 * other dealings in products derived from or relating to the Covered Code
78 * without prior written authorization from Intel.
80 * 4. Disclaimer and Export Compliance
82 * 4.1. INTEL MAKES NO WARRANTY OF ANY KIND REGARDING ANY SOFTWARE PROVIDED
83 * HERE. ANY SOFTWARE ORIGINATING FROM INTEL OR DERIVED FROM INTEL SOFTWARE
84 * IS PROVIDED "AS IS," AND INTEL WILL NOT PROVIDE ANY SUPPORT, ASSISTANCE,
85 * INSTALLATION, TRAINING OR OTHER SERVICES. INTEL WILL NOT PROVIDE ANY
86 * UPDATES, ENHANCEMENTS OR EXTENSIONS. INTEL SPECIFICALLY DISCLAIMS ANY
87 * IMPLIED WARRANTIES OF MERCHANTABILITY, NONINFRINGEMENT AND FITNESS FOR A
90 * 4.2. IN NO EVENT SHALL INTEL HAVE ANY LIABILITY TO LICENSEE, ITS LICENSEES
91 * OR ANY OTHER THIRD PARTY, FOR ANY LOST PROFITS, LOST DATA, LOSS OF USE OR
92 * COSTS OF PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, OR FOR ANY INDIRECT,
93 * SPECIAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THIS AGREEMENT, UNDER ANY
94 * CAUSE OF ACTION OR THEORY OF LIABILITY, AND IRRESPECTIVE OF WHETHER INTEL
95 * HAS ADVANCE NOTICE OF THE POSSIBILITY OF SUCH DAMAGES. THESE LIMITATIONS
96 * SHALL APPLY NOTWITHSTANDING THE FAILURE OF THE ESSENTIAL PURPOSE OF ANY
99 * 4.3. Licensee shall not export, either directly or indirectly, any of this
100 * software or system incorporating such software without first obtaining any
101 * required license or other approval from the U. S. Department of Commerce or
102 * any other agency or department of the United States Government. In the
103 * event Licensee exports any such software from the United States or
104 * re-exports any such software from a foreign destination, Licensee shall
105 * ensure that the distribution and export/re-export of the software is in
106 * compliance with all laws, regulations, orders, or other restrictions of the
107 * U.S. Export Administration Regulations. Licensee agrees that neither it nor
108 * any of its subsidiaries will export/re-export any technical data, process,
109 * software, or service, directly or indirectly, to any country for which the
110 * United States government or any agency thereof requires an export license,
111 * other governmental approval, or letter of assurance, without first obtaining
112 * such license, approval or letter.
114 *****************************************************************************
116 * Alternatively, you may choose to be licensed under the terms of the
119 * Redistribution and use in source and binary forms, with or without
120 * modification, are permitted provided that the following conditions
122 * 1. Redistributions of source code must retain the above copyright
123 * notice, this list of conditions, and the following disclaimer,
124 * without modification.
125 * 2. Redistributions in binary form must reproduce at minimum a disclaimer
126 * substantially similar to the "NO WARRANTY" disclaimer below
127 * ("Disclaimer") and any redistribution must be conditioned upon
128 * including a substantially similar Disclaimer requirement for further
129 * binary redistribution.
130 * 3. Neither the names of the above-listed copyright holders nor the names
131 * of any contributors may be used to endorse or promote products derived
132 * from this software without specific prior written permission.
134 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
135 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
136 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
137 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
138 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
139 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
140 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
141 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
142 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
143 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
144 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
146 * Alternatively, you may choose to be licensed under the terms of the
147 * GNU General Public License ("GPL") version 2 as published by the Free
148 * Software Foundation.
150 *****************************************************************************/
153 #include "accommon.h"
155 #include "acnamesp.h"
156 #include "acpredef.h"
157 #include "acinterp.h"
161 #define _COMPONENT ACPI_CA_DEBUGGER
162 ACPI_MODULE_NAME ("dbtest")
165 /* Local prototypes */
168 AcpiDbTestAllObjects (
172 AcpiDbTestOneObject (
173 ACPI_HANDLE ObjHandle
,
179 AcpiDbTestIntegerType (
180 ACPI_NAMESPACE_NODE
*Node
,
184 AcpiDbTestBufferType (
185 ACPI_NAMESPACE_NODE
*Node
,
189 AcpiDbTestStringType (
190 ACPI_NAMESPACE_NODE
*Node
,
194 AcpiDbTestPackageType (
195 ACPI_NAMESPACE_NODE
*Node
);
198 AcpiDbTestFieldUnitType (
199 ACPI_OPERAND_OBJECT
*ObjDesc
);
202 AcpiDbReadFromObject (
203 ACPI_NAMESPACE_NODE
*Node
,
204 ACPI_OBJECT_TYPE ExpectedType
,
205 ACPI_OBJECT
**Value
);
208 AcpiDbWriteToObject (
209 ACPI_NAMESPACE_NODE
*Node
,
213 AcpiDbEvaluateAllPredefinedNames (
217 AcpiDbEvaluateOnePredefinedName (
218 ACPI_HANDLE ObjHandle
,
226 static ACPI_DB_ARGUMENT_INFO AcpiDbTestTypes
[] =
230 {NULL
} /* Must be null terminated */
233 #define CMD_TEST_OBJECTS 0
234 #define CMD_TEST_PREDEFINED 1
236 #define BUFFER_FILL_VALUE 0xFF
239 * Support for the special debugger read/write control methods.
240 * These methods are installed into the current namespace and are
241 * used to read and write the various namespace objects. The point
242 * is to force the AML interpreter do all of the work.
244 #define ACPI_DB_READ_METHOD "\\_T98"
245 #define ACPI_DB_WRITE_METHOD "\\_T99"
247 static ACPI_HANDLE ReadHandle
= NULL
;
248 static ACPI_HANDLE WriteHandle
= NULL
;
250 /* ASL Definitions of the debugger read/write control methods. AML below. */
253 DefinitionBlock ("ssdt.aml", "SSDT", 2, "Intel", "DEBUG", 0x00000001)
255 Method (_T98
, 1, NotSerialized
) /* Read */
257 Return (DeRefOf (Arg0
))
260 DefinitionBlock ("ssdt2.aml", "SSDT", 2, "Intel", "DEBUG", 0x00000001)
262 Method (_T99
, 2, NotSerialized
) /* Write */
269 static unsigned char ReadMethodCode
[] =
271 0x53,0x53,0x44,0x54,0x2E,0x00,0x00,0x00, /* 00000000 "SSDT...." */
272 0x02,0xC9,0x49,0x6E,0x74,0x65,0x6C,0x00, /* 00000008 "..Intel." */
273 0x44,0x45,0x42,0x55,0x47,0x00,0x00,0x00, /* 00000010 "DEBUG..." */
274 0x01,0x00,0x00,0x00,0x49,0x4E,0x54,0x4C, /* 00000018 "....INTL" */
275 0x18,0x12,0x13,0x20,0x14,0x09,0x5F,0x54, /* 00000020 "... .._T" */
276 0x39,0x38,0x01,0xA4,0x83,0x68 /* 00000028 "98...h" */
279 static unsigned char WriteMethodCode
[] =
281 0x53,0x53,0x44,0x54,0x2E,0x00,0x00,0x00, /* 00000000 "SSDT...." */
282 0x02,0x15,0x49,0x6E,0x74,0x65,0x6C,0x00, /* 00000008 "..Intel." */
283 0x44,0x45,0x42,0x55,0x47,0x00,0x00,0x00, /* 00000010 "DEBUG..." */
284 0x01,0x00,0x00,0x00,0x49,0x4E,0x54,0x4C, /* 00000018 "....INTL" */
285 0x18,0x12,0x13,0x20,0x14,0x09,0x5F,0x54, /* 00000020 "... .._T" */
286 0x39,0x39,0x02,0x70,0x69,0x68 /* 00000028 "99.pih" */
290 /*******************************************************************************
292 * FUNCTION: AcpiDbExecuteTest
294 * PARAMETERS: TypeArg - Subcommand
298 * DESCRIPTION: Execute various debug tests.
300 * Note: Code is prepared for future expansion of the TEST command.
302 ******************************************************************************/
311 AcpiUtStrupr (TypeArg
);
312 Temp
= AcpiDbMatchArgument (TypeArg
, AcpiDbTestTypes
);
313 if (Temp
== ACPI_TYPE_NOT_FOUND
)
315 AcpiOsPrintf ("Invalid or unsupported argument\n");
321 case CMD_TEST_OBJECTS
:
323 AcpiDbTestAllObjects ();
326 case CMD_TEST_PREDEFINED
:
328 AcpiDbEvaluateAllPredefinedNames (NULL
);
337 /*******************************************************************************
339 * FUNCTION: AcpiDbTestAllObjects
345 * DESCRIPTION: This test implements the OBJECTS subcommand. It exercises the
346 * namespace by reading/writing/comparing all data objects such
347 * as integers, strings, buffers, fields, buffer fields, etc.
349 ******************************************************************************/
352 AcpiDbTestAllObjects (
358 /* Install the debugger read-object control method if necessary */
362 Status
= AcpiInstallMethod (ReadMethodCode
);
363 if (ACPI_FAILURE (Status
))
365 AcpiOsPrintf ("%s, Could not install debugger read method\n",
366 AcpiFormatException (Status
));
370 Status
= AcpiGetHandle (NULL
, ACPI_DB_READ_METHOD
, &ReadHandle
);
371 if (ACPI_FAILURE (Status
))
373 AcpiOsPrintf ("Could not obtain handle for debug method %s\n",
374 ACPI_DB_READ_METHOD
);
379 /* Install the debugger write-object control method if necessary */
383 Status
= AcpiInstallMethod (WriteMethodCode
);
384 if (ACPI_FAILURE (Status
))
386 AcpiOsPrintf ("%s, Could not install debugger write method\n",
387 AcpiFormatException (Status
));
391 Status
= AcpiGetHandle (NULL
, ACPI_DB_WRITE_METHOD
, &WriteHandle
);
392 if (ACPI_FAILURE (Status
))
394 AcpiOsPrintf ("Could not obtain handle for debug method %s\n",
395 ACPI_DB_WRITE_METHOD
);
400 /* Walk the entire namespace, testing each supported named data object */
402 (void) AcpiWalkNamespace (ACPI_TYPE_ANY
, ACPI_ROOT_OBJECT
,
403 ACPI_UINT32_MAX
, AcpiDbTestOneObject
, NULL
, NULL
, NULL
);
407 /*******************************************************************************
409 * FUNCTION: AcpiDbTestOneObject
411 * PARAMETERS: ACPI_WALK_CALLBACK
415 * DESCRIPTION: Test one namespace object. Supported types are Integer,
416 * String, Buffer, Package, BufferField, and FieldUnit.
417 * All other object types are simply ignored.
419 ******************************************************************************/
422 AcpiDbTestOneObject (
423 ACPI_HANDLE ObjHandle
,
428 ACPI_NAMESPACE_NODE
*Node
;
429 ACPI_OPERAND_OBJECT
*ObjDesc
;
430 ACPI_OBJECT_TYPE LocalType
;
431 UINT32 BitLength
= 0;
432 UINT32 ByteLength
= 0;
433 ACPI_STATUS Status
= AE_OK
;
436 Node
= ACPI_CAST_PTR (ACPI_NAMESPACE_NODE
, ObjHandle
);
437 ObjDesc
= Node
->Object
;
440 * For the supported types, get the actual bit length or
441 * byte length. Map the type to one of Integer/String/Buffer.
445 case ACPI_TYPE_INTEGER
:
447 /* Integer width is either 32 or 64 */
449 LocalType
= ACPI_TYPE_INTEGER
;
450 BitLength
= AcpiGbl_IntegerBitWidth
;
453 case ACPI_TYPE_STRING
:
455 LocalType
= ACPI_TYPE_STRING
;
456 ByteLength
= ObjDesc
->String
.Length
;
459 case ACPI_TYPE_BUFFER
:
461 LocalType
= ACPI_TYPE_BUFFER
;
462 ByteLength
= ObjDesc
->Buffer
.Length
;
463 BitLength
= ByteLength
* 8;
466 case ACPI_TYPE_PACKAGE
:
468 LocalType
= ACPI_TYPE_PACKAGE
;
471 case ACPI_TYPE_FIELD_UNIT
:
472 case ACPI_TYPE_LOCAL_REGION_FIELD
:
473 case ACPI_TYPE_LOCAL_INDEX_FIELD
:
474 case ACPI_TYPE_LOCAL_BANK_FIELD
:
476 LocalType
= ACPI_TYPE_FIELD_UNIT
;
479 case ACPI_TYPE_BUFFER_FIELD
:
481 * The returned object will be a Buffer if the field length
482 * is larger than the size of an Integer (32 or 64 bits
483 * depending on the DSDT version).
485 LocalType
= ACPI_TYPE_INTEGER
;
488 BitLength
= ObjDesc
->CommonField
.BitLength
;
489 ByteLength
= ACPI_ROUND_BITS_UP_TO_BYTES (BitLength
);
490 if (BitLength
> AcpiGbl_IntegerBitWidth
)
492 LocalType
= ACPI_TYPE_BUFFER
;
499 /* Ignore all non-data types - Methods, Devices, Scopes, etc. */
504 /* Emit the common prefix: Type:Name */
506 AcpiOsPrintf ("%14s: %4.4s",
507 AcpiUtGetTypeName (Node
->Type
), Node
->Name
.Ascii
);
511 AcpiOsPrintf (" No attached sub-object, ignoring\n");
515 /* At this point, we have resolved the object to one of the major types */
519 case ACPI_TYPE_INTEGER
:
521 Status
= AcpiDbTestIntegerType (Node
, BitLength
);
524 case ACPI_TYPE_STRING
:
526 Status
= AcpiDbTestStringType (Node
, ByteLength
);
529 case ACPI_TYPE_BUFFER
:
531 Status
= AcpiDbTestBufferType (Node
, BitLength
);
534 case ACPI_TYPE_PACKAGE
:
536 Status
= AcpiDbTestPackageType (Node
);
539 case ACPI_TYPE_FIELD_UNIT
:
541 Status
= AcpiDbTestFieldUnitType (ObjDesc
);
546 AcpiOsPrintf (" Ignoring, type not implemented (%2.2X)",
551 /* Exit on error, but don't abort the namespace walk */
553 if (ACPI_FAILURE (Status
))
563 /*******************************************************************************
565 * FUNCTION: AcpiDbTestIntegerType
567 * PARAMETERS: Node - Parent NS node for the object
568 * BitLength - Actual length of the object. Used for
569 * support of arbitrary length FieldUnit
570 * and BufferField objects.
574 * DESCRIPTION: Test read/write for an Integer-valued object. Performs a
575 * write/read/compare of an arbitrary new value, then performs
576 * a write/read/compare of the original value.
578 ******************************************************************************/
581 AcpiDbTestIntegerType (
582 ACPI_NAMESPACE_NODE
*Node
,
585 ACPI_OBJECT
*Temp1
= NULL
;
586 ACPI_OBJECT
*Temp2
= NULL
;
587 ACPI_OBJECT
*Temp3
= NULL
;
588 ACPI_OBJECT WriteValue
;
595 AcpiOsPrintf (" Invalid length for an Integer: %u", BitLength
);
599 /* Read the original value */
601 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_INTEGER
, &Temp1
);
602 if (ACPI_FAILURE (Status
))
607 AcpiOsPrintf (ACPI_DEBUG_LENGTH_FORMAT
" %8.8X%8.8X",
608 BitLength
, ACPI_ROUND_BITS_UP_TO_BYTES (BitLength
),
609 ACPI_FORMAT_UINT64 (Temp1
->Integer
.Value
));
611 ValueToWrite
= ACPI_UINT64_MAX
>> (64 - BitLength
);
612 if (Temp1
->Integer
.Value
== ValueToWrite
)
616 /* Write a new value */
618 WriteValue
.Type
= ACPI_TYPE_INTEGER
;
619 WriteValue
.Integer
.Value
= ValueToWrite
;
620 Status
= AcpiDbWriteToObject (Node
, &WriteValue
);
621 if (ACPI_FAILURE (Status
))
626 /* Ensure that we can read back the new value */
628 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_INTEGER
, &Temp2
);
629 if (ACPI_FAILURE (Status
))
634 if (Temp2
->Integer
.Value
!= ValueToWrite
)
636 AcpiOsPrintf (" MISMATCH 2: %8.8X%8.8X, expecting %8.8X%8.8X",
637 ACPI_FORMAT_UINT64 (Temp2
->Integer
.Value
),
638 ACPI_FORMAT_UINT64 (ValueToWrite
));
641 /* Write back the original value */
643 WriteValue
.Integer
.Value
= Temp1
->Integer
.Value
;
644 Status
= AcpiDbWriteToObject (Node
, &WriteValue
);
645 if (ACPI_FAILURE (Status
))
650 /* Ensure that we can read back the original value */
652 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_INTEGER
, &Temp3
);
653 if (ACPI_FAILURE (Status
))
658 if (Temp3
->Integer
.Value
!= Temp1
->Integer
.Value
)
660 AcpiOsPrintf (" MISMATCH 3: %8.8X%8.8X, expecting %8.8X%8.8X",
661 ACPI_FORMAT_UINT64 (Temp3
->Integer
.Value
),
662 ACPI_FORMAT_UINT64 (Temp1
->Integer
.Value
));
666 if (Temp1
) {AcpiOsFree (Temp1
);}
667 if (Temp2
) {AcpiOsFree (Temp2
);}
668 if (Temp3
) {AcpiOsFree (Temp3
);}
673 /*******************************************************************************
675 * FUNCTION: AcpiDbTestBufferType
677 * PARAMETERS: Node - Parent NS node for the object
678 * BitLength - Actual length of the object.
682 * DESCRIPTION: Test read/write for an Buffer-valued object. Performs a
683 * write/read/compare of an arbitrary new value, then performs
684 * a write/read/compare of the original value.
686 ******************************************************************************/
689 AcpiDbTestBufferType (
690 ACPI_NAMESPACE_NODE
*Node
,
693 ACPI_OBJECT
*Temp1
= NULL
;
694 ACPI_OBJECT
*Temp2
= NULL
;
695 ACPI_OBJECT
*Temp3
= NULL
;
697 ACPI_OBJECT WriteValue
;
704 ByteLength
= ACPI_ROUND_BITS_UP_TO_BYTES (BitLength
);
707 AcpiOsPrintf (" Ignoring zero length buffer");
711 /* Allocate a local buffer */
713 Buffer
= ACPI_ALLOCATE_ZEROED (ByteLength
);
716 return (AE_NO_MEMORY
);
719 /* Read the original value */
721 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_BUFFER
, &Temp1
);
722 if (ACPI_FAILURE (Status
))
727 /* Emit a few bytes of the buffer */
729 AcpiOsPrintf (ACPI_DEBUG_LENGTH_FORMAT
, BitLength
, Temp1
->Buffer
.Length
);
730 for (i
= 0; ((i
< 8) && (i
< ByteLength
)); i
++)
732 AcpiOsPrintf (" %2.2X", Temp1
->Buffer
.Pointer
[i
]);
734 AcpiOsPrintf ("... ");
739 * Handle possible extra bits at the end of the buffer. Can
740 * happen for FieldUnits larger than an integer, but the bit
741 * count is not an integral number of bytes. Zero out the
744 memset (Buffer
, BUFFER_FILL_VALUE
, ByteLength
);
745 ExtraBits
= BitLength
% 8;
748 Buffer
[ByteLength
- 1] = ACPI_MASK_BITS_ABOVE (ExtraBits
);
751 WriteValue
.Type
= ACPI_TYPE_BUFFER
;
752 WriteValue
.Buffer
.Length
= ByteLength
;
753 WriteValue
.Buffer
.Pointer
= Buffer
;
755 Status
= AcpiDbWriteToObject (Node
, &WriteValue
);
756 if (ACPI_FAILURE (Status
))
761 /* Ensure that we can read back the new value */
763 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_BUFFER
, &Temp2
);
764 if (ACPI_FAILURE (Status
))
769 if (memcmp (Temp2
->Buffer
.Pointer
, Buffer
, ByteLength
))
771 AcpiOsPrintf (" MISMATCH 2: New buffer value");
774 /* Write back the original value */
776 WriteValue
.Buffer
.Length
= ByteLength
;
777 WriteValue
.Buffer
.Pointer
= Temp1
->Buffer
.Pointer
;
779 Status
= AcpiDbWriteToObject (Node
, &WriteValue
);
780 if (ACPI_FAILURE (Status
))
785 /* Ensure that we can read back the original value */
787 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_BUFFER
, &Temp3
);
788 if (ACPI_FAILURE (Status
))
793 if (memcmp (Temp1
->Buffer
.Pointer
,
794 Temp3
->Buffer
.Pointer
, ByteLength
))
796 AcpiOsPrintf (" MISMATCH 3: While restoring original buffer");
801 if (Temp1
) {AcpiOsFree (Temp1
);}
802 if (Temp2
) {AcpiOsFree (Temp2
);}
803 if (Temp3
) {AcpiOsFree (Temp3
);}
808 /*******************************************************************************
810 * FUNCTION: AcpiDbTestStringType
812 * PARAMETERS: Node - Parent NS node for the object
813 * ByteLength - Actual length of the object.
817 * DESCRIPTION: Test read/write for an String-valued object. Performs a
818 * write/read/compare of an arbitrary new value, then performs
819 * a write/read/compare of the original value.
821 ******************************************************************************/
824 AcpiDbTestStringType (
825 ACPI_NAMESPACE_NODE
*Node
,
828 ACPI_OBJECT
*Temp1
= NULL
;
829 ACPI_OBJECT
*Temp2
= NULL
;
830 ACPI_OBJECT
*Temp3
= NULL
;
831 char *ValueToWrite
= "Test String from AML Debugger";
832 ACPI_OBJECT WriteValue
;
836 /* Read the original value */
838 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_STRING
, &Temp1
);
839 if (ACPI_FAILURE (Status
))
844 AcpiOsPrintf (ACPI_DEBUG_LENGTH_FORMAT
" \"%s\"", (Temp1
->String
.Length
* 8),
845 Temp1
->String
.Length
, Temp1
->String
.Pointer
);
847 /* Write a new value */
849 WriteValue
.Type
= ACPI_TYPE_STRING
;
850 WriteValue
.String
.Length
= strlen (ValueToWrite
);
851 WriteValue
.String
.Pointer
= ValueToWrite
;
853 Status
= AcpiDbWriteToObject (Node
, &WriteValue
);
854 if (ACPI_FAILURE (Status
))
859 /* Ensure that we can read back the new value */
861 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_STRING
, &Temp2
);
862 if (ACPI_FAILURE (Status
))
867 if (strcmp (Temp2
->String
.Pointer
, ValueToWrite
))
869 AcpiOsPrintf (" MISMATCH 2: %s, expecting %s",
870 Temp2
->String
.Pointer
, ValueToWrite
);
873 /* Write back the original value */
875 WriteValue
.String
.Length
= strlen (Temp1
->String
.Pointer
);
876 WriteValue
.String
.Pointer
= Temp1
->String
.Pointer
;
878 Status
= AcpiDbWriteToObject (Node
, &WriteValue
);
879 if (ACPI_FAILURE (Status
))
884 /* Ensure that we can read back the original value */
886 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_STRING
, &Temp3
);
887 if (ACPI_FAILURE (Status
))
892 if (strcmp (Temp1
->String
.Pointer
, Temp3
->String
.Pointer
))
894 AcpiOsPrintf (" MISMATCH 3: %s, expecting %s",
895 Temp3
->String
.Pointer
, Temp1
->String
.Pointer
);
899 if (Temp1
) {AcpiOsFree (Temp1
);}
900 if (Temp2
) {AcpiOsFree (Temp2
);}
901 if (Temp3
) {AcpiOsFree (Temp3
);}
906 /*******************************************************************************
908 * FUNCTION: AcpiDbTestPackageType
910 * PARAMETERS: Node - Parent NS node for the object
914 * DESCRIPTION: Test read for a Package object.
916 ******************************************************************************/
919 AcpiDbTestPackageType (
920 ACPI_NAMESPACE_NODE
*Node
)
922 ACPI_OBJECT
*Temp1
= NULL
;
926 /* Read the original value */
928 Status
= AcpiDbReadFromObject (Node
, ACPI_TYPE_PACKAGE
, &Temp1
);
929 if (ACPI_FAILURE (Status
))
934 AcpiOsPrintf (" %.2X Elements", Temp1
->Package
.Count
);
940 /*******************************************************************************
942 * FUNCTION: AcpiDbTestFieldUnitType
944 * PARAMETERS: ObjDesc - A field unit object
948 * DESCRIPTION: Test read/write on a named field unit.
950 ******************************************************************************/
953 AcpiDbTestFieldUnitType (
954 ACPI_OPERAND_OBJECT
*ObjDesc
)
956 ACPI_OPERAND_OBJECT
*RegionObj
;
957 UINT32 BitLength
= 0;
958 UINT32 ByteLength
= 0;
959 ACPI_STATUS Status
= AE_OK
;
960 ACPI_OPERAND_OBJECT
*RetBufferDesc
;
963 /* Supported spaces are memory/io/pci_config */
965 RegionObj
= ObjDesc
->Field
.RegionObj
;
966 switch (RegionObj
->Region
.SpaceId
)
968 case ACPI_ADR_SPACE_SYSTEM_MEMORY
:
969 case ACPI_ADR_SPACE_SYSTEM_IO
:
970 case ACPI_ADR_SPACE_PCI_CONFIG
:
972 /* Need the interpreter to execute */
974 AcpiUtAcquireMutex (ACPI_MTX_INTERPRETER
);
975 AcpiUtAcquireMutex (ACPI_MTX_NAMESPACE
);
977 /* Exercise read-then-write */
979 Status
= AcpiExReadDataFromField (NULL
, ObjDesc
, &RetBufferDesc
);
982 AcpiExWriteDataToField (RetBufferDesc
, ObjDesc
, NULL
);
983 AcpiUtRemoveReference (RetBufferDesc
);
986 AcpiUtReleaseMutex (ACPI_MTX_NAMESPACE
);
987 AcpiUtReleaseMutex (ACPI_MTX_INTERPRETER
);
989 BitLength
= ObjDesc
->CommonField
.BitLength
;
990 ByteLength
= ACPI_ROUND_BITS_UP_TO_BYTES (BitLength
);
992 AcpiOsPrintf (ACPI_DEBUG_LENGTH_FORMAT
" [%s]", BitLength
,
993 ByteLength
, AcpiUtGetRegionName (RegionObj
->Region
.SpaceId
));
999 " %s address space is not supported in this command [%4.4s]",
1000 AcpiUtGetRegionName (RegionObj
->Region
.SpaceId
),
1001 RegionObj
->Region
.Node
->Name
.Ascii
);
1007 /*******************************************************************************
1009 * FUNCTION: AcpiDbReadFromObject
1011 * PARAMETERS: Node - Parent NS node for the object
1012 * ExpectedType - Object type expected from the read
1013 * Value - Where the value read is returned
1017 * DESCRIPTION: Performs a read from the specified object by invoking the
1018 * special debugger control method that reads the object. Thus,
1019 * the AML interpreter is doing all of the work, increasing the
1020 * validity of the test.
1022 ******************************************************************************/
1025 AcpiDbReadFromObject (
1026 ACPI_NAMESPACE_NODE
*Node
,
1027 ACPI_OBJECT_TYPE ExpectedType
,
1028 ACPI_OBJECT
**Value
)
1030 ACPI_OBJECT
*RetValue
;
1031 ACPI_OBJECT_LIST ParamObjects
;
1032 ACPI_OBJECT Params
[2];
1033 ACPI_BUFFER ReturnObj
;
1037 Params
[0].Type
= ACPI_TYPE_LOCAL_REFERENCE
;
1038 Params
[0].Reference
.ActualType
= Node
->Type
;
1039 Params
[0].Reference
.Handle
= ACPI_CAST_PTR (ACPI_HANDLE
, Node
);
1041 ParamObjects
.Count
= 1;
1042 ParamObjects
.Pointer
= Params
;
1044 ReturnObj
.Length
= ACPI_ALLOCATE_BUFFER
;
1046 AcpiGbl_MethodExecuting
= TRUE
;
1047 Status
= AcpiEvaluateObject (ReadHandle
, NULL
,
1048 &ParamObjects
, &ReturnObj
);
1050 AcpiGbl_MethodExecuting
= FALSE
;
1051 if (ACPI_FAILURE (Status
))
1053 AcpiOsPrintf ("Could not read from object, %s",
1054 AcpiFormatException (Status
));
1058 RetValue
= (ACPI_OBJECT
*) ReturnObj
.Pointer
;
1060 switch (RetValue
->Type
)
1062 case ACPI_TYPE_INTEGER
:
1063 case ACPI_TYPE_BUFFER
:
1064 case ACPI_TYPE_STRING
:
1065 case ACPI_TYPE_PACKAGE
:
1067 * Did we receive the type we wanted? Most important for the
1068 * Integer/Buffer case (when a field is larger than an Integer,
1069 * it should return a Buffer).
1071 if (RetValue
->Type
!= ExpectedType
)
1073 AcpiOsPrintf (" Type mismatch: Expected %s, Received %s",
1074 AcpiUtGetTypeName (ExpectedType
),
1075 AcpiUtGetTypeName (RetValue
->Type
));
1077 AcpiOsFree (ReturnObj
.Pointer
);
1086 AcpiOsPrintf (" Unsupported return object type, %s",
1087 AcpiUtGetTypeName (RetValue
->Type
));
1089 AcpiOsFree (ReturnObj
.Pointer
);
1097 /*******************************************************************************
1099 * FUNCTION: AcpiDbWriteToObject
1101 * PARAMETERS: Node - Parent NS node for the object
1102 * Value - Value to be written
1106 * DESCRIPTION: Performs a write to the specified object by invoking the
1107 * special debugger control method that writes the object. Thus,
1108 * the AML interpreter is doing all of the work, increasing the
1109 * validity of the test.
1111 ******************************************************************************/
1114 AcpiDbWriteToObject (
1115 ACPI_NAMESPACE_NODE
*Node
,
1118 ACPI_OBJECT_LIST ParamObjects
;
1119 ACPI_OBJECT Params
[2];
1123 Params
[0].Type
= ACPI_TYPE_LOCAL_REFERENCE
;
1124 Params
[0].Reference
.ActualType
= Node
->Type
;
1125 Params
[0].Reference
.Handle
= ACPI_CAST_PTR (ACPI_HANDLE
, Node
);
1127 /* Copy the incoming user parameter */
1129 memcpy (&Params
[1], Value
, sizeof (ACPI_OBJECT
));
1131 ParamObjects
.Count
= 2;
1132 ParamObjects
.Pointer
= Params
;
1134 AcpiGbl_MethodExecuting
= TRUE
;
1135 Status
= AcpiEvaluateObject (WriteHandle
, NULL
, &ParamObjects
, NULL
);
1136 AcpiGbl_MethodExecuting
= FALSE
;
1138 if (ACPI_FAILURE (Status
))
1140 AcpiOsPrintf ("Could not write to object, %s",
1141 AcpiFormatException (Status
));
1148 /*******************************************************************************
1150 * FUNCTION: AcpiDbEvaluateAllPredefinedNames
1152 * PARAMETERS: CountArg - Max number of methods to execute
1156 * DESCRIPTION: Namespace batch execution. Execute predefined names in the
1157 * namespace, up to the max count, if specified.
1159 ******************************************************************************/
1162 AcpiDbEvaluateAllPredefinedNames (
1165 ACPI_DB_EXECUTE_WALK Info
;
1169 Info
.MaxCount
= ACPI_UINT32_MAX
;
1173 Info
.MaxCount
= strtoul (CountArg
, NULL
, 0);
1176 /* Search all nodes in namespace */
1178 (void) AcpiWalkNamespace (ACPI_TYPE_ANY
, ACPI_ROOT_OBJECT
,
1179 ACPI_UINT32_MAX
, AcpiDbEvaluateOnePredefinedName
, NULL
,
1180 (void *) &Info
, NULL
);
1183 "Evaluated %u predefined names in the namespace\n", Info
.Count
);
1187 /*******************************************************************************
1189 * FUNCTION: AcpiDbEvaluateOnePredefinedName
1191 * PARAMETERS: Callback from WalkNamespace
1195 * DESCRIPTION: Batch execution module. Currently only executes predefined
1198 ******************************************************************************/
1201 AcpiDbEvaluateOnePredefinedName (
1202 ACPI_HANDLE ObjHandle
,
1203 UINT32 NestingLevel
,
1207 ACPI_NAMESPACE_NODE
*Node
= (ACPI_NAMESPACE_NODE
*) ObjHandle
;
1208 ACPI_DB_EXECUTE_WALK
*Info
= (ACPI_DB_EXECUTE_WALK
*) Context
;
1210 const ACPI_PREDEFINED_INFO
*Predefined
;
1211 ACPI_DEVICE_INFO
*ObjInfo
;
1212 ACPI_OBJECT_LIST ParamObjects
;
1213 ACPI_OBJECT Params
[ACPI_METHOD_NUM_ARGS
];
1214 ACPI_OBJECT
*ThisParam
;
1215 ACPI_BUFFER ReturnObj
;
1223 /* The name must be a predefined ACPI name */
1225 Predefined
= AcpiUtMatchPredefinedMethod (Node
->Name
.Ascii
);
1231 if (Node
->Type
== ACPI_TYPE_LOCAL_SCOPE
)
1236 Pathname
= AcpiNsGetNormalizedPathname (Node
, TRUE
);
1242 /* Get the object info for number of method parameters */
1244 Status
= AcpiGetObjectInfo (ObjHandle
, &ObjInfo
);
1245 if (ACPI_FAILURE (Status
))
1247 ACPI_FREE (Pathname
);
1251 ParamObjects
.Count
= 0;
1252 ParamObjects
.Pointer
= NULL
;
1254 if (ObjInfo
->Type
== ACPI_TYPE_METHOD
)
1256 /* Setup default parameters (with proper types) */
1258 ArgTypeList
= Predefined
->Info
.ArgumentList
;
1259 ArgCount
= METHOD_GET_ARG_COUNT (ArgTypeList
);
1262 * Setup the ACPI-required number of arguments, regardless of what
1263 * the actual method defines. If there is a difference, then the
1264 * method is wrong and a warning will be issued during execution.
1267 for (i
= 0; i
< ArgCount
; i
++)
1269 ArgType
= METHOD_GET_NEXT_TYPE (ArgTypeList
);
1270 ThisParam
->Type
= ArgType
;
1274 case ACPI_TYPE_INTEGER
:
1276 ThisParam
->Integer
.Value
= 1;
1279 case ACPI_TYPE_STRING
:
1281 ThisParam
->String
.Pointer
=
1282 "This is the default argument string";
1283 ThisParam
->String
.Length
=
1284 strlen (ThisParam
->String
.Pointer
);
1287 case ACPI_TYPE_BUFFER
:
1289 ThisParam
->Buffer
.Pointer
= (UINT8
*) Params
; /* just a garbage buffer */
1290 ThisParam
->Buffer
.Length
= 48;
1293 case ACPI_TYPE_PACKAGE
:
1295 ThisParam
->Package
.Elements
= NULL
;
1296 ThisParam
->Package
.Count
= 0;
1301 AcpiOsPrintf ("%s: Unsupported argument type: %u\n",
1309 ParamObjects
.Count
= ArgCount
;
1310 ParamObjects
.Pointer
= Params
;
1313 ACPI_FREE (ObjInfo
);
1314 ReturnObj
.Pointer
= NULL
;
1315 ReturnObj
.Length
= ACPI_ALLOCATE_BUFFER
;
1317 /* Do the actual method execution */
1319 AcpiGbl_MethodExecuting
= TRUE
;
1321 Status
= AcpiEvaluateObject (Node
, NULL
, &ParamObjects
, &ReturnObj
);
1323 AcpiOsPrintf ("%-32s returned %s\n",
1324 Pathname
, AcpiFormatException (Status
));
1325 AcpiGbl_MethodExecuting
= FALSE
;
1326 ACPI_FREE (Pathname
);
1328 /* Ignore status from method execution */
1332 /* Update count, check if we have executed enough methods */
1335 if (Info
->Count
>= Info
->MaxCount
)
1337 Status
= AE_CTRL_TERMINATE
;
1343 #endif /* ACPI_DEBUGGER */