1 /******************************************************************************
3 * Module Name: psutils - Parser miscellaneous utilities (Parser only)
5 *****************************************************************************/
8 * Copyright (C) 2000 - 2004, R. Byron Moore
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
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.
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.
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.
45 #include <acpi/acpi.h>
46 #include <acpi/acparser.h>
47 #include <acpi/amlcode.h>
48 #include <acpi/acnamesp.h>
50 #define _COMPONENT ACPI_PARSER
51 ACPI_MODULE_NAME ("psutils")
54 /*******************************************************************************
56 * FUNCTION: acpi_ps_create_scope_op
62 * DESCRIPTION: Create a Scope and associated namepath op with the root name
64 ******************************************************************************/
66 union acpi_parse_object *
67 acpi_ps_create_scope_op (
70 union acpi_parse_object *scope_op;
73 scope_op = acpi_ps_alloc_op (AML_SCOPE_OP);
79 scope_op->named.name = ACPI_ROOT_NAME;
84 /*******************************************************************************
86 * FUNCTION: acpi_ps_init_op
88 * PARAMETERS: Op - A newly allocated Op object
89 * Opcode - Opcode to store in the Op
93 * DESCRIPTION: Allocate an acpi_op, choose op type (and thus size) based on
96 ******************************************************************************/
100 union acpi_parse_object *op,
103 ACPI_FUNCTION_ENTRY ();
106 op->common.data_type = ACPI_DESC_TYPE_PARSER;
107 op->common.aml_opcode = opcode;
109 ACPI_DISASM_ONLY_MEMBERS (ACPI_STRNCPY (op->common.aml_op_name,
110 (acpi_ps_get_opcode_info (opcode))->name, sizeof (op->common.aml_op_name)));
114 /*******************************************************************************
116 * FUNCTION: acpi_ps_alloc_op
118 * PARAMETERS: Opcode - Opcode that will be stored in the new Op
120 * RETURN: Pointer to the new Op.
122 * DESCRIPTION: Allocate an acpi_op, choose op type (and thus size) based on
123 * opcode. A cache of opcodes is available for the pure
124 * GENERIC_OP, since this is by far the most commonly used.
126 ******************************************************************************/
128 union acpi_parse_object*
132 union acpi_parse_object *op = NULL;
135 const struct acpi_opcode_info *op_info;
138 ACPI_FUNCTION_ENTRY ();
141 op_info = acpi_ps_get_opcode_info (opcode);
143 /* Allocate the minimum required size object */
145 if (op_info->flags & AML_DEFER) {
146 size = sizeof (struct acpi_parse_obj_named);
147 flags = ACPI_PARSEOP_DEFERRED;
149 else if (op_info->flags & AML_NAMED) {
150 size = sizeof (struct acpi_parse_obj_named);
151 flags = ACPI_PARSEOP_NAMED;
153 else if (opcode == AML_INT_BYTELIST_OP) {
154 size = sizeof (struct acpi_parse_obj_named);
155 flags = ACPI_PARSEOP_BYTELIST;
158 size = sizeof (struct acpi_parse_obj_common);
159 flags = ACPI_PARSEOP_GENERIC;
162 if (size == sizeof (struct acpi_parse_obj_common)) {
164 * The generic op is by far the most common (16 to 1)
166 op = acpi_ut_acquire_from_cache (ACPI_MEM_LIST_PSNODE);
169 op = acpi_ut_acquire_from_cache (ACPI_MEM_LIST_PSNODE_EXT);
172 /* Initialize the Op */
175 acpi_ps_init_op (op, opcode);
176 op->common.flags = flags;
183 /*******************************************************************************
185 * FUNCTION: acpi_ps_free_op
187 * PARAMETERS: Op - Op to be freed
191 * DESCRIPTION: Free an Op object. Either put it on the GENERIC_OP cache list
192 * or actually free it.
194 ******************************************************************************/
198 union acpi_parse_object *op)
200 ACPI_FUNCTION_NAME ("ps_free_op");
203 if (op->common.aml_opcode == AML_INT_RETURN_VALUE_OP) {
204 ACPI_DEBUG_PRINT ((ACPI_DB_ALLOCATIONS, "Free retval op: %p\n", op));
207 if (op->common.flags & ACPI_PARSEOP_GENERIC) {
208 acpi_ut_release_to_cache (ACPI_MEM_LIST_PSNODE, op);
211 acpi_ut_release_to_cache (ACPI_MEM_LIST_PSNODE_EXT, op);
216 /*******************************************************************************
218 * FUNCTION: acpi_ps_delete_parse_cache
224 * DESCRIPTION: Free all objects that are on the parse cache list.
226 ******************************************************************************/
229 acpi_ps_delete_parse_cache (
232 ACPI_FUNCTION_TRACE ("ps_delete_parse_cache");
235 acpi_ut_delete_generic_cache (ACPI_MEM_LIST_PSNODE);
236 acpi_ut_delete_generic_cache (ACPI_MEM_LIST_PSNODE_EXT);
241 /*******************************************************************************
243 * FUNCTION: Utility functions
245 * DESCRIPTION: Low level character and object functions
247 ******************************************************************************/
251 * Is "c" a namestring lead character?
254 acpi_ps_is_leading_char (
257 return ((u8) (c == '_' || (c >= 'A' && c <= 'Z')));
262 * Is "c" a namestring prefix character?
265 acpi_ps_is_prefix_char (
268 return ((u8) (c == '\\' || c == '^'));
273 * Get op's name (4-byte name segment) or 0 if unnamed
277 union acpi_parse_object *op)
281 /* The "generic" object has no name associated with it */
283 if (op->common.flags & ACPI_PARSEOP_GENERIC) {
287 /* Only the "Extended" parse objects have a name */
289 return (op->named.name);
298 union acpi_parse_object *op,
302 /* The "generic" object has no name associated with it */
304 if (op->common.flags & ACPI_PARSEOP_GENERIC) {
308 op->named.name = name;