<?php

# This form requires wfpl. See: http://jasonwoof.org/wfpl

# This form was initially auto-generated. If you would like to alter the
# parameters and generate a new one try this URL:
#
# ~metaform_url~


# SETUP
~opt_email {~
# To send results by e-mail, all you have to do is set your e-mail address here:
$GLOBALS['~file_name~_form_recipient'] = 'fixme@example.com';
~}~~opt_db {~
# To save results to a database, you'll need to create the ~table_name~ table
# (the file ~file_name~.sql should help with this), and create the file
# 'code/db_connect.php' which calls db_connect() see:
# code/wfpl/examples/db_connect.php
#
# if you rename any of the database fields, you'll need to update this:

define('~file_name upper~_DB_FIELDS', '~db_fields~');
~}~~upload_settings {~
# Set this to the path to your uploads directory. It can be relative to the
# location of this script. IT MUST END WITH A SLASH
$GLOBALS['upload_directory'] = 'uploads/';
~}~~file_settings {~
$GLOBALS['~name~_file_name'] = uniqid() . getmypid() . '.txt'; # comment this out to use uploader's filename
~}~~image_settings {~
$GLOBALS['~name~_max_width'] = '400';
$GLOBALS['~name~_max_height'] = '400';~thumb_settings {~
$GLOBALS['~name~_thumb_max_width'] = '70';
$GLOBALS['~name~_thumb_max_height'] = '70';
$GLOBALS['~name~_file_name'] = uniqid() . getmypid() . '.jpg'; # comment this out to use uploader's filename
~}~~}~

require_once('code/wfpl/format.php');
require_once('code/wfpl/email.php');~uploads_include {~
require_once('code/wfpl/upload.php');~}~

function ~file_name~_get_fields() {
	$data = array();
~formats {~
	$data['~name~'] = format_~format~(_REQUEST_cut('~name~')~pulldown_format_extra {~, '~name~'~}~);~}~~image_upload {~

	if($_FILES['~name~'] && $_FILES['~name~']['error'] == 0) {
		$data['~name~'] = convert_uploaded_image('~name~', $GLOBALS['upload_directory'] . $GLOBALS['~name~_file_name'], $GLOBALS['~name~_max_width'], $GLOBALS['~name~_max_height']~thumb_upload_params {~, $GLOBALS['~name~_thumb_max_width'], $GLOBALS['~name~_thumb_max_height']~}~);
	} else {
		if(_REQUEST_cut('delete_~name~') == 'Yes') {
			$data['~name~'] = '';
		} else {
			$data['~name~'] = format_image_w_h~thumb_w_h {~_thumb_w_h~}~(_REQUEST_cut('old_~name~'));
		}
	}
	unset($_FILES['~name~']);~}~~file_upload {~

	$~name~_filename_tmp = $GLOBALS['~name~_file_name'];
	if(!$~name~_filename_tmp) {
		$~name~_filename_tmp = format_filename(_REQUEST_cut('~name~'));
	}
	if($_FILES['~name~'] && $_FILES['~name~']['error'] == 0) {
		$data['~name~'] = save_uploaded_file('~name~', $GLOBALS['upload_directory'] . $~name~_filename_tmp);
	} else {
		if(_REQUEST_cut('delete_~name~') == 'Yes') {
			$data['~name~'] = '';
		} else {
			$data['~name~'] = format_path(_REQUEST_cut('old_~name~'));
		}
	}
	unset($_FILES['~name~']);~}~

	return $data;
}~opt_public_something {~


function ~public_file_name~_main() {~opt_public_display {~
	$id = _REQUEST_cut('id');
	if($id) {
		return ~file_name~_main_display($id);~opt_public_form unset {~
	} else {
		message("Error: Broken Link (~singular cap~ #$id not found)");
		return './'; # FIXME where should this go?~}~
	}~}~~opt_public_form {~
	return ~file_name~_main_form();~}~
}~}~


function ~file_name~_main() {~opt_pass {~
	if(logged_in_as_admin()) {
		tem_set('admin_privs');
	} else {
		$_REQUEST['url'] = this_url();
		return 'admin_login';
	}
~}~~opt_db {~
	$id = _REQUEST_cut('edit_id');
	if($id) {
		return ~file_name~_main_form($id);
	}

	$id = _REQUEST_cut('~file_name~_delete_id');
	if($id) {
		return ~file_name~_main_delete($id);
	}

	if(_REQUEST_cut('new')) {
		return ~file_name~_main_form();
	}
~}~~opt_listing {~
	if(_REQUEST_cut('list')) {
		return ~file_name~_main_listing();
	}
~}~~opt_display {~
	$id = _REQUEST_cut('id');
	if($id) {
		return ~file_name~_main_display($id);
	}
~}~~opt_listing {~
	if(isset($_POST['~always_field~'])) {
		return ~file_name~_main_form();
	}

	# default action:
	return ~file_name~_main_listing();~}~~opt_listing unset {~
	return ~file_name~_main_form();~}~
}~opt_display {~

function ~file_name~_main_display($id) {
	$data = db_get_assoc('~table_name~', 'id,'.~file_name upper~_DB_FIELDS, 'where id=%i', $id);
	if(!$data) {
		message("Error: Broken Link (~singular cap~ #$id not found)");~opt_public_something {~
		return './' . $GLOBALS['wfpl_basename'];~}~~opt_public_something unset {~
		return './~file_name~';~}~
	}
	tem_set('display', $data);
}~}~~opt_db {~

function ~file_name~_main_delete($id) {
	db_delete('~table_name~', 'where id=%i', $id);
	message('~singular cap~ deleted.');
	return './~file_name~';
}~}~~opt_listing {~

function ~file_name~_main_listing() {
	$listing_rows = db_get_assocs('~table_name~', 'id~listing_fields_1 {~,~name~~}~', 'order by ~always_field~ limit 100');
	tem_set('listings', $listing_rows);
}~}~

function ~file_name~_main_form($id = false) {~pulldowns {~
	pulldown('~name~', ~pulldown_options~);~}~~has_pulldowns {~
~}~~opt_db {~
	if($id) {
		# add hidden field for database id of row we're editing
		tem_set('id', $id);
		tem_set('editing');
		tem_set('edit_msg');
	} else {
		tem_set('new_msg');
	}
~}~
	if(isset($_POST['~always_field~'])) {
		$data = ~file_name~_get_fields();

		if("you're happy with the POSTed values") {~opt_db {~
			if($id) {
				db_update_assoc('~table_name~', $data, 'where id=%i', $id);
				message('~singular cap~ updated.');
			} else {
				db_insert_assoc('~table_name~', $data);
				message('~singular cap~ saved.');
			}~}~~opt_email {~
			if($GLOBALS['~file_name~_form_recipient'] != 'fixme@example.com') {
				$to = $GLOBALS['~file_name~_form_recipient'];
				$from = 'noreply@~this_domain~';
				$reply_to = $to;
				if(isset($data['email']) and valid_email($data['email'])) {
					$reply_to = $data['email'];
					if($data['name'] and ereg('^[a-zA-Z0-9_\' -]*$', $data['name']) !== false) {
						$reply_to = "$data[name] <$reply_to>";
					}
				}
				$subject = '~plural cap~ form submitted';
				$email_template = new tem();
				$email_template->load('~public_file_name~.email.txt');
				$email_template->sets($data);
				$message = $email_template->run();
				$cc = '';
				$bcc = '';
				if(email($from, $to, $subject, $message, $reply_to, $cc, $bcc)) {
					message('Due to an internal error, your message could not be sent. Please try again later.');
					$error = true;
				} else {
					message('Message sent');
				}
			}~}~
			if($error !== true) {~opt_public_something {~
				if($GLOBALS['wfpl_basename'] == '~file_name~') {
					return './~file_name~';
				} else {
					# FIXME create this page or change this to go elsewhere
					return './~public_file_name~_thanks';
				}~}~~opt_public_something unset {~~opt_db unset {~
				# FIXME create this page or change this to go elsewhere~}~
				return './~file_name~~opt_db unset {~_thanks~}~';~}~
			}
		}
		# otherwise, we display the form again. ~file_name~_get_fields() has
		# already put the posted values back into the template engine, so they will
		# show up in the form fields. You should add some message asking people to
		# fix their entry in whatever way you require.~opt_db {~
	} elseif($id) {
		# we've recieved an edit id, but no data. So we grab the values to be edited from the database
		$data = db_get_assoc('~table_name~', ~file_name upper~_DB_FIELDS, 'where id=%i', $id);~}~
	} else {
		# form not submitted, you can set default values like so:
		#$data = array('~always_field~' => 'Yes');
		$data = array();
	}~upload_max {~

	tem_set('upload_max_filesize', upload_max_filesize());~}~

	tem_set('form', $data);~show_extra_headers {~
	tem_set('$head');~}~
}