psutils.c 6.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245
  1. /******************************************************************************
  2. *
  3. * Module Name: psutils - Parser miscellaneous utilities (Parser only)
  4. *
  5. *****************************************************************************/
  6. /*
  7. * Copyright (C) 2000 - 2011, Intel Corp.
  8. * All rights reserved.
  9. *
  10. * Redistribution and use in source and binary forms, with or without
  11. * modification, are permitted provided that the following conditions
  12. * are met:
  13. * 1. Redistributions of source code must retain the above copyright
  14. * notice, this list of conditions, and the following disclaimer,
  15. * without modification.
  16. * 2. Redistributions in binary form must reproduce at minimum a disclaimer
  17. * substantially similar to the "NO WARRANTY" disclaimer below
  18. * ("Disclaimer") and any redistribution must be conditioned upon
  19. * including a substantially similar Disclaimer requirement for further
  20. * binary redistribution.
  21. * 3. Neither the names of the above-listed copyright holders nor the names
  22. * of any contributors may be used to endorse or promote products derived
  23. * from this software without specific prior written permission.
  24. *
  25. * Alternatively, this software may be distributed under the terms of the
  26. * GNU General Public License ("GPL") version 2 as published by the Free
  27. * Software Foundation.
  28. *
  29. * NO WARRANTY
  30. * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  31. * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  32. * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
  33. * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  34. * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  35. * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  36. * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  37. * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  38. * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
  39. * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  40. * POSSIBILITY OF SUCH DAMAGES.
  41. */
  42. #include <acpi/acpi.h>
  43. #include "accommon.h"
  44. #include "acparser.h"
  45. #include "amlcode.h"
  46. #define _COMPONENT ACPI_PARSER
  47. ACPI_MODULE_NAME("psutils")
  48. /*******************************************************************************
  49. *
  50. * FUNCTION: acpi_ps_create_scope_op
  51. *
  52. * PARAMETERS: None
  53. *
  54. * RETURN: A new Scope object, null on failure
  55. *
  56. * DESCRIPTION: Create a Scope and associated namepath op with the root name
  57. *
  58. ******************************************************************************/
  59. union acpi_parse_object *acpi_ps_create_scope_op(void)
  60. {
  61. union acpi_parse_object *scope_op;
  62. scope_op = acpi_ps_alloc_op(AML_SCOPE_OP);
  63. if (!scope_op) {
  64. return (NULL);
  65. }
  66. scope_op->named.name = ACPI_ROOT_NAME;
  67. return (scope_op);
  68. }
  69. /*******************************************************************************
  70. *
  71. * FUNCTION: acpi_ps_init_op
  72. *
  73. * PARAMETERS: Op - A newly allocated Op object
  74. * Opcode - Opcode to store in the Op
  75. *
  76. * RETURN: None
  77. *
  78. * DESCRIPTION: Initialize a parse (Op) object
  79. *
  80. ******************************************************************************/
  81. void acpi_ps_init_op(union acpi_parse_object *op, u16 opcode)
  82. {
  83. ACPI_FUNCTION_ENTRY();
  84. op->common.descriptor_type = ACPI_DESC_TYPE_PARSER;
  85. op->common.aml_opcode = opcode;
  86. ACPI_DISASM_ONLY_MEMBERS(ACPI_STRNCPY(op->common.aml_op_name,
  87. (acpi_ps_get_opcode_info
  88. (opcode))->name,
  89. sizeof(op->common.aml_op_name)));
  90. }
  91. /*******************************************************************************
  92. *
  93. * FUNCTION: acpi_ps_alloc_op
  94. *
  95. * PARAMETERS: Opcode - Opcode that will be stored in the new Op
  96. *
  97. * RETURN: Pointer to the new Op, null on failure
  98. *
  99. * DESCRIPTION: Allocate an acpi_op, choose op type (and thus size) based on
  100. * opcode. A cache of opcodes is available for the pure
  101. * GENERIC_OP, since this is by far the most commonly used.
  102. *
  103. ******************************************************************************/
  104. union acpi_parse_object *acpi_ps_alloc_op(u16 opcode)
  105. {
  106. union acpi_parse_object *op;
  107. const struct acpi_opcode_info *op_info;
  108. u8 flags = ACPI_PARSEOP_GENERIC;
  109. ACPI_FUNCTION_ENTRY();
  110. op_info = acpi_ps_get_opcode_info(opcode);
  111. /* Determine type of parse_op required */
  112. if (op_info->flags & AML_DEFER) {
  113. flags = ACPI_PARSEOP_DEFERRED;
  114. } else if (op_info->flags & AML_NAMED) {
  115. flags = ACPI_PARSEOP_NAMED;
  116. } else if (opcode == AML_INT_BYTELIST_OP) {
  117. flags = ACPI_PARSEOP_BYTELIST;
  118. }
  119. /* Allocate the minimum required size object */
  120. if (flags == ACPI_PARSEOP_GENERIC) {
  121. /* The generic op (default) is by far the most common (16 to 1) */
  122. op = acpi_os_acquire_object(acpi_gbl_ps_node_cache);
  123. } else {
  124. /* Extended parseop */
  125. op = acpi_os_acquire_object(acpi_gbl_ps_node_ext_cache);
  126. }
  127. /* Initialize the Op */
  128. if (op) {
  129. acpi_ps_init_op(op, opcode);
  130. op->common.flags = flags;
  131. }
  132. return (op);
  133. }
  134. /*******************************************************************************
  135. *
  136. * FUNCTION: acpi_ps_free_op
  137. *
  138. * PARAMETERS: Op - Op to be freed
  139. *
  140. * RETURN: None.
  141. *
  142. * DESCRIPTION: Free an Op object. Either put it on the GENERIC_OP cache list
  143. * or actually free it.
  144. *
  145. ******************************************************************************/
  146. void acpi_ps_free_op(union acpi_parse_object *op)
  147. {
  148. ACPI_FUNCTION_NAME(ps_free_op);
  149. if (op->common.aml_opcode == AML_INT_RETURN_VALUE_OP) {
  150. ACPI_DEBUG_PRINT((ACPI_DB_ALLOCATIONS, "Free retval op: %p\n",
  151. op));
  152. }
  153. if (op->common.flags & ACPI_PARSEOP_GENERIC) {
  154. (void)acpi_os_release_object(acpi_gbl_ps_node_cache, op);
  155. } else {
  156. (void)acpi_os_release_object(acpi_gbl_ps_node_ext_cache, op);
  157. }
  158. }
  159. /*******************************************************************************
  160. *
  161. * FUNCTION: Utility functions
  162. *
  163. * DESCRIPTION: Low level character and object functions
  164. *
  165. ******************************************************************************/
  166. /*
  167. * Is "c" a namestring lead character?
  168. */
  169. u8 acpi_ps_is_leading_char(u32 c)
  170. {
  171. return ((u8) (c == '_' || (c >= 'A' && c <= 'Z')));
  172. }
  173. /*
  174. * Is "c" a namestring prefix character?
  175. */
  176. u8 acpi_ps_is_prefix_char(u32 c)
  177. {
  178. return ((u8) (c == '\\' || c == '^'));
  179. }
  180. /*
  181. * Get op's name (4-byte name segment) or 0 if unnamed
  182. */
  183. #ifdef ACPI_FUTURE_USAGE
  184. u32 acpi_ps_get_name(union acpi_parse_object * op)
  185. {
  186. /* The "generic" object has no name associated with it */
  187. if (op->common.flags & ACPI_PARSEOP_GENERIC) {
  188. return (0);
  189. }
  190. /* Only the "Extended" parse objects have a name */
  191. return (op->named.name);
  192. }
  193. #endif /* ACPI_FUTURE_USAGE */
  194. /*
  195. * Set op's name
  196. */
  197. void acpi_ps_set_name(union acpi_parse_object *op, u32 name)
  198. {
  199. /* The "generic" object has no name associated with it */
  200. if (op->common.flags & ACPI_PARSEOP_GENERIC) {
  201. return;
  202. }
  203. op->named.name = name;
  204. }