From 2b3e9d9b244e279ef5693a7cf5dacc7903164af5 Mon Sep 17 00:00:00 2001 From: Ralf Corsepius Date: Mon, 22 Jul 2002 09:46:48 +0000 Subject: Remove, moved to cpukit. --- c/src/exec/itron/src/ref_mbx.c | 66 ------------------------------------------ 1 file changed, 66 deletions(-) delete mode 100644 c/src/exec/itron/src/ref_mbx.c (limited to 'c/src/exec/itron/src/ref_mbx.c') diff --git a/c/src/exec/itron/src/ref_mbx.c b/c/src/exec/itron/src/ref_mbx.c deleted file mode 100644 index 6ae4e597bd..0000000000 --- a/c/src/exec/itron/src/ref_mbx.c +++ /dev/null @@ -1,66 +0,0 @@ -/* - * ITRON 3.0 Mailbox Manager - * - * COPYRIGHT (c) 1989-1999. - * On-Line Applications Research Corporation (OAR). - * - * The license and distribution terms for this file may be - * found in the file LICENSE in this distribution or at - * http://www.OARcorp.com/rtems/license.html. - * - * $Id$ - */ - -#if HAVE_CONFIG_H -#include "config.h" -#endif - -#include - -#include -#include - -/* - * ref_mbx - Reference Mailbox Status - */ - -ER ref_mbx( - T_RMBX *pk_rmbx, - ID mbxid -) -{ - register ITRON_Mailbox_Control *the_mailbox; - Objects_Locations location; - Chain_Control *pending; - - if ( !pk_rmbx ) - return E_PAR; - - the_mailbox = _ITRON_Mailbox_Get( mbxid, &location ); - switch ( location ) { - case OBJECTS_REMOTE: - case OBJECTS_ERROR: - return _ITRON_Mailbox_Clarify_get_id_error( mbxid ); - - case OBJECTS_LOCAL: - - pending = &the_mailbox->message_queue.Pending_messages; - if ( _Chain_Is_empty( pending ) ) - pk_rmbx->pk_msg = NULL; - else - pk_rmbx->pk_msg = (T_MSG *) pending->first; - - /* - * Fill in whether or not there is a waiting task - */ - - if ( !_Thread_queue_First( &the_mailbox->message_queue.Wait_queue ) ) - pk_rmbx->wtsk = FALSE; - else - pk_rmbx->wtsk = TRUE; - - break; - } - _ITRON_return_errorno( E_OK ); -} - -- cgit v1.2.3