root/maint/gnulib/tests/uniwidth/test-uc_width2.c

/* */

DEFINITIONS

1. finish_interval
2. add_to_interval
3. main

   1 /* Test of uc_width() function.
   2    Copyright (C) 2007-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>, 2008.  */
  18 
  19 #include <config.h>
  20 
  21 #include "uniwidth.h"
  22 
  23 #include <stdio.h>
  24 
  25 #include "macros.h"
  26 
  27 /* One of 0, '0', '1', 'A', '2'.  */
  28 static char current_width;
  29 /* The interval for which the current_width holds.  */
  30 static ucs4_t current_start;
  31 static ucs4_t current_end;
  32 
  33 static void
  34 finish_interval (void)
     /*  */
  35 {
  36   if (current_width != 0)
  37     {
  38       if (current_start == current_end)
  39         printf ("%04X\t\t%c\n", (unsigned) current_start, current_width);
  40       else
  41         printf ("%04X..%04X\t%c\n", (unsigned) current_start,
  42                 (unsigned) current_end, current_width);
  43       current_width = 0;
  44     }
  45 }
  46 
  47 static void
  48 add_to_interval (ucs4_t uc, char width)
     /*  */
  49 {
  50   if (current_width == width && uc == current_end + 1)
  51     current_end = uc;
  52   else
  53     {
  54       finish_interval ();
  55       current_width = width;
  56       current_start = current_end = uc;
  57     }
  58 }
  59 
  60 int
  61 main ()
     /*  */
  62 {
  63   ucs4_t uc;
  64 
  65   for (uc = 0; uc < 0x110000; uc++)
  66     {
  67       int w1 = uc_width (uc, "UTF-8");
  68       int w2 = uc_width (uc, "GBK");
  69       char width =
  70         (w1 == 0 && w2 == 0 ? '0' :
  71          w1 == 1 && w2 == 1 ? '1' :
  72          w1 == 1 && w2 == 2 ? 'A' :
  73          w1 == 2 && w2 == 2 ? '2' :
  74          0);
  75       if (width == 0)
  76         {
  77           /* uc must be a control character.  */
  78           ASSERT (w1 < 0 && w2 < 0);
  79         }
  80       else
  81         add_to_interval (uc, width);
  82     }
  83   finish_interval ();
  84 
  85   return 0;
  86 }

/* */