1 files changed, 14 insertions, 0 deletions
diff --git a/src/libstddjb/dir_close.c b/src/libstddjb/dir_close.c
new file mode 100644
index 0000000..0af6f0e
--- /dev/null
+++ b/src/libstddjb/dir_close.c
@@ -0,0 +1,14 @@
+/* ISC license. */
+
+#include <errno.h>
+#include <skalibs/direntry.h>
+
+int dir_close (DIR *dir)
+{
+  register unsigned int done = 0 ;
+doit:
+  done++ ;
+  if (!closedir(dir)) return 0 ;
+  if (errno == EINTR) goto doit ;
+  return ((errno == EBADF) && (done > 1)) ? 0 : -1 ;
+}