1#!/bin/sh
2# Ensure that sort --sort-random doesn't sort.
3
4# Copyright (C) 2005-2023 Free Software Foundation, Inc.
5
6# This program is free software: you can redistribute it and/or modify
7# it under the terms of the GNU General Public License as published by
8# the Free Software Foundation, either version 3 of the License, or
9# (at your option) any later version.
10
11# This program 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
14# GNU General Public License for more details.
15
16# You should have received a copy of the GNU General Public License
17# along with this program.  If not, see <https://www.gnu.org/licenses/>.
18
19. "${srcdir=.}/tests/init.sh"; path_prepend_ ./src
20print_ver_ sort
21
22seq 100 > in || framework_failure_
23
24
25sort --random-sort in > out || fail=1
26
27# Fail if the input is the same as the output.
28# This is a probabilistic test :-)
29# However, the odds of failure are very low: 1 in 100! (~ 1 in 10^158)
30compare in out > /dev/null && { fail=1; echo "not random?" 1>&2; }
31
32# Fail if the sorted output is not the same as the input.
33sort -n out > out1
34compare in out1 || { fail=1; echo "not a permutation" 1>&2; }
35
36# If locale is available then use it to find a random non-C locale.
37if (locale --version) > /dev/null 2>&1; then
38  locale=$(locale -a | sort --random-sort | $AWK '/^.._/{print;exit}')
39  LC_ALL=$locale sort --random-sort in > out1 || fail=1
40  LC_ALL=$locale sort --random-sort in > out2 || fail=1
41
42  # Fail if the output "randomly" is the same twice in a row.
43  compare out1 out2 > /dev/null &&
44    { fail=1; echo "not random with LC_ALL=$locale" 1>&2; }
45
46  # Fail if the sorted output is not the same as the input.
47  sort -n out > out1
48  compare in out1 ||
49    { fail=1; echo "not a permutation with LC_ALL=$locale" 1>&2; }
50fi
51
52Exit $fail
53