Fix tst_wcscpy.c test.
[platform/upstream/glibc.git] / iconvdata / ibm933.c
index be7fc0c..d1f3f05 100644 (file)
@@ -1,22 +1,21 @@
 /* Conversion from and to IBM933.
-   Copyright (C) 2000 Free Software Foundation, Inc.
+   Copyright (C) 2000-2015 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Masahide Washizawa <washi@yamato.ibm.co.jp>, 2000.
 
    The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Library General Public License as
-   published by the Free Software Foundation; either version 2 of the
-   License, or (at your option) any later version.
+   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
-   Library General Public License for more details.
+   Lesser General Public License for more details.
 
-   You should have received a copy of the GNU Library General Public
-   License along with the GNU C Library; see the file COPYING.LIB.  If not,
-   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-   Boston, MA 02111-1307, USA.  */
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, see
+   <http://www.gnu.org/licenses/>.  */
 
 #include <dlfcn.h>
 #include <stdint.h>
 #define CHARSET_NAME   "IBM933//"
 #define FROM_LOOP      from_ibm933
 #define TO_LOOP                to_ibm933
+#define ONE_DIRECTION                  0
+#define FROM_LOOP_MIN_NEEDED_FROM      1
+#define FROM_LOOP_MAX_NEEDED_FROM      2
+#define FROM_LOOP_MIN_NEEDED_TO                4
+#define FROM_LOOP_MAX_NEEDED_TO                4
+#define TO_LOOP_MIN_NEEDED_FROM                4
+#define TO_LOOP_MAX_NEEDED_FROM                4
+#define TO_LOOP_MIN_NEEDED_TO          1
+#define TO_LOOP_MAX_NEEDED_TO          3
+#define PREPARE_LOOP \
+  int save_curcs;                                                            \
+  int *curcsp = &data->__statep->__count;
+#define EXTRA_LOOP_ARGS                , curcsp
 
 /* Definitions of initialization and destructor function.  */
 #define DEFINE_INIT    1
 #define DEFINE_FINI    1
 
-#define MIN_NEEDED_FROM        1
-#define MIN_NEEDED_TO  4
+
+/* Since this is a stateful encoding we have to provide code which resets
+   the output state to the initial state.  This has to be done during the
+   flushing.  */
+#define EMIT_SHIFT_TO_INIT \
+  if ((data->__statep->__count & ~7) != sb)                                  \
+    {                                                                        \
+      if (FROM_DIRECTION)                                                    \
+       data->__statep->__count &= 7;                                         \
+      else                                                                   \
+       {                                                                     \
+         /* We are not in the initial state.  To switch back we have         \
+            to emit `SI'.  */                                                \
+         if (__glibc_unlikely (outbuf >= outend))                            \
+           /* We don't have enough room in the output buffer.  */            \
+           status = __GCONV_FULL_OUTPUT;                                     \
+         else                                                                \
+           {                                                                 \
+             /* Write out the shift sequence.  */                            \
+             *outbuf++ = SI;                                                 \
+             data->__statep->__count &= 7;                                   \
+           }                                                                 \
+       }                                                                     \
+    }
+
+
+/* Since we might have to reset input pointer we must be able to save
+   and retore the state.  */
+#define SAVE_RESET_STATE(Save) \
+  if (Save)                                                                  \
+    save_curcs = *curcsp;                                                    \
+  else                                                                       \
+    *curcsp = save_curcs
+
 
 /* Current codeset type.  */
 enum
 {
-  init = 0,
-  sb,
-  db
+  sb = 0,
+  db = 64
 };
 
 /* First, define the conversion function from IBM-933 to UCS4.  */
-#define MIN_NEEDED_INPUT       MIN_NEEDED_FROM
-#define MIN_NEEDED_OUTPUT      MIN_NEEDED_TO
-#define INIT_PARAMS            int curcs = init;
+#define MIN_NEEDED_INPUT       FROM_LOOP_MIN_NEEDED_FROM
+#define MAX_NEEDED_INPUT       FROM_LOOP_MAX_NEEDED_FROM
+#define MIN_NEEDED_OUTPUT      FROM_LOOP_MIN_NEEDED_TO
+#define MAX_NEEDED_OUTPUT      FROM_LOOP_MAX_NEEDED_TO
 #define LOOPFCT                FROM_LOOP
 #define BODY \
   {                                                                          \
     uint32_t ch = *inptr;                                                    \
     uint32_t res;                                                            \
-    const struct gap *rp1 = __ibm933sb_to_ucs4_idx;                          \
-    const struct gap *rp2 = __ibm933db_to_ucs4_idx;                          \
                                                                              \
     if (__builtin_expect (ch, 0) == SO)                                              \
       {                                                                              \
-       if (__builtin_expect (inptr + 1 >= inend, 0))                         \
-         {                                                                   \
-           result = __GCONV_INCOMPLETE_INPUT;                                \
-           break;                                                            \
-         }                                                                   \
-                                                                             \
        /* Shift OUT, change to DBCS converter.  */                           \
        if (curcs == db)                                                      \
          {                                                                   \
@@ -76,16 +112,10 @@ enum
          }                                                                   \
        curcs = db;                                                           \
        ++inptr;                                                              \
-       ch = *inptr;                                                          \
+       continue;                                                             \
       }                                                                              \
     else if (__builtin_expect (ch, 0) == SI)                                 \
       {                                                                              \
-       if (__builtin_expect (inptr + 1 >= inend, 0))                         \
-         {                                                                   \
-           result = __GCONV_INCOMPLETE_INPUT;                                \
-           break;                                                            \
-         }                                                                   \
-                                                                             \
        /* Shift IN, change to SBCS converter.  */                            \
        if (curcs == sb)                                                      \
          {                                                                   \
@@ -94,41 +124,33 @@ enum
          }                                                                   \
        curcs = sb;                                                           \
        ++inptr;                                                              \
-       ch = *inptr;                                                          \
+       continue;                                                             \
       }                                                                              \
                                                                              \
-    if (curcs == sb || curcs == init)                                        \
+    if (curcs == sb)                                                         \
       {                                                                              \
        /* Use the IBM933 table for single byte.  */                          \
-       while (ch > rp1->end)                                                 \
-         ++rp1;                                                              \
-                                                                             \
-       if (__builtin_expect (rp1 == NULL, 0)                                 \
-           || __builtin_expect (ch < rp1->start, 0)                          \
-           || (res = __ibm933sb_to_ucs4[ch + rp1->idx],                      \
-               __builtin_expect (res, L'\1') == L'\0' && ch != '\0'))        \
+       res = __ibm933sb_to_ucs4[ch];                                         \
+       if (__builtin_expect (res, L'\1') == L'\0' && ch != '\0')             \
          {                                                                   \
            /* This is an illegal character.  */                              \
-           if (! ignore_errors_p ())                                         \
-             {                                                               \
-               result = __GCONV_ILLEGAL_INPUT;                               \
-               break;                                                        \
-             }                                                               \
-           ++*irreversible;                                                  \
-           ++inptr;                                                          \
-           continue;                                                         \
+           STANDARD_FROM_LOOP_ERR_HANDLER (1);                               \
          }                                                                   \
        else                                                                  \
          {                                                                   \
            put32 (outptr, res);                                              \
            outptr += 4;                                                      \
-           ++inptr;                                                          \
          }                                                                   \
+       ++inptr;                                                              \
       }                                                                              \
-    else if (curcs == db)                                                    \
+    else                                                                     \
       {                                                                              \
+       const struct gap *rp2 = __ibm933db_to_ucs4_idx;                       \
+                                                                             \
+       assert (curcs == db);                                                 \
+                                                                             \
        /* Use the IBM933 table for double byte.  */                          \
-       if (__builtin_expect (inptr + 1 >= inend, 0))                         \
+       if (__glibc_unlikely (inptr + 1 >= inend))                            \
          {                                                                   \
            /* The second character is not available.  Store the              \
               intermediate result. */                                        \
@@ -140,20 +162,13 @@ enum
        while (ch > rp2->end)                                                 \
          ++rp2;                                                              \
                                                                              \
-       if (__builtin_expect (rp2 == NULL, 0)                                 \
+       if (__builtin_expect (rp2->start == 0xffff, 0)                        \
            || __builtin_expect (ch < rp2->start, 0)                          \
            || (res = __ibm933db_to_ucs4[ch + rp2->idx],                      \
                __builtin_expect (res, L'\1') == L'\0' && ch != '\0'))        \
          {                                                                   \
            /* This is an illegal character.  */                              \
-           if (! ignore_errors_p ())                                         \
-             {                                                               \
-               result = __GCONV_ILLEGAL_INPUT;                               \
-               break;                                                        \
-             }                                                               \
-           ++*irreversible;                                                  \
-           inptr += 2;                                                       \
-           continue;                                                         \
+           STANDARD_FROM_LOOP_ERR_HANDLER (2);                               \
          }                                                                   \
        else                                                                  \
          {                                                                   \
@@ -164,12 +179,16 @@ enum
       }                                                                              \
   }
 #define LOOP_NEED_FLAGS
+#define EXTRA_LOOP_DECLS       , int *curcsp
+#define INIT_PARAMS            int curcs = *curcsp & ~7
+#define UPDATE_PARAMS          *curcsp = curcs
 #include <iconv/loop.c>
 
 /* Next, define the other direction.  */
-#define MIN_NEEDED_INPUT       MIN_NEEDED_TO
-#define MIN_NEEDED_OUTPUT      MIN_NEEDED_FROM
-#define INIT_PARAMS            int curcs = init;
+#define MIN_NEEDED_INPUT       TO_LOOP_MIN_NEEDED_FROM
+#define MAX_NEEDED_INPUT       TO_LOOP_MAX_NEEDED_FROM
+#define MIN_NEEDED_OUTPUT      TO_LOOP_MIN_NEEDED_TO
+#define MAX_NEEDED_OUTPUT      TO_LOOP_MAX_NEEDED_TO
 #define LOOPFCT                        TO_LOOP
 #define BODY \
   {                                                                          \
@@ -178,18 +197,18 @@ enum
     const struct gap *rp2 = __ucs4_to_ibm933db_idx;                          \
     const char *cp;                                                          \
                                                                              \
-    if (__builtin_expect (ch, 0) >= 0xffff)                                  \
+    if (__glibc_unlikely (ch >= 0xffff))                                     \
       {                                                                              \
-       rp1 = NULL;                                                           \
-       rp2 = NULL;                                                           \
+       UNICODE_TAG_HANDLER (ch, 4);                                          \
+                                                                             \
+       STANDARD_TO_LOOP_ERR_HANDLER (4);                                     \
       }                                                                              \
-    else                                                                     \
-      while (ch > rp1->end)                                                  \
-       ++rp1;                                                                \
+                                                                             \
+    while (ch > rp1->end)                                                    \
+      ++rp1;                                                                 \
                                                                              \
     /* Use the UCS4 table for single byte.  */                               \
-    if (__builtin_expect (rp1 == NULL, 0)                                    \
-       || __builtin_expect (ch < rp1->start, 0)                              \
+    if (__builtin_expect (ch < rp1->start, 0)                                \
        || (cp = __ucs4_to_ibm933sb[ch + rp1->idx],                           \
            __builtin_expect (cp[0], L'\1') == L'\0' && ch != '\0'))          \
       {                                                                              \
@@ -197,24 +216,18 @@ enum
        while (ch > rp2->end)                                                 \
          ++rp2;                                                              \
                                                                              \
-       if (__builtin_expect (rp2 == NULL, 0)                                 \
-           || __builtin_expect (ch < rp2->start, 0)                          \
+       if (__builtin_expect (ch < rp2->start, 0)                             \
            || (cp = __ucs4_to_ibm933db[ch + rp2->idx],                       \
                __builtin_expect (cp[0], L'\1')==L'\0' && ch != '\0'))        \
          {                                                                   \
            /* This is an illegal character.  */                              \
-           if (! ignore_errors_p ())                                         \
-             {                                                               \
-               result = __GCONV_ILLEGAL_INPUT;                               \
-               break;                                                        \
-             }                                                               \
-           ++*irreversible;                                                  \
+           STANDARD_TO_LOOP_ERR_HANDLER (4);                                 \
          }                                                                   \
        else                                                                  \
          {                                                                   \
-           if (curcs == init || curcs == sb)                                 \
+           if (curcs == sb)                                                  \
              {                                                               \
-               if (__builtin_expect (outptr+1 > outend, 0))                  \
+               if (__glibc_unlikely (outptr + 1 > outend))                   \
                  {                                                           \
                    result = __GCONV_FULL_OUTPUT;                             \
                    break;                                                    \
@@ -223,7 +236,7 @@ enum
                curcs = db;                                                   \
              }                                                               \
                                                                              \
-           if (__builtin_expect (outptr + 2 > outend, 0))                    \
+           if (__glibc_unlikely (outptr + 2 > outend))                       \
              {                                                               \
                result = __GCONV_FULL_OUTPUT;                                 \
                break;                                                        \
@@ -236,7 +249,7 @@ enum
       {                                                                              \
        if (curcs == db)                                                      \
          {                                                                   \
-           if (__builtin_expect (outptr + 1 > outend, 0))                    \
+           if (__glibc_unlikely (outptr + 1 > outend))                       \
              {                                                               \
                result = __GCONV_FULL_OUTPUT;                                 \
                break;                                                        \
@@ -244,7 +257,7 @@ enum
            *outptr++ = SI;                                                   \
          }                                                                   \
                                                                              \
-       if (__builtin_expect (outptr + 1 > outend, 0))                        \
+       if (__glibc_unlikely (outptr + 1 > outend))                           \
          {                                                                   \
            result = __GCONV_FULL_OUTPUT;                                     \
            break;                                                            \
@@ -257,6 +270,10 @@ enum
     inptr += 4;                                                                      \
   }
 #define LOOP_NEED_FLAGS
+#define EXTRA_LOOP_DECLS       , int *curcsp
+#define INIT_PARAMS            int curcs = *curcsp & ~7
+#define REINIT_PARAMS          curcs = *curcsp & ~7
+#define UPDATE_PARAMS          *curcsp = curcs
 #include <iconv/loop.c>
 
 /* Now define the toplevel functions.  */