JasonWoof Got questions, comments, patches, etc.? Contact Jason Woofenden
fixed format_int() to remove leading zeros even when the number is all zeros (eg...
[wfpl.git] / format.php
1 <?php
2
3 #  Copyright (C) 2005 Jason Woofenden
4 #
5 #  This file is part of wfpl.
6 #
7 #  wfpl is free software; you can redistribute it and/or modify it under the
8 #  terms of the GNU Lesser General Public License as published by the Free
9 #  Software Foundation; either version 2.1 of the License, or (at your option)
10 #  any later version.
11 #
12 #  wfpl is distributed in the hope that it will be useful, but WITHOUT ANY
13 #  WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
14 #  FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License for
15 #  more details.
16 #
17 #  You should have received a copy of the GNU Lesser General Public License
18 #  along with wfpl; if not, write to the Free Software Foundation, Inc., 51
19 #  Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
20
21
22 # This file contains basic encodings
23
24 function format_caption($str) {
25         $str = str_replace('_', ' ', $str);
26         $str = ucwords($str);
27         return str_replace('Email', 'E-mail', $str);
28 }
29
30 # This function makes sure that $str is in the list of options, and returns "" otherwise
31 function format_options($str, $name) {
32         if(!isset($GLOBALS[$name . '_options'])) {
33                 die("Couldn't find options for \"$name\". Be sure to call pulldown().");
34         }
35
36         if(!in_array($str, array_keys($GLOBALS[$name . '_options']['options']))) {
37                 return '';
38         }
39
40         return $str;
41 }
42
43 function format_int($str) {
44         $str = ereg_replace('[^0-9]', '', $str);
45         return ereg_replace('^0*([0-9])', '\1', $str);
46 }
47
48 function format_decimal($str) {
49         $str = ereg_replace('[^0-9.]', '', $str);
50         $pos = strpos($str, '.');
51         if($pos !== false) {
52                 $str = str_replace('.', '', $str);
53                 if($pos == 0) {
54                         return '0.' . $str;
55                 } elseif($pos == strlen($str)) {
56                         return $str;
57                 } else {
58                         return substr($str, 0, $pos) . '.' . substr($str, $pos);
59                 }
60         }
61         return $str;
62 }
63
64 # return 0 of there's no digits
65 function format_int_0($str) {
66         $str = format_int($str);
67         if($str == '') {
68                 return '0';
69         }
70         return $str;
71 }
72
73 function format_zip($str) {
74         $str = ereg_replace('[^0-9]', '', $str);
75         if(strlen($str) > 5) {
76                 return substr($str, 0, 5) . '-' . substr($str, 5);
77         }
78         return $str;
79 }
80
81 function format_filename($str) {
82         $str = strtolower($str);
83         $str = ereg_replace('[^a-z0-9_.-]', '_', $str);
84         return ereg_replace('^[.-]', '_', $str);
85 }
86
87 function format_varname($str) {
88         $str = strtolower($str);
89         $str = ereg_replace('[^a-z0-9_]', '_', $str);
90         return ereg_replace('^[0-9]*', '', $str);
91 }
92
93 function format_oneline($str) {
94         $str = str_replace("\r", '', $str);
95         return str_replace("\n", '', $str);
96 }
97
98 function format_unix($str) {
99         return unix_newlines($str);
100 }
101
102 function format_yesno($str) {
103         if($str && $str != 'No') {
104                 return 'Yes';
105         } else {
106                 return 'No';
107         }
108 }
109
110 function format_email($str) {
111         # FIXME
112         return format_oneline($str);
113 }
114
115 function format_url($str) {
116         # FIXME
117         return format_oneline($str);
118 }
119
120 function format_money($str, $display_cents = true) {
121         $str = ereg_replace('[^0-9.]', '', $str);
122         if($display_cents) {
123                 $int = (int)($str * 100);
124                 $cents = $int % 100;
125                 $cents = sprintf('.%02d', $cents);
126                 $int = (int)($str); # go from the source again, so we can print numbers above 2M without cents.
127         } else {
128                 $cents = '';
129                 $int = round($str);
130         }
131         $chars = (string)$int;
132         $output = '';
133         $comma = 4;
134         $index = strlen($chars);
135         while($index) {
136                 --$index;
137                 --$comma;
138                 if($comma == 0) {
139                         $comma = 3;
140                         $output = ',' . $output;
141                 }
142                 $char = substr($chars, $index, 1);
143                 $output = $char . $output;
144         }
145         $output = '$' . $output . $cents;
146         return $output;
147 }
148
149 function format_dollars($str) {
150         return format_money($str, false);
151 }
152
153 # date is edited as mm/dd/yyyy but stored as yyyy-mm-dd
154 function format_mdy_to_ymd($str) {
155         return mdy_to_ymd(format_oneline($str));
156 }
157
158 function format_phone($str) {
159         $str = ereg_replace('[^0-9]', '', $str);
160         $str = ereg_replace('^1*', '', $str);
161         $len = strlen($str);
162         $output = '';
163
164         if($len < 10 && $len != 7) {
165                 #NOT A VALID PHONE NUMBER
166                 return $str;
167         }
168
169         if($len > 10) {
170                 $output = ' ext: ' . substr($str, 10);
171                 $len = 10;
172         }
173
174         if($len == 10) {
175                 $area = substr($str, 0, 3);
176                 $str = substr($str, 3);
177         }
178
179         $output = substr($str, 3) . $output;
180         $output = substr($str, 0, 3) . '-' . $output;
181
182         if($area) {
183                 $output = "($area) " . $output;
184         }
185
186         return $output;
187 }
188
189 ?>