Add timed_write and timed_writev

Signed-off-by: Laurent Bercot <ska@appnovation.com>

1 files changed, 39 insertions, 0 deletions

diff --git a/src/libunixonacid/timed_write.c b/src/libunixonacid/timed_write.c
new file mode 100644
index 0000000..dc86d8f
--- /dev/null
+++ b/src/libunixonacid/timed_write.c
@@ -0,0 +1,39 @@
+/* ISC license. */
+
+#include <unistd.h>
+
+#include <skalibs/functypes.h>
+#include <skalibs/allreadwrite.h>
+#include <skalibs/unix-timed.h>
+
+struct blah_s
+{
+  int fd ;
+  char const *s ;
+  size_t len ;
+  size_t w ;
+} ;
+
+static int getfd (struct blah_s *blah)
+{
+  return blah->fd ;
+}
+
+static int isnonempty (struct blah_s *blah)
+{
+  return blah->w < blah->len ;
+}
+
+static int flush (struct blah_s *blah)
+{
+  ssize_t r = fd_write(blah->fd, blah->s + blah->w, blah->len - blah->w) ;
+  if (r > 0) blah->w += r ;
+  return r > 0 ;
+}
+
+size_t timed_write (int fd, char const *s, size_t len, tain const *deadline, tain *stamp)
+{
+  struct blah_s blah = { .fd = fd, .s = s, .len = len, .w = 0 } ;
+  timed_flush(&blah, (init_func_ref)&getfd, (init_func_ref)&isnonempty, (init_func_ref)&flush, deadline, stamp) ;
+  return blah.w ;
+}