From 3534b428629be185e096be99e3bd5fdfe32d5544 Mon Sep 17 00:00:00 2001 From: Laurent Bercot Date: Thu, 18 Sep 2014 18:55:44 +0000 Subject: initial commit with rc for skalibs-2.0.0.0 --- src/libstddjb/fd_catn.c | 42 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 42 insertions(+) create mode 100644 src/libstddjb/fd_catn.c (limited to 'src/libstddjb/fd_catn.c') diff --git a/src/libstddjb/fd_catn.c b/src/libstddjb/fd_catn.c new file mode 100644 index 0000000..ca78546 --- /dev/null +++ b/src/libstddjb/fd_catn.c @@ -0,0 +1,42 @@ +/* ISC license. */ + +#include +#include +#include +#include + +unsigned int fd_catn (int from, int to, unsigned int n) +{ + unsigned int w = 0 ; + if (n >= IOBUFFER_SIZE) + { + iobuffer b ; + if (!iobuffer_init(&b, from, to)) return 0 ; + while (n >= IOBUFFER_SIZE) + { + register int r = iobuffer_fill(&b) ; + if (r <= 0) + { + iobuffer_finish(&b) ; + if (!r) errno = EPIPE ; + return w ; + } + if (!iobuffer_flush(&b)) + { + iobuffer_finish(&b) ; + return w ; + } + n -= r ; w += r ; + } + iobuffer_finish(&b) ; + } + + { + char buf[n] ; + unsigned int r = allread(from, buf, n) ; + unsigned int v = 0 ; + if (r) v = allwrite(to, buf, r) ; + w += v ; + } + return w ; +} -- cgit v1.3.1