Update copyright dates with scripts/update-copyrights.

[thirdparty/glibc.git] / localedata / xfrm-test.c

diff --git a/localedata/xfrm-test.c b/localedata/xfrm-test.c
index 0ba288797ad3583cc4dcb0367129fd129a295a9b..ea992a14b7e34044cf781c4faef91853ed752fe3 100644 (file)
--- a/localedata/xfrm-test.c
+++ b/localedata/xfrm-test.c
@@ -1,48 +1,66 @@
 /* Test collation function via transformation using real data.
-   Copyright (C) 1997, 1998 Free Software Foundation, Inc.
+   Copyright (C) 1997-2019 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
 
    The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Library General Public License as
-   published by the Free Software Foundation; either version 2 of the
-   License, or (at your option) any later version.
+   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
-   Library General Public License for more details.
+   Lesser General Public License for more details.
 
-   You should have received a copy of the GNU Library General Public
-   License along with the GNU C Library; see the file COPYING.LIB.  If not,
-   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-   Boston, MA 02111-1307, USA.  */
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, see
+   <http://www.gnu.org/licenses/>.  */
 
 #include <ctype.h>
+#include <error.h>
 #include <locale.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
+#include <stdbool.h>
 
+/* Keep in sync with string/strxfrm_l.c.  */
+#define SMALL_STR_SIZE 4095
 
 struct lines
 {
-  const char *xfrm;
-  const char *line;
+  char *xfrm;
+  char *line;
 };
 
-static int xstrcmp __P ((const void *, const void *));
+static int xstrcmp (const void *, const void *);
 
 int
 main (int argc, char *argv[])
 {
   int result = 0;
+  bool nocache = false;
   size_t nstrings, nstrings_max;
   struct lines *strings;
   char *line = NULL;
   size_t len = 0;
   size_t n;
 
+  if (argc < 2)
+    error (1, 0, "usage: %s <random seed> [-nocache]", argv[0]);
+
+  if (argc == 3)
+    {
+      if (strcmp (argv[2], "-nocache") == 0)
+       nocache = true;
+      else
+       {
+         printf ("Unknown option %s!\n", argv[2]);
+         exit (1);
+       }
+    }
+
   setlocale (LC_ALL, "");
 
   nstrings_max = 100;
@@ -56,17 +74,17 @@ main (int argc, char *argv[])
 
   while (1)
     {
-      char saved, *newp;
-      int needed;
-      int l;
+      char saved, *word, *newp;
+      size_t l, line_len, needed;
+
       if (getline (&line, &len, stdin) < 0)
        break;
 
       if (nstrings == nstrings_max)
        {
          strings = (struct lines *) realloc (strings,
-                                             (nstrings_max *= 2
-                                              * sizeof (*strings)));
+                                             (nstrings_max *= 2)
+                                              * sizeof (*strings));
          if (strings == NULL)
            {
              perror (argv[0]);
@@ -80,13 +98,39 @@ main (int argc, char *argv[])
 
       saved = line[l];
       line[l] = '\0';
-      needed = strxfrm (NULL, line, 0);
+
+      if (nocache)
+       {
+         line_len = strlen (line);
+         word = malloc (line_len + SMALL_STR_SIZE + 1);
+         if (word == NULL)
+           {
+             printf ("malloc failed: %m\n");
+             exit (1);
+           }
+         memset (word, ' ', SMALL_STR_SIZE);
+         memcpy (word + SMALL_STR_SIZE, line, line_len);
+         word[line_len + SMALL_STR_SIZE] = '\0';
+       }
+      else
+        word = line;
+
+      needed = strxfrm (NULL, word, 0);
       newp = malloc (needed + 1);
-      strxfrm (newp, line, needed + 1);
+      if (newp == NULL)
+       {
+         printf ("malloc failed: %m\n");
+         exit (1);
+       }
+      strxfrm (newp, word, needed + 1);
       strings[nstrings].xfrm = newp;
+
+      if (nocache)
+       free (word);
       line[l] = saved;
       ++nstrings;
     }
+  free (line);
 
   /* First shuffle.  */
   srandom (atoi (argv[1]));
@@ -116,19 +160,22 @@ main (int argc, char *argv[])
 
   /* Print the result.  */
   for (n = 0; n < nstrings; ++n)
-    fputs (strings[n].line, stdout);
+    {
+      fputs (strings[n].line, stdout);
+      free (strings[n].line);
+      free (strings[n].xfrm);
+    }
+  free (strings);
 
   return result;
 }
 
 
 static int
-xstrcmp (ptr1, ptr2)
-     const void *ptr1;
-     const void *ptr2;
+xstrcmp (const void *ptr1, const void *ptr2)
 {
-  struct lines *l1 = (struct lines *) ptr1;
-  struct lines *l2 = (struct lines *) ptr2;
+  const struct lines *l1 = (const struct lines *) ptr1;
+  const struct lines *l2 = (const struct lines *) ptr2;
 
   return strcmp (l1->xfrm, l2->xfrm);
 }