Libc-1082.20.4.tar.gz

[apple/libc.git] / locale / FreeBSD / wcstombs.c

diff --git a/locale/FreeBSD/wcstombs.c b/locale/FreeBSD/wcstombs.c
index d0e49cba39534251cb82b48579d0ce5e46c9ae96..a6d9ae3828d8260f4379a8d3bedd43f532ba89bb 100644 (file)
--- a/locale/FreeBSD/wcstombs.c
+++ b/locale/FreeBSD/wcstombs.c
@@ -1,9 +1,6 @@
 /*-
- * Copyright (c) 1993
- *     The Regents of the University of California.  All rights reserved.
- *
- * This code is derived from software contributed to Berkeley by
- * Paul Borman at Krystal Technologies.
+ * Copyright (c) 2002-2004 Tim J. Robbins.
+ * All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions
@@ -13,18 +10,11 @@
  * 2. Redistributions in binary form must reproduce the above copyright
  *    notice, this list of conditions and the following disclaimer in the
  *    documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- *    must display the following acknowledgement:
- *     This product includes software developed by the University of
- *     California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- *    may be used to endorse or promote products derived from this software
- *    without specific prior written permission.
  *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
@@ -35,57 +25,31 @@
  */
 
 #include <sys/cdefs.h>
-__FBSDID("$FreeBSD: src/lib/libc/locale/wcstombs.c,v 1.5 2002/10/27 10:41:21 tjr Exp $");
+__FBSDID("$FreeBSD: src/lib/libc/locale/wcstombs.c,v 1.11 2009/01/15 18:53:52 rdivacky Exp $");
+
+#include "xlocale_private.h"
 
-#include <errno.h>
-#include <stdlib.h>
 #include <limits.h>
-#include <stddef.h>
-#include <rune.h>
+#include <stdlib.h>
+#include <wchar.h>
+#include "mblocal.h"
 
 size_t
-wcstombs(char * __restrict s, const wchar_t * __restrict pwcs, size_t n)
+wcstombs_l(char * __restrict s, const wchar_t * __restrict pwcs, size_t n,
+    locale_t loc)
 {
-       char buf[MB_LEN_MAX];
-       char *e;
-       int cnt, nb;
-
-       if (pwcs == NULL || n > INT_MAX) {
-               errno = EINVAL;
-               return (-1);
-       }
-
-       cnt = 0;
-
-       if (s == NULL) {
-               /* Convert and count only, do not store. */
-               while (*pwcs != L'\0') {
-                       if (sputrune(*pwcs++, buf, MB_LEN_MAX, &e) == 0) {
-                               errno = EILSEQ;
-                               return (-1);
-                       }
-                       cnt += e - buf;
-               }
-               return (cnt);
-       }
-
-       /* Convert, store and count characters. */
-       nb = n;
-       while (nb > 0) {
-               if (*pwcs == L'\0') {
-                       *s = '\0';
-                       break;
-               }
-               if (sputrune(*pwcs++, s, nb, &e) == 0) {
-                       errno = EILSEQ;
-                       return (-1);
-               }
-               if (e == NULL)          /* too long */
-                       return (cnt);
-               cnt += e - s;
-               nb -= e - s;
-               s = e;
-       }
+       static const mbstate_t initial;
+       mbstate_t mbs;
+       const wchar_t *pwcsp;
+
+       NORMALIZE_LOCALE(loc);
+       mbs = initial;
+       pwcsp = pwcs;
+       return (loc->__lc_ctype->__wcsnrtombs(s, &pwcsp, SIZE_T_MAX, n, &mbs, loc));
+}
 
-       return (cnt);
+size_t
+wcstombs(char * __restrict s, const wchar_t * __restrict pwcs, size_t n)
+{
+       return wcstombs_l(s, pwcs, n, __current_locale());
 }