/* Bug 18589: sort-test.sh fails at random.
   Copyright (C) 2015-2023 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 <stdio.h>
#include <string.h>
#include <locale.h>

/* An incorrect strcoll optimization resulted in incorrect
   results from strcoll for cs_CZ and da_DK.  */

int
test_cs_CZ (void)
{
  const char t1[] = "config";
  const char t2[] = "choose";
  if (setlocale (LC_ALL, "cs_CZ.UTF-8") == NULL)
    {
      perror ("setlocale");
      return 1;
    }
  /* In Czech the digraph ch sorts after c, therefore we expect
     config to sort before choose.  */
  int a = strcoll (t1, t2);
  int b = strcoll (t2, t1);
  printf ("strcoll (\"%s\", \"%s\") = %d\n", t1, t2, a);
  printf ("strcoll (\"%s\", \"%s\") = %d\n", t2, t1, b);
  if (a < 0 && b > 0)
    {
      puts ("PASS: config < choose");
      return 0;
    }
  else
    {
      puts ("FAIL: Wrong sorting in cs_CZ.UTF-8.");
      return 1;
    }
}

int
test_da_DK (void)
{
  const char t1[] = "AS";
  const char t2[] = "AA";
  if (setlocale (LC_ALL, "da_DK.ISO-8859-1") == NULL)
    {
      perror ("setlocale");
      return 1;
    }
  /* AA should be treated as the last letter of the Danish alphabet,
     hence sorting after AS.  */
  int a = strcoll (t1, t2);
  int b = strcoll (t2, t1);
  printf ("strcoll (\"%s\", \"%s\") = %d\n", t1, t2, a);
  printf ("strcoll (\"%s\", \"%s\") = %d\n", t2, t1, b);
  if (a < 0 && b > 0)
    {
      puts ("PASS: AS < AA");
      return 0;
    }
  else
    {
      puts ("FAIL: Wrong sorting in da_DK.ISO-8859-1");
      return 1;
    }
}

int
do_test (void)
{
  int err = 0;
  err |= test_cs_CZ ();
  err |= test_da_DK ();
  return err;
}

#include <support/test-driver.c>