unit_tests/format.php

   1 <?php
   2
   3 #  Copyright (C) 2010 Jason Woofenden
   4 #
   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.
   9 #
  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.
  14 #
  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/>.
  17
  18
  19 # This file contains tests for functions in code/wfpl/format.php
  20 #
  21 # See code/wfpl/test.php for details on how to run or create tests
  22
  23
  24 require_once('code/wfpl/format.php');
  25
  26 function _test_format_money($input, $dollars_correct, $money_correct) {
  27         $errors = 0;
  28         $dollars = format_dollars($input);
  29         $money = format_money($input);
  30         if($dollars != $dollars_correct) {
  31                 ++$errors;
  32                 message("format_dollars(\"$input\") returned \"$dollars\" instead of \"$dollars_correct\"");
  33         }
  34         if($money != $money_correct) {
  35                 ++$errors;
  36                 message("format_money(\"$input\") returned \"$money\" instead of \"$money_correct\"");
  37         }
  38
  39         return $errors;
  40 }
  41
  42 function test_format_money() {
  43         $errors = 0;
  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');
  69         return $errors;
  70 }
  71
  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\"");
  78                 return 1;
  79         }
  80         return 0;
  81 }
  82
  83 # run tests where int, int_0, decimal, positive_decimal should return the same result
  84 function _test_format_int($arg, $correct) {
  85         if($correct === '') {
  86                 $correct_0 = '0';
  87         } else {
  88                 $correct_0 = $correct;
  89         }
  90         $errons = 0;
  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);
  95         return $errors;
  96 }
  97
  98 # returns number of errors
  99 function test_format_misc() {
 100         $errors = 0;
 101
 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%^&');
 107
 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');
 118
 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');
 127
 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');
 136
 137         $errors += _test_format_misc('positive_decimal', '1.0', '1.0');
 138         $errors += _test_format_misc('decimal', '1.0', '1.0');
 139
 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');
 175
 176
 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');
 182
 183
 184         /* FIXME test these
 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)
 190         format_varname($str)
 191         format_oneline($str)
 192         format_unix($str)
 193         format_bool($str)
 194         format_yesno($str)
 195         format_email($str)
 196         format_url($str)
 197         strplusone($str)
 198         format_money($str, $display_cents = true)
 199         format_dollars($str)
 200         format_mdy_to_ymd($str)
 201         format_ymd($str)
 202         format_hours_minutes($str)
 203         format_hours($str)
 204         format_12hr_to_hours($str)
 205         format_phone($str)
 206         */
 207
 208         return $errors;
 209 }
 210
 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\"");
 216                 return 1;
 217         }
 218         return 0;
 219 }
 220
 221
 222 function test_format_options() {
 223         $errors = 0;
 224         pulldown('array', array('one', 'two', "symbols&amp;'\""), 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&amp;\'"', 'symbols&amp;\'"');
 229         pulldown('hash', array('one' => 'Eno', 'two' => 'Owt', 'symbols&amp;\'"' => '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&amp;\'"', '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;amp;\'"', '');
 239
 240         return $errors;
 241 }
 242
 243 # returns number of errors
 244 function format_unit_tests_main() {
 245         $errors = 0;
 246         $errors += test_format_money();
 247         $errors += test_format_misc();
 248         $errors += test_format_options();
 249         return $errors;
 250 }