[haiku-commits] r37417 - in haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc: . wctype

  • From: zooey@xxxxxxxxxxxxxxx
  • To: haiku-commits@xxxxxxxxxxxxx
  • Date: Wed, 7 Jul 2010 18:20:42 +0200 (CEST)

Author: zooey
Date: 2010-07-07 18:20:42 +0200 (Wed, 07 Jul 2010)
New Revision: 37417
Changeset: http://dev.haiku-os.org/changeset/37417/haiku

Added:
   
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/
   
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wchar-lookup.h
   
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wctype.h
Removed:
   
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wchar-lookup.h
   
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wctype.h
Log:
* reverted the part of r37414 that broke the build - some glibc headers
  are still needed, tsk!


Property changes on: 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype
___________________________________________________________________
Added: svn:ignore
   + wctype.pro


Copied: 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wchar-lookup.h
 (from rev 37413, 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wchar-lookup.h)
===================================================================
--- 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wchar-lookup.h
                            (rev 0)
+++ 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wchar-lookup.h
    2010-07-07 16:20:42 UTC (rev 37417)
@@ -0,0 +1,141 @@
+/* Copyright (C) 2000 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+   Contributed by Bruno Haible <haible@xxxxxxxxxxxxxx>, 2000.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+#include <stdint.h>
+
+/* Tables indexed by a wide character are compressed through the use
+   of a multi-level lookup.  The compression effect comes from blocks
+   that don't need particular data and from blocks that can share their
+   data.  */
+
+/* Bit tables are accessed by cutting wc in four blocks of bits:
+   - the high 32-q-p bits,
+   - the next q bits,
+   - the next p bits,
+   - the next 5 bits.
+
+           +------------------+-----+-----+-----+
+     wc  =  +     32-q-p-5     |  q  |  p  |  5  |
+           +------------------+-----+-----+-----+
+
+   p and q are variable.  For 16-bit Unicode it is sufficient to
+   choose p and q such that q+p+5 <= 16.
+
+   The table contains the following uint32_t words:
+   - q+p+5,
+   - s = upper exclusive bound for wc >> (q+p+5),
+   - p+5,
+   - 2^q-1,
+   - 2^p-1,
+   - 1st-level table: s offsets, pointing into the 2nd-level table,
+   - 2nd-level table: k*2^q offsets, pointing into the 3rd-level table,
+   - 3rd-level table: j*2^p words, each containing 32 bits of data.
+*/
+
+static __inline int
+wctype_table_lookup (const char *table, uint32_t wc)
+{
+  uint32_t shift1 = ((const uint32_t *) table)[0];
+  uint32_t index1 = wc >> shift1;
+  uint32_t bound = ((const uint32_t *) table)[1];
+  if (index1 < bound)
+    {
+      uint32_t lookup1 = ((const uint32_t *) table)[5 + index1];
+      if (lookup1 != 0)
+       {
+         uint32_t shift2 = ((const uint32_t *) table)[2];
+         uint32_t mask2 = ((const uint32_t *) table)[3];
+         uint32_t index2 = (wc >> shift2) & mask2;
+         uint32_t lookup2 = ((const uint32_t *)(table + lookup1))[index2];
+         if (lookup2 != 0)
+           {
+             uint32_t mask3 = ((const uint32_t *) table)[4];
+             uint32_t index3 = (wc >> 5) & mask3;
+             uint32_t lookup3 = ((const uint32_t *)(table + lookup2))[index3];
+
+             return (lookup3 >> (wc & 0x1f)) & 1;
+           }
+       }
+    }
+  return 0;
+}
+
+/* Byte tables are similar to bit tables, except that the addressing
+   unit is a single byte, and no 5 bits are used as a word index.  */
+
+static __inline int
+wcwidth_table_lookup (const char *table, uint32_t wc)
+{
+  uint32_t shift1 = ((const uint32_t *) table)[0];
+  uint32_t index1 = wc >> shift1;
+  uint32_t bound = ((const uint32_t *) table)[1];
+  if (index1 < bound)
+    {
+      uint32_t lookup1 = ((const uint32_t *) table)[5 + index1];
+      if (lookup1 != 0)
+       {
+         uint32_t shift2 = ((const uint32_t *) table)[2];
+         uint32_t mask2 = ((const uint32_t *) table)[3];
+         uint32_t index2 = (wc >> shift2) & mask2;
+         uint32_t lookup2 = ((const uint32_t *)(table + lookup1))[index2];
+         if (lookup2 != 0)
+           {
+             uint32_t mask3 = ((const uint32_t *) table)[4];
+             uint32_t index3 = wc & mask3;
+             uint8_t lookup3 = ((const uint8_t *)(table + lookup2))[index3];
+
+             return lookup3;
+           }
+       }
+    }
+  return 0xff;
+}
+
+/* Mapping tables are similar to bit tables, except that the
+   addressing unit is a single signed 32-bit word, containing the
+   difference between the desired result and the argument, and no 5
+   bits are used as a word index.  */
+
+static __inline uint32_t
+wctrans_table_lookup (const char *table, uint32_t wc)
+{
+  uint32_t shift1 = ((const uint32_t *) table)[0];
+  uint32_t index1 = wc >> shift1;
+  uint32_t bound = ((const uint32_t *) table)[1];
+  if (index1 < bound)
+    {
+      uint32_t lookup1 = ((const uint32_t *) table)[5 + index1];
+      if (lookup1 != 0)
+       {
+         uint32_t shift2 = ((const uint32_t *) table)[2];
+         uint32_t mask2 = ((const uint32_t *) table)[3];
+         uint32_t index2 = (wc >> shift2) & mask2;
+         uint32_t lookup2 = ((const uint32_t *)(table + lookup1))[index2];
+         if (lookup2 != 0)
+           {
+             uint32_t mask3 = ((const uint32_t *) table)[4];
+             uint32_t index3 = wc & mask3;
+             int32_t lookup3 = ((const int32_t *)(table + lookup2))[index3];
+
+             return wc + lookup3;
+           }
+       }
+    }
+  return wc;
+}

Copied: 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wctype.h
 (from rev 37413, 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wctype.h)
===================================================================
--- 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wctype.h
                          (rev 0)
+++ 
haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc/wctype/wctype.h
  2010-07-07 16:20:42 UTC (rev 37417)
@@ -0,0 +1,333 @@
+/* Copyright (C) 1996,97,98,99,2000,01,02 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
+
+/*
+ *     ISO C99 Standard: 7.25
+ *     Wide character classification and mapping utilities  <wctype.h>
+ */
+
+#ifndef _WCTYPE_H
+
+#include <features.h>
+#include <bits/types.h>
+
+#ifndef __need_iswxxx
+# define _WCTYPE_H     1
+
+/* We try to get wint_t from <stddef.h>, but not all GCC versions define it
+   there.  So define it ourselves if it remains undefined.  */
+# define __need_wint_t
+# include <stddef.h>
+# ifndef _WINT_T
+/* Integral type unchanged by default argument promotions that can
+   hold any value corresponding to members of the extended character
+   set, as well as at least one value that does not correspond to any
+   member of the extended character set.  */
+#  define _WINT_T
+typedef unsigned int wint_t;
+# else
+#  ifdef __USE_ISOC99
+__USING_NAMESPACE_C99(wint_t)
+#  endif
+__END_NAMESPACE_C99
+# endif
+
+/* Constant expression of type `wint_t' whose value does not correspond
+   to any member of the extended character set.  */
+# ifndef WEOF
+#  define WEOF (0xffffffffu)
+# endif
+#endif
+#undef __need_iswxxx
+
+
+/* The following part is also used in the <wcsmbs.h> header when compiled
+   in the Unix98 compatibility mode.  */
+#ifndef __iswxxx_defined
+# define __iswxxx_defined      1
+
+__BEGIN_NAMESPACE_C99
+/* Scalar type that can hold values which represent locale-specific
+   character classifications.  */
+typedef unsigned long int wctype_t;
+__END_NAMESPACE_C99
+
+# ifndef _ISwbit
+/* The characteristics are stored always in network byte order (big
+   endian).  We define the bit value interpretations here dependent on the
+   machine's byte order.  */
+
+#  include <endian.h>
+#  if __BYTE_ORDER == __BIG_ENDIAN
+#   define _ISwbit(bit)        (1 << (bit))
+#  else /* __BYTE_ORDER == __LITTLE_ENDIAN */
+#   define _ISwbit(bit)        \
+       ((bit) < 8 ? (int) ((1UL << (bit)) << 24)                             \
+        : ((bit) < 16 ? (int) ((1UL << (bit)) << 8)                          \
+           : ((bit) < 24 ? (int) ((1UL << (bit)) >> 8)                       \
+              : (int) ((1UL << (bit)) >> 24))))
+#  endif
+
+enum
+{
+  __ISwupper = 0,                      /* UPPERCASE.  */
+  __ISwlower = 1,                      /* lowercase.  */
+  __ISwalpha = 2,                      /* Alphabetic.  */
+  __ISwdigit = 3,                      /* Numeric.  */
+  __ISwxdigit = 4,                     /* Hexadecimal numeric.  */
+  __ISwspace = 5,                      /* Whitespace.  */
+  __ISwprint = 6,                      /* Printing.  */
+  __ISwgraph = 7,                      /* Graphical.  */
+  __ISwblank = 8,                      /* Blank (usually SPC and TAB).  */
+  __ISwcntrl = 9,                      /* Control character.  */
+  __ISwpunct = 10,                     /* Punctuation.  */
+  __ISwalnum = 11,                     /* Alphanumeric.  */
+
+  _ISwupper = _ISwbit (__ISwupper),    /* UPPERCASE.  */
+  _ISwlower = _ISwbit (__ISwlower),    /* lowercase.  */
+  _ISwalpha = _ISwbit (__ISwalpha),    /* Alphabetic.  */
+  _ISwdigit = _ISwbit (__ISwdigit),    /* Numeric.  */
+  _ISwxdigit = _ISwbit (__ISwxdigit),  /* Hexadecimal numeric.  */
+  _ISwspace = _ISwbit (__ISwspace),    /* Whitespace.  */
+  _ISwprint = _ISwbit (__ISwprint),    /* Printing.  */
+  _ISwgraph = _ISwbit (__ISwgraph),    /* Graphical.  */
+  _ISwblank = _ISwbit (__ISwblank),    /* Blank (usually SPC and TAB).  */
+  _ISwcntrl = _ISwbit (__ISwcntrl),    /* Control character.  */
+  _ISwpunct = _ISwbit (__ISwpunct),    /* Punctuation.  */
+  _ISwalnum = _ISwbit (__ISwalnum)     /* Alphanumeric.  */
+};
+# endif /* Not _ISwbit  */
+
+
+__BEGIN_DECLS
+
+__BEGIN_NAMESPACE_C99
+/*
+ * Wide-character classification functions: 7.15.2.1.
+ */
+
+/* Test for any wide character for which `iswalpha' or `iswdigit' is
+   true.  */
+extern int iswalnum (wint_t __wc) __THROW;
+
+/* Test for any wide character for which `iswupper' or 'iswlower' is
+   true, or any wide character that is one of a locale-specific set of
+   wide-characters for which none of `iswcntrl', `iswdigit',
+   `iswpunct', or `iswspace' is true.  */
+extern int iswalpha (wint_t __wc) __THROW;
+
+/* Test for any control wide character.  */
+extern int iswcntrl (wint_t __wc) __THROW;
+
+/* Test for any wide character that corresponds to a decimal-digit
+   character.  */
+extern int iswdigit (wint_t __wc) __THROW;
+
+/* Test for any wide character for which `iswprint' is true and
+   `iswspace' is false.  */
+extern int iswgraph (wint_t __wc) __THROW;
+
+/* Test for any wide character that corresponds to a lowercase letter
+   or is one of a locale-specific set of wide characters for which
+   none of `iswcntrl', `iswdigit', `iswpunct', or `iswspace' is true.  */
+extern int iswlower (wint_t __wc) __THROW;
+
+/* Test for any printing wide character.  */
+extern int iswprint (wint_t __wc) __THROW;
+
+/* Test for any printing wide character that is one of a
+   locale-specific et of wide characters for which neither `iswspace'
+   nor `iswalnum' is true.  */
+extern int iswpunct (wint_t __wc) __THROW;
+
+/* Test for any wide character that corresponds to a locale-specific
+   set of wide characters for which none of `iswalnum', `iswgraph', or
+   `iswpunct' is true.  */
+extern int iswspace (wint_t __wc) __THROW;
+
+/* Test for any wide character that corresponds to an uppercase letter
+   or is one of a locale-specific set of wide character for which none
+   of `iswcntrl', `iswdigit', `iswpunct', or `iswspace' is true.  */
+extern int iswupper (wint_t __wc) __THROW;
+
+/* Test for any wide character that corresponds to a hexadecimal-digit
+   character equivalent to that performed be the functions described
+   in the previous subclause.  */
+extern int iswxdigit (wint_t __wc) __THROW;
+
+/* Test for any wide character that corresponds to a standard blank
+   wide character or a locale-specific set of wide characters for
+   which `iswalnum' is false.  */
+# ifdef __USE_ISOC99
+extern int iswblank (wint_t __wc) __THROW;
+# endif
+
+/*
+ * Extensible wide-character classification functions: 7.15.2.2.
+ */
+
+/* Construct value that describes a class of wide characters identified
+   by the string argument PROPERTY.  */
+extern wctype_t wctype (__const char *__property) __THROW;
+
+/* Determine whether the wide-character WC has the property described by
+   DESC.  */
+extern int iswctype (wint_t __wc, wctype_t __desc) __THROW;
+__END_NAMESPACE_C99
+
+
+/*
+ * Wide-character case-mapping functions: 7.15.3.1.
+ */
+
+__BEGIN_NAMESPACE_C99
+/* Scalar type that can hold values which represent locale-specific
+   character mappings.  */
+typedef __const __int32_t *wctrans_t;
+__END_NAMESPACE_C99
+#ifdef __USE_GNU
+__USING_NAMESPACE_C99(wctrans_t)
+#endif
+
+__BEGIN_NAMESPACE_C99
+/* Converts an uppercase letter to the corresponding lowercase letter.  */
+extern wint_t towlower (wint_t __wc) __THROW;
+
+/* Converts an lowercase letter to the corresponding uppercase letter.  */
+extern wint_t towupper (wint_t __wc) __THROW;
+__END_NAMESPACE_C99
+
+__END_DECLS
+
+#endif /* need iswxxx.  */
+
+
+/* The remaining definitions and declarations must not appear in the
+   <wcsmbs.h> header.  */
+#ifdef _WCTYPE_H
+
+/*
+ * Extensible wide-character mapping functions: 7.15.3.2.
+ */
+
+__BEGIN_DECLS
+
+__BEGIN_NAMESPACE_C99
+/* Construct value that describes a mapping between wide characters
+   identified by the string argument PROPERTY.  */
+extern wctrans_t wctrans (__const char *__property) __THROW;
+
+/* Map the wide character WC using the mapping described by DESC.  */
+extern wint_t towctrans (wint_t __wc, wctrans_t __desc) __THROW;
+__END_NAMESPACE_C99
+
+# ifdef __USE_GNU
+/* Declare the interface to extended locale model.  */
+#  include <xlocale.h>
+
+/* Test for any wide character for which `iswalpha' or `iswdigit' is
+   true.  */
+extern int iswalnum_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character for which `iswupper' or 'iswlower' is
+   true, or any wide character that is one of a locale-specific set of
+   wide-characters for which none of `iswcntrl', `iswdigit',
+   `iswpunct', or `iswspace' is true.  */
+extern int iswalpha_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any control wide character.  */
+extern int iswcntrl_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character that corresponds to a decimal-digit
+   character.  */
+extern int iswdigit_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character for which `iswprint' is true and
+   `iswspace' is false.  */
+extern int iswgraph_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character that corresponds to a lowercase letter
+   or is one of a locale-specific set of wide characters for which
+   none of `iswcntrl', `iswdigit', `iswpunct', or `iswspace' is true.  */
+extern int iswlower_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any printing wide character.  */
+extern int iswprint_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any printing wide character that is one of a
+   locale-specific et of wide characters for which neither `iswspace'
+   nor `iswalnum' is true.  */
+extern int iswpunct_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character that corresponds to a locale-specific
+   set of wide characters for which none of `iswalnum', `iswgraph', or
+   `iswpunct' is true.  */
+extern int iswspace_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character that corresponds to an uppercase letter
+   or is one of a locale-specific set of wide character for which none
+   of `iswcntrl', `iswdigit', `iswpunct', or `iswspace' is true.  */
+extern int iswupper_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character that corresponds to a hexadecimal-digit
+   character equivalent to that performed be the functions described
+   in the previous subclause.  */
+extern int iswxdigit_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Test for any wide character that corresponds to a standard blank
+   wide character or a locale-specific set of wide characters for
+   which `iswalnum' is false.  */
+extern int iswblank_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Construct value that describes a class of wide characters identified
+   by the string argument PROPERTY.  */
+extern wctype_t wctype_l (__const char *__property, __locale_t __locale)
+     __THROW;
+
+/* Determine whether the wide-character WC has the property described by
+   DESC.  */
+extern int iswctype_l (wint_t __wc, wctype_t __desc, __locale_t __locale)
+     __THROW;
+
+
+/*
+ * Wide-character case-mapping functions.
+ */
+
+/* Converts an uppercase letter to the corresponding lowercase letter.  */
+extern wint_t towlower_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Converts an lowercase letter to the corresponding uppercase letter.  */
+extern wint_t towupper_l (wint_t __wc, __locale_t __locale) __THROW;
+
+/* Construct value that describes a mapping between wide characters
+   identified by the string argument PROPERTY.  */
+extern wctrans_t wctrans_l (__const char *__property, __locale_t __locale)
+     __THROW;
+
+/* Map the wide character WC using the mapping described by DESC.  */
+extern wint_t towctrans_l (wint_t __wc, wctrans_t __desc,
+                          __locale_t __locale) __THROW;
+
+# endif /* Use GNU.  */
+
+__END_DECLS
+
+#endif /* __WCTYPE_H defined.  */
+
+#endif /* wctype.h  */


Other related posts:

  • » [haiku-commits] r37417 - in haiku/branches/developer/zooey/posix-locale/src/system/libroot/posix/glibc: . wctype - zooey