localedata/tests-mbwc/tst_mbrtowc.c

   1 /*
   2   MBRTOWC: size_t mbrtowc (wchar_t *pwc, const char *s, size_t n,
   3                            mbstate_t *ps)
   4 */
   5
   6 #define TST_FUNCTION mbrtowc
   7
   8 #include "tsp_common.c"
   9 #include "dat_mbrtowc.c"
  10
  11
  12 int
  13 tst_mbrtowc (FILE * fp, int debug_flg)
  14 {
  15   TST_DECL_VARS (size_t);
  16   char w_flg, s_flg;
  17   char *s;
  18   size_t n;
  19   char t_flg;
  20   static mbstate_t t = { 0 };
  21   mbstate_t *pt;
  22   wchar_t wc, *pwc, wc_ex;
  23
  24   TST_DO_TEST (mbrtowc)
  25   {
  26     TST_HEAD_LOCALE (mbrtowc, S_MBRTOWC);
  27     TST_DO_REC (mbrtowc)
  28     {
  29       if (mbrtowc (NULL, "", 0, &t) != 0)
  30         {
  31           err_count++;
  32           Result (C_FAILURE, S_MBRTOWC, CASE_3,
  33                   "Initialization failed - skipping this test case.");
  34           continue;
  35         }
  36
  37       TST_DO_SEQ (MBRTOWC_SEQNUM)
  38       {
  39         TST_GET_ERRET_SEQ (mbrtowc);
  40         w_flg = TST_INPUT_SEQ (mbrtowc).w_flg;
  41         s_flg = TST_INPUT_SEQ (mbrtowc).s_flg;
  42         s = TST_INPUT_SEQ (mbrtowc).s;
  43         n = TST_INPUT_SEQ (mbrtowc).n;
  44         t_flg = TST_INPUT_SEQ (mbrtowc).t_flg;
  45         pwc = (w_flg == 0) ? NULL : &wc;
  46
  47         if (s_flg == 0)
  48           {
  49             s = NULL;
  50           }
  51
  52         if (n == USE_MBCURMAX)
  53           {
  54             n = MB_CUR_MAX;
  55           }
  56
  57         pt = (t_flg == 0) ? NULL : &t;
  58
  59         TST_CLEAR_ERRNO;
  60         ret = mbrtowc (pwc, s, n, pt);
  61         TST_SAVE_ERRNO;
  62
  63         if (debug_flg)
  64           {
  65             fprintf (stdout, "mbrtowc() [ %s : %d : %d ] ret = %zd\n",
  66                      locale, rec + 1, seq_num + 1, ret);
  67             fprintf (stdout, "                      errno = %hd\n",
  68                      errno_save);
  69           }
  70
  71         TST_IF_RETURN (S_MBRTOWC)
  72         {
  73         };
  74
  75         if (pwc == NULL || s == NULL || ret == (size_t) - 1
  76             || ret == (size_t) - 2)
  77           {
  78             continue;
  79           }
  80
  81         wc_ex = TST_EXPECT_SEQ (mbrtowc).wc;
  82         if (wc_ex == wc)
  83           {
  84             Result (C_SUCCESS, S_MBRTOWC, CASE_4, MS_PASSED);
  85           }
  86         else
  87           {
  88             err_count++;
  89             Result (C_FAILURE, S_MBRTOWC, CASE_4,
  90                     "converted wc is different from an expected wc");
  91           }
  92       }
  93     }
  94   }
  95
  96   return err_count;
  97 }