1 /*
2   Copyright (C) 1997-2020 Sam Lantinga <slouken@libsdl.org>
3 
4   This software is provided 'as-is', without any express or implied
5   warranty.  In no event will the authors be held liable for any damages
6   arising from the use of this software.
7 
8   Permission is granted to anyone to use this software for any purpose,
9   including commercial applications, and to alter it and redistribute it
10   freely.
11 */
12 
13 #include "SDL_test.h"
14 
15 static int
num_compare(const void * _a,const void * _b)16 num_compare(const void *_a, const void *_b)
17 {
18     const int a = *((const int *) _a);
19     const int b = *((const int *) _b);
20     return (a < b) ? -1 : ((a > b) ? 1 : 0);
21 }
22 
23 static void
test_sort(const char * desc,int * nums,const int arraylen)24 test_sort(const char *desc, int *nums, const int arraylen)
25 {
26     int i;
27     int prev;
28 
29     SDL_Log("test: %s arraylen=%d", desc, arraylen);
30 
31     SDL_qsort(nums, arraylen, sizeof (nums[0]), num_compare);
32 
33     prev = nums[0];
34     for (i = 1; i < arraylen; i++) {
35         const int val = nums[i];
36         if (val < prev) {
37             SDL_Log("sort is broken!");
38             return;
39         }
40         prev = val;
41     }
42 }
43 
44 int
main(int argc,char * argv[])45 main(int argc, char *argv[])
46 {
47     static int nums[1024 * 100];
48     static const int itervals[] = { SDL_arraysize(nums), 12 };
49     int iteration;
50     SDLTest_RandomContext rndctx;
51 
52     if (argc > 1)
53     {
54         int success;
55         Uint64 seed = 0;
56         if (argv[1][0] == '0' && argv[1][1] == 'x')
57             success = SDL_sscanf(argv[1] + 2, "%llx", &seed);
58         else
59             success = SDL_sscanf(argv[1], "%llu", &seed);
60         if (!success) {
61             SDL_LogError(SDL_LOG_CATEGORY_APPLICATION, "Invalid seed. Use a decimal or hexadecimal number.\n");
62             return 1;
63         }
64         if (seed <= ((Uint64)0xffffffff)) {
65             SDL_LogError(SDL_LOG_CATEGORY_APPLICATION, "Seed must be equal or greater than 0x100000000.\n");
66             return 1;
67         }
68         SDLTest_RandomInit(&rndctx, (unsigned int)(seed >> 32), (unsigned int)(seed & 0xffffffff));
69     }
70     else
71     {
72         SDLTest_RandomInitTime(&rndctx);
73     }
74     SDL_Log("Using random seed 0x%08x%08x\n", rndctx.x, rndctx.c);
75 
76     for (iteration = 0; iteration < SDL_arraysize(itervals); iteration++) {
77         const int arraylen = itervals[iteration];
78         int i;
79 
80         for (i = 0; i < arraylen; i++) {
81             nums[i] = i;
82         }
83         test_sort("already sorted", nums, arraylen);
84 
85         for (i = 0; i < arraylen; i++) {
86             nums[i] = i;
87         }
88         nums[arraylen-1] = -1;
89         test_sort("already sorted except last element", nums, arraylen);
90 
91         for (i = 0; i < arraylen; i++) {
92             nums[i] = (arraylen-1) - i;
93         }
94         test_sort("reverse sorted", nums, arraylen);
95 
96         for (i = 0; i < arraylen; i++) {
97             nums[i] = SDLTest_RandomInt(&rndctx);
98         }
99         test_sort("random sorted", nums, arraylen);
100     }
101 
102     return 0;
103 }
104 
105 /* vi: set ts=4 sw=4 expandtab: */
106 
107