root/maint/gnulib/tests/unistr/test-u8-to-u32.c

/* */

DEFINITIONS

1. check
2. main

   1 /* Test of u8_to_u32() function.
   2    Copyright (C) 2010-2021 Free Software Foundation, Inc.
   3 
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3 of the License, or
   7    (at your option) any later version.
   8 
   9    This program is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU General Public License for more details.
  13 
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <https://www.gnu.org/licenses/>.  */
  16 
  17 /* Written by Bruno Haible <bruno@clisp.org>, 2010.  */
  18 
  19 #include <config.h>
  20 
  21 #include "unistr.h"
  22 
  23 #include <errno.h>
  24 
  25 #include "macros.h"
  26 
  27 static int
  28 check (const uint8_t *input, size_t input_length,
     /*  */
  29        const uint32_t *expected, size_t expected_length)
  30 {
  31   size_t length;
  32   uint32_t *result;
  33 
  34   /* Test return conventions with resultbuf == NULL.  */
  35   result = u8_to_u32 (input, input_length, NULL, &length);
  36   if (!(result != NULL))
  37     return 1;
  38   if (!(length == expected_length))
  39     return 2;
  40   if (!(u32_cmp (result, expected, expected_length) == 0))
  41     return 3;
  42   free (result);
  43 
  44   /* Test return conventions with resultbuf too small.  */
  45   if (expected_length > 0)
  46     {
  47       uint32_t *preallocated;
  48 
  49       length = expected_length - 1;
  50       preallocated = (uint32_t *) malloc (length * sizeof (uint32_t));
  51       result = u8_to_u32 (input, input_length, preallocated, &length);
  52       if (!(result != NULL))
  53         return 4;
  54       if (!(result != preallocated))
  55         return 5;
  56       if (!(length == expected_length))
  57         return 6;
  58       if (!(u32_cmp (result, expected, expected_length) == 0))
  59         return 7;
  60       free (result);
  61       free (preallocated);
  62     }
  63 
  64   /* Test return conventions with resultbuf large enough.  */
  65   {
  66     uint32_t *preallocated;
  67 
  68     length = expected_length;
  69     preallocated = (uint32_t *) malloc (length * sizeof (uint32_t));
  70     result = u8_to_u32 (input, input_length, preallocated, &length);
  71     if (!(result != NULL))
  72       return 8;
  73     if (!(preallocated == NULL || result == preallocated))
  74       return 9;
  75     if (!(length == expected_length))
  76       return 10;
  77     if (!(u32_cmp (result, expected, expected_length) == 0))
  78       return 11;
  79     free (preallocated);
  80   }
  81 
  82   return 0;
  83 }
  84 
  85 int
  86 main ()
     /*  */
  87 {
  88   /* Empty string.  */
  89   ASSERT (check (NULL, 0, NULL, 0) == 0);
  90 
  91   /* Simple string.  */
  92   { /* "Grüß Gott. Здравствуйте! x=(-b±sqrt(b²-4ac))/(2a)  日本語,中文,한글" */
  93     static const uint8_t input[] =
  94       { 'G', 'r', 0xC3, 0xBC, 0xC3, 0x9F, ' ', 'G', 'o', 't', 't', '.', ' ',
  95         0xD0, 0x97, 0xD0, 0xB4, 0xD1, 0x80, 0xD0, 0xB0, 0xD0, 0xB2, 0xD1, 0x81,
  96         0xD1, 0x82, 0xD0, 0xB2, 0xD1, 0x83, 0xD0, 0xB9, 0xD1, 0x82, 0xD0, 0xB5,
  97         '!', ' ', 'x', '=', '(', '-', 'b', 0xC2, 0xB1, 's', 'q', 'r', 't', '(',
  98         'b', 0xC2, 0xB2, '-', '4', 'a', 'c', ')', ')', '/', '(', '2', 'a', ')',
  99         ' ', ' ', 0xE6, 0x97, 0xA5, 0xE6, 0x9C, 0xAC, 0xE8, 0xAA, 0x9E, ',',
 100         0xE4, 0xB8, 0xAD, 0xE6, 0x96, 0x87, ',',
 101         0xED, 0x95, 0x9C, 0xEA, 0xB8, 0x80, '\n'
 102       };
 103     static const uint32_t expected[] =
 104       { 'G', 'r', 0x00FC, 0x00DF, ' ', 'G', 'o', 't', 't', '.', ' ',
 105         0x0417, 0x0434, 0x0440, 0x0430, 0x0432, 0x0441, 0x0442, 0x0432, 0x0443,
 106         0x0439, 0x0442, 0x0435, '!', ' ',
 107         'x', '=', '(', '-', 'b', 0x00B1, 's', 'q', 'r', 't', '(', 'b', 0x00B2,
 108         '-', '4', 'a', 'c', ')', ')', '/', '(', '2', 'a', ')', ' ', ' ',
 109         0x65E5, 0x672C, 0x8A9E, ',', 0x4E2D, 0x6587, ',', 0xD55C, 0xAE00, '\n'
 110       };
 111     ASSERT (check (input, SIZEOF (input), expected, SIZEOF (expected)) == 0);
 112   }
 113 
 114   /* String with characters outside the BMP.  */
 115   {
 116     static const uint8_t input[] =
 117       { '-', '(', 0xF0, 0x9D, 0x94, 0x9E, 0xC3, 0x97, 0xF0, 0x9D, 0x94, 0x9F,
 118         ')', '=', 0xF0, 0x9D, 0x94, 0x9F, 0xC3, 0x97, 0xF0, 0x9D, 0x94, 0x9E
 119       };
 120     static const uint32_t expected[] =
 121       { '-', '(', 0x1D51E, 0x00D7, 0x1D51F, ')', '=',
 122         0x1D51F, 0x00D7, 0x1D51E
 123       };
 124     ASSERT (check (input, SIZEOF (input), expected, SIZEOF (expected)) == 0);
 125   }
 126 
 127   /* Invalid input.  */
 128   {
 129     static const uint8_t input[] = { 'x', 0xC2, 0xC3, 'y' };
 130 #if 0 /* Currently invalid input is rejected, not accommodated.  */
 131     static const uint32_t expected[] = { 'x', 0xFFFD, 0xFFFD, 'y' };
 132     ASSERT (check (input, SIZEOF (input), expected, SIZEOF (expected)) == 0);
 133 #else
 134     size_t length;
 135     uint32_t *result;
 136     uint32_t preallocated[10];
 137 
 138     /* Test return conventions with resultbuf == NULL.  */
 139     result = u8_to_u32 (input, SIZEOF (input), NULL, &length);
 140     ASSERT (result == NULL);
 141     ASSERT (errno == EILSEQ);
 142 
 143     /* Test return conventions with resultbuf too small.  */
 144     length = 1;
 145     result = u8_to_u32 (input, SIZEOF (input), preallocated, &length);
 146     ASSERT (result == NULL);
 147     ASSERT (errno == EILSEQ);
 148 
 149     /* Test return conventions with resultbuf large enough.  */
 150     length = SIZEOF (preallocated);
 151     result = u8_to_u32 (input, SIZEOF (input), preallocated, &length);
 152     ASSERT (result == NULL);
 153     ASSERT (errno == EILSEQ);
 154 #endif
 155   }
 156 
 157   return 0;
 158 }

/* */