# This form requires wfpl. See: http://jasonwoof.org/wfpl
-if(!file_exists('code/wfpl/template.php')) { die('This form requires <a href="http://jasonwoof.org/wfpl">wfpl</a>.'); }
-require_once('code/wfpl/template.php');
+# 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/db.php'); # fixme
+require_once('code/wfpl/email.php');<!--~uploads_include {~-->
+require_once('code/wfpl/upload.php');<!--~}~-->
-function ~form_name~_get_fields() {
- $GLOBALS['~form_name~_fields'] = array();<!--~formats start~-->
+function ~file_name~_get_fields() {
+ $data = array();
+<!--~formats {~-->
+ $data['~name~'] = format_~format~($_REQUEST['~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['delete_~name~'] == 'Yes') {
+ $data['~name~'] = '';
+ } else {
+ $data['~name~'] = format_image_w_h<!--~thumb_w_h {~-->_thumb_w_h<!--~}~-->($_REQUEST['old_~name~']);
+ }
+ }<!--~}~--><!--~file_upload {~-->
+ $~name~_filename_tmp = $GLOBALS['~name~_file_name'];
+ if(!$~name~_filename_tmp) {
+ $~name~_filename_tmp = format_filename($_REQUEST['~name~']);
+ }
+ if($_FILES['~name~'] && $_FILES['~name~']['error'] == 0) {
+ $data['~name~'] = save_uploaded_file('~name~', $GLOBALS['upload_directory'] . $~name~_filename_tmp);
+ } else {
+ if($_REQUEST['delete_~name~'] == 'Yes') {
+ $data['~name~'] = '';
+ } else {
+ $data['~name~'] = format_path($_REQUEST['old_~name~']);
+ }
+ }<!--~}~-->
- $value = format_~format~($_REQUEST['~name~']);
- tem_set('~name~', $value);<!--~db_field start~-->
- $GLOBALS['~form_name~_fields'][] = $value;<!--~end~--><!--~end~-->
+ return $data;
}
-
-if(isset($_REQUEST['~always_field~'])) {
- ~form_name~_get_fields();
+<!--~opt_listing {~-->
+# You may pass a "where clause" for the db query.
+function ~file_name~_display_listing($where = 'order by ~always_field~ limit 100') {
+ $rows = db_get_assocs('~table_name~', 'id<!--~listing_fields_1 {~-->,~name~<!--~}~-->', $where);
+ if($rows == false || count($rows) == 0) {
+ tem_set('listings', array('empty_listing' => true));
+ return;
+ }
- if("you're happy with the values") {
- #db_insert('~form_name~', '~db_fields~', $GLOBALS['~form_name~_fields']); # fixme
- header('Content-type: text/plain');
- print "e-mailing this: \n\n";
- tem_output('~form_name~.email.txt');
- exit();
+ # make sure there's something clickable
+ foreach($rows as &$row) {
+ if($row['~always_field~'] == '') {
+ $row['~always_field~'] = '--';
+ }
+ }
+ tem_set('listings', array(
+ 'populated_listing' => true,
+ 'rows' => $rows));
+ return true;
+}
+<!--~}~-->
+function ~file_name~_main() {<!--~opt_pass {~-->
+ if(!logged_in_as_admin()) {
+ $_REQUEST['url'] = this_url();
+ return 'admin_login';
+ }
+<!--~}~--><!--~opt_display {~-->
+ if(isset($_REQUEST['~file_name~_id'])) {
+ return ~file_name~_display_main();
+ } else {
+ return ~file_name~_edit_main();
}
}
-tem_output('~form_name~.html');
+function ~file_name~_display_main() {
+ $id = format_int($_REQUEST['~file_name~_id']);
+ unset($_REQUEST['~file_name~_id']);
+ if(!$id) {
+ message('Error: Broken link');
+ return './~file_name~';
+ }
+ $row = db_get_assoc('~table_name~', 'id,'.~file_name upper~_DB_FIELDS, 'where id=%i', $id);
+ if(!$row) {
+ message('Error: ~singular cap~ not found');
+ return './~file_name~';
+ }
+ tem_set('display', $row);
+}
+
+function ~file_name~_edit_main() {<!--~}~--><!--~pulldowns {~-->
+ pulldown('~name~', ~pulldown_options~);
+<!--~}~--><!--~opt_db {~-->
+ $edit_id = format_int($_REQUEST['~file_name~_edit_id']);
+ unset($_REQUEST['~file_name~_edit_id']);
+ if($edit_id) {
+ # add hidden field for database id of row we're editing
+ tem_set('~file_name~_edit_id', $edit_id);
+ tem_set('editing', 'show');
+ tem_set('edit_msg', 'show');
+ }
+
+ $delete_id = format_int($_REQUEST['~file_name~_delete_id']);
+ unset($_REQUEST['~file_name~_delete_id']);
+ if($delete_id) {
+ db_delete('~table_name~', 'where id=%i', $delete_id);
+ message('~singular cap~ deleted.');
+
+ return './~file_name~';
+ }
+
+ if(!$edit_id) {<!--~opt_listing {~-->
+ if(!isset($_REQUEST['~file_name~_new']) && !isset($_REQUEST['~always_field~'])) {
+ ~file_name~_display_listing();
+ return;
+ }
+<!--~}~-->
+ tem_set('new_msg', 'show');
+ }
+<!--~}~-->
+ if(isset($_POST['~always_field~'])) {
+ $data = ~file_name~_get_fields();
+
+ if("you're happy with the POSTed values") {<!--~opt_db {~-->
+ if($edit_id) {
+ db_update_assoc('~table_name~', $data, 'where id=%i', $edit_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($_REQUEST['email']) and valid_email($_REQUEST['email'])) {
+ $reply_to = $_REQUEST['email'];
+ if($_REQUEST['name'] and ereg('^[a-zA-Z0-9_\' -]*$', $_REQUEST['name']) !== false) {
+ $reply_to = "$_REQUEST[name] <$reply_to>";
+ }
+ }
+ $subject = '~plural cap~ form submitted';
+ $email_template = new tem();
+ $email_template->load('~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) {
+ return './~file_name~'; # FIXME is this the page you want to go to after successful form submission?
+ }
+ }
+ # 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($edit_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', $edit_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('extra_headers', 'show');<!--~}~-->
+}
?>
Got questions, comments, patches, etc.? Contact Jason Woofenden