localedata/tests-mbwc/tst_wcstombs.c

   1 /*
   2   WCSTOMBS: size_t wcstombs (char *s, const wchar_t *ws, size_t n)
   3 */
   4
   5 #define TST_FUNCTION wcstombs
   6
   7 #include "tsp_common.c"
   8 #include "dat_wcstombs.c"
   9
  10 #define MARK_VAL 0x01
  11
  12 int
  13 tst_wcstombs (FILE * fp, int debug_flg)
  14 {
  15   TST_DECL_VARS (size_t);
  16   char s_flg, n;
  17   wchar_t *ws;
  18   char s[MBSSIZE], *s_in;
  19   int err, i;
  20   char *s_ex;
  21
  22   TST_DO_TEST (wcstombs)
  23   {
  24     TST_HEAD_LOCALE (wcstombs, S_WCSTOMBS);
  25     TST_DO_REC (wcstombs)
  26     {
  27       TST_GET_ERRET (wcstombs);
  28       memset (s, MARK_VAL, MBSSIZE);
  29
  30       s_flg = TST_INPUT (wcstombs).s_flg;
  31       s_in = (s_flg == 1) ? s : (char *) NULL;
  32       ws = TST_INPUT (wcstombs).ws;
  33       n = TST_INPUT (wcstombs).n;
  34
  35       TST_CLEAR_ERRNO;
  36       ret = wcstombs (s_in, ws, n);
  37       TST_SAVE_ERRNO;
  38
  39       if (debug_flg)
  40         {
  41           fprintf (stdout, "wcstombs: ret  = %zu\n", ret);
  42         }
  43
  44       TST_IF_RETURN (S_WCSTOMBS)
  45       {
  46       };
  47
  48       if (s_in != NULL && ret != (size_t) - 1)
  49         {
  50           /* No definition for s, when error occurs.  */
  51           s_ex = TST_EXPECT (wcstombs).s;
  52
  53           for (err = 0, i = 0; i <= ret && i < MBSSIZE; i++)
  54             {
  55               if (debug_flg)
  56                 {
  57                   fprintf (stdout,
  58                            "    : s[%d] = 0x%hx <-> 0x%hx = s_ex[%d]\n", i,
  59                            s[i], s_ex[i], i);
  60                 }
  61
  62               if (i == ret && ret == n) /* no null termination */
  63                 {
  64                   if (s[i] == MARK_VAL)
  65                     {
  66                       Result (C_SUCCESS, S_WCSTOMBS, CASE_4, MS_PASSED);
  67                     }
  68                   else
  69                     {
  70                       err_count++;
  71                       Result (C_FAILURE, S_WCSTOMBS, CASE_4,
  72                               "should not be null terminated "
  73                               "(it may be a null char), but it is");
  74                     }
  75
  76                   break;
  77                 }
  78
  79               if (i == ret && ret < n)  /* null termination */
  80                 {
  81                   if (s[i] == 0)
  82                     {
  83                       Result (C_SUCCESS, S_WCSTOMBS, CASE_5, MS_PASSED);
  84                     }
  85                   else
  86                     {
  87                       err_count++;
  88                       Result (C_FAILURE, S_WCSTOMBS, CASE_5,
  89                               "should be null terminated, but it is not");
  90                     }
  91
  92                   break;
  93                 }
  94
  95               if (s[i] != s_ex[i])
  96                 {
  97                   err++;
  98                   err_count++;
  99                   Result (C_FAILURE, S_WCSTOMBS, CASE_6,
 100                           "converted string is different from an "
 101                           "expected string");
 102                   break;
 103                 }
 104             }
 105
 106           if (!err)
 107             {
 108               Result (C_SUCCESS, S_WCSTOMBS, CASE_6, MS_PASSED);
 109             }
 110         }
 111     }
 112   }
 113
 114   return err_count;
 115 }