root/maint/gnulib/tests/unistr/test-u32-prev.c

/* */

DEFINITIONS

1. check
2. check_invalid
3. main

   1 /* Test of u32_prev() 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 "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 }

/* */