1 /* Test collation function using real data.
2 Copyright (C) 1997, 1999, 2000, 2003 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, write to the Free
18 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
34 static int xstrcoll (const void *, const void *);
37 main (int argc
, char *argv
[])
40 size_t nstrings
, nstrings_max
;
41 struct lines
*strings
;
47 error (1, 0, "usage: %s <random seed>", argv
[0]);
49 setlocale (LC_ALL
, "");
53 strings
= (struct lines
*) malloc (nstrings_max
* sizeof (struct lines
));
63 if (getline (&line
, &len
, stdin
) < 0)
66 if (nstrings
== nstrings_max
)
68 strings
= (struct lines
*) realloc (strings
,
77 strings
[nstrings
].line
= strdup (line
);
78 l
= strcspn (line
, ":(;");
79 while (l
> 0 && isspace (line
[l
- 1]))
81 strings
[nstrings
].key
= strndup (line
, l
);
87 srandom (atoi (argv
[1]));
88 for (n
= 0; n
< 10 * nstrings
; ++n
)
91 size_t idx1
= random () % nstrings
;
92 size_t idx2
= random () % nstrings
;
93 struct lines tmp
= strings
[idx1
];
94 strings
[idx1
] = strings
[idx2
];
97 /* While we are at it a first little test. */
98 r1
= strcoll (strings
[idx1
].key
, strings
[idx2
].key
);
99 r2
= strcoll (strings
[idx2
].key
, strings
[idx1
].key
);
102 if (r
> 0 || (r
== 0 && r1
!= 0) || (r
== 0 && r2
!= 0))
103 printf ("`%s' and `%s' collate wrong: %d vs. %d\n",
104 strings
[idx1
].key
, strings
[idx2
].key
, r1
, r2
);
108 qsort (strings
, nstrings
, sizeof (struct lines
), xstrcoll
);
110 /* Print the result. */
111 for (n
= 0; n
< nstrings
; ++n
)
113 fputs (strings
[n
].line
, stdout
);
114 free (strings
[n
].line
);
115 free (strings
[n
].key
);
124 xstrcoll (ptr1
, ptr2
)
128 const struct lines
*l1
= (const struct lines
*) ptr1
;
129 const struct lines
*l2
= (const struct lines
*) ptr2
;
131 return strcoll (l1
->key
, l2
->key
);