/**
* Standard modular run function.
*
* @param array A map of parameters.
* @return tempcode The result of execution.
*/
function run($map)
{
require_code('textfiles');
$file = array_key_exists('param', $map) ? $map['param'] : 'admin_notes';
$title = array_key_exists('title', $map) ? $map['title'] : do_lang('NOTES');
$lang_none = array_key_exists('lang_none', $map) ? $map['lang_none'] : '0';
$scrolls = array_key_exists('scrolls', $map) ? $map['scrolls'] : '0';
$lang = $lang_none == '1' ? NULL : '';
$file = filter_naughty($file, true);
$new = post_param('new', NULL);
if (!is_null($new)) {
$hooks = find_all_hooks('blocks', 'main_notes');
foreach (array_keys($hooks) as $hook) {
require_code('hooks/blocks/main_notes/' . filter_naughty_harsh($hook));
$ob = object_factory('Hook_notes_' . filter_naughty_harsh($hook), true);
if (is_null($ob)) {
continue;
}
$ob->run($file);
}
write_text_file($file, $lang, $new);
log_it('NOTES', $file);
attach_message(do_lang_tempcode('SUCCESS'), 'inform');
}
$contents = read_text_file($file, $lang, true);
$post_url = get_self_url();
$map_comcode = '';
foreach ($map as $key => $val) {
$map_comcode .= ' ' . $key . '="' . addslashes($val) . '"';
}
return do_template('BLOCK_MAIN_NOTES', array('_GUID' => 'f737053505de3bd8ccfe806ec014b8fb', 'TITLE' => $title, 'BLOCK_NAME' => 'main_notes', 'MAP' => $map_comcode, 'CONTENTS' => $contents, 'SCROLLS' => array_key_exists('scrolls', $map) && $map['scrolls'] == '1', 'URL' => $post_url));
}
/**
* Add a banner to the database, and return the new ID of that banner in the database.
*
* @param ID_TEXT The name of the banner
* @param URLPATH The URL to the banner image
* @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)
* @param SHORT_TEXT The caption of the banner
* @param ?integer The number of hits the banner may have (NULL: not applicable for this banner type)
* @range 0 max
* @param URLPATH The URL to the site the banner leads to
* @param integer The banners "importance modulus"
* @range 1 max
* @param LONG_TEXT Any notes associated with the banner
* @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)
* @param ?MEMBER 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 ?TIME The time the banner was added (NULL: now)
* @param integer The number of return hits from this banners site
* @param integer The number of banner hits to this banners site
* @param integer The number of return views from this banners site
* @param integer The number of banner views to this banners site
* @param ?TIME The banner edit date (NULL: never)
*/
function add_banner_quiet($name, $imgurl, $title_text, $caption, $campaignremaining, $site_url, $importance_modulus, $notes, $the_type, $expiry_date, $submitter, $validated = 0, $b_type = '', $time = NULL, $hits_from = 0, $hits_to = 0, $views_from = 0, $views_to = 0, $edit_date = NULL)
{
if (!is_numeric($importance_modulus)) {
$importance_modulus = 3;
}
if (!is_numeric($campaignremaining)) {
$campaignremaining = NULL;
}
if (is_null($time)) {
$time = time();
}
if (is_null($submitter)) {
$submitter = get_member();
}
$test = $GLOBALS['SITE_DB']->query_value_null_ok('banners', 'name', array('name' => $name));
if (is_null($test)) {
if (!addon_installed('unvalidated')) {
$validated = 1;
}
$GLOBALS['SITE_DB']->query_insert('banners', array('b_title_text' => $title_text, 'b_type' => $b_type, 'edit_date' => $edit_date, 'add_date' => $time, 'expiry_date' => $expiry_date, 'the_type' => $the_type, 'submitter' => $submitter, 'name' => $name, 'img_url' => $imgurl, 'caption' => insert_lang_comcode($caption, 2), 'campaign_remaining' => $campaignremaining, 'site_url' => $site_url, 'importance_modulus' => $importance_modulus, 'notes' => '', 'validated' => $validated, 'hits_from' => $hits_from, 'hits_to' => $hits_to, 'views_from' => $views_from, 'views_to' => $views_to));
if (function_exists('decache')) {
decache('main_banner_wave');
decache('main_topsites');
}
log_it('ADD_BANNER', $name, $caption);
}
}
/**
* Delete a multi moderation.
*
* @param AUTO_LINK The ID of the multi moderation we are deleting.
*/
function ocf_delete_multi_moderation($id)
{
$_name = $GLOBALS['FORUM_DB']->query_value('f_multi_moderations', 'mm_name', array('id' => $id));
$name = get_translated_text($_name, $GLOBALS['FORUM_DB']);
$GLOBALS['FORUM_DB']->query_delete('f_multi_moderations', array('id' => $id), '', 1);
delete_lang($_name, $GLOBALS['FORUM_DB']);
log_it('DELETE_MULTI_MODERATION', strval($id), $name);
}
/**
* Choose a flagrant text message.
*
* @param AUTO_LINK The ID of the flagrant text message to choose
*/
function choose_flagrant($id)
{
$message = $GLOBALS['SITE_DB']->query_value('text', 'the_message', array('id' => $id));
$message = get_translated_text($message);
log_it('CHOOSE_FLAGRANT', strval($id), $message);
$GLOBALS['SITE_DB']->query_update('text', array('active_now' => 0));
$GLOBALS['SITE_DB']->query_update('text', array('activation_time' => time(), 'active_now' => 1), array('id' => $id), '', 1);
persistant_cache_delete('FLAGRANT');
}
/**
* Delete a ticket type.
*
* @param integer The ticket type
*/
function delete_ticket_type($ticket_type)
{
$_ticket_type = get_translated_text($ticket_type);
$GLOBALS['SITE_DB']->query_delete('group_category_access', array('module_the_name' => 'tickets', 'category_name' => strval($_ticket_type)));
$GLOBALS['SITE_DB']->query_delete('gsp', array('module_the_name' => 'tickets', 'category_name' => strval($_ticket_type)));
//delete_lang($ticket_type); Needed for if existing ticket looked up
$GLOBALS['SITE_DB']->query_delete('ticket_types', array('ticket_type' => $ticket_type), '', 1);
log_it('DELETE_TICKET_TYPE', strval($ticket_type), $_ticket_type);
}
/**
* Standard pointstore item configuration save function.
*/
function save_config()
{
$forw = post_param_integer('forw', -1);
if ($forw != -1) {
$dforw = post_param('dforw');
$GLOBALS['SITE_DB']->query_insert('prices', array('name' => 'forw_' . $dforw, 'price' => $forw));
log_it('POINTSTORE_ADD_MAIL_FORWARDER', $dforw);
}
$this->_do_price_mail();
}
/**
* Standard pointstore item configuration save function.
*/
function save_config()
{
$pop3 = post_param_integer('pop3', -1);
if ($pop3 != -1) {
$dpop3 = post_param('dpop3');
$GLOBALS['SITE_DB']->query_insert('prices', array('name' => 'pop3_' . $dpop3, 'price' => $pop3));
log_it('POINTSTORE_ADD_MAIL_POP3', $dpop3);
}
$this->_do_price_mail();
}
/**
* Add a multi moderation to the system.
*
* @param SHORT_TEXT The name of the multi moderation.
* @param LONG_TEXT The post text to add when applying (blank: don't add a post).
* @param ?AUTO_LINK The forum to move the topic when applying (NULL: do not move).
* @param ?BINARY The pin state after applying (NULL: unchanged).
* @param ?BINARY The sink state after applying (NULL: unchanged).
* @param ?BINARY The open state after applying (NULL: unchanged).
* @param SHORT_TEXT The forum multi code for where this multi moderation may be applied.
* @param SHORT_TEXT The title suffix.
* @return AUTO_LINK The ID of the multi moderation just added.
*/
function ocf_make_multi_moderation($name, $post_text, $move_to, $pin_state, $sink_state, $open_state, $forum_multi_code = '*', $title_suffix = '')
{
if ($move_to == -1) {
$move_to = NULL;
}
if ($pin_state == -1) {
$pin_state = NULL;
}
if ($open_state == -1) {
$open_state = NULL;
}
if ($sink_state == -1) {
$sink_state = NULL;
}
$id = $GLOBALS['FORUM_DB']->query_insert('f_multi_moderations', array('mm_name' => insert_lang($name, 3, $GLOBALS['FORUM_DB']), 'mm_post_text' => $post_text, 'mm_move_to' => $move_to, 'mm_pin_state' => $pin_state, 'mm_sink_state' => $sink_state, 'mm_open_state' => $open_state, 'mm_forum_multi_code' => $forum_multi_code, 'mm_title_suffix' => $title_suffix), true);
log_it('ADD_MULTI_MODERATION', strval($id), $name);
return $id;
}
/**
* Standard modular run function.
*
* @param array A map of parameters.
* @return tempcode The result of execution.
*/
function run($map)
{
$file = array_key_exists('param', $map) ? $map['param'] : 'admin_notes';
$title = array_key_exists('title', $map) ? $map['title'] : do_lang('NOTES');
$scrolls = array_key_exists('scrolls', $map) ? $map['scrolls'] : '0';
$new = post_param('new', NULL);
if (!is_null($new)) {
set_long_value('note_text_' . $file, $new);
log_it('NOTES', $file);
attach_message(do_lang_tempcode('SUCCESS'), 'inform');
}
$contents = get_long_value('note_text_' . $file);
if (is_null($contents)) {
$contents = '';
}
$post_url = get_self_url();
$map_comcode = '';
foreach ($map as $key => $val) {
$map_comcode .= ' ' . $key . '="' . addslashes($val) . '"';
}
return do_template('BLOCK_MAIN_NOTES', array('_GUID' => '2a9e1c512b66600583735552b56e0911', 'TITLE' => $title, 'BLOCK_NAME' => 'main_db_notes', 'MAP' => $map_comcode, 'SCROLLS' => array_key_exists('scrolls', $map) && $map['scrolls'] == '1', 'CONTENTS' => $contents, 'URL' => $post_url));
}
/**
* Standard modular install function.
*
* @param ?integer What version we're upgrading from (NULL: new install)
* @param ?integer What hack version we're upgrading from (NULL: new-install/not-upgrading-from-a-hacked-version)
*/
function install($upgrade_from = NULL, $upgrade_from_hack = NULL)
{
//first ensure there is 'buttons' banners category, and if it doesn't exist create it
$id = 'buttons';
$is_textual = 0;
$image_width = 120;
$image_height = 60;
$max_file_size = 70;
$comcode_inline = 0;
$test = $GLOBALS['SITE_DB']->query_value_null_ok('banner_types', 'id', array('id' => $id));
if (is_null($test)) {
$GLOBALS['SITE_DB']->query_insert('banner_types', array('id' => $id, 't_is_textual' => $is_textual, 't_image_width' => $image_width, 't_image_height' => $image_height, 't_max_file_size' => $max_file_size, 't_comcode_inline' => $comcode_inline));
log_it('ADD_BANNER_TYPE', $id);
}
$submitter = $GLOBALS['FORUM_DRIVER']->get_guest_id();
require_code('banners3');
//create default banners, if they don't exist
add_banner_quiet('ocportal', 'data_custom/causes/ocportal.gif', 'ocPortal', 'ocPortal', 0, 'http://ocportal.com/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('firefox', 'data_custom/causes/firefox.gif', 'Firefox', 'Firefox', 0, 'http://www.mozilla.com/firefox/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('w3cxhtml', 'data_custom/causes/w3c-xhtml.gif', 'W3C XHTML', 'W3C XHTML', 0, 'http://www.w3.org/MarkUp/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('w3ccss', 'data_custom/causes/w3c-css.gif', 'W3C CSS', 'W3C CSS', 0, 'http://www.w3.org/Style/CSS/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
//no banner image
//add_banner_quiet('w3cwcag','data_custom/causes/w3c-wcag.gif','W3C WCAG','W3C WCAG',0,'http://www.w3.org/TR/WCAG10/',3,'',0,NULL,$submitter,1,'buttons',NULL,0,0,0,0,NULL);
add_banner_quiet('cancerresearch', 'data_custom/causes/cancerresearch.gif', 'Cancer Research', 'Cancer Research', 0, 'http://www.cancerresearchuk.org/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('rspca', 'data_custom/causes/rspca.gif', 'RSPCA', 'RSPCA', 0, 'http://www.rspca.org.uk/home', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('peta', 'data_custom/causes/peta.gif', 'PETA', 'PETA', 0, 'http://www.peta.org', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('Unicef', 'data_custom/causes/unicef.gif', 'Unicef', 'Unicef', 0, 'http://www.unicef.org', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('wwf', 'data_custom/causes/wwf.gif', 'WWF', 'WWF', 0, 'http://www.wwf.org/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('greenpeace', 'data_custom/causes/greenpeace.gif', 'Greenpeace', 'Greenpeace', 0, 'http://www.greenpeace.com', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('helptheaged', 'data_custom/causes/helptheaged.gif', 'HelpTheAged', 'HelpTheAged', 0, 'http://www.helptheaged.org.uk/en-gb', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('nspcc', 'data_custom/causes/nspcc.gif', 'NSPCC', 'NSPCC', 0, 'http://www.nspcc.org.uk/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('oxfam', 'data_custom/causes/oxfam.gif', 'Oxfam', 'Oxfam', 0, 'http://www.oxfam.org', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('bringdownie6', 'data_custom/causes/bringdownie6.gif', 'BringDownIE6', 'BringDownIE6', 0, 'http://www.bringdownie6.com', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('cnd', 'data_custom/causes/cnd.gif', 'CND', 'CND', 0, 'http://www.cnduk.org/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('amnestyinternational', 'data_custom/causes/amnestyinternational.gif', 'Amnesty International', 'Amnesty International', 0, 'http://www.amnesty.org/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('bhf', 'data_custom/causes/bhf.gif', 'British Heart Foundation', 'British Heart Foundation', 0, 'http://www.bhf.org.uk/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
add_banner_quiet('gnu', 'data_custom/causes/gnu.gif', 'GNU', 'GNU', 0, 'http://www.gnu.org/', 3, '', 0, NULL, $submitter, 1, 'buttons', NULL, 0, 0, 0, 0, NULL);
}
function attach_image_to_event($event_obj, $post_obj)
{
global $attachment_urls_arr;
$post_id = $post_obj->ID;
if (isset($event_obj->ClassDescription->ImageURL)) {
log_it('found url: ' . $event_obj->ClassDescription->ImageURL);
$url = $event_obj->ClassDescription->ImageURL;
} else {
return false;
// what to use as a fallback? or use nothing?
}
if (!($id = array_search($url, $attachment_urls_arr))) {
$tmp = download_url($url);
if (is_wp_error($tmp)) {
// download failed, handle error
log_it('download error');
return false;
}
$file_array = array();
// Set variables for storage
// fix file filename for query strings
preg_match('/[^\\?]+\\.(jpg|jpe|jpeg|gif|png)/i', $url, $matches);
$file_array['name'] = basename($matches[0]);
$file_array['tmp_name'] = $tmp;
// If error storing temporarily, unlink
if (is_wp_error($tmp)) {
log_it('temp store error');
@unlink($file_array['tmp_name']);
$file_array['tmp_name'] = '';
}
// do the validation and storage stuff
$id = media_handle_sideload($file_array, $post_id, $desc);
// If error storing permanently, unlink
if (is_wp_error($id)) {
log_it('sideload error');
@unlink($file_array['tmp_name']);
}
$attachment_urls_arr[$id] = $url;
log_it("returned new attachment id {$id}");
log_it("tmp_name is: " . $file_array['tmp_name']);
// create the thumbnails
$attach_data = wp_generate_attachment_metadata($id, get_attached_file($id));
ob_start();
print_r($attach_data);
$foo = ob_get_clean();
log_it($foo);
$bar = wp_update_attachment_metadata($id, $attach_data);
log_it('wp_update_attachment_metadata returned: ' . $bar);
}
// and let the events calendar know about it
//$meta_arr = array ('_thumbnail_id' => $id );
update_post_meta($post_id, '_thumbnail_id', $id);
}
/**
* Standard modular render function for profile tabs edit hooks.
*
* @param MEMBER The ID of the member who is being viewed
* @param MEMBER The ID of the member who is doing the viewing
* @param boolean Whether to leave the tab contents NULL, if tis hook supports it, so that AJAX can load it later
* @return ?array A tuple: The tab title, the tab body text (may be blank), the tab fields, extra Javascript (may be blank) the suggested tab order, hidden fields (optional) (NULL: if $leave_to_ajax_if_possible was set)
*/
function render_tab($member_id_of, $member_id_viewing, $leave_to_ajax_if_possible = false)
{
$order = 0;
// Actualiser
if (post_param('submitting_settings_tab', NULL) !== NULL) {
require_code('ocf_members_action2');
$is_ldap = ocf_is_ldap_member($member_id_of);
$is_httpauth = ocf_is_httpauth_member($member_id_of);
$is_remote = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_password_compat_scheme') == 'remote';
if ($is_ldap || $is_httpauth || $is_remote || $member_id_of != $member_id_viewing && !has_specific_permission($member_id_viewing, 'assume_any_member')) {
$password = NULL;
} else {
$password = post_param('edit_password');
if ($password == '') {
$password = NULL;
} else {
$password_confirm = trim(post_param('password_confirm'));
if ($password != $password_confirm) {
warn_exit(make_string_tempcode(escape_html(do_lang('PASSWORD_MISMATCH'))));
}
}
}
$custom_fields = ocf_get_all_custom_fields_match($GLOBALS['FORUM_DRIVER']->get_members_groups($member_id_of), $member_id_of != $member_id_viewing && !has_specific_permission($member_id_viewing, 'view_any_profile_field') ? 1 : NULL, $member_id_of != $member_id_viewing ? NULL : 1, $member_id_of != $member_id_viewing ? NULL : 1);
$actual_custom_fields = ocf_read_in_custom_fields($custom_fields, $member_id_of);
$pt_allow = array_key_exists('pt_allow', $_POST) ? implode(',', $_POST['pt_allow']) : '';
$tmp_groups = $GLOBALS['OCF_DRIVER']->get_usergroup_list(true, true);
$all_pt_allow = '';
foreach (array_keys($tmp_groups) as $key) {
if ($key != db_get_first_id()) {
if ($all_pt_allow != '') {
$all_pt_allow .= ',';
}
$all_pt_allow .= strval($key);
}
}
if ($pt_allow == $all_pt_allow) {
$pt_allow = '*';
}
$pt_rules_text = post_param('pt_rules_text', NULL);
if (has_specific_permission($member_id_viewing, 'member_maintenance')) {
$validated = post_param_integer('validated', 0);
$primary_group = $is_ldap || !has_specific_permission($member_id_viewing, 'assume_any_member') ? NULL : post_param_integer('primary_group', NULL);
$is_perm_banned = post_param_integer('is_perm_banned', 0);
$old_is_perm_banned = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_is_perm_banned');
if ($old_is_perm_banned != $is_perm_banned) {
if ($is_perm_banned == 1) {
ocf_ban_member($member_id_of);
} else {
ocf_unban_member($member_id_of);
}
}
$highlighted_name = post_param_integer('highlighted_name', 0);
if (has_specific_permission($member_id_viewing, 'probate_members')) {
$on_probation_until = get_input_date('on_probation_until');
$current__on_probation_until = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id_of, 'm_on_probation_until');
if ((is_null($on_probation_until) || $on_probation_until <= time()) && $current__on_probation_until > time()) {
log_it('STOP_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
} elseif (!is_null($on_probation_until) && $on_probation_until > time() && $current__on_probation_until <= time()) {
log_it('START_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
} elseif (!is_null($on_probation_until) && $current__on_probation_until > $on_probation_until && $on_probation_until > time() && $current__on_probation_until > time()) {
log_it('REDUCE_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
} elseif (!is_null($on_probation_until) && $current__on_probation_until < $on_probation_until && $on_probation_until > time() && $current__on_probation_until > time()) {
log_it('EXTEND_PROBATION', strval($member_id_of), $GLOBALS['FORUM_DRIVER']->get_username($member_id_of));
}
} else {
$on_probation_until = NULL;
}
} else {
$validated = NULL;
$primary_group = NULL;
$highlighted_name = NULL;
$on_probation_until = NULL;
}
if (has_actual_page_access($member_id_viewing, 'admin_ocf_join') || has_specific_permission($member_id_of, 'rename_self')) {
$username = $is_ldap || $is_remote ? NULL : post_param('edit_username', NULL);
} else {
$username = NULL;
}
$email = post_param('email_address', NULL);
if (!is_null($email)) {
$email = trim($email);
}
$theme = post_param('theme', NULL);
if ($is_remote) {
$preview_posts = NULL;
$zone_wide = NULL;
$auto_monitor_contrib_content = NULL;
$views_signatures = NULL;
$timezone = NULL;
} else {
$preview_posts = post_param_integer('preview_posts', 0);
$zone_wide = post_param_integer('zone_wide', 0);
$auto_monitor_contrib_content = NULL;
//post_param_integer('auto_monitor_contrib_content',0); Moved to notifications tab
$views_signatures = post_param_integer('views_signatures', 0);
$timezone = post_param('timezone', get_site_timezone());
}
ocf_edit_member($member_id_of, $email, $preview_posts, post_param_integer('dob_day', -1), post_param_integer('dob_month', -1), post_param_integer('dob_year', -1), $timezone, $primary_group, $actual_custom_fields, $theme, post_param_integer('reveal_age', 0), $views_signatures, $auto_monitor_contrib_content, post_param('language', NULL), post_param_integer('allow_emails', 0), post_param_integer('allow_emails_from_staff', 0), $validated, $username, $password, $zone_wide, $highlighted_name, $pt_allow, $pt_rules_text, $on_probation_until);
if (!array_key_exists('secondary_groups', $_POST)) {
$_POST['secondary_groups'] = array();
}
require_code('ocf_groups_action2');
$members_groups = $GLOBALS['OCF_DRIVER']->get_members_groups($member_id_of);
$group_count = $GLOBALS['FORUM_DB']->query_value('f_groups', 'COUNT(*)');
$groups = list_to_map('id', $GLOBALS['FORUM_DB']->query_select('f_groups', array('*'), $group_count > 200 ? array('g_is_private_club' => 0) : NULL));
foreach ($_POST['secondary_groups'] as $group_id) {
$group = $groups[intval($group_id)];
if ($group['g_hidden'] == 1 && !in_array($group['id'], $members_groups) && !has_specific_permission($member_id_viewing, 'see_hidden_groups')) {
continue;
}
if (!in_array($group['id'], $members_groups) && (has_specific_permission($member_id_viewing, 'assume_any_member') || $group['g_open_membership'] == 1)) {
ocf_add_member_to_group($member_id_of, $group['id']);
}
}
foreach ($members_groups as $group_id) {
if (!in_array(strval($group_id), $_POST['secondary_groups'])) {
ocf_member_leave_group($group_id, $member_id_of);
}
}
$GLOBALS['FORUM_DB']->query('DELETE FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_member_known_login_ips WHERE i_member_id=' . strval($member_id_of) . ' AND ' . db_string_not_equal_to('i_val_code', ''));
// So any re-confirms can happen
if (addon_installed('awards')) {
require_code('awards');
handle_award_setting('member', strval($member_id_of));
}
attach_message(do_lang_tempcode('SUCCESS_SAVE'), 'inform');
}
if ($leave_to_ajax_if_possible) {
return NULL;
}
// UI
$title = do_lang_tempcode('SETTINGS');
$myrow = $GLOBALS['FORUM_DRIVER']->get_member_row($member_id_of);
if (is_null($myrow)) {
warn_exit(do_lang_tempcode('USER_NO_EXIST'));
}
require_code('ocf_members_action2');
list($fields, $hidden) = ocf_get_member_fields_settings(false, $member_id_of, NULL, $myrow['m_email_address'], $myrow['m_preview_posts'], $myrow['m_dob_day'], $myrow['m_dob_month'], $myrow['m_dob_year'], get_users_timezone($member_id_of), $myrow['m_theme'], $myrow['m_reveal_age'], $myrow['m_views_signatures'], $myrow['m_auto_monitor_contrib_content'], $myrow['m_language'], $myrow['m_allow_emails'], $myrow['m_allow_emails_from_staff'], $myrow['m_validated'], $myrow['m_primary_group'], $myrow['m_username'], $myrow['m_is_perm_banned'], '', $myrow['m_zone_wide'], $myrow['m_highlighted_name'], $myrow['m_pt_allow'], get_translated_text($myrow['m_pt_rules_text'], $GLOBALS['FORUM_DB']), $myrow['m_on_probation_until']);
// Awards?
if (addon_installed('awards')) {
require_code('awards');
$fields->attach(get_award_fields('member', strval($member_id_of)));
}
$redirect = get_param('redirect', NULL);
if (!is_null($redirect)) {
$hidden->attach(form_input_hidden('redirect', $redirect));
}
$hidden->attach(form_input_hidden('submitting_settings_tab', '1'));
$javascript = "\n\t\t\tvar form=document.getElementById('email_address').form;\n\t\t\tform.prior_profile_edit_submit=form.onsubmit;\n\t\t\tform.onsubmit=function()\n\t\t\t\t{\n\t\t\t\t\tif (typeof form.elements['edit_password']!='undefined')\n\t\t\t\t\t{\n\t\t\t\t\t\tif ((form.elements['password_confirm']) && (form.elements['password_confirm'].value!=form.elements['edit_password'].value))\n\t\t\t\t\t\t{\n\t\t\t\t\t\t\twindow.fauxmodal_alert('" . php_addslashes(do_lang('PASSWORD_MISMATCH')) . "');\n\t\t\t\t\t\t\treturn false;\n\t\t\t\t\t\t}\n\t\t\t\t\t}\n\t\t\t\t\tif (typeof form.prior_profile_edit_submit!='undefined' && form.prior_profile_edit_submit) return form.prior_profile_edit_submit();\n\t\t\t\t\treturn true;\n\t\t\t\t};\n\t\t";
$text = '';
return array($title, $fields, $text, $javascript, $order, $hidden);
}
/**
* Make a custom profile field.
*
* @param SHORT_TEXT Name of the field.
* @param BINARY Whether the field is locked (i.e. cannot be deleted from the system).
* @param SHORT_TEXT Description of the field.
* @param LONG_TEXT The default value for the field.
* @param BINARY Whether the field is publicly viewable.
* @param BINARY Whether the field is viewable by the owner.
* @param BINARY Whether the field may be set by the owner.
* @param BINARY Whether the field is encrypted.
* @param ID_TEXT The type of the field.
* @set short_text long_text short_trans long_trans integer upload picture url list tick float
* @param BINARY Whether it is required that every member have this field filled in.
* @param BINARY Whether this field is shown in posts and places where member details are highlighted (such as an image in a member gallery).
* @param BINARY Whether this field is shown in preview places, such as in the teaser for a member gallery.
* @param ?integer The order of this field relative to other fields (NULL: next).
* @param LONG_TEXT The usergroups that this field is confined to (comma-separated list).
* @param boolean Whether to check that no field has this name already.
* @param BINARY Whether the field is to be shown on the join form
* @return AUTO_LINK The ID of the new custom profile field.
*/
function ocf_make_custom_field($name, $locked = 0, $description = '', $default = '', $public_view = 0, $owner_view = 0, $owner_set = 0, $encrypted = 0, $type = 'long_text', $required = 0, $show_in_posts = 0, $show_in_post_previews = 0, $order = NULL, $only_group = '', $no_name_dupe = false, $show_on_join_form = 0)
{
$dbs_back = $GLOBALS['NO_DB_SCOPE_CHECK'];
$GLOBALS['NO_DB_SCOPE_CHECK'] = true;
if ($only_group == '-1') {
$only_group = '';
}
// Can only encrypt things if encryption support is available
require_code('encryption');
//if (!is_encryption_enabled()) $encrypted=0;
// Can't have publicly-viewable encrypted fields
if ($encrypted == 1) {
$public_view = 0;
}
if ($no_name_dupe) {
$test = $GLOBALS['FORUM_DB']->query_value_null_ok('f_custom_fields f LEFT JOIN ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'translate t ON f.cf_name=t.id', 'f.id', array('text_original' => $name));
if (!is_null($test)) {
$GLOBALS['NO_DB_SCOPE_CHECK'] = $dbs_back;
return $test;
}
}
if (is_null($order)) {
$order = $GLOBALS['FORUM_DB']->query_value('f_custom_fields', 'MAX(cf_order)');
if (is_null($order)) {
$order = 0;
} else {
$order++;
}
}
$map = array('cf_name' => insert_lang($name, 2, $GLOBALS['FORUM_DB']), 'cf_locked' => $locked, 'cf_description' => insert_lang($description, 2, $GLOBALS['FORUM_DB']), 'cf_default' => $default, 'cf_public_view' => $public_view, 'cf_owner_view' => $owner_view, 'cf_owner_set' => $owner_set, 'cf_type' => $type, 'cf_required' => $required, 'cf_show_in_posts' => $show_in_posts, 'cf_show_in_post_previews' => $show_in_post_previews, 'cf_order' => $order, 'cf_only_group' => $only_group, 'cf_show_on_join_form' => $show_on_join_form);
$id = $GLOBALS['FORUM_DB']->query_insert('f_custom_fields', $map + array('cf_encrypted' => $encrypted), true, true);
if (is_null($id)) {
$id = $GLOBALS['FORUM_DB']->query_insert('f_custom_fields', $map, true);
}
// Still upgrading, cf_encrypted does not exist yet
list($_type, $index) = get_cpf_storage_for($type);
require_code('database_action');
// ($index?'#':'').
$GLOBALS['FORUM_DB']->add_table_field('f_member_custom_fields', 'field_' . strval($id), $_type);
// Default will be made explicit when we insert rows
$indices_count = $GLOBALS['FORUM_DB']->query_value('db_meta_indices', 'COUNT(*)', array('i_table' => 'f_member_custom_fields'));
if ($indices_count < 60) {
if ($index) {
if ($_type != 'LONG_TEXT') {
$GLOBALS['FORUM_DB']->create_index('f_member_custom_fields', 'mcf' . strval($id), array('field_' . strval($id)), 'mf_member_id');
}
if (strpos($_type, '_TEXT') !== false) {
$GLOBALS['FORUM_DB']->create_index('f_member_custom_fields', '#mcf_ft_' . strval($id), array('field_' . strval($id)), 'mf_member_id');
}
} elseif (strpos($type, 'trans') !== false || $type == 'posting_field') {
$GLOBALS['FORUM_DB']->create_index('f_member_custom_fields', 'mcf' . strval($id), array('field_' . strval($id)), 'mf_member_id');
// For joins
}
}
log_it('ADD_CUSTOM_PROFILE_FIELD', strval($id), $name);
$GLOBALS['NO_DB_SCOPE_CHECK'] = $dbs_back;
return $id;
}
/**
* The actualiser for uploading a file.
*
* @return tempcode The UI.
*/
function module_do_upload()
{
if (!has_specific_permission(get_member(), 'upload_filedump')) {
access_denied('I_ERROR');
}
$title = get_page_title('FILEDUMP_UPLOAD');
if (function_exists('set_time_limit')) {
@set_time_limit(0);
}
// Slowly uploading a file can trigger time limit, on some servers
$place = filter_naughty(post_param('place'));
require_code('uploads');
if (!is_swf_upload(true) && (!array_key_exists('file', $_FILES) || !is_uploaded_file($_FILES['file']['tmp_name']))) {
$attach_name = 'file';
$max_size = get_max_file_size();
if (isset($_FILES[$attach_name]) && ($_FILES[$attach_name]['error'] == 1 || $_FILES[$attach_name]['error'] == 2)) {
warn_exit(do_lang_tempcode('FILE_TOO_BIG', integer_format($max_size)));
} elseif (isset($_FILES[$attach_name]) && ($_FILES[$attach_name]['error'] == 3 || $_FILES[$attach_name]['error'] == 6 || $_FILES[$attach_name]['error'] == 7)) {
warn_exit(do_lang_tempcode('ERROR_UPLOADING_' . strval($_FILES[$attach_name]['error'])));
} else {
warn_exit(do_lang_tempcode('ERROR_UPLOADING'));
}
}
$file = $_FILES['file']['name'];
if (get_magic_quotes_gpc()) {
$file = stripslashes($file);
}
if (!has_specific_permission(get_member(), 'upload_anything_filedump') || get_file_base() != get_custom_file_base()) {
check_extension($file);
}
$file = str_replace('.', '-', basename($file, '.' . get_file_extension($file))) . '.' . get_file_extension($file);
if (!file_exists(get_custom_file_base() . '/uploads/filedump' . $place . $file)) {
$max_size = get_max_file_size();
if ($_FILES['file']['size'] > $max_size) {
warn_exit(do_lang_tempcode('FILE_TOO_BIG', integer_format(intval($max_size))));
}
$full = get_custom_file_base() . '/uploads/filedump' . $place . $file;
if (is_swf_upload(true)) {
@rename($_FILES['file']['tmp_name'], $full) or warn_exit(do_lang_tempcode('FILE_MOVE_ERROR', escape_html($file), escape_html('uploads/filedump' . $place)));
} else {
@move_uploaded_file($_FILES['file']['tmp_name'], $full) or warn_exit(do_lang_tempcode('FILE_MOVE_ERROR', escape_html($file), escape_html('uploads/filedump' . $place)));
}
fix_permissions($full);
sync_file($full);
$return_url = build_url(array('page' => '_SELF', 'place' => $place), '_SELF');
$test = $GLOBALS['SITE_DB']->query_value_null_ok('filedump', 'description', array('name' => $file, 'path' => $place));
if (!is_null($test)) {
delete_lang($test);
}
$GLOBALS['SITE_DB']->query_delete('filedump', array('name' => $file, 'path' => $place), '', 1);
$description = post_param('description');
$GLOBALS['SITE_DB']->query_insert('filedump', array('name' => $file, 'path' => $place, 'the_member' => get_member(), 'description' => insert_lang_comcode($description, 3)));
require_code('notifications');
$subject = do_lang('FILEDUMP_NOTIFICATION_MAIL_SUBJECT', get_site_name(), $file, $place);
$mail = do_lang('FILEDUMP_NOTIFICATION_MAIL', comcode_escape(get_site_name()), comcode_escape($file), array(comcode_escape($place), comcode_escape($description)));
dispatch_notification('filedump', $place, $subject, $mail);
log_it('FILEDUMP_UPLOAD', $file, $place);
if (has_actual_page_access($GLOBALS['FORUM_DRIVER']->get_guest_id(), get_page_name(), get_zone_name())) {
syndicate_described_activity('filedump:ACTIVITY_FILEDUMP_UPLOAD', $place . '/' . $file, '', '', '', '', '', 'filedump');
}
return redirect_screen($title, $return_url, do_lang_tempcode('SUCCESS'));
} else {
warn_exit(do_lang_tempcode('OVERWRITE_ERROR'));
}
return new ocp_tempcode();
}
/**
* Check to see if a member deserves promotion, and handle it.
*
* @param ?MEMBER The member (NULL: current member).
*/
function ocf_member_handle_promotion($member_id = NULL)
{
if (!addon_installed('points')) {
return;
}
if (get_page_name() == 'admin_import') {
return;
}
if (is_null($member_id)) {
$member_id = get_member();
}
require_code('ocf_members');
if (ocf_is_ldap_member($member_id)) {
return;
}
require_code('points');
$total_points = total_points($member_id);
$groups = $GLOBALS['OCF_DRIVER']->get_members_groups($member_id, false, true);
$or_list = '';
foreach ($groups as $id) {
if ($or_list != '') {
$or_list .= ' OR ';
}
$or_list .= 'id=' . strval($id);
}
$promotions = $GLOBALS['FORUM_DB']->query('SELECT id,g_promotion_target FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_groups WHERE (' . $or_list . ') AND g_promotion_target IS NOT NULL AND g_promotion_threshold<=' . strval((int) $total_points) . ' ORDER BY g_promotion_threshold');
$promotes_today = array();
foreach ($promotions as $promotion) {
$_p = $promotion['g_promotion_target'];
if (!array_key_exists($_p, $groups) && !array_key_exists($_p, $promotes_today)) {
// If it is our primary
if ($GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id, 'm_primary_group') == $promotion['id']) {
$GLOBALS['FORUM_DB']->query_update('f_members', array('m_primary_group' => $_p), array('id' => $member_id), '', 1);
} else {
$GLOBALS['FORUM_DB']->query_delete('f_group_members', array('gm_member_id' => $member_id, 'gm_group_id' => $_p), '', 1);
$GLOBALS['FORUM_DB']->query_insert('f_group_members', array('gm_validated' => 1, 'gm_member_id' => $member_id, 'gm_group_id' => $_p), false, true);
$GLOBALS['FORUM_DB']->query_delete('f_group_members', array('gm_member_id' => $member_id, 'gm_group_id' => $promotion['id']), '', 1);
// It's a transition, so remove old membership
}
// Carefully update run-time cacheing
global $USERS_GROUPS_CACHE;
foreach (array(true, false) as $a) {
foreach (array(true, false) as $b) {
if (isset($USERS_GROUPS_CACHE[$member_id][$a][$b])) {
$groups = $USERS_GROUPS_CACHE[$member_id][$a][$b];
$pos = array_search($_p, $groups);
if ($pos !== false) {
unset($groups[$pos]);
}
$groups[] = $promotion['id'];
$USERS_GROUPS_CACHE[$member_id][$a][$b] = $groups;
}
}
}
$promotes_today[$_p] = 1;
}
}
if (count($promotes_today) != 0) {
$name = $GLOBALS['OCF_DRIVER']->get_member_row_field($member_id, 'm_username');
log_it('MEMBER_PROMOTED_AUTOMATICALLY', strval($member_id), $name);
}
}
/**
* The actualiser to contact a member.
*
* @return tempcode The UI
*/
function actual()
{
if (addon_installed('captcha')) {
require_code('captcha');
enforce_captcha();
}
$member_id = get_param_integer('id');
$email_address = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id, 'm_email_address');
if (is_null($email_address)) {
fatal_exit(do_lang_tempcode('INTERNAL_ERROR'));
}
$to_name = $GLOBALS['FORUM_DRIVER']->get_username($member_id);
breadcrumb_set_parents(array(array('_SELF:_SELF:misc', do_lang_tempcode('EMAIL_MEMBER', escape_html($to_name)))));
if (is_null($to_name)) {
warn_exit(do_lang_tempcode('USER_NO_EXIST'));
}
$from_email = trim(post_param('email_address'));
require_code('type_validation');
if (!is_valid_email_address($from_email)) {
warn_exit(do_lang_tempcode('INVALID_EMAIL_ADDRESS'));
}
$from_name = post_param('name');
$title = get_page_title('EMAIL_MEMBER', true, array(escape_html($GLOBALS['FORUM_DRIVER']->get_username($member_id))));
require_code('mail');
$attachments = array();
$size_so_far = 0;
require_code('uploads');
is_swf_upload(true);
foreach ($_FILES as $file) {
if (is_swf_upload() || is_uploaded_file($file['tmp_name'])) {
$attachments[$file['tmp_name']] = $file['name'];
$size_so_far += $file['size'];
} else {
if (defined('UPLOAD_ERR_NO_FILE') && array_key_exists('error', $file) && $file['error'] != UPLOAD_ERR_NO_FILE) {
warn_exit(do_lang_tempcode('ERROR_UPLOADING_ATTACHMENTS'));
}
}
}
$size = $GLOBALS['FORUM_DRIVER']->get_member_row_field($member_id, 'm_max_email_attach_size_mb');
if ($size_so_far > $size * 1024 * 1024) {
warn_exit(do_lang_tempcode('EXCEEDED_ATTACHMENT_SIZE', integer_format($size)));
}
mail_wrap(do_lang('EMAIL_MEMBER_SUBJECT', get_site_name(), post_param('subject'), NULL, get_lang($member_id)), post_param('message'), array($email_address), $to_name, $from_email, $from_name, 3, $attachments, false, get_member());
log_it('EMAIL', strval($member_id), $to_name);
breadcrumb_set_self(do_lang_tempcode('DONE'));
$url = get_param('redirect');
return redirect_screen($title, $url, do_lang_tempcode('SUCCESS'));
}
/**
* The actualiser for deleting all the messages in a room.
*
* @return tempcode The UI.
*/
function _chat_delete_all_messages()
{
breadcrumb_set_self(do_lang_tempcode('DONE'));
$delete = post_param_integer('continue_delete', 0);
if ($delete != 1) {
return $this->chat_choose_room();
} else {
$title = get_page_title('DELETE_ALL_MESSAGES');
//Delete all the posts in the specified room
//delete_chatroom_messages(get_param_integer('room_id'));
$room_id = get_param_integer('id');
check_chatroom_access($room_id);
$room_details = $GLOBALS['SITE_DB']->query_select('chat_rooms', array('*'), array('id' => $room_id), '', 1);
if (!array_key_exists(0, $room_details)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$row = $room_details[0];
$has_mod_access = has_specific_permission(get_member(), 'edit_lowrange_content', 'cms_chat', array('chat', $room_id)) || $row['room_owner'] == get_member() && has_specific_permission(get_member(), 'moderate_my_private_rooms');
if (!$has_mod_access) {
access_denied('SPECIFIC_PERMISSION', 'edit_lowrange_content');
}
delete_chat_messages(array('room_id' => $room_id));
decache('side_shoutbox');
log_it('DELETE_ALL_MESSAGES', strval($room_id));
// Redirect
$url = build_url(array('page' => '_SELF', 'type' => 'misc'), '_SELF');
return redirect_screen($title, $url, do_lang_tempcode('SUCCESS'));
}
}
/**
* Delete a news entry.
*
* @param AUTO_LINK The ID of the news to edit
*/
function delete_news($id)
{
$rows = $GLOBALS['SITE_DB']->query_select('news', array('title', 'news', 'news_article'), array('id' => $id), '', 1);
if (!array_key_exists(0, $rows)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$title = $rows[0]['title'];
$news = $rows[0]['news'];
$news_article = $rows[0]['news_article'];
$_title = get_translated_text($title);
log_it('DELETE_NEWS', strval($id), $_title);
require_code('files2');
delete_upload('uploads/grepimages', 'news', 'news_image', 'id', $id);
$GLOBALS['SITE_DB']->query_delete('news', array('id' => $id), '', 1);
$GLOBALS['SITE_DB']->query_delete('news_category_entries', array('news_entry' => $id));
$GLOBALS['SITE_DB']->query_delete('rating', array('rating_for_type' => 'news', 'rating_for_id' => $id));
$GLOBALS['SITE_DB']->query_delete('trackbacks', array('trackback_for_type' => 'news', 'trackback_for_id' => $id));
delete_lang($title);
delete_lang($news);
require_code('attachments2');
require_code('attachments3');
if (!is_null($news_article)) {
delete_lang_comcode_attachments($news_article, 'news', strval($id));
}
require_code('seo2');
seo_meta_erase_storage('news', strval($id));
decache('main_news');
decache('side_news');
decache('side_news_archive');
decache('bottom_news');
}
/**
* Delete a download licence.
*
* @param AUTO_LINK The ID of the download licence to delete
*/
function delete_download_licence($id)
{
$myrows = $GLOBALS['SITE_DB']->query_select('download_licences', array('l_title'), array('id' => $id), '', 1);
if (!array_key_exists(0, $myrows)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$myrow = $myrows[0];
$GLOBALS['SITE_DB']->query_delete('download_licences', array('id' => $id), '', 1);
log_it('DELETE_DOWNLOAD_LICENCE', strval($id), $myrow['l_title']);
$GLOBALS['SITE_DB']->query_update('download_downloads', array('download_licence' => NULL), array('download_licence' => $id));
}
/**
* The actualiser to add a reply.
*
* @return tempcode The UI
*/
function _add_reply()
{
if (addon_installed('captcha')) {
require_code('captcha');
enforce_captcha();
}
require_code('attachments2');
require_code('ocf_posts_action');
require_code('ocf_posts_action2');
$invited_members = array();
$topic_id = either_param_integer('topic_id', -1);
// Posting into an existing topic?
$forum_id = post_param_integer('forum_id', -1);
// New topic in existing forum? (NB: -2 represents reported posts forum)
$member_id = post_param_integer('member_id', -1);
// Send TOPIC to specific member? Could be Private Topic (topic_id==-1, forum_id==-1), or personal post (topic_id!=-1, forum_id==-1)
$parent_id = either_param_integer('parent_id', NULL);
if ($member_id == -1) {
$member_username = post_param('to_member_id_0', '');
if ($member_username != '') {
$member_id = $GLOBALS['FORUM_DRIVER']->get_member_from_username($member_username);
if (is_null($member_id)) {
warn_exit(do_lang_tempcode('_USER_NO_EXIST', $member_username));
}
}
foreach ($_POST as $key => $_invited_member) {
if (substr($key, 0, 13) != 'to_member_id_') {
continue;
}
if ($key == 'to_member_id_0') {
continue;
}
if ($_invited_member == '') {
continue;
}
if (get_magic_quotes_gpc()) {
$_invited_member = stripslashes($_invited_member);
}
$invited_member = $GLOBALS['FORUM_DRIVER']->get_member_from_username($_invited_member);
if (is_null($invited_member)) {
attach_message(do_lang_tempcode('_USER_NO_EXIST', $_invited_member), 'warn');
} else {
$invited_members[] = intval($invited_member);
}
}
}
$validated = post_param_integer('validated', post_param_integer('_validated', 0));
$is_emphasised = post_param_integer('is_emphasised', 0);
$skip_sig = post_param_integer('skip_sig', 0);
$post = post_param('post');
$title = post_param('title', NULL);
if (is_null($title)) {
$title = '';
}
$check_permissions = true;
$add_poll = post_param_integer('add_poll', 0);
$topic_validated = $validated;
if ($validated == 1) {
$topic_validated = 1 - $add_poll;
}
// If a topic is gonna have a poll added, it starts unvalidated. Adding the poll will validate it.
$anonymous = post_param_integer('anonymous', 0);
$poster_name_if_guest = post_param('poster_name_if_guest', NULL);
if ($poster_name_if_guest == '') {
$poster_name_if_guest = NULL;
}
if (!is_null($poster_name_if_guest)) {
$poster_name_if_guest = trim($poster_name_if_guest);
$restricted_usernames = explode(',', get_option('restricted_usernames'));
$restricted_usernames[] = do_lang('UNKNOWN');
$restricted_usernames[] = do_lang('SYSTEM');
if (!is_null($GLOBALS['FORUM_DRIVER']->get_member_from_username($poster_name_if_guest))) {
$restricted_usernames[] = $poster_name_if_guest;
}
foreach ($restricted_usernames as $_restricted_username) {
$restricted_username = trim($_restricted_username);
if ($restricted_username == '') {
continue;
}
if ($poster_name_if_guest == $restricted_username) {
$poster_name_if_guest = $poster_name_if_guest . ' (' . do_lang('GUEST') . ')';
break;
}
}
}
$new_topic = $topic_id == -1;
if (!$new_topic) {
$_intended_solely_for = post_param('intended_solely_for', '');
if ($_intended_solely_for == '') {
$intended_solely_for = NULL;
} else {
$intended_solely_for = $GLOBALS['FORUM_DRIVER']->get_member_from_username($_intended_solely_for);
if (is_null($intended_solely_for)) {
warn_exit(do_lang_tempcode('_USER_NO_EXIST', $_intended_solely_for));
}
}
} else {
$intended_solely_for = NULL;
}
require_code('ocf_topics_action');
require_code('ocf_topics_action2');
if ($new_topic) {
ocf_check_post($post);
if ($title == '') {
warn_exit(do_lang_tempcode('NO_PARAMETER_SENT', 'title'));
}
$sunk = post_param_integer('sunk', 0);
$topic_title = $title;
if ($forum_id == -1) {
require_code('ocf_members2');
if (!ocf_may_whisper($member_id)) {
warn_exit(do_lang_tempcode('NO_PT_FROM_ALLOW'));
}
check_specific_permission('use_pt');
$topic_id = ocf_make_topic(NULL, post_param('description', ''), post_param('emoticon', ''), $topic_validated, post_param_integer('open', 0), post_param_integer('pinned', 0), $sunk, post_param_integer('cascading', 0), get_member(), $member_id);
$_title = get_page_title('ADD_PERSONAL_TOPIC');
} elseif ($forum_id == -2) {
$forum_id = $GLOBALS['FORUM_DRIVER']->forum_id_from_name(get_option('reported_posts_forum'));
if (is_null($forum_id)) {
warn_exit(do_lang_tempcode('NO_REPORTED_POST_FORUM'));
}
// See if post already reported...
$topic_id = $GLOBALS['FORUM_DB']->query_value_null_ok('f_topics t LEFT JOIN ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_posts p ON p.id=t.t_cache_first_post_id', 't.id', array('p.p_title' => $title, 't.t_forum_id' => $forum_id));
if (!is_null($topic_id)) {
// Already a topic
} else {
$topic_id = ocf_make_topic($forum_id, '', '', 1, 1, 0, 0, 0, NULL, NULL, false);
}
$_title = get_page_title('REPORT_POST');
$check_permissions = false;
decache('main_staff_checklist');
} else {
$topic_id = ocf_make_topic($forum_id, post_param('description', ''), post_param('emoticon', ''), $topic_validated, post_param_integer('open', 0), post_param_integer('pinned', 0), $sunk, post_param_integer('cascading', 0));
$_title = get_page_title('ADD_TOPIC');
if (addon_installed('awards')) {
require_code('awards');
handle_award_setting('topic', strval($topic_id));
}
}
$first_post = true;
require_code('fields');
if (has_tied_catalogue('topic')) {
save_form_custom_fields('topic', strval($topic_id));
}
} else {
$_title = get_page_title('ADD_POST');
$first_post = false;
$topic_info = $GLOBALS['FORUM_DB']->query_select('f_topics', array('t_cache_first_title', 't_sunk', 't_forum_id', 't_is_open', 't_description'), array('id' => $topic_id), '', 1);
if (!array_key_exists(0, $topic_info)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$forum_id = $topic_info[0]['t_forum_id'];
$topic_title = $topic_info[0]['t_cache_first_title'];
$sunk = $topic_info[0]['t_sunk'];
if ($topic_info[0]['t_is_open'] == 0) {
$may_moderate_forum = ocf_may_moderate_forum($forum_id);
if (!$may_moderate_forum) {
warn_exit(do_lang_tempcode('TOPIC_IS_CLOSED'));
}
}
// Moderator reply
$new_title = post_param('new_title', NULL);
if (!is_null($new_title) && !is_null($forum_id) && ocf_may_moderate_forum($forum_id, get_member())) {
$cascading = post_param_integer('cascading', 0);
$pinned = post_param_integer('pinned', 0);
$sunk = post_param_integer('sunk', 0);
$open = post_param_integer('open', 0);
$topic_validated = post_param_integer('topic_validated', 0);
$to = post_param_integer('to', NULL);
$schedule = get_input_date('schedule');
if (!is_null($schedule) && addon_installed('calendar')) {
$_intended_solely_for = is_null($intended_solely_for) ? 'NULL' : strval($intended_solely_for);
$_postdetailser_name_if_guest = is_null($poster_name_if_guest) ? 'NULL' : '\'' . addslashes($poster_name_if_guest) . '\'';
$_first_post = $first_post ? 'true' : 'false';
$__title = is_null($title) ? 'NULL' : '\'' . str_replace(chr(10), '\'.chr(10).\'', addslashes($title)) . '\'';
$_postdetails = is_null($post) ? 'NULL' : '\'' . str_replace(chr(10), '\'.chr(10).\'', addslashes($post)) . '\'';
$_new_title = is_null($new_title) ? 'NULL' : '\'' . str_replace(chr(10), '\'.chr(10).\'', addslashes($new_title)) . '\'';
$schedule_code = <<<END
:require_code('ocf_topics_action2'); require_code('ocf_topics_action'); ocf_edit_topic({$topic_id},NULL,NULL,{$validated},{$open},{$pinned},{$sunk},{$cascading},'',{$_new_title}); if (({$to}!={$forum_id}) && (!is_null({$to}))) ocf_move_topics({$forum_id},{$to},array({$topic_id})); \$post_id=ocf_make_post({$topic_id},{$__title},{$_postdetails},{$skip_sig},{$_first_post},{$validated},{$is_emphasised},{$_postdetailser_name_if_guest},NULL,NULL,NULL,{$_intended_solely_for},NULL,NULL,false,true,NULL,true,{$topic_title},{$sunk},NULL,{$anonymous}==1); if (addon_installed('awards')) { require_code('awards'); handle_award_setting('post',strval(\$post_id)); }
END;
require_code('calendar');
$start_year = post_param_integer('schedule_year');
$start_month = post_param_integer('schedule_month');
$start_day = post_param_integer('schedule_day');
$start_hour = post_param_integer('schedule_hour');
$start_minute = post_param_integer('schedule_minute');
require_code('calendar2');
$event_id = add_calendar_event(db_get_first_id(), '', NULL, 0, do_lang('ADD_POST'), $schedule_code, 3, 0, $start_year, $start_month, $start_day, $start_hour, $start_minute);
regenerate_event_reminder_jobs($event_id);
$text = do_lang_tempcode('SUCCESS');
$map = array('page' => 'topicview', 'id' => $topic_id, 'type' => 'first_unread');
$test = get_param_integer('kfs' . (is_null($forum_id) ? '' : strval($forum_id)), -1);
if ($test != -1 && $test != 0) {
$map['kfs' . (is_null($forum_id) ? '' : strval($forum_id))] = $test;
}
$test = get_param_integer('threaded', -1);
if ($test != -1) {
$map['threaded'] = $test;
}
$_url = build_url($map, get_module_zone('topicview'));
$url = $_url->evaluate();
$url .= '#first_unread';
$url = get_param('redirect', $url);
return redirect_screen($_title, $url, $text);
}
ocf_edit_topic($topic_id, NULL, NULL, $topic_validated, $open, $pinned, $sunk, $cascading, '', $new_title == '' ? NULL : $new_title);
if ($to != $forum_id && !is_null($to)) {
ocf_move_topics($forum_id, $to, array($topic_id));
}
}
}
$post_id = ocf_make_post($topic_id, $title, $post, $skip_sig, $first_post, $validated, $is_emphasised, $poster_name_if_guest, NULL, NULL, NULL, $intended_solely_for, NULL, NULL, $check_permissions, true, NULL, true, $topic_title, $sunk, NULL, $anonymous == 1, $forum_id == -1 || is_null($forum_id), $forum_id == -1 || is_null($forum_id), false, $parent_id);
if (addon_installed('awards')) {
require_code('awards');
handle_award_setting('post', strval($post_id));
}
if (!is_null($forum_id) && $anonymous == 0 && $intended_solely_for === NULL) {
if (has_actual_page_access($GLOBALS['FORUM_DRIVER']->get_guest_id(), 'forumview') && has_category_access($GLOBALS['FORUM_DRIVER']->get_guest_id(), 'forums', strval($forum_id))) {
syndicate_described_activity($first_post ? 'ocf:ACTIVITY_ADD_TOPIC' : 'ocf:ACTIVITY_ADD_POST_IN', $first_post ? $title : $topic_title, '', '', '_SEARCH:topicview:misc:' . strval($topic_id) . '#post_' . strval($post_id), '', '', 'ocf_forum');
}
}
require_code('fields');
if (has_tied_catalogue('post')) {
save_form_custom_fields('post', strval($post_id));
}
$validated = $GLOBALS['FORUM_DB']->query_value('f_posts', 'p_validated', array('id' => $post_id));
$rep_post_id = post_param_integer('o_post_id', -1);
if ($rep_post_id != -1) {
$map = array('page' => 'topicview', 'id' => $rep_post_id, 'type' => 'findpost');
$_url = build_url($map, get_module_zone('topicview'));
$url = $_url->evaluate();
$url .= '#post_' . strval($rep_post_id);
} else {
$map = array('page' => 'topicview', 'id' => $post_id, 'type' => 'findpost');
$test = get_param_integer('kfs' . (is_null($forum_id) ? '' : strval($forum_id)), -1);
if ($test != -1 && $test != 0) {
$map['kfs' . (is_null($forum_id) ? '' : strval($forum_id))] = $test;
}
$test = get_param_integer('threaded', -1);
if ($test != -1) {
$map['threaded'] = $test;
}
$_url = build_url($map, get_module_zone('topicview'));
$url = $_url->evaluate();
if ($validated != 0) {
$url .= '#post_' . strval($post_id);
}
}
if ($forum_id >= 0) {
$topic_validated = $GLOBALS['FORUM_DB']->query_value('f_topics', 't_validated', array('id' => $topic_id));
if ($topic_validated == 0 && !has_specific_permission(get_member(), 'jump_to_unvalidated')) {
$map = array('page' => 'forumview', 'id' => $forum_id);
$test = get_param_integer('kfs' . (is_null($forum_id) ? '' : strval($forum_id)), -1);
if ($test != -1 && $test != 0) {
$map['kfs' . (is_null($forum_id) ? '' : strval($forum_id))] = $test;
}
$test = get_param_integer('threaded', -1);
if ($test != -1) {
$map['threaded'] = $test;
}
$_url = build_url($map, get_module_zone('forumview'));
$url = $_url->evaluate();
}
}
if ($new_topic && $forum_id == -1) {
require_code('notifications');
enable_notifications('ocf_topic', strval($topic_id), get_member());
// from
enable_notifications('ocf_topic', strval($topic_id), $member_id);
// to
foreach ($invited_members as $invited_member) {
enable_notifications('ocf_topic', strval($topic_id), $invited_member);
ocf_invite_to_pt($invited_member, $topic_id);
}
}
if ($anonymous == 1) {
log_it('MAKE_ANONYMOUS_POST', strval($post_id), $title);
}
if (addon_installed('awards')) {
require_code('awards');
handle_award_setting('post', strval($post_id));
}
if ($forum_id == -1 && $member_id != -1) {
send_pt_notification($post_id, $title, $topic_id, $member_id, NULL, $post);
}
if ($add_poll == 1) {
if (post_param_integer('add_poll', 0) == 1) {
// Show it worked / Refresh
$_url = build_url(array('page' => '_SELF', 'type' => 'add_poll', 'id' => $topic_id, 'try_validate' => 1), '_SELF');
return redirect_screen($_title, $_url, do_lang_tempcode('SUCCESS'));
}
}
if (!$new_topic && $forum_id != -1 && $member_id == -1) {
handle_topic_ticket_reply($forum_id, $topic_id, $topic_title, $post);
}
$text = $validated == 1 ? do_lang_tempcode('SUCCESS') : do_lang_tempcode('SUBMIT_UNVALIDATED');
require_code('autosave');
clear_ocp_autosave();
// Show it worked / Refresh
$url = get_param('redirect', $url);
return redirect_screen($_title, $url, $text);
}
/**
* Delete a specified gallery.
*
* @param ID_TEXT The gallery codename
*/
function delete_gallery($name)
{
if ($name == '') {
warn_exit(do_lang_tempcode('NO_DELETE_ROOT'));
}
$rows = $GLOBALS['SITE_DB']->query_select('galleries', array('*'), array('name' => $name), '', 1);
if (!array_key_exists(0, $rows)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
require_code('files2');
delete_upload('uploads/grepimages', 'galleries', 'rep_image', 'name', $name);
delete_upload('uploads/watermarks', 'galleries', 'watermark_top_left', 'name', $name);
delete_upload('uploads/watermarks', 'galleries', 'watermark_top_right', 'name', $name);
delete_upload('uploads/watermarks', 'galleries', 'watermark_bottom_left', 'name', $name);
delete_upload('uploads/watermarks', 'galleries', 'watermark_bottom_right', 'name', $name);
log_it('DELETE_GALLERY', $name, get_translated_text($rows[0]['fullname']));
delete_lang($rows[0]['fullname']);
delete_lang($rows[0]['description']);
delete_lang($rows[0]['teaser']);
// Images and videos are deleted, because we are deleting the _gallery_, not just a category (nobody is going to be deleting galleries with the expectation of moving the image to a different one in bulk - unlike download categories, for example).
if (function_exists('set_time_limit')) {
@set_time_limit(0);
}
do {
$images = $GLOBALS['SITE_DB']->query_select('images', array('id'), array('cat' => $name), '', 200);
foreach ($images as $image) {
delete_image($image['id'], false);
}
} while ($images != array());
do {
$videos = $GLOBALS['SITE_DB']->query_select('videos', array('id'), array('cat' => $name), '', 200);
foreach ($videos as $video) {
delete_video($video['id'], false);
}
} while ($images != array());
//... but the subgalleries remain
$GLOBALS['SITE_DB']->query_update('galleries', array('parent_id' => $rows[0]['parent_id']), array('parent_id' => $name));
$GLOBALS['SITE_DB']->query_delete('galleries', array('name' => $name), '', 1);
$GLOBALS['SITE_DB']->query_delete('rating', array('rating_for_type' => 'images', 'rating_for_id' => $name));
$GLOBALS['SITE_DB']->query_delete('rating', array('rating_for_type' => 'videos', 'rating_for_id' => $name));
require_code('seo2');
seo_meta_erase_storage('gallery', $name);
$GLOBALS['SITE_DB']->query_delete('group_category_access', array('module_the_name' => 'galleries', 'category_name' => $name));
$GLOBALS['SITE_DB']->query_delete('gsp', array('module_the_name' => 'galleries', 'category_name' => $name));
decache('main_top_galleries');
decache('main_recent_galleries');
decache('main_root_galleries');
decache('side_root_galleries');
}
/**
* The actualiser to import in bulk from an archive file.
*
* @return tempcode The UI
*/
function _import()
{
post_param('test');
// To pick up on max file size exceeded errors
require_code('uploads');
require_code('images');
is_swf_upload(true);
breadcrumb_set_parents(array(array('_SELF:_SELF:misc', do_lang_tempcode('EMOTICONS')), array('_SELF:_SELF:import', do_lang_tempcode('CHOOSE')), array('_SELF:_SELF:import', do_lang_tempcode('IMPORT_EMOTICONS'))));
foreach ($_FILES as $attach_name => $__file) {
$tmp_name = $__file['tmp_name'];
$file = $__file['name'];
switch (get_file_extension($file)) {
case 'zip':
if (!function_exists('zip_open') && get_option('unzip_cmd') == '') {
warn_exit(do_lang_tempcode('ZIP_NOT_ENABLED'));
}
if (!function_exists('zip_open')) {
require_code('m_zip');
$mzip = true;
} else {
$mzip = false;
}
$myfile = zip_open($tmp_name);
if (!is_integer($myfile)) {
while (false !== ($entry = zip_read($myfile))) {
// Load in file
zip_entry_open($myfile, $entry);
$_file = zip_entry_name($entry);
if (is_image($_file)) {
if (file_exists(get_file_base() . '/themes/default/images/emoticons/index.html')) {
$path = get_custom_file_base() . '/themes/default/images_custom/emoticons__' . basename($_file);
} else {
$path = get_custom_file_base() . '/themes/default/images_custom/ocf_emoticons__' . basename($_file);
}
$outfile = @fopen($path, 'wb') or intelligent_write_error($path);
$more = mixed();
do {
$more = zip_entry_read($entry);
if (fwrite($outfile, $more) < strlen($more)) {
warn_exit(do_lang_tempcode('COULD_NOT_SAVE_FILE'));
}
} while ($more !== false && $more != '');
fclose($outfile);
fix_permissions($path);
sync_file($path);
$this->_import_emoticon($path);
}
zip_entry_close($entry);
}
zip_close($myfile);
} else {
require_code('failure');
warn_exit(zip_error($myfile, $mzip));
}
break;
case 'tar':
require_code('tar');
$myfile = tar_open($tmp_name, 'rb');
if ($myfile !== false) {
$directory = tar_get_directory($myfile);
foreach ($directory as $entry) {
// Load in file
$_file = $entry['path'];
if (is_image($_file)) {
if (file_exists(get_file_base() . '/themes/default/images/emoticons/index.html')) {
$path = get_custom_file_base() . '/themes/default/images_custom/emoticons__' . basename($_file);
} else {
$path = get_custom_file_base() . '/themes/default/images_custom/ocf_emoticons__' . basename($_file);
}
$_in = tar_get_file($myfile, $entry['path'], false, $path);
$this->_import_emoticon($path);
}
}
tar_close($myfile);
}
break;
default:
if (is_image($file)) {
$urls = get_url('', $attach_name, 'themes/default/images_custom');
$path = $urls[0];
$this->_import_emoticon($path);
} else {
attach_message(do_lang_tempcode('BAD_ARCHIVE_FORMAT'), 'warn');
}
}
}
$title = get_page_title('IMPORT_EMOTICONS');
log_it('IMPORT_EMOTICONS');
return $this->do_next_manager($title, do_lang_tempcode('SUCCESS'), NULL);
}
/**
* The actualiser to translate code (called externally, and may operate on many lang files).
*
* @return tempcode The UI
*/
function set_lang_code_2()
{
$lang = post_param('lang');
$lang_files = get_lang_files(fallback_lang());
foreach (array_keys($lang_files) as $lang_file) {
$for_base_lang = get_lang_file_map(fallback_lang(), $lang_file, true);
$for_base_lang_2 = get_lang_file_map($lang, $lang_file, false);
$descriptions = get_lang_file_descriptions(fallback_lang(), $lang_file);
$out = '';
foreach ($for_base_lang_2 + $for_base_lang as $key => $now_val) {
$val = post_param('l_' . $key, array_key_exists($key, $for_base_lang_2) ? $for_base_lang_2[$key] : $now_val);
if (str_replace(chr(10), '\\n', $val) != $now_val || !array_key_exists($key, $for_base_lang) || $for_base_lang[$key] != $val || !file_exists(get_file_base() . '/lang/' . fallback_lang() . '/' . $lang_file . '.ini')) {
// if it's changed from default ocPortal, or not in default ocPortal, or was already changed in language file, or whole file is not in default ocPortal
$out .= $key . '=' . str_replace(chr(10), '\\n', $val) . "\n";
}
}
if ($out != '') {
$path = get_custom_file_base() . '/lang_custom/' . filter_naughty($lang) . '/' . filter_naughty($lang_file) . '.ini';
$path_backup = $path . '.' . strval(time());
if (file_exists($path)) {
@copy($path, $path_backup) or intelligent_write_error($path_backup);
sync_file($path_backup);
}
$myfile = @fopen($path, 'wt');
if ($myfile === false) {
intelligent_write_error($path);
}
fwrite($myfile, "[descriptions]\n");
foreach ($descriptions as $key => $description) {
if (fwrite($myfile, $key . '=' . $description . "\n") == 0) {
warn_exit(do_lang_tempcode('COULD_NOT_SAVE_FILE'));
}
}
fwrite($myfile, "\n[strings]\n");
fwrite($myfile, $out);
fclose($myfile);
fix_permissions($path);
sync_file($path);
$path_backup2 = $path . '.latest_in_ocp_edit';
@copy($path, $path_backup2) or intelligent_write_error($path_backup2);
sync_file($path_backup2);
}
}
$title = get_page_title('TRANSLATE_CODE');
log_it('TRANSLATE_CODE');
require_code('view_modes');
erase_cached_language();
erase_cached_templates();
// Show it worked / Refresh
$url = post_param('redirect', '');
if ($url == '') {
return inform_screen($title, do_lang_tempcode('SUCCESS'));
}
return redirect_screen($title, $url, do_lang_tempcode('SUCCESS'));
}
/**
* Standard aed_module delete actualiser.
*
* @param ID_TEXT The entry being deleted
*/
function delete_actualisation($id)
{
$old = $GLOBALS['SITE_DB']->query_select('custom_comcode', array('tag_title', 'tag_description'), array('tag_tag' => $id), '', 1);
if (!array_key_exists(0, $old)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
$_title = $old[0]['tag_title'];
$_description = $old[0]['tag_description'];
$GLOBALS['SITE_DB']->query_delete('custom_comcode', array('tag_tag' => $id), '', 1);
log_it('DELETE_' . $this->lang_type, $id);
delete_lang($_title);
delete_lang($_description);
}
/**
* Delete a forum.
*
* @param AUTO_LINK The ID of the forum we are deleting.
* @param AUTO_LINK The ID of the forum that topics will be moved to.
* @param BINARY Whether to delete topics instead of moving them to the target forum.
*/
function ocf_delete_forum($forum_id, $target_forum_id, $delete_topics = 0)
{
if ($forum_id == db_get_first_id()) {
warn_exit(do_lang_tempcode('CANNOT_DELETE_ROOT_FORUM'));
}
require_code('ocf_topics_action');
require_code('ocf_topics_action2');
if ($delete_topics == 0) {
ocf_move_topics($forum_id, $target_forum_id);
} else {
$rows = $GLOBALS['FORUM_DB']->query_select('f_topics', array('id'), array('t_forum_id' => $forum_id));
foreach ($rows as $row) {
ocf_delete_topic($row['id'], '');
}
}
$forum_info = $GLOBALS['FORUM_DB']->query_select('f_forums', array('*'), array('id' => $forum_id), '', 1);
if (!array_key_exists(0, $forum_info)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
delete_lang($forum_info[0]['f_description'], $GLOBALS['FORUM_DB']);
delete_lang($forum_info[0]['f_intro_question'], $GLOBALS['FORUM_DB']);
$name = $GLOBALS['FORUM_DB']->query_value('f_forums', 'f_name', array('id' => $forum_id));
$GLOBALS['FORUM_DB']->query_update('f_multi_moderations', array('mm_move_to' => NULL), array('mm_move_to' => $forum_id));
$GLOBALS['FORUM_DB']->query_update('f_forums', array('f_parent_forum' => db_get_first_id()), array('f_parent_forum' => $forum_id));
$GLOBALS['FORUM_DB']->query_delete('f_forums', array('id' => $forum_id), '', 1);
$GLOBALS['FORUM_DB']->query_delete('group_category_access', array('module_the_name' => 'forums', 'category_name' => strval($forum_id)));
$GLOBALS['FORUM_DB']->query_delete('gsp', array('module_the_name' => 'forums', 'category_name' => strval($forum_id)));
require_code('notifications');
delete_all_notifications_on('ocf_topic', 'forum:' . strval($forum_id));
$GLOBALS['FORUM_DB']->query_delete('f_forum_intro_member', array('i_forum_id' => $forum_id));
$GLOBALS['FORUM_DB']->query_delete('f_forum_intro_ip', array('i_forum_id' => $forum_id));
log_it('DELETE_FORUM', strval($forum_id), $name);
}
/**
* Delete a Welcome E-mail.
*
* @param AUTO_LINK The ID
*/
function ocf_delete_welcome_email($id)
{
$_subject = $GLOBALS['SITE_DB']->query_value('f_welcome_emails', 'w_subject', array('id' => $id));
$_text = $GLOBALS['SITE_DB']->query_value('f_welcome_emails', 'w_text', array('id' => $id));
log_it('DELETE_WELCOME_EMAIL', strval($id), get_translated_text($_subject));
$GLOBALS['SITE_DB']->query_delete('f_welcome_emails', array('id' => $id), '', 1);
delete_lang($_subject);
delete_lang($_text);
}
/**
* Actualiser to add an invoice.
*
* @return tempcode The interface.
*/
function _ad()
{
$title = get_page_title('CREATE_INVOICE');
breadcrumb_set_self(do_lang_tempcode('DONE'));
breadcrumb_set_parents(array(array('_SEARCH:admin_ecommerce:ecom_usage', do_lang_tempcode('ECOMMERCE')), array('_SELF:_SELF:misc', do_lang_tempcode('INVOICES')), array('_SELF:_SELF:ad', do_lang_tempcode('CREATE_INVOICE'))));
$product = post_param('product');
$object = find_product($product);
$amount = post_param('amount', '');
if ($amount == '') {
$products = $object->get_products(false, $product);
$amount = $products[$product][1];
if ($amount == '?') {
warn_exit(do_lang_tempcode('INVOICE_REQUIRED_AMOUNT'));
}
}
$to = post_param('to');
$member_id = $GLOBALS['FORUM_DRIVER']->get_member_from_username($to);
if (is_null($member_id)) {
warn_exit(do_lang_tempcode('_USER_NO_EXIST', $to));
}
$id = $GLOBALS['SITE_DB']->query_insert('invoices', array('i_type_code' => $product, 'i_member_id' => $member_id, 'i_state' => 'new', 'i_amount' => $amount, 'i_special' => post_param('special'), 'i_time' => time(), 'i_note' => post_param('note')), true);
log_it('CREATE_INVOICE', strval($id), $product);
send_invoice_mail($member_id, $id);
$url = build_url(array('page' => '_SELF', 'type' => 'outstanding'), '_SELF');
return redirect_screen($title, $url, do_lang_tempcode('SUCCESS'));
}
/**
* Make a Welcome E-mail.
*
* @param SHORT_TEXT A name for the Welcome E-mail
* @param SHORT_TEXT The subject of the Welcome E-mail
* @param LONG_TEXT The message body of the Welcome E-mail
* @param integer The number of hours before sending the e-mail
* @param ?AUTO_LINK What newsletter to send out to instead of members (NULL: none)
* @return AUTO_LINK The ID
*/
function ocf_make_welcome_email($name, $subject, $text, $send_time, $newsletter = 0)
{
$id = $GLOBALS['SITE_DB']->query_insert('f_welcome_emails', array('w_name' => $name, 'w_newsletter' => $newsletter, 'w_subject' => insert_lang($subject, 2), 'w_text' => insert_lang($text, 2), 'w_send_time' => $send_time), true);
log_it('ADD_WELCOME_EMAIL', strval($id), $subject);
return $id;
}
/**
* Move some topics.
*
* @param AUTO_LINK The forum the topics are currently in.
* @param AUTO_LINK The forum the topics are being moved to.
* @param ?array A list of the topic IDs to move (NULL: move all topics from source forum).
*/
function ocf_move_topics($from, $to, $topics = NULL)
{
if ($from == $to) {
return;
}
// That would be nuts, and interfere with our logic
require_code('notifications');
require_code('ocf_topics');
require_code('ocf_forums_action2');
$forum_name = ocf_ensure_forum_exists($to);
if (!ocf_may_moderate_forum($from)) {
access_denied('I_ERROR');
}
$topic_count = 0;
if (is_null($topics)) {
if (is_null($from)) {
access_denied('I_ERROR');
}
$all_topics = $GLOBALS['FORUM_DB']->query_select('f_topics', array('id', 't_cache_num_posts', 't_validated'), array('t_forum_id' => $from));
$or_list = '';
$post_count = 0;
$topics = array();
foreach ($all_topics as $topic_info) {
$topics[] = $topic_info['id'];
if ($or_list != '') {
$or_list .= ' OR ';
}
$or_list .= 'id=' . strval((int) $topic_info['id']);
$post_count += $topic_info['t_cache_num_posts'];
if ($topic_info['t_validated'] == 1) {
$topic_count++;
}
}
$GLOBALS['FORUM_DB']->query_update('f_topics', array('t_forum_id' => $to), array('t_forum_id' => $from));
// Update forum IDs' for posts
$GLOBALS['FORUM_DB']->query_update('f_posts', array('p_cache_forum_id' => $to), array('p_cache_forum_id' => $from));
$or_list_2 = str_replace('id', 'p_topic_id', $or_list);
if ($or_list_2 == '') {
return;
}
} elseif (count($topics) == 1) {
$topic_info = $GLOBALS['FORUM_DB']->query_select('f_topics', array('t_forum_id', 't_pt_from', 't_pt_to', 't_cache_first_title', 't_cache_num_posts', 't_validated'), array('id' => $topics[0]));
if (!array_key_exists(0, $topic_info)) {
warn_exit(do_lang_tempcode('MISSING_RESOURCE'));
}
if ($topic_info[0]['t_forum_id'] != $from || $topic_info[0]['t_pt_from'] != get_member() && $topic_info[0]['t_pt_to'] != get_member() && !ocf_has_special_pt_access($topics[0]) && !has_specific_permission(get_member(), 'view_other_pt') && is_null($topic_info[0]['t_forum_id'])) {
access_denied('I_ERROR');
}
if ($topic_info[0]['t_validated'] == 1) {
$topic_count++;
}
$topic_title = $topic_info[0]['t_cache_first_title'];
$post_count = $topic_info[0]['t_cache_num_posts'];
$GLOBALS['FORUM_DB']->query_update('f_topics', array('t_pt_from' => NULL, 't_pt_to' => NULL, 't_forum_id' => $to), array('t_forum_id' => $from, 'id' => $topics[0]), '', 1);
// Extra where constraint for added security
log_it('MOVE_TOPICS', $topic_title, strval($topics[0]));
$or_list = 'id=' . strval($topics[0]);
$or_list_2 = 'p_topic_id=' . strval($topics[0]);
// Update forum IDs' for posts
$GLOBALS['FORUM_DB']->query_update('f_posts', array('p_cache_forum_id' => $to), array('p_topic_id' => $topics[0]));
} else {
if (count($topics) == 0) {
return;
}
// Nuts, lol
$or_list = '';
foreach ($topics as $topic_id) {
if ($or_list != '') {
$or_list .= ' OR ';
}
$or_list .= 'id=' . strval((int) $topic_id);
if (is_null($from)) {
$topic_info = $GLOBALS['FORUM_DB']->query_select('f_topics', array('t_forum_id', 't_pt_from', 't_pt_to'), array('id' => $topic_id));
if (array_key_exists(0, $topic_info)) {
if ($topic_info[0]['t_validated'] == 1) {
$topic_count++;
}
if ($topic_info[0]['t_forum_id'] != $from || $topic_info[0]['t_pt_from'] != get_member() && $topic_info[0]['t_pt_to'] != get_member() && !ocf_has_special_pt_access($topic_id) && !has_specific_permission(get_member(), 'view_other_pt')) {
access_denied('I_ERROR');
}
}
} else {
$topic_count++;
// Might not be validated, which means technically we shouldn't do this, but it's low chance, low impact, and the indicator is only a cache thing anyway
}
}
$GLOBALS['FORUM_DB']->query('UPDATE ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_topics SET t_forum_id=' . strval((int) $to) . ',t_pt_from=NULL,t_pt_to=NULL WHERE t_forum_id' . (is_null($from) ? ' IS NULL' : '=' . strval((int) $from)) . ' AND (' . $or_list . ')');
log_it('MOVE_TOPICS', do_lang('MULTIPLE'));
$post_count = $GLOBALS['FORUM_DB']->query_value_null_ok_full('SELECT SUM(t_cache_num_posts) FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_topics WHERE ' . $or_list);
// Update forum IDs' for posts
$or_list_2 = str_replace('id', 'p_topic_id', $or_list);
$GLOBALS['FORUM_DB']->query('UPDATE ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_posts SET p_cache_forum_id=' . strval((int) $to) . ' WHERE ' . $or_list_2);
}
require_code('ocf_posts_action2');
// Update source forum cache view
if (!is_null($from)) {
ocf_force_update_forum_cacheing($from, -$topic_count, -$post_count);
}
// Update dest forum cache view
ocf_force_update_forum_cacheing($to, $topic_count, $post_count);
if (!is_null($from)) {
// Update member post counts if we've switched between post-count countable forums
$post_count_info = $GLOBALS['FORUM_DB']->query('SELECT id,f_post_count_increment FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_forums WHERE id=' . strval((int) $from) . ' OR id=' . strval((int) $to), 2);
if ($post_count_info[0]['id'] == $from) {
$from_cnt = $post_count_info[0]['f_post_count_increment'];
$to_cnt = $post_count_info[1]['f_post_count_increment'];
} else {
$from_cnt = $post_count_info[1]['f_post_count_increment'];
$to_cnt = $post_count_info[0]['f_post_count_increment'];
}
require_code('ocf_posts_action');
if ($from_cnt != $to_cnt) {
$sql = 'SELECT p_poster FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_posts WHERE (' . $or_list_2 . ')';
if (addon_installed('unvalidated')) {
$sql .= ' AND p_validated=1';
}
$_member_post_counts = collapse_1d_complexity('p_poster', $GLOBALS['FORUM_DB']->query($sql));
$member_post_counts = array_count_values($_member_post_counts);
foreach ($member_post_counts as $member_id => $member_post_count) {
if ($to == 0) {
$member_post_count = -$member_post_count;
}
ocf_force_update_member_post_count($member_id, $member_post_count);
}
}
}
require_code('ocf_posts_action');
if (!is_null($from)) {
ocf_decache_ocp_blocks($from);
} else {
decache('side_ocf_personal_topics');
decache('_new_pp');
}
ocf_decache_ocp_blocks($to, $forum_name);
if (function_exists('set_time_limit')) {
@set_time_limit(0);
}
$start = 0;
do {
$topics2 = $GLOBALS['FORUM_DB']->query('SELECT id,t_cache_first_title,t_cache_last_time FROM ' . $GLOBALS['FORUM_DB']->get_table_prefix() . 'f_topics WHERE ' . $or_list, 100, $start);
require_code('urls2');
foreach ($topics2 as $_topic) {
if ($_topic['t_cache_last_time'] < time() - 60 * 60 * 24 * 14) {
continue;
}
$topic_id = $_topic['id'];
$topic_title = $_topic['t_cache_first_title'];
suggest_new_idmoniker_for('topicview', 'misc', strval($topic_id), $topic_title);
// Now lets inform people tracking the topic that it has moved
$subject = do_lang('TOPIC_MOVE_MAIL_SUBJECT', get_site_name(), $topic_title);
$mail = do_lang('TOPIC_MOVE_MAIL', comcode_escape(get_site_name()), comcode_escape($topic_title), array(comcode_escape($forum_name)));
dispatch_notification('ocf_topic', strval($topic_id), $subject, $mail);
}
} while (count($topics2) == 100);
}
/**
* Add a theme image.
*
* @param ID_TEXT The theme the theme image is in
* @param LANGUAGE_NAME The language the theme image is for
* @param SHORT_TEXT The theme image ID
* @param URLPATH The URL to the theme image
* @param boolean Whether to allow failure without bombing out
*/
function actual_add_theme_image($theme, $lang, $id, $path, $fail_ok = false)
{
$test = $GLOBALS['SITE_DB']->query_value_null_ok('theme_images', 'id', array('id' => $id, 'theme' => $theme, 'lang' => $lang));
if (!is_null($test)) {
if ($fail_ok) {
return;
}
warn_exit(do_lang_tempcode('ALREADY_EXISTS', escape_html($id)));
}
$GLOBALS['SITE_DB']->query_insert('theme_images', array('id' => $id, 'theme' => $theme, 'path' => $path, 'lang' => $lang));
log_it('ADD_THEME_IMAGE', $id, $theme);
persistant_cache_delete('THEME_IMAGES');
}
