l4/pkg/l4re-core/uclibc/lib/contrib/uclibc/test/locale-mbwc/tst_mbtowc.c

   1 /*
   2   MBTOWC: int mbtowc (wchar_t *wc, char *s, size_t n)
   3 */
   4
   5 #define TST_FUNCTION mbtowc
   6
   7 #include "tsp_common.c"
   8 #include "dat_mbtowc.c"
   9
  10
  11 int
  12 tst_mbtowc (FILE * fp, int debug_flg)
  13 {
  14   TST_DECL_VARS (int);
  15   char w_flg, s_flg;
  16   const char *s_in;
  17   size_t n;
  18   wchar_t wc, wc_ex, *wp;
  19
  20   TST_DO_TEST (mbtowc)
  21   {
  22     TST_HEAD_LOCALE (mbtowc, S_MBTOWC);
  23     TST_DO_REC (mbtowc)
  24     {
  25       if (mbstowcs (NULL, "", 0) != 0)
  26         {
  27           err_count++;
  28           Result (C_FAILURE, S_MBSTOWCS, CASE_3,
  29                   "Initialization failed - skipping this test case.");
  30           continue;
  31         }
  32
  33       TST_DO_SEQ (MBTOWC_SEQNUM)
  34       {
  35         TST_GET_ERRET_SEQ (mbtowc);
  36         w_flg = TST_INPUT_SEQ (mbtowc).w_flg;
  37         s_flg = TST_INPUT_SEQ (mbtowc).s_flg;
  38         n = TST_INPUT_SEQ (mbtowc).n;
  39
  40         if (n == USE_MBCURMAX)
  41           {
  42             n = MB_CUR_MAX;
  43           }
  44
  45         if (s_flg == 0)
  46           s_in = NULL;
  47         else
  48           s_in = TST_INPUT_SEQ (mbtowc).s;
  49
  50         wp = (wchar_t *) ((w_flg == 0) ? NULL : &wc);
  51
  52         /* XXX Clear the internal state.  We should probably have
  53            a flag for this.  */
  54         mbtowc (NULL, NULL, 0);
  55
  56         TST_CLEAR_ERRNO;
  57         ret = mbtowc (wp, s_in, n);
  58         TST_SAVE_ERRNO;
  59
  60         if (debug_flg)
  61           {
  62             fprintf (stdout, "mbtowc() [ %s : %d ] ret = %d\n", locale,
  63                      rec + 1, ret);
  64             fprintf (stdout, "                     errno      = %d\n",
  65                      errno_save);
  66           }
  67
  68         TST_IF_RETURN (S_MBTOWC)
  69         {
  70           if (s_in == NULL)
  71             {                   /* state dependency */
  72               if (ret_exp == +1)
  73                 {               /* state-dependent  */
  74                   if (ret != 0)
  75                     {
  76                       /* Non-zero: state-dependent encoding.  */
  77                       Result (C_SUCCESS, S_MBTOWC, CASE_3, MS_PASSED);
  78                     }
  79                   else
  80                     {
  81                       err_count++;
  82                       Result (C_FAILURE, S_MBTOWC, CASE_3,
  83                               "should be state-dependent encoding, "
  84                               "but a return value shows it is "
  85                               "state-independent");
  86                     }
  87                 }
  88
  89               if (ret_exp == 0)
  90                 {               /* state-independent */
  91                   if (ret == 0)
  92                     {
  93                       /* Non-zero: state-dependent encoding.  */
  94                       Result (C_SUCCESS, S_MBTOWC, CASE_3, MS_PASSED);
  95                     }
  96                   else
  97                     {
  98                       err_count++;
  99                       Result (C_FAILURE, S_MBTOWC, CASE_3,
 100                               "should be state-independent encoding, "
 101                               "but a return value shows it is "
 102                               "state-dependent");
 103                     }
 104                 }
 105             }
 106         }
 107
 108         if ((wp == NULL || s_in == NULL || s_in[0] == 0) || ret <= 0)
 109           {
 110             continue;
 111           }
 112
 113         wc_ex = TST_EXPECT_SEQ (mbtowc).wc;
 114
 115         if (wc_ex == wc)
 116           {
 117             Result (C_SUCCESS, S_MBTOWC, CASE_4, MS_PASSED);
 118           }
 119         else
 120           {
 121             err_count++;
 122             Result (C_FAILURE, S_MBTOWC, CASE_4,
 123                     "converted wc is different from an expected wc");
 124           }
 125       }
 126     }
 127   }
 128
 129   return err_count;
 130 }