Index: fusl/src/multibyte/wcsrtombs.c |
diff --git a/fusl/src/multibyte/wcsrtombs.c b/fusl/src/multibyte/wcsrtombs.c |
new file mode 100644 |
index 0000000000000000000000000000000000000000..30be415d0683f287bf575a5b33e8c493f9b42434 |
--- /dev/null |
+++ b/fusl/src/multibyte/wcsrtombs.c |
@@ -0,0 +1,61 @@ |
+/* |
+ * This code was written by Rich Felker in 2010; no copyright is claimed. |
+ * This code is in the public domain. Attribution is appreciated but |
+ * unnecessary. |
+ */ |
+ |
+#include <wchar.h> |
+ |
+size_t wcsrtombs(char *restrict s, const wchar_t **restrict ws, size_t n, mbstate_t *restrict st) |
+{ |
+ const wchar_t *ws2; |
+ char buf[4]; |
+ size_t N = n, l; |
+ if (!s) { |
+ for (n=0, ws2=*ws; *ws2; ws2++) { |
+ if (*ws2 >= 0x80u) { |
+ l = wcrtomb(buf, *ws2, 0); |
+ if (!(l+1)) return -1; |
+ n += l; |
+ } else n++; |
+ } |
+ return n; |
+ } |
+ while (n>=4) { |
+ if (**ws-1u >= 0x7fu) { |
+ if (!**ws) { |
+ *s = 0; |
+ *ws = 0; |
+ return N-n; |
+ } |
+ l = wcrtomb(s, **ws, 0); |
+ if (!(l+1)) return -1; |
+ s += l; |
+ n -= l; |
+ } else { |
+ *s++ = **ws; |
+ n--; |
+ } |
+ (*ws)++; |
+ } |
+ while (n) { |
+ if (**ws-1u >= 0x7fu) { |
+ if (!**ws) { |
+ *s = 0; |
+ *ws = 0; |
+ return N-n; |
+ } |
+ l = wcrtomb(buf, **ws, 0); |
+ if (!(l+1)) return -1; |
+ if (l>n) return N-n; |
+ wcrtomb(s, **ws, 0); |
+ s += l; |
+ n -= l; |
+ } else { |
+ *s++ = **ws; |
+ n--; |
+ } |
+ (*ws)++; |
+ } |
+ return N; |
+} |