<?php

#  Copyright (C) 2005 Jason Woofenden
#
#  This program is free software: you can redistribute it and/or modify
#  it under the terms of the GNU General Public License as published by
#  the Free Software Foundation, either version 3 of the License, or
#  (at your option) any later version.
#  
#  This program is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#  GNU General Public License for more details.
#  
#  You should have received a copy of the GNU General Public License
#  along with this program.  If not, see <http://www.gnu.org/licenses/>.


# This file contains basic encodings

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_decimals($str) {
	$str = ereg_replace('[^0-9]', '', $str);
	return ereg_replace('^([0-9])0*', '\1', $str);
}

function _format_positive_decimal($str) {
	$str = ereg_replace('[^0-9.]', '', $str);
	$pos = strpos($str, '.');
	if($pos !== false) {
		$str = str_replace('.', '', $str);
		if($pos == 0) {
			return '0.' . format_decimals($str);
		} elseif($pos == strlen($str)) {
			return format_int($str);
		} else {
			return format_int(substr($str, 0, $pos)) . '.' . format_decimals(substr($str, $pos));
		}
	}
	return format_int($str);
}

function format_positive_decimal($str) {
	$str = _format_positive_decimal($str);
	if($str === '0.0') {
		$str = '0';
	}
	return $str;
}

function format_decimal($str) {
	$str = ereg_replace('[^0-9.-]', '', $str);
	if(substr($str, 0, 1) == '-') {
		$str = format_positive_decimal(substr($str, 1));
		if($str !== '' && $str !== '0') {
			$str = '-' . $str;
		}
		return $str;
	} else {
		return format_positive_decimal($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, $allow_uppercase = false) {
	if(!$allow_uppercase) {
		$str = strtolower($str);
	}
	$str = ereg_replace('[^a-zA-Z0-9_.-]', '_', $str);
	return ereg_replace('^[.-]', '_', $str);
}

function client_path_to_filename($path) {
	$filename = ereg_replace(".*[:/\\]", '', $path);
	return format_filename($filename, true);
}


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);
}

function format_oneline($str) {
	$str = str_replace("\r", '', $str);
	return str_replace("\n", '', $str);
}

function format_unix($str) {
	return unix_newlines($str);
}

function format_bool($str) {
	if($str && $str !== 'No' && $str !== 'False' && $str !== 'false') {
		return 1;
	} else {
		return 0;
	}
}

function format_yesno($str) {
	if($str && $str !== 'No' && $str !== 'False' && $str !== 'false') {
		return 'Yes';
	} else {
		return 'No';
	}
}

function format_email($str) {
	# FIXME
	return trim(format_oneline($str));
}

function format_url($str) {
	# FIXME check for TLD? encode special chars?
	$str = trim(format_oneline($str));
	if($str !== '') {
		if(strpos($str, ':') === false) {
			$str = 'http://' . $str;
		}
	}
	return $str;
}

function format_money($str, $display_cents = true) {
	$str = ereg_replace('[^0-9.]', '', $str);
	if($display_cents) {
		$int = (int)($str * 100);
		$cents = $int % 100;
		$cents = sprintf('.%02d', $cents);
		$int = (int)($str); # go from the source again, so we can print numbers above 2M without cents.
	} else {
		$cents = '';
		$int = round($str);
	}
	$chars = (string)$int;
	$output = '';
	$comma = 4;
	$index = strlen($chars);
	while($index) {
		--$index;
		--$comma;
		if($comma == 0) {
			$comma = 3;
			$output = ',' . $output;
		}
		$char = substr($chars, $index, 1);
		$output = $char . $output;
	}
	$output = '$' . $output . $cents;
	return $output;
}

function format_dollars($str) {
	return format_money($str, false);
}

# date is edited as mm/dd/yyyy but stored as yyyy-mm-dd
function format_mdy_to_ymd($str) {
	require_once('code/wfpl/time.php');
	return mdy_to_ymd(format_oneline($str));
}

# date is yyyy-mm-dd
function format_ymd($str) {
	require_once('code/wfpl/time.php');
	list($year, $month, $day) = ymd_clean($str);
	return sprintf('%04u-%02u-%02u', $year, $month, $day);
}

# takes any of: HH  :MM  HH:MM
# returns decimal number of hours
#
# You probably want to use format_hours() instead because it handles hours with a decimal point.
function format_hours_minutes($str) {
	if(strlen($str) == 0) {
		return $str;
	}
	$pos = strpos($str, ':');
	if($pos === false) {
		$hours = format_int_0($str);
		$minutes = 0;
	} elseif($pos == 0) {
		$hours = 0;
		$minutes = format_int_0($str);
	} else {
		$hours = format_int_0(substr($str, 0, $pos));
		$minutes = format_int_0(substr($str, $pos + 1));
	}
	return $hours + ($minutes / 60.0);
}

# takes any of: HH  :MM  HH:MM  HH.hh(decimal hours)
# returns decimal number of hours
function format_hours($str) {
	if(strlen($str) == 0) {
		return $str;
	}
	if(strpos($str, ':') !== false) {
		return format_hours_minutes($str);
	} else {
		return format_decimal($str);
	}
}

# takes eg 12:23am
# returns decimal number of hours since midnight
function format_12hr_to_hours($str) {
	if(eregi('noon', $str)) {
		return 12;
	}
	$hours = format_hours($str);
	if($hours < 12 && eregi('p', $str)) {
		$hours += 12;
	}
	return $hours;
}


function format_phone($str) {
	$str = ereg_replace('[^0-9]', '', $str);
	$str = ereg_replace('^1*', '', $str);
	$len = strlen($str);
	$output = '';

	if($len < 10 && $len != 7) {
		#NOT A VALID PHONE NUMBER
		return $str;
	}

	if($len > 10) {
		$output = ' ext: ' . substr($str, 10);
		$len = 10;
	}

	if($len == 10) {
		$area = substr($str, 0, 3);
		$str = substr($str, 3);
	}

	$output = substr($str, 3) . $output;
	$output = substr($str, 0, 3) . '-' . $output;

	if($area) {
		$output = "($area) " . $output;
	}

	return $output;
}

?>