+function format_caption($str) {
+ $str = str_replace('_', ' ', $str);
+ $str = ucwords($str);
+ return str_replace('Email', 'E-mail', $str);
+}
+
+# This function makes sure that $str is in the list of options, and returns "" otherwise
+function format_options($str, $name) {
+ if(!isset($GLOBALS[$name . '_options'])) {
+ die("Couldn't find options for \"$name\". Be sure to call pulldown().");
+ }
+
+ foreach($GLOBALS[$name . '_options']['options'] as $keyval) {
+ list($key, $value) = $keyval;
+ if($str == $key) {
+ return $str;
+ }
+ }
+
+ return $str;
+}
+
+function format_int($str) {
+ $str = ereg_replace('[^0-9]', '', $str);
+ return ereg_replace('^0*([0-9])', '\1', $str);
+}
+
+function format_decimal($str) {
+ $str = ereg_replace('[^0-9.]', '', $str);
+ $pos = strpos($str, '.');
+ if($pos !== false) {
+ $str = str_replace('.', '', $str);
+ if($pos == 0) {
+ return '0.' . $str;
+ } elseif($pos == strlen($str)) {
+ return $str;
+ } else {
+ return substr($str, 0, $pos) . '.' . substr($str, $pos);
+ }
+ }
+ return $str;
+}
+
+# return 0 of there's no digits
+function format_int_0($str) {
+ $str = format_int($str);
+ if($str == '') {
+ return '0';
+ }
+ return $str;
+}
+
+function format_zip($str) {
+ $str = ereg_replace('[^0-9]', '', $str);
+ if(strlen($str) > 5) {
+ return substr($str, 0, 5) . '-' . substr($str, 5);
+ }
+ return $str;
+}
+
+function format_filename($str) {
+ $str = strtolower($str);
+ $str = ereg_replace('[^a-z0-9_.-]', '_', $str);
+ return ereg_replace('^[.-]', '_', $str);
+}
+
+function format_h_w_image($str) {
+ $fields = explode(' ', $str);
+ if(count($fields) != 3) {
+ return '';
+ }
+
+ list($width, $height, $filename) = $fields;
+ $width = format_int_0($width);
+ $height = format_int_0($height);
+ $filename = format_filename($filename);
+
+ return "$width $height $filename";
+}
+
+function format_varname($str) {
+ $str = strtolower($str);
+ $str = ereg_replace('[^a-z0-9_]', '_', $str);
+ return ereg_replace('^[0-9]*', '', $str);
+}
+