tests/unistr/test-u32-prev.c

   1 /* Test of u32_prev() function.
   2    Copyright (C) 2010-2020 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 "macros.h"
  24
  25 static int
  26 check (const uint32_t *input, size_t input_length, ucs4_t *puc)
  27 {
  28   ucs4_t uc;
  29
  30   /* Test recognition when at the beginning of the string.  */
  31   if (u32_prev (&uc, input + input_length, input) != input)
  32     return 1;
  33
  34   /* Test recognition when preceded by a 1-unit character.  */
  35   {
  36     uint32_t buf[100];
  37     uint32_t *ptr;
  38     size_t i;
  39     ucs4_t uc1;
  40
  41     ptr = buf;
  42     *ptr++ = 0x1D51E;
  43     for (i = 0; i < input_length; i++)
  44       ptr[i] = input[i];
  45
  46     if (u32_prev (&uc1, ptr + input_length, buf) != ptr)
  47       return 2;
  48     if (uc1 != uc)
  49       return 3;
  50   }
  51
  52   *puc = uc;
  53   return 0;
  54 }
  55
  56 static int
  57 check_invalid (const uint32_t *input, size_t input_length)
  58 {
  59   ucs4_t uc;
  60
  61   /* Test recognition when at the beginning of the string.  */
  62   uc = 0xBADFACE;
  63   if (u32_prev (&uc, input + input_length, input) != NULL)
  64     return 1;
  65   if (uc != 0xBADFACE)
  66     return 2;
  67
  68   /* Test recognition when preceded by a 1-unit character.  */
  69   {
  70     uint32_t buf[100];
  71     uint32_t *ptr;
  72     size_t i;
  73
  74     ptr = buf;
  75     *ptr++ = 0x1D51E;
  76     for (i = 0; i < input_length; i++)
  77       ptr[i] = input[i];
  78
  79     uc = 0xBADFACE;
  80     if (u32_prev (&uc, ptr + input_length, buf) != NULL)
  81       return 3;
  82     if (uc != 0xBADFACE)
  83       return 4;
  84   }
  85
  86   return 0;
  87 }
  88
  89 int
  90 main ()
  91 {
  92   ucs4_t uc;
  93
  94   /* Test ISO 646 unit input.  */
  95   {
  96     ucs4_t c;
  97     uint32_t buf[1];
  98
  99     for (c = 0; c < 0x80; c++)
 100       {
 101         buf[0] = c;
 102         uc = 0xBADFACE;
 103         ASSERT (check (buf, 1, &uc) == 0);
 104         ASSERT (uc == c);
 105       }
 106   }
 107
 108   /* Test BMP unit input.  */
 109   {
 110     static const uint32_t input[] = { 0x20AC };
 111     uc = 0xBADFACE;
 112     ASSERT (check (input, SIZEOF (input), &uc) == 0);
 113     ASSERT (uc == 0x20AC);
 114   }
 115
 116   /* Test non-BMP unit input.  */
 117   {
 118     static const uint32_t input[] = { 0x1D51F };
 119     uc = 0xBADFACE;
 120     ASSERT (check (input, SIZEOF (input), &uc) == 0);
 121     ASSERT (uc == 0x1D51F);
 122   }
 123
 124   /* Test incomplete/invalid 1-unit input.  */
 125   {
 126     static const uint32_t input[] = { 0x340000 };
 127     ASSERT (check_invalid (input, SIZEOF (input)) == 0);
 128   }
 129
 130   return 0;
 131 }