evmisc.c 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649
  1. /******************************************************************************
  2. *
  3. * Module Name: evmisc - Miscellaneous event manager support functions
  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 "acevents.h"
  45. #include "acnamesp.h"
  46. #include "acinterp.h"
  47. #define _COMPONENT ACPI_EVENTS
  48. ACPI_MODULE_NAME("evmisc")
  49. /* Local prototypes */
  50. static void ACPI_SYSTEM_XFACE acpi_ev_notify_dispatch(void *context);
  51. static u32 acpi_ev_global_lock_handler(void *context);
  52. static acpi_status acpi_ev_remove_global_lock_handler(void);
  53. /*******************************************************************************
  54. *
  55. * FUNCTION: acpi_ev_is_notify_object
  56. *
  57. * PARAMETERS: Node - Node to check
  58. *
  59. * RETURN: TRUE if notifies allowed on this object
  60. *
  61. * DESCRIPTION: Check type of node for a object that supports notifies.
  62. *
  63. * TBD: This could be replaced by a flag bit in the node.
  64. *
  65. ******************************************************************************/
  66. u8 acpi_ev_is_notify_object(struct acpi_namespace_node *node)
  67. {
  68. switch (node->type) {
  69. case ACPI_TYPE_DEVICE:
  70. case ACPI_TYPE_PROCESSOR:
  71. case ACPI_TYPE_THERMAL:
  72. /*
  73. * These are the ONLY objects that can receive ACPI notifications
  74. */
  75. return (TRUE);
  76. default:
  77. return (FALSE);
  78. }
  79. }
  80. /*******************************************************************************
  81. *
  82. * FUNCTION: acpi_ev_queue_notify_request
  83. *
  84. * PARAMETERS: Node - NS node for the notified object
  85. * notify_value - Value from the Notify() request
  86. *
  87. * RETURN: Status
  88. *
  89. * DESCRIPTION: Dispatch a device notification event to a previously
  90. * installed handler.
  91. *
  92. ******************************************************************************/
  93. acpi_status
  94. acpi_ev_queue_notify_request(struct acpi_namespace_node * node,
  95. u32 notify_value)
  96. {
  97. union acpi_operand_object *obj_desc;
  98. union acpi_operand_object *handler_obj = NULL;
  99. union acpi_generic_state *notify_info;
  100. acpi_status status = AE_OK;
  101. ACPI_FUNCTION_NAME(ev_queue_notify_request);
  102. /*
  103. * For value 3 (Ejection Request), some device method may need to be run.
  104. * For value 2 (Device Wake) if _PRW exists, the _PS0 method may need
  105. * to be run.
  106. * For value 0x80 (Status Change) on the power button or sleep button,
  107. * initiate soft-off or sleep operation?
  108. */
  109. ACPI_DEBUG_PRINT((ACPI_DB_INFO,
  110. "Dispatching Notify on [%4.4s] Node %p Value 0x%2.2X (%s)\n",
  111. acpi_ut_get_node_name(node), node, notify_value,
  112. acpi_ut_get_notify_name(notify_value)));
  113. /* Get the notify object attached to the NS Node */
  114. obj_desc = acpi_ns_get_attached_object(node);
  115. if (obj_desc) {
  116. /* We have the notify object, Get the right handler */
  117. switch (node->type) {
  118. /* Notify allowed only on these types */
  119. case ACPI_TYPE_DEVICE:
  120. case ACPI_TYPE_THERMAL:
  121. case ACPI_TYPE_PROCESSOR:
  122. if (notify_value <= ACPI_MAX_SYS_NOTIFY) {
  123. handler_obj =
  124. obj_desc->common_notify.system_notify;
  125. } else {
  126. handler_obj =
  127. obj_desc->common_notify.device_notify;
  128. }
  129. break;
  130. default:
  131. /* All other types are not supported */
  132. return (AE_TYPE);
  133. }
  134. }
  135. /*
  136. * If there is any handler to run, schedule the dispatcher.
  137. * Check for:
  138. * 1) Global system notify handler
  139. * 2) Global device notify handler
  140. * 3) Per-device notify handler
  141. */
  142. if ((acpi_gbl_system_notify.handler &&
  143. (notify_value <= ACPI_MAX_SYS_NOTIFY)) ||
  144. (acpi_gbl_device_notify.handler &&
  145. (notify_value > ACPI_MAX_SYS_NOTIFY)) || handler_obj) {
  146. notify_info = acpi_ut_create_generic_state();
  147. if (!notify_info) {
  148. return (AE_NO_MEMORY);
  149. }
  150. if (!handler_obj) {
  151. ACPI_DEBUG_PRINT((ACPI_DB_INFO,
  152. "Executing system notify handler for Notify (%4.4s, %X) "
  153. "node %p\n",
  154. acpi_ut_get_node_name(node),
  155. notify_value, node));
  156. }
  157. notify_info->common.descriptor_type =
  158. ACPI_DESC_TYPE_STATE_NOTIFY;
  159. notify_info->notify.node = node;
  160. notify_info->notify.value = (u16) notify_value;
  161. notify_info->notify.handler_obj = handler_obj;
  162. status =
  163. acpi_os_execute(OSL_NOTIFY_HANDLER, acpi_ev_notify_dispatch,
  164. notify_info);
  165. if (ACPI_FAILURE(status)) {
  166. acpi_ut_delete_generic_state(notify_info);
  167. }
  168. } else {
  169. /* There is no notify handler (per-device or system) for this device */
  170. ACPI_DEBUG_PRINT((ACPI_DB_INFO,
  171. "No notify handler for Notify (%4.4s, %X) node %p\n",
  172. acpi_ut_get_node_name(node), notify_value,
  173. node));
  174. }
  175. return (status);
  176. }
  177. /*******************************************************************************
  178. *
  179. * FUNCTION: acpi_ev_notify_dispatch
  180. *
  181. * PARAMETERS: Context - To be passed to the notify handler
  182. *
  183. * RETURN: None.
  184. *
  185. * DESCRIPTION: Dispatch a device notification event to a previously
  186. * installed handler.
  187. *
  188. ******************************************************************************/
  189. static void ACPI_SYSTEM_XFACE acpi_ev_notify_dispatch(void *context)
  190. {
  191. union acpi_generic_state *notify_info =
  192. (union acpi_generic_state *)context;
  193. acpi_notify_handler global_handler = NULL;
  194. void *global_context = NULL;
  195. union acpi_operand_object *handler_obj;
  196. ACPI_FUNCTION_ENTRY();
  197. /*
  198. * We will invoke a global notify handler if installed. This is done
  199. * _before_ we invoke the per-device handler attached to the device.
  200. */
  201. if (notify_info->notify.value <= ACPI_MAX_SYS_NOTIFY) {
  202. /* Global system notification handler */
  203. if (acpi_gbl_system_notify.handler) {
  204. global_handler = acpi_gbl_system_notify.handler;
  205. global_context = acpi_gbl_system_notify.context;
  206. }
  207. } else {
  208. /* Global driver notification handler */
  209. if (acpi_gbl_device_notify.handler) {
  210. global_handler = acpi_gbl_device_notify.handler;
  211. global_context = acpi_gbl_device_notify.context;
  212. }
  213. }
  214. /* Invoke the system handler first, if present */
  215. if (global_handler) {
  216. global_handler(notify_info->notify.node,
  217. notify_info->notify.value, global_context);
  218. }
  219. /* Now invoke the per-device handler, if present */
  220. handler_obj = notify_info->notify.handler_obj;
  221. if (handler_obj) {
  222. struct acpi_object_notify_handler *notifier;
  223. notifier = &handler_obj->notify;
  224. while (notifier) {
  225. notifier->handler(notify_info->notify.node,
  226. notify_info->notify.value,
  227. notifier->context);
  228. notifier = notifier->next;
  229. }
  230. }
  231. /* All done with the info object */
  232. acpi_ut_delete_generic_state(notify_info);
  233. }
  234. /*******************************************************************************
  235. *
  236. * FUNCTION: acpi_ev_global_lock_handler
  237. *
  238. * PARAMETERS: Context - From thread interface, not used
  239. *
  240. * RETURN: ACPI_INTERRUPT_HANDLED
  241. *
  242. * DESCRIPTION: Invoked directly from the SCI handler when a global lock
  243. * release interrupt occurs. If there is actually a pending
  244. * request for the lock, signal the waiting thread.
  245. *
  246. ******************************************************************************/
  247. static u32 acpi_ev_global_lock_handler(void *context)
  248. {
  249. acpi_status status;
  250. acpi_cpu_flags flags;
  251. flags = acpi_os_acquire_lock(acpi_gbl_global_lock_pending_lock);
  252. /*
  253. * If a request for the global lock is not actually pending,
  254. * we are done. This handles "spurious" global lock interrupts
  255. * which are possible (and have been seen) with bad BIOSs.
  256. */
  257. if (!acpi_gbl_global_lock_pending) {
  258. goto cleanup_and_exit;
  259. }
  260. /*
  261. * Send a unit to the global lock semaphore. The actual acquisition
  262. * of the global lock will be performed by the waiting thread.
  263. */
  264. status = acpi_os_signal_semaphore(acpi_gbl_global_lock_semaphore, 1);
  265. if (ACPI_FAILURE(status)) {
  266. ACPI_ERROR((AE_INFO, "Could not signal Global Lock semaphore"));
  267. }
  268. acpi_gbl_global_lock_pending = FALSE;
  269. cleanup_and_exit:
  270. acpi_os_release_lock(acpi_gbl_global_lock_pending_lock, flags);
  271. return (ACPI_INTERRUPT_HANDLED);
  272. }
  273. /*******************************************************************************
  274. *
  275. * FUNCTION: acpi_ev_init_global_lock_handler
  276. *
  277. * PARAMETERS: None
  278. *
  279. * RETURN: Status
  280. *
  281. * DESCRIPTION: Install a handler for the global lock release event
  282. *
  283. ******************************************************************************/
  284. acpi_status acpi_ev_init_global_lock_handler(void)
  285. {
  286. acpi_status status;
  287. ACPI_FUNCTION_TRACE(ev_init_global_lock_handler);
  288. /* Attempt installation of the global lock handler */
  289. status = acpi_install_fixed_event_handler(ACPI_EVENT_GLOBAL,
  290. acpi_ev_global_lock_handler,
  291. NULL);
  292. /*
  293. * If the global lock does not exist on this platform, the attempt to
  294. * enable GBL_STATUS will fail (the GBL_ENABLE bit will not stick).
  295. * Map to AE_OK, but mark global lock as not present. Any attempt to
  296. * actually use the global lock will be flagged with an error.
  297. */
  298. acpi_gbl_global_lock_present = FALSE;
  299. if (status == AE_NO_HARDWARE_RESPONSE) {
  300. ACPI_ERROR((AE_INFO,
  301. "No response from Global Lock hardware, disabling lock"));
  302. return_ACPI_STATUS(AE_OK);
  303. }
  304. status = acpi_os_create_lock(&acpi_gbl_global_lock_pending_lock);
  305. if (ACPI_FAILURE(status)) {
  306. return_ACPI_STATUS(status);
  307. }
  308. acpi_gbl_global_lock_pending = FALSE;
  309. acpi_gbl_global_lock_present = TRUE;
  310. return_ACPI_STATUS(status);
  311. }
  312. /*******************************************************************************
  313. *
  314. * FUNCTION: acpi_ev_remove_global_lock_handler
  315. *
  316. * PARAMETERS: None
  317. *
  318. * RETURN: Status
  319. *
  320. * DESCRIPTION: Remove the handler for the Global Lock
  321. *
  322. ******************************************************************************/
  323. static acpi_status acpi_ev_remove_global_lock_handler(void)
  324. {
  325. acpi_status status;
  326. ACPI_FUNCTION_TRACE(ev_remove_global_lock_handler);
  327. acpi_gbl_global_lock_present = FALSE;
  328. status = acpi_remove_fixed_event_handler(ACPI_EVENT_GLOBAL,
  329. acpi_ev_global_lock_handler);
  330. return_ACPI_STATUS(status);
  331. }
  332. /******************************************************************************
  333. *
  334. * FUNCTION: acpi_ev_acquire_global_lock
  335. *
  336. * PARAMETERS: Timeout - Max time to wait for the lock, in millisec.
  337. *
  338. * RETURN: Status
  339. *
  340. * DESCRIPTION: Attempt to gain ownership of the Global Lock.
  341. *
  342. * MUTEX: Interpreter must be locked
  343. *
  344. * Note: The original implementation allowed multiple threads to "acquire" the
  345. * Global Lock, and the OS would hold the lock until the last thread had
  346. * released it. However, this could potentially starve the BIOS out of the
  347. * lock, especially in the case where there is a tight handshake between the
  348. * Embedded Controller driver and the BIOS. Therefore, this implementation
  349. * allows only one thread to acquire the HW Global Lock at a time, and makes
  350. * the global lock appear as a standard mutex on the OS side.
  351. *
  352. *****************************************************************************/
  353. static acpi_thread_id acpi_ev_global_lock_thread_id;
  354. static int acpi_ev_global_lock_acquired;
  355. acpi_status acpi_ev_acquire_global_lock(u16 timeout)
  356. {
  357. acpi_cpu_flags flags;
  358. acpi_status status;
  359. u8 acquired = FALSE;
  360. ACPI_FUNCTION_TRACE(ev_acquire_global_lock);
  361. /*
  362. * Only one thread can acquire the GL at a time, the global_lock_mutex
  363. * enforces this. This interface releases the interpreter if we must wait.
  364. */
  365. status = acpi_ex_system_wait_mutex(
  366. acpi_gbl_global_lock_mutex->mutex.os_mutex, 0);
  367. if (status == AE_TIME) {
  368. if (acpi_ev_global_lock_thread_id == acpi_os_get_thread_id()) {
  369. acpi_ev_global_lock_acquired++;
  370. return AE_OK;
  371. }
  372. }
  373. if (ACPI_FAILURE(status)) {
  374. status = acpi_ex_system_wait_mutex(
  375. acpi_gbl_global_lock_mutex->mutex.os_mutex,
  376. timeout);
  377. }
  378. if (ACPI_FAILURE(status)) {
  379. return_ACPI_STATUS(status);
  380. }
  381. acpi_ev_global_lock_thread_id = acpi_os_get_thread_id();
  382. acpi_ev_global_lock_acquired++;
  383. /*
  384. * Update the global lock handle and check for wraparound. The handle is
  385. * only used for the external global lock interfaces, but it is updated
  386. * here to properly handle the case where a single thread may acquire the
  387. * lock via both the AML and the acpi_acquire_global_lock interfaces. The
  388. * handle is therefore updated on the first acquire from a given thread
  389. * regardless of where the acquisition request originated.
  390. */
  391. acpi_gbl_global_lock_handle++;
  392. if (acpi_gbl_global_lock_handle == 0) {
  393. acpi_gbl_global_lock_handle = 1;
  394. }
  395. /*
  396. * Make sure that a global lock actually exists. If not, just
  397. * treat the lock as a standard mutex.
  398. */
  399. if (!acpi_gbl_global_lock_present) {
  400. acpi_gbl_global_lock_acquired = TRUE;
  401. return_ACPI_STATUS(AE_OK);
  402. }
  403. flags = acpi_os_acquire_lock(acpi_gbl_global_lock_pending_lock);
  404. do {
  405. /* Attempt to acquire the actual hardware lock */
  406. ACPI_ACQUIRE_GLOBAL_LOCK(acpi_gbl_FACS, acquired);
  407. if (acquired) {
  408. acpi_gbl_global_lock_acquired = TRUE;
  409. ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
  410. "Acquired hardware Global Lock\n"));
  411. break;
  412. }
  413. /*
  414. * Did not get the lock. The pending bit was set above, and
  415. * we must now wait until we receive the global lock
  416. * released interrupt.
  417. */
  418. acpi_gbl_global_lock_pending = TRUE;
  419. acpi_os_release_lock(acpi_gbl_global_lock_pending_lock, flags);
  420. ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
  421. "Waiting for hardware Global Lock\n"));
  422. /*
  423. * Wait for handshake with the global lock interrupt handler.
  424. * This interface releases the interpreter if we must wait.
  425. */
  426. status =
  427. acpi_ex_system_wait_semaphore
  428. (acpi_gbl_global_lock_semaphore, ACPI_WAIT_FOREVER);
  429. flags = acpi_os_acquire_lock(acpi_gbl_global_lock_pending_lock);
  430. } while (ACPI_SUCCESS(status));
  431. acpi_gbl_global_lock_pending = FALSE;
  432. acpi_os_release_lock(acpi_gbl_global_lock_pending_lock, flags);
  433. return_ACPI_STATUS(status);
  434. }
  435. /*******************************************************************************
  436. *
  437. * FUNCTION: acpi_ev_release_global_lock
  438. *
  439. * PARAMETERS: None
  440. *
  441. * RETURN: Status
  442. *
  443. * DESCRIPTION: Releases ownership of the Global Lock.
  444. *
  445. ******************************************************************************/
  446. acpi_status acpi_ev_release_global_lock(void)
  447. {
  448. u8 pending = FALSE;
  449. acpi_status status = AE_OK;
  450. ACPI_FUNCTION_TRACE(ev_release_global_lock);
  451. /* Lock must be already acquired */
  452. if (!acpi_gbl_global_lock_acquired) {
  453. ACPI_WARNING((AE_INFO,
  454. "Cannot release the ACPI Global Lock, it has not been acquired"));
  455. return_ACPI_STATUS(AE_NOT_ACQUIRED);
  456. }
  457. acpi_ev_global_lock_acquired--;
  458. if (acpi_ev_global_lock_acquired > 0) {
  459. return AE_OK;
  460. }
  461. if (acpi_gbl_global_lock_present) {
  462. /* Allow any thread to release the lock */
  463. ACPI_RELEASE_GLOBAL_LOCK(acpi_gbl_FACS, pending);
  464. /*
  465. * If the pending bit was set, we must write GBL_RLS to the control
  466. * register
  467. */
  468. if (pending) {
  469. status =
  470. acpi_write_bit_register
  471. (ACPI_BITREG_GLOBAL_LOCK_RELEASE,
  472. ACPI_ENABLE_EVENT);
  473. }
  474. ACPI_DEBUG_PRINT((ACPI_DB_EXEC,
  475. "Released hardware Global Lock\n"));
  476. }
  477. acpi_gbl_global_lock_acquired = FALSE;
  478. /* Release the local GL mutex */
  479. acpi_ev_global_lock_thread_id = 0;
  480. acpi_ev_global_lock_acquired = 0;
  481. acpi_os_release_mutex(acpi_gbl_global_lock_mutex->mutex.os_mutex);
  482. return_ACPI_STATUS(status);
  483. }
  484. /******************************************************************************
  485. *
  486. * FUNCTION: acpi_ev_terminate
  487. *
  488. * PARAMETERS: none
  489. *
  490. * RETURN: none
  491. *
  492. * DESCRIPTION: Disable events and free memory allocated for table storage.
  493. *
  494. ******************************************************************************/
  495. void acpi_ev_terminate(void)
  496. {
  497. u32 i;
  498. acpi_status status;
  499. ACPI_FUNCTION_TRACE(ev_terminate);
  500. if (acpi_gbl_events_initialized) {
  501. /*
  502. * Disable all event-related functionality. In all cases, on error,
  503. * print a message but obviously we don't abort.
  504. */
  505. /* Disable all fixed events */
  506. for (i = 0; i < ACPI_NUM_FIXED_EVENTS; i++) {
  507. status = acpi_disable_event(i, 0);
  508. if (ACPI_FAILURE(status)) {
  509. ACPI_ERROR((AE_INFO,
  510. "Could not disable fixed event %u",
  511. (u32) i));
  512. }
  513. }
  514. /* Disable all GPEs in all GPE blocks */
  515. status = acpi_ev_walk_gpe_list(acpi_hw_disable_gpe_block, NULL);
  516. /* Remove SCI handler */
  517. status = acpi_ev_remove_sci_handler();
  518. if (ACPI_FAILURE(status)) {
  519. ACPI_ERROR((AE_INFO, "Could not remove SCI handler"));
  520. }
  521. status = acpi_ev_remove_global_lock_handler();
  522. if (ACPI_FAILURE(status)) {
  523. ACPI_ERROR((AE_INFO,
  524. "Could not remove Global Lock handler"));
  525. }
  526. }
  527. /* Deallocate all handler objects installed within GPE info structs */
  528. status = acpi_ev_walk_gpe_list(acpi_ev_delete_gpe_handlers, NULL);
  529. /* Return to original mode if necessary */
  530. if (acpi_gbl_original_mode == ACPI_SYS_MODE_LEGACY) {
  531. status = acpi_disable();
  532. if (ACPI_FAILURE(status)) {
  533. ACPI_WARNING((AE_INFO, "AcpiDisable failed"));
  534. }
  535. }
  536. return_VOID;
  537. }