From 3fb8909aae99ddd223a8f0c2b6d2b32eb283b21c Mon Sep 17 00:00:00 2001
From: Joel Sherrill <joel.sherrill@OARcorp.com>
Date: Tue, 9 Nov 1999 13:39:42 +0000
Subject: sem_close was accidentally lost in the split.

---
 c/src/exec/posix/src/Makefile.in |  2 +-
 c/src/exec/posix/src/semclose.c  | 47 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 48 insertions(+), 1 deletion(-)
 create mode 100644 c/src/exec/posix/src/semclose.c

(limited to 'c')

diff --git a/c/src/exec/posix/src/Makefile.in b/c/src/exec/posix/src/Makefile.in
index 8a5098394d..85daeddead 100644
--- a/c/src/exec/posix/src/Makefile.in
+++ b/c/src/exec/posix/src/Makefile.in
@@ -68,7 +68,7 @@ PSIGNAL_C_PIECES = psignal alarm kill killinfo pause \
     sigwait sigwaitinfo signal_2
 
 SEMAPHORE_C_PIECES= semaphore semaphorecreatesupp semaphoredeletesupp \
-    semaphoremp semaphorenametoid semaphorewaitsupp semdestroy \
+    semaphoremp semaphorenametoid semaphorewaitsupp semclose semdestroy \
     semgetvalue seminit semopen sempost semtimedwait semtrywait \
     semunlink semwait
 
diff --git a/c/src/exec/posix/src/semclose.c b/c/src/exec/posix/src/semclose.c
new file mode 100644
index 0000000000..c4a5ed3bad
--- /dev/null
+++ b/c/src/exec/posix/src/semclose.c
@@ -0,0 +1,47 @@
+/*
+ *  $Id$
+ */
+
+#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
+ *
+ *  11.2.4 Close a Named Semaphore, P1003.1b-1993, p.224
+ */
+
+int sem_close(
+  sem_t *sem
+)
+{
+  register POSIX_Semaphore_Control *the_semaphore;
+  Objects_Locations                 location;
+ 
+  the_semaphore = _POSIX_Semaphore_Get( sem, &location );
+  switch ( location ) {
+    case OBJECTS_ERROR:
+      set_errno_and_return_minus_one( EINVAL );
+    case OBJECTS_REMOTE:
+      _Thread_Dispatch();
+      return POSIX_MP_NOT_IMPLEMENTED();
+      set_errno_and_return_minus_one( EINVAL );
+    case OBJECTS_LOCAL:
+      the_semaphore->open_count -= 1;
+      _POSIX_Semaphore_Delete( the_semaphore );
+      _Thread_Enable_dispatch();
+      return 0;
+  }
+  return POSIX_BOTTOM_REACHED();
+}
-- 
cgit v1.2.3