90 lines
2.9 KiB
C
90 lines
2.9 KiB
C
/* Test c16rtomb handling of surrogate pairs (DR#488, bug 23794).
|
|
Copyright (C) 2018-2022 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Lesser General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2.1 of the License, or (at your option) any later version.
|
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
License along with the GNU C Library; if not, see
|
|
<https://www.gnu.org/licenses/>. */
|
|
|
|
#include <errno.h>
|
|
#include <locale.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <uchar.h>
|
|
#include <wchar.h>
|
|
#include <array_length.h>
|
|
#include <support/check.h>
|
|
|
|
static int
|
|
do_test (void)
|
|
{
|
|
TEST_VERIFY_EXIT (setlocale (LC_ALL, "de_DE.UTF-8") != NULL);
|
|
/* Test conversions of surrogate pairs. */
|
|
for (char32_t c = 0x10000; c <= 0x10ffff; c += 0x123)
|
|
{
|
|
char32_t c_pos = c - 0x10000;
|
|
char16_t c_hi = (c_pos >> 10) + 0xd800;
|
|
char16_t c_lo = (c_pos & 0x3ff) + 0xdc00;
|
|
printf ("testing U+0x%08x (0x%x 0x%x)\n",
|
|
(unsigned int) c, (unsigned int) c_hi, (unsigned int) c_lo);
|
|
char buf[16] = { 0 };
|
|
size_t ret_hi = c16rtomb (buf, c_hi, NULL);
|
|
TEST_COMPARE (ret_hi, 0);
|
|
size_t ret_lo = c16rtomb (buf, c_lo, NULL);
|
|
TEST_COMPARE (ret_lo, 4);
|
|
wchar_t wc = 0;
|
|
size_t ret_wc = mbrtowc (&wc, buf, 4, NULL);
|
|
TEST_COMPARE (ret_wc, 4);
|
|
TEST_COMPARE (wc, (wchar_t) c);
|
|
}
|
|
/* Test errors for invalid conversions. */
|
|
static const char16_t err_cases[][2] =
|
|
{
|
|
/* High surrogate followed by non-surrogate. */
|
|
{ 0xd800, 0x1 },
|
|
/* High surrogate followed by another high surrogate. */
|
|
{ 0xd800, 0xd800 },
|
|
/* Low surrogate not following high surrogate. */
|
|
{ 0xdc00, 0 }
|
|
};
|
|
for (size_t i = 0; i < array_length (err_cases); i++)
|
|
{
|
|
char16_t c_hi = err_cases[i][0];
|
|
char16_t c_lo = err_cases[i][1];
|
|
printf ("testing error case: 0x%x 0x%x\n", (unsigned int) c_hi,
|
|
(unsigned int) c_lo);
|
|
c16rtomb (NULL, 0, NULL);
|
|
char buf[16] = { 0 };
|
|
errno = 0;
|
|
size_t ret_hi = c16rtomb (buf, c_hi, NULL);
|
|
if (c_lo == 0)
|
|
{
|
|
/* Unmatched low surrogate in first place. */
|
|
TEST_COMPARE (ret_hi, (size_t) -1);
|
|
TEST_COMPARE (errno, EILSEQ);
|
|
}
|
|
else
|
|
{
|
|
/* High surrogate; error in second place. */
|
|
TEST_COMPARE (ret_hi, 0);
|
|
errno = 0;
|
|
size_t ret_lo = c16rtomb (buf, c_lo, NULL);
|
|
TEST_COMPARE (ret_lo, (size_t) -1);
|
|
TEST_COMPARE (errno, EILSEQ);
|
|
}
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#include <support/test-driver.c>
|