gl/tests/test-mbsalign.c

   1 /* Test that mbsalign works as advertised.
   2    Copyright (C) 2010-2017 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 <http://www.gnu.org/licenses/>.  */
  16
  17 /* Written by Pádraig Brady.  */
  18
  19 #include <config.h>
  20
  21 #include "mbsalign.h"
  22 #include "macros.h"
  23 #include <stdlib.h>
  24 #include <locale.h>
  25
  26 int
  27 main (void)
  28 {
  29   char dest[4 * 16 + 1];
  30   size_t width, n;
  31
  32   /* Test unibyte truncation.  */
  33   width = 4;
  34   n = mbsalign ("t\tés", dest, sizeof dest, &width, MBS_ALIGN_LEFT, 0);
  35   ASSERT (n == 4);
  36
  37   /* Test center alignment.  */
  38   width = 4;
  39   n = mbsalign ("es", dest, sizeof dest, &width, MBS_ALIGN_CENTER, 0);
  40   ASSERT (*dest == ' ' && *(dest + n - 1) == ' ');
  41   ASSERT (n == 4);
  42
  43   /* Test center alignment, with no trailing padding.  */
  44   width = 4;
  45   n = mbsalign ("es", dest, sizeof dest, &width, MBS_ALIGN_CENTER,
  46                 MBA_NO_RIGHT_PAD);
  47   ASSERT (n == 3);
  48   ASSERT (*dest == ' ' && *(dest + n - 1) == 's');
  49
  50   /* Test left alignment, with no trailing padding. (truncate only).  */
  51   width = 4;
  52   n = mbsalign ("es", dest, sizeof dest, &width, MBS_ALIGN_LEFT,
  53                 MBA_NO_RIGHT_PAD);
  54   ASSERT (n == 2);
  55   ASSERT (*dest == 'e' && *(dest + n - 1) == 's');
  56
  57   /* Test center alignment, with no padding. (truncate only).  */
  58   width = 4;
  59   n = mbsalign ("es", dest, sizeof dest, &width, MBS_ALIGN_CENTER,
  60                 MBA_NO_LEFT_PAD | MBA_NO_RIGHT_PAD);
  61   ASSERT (n == 2);
  62   ASSERT (*dest == 'e' && *(dest + n - 1) == 's');
  63
  64   /* Test center alignment, with no left padding. (may be useful for RTL?)  */
  65   width = 4;
  66   n = mbsalign ("es", dest, sizeof dest, &width, MBS_ALIGN_CENTER,
  67                 MBA_NO_LEFT_PAD);
  68   ASSERT (n == 3);
  69   ASSERT (*dest == 'e' && *(dest + n - 1) == ' ');
  70
  71   if (setlocale (LC_ALL, "en_US.UTF8"))
  72     {
  73       /* Check invalid input is flagged.  */
  74       width = 4;
  75       n = mbsalign ("t\xe1\xe2s", dest, sizeof dest, &width, MBS_ALIGN_LEFT, 0);
  76       ASSERT (n == (size_t) -1);
  77
  78       /* Check invalid input is treated as unibyte  */
  79       width = 4;
  80       n = mbsalign ("t\xe1\xe2s", dest, sizeof dest, &width,
  81                     MBS_ALIGN_LEFT, MBA_UNIBYTE_FALLBACK);
  82       ASSERT (n == 4);
  83
  84       /* Test multibyte center alignment.  */
  85       width = 4;
  86       n = mbsalign ("és", dest, sizeof dest, &width, MBS_ALIGN_CENTER, 0);
  87       ASSERT (n == 5);
  88       ASSERT (*dest == ' ' && *(dest + n - 1) == ' ');
  89
  90       /* Test multibyte left alignment.  */
  91       width = 4;
  92       n = mbsalign ("és", dest, sizeof dest, &width, MBS_ALIGN_LEFT, 0);
  93       ASSERT (n == 5);
  94       ASSERT (*(dest + n - 1) == ' ' && *(dest + n - 2) == ' ');
  95
  96       /* Test multibyte right alignment.  */
  97       width = 4;
  98       n = mbsalign ("és", dest, sizeof dest, &width, MBS_ALIGN_RIGHT, 0);
  99       ASSERT (n == 5);
 100       ASSERT (*(dest) == ' ' && *(dest + 1) == ' ');
 101
 102       /* multibyte multicell truncation.  */
 103       width = 4;                /* cells */
 104       n = mbsalign ("日月火水", dest, sizeof dest, &width,
 105                     MBS_ALIGN_LEFT, 0);
 106       ASSERT (n == 6);          /* 2 characters */
 107
 108       /* multibyte unicell truncation.  */
 109       width = 3;                /* cells */
 110       n = mbsalign ("¹²³⁴", dest, sizeof dest, &width, MBS_ALIGN_LEFT, 0);
 111       ASSERT (n == 6);          /* 3 characters */
 112
 113       /* Check independence from dest buffer. */
 114       width = 4;                /* cells */
 115       n = mbsalign ("¹²³⁴", dest, 0, &width, MBS_ALIGN_LEFT, 0);
 116       ASSERT (n == 9);          /* 4 characters */
 117
 118       /* Check that width is updated with cells required before padding.  */
 119       width = 4;                /* cells */
 120       n = mbsalign ("¹²³", dest, 0, &width, MBS_ALIGN_LEFT, 0);
 121       ASSERT (width == 3);
 122
 123       /* Test case where output is larger than input
 124          (as tab converted to multi byte replacement char).  */
 125       width = 4;
 126       n = mbsalign ("t\tés" /* 6 including NUL */ , dest, sizeof dest,
 127                     &width, MBS_ALIGN_LEFT, 0);
 128       ASSERT (n == 7);
 129
 130       /* Test forced unibyte truncation.  */
 131       width = 4;
 132       n = mbsalign ("t\tés", dest, sizeof dest, &width, MBS_ALIGN_LEFT,
 133                     MBA_UNIBYTE_ONLY);
 134       ASSERT (n == 4);
 135     }
 136
 137   return 0;
 138 }