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

/* */

DEFINITIONS

1. check
2. main

   1 /* Test of u32_to_u8() 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 uint32_t *input, size_t input_length,
     /*  */
  29        const uint8_t *expected, size_t expected_length)
  30 {
  31   size_t length;
  32   uint8_t *result;
  33 
  34   /* Test return conventions with resultbuf == NULL.  */
  35   result = u32_to_u8 (input, input_length, NULL, &length);
  36   if (!(result != NULL))
  37     return 1;
  38   if (!(length == expected_length))
  39     return 2;
  40   if (!(u8_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       uint8_t *preallocated;
  48 
  49       length = expected_length - 1;
  50       preallocated = (uint8_t *) malloc (length * sizeof (uint8_t));
  51       result = u32_to_u8 (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 (!(u8_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     uint8_t *preallocated;
  67 
  68     length = expected_length;
  69     preallocated = (uint8_t *) malloc (length * sizeof (uint8_t));
  70     result = u32_to_u8 (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 (!(u8_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 uint32_t input[] =
  94       { 'G', 'r', 0x00FC, 0x00DF, ' ', 'G', 'o', 't', 't', '.', ' ',
  95         0x0417, 0x0434, 0x0440, 0x0430, 0x0432, 0x0441, 0x0442, 0x0432, 0x0443,
  96         0x0439, 0x0442, 0x0435, '!', ' ',
  97         'x', '=', '(', '-', 'b', 0x00B1, 's', 'q', 'r', 't', '(', 'b', 0x00B2,
  98         '-', '4', 'a', 'c', ')', ')', '/', '(', '2', 'a', ')', ' ', ' ',
  99         0x65E5, 0x672C, 0x8A9E, ',', 0x4E2D, 0x6587, ',', 0xD55C, 0xAE00, '\n'
 100       };
 101     static const uint8_t expected[] =
 102       { 'G', 'r', 0xC3, 0xBC, 0xC3, 0x9F, ' ', 'G', 'o', 't', 't', '.', ' ',
 103         0xD0, 0x97, 0xD0, 0xB4, 0xD1, 0x80, 0xD0, 0xB0, 0xD0, 0xB2, 0xD1, 0x81,
 104         0xD1, 0x82, 0xD0, 0xB2, 0xD1, 0x83, 0xD0, 0xB9, 0xD1, 0x82, 0xD0, 0xB5,
 105         '!', ' ', 'x', '=', '(', '-', 'b', 0xC2, 0xB1, 's', 'q', 'r', 't', '(',
 106         'b', 0xC2, 0xB2, '-', '4', 'a', 'c', ')', ')', '/', '(', '2', 'a', ')',
 107         ' ', ' ', 0xE6, 0x97, 0xA5, 0xE6, 0x9C, 0xAC, 0xE8, 0xAA, 0x9E, ',',
 108         0xE4, 0xB8, 0xAD, 0xE6, 0x96, 0x87, ',',
 109         0xED, 0x95, 0x9C, 0xEA, 0xB8, 0x80, '\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 uint32_t input[] =
 117       { '-', '(', 0x1D51E, 0x00D7, 0x1D51F, ')', '=',
 118         0x1D51F, 0x00D7, 0x1D51E
 119       };
 120     static const uint8_t expected[] =
 121       { '-', '(', 0xF0, 0x9D, 0x94, 0x9E, 0xC3, 0x97, 0xF0, 0x9D, 0x94, 0x9F,
 122         ')', '=', 0xF0, 0x9D, 0x94, 0x9F, 0xC3, 0x97, 0xF0, 0x9D, 0x94, 0x9E
 123       };
 124     ASSERT (check (input, SIZEOF (input), expected, SIZEOF (expected)) == 0);
 125   }
 126 
 127   /* Invalid input.  */
 128   {
 129     static const uint32_t input[] = { 'x', 0x340000, 0x50000000, 'y' };
 130 #if 0 /* Currently invalid input is rejected, not accommodated.  */
 131     static const uint8_t expected[] =
 132       { 'x', 0xEF, 0xBF, 0xBD, 0xEF, 0xBF, 0xBD, 'y' };
 133     ASSERT (check (input, SIZEOF (input), expected, SIZEOF (expected)) == 0);
 134 #else
 135     size_t length;
 136     uint8_t *result;
 137     uint8_t preallocated[10];
 138 
 139     /* Test return conventions with resultbuf == NULL.  */
 140     result = u32_to_u8 (input, SIZEOF (input), NULL, &length);
 141     ASSERT (result == NULL);
 142     ASSERT (errno == EILSEQ);
 143 
 144     /* Test return conventions with resultbuf too small.  */
 145     length = 1;
 146     result = u32_to_u8 (input, SIZEOF (input), preallocated, &length);
 147     ASSERT (result == NULL);
 148     ASSERT (errno == EILSEQ);
 149 
 150     /* Test return conventions with resultbuf large enough.  */
 151     length = SIZEOF (preallocated);
 152     result = u32_to_u8 (input, SIZEOF (input), preallocated, &length);
 153     ASSERT (result == NULL);
 154     ASSERT (errno == EILSEQ);
 155 #endif
 156   }
 157 
 158   return 0;
 159 }

/* */