Subversion Repositories openrisc

/*
 *  $Id: semunlink.c,v 1.2 2001-09-27 11:59:17 chris Exp $
 */
 
#include <stdarg.h>
 
#include <errno.h>
#include <fcntl.h>
#include <pthread.h>
#include <semaphore.h>
#include <limits.h>
 
#include <rtems/system.h>
#include <rtems/score/object.h>
#include <rtems/posix/semaphore.h>
#include <rtems/posix/time.h>
#include <rtems/posix/seterr.h>
 
/*PAGE
 *
 *  sem_unlink
 *  
 *  Unlinks a named semaphore, sem_close must also be called to remove
 *  the semaphore.
 *
 *  11.2.5 Remove a Named Semaphore, P1003.1b-1993, p.225
 */
 
int sem_unlink(
  const char *name
)
{
  int  status;
  register POSIX_Semaphore_Control *the_semaphore;
  Objects_Id                        the_semaphore_id;
 
  _Thread_Disable_dispatch();
 
  status = _POSIX_Semaphore_Name_to_id( name, &the_semaphore_id );
  if ( status != 0 ) {
    _Thread_Enable_dispatch();
    set_errno_and_return_minus_one( status );
  }
 
  /*
   *  Don't support unlinking a remote semaphore.
   */
 
  if ( !_Objects_Is_local_id(the_semaphore_id) ) {
    _Thread_Enable_dispatch();
    set_errno_and_return_minus_one( ENOSYS );
  }
 
  the_semaphore = (POSIX_Semaphore_Control *) _Objects_Get_local_object(
    &_POSIX_Semaphore_Information,
    _Objects_Get_index( the_semaphore_id )
  );
 
#if defined(RTEMS_MULTIPROCESSING)
  if ( the_semaphore->process_shared == PTHREAD_PROCESS_SHARED ) {
    _Objects_MP_Close( &_POSIX_Semaphore_Information, the_semaphore_id );
  }
#endif
 
  the_semaphore->linked = FALSE;
  _POSIX_Semaphore_Namespace_remove( the_semaphore );
  _POSIX_Semaphore_Delete( the_semaphore );
 
  _Thread_Enable_dispatch();
  return 0;
}