2002-09-20 Jeff Johnston <jjohnstn@redhat.com>

        * libc/ctype/Makefile.am: Add new files.
        * libc/ctype/Makefile.in: Regenerated.
        * libc/ctype/ctype.tex: Add new iswxxxx, towxxxx, wctype,
        and wctrans functions to documentation index.
        * libc/ctype/iswalnum.c: New file.
        * libc/ctype/iswalpha.c: Ditto.
        * libc/ctype/iswblank.c: Ditto.
        * libc/ctype/iswcntrl.c: Ditto.
        * libc/ctype/iswctype.c: Ditto.
        * libc/ctype/iswdigit.c: Ditto.
        * libc/ctype/iswgraph.c: Ditto.
        * libc/ctype/iswlower.c: Ditto.
        * libc/ctype/iswprint.c: Ditto.
        * libc/ctype/iswpunct.c: Ditto.
        * libc/ctype/iswspace.c: Ditto.
        * libc/ctype/iswupper.c: Ditto.
        * libc/ctype/iswxdigit.c: Ditto.
        * libc/ctype/jp2uc.c: Ditto.
        * libc/ctype/jp2uc.h: Ditto.
        * libc/ctype/local.h: Ditto.
        * libc/ctype/towctrans.c: Ditto.
        * libc/ctype/towlower.c: Ditto.
        * libc/ctype/towupper.c: Ditto.
        * libc/ctype/utf8alpha.h: Ditto.
        * libc/ctype/utf8print.h: Ditto.
        * libc/ctype/utf8punct.h: Ditto.
        * libc/ctype/wctrans.c: Ditto.
        * libc/ctype/wctype.c: Ditto.
        * libc/locale/locale.c (__lc_ctype): New external array to
        replace static lc_ctype array.
        * libc/stdlib/mbtowc_r.c: Use __lc_ctype to check current lc_ctype
        rather than reentrancy structure's _current_locale field.
        * libc/stdlib/wctomb_r.c: Ditto.

1 files changed, 138 insertions, 0 deletions

diff --git a/newlib/libc/ctype/wctype.c b/newlib/libc/ctype/wctype.c
new file mode 100644
index 000000000..f2c9d0247
--- /dev/null
+++ b/newlib/libc/ctype/wctype.c
@@ -0,0 +1,138 @@
+/* Copyright (c) 2002 Red Hat Incorporated.
+   All rights reserved.
+
+   Redistribution and use in source and binary forms, with or without
+   modification, are permitted provided that the following conditions are met:
+
+     Redistributions of source code must retain the above copyright
+     notice, this list of conditions and the following disclaimer.
+
+     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.
+
+     The name of Red Hat Incorporated may not be used to endorse
+     or promote products derived from this software without specific
+     prior written permission.
+
+   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS 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 RED HAT INCORPORATED 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) HOWEVER CAUSED AND
+   ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+   (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS   
+   SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*/
+
+/*
+FUNCTION
+	<<wctype>>---get wide-character classification type
+
+INDEX
+	wctype
+
+ANSI_SYNOPSIS
+	#include <wctype.h>
+	wctype_t wctype(const char *<[c]>);
+
+TRAD_SYNOPSIS
+	#include <wctype.h>
+	wctype_t wctype(<[c]>)
+	const char * <[c]>;
+
+
+DESCRIPTION
+<<wctype>> is a function which takes a string <[c]> and gives back
+the appropriate wctype_t type value associated with the string,
+if one exists.  The following values are guaranteed to be recognized:
+"alnum", "alpha", "blank", "cntrl", "digit", "graph", "lower", "print",
+"punct", "space", "upper", and "xdigit".
+
+RETURNS
+<<wctype>> returns 0 and sets <<errno>> to <<EINVAL>> if the
+given name is invalid.  Otherwise, it returns a valid non-zero wctype_t
+value.
+
+PORTABILITY
+<<wctype>> is C99.
+
+No supporting OS subroutines are required.
+*/
+
+#include <_ansi.h>
+#include <string.h>
+#include <reent.h>
+#include <wctype.h>
+#include <errno.h>
+#include "local.h"
+
+wctype_t
+_DEFUN (_wctype_r, (r, c), 
+	struct _reent *r _AND
+	const char *c)
+{
+  switch (*c)
+    {
+    case 'a':
+      if (!strcmp (c, "alnum"))
+        return WC_ALNUM; 
+      else if (!strcmp (c, "alpha"))
+        return WC_ALPHA;
+      break;
+    case 'b':
+      if (!strcmp (c, "blank"))
+        return WC_BLANK;
+      break;
+    case 'c':
+      if (!strcmp (c, "cntrl"))
+        return WC_CNTRL;
+      break;
+    case 'd':
+      if (!strcmp (c, "digit"))
+        return WC_DIGIT;
+      break;
+    case 'g':
+      if (!strcmp (c, "graph"))
+        return WC_GRAPH;
+      break;
+    case 'l':
+      if (!strcmp (c, "lower"))
+        return WC_LOWER;
+      break;
+    case 'p':
+      if (!strcmp (c, "print"))
+        return WC_PRINT;
+      else if (!strcmp (c, "punct"))
+        return WC_PUNCT;
+      break;
+    case 's':
+      if (!strcmp (c, "space"))
+        return WC_SPACE;
+      break;
+    case 'u':
+      if (!strcmp (c, "upper"))
+        return WC_UPPER;
+      break;
+    case 'x':
+      if (!strcmp (c, "xdigit"))
+        return WC_XDIGIT;
+      break;
+    default:
+    }
+
+  /* otherwise invalid */
+  r->_errno = EINVAL;
+  return 0;
+}
+
+#ifndef _REENT_ONLY
+wctype_t
+_DEFUN (wctype, (c),
+	const char *c)
+{
+  return _wctype_r (_REENT, c);
+}
+#endif /* !_REENT_ONLY */