1 files changed, 81 insertions, 0 deletions
diff --git a/libgloss/mips/uhi/yamon_close.c b/libgloss/mips/uhi/yamon_close.c
new file mode 100644
index 0000000..c08bd14
--- /dev/null
+++ b/libgloss/mips/uhi/yamon_close.c
@@ -0,0 +1,81 @@
+/*
+ * Copyright (C) 2014-2018 MIPS Tech, LLC
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright notice,
+ * this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright notice,
+ * this list of conditions and the following disclaimer in the documentation
+ * and/or other materials provided with the distribution.
+ * 3. Neither the name of the copyright holder nor the names of its
+ * contributors may be used to endorse or promote products derived from this
+ * software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+*/
+
+/*
+ * @Synopsis     int32_t close (int32_t fd);
+ *
+ *               Parameters:
+ *                 $4 - File handle
+ *
+ *               Return:
+ *                 $2 - 0 on success else -1
+ *
+ *               Arguments to syscall:
+ *                 $25 - Operation code for close
+ *                 $4 - File handle
+ *
+ *               Return from syscall:
+ *                 $2 - 0 on success else -1
+ *                 $3 - errno
+ *
+ * @Description  File close
+*/
+
+#include <stdint.h>
+#include <errno.h>
+#include <mips/uhi_syscalls.h>
+#include <mips/hal.h>
+
+int32_t _MIPS_HAL_NOMIPS16
+close (int32_t fd)
+{
+  register int32_t arg1 asm ("$4") = fd;
+  register int32_t op asm ("$25") = __MIPS_UHI_CLOSE;
+  register int32_t ret asm ("$2") = __MIPS_UHI_SYSCALL_NUM;
+  register int32_t new_errno asm ("$3") = 0;
+  
+  if (fd == 0 || fd == 1 || fd == 2)
+    return 0;
+
+  __asm__ __volatile__(" # %0,%1 = close(%2) op=%3\n"
+                       SYSCALL (__MIPS_UHI_SYSCALL_NUM)
+                       : "+r" (ret), "=r" (new_errno), "+r" (arg1)
+		       : "r" (op)
+		       : "$5");
+
+  if (ret != 0)
+    {
+      /* Do a dance to set errno, errno is a function call that can
+         clobber $3.  */
+      volatile uint32_t errno_tmp = new_errno;
+      errno = errno_tmp;
+    }
+
+  return ret;
+}
+