/**
* Outputs a Comcode tag helper dialog.
*/
function comcode_helper_script()
{
require_lang('comcode');
$type = get_param('type', 'step1');
list($tag_list, $custom_tag_list) = _get_details_comcode_tags();
require_code('comcode_text');
global $DANGEROUS_TAGS, $TEXTUAL_TAGS;
if ($type == 'step1') {
$title = get_page_title('COMCODE_TAG');
$keep = symbol_tempcode('KEEP');
$comcode_groups = '';
$groups = _get_group_tags();
$non_wysiwyg_tags = _get_non_wysiwyg_tags();
$in_wysiwyg = get_param_integer('in_wysiwyg', 0) == 1;
foreach ($groups as $groupname => $grouptags) {
sort($grouptags);
$comcode_types = '';
foreach ($grouptags as $tag) {
$custom = array_key_exists($tag, $custom_tag_list);
if ($in_wysiwyg && !$custom && !in_array($tag, $non_wysiwyg_tags)) {
continue;
}
if (array_key_exists($tag, $DANGEROUS_TAGS) && !has_specific_permission(get_member(), 'comcode_dangerous')) {
continue;
}
if ($custom) {
$description = make_string_tempcode(escape_html(is_integer($custom_tag_list[$tag]['tag_description']) ? get_translated_text($custom_tag_list[$tag]['tag_description']) : $custom_tag_list[$tag]['tag_description']));
} else {
$description = do_lang_tempcode('COMCODE_TAG_' . $tag);
}
$url = find_script('comcode_helper') . '?type=step2&tag=' . urlencode($tag) . '&field_name=' . get_param('field_name') . $keep->evaluate();
if (get_param('utheme', '') != '') {
$url .= '&utheme=' . get_param('utheme');
}
$link_caption = escape_html($tag);
$usage = '';
$comcode_types .= static_evaluate_tempcode(do_template('BLOCK_HELPER_BLOCK_CHOICE', array('USAGE' => $usage, 'DESCRIPTION' => $description, 'URL' => $url, 'LINK_CAPTION' => $link_caption)));
}
if ($comcode_types != '') {
$comcode_groups .= static_evaluate_tempcode(do_template('BLOCK_HELPER_BLOCK_GROUP', array('IMG' => NULL, 'TITLE' => do_lang_tempcode('COMCODE_GROUP_' . $groupname), 'LINKS' => $comcode_types)));
}
}
$content = do_template('BLOCK_HELPER_START', array('_GUID' => 'd2d6837cdd8b19d80ea95ab9f5d09c9a', 'GET' => true, 'TITLE' => $title, 'LINKS' => $comcode_groups));
} elseif ($type == 'step2') {
require_code('form_templates');
$actual_tag = get_param('tag');
if (!isset($tag_list[$actual_tag]) && !isset($custom_tag_list[$actual_tag])) {
warn_exit(do_lang_tempcode('INTERNAL_ERROR'));
}
$tag = $actual_tag;
if ($tag == 'attachment_safe') {
$tag = 'attachment';
}
$title = get_page_title('_COMCODE_HELPER', true, array($tag));
$fields = new ocp_tempcode();
$fields_advanced = new ocp_tempcode();
$done_tag_contents = false;
$hidden = new ocp_tempcode();
$javascript = '';
$preview = true;
require_code('comcode_text');
$defaults = parse_single_comcode_tag(get_param('parse_defaults', '', true), $actual_tag);
$default_embed = array_key_exists('', $defaults) ? '[semihtml]' . $defaults[''] . '[/semihtml]' : get_param('default', '');
$embed_required = true;
if ($tag == 'contents') {
$embed_required = false;
}
if (isset($custom_tag_list[$tag]['tag_description'])) {
$tag_description = protect_from_escaping($custom_tag_list[$tag]['tag_description']);
} else {
$tag_description = protect_from_escaping(do_lang('COMCODE_TAG_' . $tag));
}
if (array_key_exists($tag, $tag_list)) {
$params = $tag_list[$tag];
if ($tag == 'include') {
$default_embed = array_key_exists('', $defaults) ? $defaults[''] : get_param('default', '');
if (strpos($default_embed, ':') === false) {
$default_embed = ':' . $default_embed;
}
$fields->attach(form_input_page_link(do_lang_tempcode('PAGE'), '', 'tag_contents', $default_embed, true, NULL, 'comcode'));
$done_tag_contents = true;
} elseif ($tag == 'concepts') {
foreach ($params as $param) {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$fields->attach(form_input_line_multi(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, get_defaults_multi($defaults, $param), 1));
}
} elseif ($tag == 'jumping') {
foreach ($params as $param) {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$fields->attach(form_input_line_multi(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, get_defaults_multi($defaults, $param), 2));
}
} elseif ($tag == 'shocker') {
foreach ($params as $param) {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
if ($param == 'left' || $param == 'right') {
$fields->attach(form_input_line_multi(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, get_defaults_multi($defaults, $param), 2));
} else {
$fields->attach(form_input_line(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, '', false));
}
}
} elseif ($tag == 'random') {
foreach ($params as $param) {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$fields->attach(form_input_line_multi(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, get_defaults_multi($defaults, $param), $param != 'X' ? 2 : 0));
}
} elseif ($tag == 'sections') {
foreach ($params as $param) {
if ($param == 'default') {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$default = array_key_exists($param, $defaults) ? $defaults[$param] : get_param('default_' . $param, '1');
$fields->attach(form_input_integer(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, intval($default), false));
} elseif ($param == 'name') {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$fields->attach(form_input_line_multi(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, get_defaults_multi($defaults, $param), 2));
}
}
} elseif ($tag == 'big_tabs') {
foreach ($params as $param) {
if ($param == 'default') {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$default = array_key_exists($param, $defaults) ? $defaults[$param] : get_param('default_' . $param, '1');
$fields->attach(form_input_integer(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, intval($default), false));
} elseif ($param == 'name') {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$fields->attach(form_input_line_multi(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, get_defaults_multi($defaults, $param), 2));
} elseif ($param == 'switch_time') {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$default = array_key_exists($param, $defaults) ? $defaults[$param] : get_param('default_' . $param, '6000');
$fields->attach(form_input_integer(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, intval($default), false));
}
}
} elseif ($tag == 'tabs') {
foreach ($params as $param) {
if ($param == 'default') {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$default = array_key_exists($param, $defaults) ? $defaults[$param] : get_param('default_' . $param, '1');
$fields->attach(form_input_integer(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, intval($default), false));
} elseif ($param == 'name') {
$description = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$fields->attach(form_input_line_multi(ucwords(str_replace('_', ' ', $param)), protect_from_escaping($description), $param, get_defaults_multi($defaults, $param), 2));
}
}
} else {
if (count($params) > 0) {
require_code('form_templates');
foreach ($params as $param) {
$parameter_name = do_lang('COMCODE_TAG_' . $tag . '_NAME_OF_PARAM_' . $param, NULL, NULL, NULL, NULL, false);
if (is_null($parameter_name)) {
$parameter_name = ucwords(str_replace('_', ' ', $param));
}
$descriptiont = do_lang('COMCODE_TAG_' . $tag . '_PARAM_' . $param);
$supports_comcode = strpos($descriptiont, do_lang('BLOCK_IND_SUPPORTS_COMCODE')) !== false;
$descriptiont = trim(str_replace(do_lang('BLOCK_IND_SUPPORTS_COMCODE'), '', $descriptiont));
$is_advanced = strpos($descriptiont, do_lang('BLOCK_IND_ADVANCED')) !== false;
$descriptiont = trim(str_replace(do_lang('BLOCK_IND_ADVANCED'), '', $descriptiont));
$default = array_key_exists($param, $defaults) ? $defaults[$param] : get_param('default_' . $param, '');
if (!array_key_exists($param, $defaults)) {
$matches = array();
if (preg_match('#' . do_lang('BLOCK_IND_DEFAULT') . ': ["\']([^"]*)["\']#Ui', $descriptiont, $matches) != 0) {
$default = $matches[1];
}
}
$descriptiont = preg_replace('#\\s*' . do_lang('BLOCK_IND_DEFAULT') . ': ["\']([^"]*)["\'](?-U)\\.?(?U)#Ui', '', $descriptiont);
if ($tag == 'page' && $param == 'param' && substr_count($default, ':') == 1) {
$fields->attach(form_input_page_link($parameter_name, protect_from_escaping($descriptiont), $param, $default, true, NULL));
} elseif ($tag == 'attachment' && $param == 'thumb_url' && addon_installed('filedump')) {
$field = form_input_tree_list(do_lang_tempcode('THUMBNAIL'), do_lang_tempcode('COMCODE_TAG_attachment_PARAM_thumb_url'), 'thumb_url', '', 'choose_filedump_file', array('only_images' => true), false, $default, false);
$fields_advanced->attach($field);
} else {
if (substr($descriptiont, 0, 12) == '0|1 – ') {
$field = form_input_tick($parameter_name, protect_from_escaping(ucfirst(substr($descriptiont, 12))), $param, $default == '1');
} elseif (substr($descriptiont, -1) != '.' && strpos($descriptiont, '|') !== false) {
$list = new ocp_tempcode();
if (substr($descriptiont, 0, 1) != '=') {
$list->attach(form_input_list_entry(''));
}
foreach (explode('|', $descriptiont) as $item) {
if (strpos($item, '=') !== false) {
list($item, $label) = explode('=', $item, 2);
// Simplify the choices
if ($tag == 'attachment') {
if ($item == 'inline_extract' && get_param_integer('is_archive', NULL) === 0) {
continue;
}
if ($item == 'island_extract' && get_param_integer('is_archive', NULL) === 0) {
continue;
}
if ($item == 'inline' && get_param_integer('is_image', NULL) === 0) {
continue;
}
if ($item == 'island' && get_param_integer('is_image', NULL) === 0) {
continue;
}
if ($item == 'code' && (get_param_integer('is_image', NULL) === 1 || get_param_integer('is_archive', NULL) === 1)) {
continue;
}
if ($item == 'mail' && get_param('default_type', NULL) !== NULL) {
continue;
}
}
$list->attach(form_input_list_entry($item, $item == $default, protect_from_escaping($label)));
} else {
$list->attach(form_input_list_entry($item, $item == $default));
}
}
$field = form_input_list($parameter_name, '', $param, $list, NULL, false, false);
} elseif ($param == 'width' || $param == 'height') {
$field = form_input_integer($parameter_name, protect_from_escaping($descriptiont), $param, $default == '' ? NULL : intval($default), false);
} else {
if ($supports_comcode) {
$field = form_input_line_comcode($parameter_name, protect_from_escaping($descriptiont), $param, $default, false);
} else {
$field = form_input_line($parameter_name, protect_from_escaping($descriptiont), $param, $default, false);
}
}
if ($is_advanced) {
$fields_advanced->attach($field);
} else {
$fields->attach($field);
}
}
}
if ($tag == 'attachment') {
if (get_option('eager_wysiwyg') == '0') {
$field = form_input_tick(do_lang_tempcode('COMCODE_TAG_attachment_safe'), do_lang_tempcode('COMCODE_TAG_attachment_safe_DESCRIPTION'), '_safe', $actual_tag == 'attachment_safe' || $actual_tag == 'attachment2');
$fields_advanced->attach($field);
}
}
}
}
} else {
$_params = $custom_tag_list[$tag];
$params = explode(',', $_params['tag_parameters']);
foreach ($params as $param) {
$description = new ocp_tempcode();
$fields->attach(form_input_line(preg_replace('#=.*$#', '', ucwords(str_replace('_', ' ', $param))), protect_from_escaping($description), preg_replace('#=.*$#', '', $param), preg_replace('#^.*=#U', '', $param), false));
}
$tag_description = new ocp_tempcode();
$tag_description->attach(is_integer($_params['tag_description']) ? get_translated_text($_params['tag_description']) : $_params['tag_description']);
$tag_description->attach(paragraph(is_integer($_params['tag_example']) ? get_translated_text($_params['tag_example']) : $_params['tag_example']));
}
if ($tag == 'attachment') {
if (get_option('eager_wysiwyg') == '0') {
$javascript .= "document.getElementById('type').onchange=function() { document.getElementById('_safe').checked=(this.options[this.selectedIndex].value=='inline'); };";
}
if ($default_embed != '' || !addon_installed('filedump')) {
$hidden->attach(form_input_hidden('tag_contents', $default_embed));
$tag_description = new ocp_tempcode();
if (substr($default_embed, 0, 4) == 'new_') {
$preview = NULL;
}
} else {
$filedump_url = build_url(array('page' => 'filedump'), get_module_zone('filedump'));
$fields->attach(form_input_tree_list(do_lang_tempcode('FILE'), do_lang_tempcode('COMCODE_TAG_attachment_EMBED_FILE', escape_html($filedump_url->evaluate())), 'tag_contents', '', 'choose_filedump_file', array('attachment_ready' => true), true, '', false));
}
} elseif ($tag == 'sections' || $tag == 'big_tabs' || $tag == 'tabs' || $tag == 'list') {
$fields->attach(form_input_text_multi(do_lang_tempcode('TAG_CONTENTS'), protect_from_escaping(do_lang('COMCODE_TAG_' . $tag . '_EMBED')), 'tag_contents', explode(',', $default_embed), 2));
} elseif (array_key_exists($tag, $TEXTUAL_TAGS) || $tag == 'menu') {
if ($tag == 'menu' && $default_embed == '') {
$default_embed = '-contracted section
+expanded section
page = URL
page = URL
+expanded section
page = URL
page = URL';
}
$descriptiont = do_lang('COMCODE_TAG_' . $tag . '_EMBED');
$descriptiont = trim(str_replace(do_lang('BLOCK_IND_SUPPORTS_COMCODE'), '', $descriptiont));
$fields->attach(form_input_text_comcode(do_lang_tempcode('TAG_CONTENTS'), protect_from_escaping(do_lang('COMCODE_TAG_' . $tag . '_EMBED')), 'tag_contents', $default_embed, $embed_required, NULL, true));
} else {
if (!$done_tag_contents) {
$descriptiont = do_lang('COMCODE_TAG_' . $tag . '_EMBED', NULL, NULL, NULL, NULL, false);
if (is_null($descriptiont)) {
$descriptiont = '';
}
$supports_comcode = strpos($descriptiont, do_lang('BLOCK_IND_SUPPORTS_COMCODE')) !== false;
$descriptiont = trim(str_replace(do_lang('BLOCK_IND_SUPPORTS_COMCODE'), '', $descriptiont));
if ($supports_comcode) {
$fields->attach(form_input_line_comcode(do_lang_tempcode('TAG_CONTENTS'), protect_from_escaping($descriptiont), 'tag_contents', $default_embed, $embed_required));
} else {
$fields->attach(form_input_line(do_lang_tempcode('TAG_CONTENTS'), protect_from_escaping($descriptiont), 'tag_contents', $default_embed, $embed_required));
}
}
}
if (!$fields_advanced->is_empty()) {
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => true, 'TITLE' => do_lang_tempcode('ADVANCED'))));
$fields->attach($fields_advanced);
}
$keep = symbol_tempcode('KEEP');
$post_url = find_script('comcode_helper') . '?type=step3&field_name=' . get_param('field_name') . $keep->evaluate();
if (get_param('utheme', '') != '') {
$post_url .= '&utheme=' . get_param('utheme');
}
if (get_param('save_to_id', '') != '') {
$post_url .= '&save_to_id=' . urlencode(get_param('save_to_id'));
$submit_name = do_lang_tempcode('SAVE');
// Allow remove option
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => false, 'TITLE' => do_lang_tempcode('ACTIONS'), 'HELP' => '')));
$fields->attach(form_input_tick(do_lang_tempcode('REMOVE'), '', '_delete', false));
} else {
$submit_name = do_lang_tempcode('USE');
}
$text = $tag_description->is_empty() ? new ocp_tempcode() : do_lang_tempcode('COMCODE_HELPER_2', escape_html($tag), $tag_description);
$hidden->attach(form_input_hidden('tag', $tag));
$content = do_template('FORM_SCREEN', array('_GUID' => '270058349d048a8be6570bba97c81fa2', 'TITLE' => $title, 'JAVASCRIPT' => $javascript, 'TARGET' => '_self', 'SKIP_VALIDATION' => true, 'FIELDS' => $fields, 'URL' => $post_url, 'TEXT' => $text, 'SUBMIT_NAME' => $submit_name, 'HIDDEN' => $hidden, 'PREVIEW' => $preview, 'THEME' => $GLOBALS['FORUM_DRIVER']->get_theme()));
} elseif ($type == 'step3') {
require_javascript('javascript_posting');
require_javascript('javascript_editing');
$field_name = get_param('field_name');
$tag = post_param('tag');
$title = get_page_title('_COMCODE_HELPER', true, array($tag));
if (get_option('eager_wysiwyg') == '0') {
if ($tag == 'attachment' && post_param_integer('_safe', 0) == 1) {
$tag = 'attachment_safe';
}
}
list($comcode, $bparameters) = _get_preview_environment_comcode($tag);
if ($tag == 'sections' || $tag == 'big_tabs' || $tag == 'tabs' || $tag == 'list') {
$comcode_xml = $bparameters;
} else {
$comcode_xml = '<' . $tag . $bparameters . '>' . post_param('tag_contents', '') . '</' . $tag . '>';
}
$comcode_semihtml = comcode_to_tempcode($comcode, NULL, false, 60, NULL, NULL, true, false, false);
$content = do_template('BLOCK_HELPER_DONE', array('TITLE' => $title, 'FIELD_NAME' => $field_name, 'BLOCK' => $tag, 'COMCODE_XML' => $comcode_xml, 'COMCODE' => $comcode, 'COMCODE_SEMIHTML' => $comcode_semihtml));
}
$content->handle_symbol_preprocessing();
$echo = do_template('POPUP_HTML_WRAP', array('TITLE' => do_lang_tempcode('COMCODE_HELPER'), 'EXTRA_HEAD' => $GLOBALS['EXTRA_HEAD'], 'EXTRA_FOOT' => $GLOBALS['EXTRA_FOOT'], 'CONTENT' => $content));
exit($echo->evaluate());
$echo->handle_symbol_preprocessing();
$echo->evaluate_echo();
}
/**
* Shows an HTML page for making block Comcode.
*/
function block_helper_script()
{
require_lang('comcode');
require_lang('blocks');
require_code('zones2');
require_code('zones3');
check_specific_permission('comcode_dangerous');
$title = get_page_title('BLOCK_HELPER');
require_code('form_templates');
require_all_lang();
$type_wanted = get_param('block_type', 'main');
$type = get_param('type', 'step1');
$content = new ocp_tempcode();
if ($type == 'step1') {
// Find what addons all our block files are in, and icons if possible
$hooks = find_all_hooks('systems', 'addon_registry');
$hook_keys = array_keys($hooks);
$hook_files = array();
foreach ($hook_keys as $hook) {
$path = get_file_base() . '/sources_custom/hooks/systems/addon_registry/' . filter_naughty_harsh($hook) . '.php';
if (!file_exists($path)) {
$path = get_file_base() . '/sources/hooks/systems/addon_registry/' . filter_naughty_harsh($hook) . '.php';
}
$hook_files[$hook] = file_get_contents($path);
}
unset($hook_keys);
$addon_icons = array();
$addons_blocks = array();
foreach ($hook_files as $addon_name => $hook_file) {
$matches = array();
if (preg_match('#function get_file_list\\(\\)\\s*\\{([^\\}]*)\\}#', $hook_file, $matches) != 0) {
if (!defined('HIPHOP_PHP')) {
$addon_files = eval($matches[1]);
} else {
require_code('hooks/systems/addon_registry/' . $addon_name);
$hook_ob = object_factory('Hook_addon_registry_' . $addon_name);
$addon_files = $hook_ob->get_file_list();
}
foreach ($addon_files as $file) {
if (substr($file, 0, 31) == 'themes/default/images/bigicons/' && !array_key_exists($addon_name, $addon_icons)) {
$addon_icons[$addon_name] = find_theme_image('bigicons/' . basename($file, '.png'), false, true);
}
if (substr($file, 0, 21) == 'sources_custom/blocks/' || substr($file, 0, 15) == 'sources/blocks/') {
if ($addon_name == 'staff_messaging') {
$addon_name = 'core_feedback_features';
}
$addons_blocks[basename($file, '.php')] = $addon_name;
}
}
}
}
// Find where blocks have been used
$block_usage = array();
$zones = find_all_zones(false, true);
foreach ($zones as $_zone) {
$zone = $_zone[0];
$pages = find_all_pages_wrap($zone, true);
foreach ($pages as $filename => $type) {
if (substr(strtolower($filename), -4) == '.txt') {
$matches = array();
$contents = file_get_contents(zone_black_magic_filterer((substr($type, 0, 15) == 'comcode_custom/' ? get_custom_file_base() : get_file_base()) . '/' . ($zone == '' ? '' : $zone . '/') . 'pages/' . $type . '/' . $filename));
//$fallback=get_file_base().'/'.(($zone=='')?'':($zone.'/')).'pages/comcode/'.fallback_lang().'/'.$filename;
//if (file_exists($fallback)) $contents.=file_get_contents($fallback);
$num_matches = preg_match_all('#\\[block[^\\]]*\\](.*)\\[/block\\]#U', $contents, $matches);
for ($i = 0; $i < $num_matches; $i++) {
$block_used = $matches[1][$i];
if (!array_key_exists($block_used, $block_usage)) {
$block_usage[$block_used] = array();
}
$block_usage[$block_used][] = $zone . ':' . basename($filename, '.txt');
}
}
}
}
// Show block list
$links = new ocp_tempcode();
$blocks = find_all_blocks();
$dh = @opendir(get_file_base() . '/sources_custom/miniblocks');
if ($dh !== false) {
while (($file = readdir($dh)) !== false) {
if (substr($file, -4) == '.php' && preg_match('#^[\\w\\-]*$#', substr($file, 0, strlen($file) - 4)) != 0) {
$blocks[substr($file, 0, strlen($file) - 4)] = 'sources_custom';
}
}
closedir($dh);
}
$block_types = array();
$block_types_icon = array();
$keep = symbol_tempcode('KEEP');
foreach (array_keys($blocks) as $block) {
if (array_key_exists($block, $addons_blocks)) {
$addon_name = $addons_blocks[$block];
$addon_icon = array_key_exists($addon_name, $addon_icons) ? $addon_icons[$addon_name] : NULL;
$addon_name = preg_replace('#^core\\_#', '', $addon_name);
} else {
$addon_name = NULL;
$addon_icon = NULL;
}
$this_block_type = is_null($addon_name) || strpos($addon_name, 'block') !== false || $addon_name == 'core' ? substr($block, 0, strpos($block, '_') === false ? strlen($block) : strpos($block, '_')) : $addon_name;
if (!array_key_exists($this_block_type, $block_types)) {
$block_types[$this_block_type] = new ocp_tempcode();
}
if (!is_null($addon_icon)) {
$block_types_icon[$this_block_type] = $addon_icon;
}
$block_description = do_lang('BLOCK_' . $block . '_DESCRIPTION', NULL, NULL, NULL, NULL, false);
$block_use = do_lang('BLOCK_' . $block . '_USE', NULL, NULL, NULL, NULL, false);
if (is_null($block_description)) {
$block_description = '';
}
if (is_null($block_use)) {
$block_use = '';
}
$descriptiont = $block_description == '' && $block_use == '' ? new ocp_tempcode() : do_lang_tempcode('BLOCK_HELPER_1X', $block_description, $block_use);
$url = find_script('block_helper') . '?type=step2&block=' . urlencode($block) . '&field_name=' . get_param('field_name') . $keep->evaluate();
if (get_param('utheme', '') != '') {
$url .= '&utheme=' . get_param('utheme');
}
$url .= '&block_type=' . $type_wanted;
$link_caption = do_lang_tempcode('NICE_BLOCK_NAME', escape_html(cleanup_block_name($block)), $block);
$usage = array_key_exists($block, $block_usage) ? $block_usage[$block] : array();
$block_types[$this_block_type]->attach(do_template('BLOCK_HELPER_BLOCK_CHOICE', array('USAGE' => $usage, 'DESCRIPTION' => $descriptiont, 'URL' => $url, 'LINK_CAPTION' => $link_caption)));
}
/*if (array_key_exists($type_wanted,$block_types)) We don't do this now, as we structure by addon name
{
$x=$block_types[$type_wanted];
unset($block_types[$type_wanted]);
$block_types=array_merge(array($type_wanted=>$x),$block_types);
}*/
ksort($block_types);
// We sort now instead
$move_after = $block_types['adminzone_frontpage'];
unset($block_types['adminzone_frontpage']);
$block_types['adminzone_frontpage'] = $move_after;
foreach ($block_types as $block_type => $_links) {
switch ($block_type) {
case 'side':
case 'main':
case 'bottom':
$type_title = do_lang_tempcode('BLOCKS_TYPE_' . $block_type);
$img = NULL;
break;
default:
$type_title = do_lang_tempcode('BLOCKS_TYPE_ADDON', escape_html(cleanup_block_name($block_type)));
$img = array_key_exists($block_type, $block_types_icon) ? $block_types_icon[$block_type] : NULL;
break;
}
$links->attach(do_template('BLOCK_HELPER_BLOCK_GROUP', array('IMG' => $img, 'TITLE' => $type_title, 'LINKS' => $_links)));
}
$content = do_template('BLOCK_HELPER_START', array('_GUID' => 'd2d6837cdd8b19d80ea95ab9f5d09c9a', 'GET' => true, 'TITLE' => $title, 'LINKS' => $links));
} elseif ($type == 'step2') {
require_code('comcode_text');
$defaults = parse_single_comcode_tag(get_param('parse_defaults', '', true), 'block');
$block = trim(get_param('block'));
$title = get_page_title('_BLOCK_HELPER', true, array(escape_html($block)));
$fields = new ocp_tempcode();
$parameters = get_block_parameters($block);
$parameters[] = 'failsafe';
$parameters[] = 'cache';
$parameters[] = 'quick_cache';
if (!isset($defaults['cache'])) {
$defaults['cache'] = block_cache_default($block);
}
if (is_null($parameters)) {
$parameters = array();
}
$advanced_ind = do_lang('BLOCK_IND_ADVANCED');
$param_classes = array('normal' => array(), 'advanced' => array());
foreach ($parameters as $parameter) {
$param_class = 'normal';
if ($parameter == 'cache' || $parameter == 'quick_cache' || $parameter == 'failsafe' || strpos(do_lang('BLOCK_' . $block . '_PARAM_' . $parameter), $advanced_ind) !== false) {
$param_class = 'advanced';
}
$param_classes[$param_class][] = $parameter;
}
foreach ($param_classes as $param_class => $parameters) {
if (count($parameters) == 0) {
if ($param_class == 'normal') {
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => false, 'TITLE' => do_lang_tempcode('PARAMETERS'), 'HELP' => protect_from_escaping(paragraph(do_lang_tempcode('BLOCK_HELPER_NO_PARAMETERS'), '', 'nothing_here')))));
}
continue;
}
if ($param_class == 'advanced') {
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => true, 'TITLE' => do_lang_tempcode('ADVANCED'))));
}
foreach ($parameters as $parameter) {
$matches = array();
switch ($parameter) {
case 'quick_cache':
case 'cache':
case 'failsafe':
$description = do_lang('BLOCK_PARAM_' . $parameter);
break;
default:
$description = do_lang('BLOCK_' . $block . '_PARAM_' . $parameter);
break;
}
$description = str_replace(do_lang('BLOCK_IND_STRIPPABLE_1'), '', $description);
$description = trim(str_replace(do_lang('BLOCK_IND_ADVANCED'), '', $description));
// Work out default value for field
$default = '';
if (preg_match('#' . do_lang('BLOCK_IND_DEFAULT') . ': ["\']([^"]*)["\']#Ui', $description, $matches) != 0) {
$default = $matches[1];
$has_default = true;
$description = preg_replace('#\\s*' . do_lang('BLOCK_IND_DEFAULT') . ': ["\']([^"]*)["\'](?-U)\\.?(?U)#Ui', '', $description);
} else {
$has_default = false;
}
if (isset($defaults[$parameter])) {
$default = $defaults[$parameter];
$has_default = true;
}
// Show field
if ($block . ':' . $parameter == 'side_stored_menu:type') {
$matches = array();
$dh = opendir(get_file_base() . '/themes/default/templates/');
$options = array();
while (($file = readdir($dh)) !== false) {
if (preg_match('^MENU\\_([a-z]+)\\.tpl$^', $file, $matches) != 0) {
$options[] = $matches[1];
}
}
closedir($dh);
$dh = opendir(get_custom_file_base() . '/themes/default/templates_custom/');
while (($file = readdir($dh)) !== false) {
if (preg_match('^MENU\\_([a-z]+)\\.tpl$^', $file, $matches) != 0 && !file_exists(get_file_base() . '/themes/default/templates/' . $file)) {
$options[] = $matches[1];
}
}
closedir($dh);
sort($options);
$list = new ocp_tempcode();
foreach ($options as $option) {
$list->attach(form_input_list_entry($option, $has_default && $option == $default));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($block . ':' . $parameter == 'side_stored_menu:param') {
$list = new ocp_tempcode();
$rows = $GLOBALS['SITE_DB']->query_select('menu_items', array('DISTINCT i_menu'), NULL, 'ORDER BY i_menu');
foreach ($rows as $row) {
$list->attach(form_input_list_entry($row['i_menu'], $has_default && $row['i_menu'] == $default));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($block . ':' . $parameter == 'side_shoutbox:param') {
$list = new ocp_tempcode();
$rows = $GLOBALS['SITE_DB']->query_select('chat_rooms', array('id', 'room_name'), array('is_im' => 0), '', 100);
foreach ($rows as $row) {
$list->attach(form_input_list_entry(strval($row['id']), $has_default && strval($row['id']) == $default, $row['room_name']));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($block . ':' . $parameter == 'main_poll:param') {
$list = new ocp_tempcode();
$rows = $GLOBALS['SITE_DB']->query_select('poll', array('id', 'question'), NULL, 'ORDER BY id DESC', 100);
$list->attach(form_input_list_entry('', false, do_lang('NA')));
foreach ($rows as $row) {
$list->attach(form_input_list_entry(strval($row['id']), $has_default && strval($row['id']) == $default, get_translated_text($row['question'])));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($block . ':' . $parameter == 'main_awards:param') {
$list = new ocp_tempcode();
$rows = $GLOBALS['SITE_DB']->query_select('award_types', array('id', 'a_title'));
foreach ($rows as $row) {
$list->attach(form_input_list_entry(strval($row['id']), $has_default && strval($row['id']) == $default, get_translated_text($row['a_title'])));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($parameter == 'zone' || $parameter == 'param' && $block == 'main_as_zone_access') {
$list = new ocp_tempcode();
$list->attach(form_input_list_entry('_SEARCH', $default == ''));
$list->attach(nice_get_zones($default == '' ? NULL : $default));
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif (($parameter == 'forum' || $parameter == 'param' && in_array($block, array('main_forum_topics'))) && get_forum_type() == 'ocf') {
require_code('ocf_forums');
require_code('ocf_forums2');
if (!addon_installed('ocf_forum')) {
warn_exit(do_lang_tempcode('NO_FORUM_INSTALLED'));
}
$list = ocf_get_forum_tree_secure(NULL, NULL, true, explode(',', $default));
$fields->attach(form_input_multi_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list));
} elseif ($parameter == 'param' && in_array($block, array('side_root_galleries', 'main_gallery_tease', 'main_gallery_embed', 'main_image_fader'))) {
require_code('galleries');
$list = nice_get_gallery_tree($default);
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($parameter == 'param' && in_array($block, array('main_download_category'))) {
require_code('downloads');
$list = nice_get_download_category_tree($default == '' ? NULL : intval($default));
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($parameter == 'param' && in_array($block, array('main_contact_catalogues')) || $parameter == 'catalogue' && in_array($block, array('main_recent_cc_entries'))) {
require_code('catalogues');
$list = nice_get_catalogues($default, false);
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($parameter == 'param' && in_array($block, array('main_cc_embed')) && $GLOBALS['SITE_DB']->query_value('catalogue_categories', 'COUNT(*)') < 500) {
$list = new ocp_tempcode();
$categories = $GLOBALS['SITE_DB']->query_select('catalogue_categories', array('id', 'cc_title', 'c_name'), NULL, 'ORDER BY c_name,id');
$last_cat = mixed();
foreach ($categories as $cat) {
if (is_null($last_cat) || $cat['c_name'] != $last_cat) {
$list->attach(form_input_list_entry($cat['c_name'], $has_default && $cat['c_name'] == $default, $cat['c_name'], false, true));
$last_cat = $cat['c_name'];
}
$list->attach(form_input_list_entry(strval($cat['id']), $has_default && strval($cat['id']) == $default, get_translated_text($cat['cc_title'])));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($parameter == 'param' && in_array($block, array('main_banner_wave', 'main_topsites'))) {
require_code('banners');
$list = nice_get_banner_types($default);
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($parameter == 'param' && in_array($block, array('main_newsletter_signup'))) {
$list = new ocp_tempcode();
$rows = $GLOBALS['SITE_DB']->query_select('newsletters', array('id', 'title'));
foreach ($rows as $newsletter) {
$list->attach(form_input_list_entry(strval($newsletter['id']), $has_default && strval($newsletter['id']) == $default, get_translated_text($newsletter['title'])));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif ($parameter == 'filter' && in_array($block, array('bottom_news', 'main_news', 'side_news', 'side_news_archive'))) {
require_code('news');
$list = nice_get_news_categories($default == '' ? -1 : intval($default));
$fields->attach(form_input_multi_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list));
} elseif ($parameter == 'font') {
$fonts = array();
$dh = opendir(get_file_base() . '/data/fonts');
while ($f = readdir($dh)) {
if (substr($f, -4) == '.ttf') {
$fonts[] = substr($f, 0, strlen($f) - 4);
}
}
closedir($dh);
$dh = opendir(get_custom_file_base() . '/data_custom/fonts');
while ($f = readdir($dh)) {
if (substr($f, -4) == '.ttf') {
$fonts[] = substr($f, 0, strlen($f) - 4);
}
}
closedir($dh);
$fonts = array_unique($fonts);
sort($fonts);
$list = new ocp_tempcode();
foreach ($fonts as $font) {
$list->attach(form_input_list_entry($font, $font == $default));
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif (preg_match('#' . do_lang('BLOCK_IND_EITHER') . ' (.+)#i', $description, $matches) != 0) {
$description = preg_replace('# \\(' . do_lang('BLOCK_IND_EITHER') . '.*\\)#U', '', $description);
$list = new ocp_tempcode();
$matches2 = array();
$num_matches = preg_match_all('#\'([^\']*)\'="([^"]*)"#', $matches[1], $matches2);
if ($num_matches != 0) {
for ($i = 0; $i < $num_matches; $i++) {
$list->attach(form_input_list_entry($matches2[1][$i], $matches2[1][$i] == $default, $matches2[2][$i]));
}
} else {
$num_matches = preg_match_all('#\'([^\']*)\'#', $matches[1], $matches2);
for ($i = 0; $i < $num_matches; $i++) {
$list->attach(form_input_list_entry($matches2[1][$i], $matches2[1][$i] == $default));
}
}
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
} elseif (preg_match('#\\(' . do_lang('BLOCK_IND_HOOKTYPE') . ': \'([^\'/]*)/([^\'/]*)\'\\)#i', $description, $matches) != 0) {
$description = preg_replace('#\\s*\\(' . do_lang('BLOCK_IND_HOOKTYPE') . ': \'([^\'/]*)/([^\'/]*)\'\\)#i', '', $description);
$list = new ocp_tempcode();
$hooks = find_all_hooks($matches[1], $matches[2]);
ksort($hooks);
if ($default == '' && $has_default) {
$list->attach(form_input_list_entry('', true));
}
foreach (array_keys($hooks) as $hook) {
if ($block == 'side_tag_cloud') {
if (substr($hook, -1) == 'y') {
$hook .= ',' . substr($hook, 0, strlen($hook) - 1) . 'ies';
} elseif (substr($hook, -1) != 's' && $hook != 'quiz') {
$hook .= ',' . $hook . 's';
}
}
$list->attach(form_input_list_entry($hook, $hook == $default));
}
if ($block == 'main_search' && $parameter == 'limit_to' || $block == 'side_tag_cloud') {
$fields->attach(form_input_multi_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, 0));
} else {
$fields->attach(form_input_list(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $list, NULL, false, false));
}
} elseif (($default == '0' || $default == '1' || strpos($description, '\'0\'') !== false || strpos($description, '\'1\'') !== false) && do_lang('BLOCK_IND_WHETHER') != '' && strpos(strtolower($description), do_lang('BLOCK_IND_WHETHER')) !== false) {
$fields->attach(form_input_tick(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $default == '1'));
} elseif (do_lang('BLOCK_IND_NUMERIC') != '' && strpos($description, do_lang('BLOCK_IND_NUMERIC')) !== false) {
$fields->attach(form_input_integer(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $default == '' ? NULL : intval($default), false));
} else {
$fields->attach(form_input_line(ucwords(str_replace('_', ' ', $parameter)), escape_html($description), $parameter, $default, false));
}
}
}
$keep = symbol_tempcode('KEEP');
$post_url = find_script('block_helper') . '?type=step3&field_name=' . get_param('field_name') . $keep->evaluate();
if (get_param('utheme', '') != '') {
$post_url .= '&utheme=' . get_param('utheme');
}
$post_url .= '&block_type=' . $type_wanted;
if (get_param('save_to_id', '') != '') {
$post_url .= '&save_to_id=' . urlencode(get_param('save_to_id'));
$submit_name = do_lang_tempcode('SAVE');
// Allow remove option
$fields->attach(do_template('FORM_SCREEN_FIELD_SPACER', array('SECTION_HIDDEN' => false, 'TITLE' => do_lang_tempcode('ACTIONS'), 'HELP' => '')));
$fields->attach(form_input_tick(do_lang_tempcode('REMOVE'), '', '_delete', false));
} else {
$submit_name = do_lang_tempcode('USE');
}
$block_description = do_lang('BLOCK_' . $block . '_DESCRIPTION', NULL, NULL, NULL, NULL, false);
if (is_null($block_description)) {
$block_description = '';
}
$block_use = do_lang('BLOCK_' . $block . '_USE', NULL, NULL, NULL, NULL, false);
if (is_null($block_use)) {
$block_use = '';
}
if ($block_description == '' && $block_use == '') {
$text = new ocp_tempcode();
} else {
$text = do_lang_tempcode('BLOCK_HELPER_2', escape_html(cleanup_block_name($block)), escape_html($block_description), escape_html($block_use));
}
$hidden = form_input_hidden('block', $block);
$content = do_template('FORM_SCREEN', array('_GUID' => '270058349d048a8be6570bba97c81fa2', 'TITLE' => $title, 'TARGET' => '_self', 'SKIP_VALIDATION' => true, 'FIELDS' => $fields, 'URL' => $post_url, 'TEXT' => $text, 'SUBMIT_NAME' => $submit_name, 'HIDDEN' => $hidden, 'PREVIEW' => true, 'THEME' => $GLOBALS['FORUM_DRIVER']->get_theme()));
if ($fields->is_empty()) {
$type = 'step3';
}
}
if ($type == 'step3') {
require_javascript('javascript_posting');
require_javascript('javascript_editing');
$field_name = get_param('field_name');
$bparameters = '';
$bparameters_xml = '';
$bparameters_tempcode = '';
$block = trim(either_param('block'));
$parameters = get_block_parameters($block);
$parameters[] = 'failsafe';
$parameters[] = 'cache';
$parameters[] = 'quick_cache';
if (in_array('param', $parameters)) {
$_parameters = array('param');
unset($parameters[array_search('param', $parameters)]);
$parameters = array_merge($_parameters, $parameters);
}
foreach ($parameters as $parameter) {
$value = post_param($parameter, NULL);
if (is_null($value)) {
if (post_param_integer('tick_on_form__' . $parameter, NULL) === NULL) {
continue;
}
// If not on form, continue, otherwise must be 0
$value = '0';
}
if ($value != '' && ($parameter != 'failsafe' || $value == '1') && ($parameter != 'cache' || $value != block_cache_default($block)) && ($parameter != 'quick_cache' || $value == '1')) {
if ($parameter == 'param') {
$bparameters .= '="' . str_replace('"', '\\"', $value) . '"';
} else {
$bparameters .= ' ' . $parameter . '="' . str_replace('"', '\\"', $value) . '"';
}
$bparameters_xml = '<blockParam key="' . escape_html($parameter) . '" val="' . escape_html($value) . '" />';
$bparameters_tempcode .= ',' . $parameter . '=' . str_replace(',', '\\,', $value);
}
}
$comcode = '[block' . $bparameters . ']' . $block . '[/block]';
$comcode_xml = '<block>' . $bparameters_xml . $block . '</block>';
$tempcode = '{$BLOCK,block=' . $block . $bparameters_tempcode . '}';
if ($type_wanted == 'template') {
$comcode = $tempcode;
}
// This is what will be written in
$comcode_semihtml = comcode_to_tempcode($comcode, NULL, false, 60, NULL, NULL, true, false, false);
$content = do_template('BLOCK_HELPER_DONE', array('_GUID' => '575d6c8120d6001c8156560be518f296', 'TITLE' => $title, 'FIELD_NAME' => $field_name, 'BLOCK' => $block, 'COMCODE_XML' => $comcode_xml, 'COMCODE' => $comcode, 'COMCODE_SEMIHTML' => $comcode_semihtml));
}
global $EXTRA_HEAD;
if (!isset($EXTRA_HEAD)) {
$EXTRA_HEAD = new ocp_tempcode();
}
$EXTRA_HEAD->attach('<meta name="robots" content="noindex" />');
// XHTMLXHTML
$echo = do_template('POPUP_HTML_WRAP', array('TITLE' => do_lang_tempcode('BLOCK_HELPER'), 'CONTENT' => $content));
$echo->handle_symbol_preprocessing();
$echo->evaluate_echo();
}
