/**
* Get the tempcode for the form to add a banner, with the information passed along to it via the parameters already added in.
*
* @param boolean Whether to simplify the banner interface (for the point-store buy process)
* @param ID_TEXT The name of the banner
* @param URLPATH The URL to the banner image
* @param URLPATH The URL to the site the banner leads to
* @param SHORT_TEXT The caption of the banner
* @param LONG_TEXT Any notes associated with the banner
* @param integer The banners "importance modulus"
* @range 1 max
* @param ?integer The number of hits the banner may have (NULL: not applicable for this banner type)
* @range 0 max
* @param SHORT_INTEGER The type of banner (0=permanent, 1=campaign, 2=default)
* @set 0 1 2
* @param ?TIME The banner expiry date (NULL: never expires)
* @param ?ID_TEXT The username of the banners submitter (NULL: current member)
* @param BINARY Whether the banner has been validated
* @param ID_TEXT The banner type (can be anything, where blank means 'normal')
* @param SHORT_TEXT The title text for the banner (only used for text banners, and functions as the 'trigger text' if the banner type is shown inline)
* @return tempcode The input field tempcode
*/
function get_banner_form_fields($simplified = false, $name = '', $image_url = '', $site_url = '', $caption = '', $notes = '', $importancemodulus = 3, $campaignremaining = 50, $the_type = 1, $expiry_date = NULL, $submitter = NULL, $validated = 1, $b_type = '', $title_text = '')
{
require_code('images');
$fields = new ocp_tempcode();
require_code('form_templates');
$fields->attach(form_input_codename(do_lang_tempcode('CODENAME'), do_lang_tempcode('DESCRIPTION_BANNER_NAME'), 'name', $name, true));
$fields->attach(form_input_line(do_lang_tempcode('DESTINATION_URL'), do_lang_tempcode('DESCRIPTION_BANNER_URL'), 'site_url', $site_url, false));
// Blank implies iframe
if (!$simplified) {
$types = nice_get_banner_types($b_type);
if ($types->is_empty()) {
warn_exit(do_lang_tempcode('NO_CATEGORIES'));
}
$fields->attach(form_input_list(do_lang_tempcode('_BANNER_TYPE'), do_lang_tempcode('_DESCRIPTION_BANNER_TYPE'), 'b_type', $types, NULL, false, false));
} else {
$fields->attach(form_input_hidden('b_type', $b_type));
}
if (has_specific_permission(get_member(), 'full_banner_setup')) {
$fields->attach(form_input_username(do_lang_tempcode('OWNER'), do_lang_tempcode('DESCRIPTION_SUBMITTER'), 'submitter', is_null($submitter) ? $GLOBALS['FORUM_DRIVER']->get_username(get_member()) : $submitter, false));
}
if (get_value('disable_staff_notes') !== '1') {
$fields->attach(form_input_text(do_lang_tempcode('NOTES'), do_lang_tempcode('DESCRIPTION_NOTES'), 'notes', $notes, false));
}
if (has_specific_permission(get_member(), 'bypass_validation_midrange_content', 'cms_banners')) {
if ($validated == 0) {
$validated = get_param_integer('validated', 0);
if ($validated == 1) {
attach_message(do_lang_tempcode('WILL_BE_VALIDATED_WHEN_SAVING'));
}
}
if (addon_installed('unvalidated')) {
$fields->attach(form_input_tick(do_lang_tempcode('VALIDATED'), do_lang_tempcode('DESCRIPTION_VALIDATED'), 'validated', $validated == 1));
}
}
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('TITLE' => do_lang_tempcode('SOURCE_MEDIA'))));
$fields->attach(form_input_upload(do_lang_tempcode('UPLOAD'), do_lang_tempcode('DESCRIPTION_UPLOAD_BANNER'), 'file', false, NULL, NULL, true, str_replace(' ', '', get_option('valid_images') . ',swf')));
$fields->attach(form_input_line(do_lang_tempcode('ALT_FIELD', do_lang_tempcode('IMAGE_URL')), do_lang_tempcode('DESCRIPTION_URL_BANNER'), 'image_url', $image_url, false));
$fields->attach(form_input_line_comcode(do_lang_tempcode('BANNER_TITLE_TEXT'), do_lang_tempcode('DESCRIPTION_BANNER_TITLE_TEXT'), 'title_text', $title_text, false));
$fields->attach(form_input_line_comcode(do_lang_tempcode('DESCRIPTION'), do_lang_tempcode('DESCRIPTION_BANNER_DESCRIPTION'), 'caption', $caption, false));
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('TITLE' => do_lang_tempcode('DEPLOYMENT_DETERMINATION'))));
if (has_specific_permission(get_member(), 'full_banner_setup')) {
$radios = new ocp_tempcode();
$radios->attach(form_input_radio_entry('the_type', strval(BANNER_PERMANENT), $the_type == BANNER_PERMANENT, do_lang_tempcode('BANNER_PERMANENT')));
$radios->attach(form_input_radio_entry('the_type', strval(BANNER_CAMPAIGN), $the_type == BANNER_CAMPAIGN, do_lang_tempcode('BANNER_CAMPAIGN')));
$radios->attach(form_input_radio_entry('the_type', strval(BANNER_DEFAULT), $the_type == BANNER_DEFAULT, do_lang_tempcode('BANNER_DEFAULT')));
$fields->attach(form_input_radio(do_lang_tempcode('DEPLOYMENT_AGREEMENT'), do_lang_tempcode('DESCRIPTION_BANNER_TYPE'), 'the_type', $radios));
$fields->attach(form_input_integer(do_lang_tempcode('HITS_ALLOCATED'), do_lang_tempcode('DESCRIPTION_HITS_ALLOCATED'), 'campaignremaining', $campaignremaining, false));
$total_importance = $GLOBALS['SITE_DB']->query_value_null_ok_full('SELECT SUM(importance_modulus) FROM ' . get_table_prefix() . 'banners WHERE ' . db_string_not_equal_to('name', $name));
if (is_null($total_importance)) {
$total_importance = 0;
}
$fields->attach(form_input_integer(do_lang_tempcode('IMPORTANCE_MODULUS'), do_lang_tempcode('DESCRIPTION_IMPORTANCE_MODULUS', strval($total_importance), strval($importancemodulus)), 'importancemodulus', $importancemodulus, true));
}
$fields->attach(form_input_date(do_lang_tempcode('EXPIRY_DATE'), do_lang_tempcode('DESCRIPTION_EXPIRY_DATE'), 'expiry_date', true, is_null($expiry_date), true, $expiry_date, 2));
return $fields;
}
/**
* The UI to send a newsletter.
*
* @param LONG_TEXT Default newsletter to put in
* @return tempcode The UI
*/
function send_gui($_existing = '')
{
// If this is a periodic newsletter, we make some changes to the regular
// language strings.
$periodic_action_raw = post_param('periodic_choice', '');
$periodic_subject = '';
$defaults = mixed();
switch (preg_replace('#\\_\\d+$#', '', $periodic_action_raw)) {
case 'remove_existing':
// Remove whatever is already set. We don't need any changes for
// this, but we do need a hidden form field.
$periodic_action = 'remove';
break;
case 'replace_existing':
// Make the current newsletter periodic. This requires language
// fiddling.
$periodic_action = 'replace';
$periodic_subject = do_lang('PERIODIC_SUBJECT_HELP');
$periodic_id = intval(preg_replace('#^[^\\d]+#', '', $periodic_action_raw));
$_defaults = $GLOBALS['SITE_DB']->query_select('newsletter_periodic', array('*'), array('id' => $periodic_id), '', 1);
if (!array_key_exists(0, $_defaults)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$defaults = $_defaults[0];
break;
case 'make_periodic':
// Make the current newsletter periodic. This requires language
// fiddling.
$periodic_action = 'make';
$periodic_subject = do_lang('PERIODIC_SUBJECT_HELP');
break;
case 'no_change':
default:
// The default action is to leave the current settings as-is.
$periodic_action = 'none';
break;
}
$title = get_page_title('NEWSLETTER_SEND');
$lang = choose_language($title);
if (is_object($lang)) {
return $lang;
}
$comcode_given = $_existing != '' && strpos($_existing, '<html') !== false;
$_existing = post_param('message', $_existing);
if ($_existing == '') {
$from_news = get_param_integer('from_news', -1);
if ($from_news != -1 && addon_installed('news')) {
$rows = $GLOBALS['SITE_DB']->query_select('news', array('*'), array('id' => $from_news), 'ORDER BY id DESC', 1);
if (!array_key_exists(0, $rows)) {
require_lang('news');
return warn_screen(get_page_title('NEWS'), do_lang_tempcode('MISSING_RESOURCE'));
}
$myrow = $rows[0];
$_existing = get_translated_text($myrow['news_article'], NULL, $lang);
if ($_existing == '') {
$_existing = get_translated_text($myrow['news'], NULL, $lang);
}
}
$existing = do_template('NEWSLETTER_DEFAULT', array('_GUID' => '53c02947915806e519fe14c318813f42', 'CONTENT' => $_existing, 'LANG' => $lang));
} else {
$default = do_template('NEWSLETTER_DEFAULT', array('_GUID' => '53c02947915806e519fe14c318813f44', 'CONTENT' => $_existing, 'LANG' => $lang));
if (strpos($default->evaluate(), '<html') !== false) {
if ($comcode_given) {
$default = do_template('NEWSLETTER_DEFAULT', array('_GUID' => '53c02947915806e519fe14c318813f46', 'CONTENT' => comcode_to_tempcode($_existing), 'LANG' => $lang));
}
$existing = $default;
} else {
$existing = make_string_tempcode($_existing);
}
}
$post_url = build_url(array('page' => '_SELF', 'type' => 'confirm', 'old_type' => get_param('type', '')), '_SELF');
$submit_name = do_lang_tempcode('PREVIEW');
$hidden = new ocp_tempcode();
$hidden->attach(form_input_hidden('lang', $lang));
// Build up form
$fields = new ocp_tempcode();
require_code('form_templates');
$default_subject = get_option('newsletter_title');
if (!is_null($defaults)) {
$default_subject = $defaults['np_subject'];
}
if ($periodic_action != 'make' && $periodic_action != 'replace') {
$default_subject .= ' - ' . get_timezoned_date(time(), false, false, false, true);
}
$default_subject = post_param('subject', $default_subject);
$fields->attach(form_input_line_comcode(do_lang_tempcode('SUBJECT'), do_lang_tempcode('NEWSLETTER_DESCRIPTION_TITLE', $periodic_subject), 'subject', $default_subject, true));
$in_full = post_param_integer('in_full', 0);
$chosen_categories = post_param('chosen_categories', '');
if ($periodic_action == 'make' || $periodic_action == 'replace') {
// We are making a periodic newsletter. This means we need to pass
// through the chosen categories
if (!is_null($defaults)) {
$chosen_categories = $defaults['np_message'];
$in_full = $defaults['np_in_full'];
$fields->attach(form_input_tick(do_lang_tempcode('EMBED_FULL_ARTICLES'), do_lang_tempcode('DESCRIPTION_EMBED_FULL_ARTICLES'), 'in_full', $in_full == 1));
$fields->attach(form_input_huge(do_lang_tempcode('NEWSLETTER_CONTENT'), do_lang('NEWSLETTER_CONTENT_SELECT'), 'chosen_categories', $chosen_categories, true));
} else {
$hidden->attach(form_input_hidden('chosen_categories', $chosen_categories));
$hidden->attach(form_input_hidden('in_full', strval($in_full)));
}
$hidden->attach(form_input_hidden('cutoff_day', post_param('cutoff_day')));
$hidden->attach(form_input_hidden('cutoff_month', post_param('cutoff_month')));
$hidden->attach(form_input_hidden('cutoff_year', post_param('cutoff_year')));
$hidden->attach(form_input_hidden('cutoff_hour', post_param('cutoff_hour')));
$hidden->attach(form_input_hidden('cutoff_minute', post_param('cutoff_minute')));
$hidden->attach(form_input_hidden('message', $existing->evaluate()));
} else {
$hidden->attach(form_input_hidden('in_full', strval($in_full)));
if (strpos($existing->evaluate(), '<html') === false) {
$fields->attach(form_input_huge_comcode(do_lang_tempcode('MESSAGE'), do_lang_tempcode('DESCRIPTION_MESSAGE_NEWSLETTER'), 'message', $existing->evaluate(), true));
} else {
$fields->attach(form_input_huge(do_lang_tempcode('MESSAGE'), do_lang_tempcode('DESCRIPTION_MESSAGE_NEWSLETTER'), 'message', $existing->evaluate(), true));
}
}
if (addon_installed('calendar') && $periodic_action == 'none' && cron_installed()) {
$fields->attach(form_input_date__scheduler(do_lang_tempcode('DEFER_TIME'), do_lang_tempcode('DESCRIPTION_DEFER_TIME'), 'schedule', true, true, true));
}
$from_email = post_param('from_email', get_option('staff_address'));
if (!is_null($defaults)) {
$from_email = post_param('from_email', $defaults['np_from_email']);
}
$fields->attach(form_input_email(do_lang_tempcode('FROM_EMAIL'), do_lang_tempcode('DESCRIPTION_NEWSLETTER_FROM_EMAIL'), 'from_email', $from_email, true));
$from_name = post_param('from_name', get_site_name());
if (!is_null($defaults)) {
$from_name = post_param('from_name', $defaults['np_from_name']);
}
$fields->attach(form_input_line(do_lang_tempcode('FROM_NAME'), do_lang_tempcode('DESCRIPTION_NEWSLETTER_FROM_NAME'), 'from_name', $from_name, true));
$_html_only = post_param_integer('html_only', NULL);
if (is_null($_html_only)) {
$html_only = strpos($existing->evaluate(), '<html') !== false;
if (!is_null($defaults)) {
$html_only = $defaults['np_html_only'];
}
} else {
$html_only = $_html_only == 1;
}
if (get_value('force_html_only') === '1') {
$hidden->attach(form_input_hidden('html_only', '1'));
} else {
$fields->attach(form_input_tick(do_lang_tempcode('HTML_ONLY'), do_lang_tempcode('DESCRIPTION_HTML_ONLY'), 'html_only', $html_only));
}
$l = new ocp_tempcode();
$priority = post_param_integer('priority', 3);
if (!is_null($defaults)) {
$priority = post_param_integer('priority', $defaults['np_priority']);
}
for ($i = 1; $i <= 5; $i++) {
$l->attach(form_input_list_entry(strval($i), $i == $priority, do_lang_tempcode('PRIORITY_' . strval($i))));
}
$fields->attach(form_input_list(do_lang_tempcode('PRIORITY'), do_lang_tempcode('DESCRIPTION_NEWSLETTER_PRIORITY'), 'priority', $l));
// Where to send to
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('TITLE' => do_lang_tempcode('CHOOSE_SEND_TO'))));
$newsletters = $GLOBALS['SITE_DB']->query_select('newsletters', array('*'));
foreach ($newsletters as $newsletter) {
$level = post_param_integer(strval($newsletter['id']), post_param_integer('level', -1));
$c4 = $this->count_level($newsletter['id'], 4, $lang);
$c3 = $this->count_level($newsletter['id'], 3, $lang);
$c2 = $this->count_level($newsletter['id'], 2, $lang);
$c1 = $this->count_level($newsletter['id'], 1, $lang);
if ($c1 != 0) {
$newsletter_title = get_translated_text($newsletter['title']);
$newsletter_description = get_translated_text($newsletter['description']);
if ($c1 == $c2 && $c1 == $c3 && $c1 == $c4) {
$fields->attach(form_input_tick(do_lang_tempcode('NEWSLETTER_PREFIX', escape_html($newsletter_title)), do_lang_tempcode('DESCRIPTION_NOSUBSCRIPTION_LEVEL', escape_html(integer_format($c4)), escape_html($newsletter_description)), strval($newsletter['id']), $level >= 1, NULL, '4'));
} else {
$l = new ocp_tempcode();
$l->attach(form_input_list_entry('0', $level == 0, do_lang_tempcode('NNR', do_lang_tempcode('NEWSLETTER_0_ALT'), do_lang_tempcode('NUM_READERS', integer_format(0)))));
$l->attach(form_input_list_entry('1', $level == 1, do_lang_tempcode('NNR', do_lang_tempcode('NEWSLETTER_1'), do_lang_tempcode('NUM_READERS', integer_format($c1)))));
$l->attach(form_input_list_entry('2', $level == 2, do_lang_tempcode('NNR', do_lang_tempcode('NEWSLETTER_2'), do_lang_tempcode('NUM_READERS', integer_format($c2)))));
$l->attach(form_input_list_entry('3', $level == 3, do_lang_tempcode('NNR', do_lang_tempcode('NEWSLETTER_3'), do_lang_tempcode('NUM_READERS', integer_format($c3)))));
$l->attach(form_input_list_entry('4', $level == 4, do_lang_tempcode('NNR', do_lang_tempcode('NEWSLETTER_4'), do_lang_tempcode('NUM_READERS', integer_format($c4)))));
$fields->attach(form_input_list(do_lang_tempcode('SUBSCRIPTION_LEVEL_FOR', escape_html($newsletter_title)), do_lang_tempcode('DESCRIPTION_SUBSCRIPTION_LEVEL', escape_html($newsletter_description)), strval($newsletter['id']), $l));
}
}
}
if (get_forum_type() == 'ocf') {
$c5 = $this->count_level(-1, 5, $lang);
$fields->attach(form_input_tick(do_lang_tempcode('NEWSLETTER_OCF'), do_lang_tempcode('NUM_READERS', integer_format($c5)), '-1', false));
$groups = $GLOBALS['FORUM_DRIVER']->get_usergroup_list();
foreach ($groups as $group_id => $group) {
if ($group_id != db_get_first_id()) {
$map = array();
$map['g' . strval($group_id)] = 1;
$_c = newsletter_who_send_to($map, $lang, 0, 0);
$c6 = $_c[6]['g' . strval($group_id)];
if ($c6 != 0) {
$fields->attach(form_input_tick(do_lang_tempcode('THIS_WITH', do_lang_tempcode('GROUP'), make_string_tempcode(escape_html($group))), do_lang_tempcode('NUM_READERS', integer_format($c6)), 'g' . strval($group_id), post_param_integer('g' . strval($group_id), 0) == 1));
}
}
}
}
$fields->attach(form_input_upload(do_lang_tempcode('UPLOAD'), do_lang_tempcode('DESCRIPTION_UPLOAD_CSV'), 'file', false, NULL, NULL, true, 'csv,txt'));
//if ($fields->is_empty()) inform_exit(do_lang_tempcode('NOBODY_TO_SEND_TO'));
handle_max_file_size($hidden);
$template_choices = new ocp_tempcode();
$dh = opendir(get_custom_file_base() . '/themes/default/templates_custom');
while (($f = readdir($dh)) !== false) {
if (preg_match('#^MAIL.*\\.tpl$#', $f) != 0) {
$tpl = basename($f, '.tpl');
$template_choices->attach(form_input_list_entry($tpl, post_param('template', 'MAIL') == $tpl, $tpl));
}
}
if (!file_exists(get_custom_file_base() . '/themes/default/templates_custom/MAIL.tpl')) {
$template_choices->attach(form_input_list_entry('MAIL', true, 'MAIL'));
}
closedir($dh);
$fields->attach(form_input_list(do_lang_tempcode('NEWSLETTER_TEMPLATE'), do_lang_tempcode('DESCRIPTION_NEWSLETTER_TEMPLATE'), 'template', $template_choices, NULL, false, true));
// If we're making a periodic newsletter then we need to know when it
// should be sent
if ($periodic_action == 'make' || $periodic_action == 'replace') {
$hidden->attach(form_input_hidden('make_periodic', '1'));
$hidden->attach(form_input_hidden('periodic_choice', post_param('periodic_choice')));
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('TITLE' => do_lang('PERIODIC_WHEN'), 'HELP' => do_lang('PERIODIC_WHEN_HELP'))));
// The choices are given as radio buttons: weekly or bi-weekly or monthly?
// In the labels for these radio buttons, we put a dropdown for day of
// the week and day of the month.
$frequency = post_param('periodic_when', 'weekly');
if (!is_null($defaults)) {
$frequency = post_param('periodic_when', $defaults['np_frequency']);
}
$current_day_weekly = post_param_integer('periodic_weekly', 5);
if (!is_null($defaults)) {
$current_day_weekly = post_param_integer('periodic_weekly', $defaults['np_day']);
}
$current_day_biweekly = post_param_integer('periodic_biweekly', 5);
if (!is_null($defaults)) {
$current_day_biweekly = post_param_integer('periodic_biweekly', $defaults['np_day']);
}
$current_day_of_month = post_param_integer('periodic_monthly', 1);
if (!is_null($defaults)) {
$current_day_of_month = post_param_integer('periodic_monthly', $defaults['np_day']);
}
$radios = new ocp_tempcode();
$week_days_weekly = new ocp_tempcode();
$week_days_biweekly = new ocp_tempcode();
require_lang('dates');
$week_days = array(1 => do_lang('MONDAY'), 2 => do_lang('TUESDAY'), 3 => do_lang('WEDNESDAY'), 4 => do_lang('THURSDAY'), 5 => do_lang('FRIDAY'), 6 => do_lang('SATURDAY'), 7 => do_lang('SUNDAY'));
foreach ($week_days as $i => $this_day) {
$week_days_weekly->attach(form_input_list_entry(strval($i), $i == $current_day_weekly, $this_day, false, false));
$week_days_biweekly->attach(form_input_list_entry(strval($i), $i == $current_day_biweekly, $this_day, false, false));
}
$weekly_desc = new ocp_tempcode();
$weekly_desc->attach(do_lang('PERIODIC_WEEKLY_ON'));
$weekly_desc->attach(do_template('FORM_SCREEN_INPUT_LIST', array('TABINDEX' => strval(get_form_field_tabindex(NULL)), 'REQUIRED' => '0', 'NAME' => 'periodic_weekday_weekly', 'CONTENT' => $week_days_weekly, 'INLINE_LIST' => '0')));
$radios->attach(form_input_radio_entry('periodic_when', 'weekly', $frequency == 'weekly', $weekly_desc, NULL, ''));
$weekly_desc = new ocp_tempcode();
$weekly_desc->attach(do_lang('PERIODIC_BIWEEKLY_ON'));
$weekly_desc->attach(do_template('FORM_SCREEN_INPUT_LIST', array('TABINDEX' => strval(get_form_field_tabindex(NULL)), 'REQUIRED' => '0', 'NAME' => 'periodic_weekday_biweekly', 'CONTENT' => $week_days_biweekly, 'INLINE_LIST' => '0')));
$radios->attach(form_input_radio_entry('periodic_when', 'biweekly', $frequency == 'biweekly', $weekly_desc, NULL, ''));
$month_days = new ocp_tempcode();
foreach (range(1, 28) as $this_day) {
$suffix = gmdate('S', gmmktime(0, 0, 0, 1, $this_day, 1990));
$month_days->attach(form_input_list_entry(strval($this_day), $this_day == 1, strval($this_day) . $suffix, $current_day_of_month == $this_day));
}
$monthly_desc = new ocp_tempcode();
$monthly_desc->attach(do_lang('PERIODIC_MONTHLY_ON'));
$monthly_desc->attach(do_template('FORM_SCREEN_INPUT_LIST', array('TABINDEX' => strval(get_form_field_tabindex(NULL)), 'REQUIRED' => '0', 'NAME' => 'periodic_monthly', 'CONTENT' => $month_days, 'INLINE_LIST' => '0')));
$radios->attach(form_input_radio_entry('periodic_when', 'monthly', $frequency == 'monthly', $monthly_desc, NULL, ''));
$fields->attach(form_input_radio(do_lang('PERIODIC_WHEN_CHOICE'), '', 'periodic_when', $radios, true));
$radios = new ocp_tempcode();
$radios->attach(form_input_radio_entry('periodic_for', 'all', false, do_lang_tempcode('CREATE_PERIODIC_FOR_ALL'), NULL, ''));
$radios->attach(form_input_radio_entry('periodic_for', 'future', true, do_lang_tempcode('CREATE_PERIODIC_FOR_FUTURE'), NULL, ''));
$fields->attach(form_input_radio(do_lang('CREATE_PERIODIC_FOR'), '', 'periodic_for', $radios, true));
}
return do_template('FORM_SCREEN', array('_GUID' => '0b2a4825ec586d9ff557026d9a1e0cca', 'TITLE' => $title, 'TEXT' => $periodic_action == 'make' || $periodic_action == 'replace' ? do_lang_tempcode('PERIODIC_NO_EDIT') : do_lang_tempcode('NEWSLETTER_SEND_TEXT'), 'HIDDEN' => $hidden, 'FIELDS' => $fields->evaluate(), 'SUBMIT_NAME' => $submit_name, 'URL' => $post_url));
}
/**
* The UI to clear statistics.
*
* @return tempcode The UI
*/
function clear()
{
//Someone obviously wants to clear out all their statistics
//Let's give them the option of only clearing out stored graphs, or deleting everything
$title = get_page_title('CLEAR_STATISTICS');
require_code('form_templates');
$controls = new ocp_tempcode();
$controls->attach(form_input_radio_entry('clear', 'some', true, do_lang_tempcode('DESCRIPTION_CLEAR_GRAPHS')));
$controls->attach(form_input_radio_entry('clear', 'all', false, do_lang_tempcode('DESCRIPTION_CLEAR_ALL')));
$fields = form_input_radio(do_lang_tempcode('CLEAR_STATISTICS'), '', 'clear', $controls);
breadcrumb_set_parents(array(array('_SELF:_SELF:misc', do_lang_tempcode('SITE_STATISTICS'))));
return do_template('FORM_SCREEN', array('_GUID' => '82f3410d45e4d9ea53b2c033792a3207', 'SKIP_VALIDATION' => true, 'TITLE' => $title, 'SUBMIT_NAME' => do_lang_tempcode('CLEAR_STATISTICS'), 'TEXT' => paragraph(do_lang_tempcode('DESCRIPTION_CLEAR_STATISTICS')), 'URL' => build_url(array('page' => '_SELF', 'type' => '_clear'), '_SELF'), 'HIDDEN' => '', 'FIELDS' => $fields));
}
/**
* Get tempcode for adding/editing form.
*
* @param SHORT_TEXT The name of the multi moderation
* @param LONG_TEXT The text to place as a post in the topic when the multi moderation is performed
* @param ?AUTO_LINK Move the topic to this forum (NULL: don't move)
* @param ?BINARY What to change the pin state to (NULL: don't change)
* @param ?BINARY What to change the open state to (NULL: don't change)
* @param ?BINARY What to change the sink state to (NULL: don't change)
* @param SHORT_TEXT The forum multicode identifying where the multimoderation is applicable
* @param SHORT_TEXT The title suffix
* @return tempcode The input fields
*/
function get_form_fields($name = '', $post_text = '', $move_to = NULL, $pin_state = NULL, $open_state = NULL, $sink_state = NULL, $forum_multi_code = '*', $title_suffix = '')
{
require_code('ocf_forums2');
$fields = new ocp_tempcode();
$fields->attach(form_input_line(do_lang_tempcode('NAME'), do_lang_tempcode('DESCRIPTION_NAME'), 'name', $name, true));
$fields->attach(form_input_text_comcode(do_lang_tempcode('_POST'), do_lang_tempcode('DESCRIPTION_MULTI_MODERATION_POST'), 'post_text', $post_text, false));
$fields->attach(form_input_tree_list(do_lang_tempcode('DESTINATION'), do_lang_tempcode('DESCRIPTION_DESTINATION_FORUM'), 'move_to', NULL, 'choose_forum', array(), false, is_null($move_to) ? NULL : strval($move_to)));
$pin_state_list = new ocp_tempcode();
$pin_state_list->attach(form_input_radio_entry('pin_state', '-1', is_null($pin_state), do_lang_tempcode('NA_EM')));
$pin_state_list->attach(form_input_radio_entry('pin_state', '0', $pin_state === 0, do_lang_tempcode('UNPIN_TOPIC')));
$pin_state_list->attach(form_input_radio_entry('pin_state', '1', $pin_state === 1, do_lang_tempcode('PIN_TOPIC')));
$fields->attach(form_input_radio(do_lang_tempcode('PIN_STATE'), do_lang_tempcode('DESCRIPTION_PIN_STATE'), 'pin_state', $pin_state_list));
$open_state_list = new ocp_tempcode();
$open_state_list->attach(form_input_radio_entry('open_state', '-1', is_null($open_state), do_lang_tempcode('NA_EM')));
$open_state_list->attach(form_input_radio_entry('open_state', '0', $open_state === 0, do_lang_tempcode('CLOSE_TOPIC')));
$open_state_list->attach(form_input_radio_entry('open_state', '1', $open_state === 1, do_lang_tempcode('OPEN_TOPIC')));
$fields->attach(form_input_radio(do_lang_tempcode('OPEN_STATE'), do_lang_tempcode('DESCRIPTION_OPEN_STATE'), 'open_state', $open_state_list));
$sink_state_list = new ocp_tempcode();
$sink_state_list->attach(form_input_radio_entry('sink_state', '-1', is_null($sink_state), do_lang_tempcode('NA_EM')));
$sink_state_list->attach(form_input_radio_entry('sink_state', '0', $sink_state === 0, do_lang_tempcode('SINK_TOPIC')));
$sink_state_list->attach(form_input_radio_entry('sink_state', '1', $sink_state === 1, do_lang_tempcode('UNSINK_TOPIC')));
$fields->attach(form_input_radio(do_lang_tempcode('SINK_STATE'), do_lang_tempcode('DESCRIPTION_SINK_STATE'), 'sink_state', $sink_state_list));
$fields->attach(ocf_get_forum_multi_code_field($forum_multi_code));
$fields->attach(form_input_line(do_lang_tempcode('TITLE_SUFFIX'), do_lang_tempcode('DESCRIPTION_TITLE_SUFFIX'), 'title_suffix', $title_suffix, false));
return $fields;
}
/**
* Get tempcode for a catalogue field adding/editing form (many of these are put together to add/edit a single catalogue!).
*
* @param boolean Whether this is the first field of the entry fields
* @param integer The number of fields that will be on the screen
* @param string The prefix the field input fields are given (e.g. new1_)
* @param integer The order of the field relative to the other fields
* @param SHORT_TEXT The name of the field
* @param LONG_TEXT Description for the field
* @param ID_TEXT The field type
* @param BINARY Whether the field defines entry ordering
* @param BINARY Whether the field is searchable
* @param BINARY Whether the field is visible when an entry is viewed
* @param SHORT_TEXT Default value for the field
* @param BINARY Whether the field is required
* @param BINARY Whether the field is to be shown in category views (not applicable for the list display type)
* @param BINARY Whether the field is to be shown in search views (not applicable for the list display type)
* @return array A pair: the tempcode for the visible fields, and the tempcode for the hidden fields
*/
function get_field_fields($first_field, $num_fields_to_show, $prefix, $order, $name = '', $description = '', $type = 'short_text', $defines_order = 0, $visible = 1, $searchable = 1, $default = '', $required = 0, $put_in_category = 1, $put_in_search = 1)
{
$fields = new ocp_tempcode();
$hidden = new ocp_tempcode();
require_code('form_templates');
$fields->attach(form_input_line(do_lang_tempcode('NAME'), do_lang_tempcode('DESCRIPTION_FIELD_NAME'), $prefix . 'name', $name, $name != '' || $first_field));
// If this is gonna be a new field that might not be filled in, don't make them fill it in
$fields->attach(form_input_line(do_lang_tempcode('DESCRIPTION'), do_lang_tempcode('DESCRIPTION_FIELD_DESCRIPTION'), $prefix . 'description', $description, false));
$fields->attach(form_input_line(do_lang_tempcode('DEFAULT_VALUE'), do_lang_tempcode('DESCRIPTION_FIELD_DEFAULT'), $prefix . 'default', $default, false, NULL, 10000));
require_code('fields');
require_lang('fields');
$type_list = nice_get_field_type($type, $name != '');
$fields->attach(form_input_list(do_lang_tempcode('TYPE'), do_lang_tempcode($name == '' ? 'DESCRIPTION_FIELD_TYPE_FIRST_TIME' : 'DESCRIPTION_FIELD_TYPE'), $prefix . 'type', $type_list));
$order_list = new ocp_tempcode();
for ($i = 0; $i < $num_fields_to_show; $i++) {
$order_list->attach(form_input_list_entry(strval($i), $i == $order, integer_format($i + 1) . ($i == 0 && substr(get_param('id', ''), 0, 1) != '_' ? do_lang('NEW_FIELD_TITLE') : '')));
}
$fields->attach(form_input_list(do_lang_tempcode('ORDER'), do_lang_tempcode('DESCRIPTION_FIELD_ORDER_CLEVER'), $prefix . 'order', $order_list));
// Defines order?
$radios = form_input_radio_entry($prefix . 'defines_order', '0', $defines_order == 0, do_lang_tempcode('NO'));
$radios->attach(form_input_radio_entry($prefix . 'defines_order', '1', $defines_order == 1, do_lang_tempcode('ASCENDING')));
$radios->attach(form_input_radio_entry($prefix . 'defines_order', '2', $defines_order == 2, do_lang_tempcode('DESCENDING')));
$fields->attach(form_input_radio(do_lang_tempcode('DEFINES_ORDER'), do_lang_tempcode('DESCRIPTION_DEFINES_ORDER'), $prefix . 'defines_order', $radios));
if ($first_field) {
$hidden->attach(form_input_hidden($prefix . 'visible', '1'));
$hidden->attach(form_input_hidden($prefix . 'required', '1'));
} else {
$fields->attach(form_input_tick(do_lang_tempcode('VISIBLE'), do_lang_tempcode('DESCRIPTION_VISIBLE'), $prefix . 'visible', $visible == 1));
$fields->attach(form_input_tick(do_lang_tempcode('REQUIRED'), do_lang_tempcode('DESCRIPTION_REQUIRED'), $prefix . 'required', $required == 1));
}
$fields->attach(form_input_tick(do_lang_tempcode('SEARCHABLE'), do_lang_tempcode('DESCRIPTION_SEARCHABLE'), $prefix . 'searchable', $searchable == 1));
$fields->attach(form_input_tick(do_lang_tempcode('PUT_IN_CATEGORY'), do_lang_tempcode('DESCRIPTION_PUT_IN_CATEGORY'), $prefix . 'put_in_category', $put_in_category == 1));
$fields->attach(form_input_tick(do_lang_tempcode('PUT_IN_SEARCH'), do_lang_tempcode('DESCRIPTION_PUT_IN_SEARCH'), $prefix . 'put_in_search', $put_in_search == 1));
return array($fields, $hidden);
}
/**
* UI for a theme wizard step (choose colour).
*
* @return tempcode The UI
*/
function step1()
{
$title = get_page_title('_THEMEWIZARD', true, array(integer_format(1), integer_format(4)));
$post_url = build_url(array('page' => '_SELF', 'type' => 'step2'), '_SELF', array('keep_theme_seed', 'keep_theme_dark', 'keep_theme_source', 'keep_theme_algorithm'), false, true);
$text = do_lang_tempcode('THEMEWIZARD_1_DESCRIBE');
$submit_name = do_lang_tempcode('PROCEED');
require_code('form_templates');
$source_theme = get_param('source_theme', 'default');
$hidden = new ocp_tempcode();
if (count(find_all_themes()) == 1) {
$hidden->attach(form_input_hidden('source_theme', $source_theme));
} else {
$themes = nice_get_themes($source_theme, true);
}
$fields = new ocp_tempcode();
$fields->attach(form_input_codename(do_lang_tempcode('NEW_THEME'), do_lang_tempcode('DESCRIPTION_NAME'), 'themename', get_param('themename', ''), true));
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => false, 'TITLE' => do_lang_tempcode('PARAMETERS'))));
$fields->attach(form_input_colour(do_lang_tempcode('SEED_COLOUR'), do_lang_tempcode('DESCRIPTION_SEED_COLOUR'), 'seed', '#' . get_param('seed', find_theme_seed('default')), true));
if (count(find_all_themes()) != 1) {
$fields->attach(form_input_list(do_lang_tempcode('SOURCE_THEME'), do_lang_tempcode('DESCRIPTION_SOURCE_THEME'), 'source_theme', $themes, NULL, true));
}
$radios = new ocp_tempcode();
$radios->attach(form_input_radio_entry('algorithm', 'equations', $source_theme == 'default', do_lang_tempcode('THEMEGEN_ALGORITHM_EQUATIONS')));
$radios->attach(form_input_radio_entry('algorithm', 'hsv', $source_theme != 'default', do_lang_tempcode('THEMEGEN_ALGORITHM_HSV')));
$fields->attach(form_input_radio(do_lang_tempcode('THEMEGEN_ALGORITHM'), do_lang_tempcode('DESCRIPTION_THEMEGEN_ALGORITHM'), 'algorithm', $radios, true));
$fields->attach(form_input_tick(do_lang_tempcode('DARK_THEME'), do_lang_tempcode('DESCRIPTION_DARK_THEME'), 'dark', get_param_integer('dark', 0) == 1));
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => true, 'TITLE' => do_lang_tempcode('ADVANCED'))));
$fields->attach(form_input_tick(do_lang_tempcode('INHERIT_CSS'), do_lang_tempcode('DESCRIPTION_INHERIT_CSS'), 'inherit_css', get_param_integer('inherit_css', 0) == 1));
breadcrumb_set_self(do_lang_tempcode('THEMEWIZARD'));
require_javascript('javascript_ajax');
$script = find_script('snippet');
$javascript = "\n\t\t\tvar form=document.getElementById('main_form');\n\t\t\tform.elements['source_theme'].onchange=function() {\n\t\t\t\tvar default_theme=(form.elements['source_theme'].options[form.elements['source_theme'].selectedIndex].value=='default');\n\t\t\t\tform.elements['algorithm'][0].checked=default_theme;\n\t\t\t\tform.elements['algorithm'][1].checked=!default_theme;\n\t\t\t}\n\t\t\tform.old_submit=form.onsubmit;\n\t\t\tform.onsubmit=function()\n\t\t\t\t{\n\t\t\t\t\tdocument.getElementById('submit_button').disabled=true;\n\t\t\t\t\tvar url='" . addslashes($script) . "?snippet=exists_theme&name='+window.encodeURIComponent(form.elements['themename'].value);\n\t\t\t\t\tif (!do_ajax_field_test(url))\n\t\t\t\t\t{\n\t\t\t\t\t\tdocument.getElementById('submit_button').disabled=false;\n\t\t\t\t\t\treturn false;\n\t\t\t\t\t}\n\t\t\t\t\tdocument.getElementById('submit_button').disabled=false;\n\t\t\t\t\tif (typeof form.old_submit!='undefined' && form.old_submit) return form.old_submit();\n\t\t\t\t\treturn true;\n\t\t\t\t};\n\t\t";
return do_template('FORM_SCREEN', array('_GUID' => '98963f4d7ff60744382f937e6cc5acbf', 'GET' => true, 'SKIP_VALIDATION' => true, 'TITLE' => $title, 'JAVASCRIPT' => $javascript, 'FIELDS' => $fields, 'URL' => $post_url, 'TEXT' => $text, 'SUBMIT_NAME' => $submit_name, 'HIDDEN' => $hidden));
}
/**
* Get form inputter.
*
* @param string The field name
* @param string The field description
* @param array The field details
* @param ?string The actual current value of the field (NULL: none)
* @return ?tempcode The Tempcode for the input field (NULL: skip the field - it's not input)
*/
function get_field_inputter($_cf_name, $_cf_description, $field, $actual_value)
{
$default = $field['cf_default'];
$list = explode('|', $default);
$_list = new ocp_tempcode();
if ($field['cf_required'] && ($actual_value == '' || is_null($actual_value))) {
$_list->attach(form_input_radio_entry('field_' . strval($field['id']), '', $actual_value == '' || is_null($actual_value), do_lang_tempcode('NA_EM')));
}
foreach ($list as $l) {
$_list->attach(form_input_radio_entry('field_' . strval($field['id']), $l, $l == $actual_value, escape_html($l)));
}
return form_input_radio($_cf_name, $_cf_description, 'field_' . strval($field['id']), $_list, $field['cf_required'] == 1);
}
/**
* Standard aed_module edit form filler.
*
* @param ID_TEXT The entry being edited
* @return array A tuple of lots of info
*/
function fill_in_edit_form($_id)
{
$id = intval($_id);
$rows = $GLOBALS['SITE_DB']->query_select('videos', array('*'), array('id' => $id), '', 1);
if (!array_key_exists(0, $rows)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$myrow = $rows[0];
$comments = get_translated_text($myrow['comments']);
$url = $myrow['url'];
$cat = $myrow['cat'];
$validated = $myrow['validated'];
if (has_delete_permission('mid', get_member(), $myrow['submitter'], 'cms_galleries', array('galleries', $cat))) {
$radios = form_input_radio_entry('delete', '0', true, do_lang_tempcode('LEAVE'));
$radios->attach(form_input_radio_entry('delete', '1', false, do_lang_tempcode('DELETE_PARTIAL')));
$radios->attach(form_input_radio_entry('delete', '2', false, do_lang_tempcode('DELETE_FULL')));
$delete_fields = form_input_radio(do_lang_tempcode('DELETE_STATUS'), do_lang_tempcode('DESCRIPTION_DELETE_STATUS'), 'delete', $radios);
} else {
$delete_fields = new ocp_tempcode();
}
list($fields, $hidden) = $this->get_form_fields(get_translated_text($myrow['title']), $cat, $comments, $url, $myrow['thumb_url'], $validated, $myrow['allow_rating'], $myrow['allow_comments'], $myrow['allow_trackbacks'], $myrow['notes'], $myrow['video_length'], $myrow['video_width'], $myrow['video_height']);
return array($fields, $hidden, $delete_fields, '', true);
}
/**
* Get the tempcode for a complex input that chooses partials from a list ('all', 'all-except-these', or 'these').
*
* @param mixed A human intelligible name for this input field
* @param mixed A description for this input field
* @param string The base name which this input field is for
* @param tempcode A list culmulation to select against
* @param string The current type of partial selection
* @set + - *
* @param ?integer The tab index of the field (NULL: not specified)
* @return tempcode The input field
*/
function form_input_all_and_not($pretty_name, $description, $base, $list, $type = '+', $tabindex = NULL)
{
$tabindex = get_form_field_tabindex($tabindex);
$type = filter_form_field_default($base, $type);
$radios = new ocp_tempcode();
$radios->attach(form_input_radio_entry($base, '*', $type == '*', do_lang_tempcode('USE_ALL'), $tabindex));
$radios->attach(form_input_radio_entry($base, '-', $type == '-', do_lang_tempcode('USE_ALL_EXCEPT_SELECTED'), $tabindex));
$radios->attach(form_input_radio_entry($base, '+', $type == '+', do_lang_tempcode('USE_ALL_SELECTED'), $tabindex));
$input = do_template('FORM_SCREEN_INPUT_ALL_AND_NOT', array('TABINDEX' => strval($tabindex), 'BASE' => $base, 'RADIOS' => $radios, 'LIST' => $list));
return _form_input($base . '_list', $pretty_name, $description, $input, false, false, $tabindex);
}
/**
* Standard aed_module edit form filler.
*
* @param ID_TEXT The entry being edited
* @return array A tuple of: (fields, hidden-fields, delete-fields, edit-text, whether all delete fields are specified, posting form text, more fields, parsed WYSIWYG editable text)
*/
function fill_in_edit_form($id)
{
$rows = $GLOBALS['SITE_DB']->query_select('calendar_events', array('*'), array('id' => intval($id)), '', 1);
if (!array_key_exists(0, $rows)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$myrow = $rows[0];
$parsed = get_translated_tempcode($myrow['e_content']);
check_edit_permission($myrow['e_is_public'] == 1 ? 'mid' : 'low', $myrow['e_submitter']);
$content = get_translated_text($myrow['e_content']);
$fields = $this->get_form_fields($myrow['e_type'], $myrow['e_start_year'], $myrow['e_start_month'], $myrow['e_start_day'], $myrow['e_start_hour'], $myrow['e_start_minute'], get_translated_text($myrow['e_title']), $content, $myrow['e_recurrence'], $myrow['e_recurrences'], $myrow['e_seg_recurrences'], $myrow['e_is_public'], $myrow['e_priority'], $myrow['e_end_year'], $myrow['e_end_month'], $myrow['e_end_day'], $myrow['e_end_hour'], $myrow['e_end_minute'], $myrow['e_timezone'], $myrow['e_do_timezone_conv'], $myrow['validated'], $myrow['allow_rating'], $myrow['allow_comments'], $myrow['allow_trackbacks'], $myrow['notes']);
if (has_delete_permission('low', get_member(), $myrow['e_submitter'], 'cms_calendar')) {
$radios = form_input_radio_entry('delete', '0', true, do_lang_tempcode('EDIT'));
$radios->attach(form_input_radio_entry('delete', '3', false, do_lang_tempcode('FIX_PAST_RECURRENCES')));
$radios->attach(form_input_radio_entry('delete', '1', false, do_lang_tempcode('DELETE')));
$delete_fields = form_input_radio(do_lang_tempcode('ACTION'), do_lang_tempcode('DESCRIPTION_FIX_PAST_RECURRENCES'), 'delete', $radios);
} else {
$delete_fields = new ocp_tempcode();
}
return array($fields[0], $fields[1], $delete_fields, '', true, $content, $fields[6], $parsed);
}
/**
* Get a form to edit/send/delete an email.
*
* @return tempcode The result of execution.
*/
function edit()
{
$title = get_page_title('HANDLE_QUEUED_MESSAGE');
$id = get_param_integer('id');
$fields = new ocp_tempcode();
require_code('form_templates');
$rows = $GLOBALS['SITE_DB']->query_select('logged_mail_messages', array('*'), array('id' => $id));
if (!array_key_exists(0, $rows)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$row = $rows[0];
$from_email = $row['m_from_email'];
if ($from_email == '') {
$from_email = get_option('staff_address');
}
$from_name = $row['m_from_name'];
if ($from_name == '') {
$from_name = get_site_name();
}
$to_email = unserialize($row['m_to_email']);
if (is_string($to_email)) {
$to_email = array($to_email);
}
if (!array_key_exists(0, $to_email)) {
$to_email[0] = get_option('staff_address');
}
$to_name = unserialize($row['m_to_name']);
if (is_null($to_name) || $to_name == array(NULL) || $to_name == array('')) {
$to_name = array(get_site_name());
}
if (is_string($to_name)) {
$to_name = array($to_name);
}
if (!array_key_exists(0, $to_name)) {
$to_name[0] = get_site_name();
}
$fields->attach(form_input_line_comcode(do_lang_tempcode('SUBJECT'), '', 'subject', $row['m_subject'], true));
$fields->attach(form_input_email(do_lang_tempcode('FROM_EMAIL'), '', 'from_email', $from_email, false));
$fields->attach(form_input_line(do_lang_tempcode('FROM_NAME'), '', 'from_name', $from_name, false));
$fields->attach(form_input_line_multi(do_lang_tempcode('TO_EMAIL'), '', 'to_email_', $to_email, 1));
$fields->attach(form_input_line_multi(do_lang_tempcode('TO_NAME'), '', 'to_name', $to_name, 1));
$fields->attach(form_input_text_comcode(do_lang_tempcode('MESSAGE'), '', 'message', $row['m_message'], true));
$radios = new ocp_tempcode();
$radios->attach(form_input_radio_entry('action', 'edit', true, do_lang_tempcode('EDIT')));
$radios->attach(form_input_radio_entry('action', 'send', false, do_lang_tempcode('EDIT_AND_SEND')));
$radios->attach(form_input_radio_entry('action', 'delete', false, do_lang_tempcode('DELETE')));
$fields->attach(form_input_radio(do_lang_tempcode('ACTION'), '', 'action', $radios, true));
$submit_name = do_lang_tempcode('PROCEED');
$post_url = build_url(array('page' => '_SELF', 'type' => '_edit', 'id' => $id), '_SELF');
return do_template('FORM_SCREEN', array('SKIP_VALIDATION' => true, 'HIDDEN' => '', 'TITLE' => $title, 'TEXT' => '', 'URL' => $post_url, 'FIELDS' => $fields, 'SUBMIT_NAME' => $submit_name));
}
/**
* Get quiz data for exporting it as csv
*
* @param array The quiz questions
* @return tempcode The rendered quiz
*/
function render_quiz($questions)
{
require_code('form_templates');
// Sort out qa input
$fields = new ocp_tempcode();
foreach ($questions as $i => $question) {
$name = 'q_' . strval($question['id']);
$text = protect_from_escaping(is_string($question['q_question_text']) ? comcode_to_tempcode($question['q_question_text']) : get_translated_tempcode($question['q_question_text']));
//$pretty_name=do_lang_tempcode('Q_NUM',integer_format($i+1));
if ($question['q_num_choosable_answers'] == 0) {
if ($question['q_long_input_field'] == 1) {
$fields->attach(form_input_text($text, '', $name, '', $question['q_required'] == 1));
} else {
$fields->attach(form_input_line($text, '', $name, '', $question['q_required'] == 1));
}
} elseif ($question['q_num_choosable_answers'] > 1) {
$content = array();
foreach ($question['answers'] as $a) {
$content[] = array(protect_from_escaping(is_string($a['q_answer_text']) ? comcode_to_tempcode($a['q_answer_text']) : get_translated_tempcode($a['q_answer_text'])), $name . '_' . strval($a['id']), false, '');
}
$fields->attach(form_input_various_ticks($content, '', NULL, $text, true));
} else {
$radios = new ocp_tempcode();
foreach ($question['answers'] as $a) {
$answer_text = is_string($a['q_answer_text']) ? comcode_to_tempcode($a['q_answer_text']) : get_translated_tempcode($a['q_answer_text']);
$radios->attach(form_input_radio_entry($name, strval($a['id']), false, protect_from_escaping($answer_text)));
}
$fields->attach(form_input_radio($text, '', $name, $radios, $question['q_required'] == 1));
}
}
return $fields;
}
/**
* The UI to do a backup.
*
* @return tempcode The UI
*/
function backup_interface()
{
$title = get_page_title('BACKUP');
require_javascript('javascript_ajax');
$last_backup = intval(get_value('last_backup'));
if ($last_backup == 0) {
$text = do_lang_tempcode('NO_LAST_BACKUP');
} elseif (date('Y/m/d', utctime_to_usertime($last_backup)) == date('Y/m/d', utctime_to_usertime())) {
$text = do_lang_tempcode('LAST_BACKUP_TODAY');
} elseif (date('Y/m/d', utctime_to_usertime($last_backup)) == date('Y/m/d', utctime_to_usertime(time() - 60 * 60 * 24))) {
$text = do_lang_tempcode('LAST_BACKUP_YESTERDAY');
} else {
$text = do_lang_tempcode('LAST_BACKUP', integer_format(intval(round((time() - $last_backup) / (60 * 60 * 24)))));
}
$url = build_url(array('page' => '_SELF', 'type' => 'make_backup'), '_SELF');
$max_size = intval(get_value('backup_max_size'));
if ($max_size == 0) {
$max_size = 100;
}
require_code('form_templates');
$content = new ocp_tempcode();
$content->attach(form_input_radio_entry('b_type', 'full', true, do_lang_tempcode('FULL_BACKUP')));
$content->attach(form_input_radio_entry('b_type', 'incremental', false, do_lang_tempcode('INCREMENTAL_BACKUP')));
$content->attach(form_input_radio_entry('b_type', 'sql', false, do_lang_tempcode('SQL_BACKUP')));
$fields = form_input_radio(do_lang_tempcode('TYPE'), do_lang_tempcode('BACKUP_TYPE'), 'b_type', $content);
$fields->attach(form_input_integer(do_lang_tempcode('MAXIMUM_SIZE_INCLUSION'), do_lang_tempcode('MAX_FILE_SIZE'), 'max_size', $max_size, false));
if (addon_installed('calendar')) {
$fields->attach(form_input_date__scheduler(do_lang_tempcode('SCHEDULE_TIME'), do_lang_tempcode('DESCRIPTION_SCHEDULE_TIME'), 'schedule', true, true, true));
$_recurrence_days = get_value('backup_recurrance_days');
$recurrance_days = is_null($_recurrence_days) ? NULL : intval($_recurrence_days);
if (cron_installed()) {
$fields->attach(form_input_integer(do_lang_tempcode('RECURRANCE_DAYS'), do_lang_tempcode('DESCRIPTION_RECURRANCE_DAYS'), 'recurrance_days', $recurrance_days, false));
}
}
$javascript = '';
if (addon_installed('calendar')) {
if (cron_installed()) {
$javascript = 'var d_ob=[document.getElementById(\'schedule_day\'),document.getElementById(\'schedule_month\'),document.getElementById(\'schedule_year\'),document.getElementById(\'schedule_hour\'),document.getElementById(\'schedule_minute\')]; var hide_func=function () { document.getElementById(\'recurrance_days\').disabled=((d_ob[0].selectedIndex+d_ob[1].selectedIndex+d_ob[2].selectedIndex+d_ob[3].selectedIndex+d_ob[4].selectedIndex)>0); }; d_ob[0].onchange=hide_func; d_ob[1].onchange=hide_func; d_ob[2].onchange=hide_func; d_ob[3].onchange=hide_func; d_ob[4].onchange=hide_func; hide_func();';
}
}
$form = do_template('FORM', array('_GUID' => '64ae569b2cce398e89d1b4167f116193', 'HIDDEN' => '', 'JAVASCRIPT' => $javascript, 'TEXT' => '', 'FIELDS' => $fields, 'SUBMIT_NAME' => do_lang_tempcode('BACKUP'), 'URL' => $url));
$results = $this->get_results();
return do_template('BACKUP_LAUNCH_SCREEN', array('_GUID' => '26a82a0627632db79b35055598de5d23', 'TITLE' => $title, 'TEXT' => $text, 'RESULTS' => $results, 'FORM' => $form));
}