JasonWoof Got questions, comments, patches, etc.? Contact Jason Woofenden
fixed pulldowns, metaform suppors zip and decimal, run.php supports straight html...
[wfpl.git] / encode.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. These are used by the encoder. You can
23 # specify any template tag to be encoded with this syntax: ~variable.encoding~
24 #
25 # this example: <p>~foo.html~</p>
26 # will encode foo (using enc_html()) before displaying it, so that characters
27 # such as < will display properly.
28
29
30 function enc_jsdq($str) {
31         $str = enc_sql($str);
32         $str = str_replace("\n", "\\n", $str);
33         return str_replace("\r", "\\r", $str);
34 }
35
36 # encode for putting within double-quotes in SQL
37 function enc_sql($str) {
38         $str = str_replace("\\", "\\\\", $str);
39         $str = str_replace('"', "\\\"", $str);
40         return $str;
41 }
42
43 # Encode for output in html. does nothing with whitespace
44 #
45 # Example: <p>~foo.html~</p>
46 function enc_html($str) {
47         $str = str_replace('&', '&amp;', $str);
48         $str = str_replace('<', '&lt;', $str);
49         $str = str_replace('>', '&gt;', $str);
50         return $str;
51 }
52
53
54 # HTML attribute.
55 #
56 # Example: <input name="foo" value="~foo.attr~">
57 function enc_attr($str) {
58         $str = str_replace('&', '&amp;', $str);
59         $str = str_replace('"', '&quot;', $str);
60         return $str;
61 }
62
63 # URI agument value.
64 #
65 # Example:  <a href="http://example.com?foo=~foo.url_val.attr~">http://example.com?foo=~foo.url_val~</a>
66 function enc_url_val($str) {
67         return rawurlencode($str);
68 }
69
70 # This is a hack to work around html's stupid syntax for checkboxes.
71 #
72 # Place the template marker just before a " somewhere.
73 #
74 # Example: <input type="checkbox" name="foo~foo.checked~">
75 function enc_checked($str) {
76         if($str == 'Yes') {
77                 return '" checked="checked';
78         } else {
79                 return '';
80         }
81 }
82
83 # add a tab at the begining of each non-empty line
84 function enc_tab($str) {
85         $lines = explode("\n", $str);
86         $out = '';
87         foreach($lines as $line) {
88                 if($line) {
89                         $out .= "\t$line";
90                 }
91                 $out .= "\n";
92         }
93
94         # remove the extra newline added above
95         return substr($out, 0, -1);
96 }
97
98 function enc_upper($str) {
99         return strtoupper($str);
100 }
101
102
103 # display <option>s
104 function enc_states($str) {
105         $states_assoc = array("AL" => "Alabama", "AK" => "Alaska", "AZ" => "Arizona", "AR" => "Arkansas", "CA" => "California", "CO" => "Colorado", "CT" => "Connecticut", "DE" => "Delaware", "FL" => "Florida", "GA" => "Georgia", "HI" => "Hawaii", "ID" => "Idaho", "IL" => "Illinois", "IN" => "Indiana", "IA" => "Iowa", "KS" => "Kansas", "KY" => "Kentucky", "LA" => "Louisiana", "ME" => "Maine", "MD" => "Maryland", "MA" => "Massachusetts", "MI" => "Michigan", "MN" => "Minnesota", "MS" => "Mississippi", "MO" => "Missouri", "MT" => "Montana", "NE" => "Nebraska", "NV" => "Nevada", "NH" => "New Hampshire", "NJ" => "New Jersey", "NM" => "New Mexico", "NY" => "New York", "NC" => "North Carolina", "ND" => "North Dakota", "OH" => "Ohio", "OK" => "Oklahoma", "OR" => "Oregon", "PA" => "Pennsylvania", "RI" => "Rhode Island", "SC" => "South Carolina", "SD" => "South Dakota", "TN" => "Tennessee", "TX" => "Texas", "UT" => "Utah", "VT" => "Vermont", "VA" => "Virginia", "WA" => "Washington", "DC" => "Washington, DC", "WV" => "West Virginia", "WI" => "Wisconsin", "WY" => "Wyoming");
106         $ret = '';
107
108         return encode_options($str, $states_assoc, $use_keys = true);
109 }
110
111
112 define('PULLDOWN_ARRAY', 0); define('PULLDOWN_HASH', 1); define('PULLDOWN_2D', 2);
113
114 function pulldown_options_to_hash($options, $keys_from) {
115         # convert other types of input to value=>display hash
116         switch($keys_from) {
117                 case PULLDOWN_HASH:
118                         return $options;
119                 case PULLDOWN_ARRAY:
120                         $new_options = array();
121                         foreach($options as $opt) {
122                                 $new_options[$opt] = $opt;
123                         }
124                         return $new_options;
125                 break;
126                 case PULLDOWN_2D:
127                         $new_options = array();
128                         foreach($options as $opt) {
129                                 $new_options[$opt[0]] = $opt[1];
130                         }
131                         return $new_options;
132                 break;
133                 default:
134                         die('unknown value: "' . print_r($keys_from) . '" passed in $keys_from parameter');
135         }
136 }
137
138
139 # call this function before you run() the template so enc_options() knows what
140 # to do
141 #
142 # Parameters:
143 #
144 #   name: the name of the html control
145 #
146 #   options: an array of options to display in the pulldown/selectbox
147 #
148 #   keys_from: Set to one of:
149 #        PULLDOWN_ARRAY: (default) values of $options are displayd and posted
150 #        PULLDOWN_HASH: values of $options are display, keys are posted
151 #        PULLDOWN_2D: $options is a 2 dimensional array.
152 #                     $options[0][1] is displayed, $options[0][0] is posted.
153 #                     $options[1][1] is displayed, $options[1][0] is posted.
154 #
155 #   multiple: UNTESTED set to true for multiple-select boxes. 
156
157 function pulldown($name, $options, $keys_from = PULLDOWN_ARRAY, $multiple = false) {
158         $options = pulldown_options_to_hash($options, $keys_from);
159         $GLOBALS[$name . '_options'] = array();
160         $GLOBALS[$name . '_options']['options'] = $options;
161         $GLOBALS[$name . '_options']['multiple'] = $multiple;
162 }
163
164 # output a bunch of <option> tags
165 function enc_options($values, $name) {
166         if(!isset($GLOBALS[$name . '_options'])) {
167                 die('pulldown() must be called before this template can be run. See code/wfpl/encode.php');
168         }
169         if($GLOBALS[$name . '_options']['multiple']) { # FIXME test this
170                 $values = explode(', ', $values);
171         }
172         return encode_options($values, $GLOBALS[$name . '_options']['options'], PULLDOWN_HASH);
173 }
174
175 # use this function along with a special template to generate the html for pulldowns and multiple select boxes.
176 #
177 # Parameters:
178 #
179 #    selected: can be a string or (for multiple-selects) an array
180 #
181 #    options, keys_from: see documentation for pulldown() above
182 function encode_options($selected, $options, $keys_from) {
183         if(!is_array($selected)) {
184                 $selected = array($selected);
185         }
186
187         $options = pulldown_options_to_hash($options, $keys_from);
188
189         $out = '';
190         foreach($options as $value => $display) {
191                 $out .= '<option';
192
193                 if(in_array($value, $selected)) {
194                         $out .= ' selected="selected"';
195                 }
196
197                 if($value !== $display) {
198                         $out .= ' value="';
199                         $out .= enc_attr($value);
200                         $out .= '"';
201                 }
202                         
203                 $out .= '>';
204
205                 $out .= enc_html($display);
206
207                 $out .= "</option>\n";
208         }
209
210         return $out;
211 }
212
213 ?>