3 # Copyright (C) 2010 Jason Woofenden
5 # This program is free software: you can redistribute it and/or modify
6 # it under the terms of the GNU General Public License as published by
7 # the Free Software Foundation, either version 3 of the License, or
8 # (at your option) any later version.
10 # This program is distributed in the hope that it will be useful,
11 # but WITHOUT ANY WARRANTY; without even the implied warranty of
12 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 # GNU General Public License for more details.
15 # You should have received a copy of the GNU General Public License
16 # along with this program. If not, see <http://www.gnu.org/licenses/>.
19 # This file contains tests for functions in code/wfpl/format.php
21 # See code/wfpl/test.php for details on how to run or create tests
24 require_once('code/wfpl/format.php');
26 function _test_format_money($input, $dollars_correct, $money_correct) {
28 $dollars = format_dollars($input);
29 $money = format_money($input);
30 if($dollars != $dollars_correct) {
32 message("format_dollars(\"$input\") returned \"$dollars\" instead of \"$dollars_correct\"");
34 if($money != $money_correct) {
36 message("format_money(\"$input\") returned \"$money\" instead of \"$money_correct\"");
42 function test_format_money() {
44 $errors += _test_format_money('1', '$1', '$1.00');
45 $errors += _test_format_money('0', '$0', '$0.00');
46 $errors += _test_format_money('0.0', '$0', '$0.00');
47 $errors += _test_format_money('0.00', '$0', '$0.00');
48 $errors += _test_format_money('00.00', '$0', '$0.00');
49 $errors += _test_format_money('0.000', '$0', '$0.00');
50 $errors += _test_format_money('0000.00000', '$0', '$0.00');
51 $errors += _test_format_money('0.01', '$0', '$0.01');
52 $errors += _test_format_money('0.51', '$1', '$0.51');
53 $errors += _test_format_money('2.05', '$2', '$2.05');
54 $errors += _test_format_money('2.10000500', '$2', '$2.10');
55 $errors += _test_format_money('2.005', '$2', '$2.01');
56 $errors += _test_format_money('2.004', '$2', '$2.00');
57 $errors += _test_format_money('2.1', '$2', '$2.10');
58 $errors += _test_format_money('2.0', '$2', '$2.00');
59 $errors += _test_format_money('1000', '$1,000', '$1,000.00');
60 $errors += _test_format_money('10000000', '$10,000,000', '$10,000,000.00');
61 $errors += _test_format_money('100000000000', '$100,000,000,000', '$100,000,000,000.00');
62 $errors += _test_format_money('1.99', '$2', '$1.99');
63 $errors += _test_format_money('1.555', '$2', '$1.56');
64 $errors += _test_format_money('19.555', '$20', '$19.56');
65 $errors += _test_format_money('9.499', '$9', '$9.50');
66 $errors += _test_format_money('9.989', '$10', '$9.99');
67 $errors += _test_format_money('9.999', '$10', '$10.00');
68 $errors += _test_format_money('19999999999.555', '$20,000,000,000', '$19,999,999,999.56');
72 # returns number of errors
73 function _test_format_misc($name, $arg, $correct) {
74 $function = "format_$name";
75 $ret = $function($arg);
76 if($ret !== $correct) {
77 message("$function($arg) returned \"$ret\" instead of \"$correct\"");
83 # run tests where int, int_0, decimal, positive_decimal should return the same result
84 function _test_format_int($arg, $correct) {
88 $correct_0 = $correct;
91 $errors += _test_format_misc('int', $arg, $correct);
92 $errors += _test_format_misc('int_0', $arg, $correct_0);
93 $errors += _test_format_misc('positive_decimal', $arg, $correct);
94 $errors += _test_format_misc('decimal', $arg, $correct);
98 # returns number of errors
99 function test_format_misc() {
102 $errors += _test_format_misc('caption', 'something', 'Something');
103 $errors += _test_format_misc('caption', 'two_words', 'Two Words');
104 $errors += _test_format_misc('caption', 'email_special_case', 'E-mail Special Case');
105 $errors += _test_format_misc('caption', 'BIG', 'BIG');
106 $errors += _test_format_misc('caption', '1,2.3%^&', '1,2.3%^&');
108 # test int, int_0, positive_decimal, decimal
109 $errors += _test_format_int('', '');
110 $errors += _test_format_int('abcdef', '');
111 $errors += _test_format_int('0', '0');
112 $errors += _test_format_int('00', '0');
113 $errors += _test_format_int('0000', '0');
114 $errors += _test_format_int('1', '1');
115 $errors += _test_format_int('100000000000000000000000000', '100000000000000000000000000');
116 $errors += _test_format_int('10000 0000000000000000000000', '100000000000000000000000000');
117 $errors += _test_format_int(' 1a2b3c%^&', '123');
119 $errors += _test_format_misc('int', '-1', '1');
120 $errors += _test_format_misc('int', '+1', '1');
121 $errors += _test_format_misc('int_0', '-1', '1');
122 $errors += _test_format_misc('int_0', '+1', '1');
123 $errors += _test_format_misc('positive_decimal', '-1', '1');
124 $errors += _test_format_misc('positive_decimal', '+1', '1');
125 $errors += _test_format_misc('decimal', '-1', '-1');
126 $errors += _test_format_misc('decimal', '+1', '1');
128 $errors += _test_format_misc('int', '-1.0', '1');
129 $errors += _test_format_misc('int', '+1.0', '1');
130 $errors += _test_format_misc('int_0', '-1.0', '1');
131 $errors += _test_format_misc('int_0', '+1.0', '1');
132 $errors += _test_format_misc('positive_decimal', '-1.0', '1.0');
133 $errors += _test_format_misc('positive_decimal', '+1.0', '1.0');
134 $errors += _test_format_misc('decimal', '-1.0', '-1.0');
135 $errors += _test_format_misc('decimal', '+1.0', '1.0');
137 $errors += _test_format_misc('positive_decimal', '1.0', '1.0');
138 $errors += _test_format_misc('decimal', '1.0', '1.0');
140 # extra zeros after the decimal point
141 $errors += _test_format_misc('positive_decimal', '-1.00', '1.0');
142 $errors += _test_format_misc('positive_decimal', '+1.00', '1.0');
143 $errors += _test_format_misc('decimal', '-1.00', '-1.0');
144 $errors += _test_format_misc('decimal', '+1.00', '1.0');
145 $errors += _test_format_misc('positive_decimal', '-1.000', '1.0');
146 $errors += _test_format_misc('positive_decimal', '+1.000', '1.0');
147 $errors += _test_format_misc('decimal', '-1.000', '-1.0');
148 $errors += _test_format_misc('decimal', '+1.000', '1.0');
149 # important zeros after the decimal point
150 $errors += _test_format_misc('positive_decimal', '-1.020', '1.02');
151 $errors += _test_format_misc('positive_decimal', '+1.020', '1.02');
152 $errors += _test_format_misc('decimal', '-1.020', '-1.02');
153 $errors += _test_format_misc('decimal', '+1.020', '1.02');
154 $errors += _test_format_misc('positive_decimal', '-1.0020', '1.002');
155 $errors += _test_format_misc('positive_decimal', '+1.0020', '1.002');
156 $errors += _test_format_misc('decimal', '-1.0020', '-1.002');
157 $errors += _test_format_misc('decimal', '+1.0020', '1.002');
158 # signs in weird places
159 $errors += _test_format_misc('positive_decimal', '-1.-0020', '1.002');
160 $errors += _test_format_misc('positive_decimal', '+1.-0020', '1.002');
161 $errors += _test_format_misc('decimal', '-1.-0020', '-1.002');
162 $errors += _test_format_misc('decimal', '+1.-0020', '1.002');
163 $errors += _test_format_misc('positive_decimal', '-1.0-020', '1.002');
164 $errors += _test_format_misc('positive_decimal', '+1.0-020', '1.002');
165 $errors += _test_format_misc('decimal', '-1.0-020', '-1.002');
166 $errors += _test_format_misc('decimal', '+1.0-020', '1.002');
167 $errors += _test_format_misc('positive_decimal', '-1-.0020', '1.002');
168 $errors += _test_format_misc('positive_decimal', '+1-.0020', '1.002');
169 $errors += _test_format_misc('decimal', '-1-.0020', '-1.002');
170 $errors += _test_format_misc('decimal', '+1-.0020', '1.002');
171 $errors += _test_format_misc('positive_decimal', '--1.0020', '1.002');
172 $errors += _test_format_misc('positive_decimal', '+-1.0020', '1.002');
173 $errors += _test_format_misc('decimal', '--1.0020', '-1.002');
174 $errors += _test_format_misc('decimal', '+-1.0020', '-1.002');
177 $errors += _test_format_misc('zip', '', '');
178 $errors += _test_format_misc('zip', '12345', '12345');
179 $errors += _test_format_misc('zip', 'snt3nvwm4vm2zvw0%^&3-', '34203');
180 $errors += _test_format_misc('zip', '123456', '12345-6');
181 $errors += _test_format_misc('zip', '1234567890', '12345-67890');
185 format_filename($str, $allow_uppercase = false)
186 format_path($str, $allow_uppercase = false)
187 client_path_to_filename($path)
188 format_image_w_h($str)
189 format_image_w_h_thumb_w_h($str)
198 format_money($str, $display_cents = true)
200 format_mdy_to_ymd($str)
202 format_hours_minutes($str)
204 format_12hr_to_hours($str)
211 # returns number of errors
212 function _test_format_options($field, $value, $correct) {
213 $ret = format_options($value, $field);
214 if($ret !== $correct) {
215 message("format_options($value, $field) returned \"$ret\" instead of \"$correct\"");
222 function test_format_options() {
224 pulldown('array', array('one', 'two', "symbols&'\""), PULLDOWN_ARRAY);
225 $errors +=_test_format_options('array', 'one', 'one');
226 $errors +=_test_format_options('array', 'One', '');
227 $errors +=_test_format_options('array', 'two', 'two');
228 $errors +=_test_format_options('array', 'symbols&\'"', 'symbols&\'"');
229 pulldown('hash', array('one' => 'Eno', 'two' => 'Owt', 'symbols&\'"' => 'Slobmys'), PULLDOWN_HASH);
230 $errors +=_test_format_options('hash', 'one', 'one');
231 $errors +=_test_format_options('hash', 'One', '');
232 $errors +=_test_format_options('hash', 'two', 'two');
233 $errors +=_test_format_options('hash', 'symbols&\'"', '');
234 pulldown('array_2d', array(array('one', 'Eno'), array('two', 'Owt'), array('symbols&\'"', 'Slobmys')), PULLDOWN_2D);
235 $errors +=_test_format_options('array_2d', 'one', 'one');
236 $errors +=_test_format_options('array_2d', 'One', '');
237 $errors +=_test_format_options('array_2d', 'two', 'two');
238 $errors +=_test_format_options('array_2d', 'symbols&amp;\'"', '');
243 # returns number of errors
244 function format_unit_tests_main() {
246 $errors += test_format_money();
247 $errors += test_format_misc();
248 $errors += test_format_options();