1 files changed, 73 insertions, 0 deletions
diff --git a/src/unistd/writen.c b/src/unistd/writen.c
new file mode 100644
index 0000000..8082b00
--- /dev/null
+++ b/src/unistd/writen.c
@@ -0,0 +1,73 @@
+/**
+ * slibc — Yet another C library
+ * Copyright © 2015  Mattias Andrée (maandree@member.fsf.org)
+ * 
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ * 
+ * You should have received a copy of the GNU General Public License
+ * along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+#include <unistd.h>
+#include <signal.h>
+
+
+
+/**
+ * Variant of `write` that will write until all given
+ * data has been written. This function will block signals
+ * so that it cannot throw `EINTR`, which could mean that
+ * you do not know how much data has been successfully
+ * written. Note however, it may fail for any other reason
+ * resulting in the same problem.
+ * 
+ * This is a slibc extension.
+ * 
+ * @etymology  (Write) all `(n)byte` bytes!
+ * 
+ * @param  fd     The file descriptor whither the data shall be write.
+ * @param  buf    The data to write.
+ * @param  nbyte  The number of bytes to write.
+ * 
+ * @throws  Any error specified for write(3), except `EINTR`.
+ * 
+ * @since  Always.
+ */
+ssize_t writen(int fd, const void* buf, size_t nbyte);
+{
+  const char *buffer = buf;
+  ssize_t r, n = 0;
+  sigset_t mask, oldmask;
+  int saved_errno = 0;
+  
+  sigfillset(&mask);
+  sigprocmask(SIG_BLOCK, &mask, &oldmask);
+  
+  while (nbyte)
+    {
+      r = write(fildes, buffer, nbyte);
+      if (r < 0)
+	goto fail;
+      if (r == 0)
+	break;
+      n += r;
+      nbyte -= (size_t)r;
+      buffer += r;
+    }
+
+  sigprocmask(SIG_SETMASK, &oldmask, NULL);
+  return n;
+ fail:
+  errno = saved_errno;
+  sigprocmask(SIG_SETMASK, &oldmask, NULL);
+  saved_errno = errno;
+  return -1;
+}
+