unit_tests/format.php

   1 <?php
   2
   3 #  Copyright (C) 2009 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('0.01', '$0', '$0.01');
  49         $errors += _test_format_money('0.51', '$1', '$0.51');
  50         $errors += _test_format_money('2.05', '$2', '$2.05');
  51         $errors += _test_format_money('2.10000500', '$2', '$2.10');
  52         $errors += _test_format_money('2.005', '$2', '$2.01');
  53         $errors += _test_format_money('2.004', '$2', '$2.00');
  54         $errors += _test_format_money('2.1', '$2', '$2.10');
  55         $errors += _test_format_money('2.0', '$2', '$2.00');
  56         $errors += _test_format_money('1000', '$1,000', '$1,000.00');
  57         $errors += _test_format_money('10000000', '$10,000,000', '$10,000,000.00');
  58         $errors += _test_format_money('100000000000', '$100,000,000,000', '$100,000,000,000.00');
  59         $errors += _test_format_money('1.99', '$2', '$1.99');
  60         $errors += _test_format_money('1.555', '$2', '$1.56');
  61         $errors += _test_format_money('19.555', '$20', '$19.56');
  62         $errors += _test_format_money('9.499', '$9', '$9.50');
  63         $errors += _test_format_money('9.989', '$10', '$9.99');
  64         $errors += _test_format_money('9.999', '$10', '$10.00');
  65         $errors += _test_format_money('19999999999.555', '$20,000,000,000', '$19,999,999,999.56');
  66         return $errors;
  67 }
  68
  69 # returns number of errors
  70 function _test_format_misc($name, $arg, $correct) {
  71         $function = "format_$name";
  72         $ret = $function($arg);
  73         if($ret !== $correct) {
  74                 message("$function($arg) returned \"$ret\" instead of \"$correct\"");
  75                 return 1;
  76         }
  77         return 0;
  78 }
  79
  80 # run tests where int, int_0, decimal, positive_decimal should return the same result
  81 function _test_format_int($arg, $correct) {
  82         if($correct === '') {
  83                 $correct_0 = '0';
  84         } else {
  85                 $correct_0 = $correct;
  86         }
  87         $errons = 0;
  88         $errors += _test_format_misc('int', $arg, $correct);
  89         $errors += _test_format_misc('int_0', $arg, $correct_0);
  90         $errors += _test_format_misc('positive_decimal', $arg, $correct);
  91         $errors += _test_format_misc('decimal', $arg, $correct);
  92         return $errors;
  93 }
  94
  95 # returns number of errors
  96 function test_format_misc() {
  97         $errors = 0;
  98
  99         $errors += _test_format_misc('caption', 'something', 'Something');
 100         $errors += _test_format_misc('caption', 'two_words', 'Two Words');
 101         $errors += _test_format_misc('caption', 'email_special_case', 'E-mail Special Case');
 102         $errors += _test_format_misc('caption', 'BIG', 'BIG');
 103         $errors += _test_format_misc('caption', '1,2.3%^&', '1,2.3%^&');
 104
 105         # test int, int_0, positive_decimal, decimal
 106         $errors += _test_format_int('', '');
 107         $errors += _test_format_int('abcdef', '');
 108         $errors += _test_format_int('0', '0');
 109         $errors += _test_format_int('00', '0');
 110         $errors += _test_format_int('0000', '0');
 111         $errors += _test_format_int('1', '1');
 112         $errors += _test_format_int('100000000000000000000000000', '100000000000000000000000000');
 113         $errors += _test_format_int('10000 0000000000000000000000', '100000000000000000000000000');
 114         $errors += _test_format_int(' 1a2b3c%^&', '123');
 115
 116         $errors += _test_format_misc('int', '-1', '1');
 117         $errors += _test_format_misc('int', '+1', '1');
 118         $errors += _test_format_misc('int_0', '-1', '1');
 119         $errors += _test_format_misc('int_0', '+1', '1');
 120         $errors += _test_format_misc('positive_decimal', '-1', '1');
 121         $errors += _test_format_misc('positive_decimal', '+1', '1');
 122         $errors += _test_format_misc('decimal', '-1', '-1');
 123         $errors += _test_format_misc('decimal', '+1', '1');
 124
 125         $errors += _test_format_misc('int', '-1.0', '10'); # FIXME?
 126         $errors += _test_format_misc('int', '+1.0', '10'); # FIXME?
 127         $errors += _test_format_misc('int_0', '-1.0', '10'); # FIXME?
 128         $errors += _test_format_misc('int_0', '+1.0', '10'); # FIXME?
 129         $errors += _test_format_misc('positive_decimal', '-1.0', '1.0');
 130         $errors += _test_format_misc('positive_decimal', '+1.0', '1.0');
 131         $errors += _test_format_misc('decimal', '-1.0', '-1.0');
 132         $errors += _test_format_misc('decimal', '+1.0', '1.0');
 133
 134         $errors += _test_format_misc('positive_decimal', '1.0', '1.0');
 135         $errors += _test_format_misc('decimal', '1.0', '1.0');
 136
 137         # extra zeros after the decimal point
 138         $errors += _test_format_misc('positive_decimal', '-1.00', '1.0');
 139         $errors += _test_format_misc('positive_decimal', '+1.00', '1.0');
 140         $errors += _test_format_misc('decimal', '-1.00', '-1.0');
 141         $errors += _test_format_misc('decimal', '+1.00', '1.0');
 142         $errors += _test_format_misc('positive_decimal', '-1.000', '1.0');
 143         $errors += _test_format_misc('positive_decimal', '+1.000', '1.0');
 144         $errors += _test_format_misc('decimal', '-1.000', '-1.0');
 145         $errors += _test_format_misc('decimal', '+1.000', '1.0');
 146         # important zeros after the decimal point
 147         $errors += _test_format_misc('positive_decimal', '-1.020', '1.02');
 148         $errors += _test_format_misc('positive_decimal', '+1.020', '1.02');
 149         $errors += _test_format_misc('decimal', '-1.020', '-1.02');
 150         $errors += _test_format_misc('decimal', '+1.020', '1.02');
 151         $errors += _test_format_misc('positive_decimal', '-1.0020', '1.002');
 152         $errors += _test_format_misc('positive_decimal', '+1.0020', '1.002');
 153         $errors += _test_format_misc('decimal', '-1.0020', '-1.002');
 154         $errors += _test_format_misc('decimal', '+1.0020', '1.002');
 155         # signs in weird places
 156         $errors += _test_format_misc('positive_decimal', '-1.-0020', '1.002');
 157         $errors += _test_format_misc('positive_decimal', '+1.-0020', '1.002');
 158         $errors += _test_format_misc('decimal', '-1.-0020', '-1.002');
 159         $errors += _test_format_misc('decimal', '+1.-0020', '1.002');
 160         $errors += _test_format_misc('positive_decimal', '-1.0-020', '1.002');
 161         $errors += _test_format_misc('positive_decimal', '+1.0-020', '1.002');
 162         $errors += _test_format_misc('decimal', '-1.0-020', '-1.002');
 163         $errors += _test_format_misc('decimal', '+1.0-020', '1.002');
 164         $errors += _test_format_misc('positive_decimal', '-1-.0020', '1.002');
 165         $errors += _test_format_misc('positive_decimal', '+1-.0020', '1.002');
 166         $errors += _test_format_misc('decimal', '-1-.0020', '-1.002');
 167         $errors += _test_format_misc('decimal', '+1-.0020', '1.002');
 168         $errors += _test_format_misc('positive_decimal', '--1.0020', '1.002');
 169         $errors += _test_format_misc('positive_decimal', '+-1.0020', '1.002');
 170         $errors += _test_format_misc('decimal', '--1.0020', '-1.002');
 171         $errors += _test_format_misc('decimal', '+-1.0020', '-1.002');
 172
 173
 174         $errors += _test_format_misc('zip', '', '');
 175         $errors += _test_format_misc('zip', '12345', '12345');
 176         $errors += _test_format_misc('zip', 'snt3nvwm4vm2zvw0%^&3-', '34203');
 177         $errors += _test_format_misc('zip', '123456', '12345-6');
 178         $errors += _test_format_misc('zip', '1234567890', '12345-67890');
 179
 180
 181         /* FIXME test these
 182         format_options($str, $name)
 183         format_filename($str, $allow_uppercase = false)
 184         format_path($str, $allow_uppercase = false)
 185         client_path_to_filename($path)
 186         format_image_w_h($str)
 187         format_image_w_h_thumb_w_h($str)
 188         format_varname($str)
 189         format_oneline($str)
 190         format_unix($str)
 191         format_bool($str)
 192         format_yesno($str)
 193         format_email($str)
 194         format_url($str)
 195         strplusone($str)
 196         format_money($str, $display_cents = true)
 197         format_dollars($str)
 198         format_mdy_to_ymd($str)
 199         format_ymd($str)
 200         format_hours_minutes($str)
 201         format_hours($str)
 202         format_12hr_to_hours($str)
 203         format_phone($str)
 204         */
 205
 206         return $errors;
 207 }
 208
 209 # returns number of errors
 210 function format_unit_tests_main() {
 211         $errors = 0;
 212         $errors += test_format_money();
 213         $errors += test_format_misc();
 214         return $errors;
 215 }