OLD | NEW |
| (Empty) |
1 # 2013-05-28 | |
2 # | |
3 # The author disclaims copyright to this source code. In place of | |
4 # a legal notice, here is a blessing: | |
5 # | |
6 # May you do good and not evil. | |
7 # May you find forgiveness for yourself and forgive others. | |
8 # May you share freely, never taking more than you give. | |
9 # | |
10 #*********************************************************************** | |
11 # This file implements regression tests for SQLite library. The | |
12 # focus of this file is percentile.c extension | |
13 # | |
14 | |
15 set testdir [file dirname $argv0] | |
16 source $testdir/tester.tcl | |
17 | |
18 # Basic test of the percentile() function. | |
19 # | |
20 do_test percentile-1.0 { | |
21 load_static_extension db percentile | |
22 execsql { | |
23 CREATE TABLE t1(x); | |
24 INSERT INTO t1 VALUES(1),(4),(6),(7),(8),(9),(11),(11),(11); | |
25 } | |
26 execsql {SELECT percentile(x,0) FROM t1} | |
27 } {1.0} | |
28 foreach {in out} { | |
29 100 11.0 | |
30 50 8.0 | |
31 12.5 4.0 | |
32 15 4.4 | |
33 20 5.2 | |
34 80 11.0 | |
35 89 11.0 | |
36 } { | |
37 do_test percentile-1.1.$in { | |
38 execsql {SELECT percentile(x,$in) FROM t1} | |
39 } $out | |
40 } | |
41 | |
42 # Add some NULL values. | |
43 # | |
44 do_test percentile-1.2 { | |
45 execsql {INSERT INTO t1 VALUES(NULL),(NULL);} | |
46 } {} | |
47 foreach {in out} { | |
48 100 11.0 | |
49 50 8.0 | |
50 12.5 4.0 | |
51 15 4.4 | |
52 20 5.2 | |
53 80 11.0 | |
54 89 11.0 | |
55 } { | |
56 do_test percentile-1.3.$in { | |
57 execsql {SELECT percentile(x,$in) FROM t1} | |
58 } $out | |
59 } | |
60 | |
61 # The second argument to percentile can change some, but not much. | |
62 # | |
63 do_test percentile-1.4 { | |
64 catchsql {SELECT round(percentile(x, 15+0.000001*rowid),1) FROM t1} | |
65 } {0 4.4} | |
66 do_test percentile-1.5 { | |
67 catchsql {SELECT round(percentile(x, 15+0.1*rowid),1) FROM t1} | |
68 } {1 {2nd argument to percentile() is not the same for all input rows}} | |
69 | |
70 # Input values in a random order | |
71 # | |
72 do_test percentile-1.6 { | |
73 execsql { | |
74 CREATE TABLE t2(x); | |
75 INSERT INTO t2 SELECT x+0.0 FROM t1 ORDER BY random(); | |
76 } | |
77 } {} | |
78 foreach {in out} { | |
79 100 11.0 | |
80 50 8.0 | |
81 12.5 4.0 | |
82 15 4.4 | |
83 20 5.2 | |
84 80 11.0 | |
85 89 11.0 | |
86 } { | |
87 do_test percentile-1.7.$in { | |
88 execsql {SELECT percentile(x,$in) FROM t2} | |
89 } $out | |
90 } | |
91 | |
92 # Wrong number of arguments | |
93 # | |
94 do_test percentile-1.8 { | |
95 catchsql {SELECT percentile(x,0,1) FROM t1} | |
96 } {1 {wrong number of arguments to function percentile()}} | |
97 do_test percentile-1.9 { | |
98 catchsql {SELECT percentile(x) FROM t1} | |
99 } {1 {wrong number of arguments to function percentile()}} | |
100 | |
101 # Second argument must be numeric | |
102 # | |
103 do_test percentile-1.10 { | |
104 catchsql {SELECT percentile(x,null) FROM t1} | |
105 } {1 {2nd argument to percentile() is not a number between 0.0 and 100.0}} | |
106 do_test percentile-1.11 { | |
107 catchsql {SELECT percentile(x,'fifty') FROM t1} | |
108 } {1 {2nd argument to percentile() is not a number between 0.0 and 100.0}} | |
109 do_test percentile-1.12 { | |
110 catchsql {SELECT percentile(x,x'3530') FROM t1} | |
111 } {1 {2nd argument to percentile() is not a number between 0.0 and 100.0}} | |
112 | |
113 # Second argument is out of range | |
114 # | |
115 do_test percentile-1.13 { | |
116 catchsql {SELECT percentile(x,-0.0000001) FROM t1} | |
117 } {1 {2nd argument to percentile() is not a number between 0.0 and 100.0}} | |
118 do_test percentile-1.14 { | |
119 catchsql {SELECT percentile(x,100.0000001) FROM t1} | |
120 } {1 {2nd argument to percentile() is not a number between 0.0 and 100.0}} | |
121 | |
122 # First argument is not NULL and is not NUMERIC | |
123 # | |
124 do_test percentile-1.15 { | |
125 catchsql { | |
126 BEGIN; | |
127 UPDATE t1 SET x='50' WHERE x IS NULL; | |
128 SELECT percentile(x, 50) FROM t1; | |
129 } | |
130 } {1 {1st argument to percentile() is not numeric}} | |
131 do_test percentile-1.16 { | |
132 catchsql { | |
133 ROLLBACK; | |
134 BEGIN; | |
135 UPDATE t1 SET x=x'3530' WHERE x IS NULL; | |
136 SELECT percentile(x, 50) FROM t1; | |
137 } | |
138 } {1 {1st argument to percentile() is not numeric}} | |
139 do_test percentile-1.17 { | |
140 catchsql { | |
141 ROLLBACK; | |
142 SELECT percentile(x, 50) FROM t1; | |
143 } | |
144 } {0 8.0} | |
145 | |
146 # No non-NULL entries. | |
147 # | |
148 do_test percentile-1.18 { | |
149 execsql { | |
150 UPDATE t1 SET x=NULL; | |
151 SELECT ifnull(percentile(x, 50),'NULL') FROM t1 | |
152 } | |
153 } {NULL} | |
154 | |
155 # Exactly one non-NULL entry | |
156 # | |
157 do_test percentile-1.19 { | |
158 execsql { | |
159 UPDATE t1 SET x=12345 WHERE rowid=5; | |
160 SELECT percentile(x, 0), percentile(x, 50), percentile(x,100) FROM t1 | |
161 } | |
162 } {12345.0 12345.0 12345.0} | |
163 | |
164 # Infinity as an input | |
165 # | |
166 do_test percentile-1.20 { | |
167 catchsql { | |
168 DELETE FROM t1; | |
169 INSERT INTO t1 SELECT x+0.0 FROM t2; | |
170 UPDATE t1 SET x=1.0e300*1.0e300 WHERE rowid=5; | |
171 SELECT percentile(x,50) from t1; | |
172 } | |
173 } {1 {Inf input to percentile()}} | |
174 do_test percentile-1.21 { | |
175 catchsql { | |
176 UPDATE t1 SET x=-1.0e300*1.0e300 WHERE rowid=5; | |
177 SELECT percentile(x,50) from t1; | |
178 } | |
179 } {1 {Inf input to percentile()}} | |
180 | |
181 # Million-row Inputs | |
182 # | |
183 ifcapable vtab { | |
184 do_test percentile-2.0 { | |
185 load_static_extension db wholenumber | |
186 execsql { | |
187 CREATE VIRTUAL TABLE nums USING wholenumber; | |
188 CREATE TABLE t3(x); | |
189 INSERT INTO t3 SELECT value-1 FROM nums WHERE value BETWEEN 1 AND 500000; | |
190 INSERT INTO t3 SELECT value*10 FROM nums | |
191 WHERE value BETWEEN 500000 AND 999999; | |
192 SELECT count(*) FROM t3; | |
193 } | |
194 } {1000000} | |
195 foreach {in out} { | |
196 0 0.0 | |
197 100 9999990.0 | |
198 50 2749999.5 | |
199 10 99999.9 | |
200 } { | |
201 do_test percentile-2.1.$in { | |
202 execsql { | |
203 SELECT percentile(x, $in) from t3; | |
204 } | |
205 } $out | |
206 } | |
207 } | |
208 | |
209 finish_test | |
OLD | NEW |