+require_once(__DIR__.'/'.'inc/wfpl/format.php');~opt_email {~
+require_once(__DIR__.'/'.'inc/wfpl/email.php');~}~~uploads_include {~
+require_once(__DIR__.'/'.'inc/wfpl/upload.php');~}~
+
+$GLOBALS['~file_name~_field_to_caption'] = array(~name_to_caption {~
+ '~name~' => '~caption phpsq~'~ sep {~,~}~~}~
+);
+
+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 (_REQUEST_cut('download_csv')) {
+ return ~file_name~_csv_download();
+ }
+
+ 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~_csv_download() {
+ require_once(__DIR__.'/'.'inc/wfpl/csv.php');
+ $rows = db_get_rows('~table_name~', 'id,'.~file_name upper~_DB_FIELDS, 'order by id');
+ $fields = explode(',', 'id,'.~file_name upper~_DB_FIELDS);
+ $header = array();
+ foreach ($fields as $field) {
+ if (isset($GLOBALS['~file_name~_field_to_caption'][$field])) {
+ $header[] = $GLOBALS['~file_name~_field_to_caption'][$field];
+ } else {
+ $header[] = $field;
+ }
+ }
+ array_unshift($rows, $header);
+ array2d_to_csv_download($rows, '~file_name~.csv');