RedirectPage อีกรูปแบบของการป้องกันลิงค์สด

// Mod Authors for a "ADD AFTER" on this line. Ensure you end your change with a comma. For example:

                                              'RedirectPage' =>array($txt['admin_menu_RedirectPage']),

// Mod authors if you want to be "real freaking good" then add any setting pages for your mod BELOW this line!

               //Start BIOHAZARD:RedirectPage
                array('ModifyRedirectPageSettings', 'area=modsettings;sa=RedirectPage'),
                //End BIOHAZARD:RedirectPage

// Loads the user's basic values... meant for template/theme usage.
function loadMemberContext($user, $display_custom_fields = false)
{
global $memberContext, $user_profile, $txt, $scripturl, $user_info;

// Loads the user's basic values... meant for template/theme usage.
function loadMemberContext($user, $display_custom_fields = false)
{
global $memberContext, $user_profile, $txt, $scripturl, $boardurl, $user_info;

'website' => array(
'title' => $profile['website_title'],
'url' => $profile['website_url'],
),

'website' => array(
'title' => $profile['website_title'],
'url' => (empty($modSettings['RedirectPage_on_members_sites']) || strpos($profile['website_url'], 'http://') !== 0)? $profile['website_url'] : $boardurl . '/go.php?url=' . ($modSettings['RedirectPage_encode'] ? base64_encode($profile['website_url']) : $profile['website_url']),
),

'link' => '<a class="icq new_win" href="http://www.icq.com/whitepages/about_me.php?uin=' . $profile['icq'] . '" target="_blank" title="' . $txt['icq_title'] . ' - ' . $profile['icq'] . '"><img src="http://status.icq.com/online.gif?img=5&amp;icq=' . $profile['icq'] . '" alt="' . $txt['icq_title'] . ' - ' . $profile['icq'] . '" width="18" height="18" border="0" /></a>',

'link' => '<a class="icq new_win" href="' . ((!empty($modSettings['RedirectPage_on_members_icq_etc']))? $boardurl . '/go.php?url=' . ($modSettings['RedirectPage_encode'] ? base64_encode('http://www.icq.com/whitepages/about_me.php?uin=' . $profile['icq']) : 'http://www.icq.com/whitepages/about_me.php?uin=' . $profile['icq']) : 'http://www.icq.com/whitepages/about_me.php?uin=' . $profile['icq']) . '" target="_blank" title="' . $txt['icq_title'] . ' - ' . $profile['icq'] . '"><img src="http://status.icq.com/online.gif?img=5&amp;icq=' . $profile['icq'] . '" alt="' . $txt['icq_title'] . ' - ' . $profile['icq'] . '" width="18" height="18" border="0" /></a>',

'link' => '<a class="yim" href="http://edit.yahoo.com/config/send_webmesg?.target=' . urlencode($profile['yim']) . '" title="' . $txt['yim_title'] . ' - ' . $profile['yim'] . '"><img src="http://opi.yahoo.com/online?u=' . urlencode($profile['yim']) . '&amp;m=g&amp;t=0" alt="' . $txt['yim_title'] . ' - ' . $profile['yim'] . '" border="0" /></a>',

'link' => '<a class="yim" href="' . ((!empty($modSettings['RedirectPage_on_members_icq_etc']))? $boardurl . '/go.php?url=' . ($modSettings['RedirectPage_encode'] ? base64_encode('http://edit.yahoo.com/config/send_webmesg?.target=' . urlencode($profile['yim'])) : 'http://edit.yahoo.com/config/send_webmesg?.target=' . urlencode($profile['yim'])) : 'http://edit.yahoo.com/config/send_webmesg?.target=' . urlencode($profile['yim'])) . '" title="' . $txt['yim_title'] . ' - ' . $profile['yim'] . '"><img src="http://opi.yahoo.com/online?u=' . urlencode($profile['yim']) . '&amp;m=g&amp;t=0" alt="' . $txt['yim_title'] . ' - ' . $profile['yim'] . '" border="0" /></a>',

'link' => '<a class="msn new_win" href="http://members.msn.com/' . $profile['msn'] . '" title="' . $txt['msn_title'] . ' - ' . $profile['msn'] . '"><img src="' . $settings['images_url'] . '/msntalk.gif" alt="' . $txt['msn_title'] . ' - ' . $profile['msn'] . '" border="0" /></a>',

'link' => '<a class="msn new_win" href="' . ((!empty($modSettings['RedirectPage_on_members_icq_etc']))? $boardurl . '/go.php?url=' . ($modSettings['RedirectPage_encode'] ? base64_encode('http://members.msn.com/' . $profile['msn']) : 'http://members.msn.com/' . $profile['msn']) : 'http://members.msn.com/' . $profile['msn']) . '" title="' . $txt['msn_title'] . ' - ' . $profile['msn'] . '"><img src="' . $settings['images_url'] . '/msntalk.gif" alt="' . $txt['msn_title'] . ' - ' . $profile['msn'] . '" border="0" /></a>',

// Mod authors, once again, if you have a whole section to add do it AFTER this line, and keep a comma at the end.

//Start BIOHAZARD:RedirectPage
'RedirectPage' => 'ModifyRedirectPageSettings',
//End BIOHAZARD:RedirectPage

?>

function ModifyRedirectPageSettings($return_config = false){
global $txt, $scripturl, $context, $modSettings, $boardurl, $boarddir;

$config_vars = array(
array('check', 'RedirectPage_on_plain'),
array('check', 'RedirectPage_on_url'),
array('check', 'RedirectPage_on_iurl'),
'',
array('check', 'RedirectPage_on_members_sites'),
array('check', 'RedirectPage_on_members_icq_etc'),
'',
array('check', 'RedirectPage_on_same_host'),
array('check', 'RedirectPage_guests_only'),
'',
array('select', 'RedirectPage_type', Array('normal' => $txt['RedirectPage_type_normal'], 'delayed' => $txt['RedirectPage_type_delayed'], 'instant' => $txt['RedirectPage_type_instant'])),
array('int', 'RedirectPage_delay', 3),
array('check', 'RedirectPage_use_theme'),
array('check', 'RedirectPage_encode'),
array('large_text', 'RedirectPage_text', 10),
'',
array('int', 'RedirectPage_trim_links', 3),
array('check', 'RedirectPage_Aeva_compatibility'),
);

if ($return_config) return $config_vars;

$context['post_url'] = $scripturl . '?action=admin;area=modsettings;save;sa=RedirectPage';
$context['settings_title'] = $txt['RedirectPage_settings_title'];

// Chek robots.txt info
$deep = substr_count($boardurl, '/') - 2;
$site_dir = $boarddir . str_repeat('/..', $deep);
$robots_path = $site_dir . '/robots.txt';
$robots = file_exists($robots_path);
if ($robots){
$robots = file_get_contents($robots_path);
$robots = strpos($robots, 'Disallow: ' . parse_url($boardurl, PHP_URL_PATH) . '/go.php') !== false;
}
if (!$robots){
$context['settings_message'] = '<div class="centertext">' . str_replace('{BOARD_URL}', parse_url($boardurl, PHP_URL_PATH), $txt['RedirectPage_robots_note']) . '</div>';
}

// Saving?
if (isset($_GET['save'])){
checkSession();
$save_vars = $config_vars;
saveDBSettings($save_vars);
redirectexit('action=admin;area=modsettings;sa=RedirectPage');
}

prepareDBSettingContext($config_vars);
}

array(
'tag' => 'iurl',
'type' => 'unparsed_content',
'content' => '<a href="$1" class="bbc_link">$1</a>',
'validate' => create_function('&$tag, &$data, $disabled', '
$data = strtr($data, array(\'<br />\' => \'\'));
if (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
'),
),
array(
'tag' => 'iurl',
'type' => 'unparsed_equals',
'before' => '<a href="$1" class="bbc_link">',
'after' => '</a>',
'validate' => create_function('&$tag, &$data, $disabled', '
if (substr($data, 0, 1) == \'#\')
$data = \'#post_\' . substr($data, 1);
elseif (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
'),
'disallow_children' => array('email', 'ftp', 'url', 'iurl'),
'disabled_after' => ' ($1)',
),

array(
'tag' => 'iurl',
'type' => 'unparsed_content',
'content' => '<a href="$1" class="bbc_link">$1</a>',
'validate' => create_function('&$tag, &$data, $disabled', '
$data = strtr($data, array(\'<br />\' => \'\'));
if (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
global $modSettings, $context, $boardurl;
$is_same_host = str_ireplace(\'www.\', \'\', parse_url($boardurl, PHP_URL_HOST)) == str_ireplace(\'www.\', \'\', parse_url($data, PHP_URL_HOST));
if (!empty($modSettings[\'RedirectPage_on_iurl\']) && (empty($modSettings[\'RedirectPage_guests_only\']) || $context[\'user\'][\'is_guest\']) && (!empty($modSettings[\'RedirectPage_on_same_host\']) || !$is_same_host)){
global $boardurl, $sourcedir, $modSettings, $sites;
$is_aeva_link = false;
if (!empty($modSettings[\'RedirectPage_Aeva_compatibility\']))
if(file_exists($sourcedir . \'/Subs-Aeva-Sites.php\'))
if (!empty($sites))
foreach ($sites as $s => $arr)
if ($arr[\'type\'] != \'local\' && preg_match(\'~\' . $arr[\'pattern\'] . \'~\', $data)){
$is_aeva_link = true;
break;
}
if (!$is_aeva_link && strpos($data, $boardurl) === false)
$tag[\'content\'] = \'<a href="\' . $boardurl . \'/go.php?url=\' . ($modSettings[\'RedirectPage_encode\'] ? base64_encode($data) : $data) . \'" class="bbc_link">\' . $data . \'</a>\';
}
'),
),
array(
'tag' => 'iurl',
'type' => 'unparsed_equals',
'before' => '<a href="$1" class="bbc_link">',
'after' => '</a>',
'validate' => create_function('&$tag, &$data, $disabled', '
if (substr($data, 0, 1) == \'#\')
$data = \'#post_\' . substr($data, 1);
else {
if (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
global $modSettings, $context, $boardurl;
$is_same_host = str_ireplace(\'www.\', \'\', parse_url($boardurl, PHP_URL_HOST)) == str_ireplace(\'www.\', \'\', parse_url($data, PHP_URL_HOST));
if (!empty($modSettings[\'RedirectPage_on_iurl\']) && (empty($modSettings[\'RedirectPage_guests_only\']) || $context[\'user\'][\'is_guest\']) && (!empty($modSettings[\'RedirectPage_on_same_host\']) || !$is_same_host)){
global $boardurl, $sourcedir, $modSettings, $sites;
$is_aeva_link = false;
if (!empty($modSettings[\'RedirectPage_Aeva_compatibility\']))
if(file_exists($sourcedir . \'/Subs-Aeva-Sites.php\'))
if (!empty($sites))
foreach ($sites as $s => $arr)
if ($arr[\'type\'] != \'local\' && preg_match(\'~\' . $arr[\'pattern\'] . \'~\', $data)){
$is_aeva_link = true;
break;
}
if (!$is_aeva_link && strpos($data, $boardurl) === false)
$data = $boardurl . \'/go.php?url=\' . ($modSettings[\'RedirectPage_encode\'] ? base64_encode($data) : $data);
}
}
'),
'disallow_children' => array('email', 'ftp', 'url', 'iurl'),
'disabled_after' => ' ($1)',
),

array(
'tag' => 'url',
'type' => 'unparsed_content',
'content' => '<a href="$1" class="bbc_link new_win" target="_blank">$1</a>',
'validate' => create_function('&$tag, &$data, $disabled', '
$data = strtr($data, array(\'<br />\' => \'\'));
if (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
'),
),
array(
'tag' => 'url',
'type' => 'unparsed_equals',
'before' => '<a href="$1" class="bbc_link new_win" target="_blank">',
'after' => '</a>',
'validate' => create_function('&$tag, &$data, $disabled', '
if (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
'),
'disallow_children' => array('email', 'ftp', 'url', 'iurl'),
'disabled_after' => ' ($1)',
),

array(
'tag' => 'url',
'type' => 'unparsed_content',
'content' => 'nox',
'validate' => create_function('&$tag, &$data, $disabled', '
$data = strtr($data, array(\'<br />\' => \'\'));
if (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
global $modSettings, $context;
if (!empty($modSettings[\'RedirectPage_trim_links\'])){
$short = preg_replace(\'~^https?://~i\', \'\', $data);
if (strlen($short) > $modSettings[\'RedirectPage_trim_links\']){
$site = parse_url($data, PHP_URL_HOST);
if (strlen($site) > $modSettings[\'RedirectPage_trim_links\']/2){
$before = $site . \'/\';
$after = (strlen($site) < $modSettings[\'RedirectPage_trim_links\'] - 3)? substr($short, -($modSettings[\'RedirectPage_trim_links\'] - strlen($site))) : \'\';
}
else{
$before = substr($short, 0, $modSettings[\'RedirectPage_trim_links\']/2);
$after = substr($short, -$modSettings[\'RedirectPage_trim_links\']/2);
}
$short = $before . \'...\' . $after;
}
}
else
$short = $data;
global $boardurl;
$is_same_host = str_ireplace(\'www.\', \'\', parse_url($boardurl, PHP_URL_HOST)) == str_ireplace(\'www.\', \'\', parse_url($data, PHP_URL_HOST));
if (!empty($modSettings[\'RedirectPage_on_plain\']) && (empty($modSettings[\'RedirectPage_guests_only\']) || $context[\'user\'][\'is_guest\']) && (!empty($modSettings[\'RedirectPage_on_same_host\']) || !$is_same_host)){
global $sourcedir, $modSettings, $sites;
$is_aeva_link = false;
if (!empty($modSettings[\'RedirectPage_Aeva_compatibility\']))
if(file_exists($sourcedir . \'/Subs-Aeva-Sites.php\'))
if (!empty($sites))
foreach ($sites as $s => $arr)
if ($arr[\'type\'] != \'local\' && preg_match(\'~\' . $arr[\'pattern\'] . \'~\', $data)){
$is_aeva_link = true;
break;
}
if (!$is_aeva_link && strpos($data, $boardurl) !== 0)
$data = $boardurl . \'/go.php?url=\' . ($modSettings[\'RedirectPage_encode\'] ? base64_encode($data) : $data);

}
$tag[\'content\'] = \'<a href="\' . $data . \'" class="bbc_link new_win" target="_blank">\' . $short . \'</a>\';
'),
),
array(
'tag' => 'url',
'type' => 'unparsed_equals',
'before' => '<a href="$1" class="bbc_link new_win" target="_blank">',
'after' => '</a>',
'validate' => create_function('&$tag, &$data, $disabled', '
if (strpos($data, \'http://\') !== 0 && strpos($data, \'https://\') !== 0)
$data = \'http://\' . $data;
global $boardurl;
$is_same_host = str_ireplace(\'www.\', \'\', parse_url($boardurl, PHP_URL_HOST)) == str_ireplace(\'www.\', \'\', parse_url($data, PHP_URL_HOST));
global $modSettings, $context;
if (!empty($modSettings[\'RedirectPage_on_url\']) && (empty($modSettings[\'RedirectPage_guests_only\']) || $context[\'user\'][\'is_guest\']) && (!empty($modSettings[\'RedirectPage_on_same_host\']) || !$is_same_host)){
global $boardurl, $sourcedir, $modSettings, $sites;
$is_aeva_link = false;
if (!empty($modSettings[\'RedirectPage_Aeva_compatibility\']))
if(file_exists($sourcedir . \'/Subs-Aeva-Sites.php\'))
if (!empty($sites))
foreach ($sites as $s => $arr)
if ($arr[\'type\'] != \'local\' && preg_match(\'~\' . $arr[\'pattern\'] . \'~\', $data)){
$is_aeva_link = true;
break;
}
if (!$is_aeva_link && strpos($data, $boardurl) === false)
$data = $boardurl . \'/go.php?url=\' . ($modSettings[\'RedirectPage_encode\'] ? base64_encode($data) : $data);
}
'),
'disallow_children' => array('email', 'ftp', 'url', 'iurl'),
'disabled_after' => ' ($1)',
),

elseif ($hasEqualSign)
$replaces['[' . $matches[1][$k] . '=' . $matches[2][$k] . ']'] = '[' . $this_tag . '=' . $replace . ']';

elseif ($hasEqualSign)
$replaces['[' . $matches[1][$k] . '=' . $matches[2][$k] . ']'] = '[' . $this_tag . '=' . $replace . ']';
elseif ($embeddedUrl && $matches[1][$k] == 'url' && !$hasEqualSign)
$replaces['[' . $matches[1][$k] . ']' . $matches[2][$k] . '[/' . $matches[3][$k] . ']'] = '[' . $this_tag . ']' . $replace . '[/' . $this_close . ']';

// BIOHAZARD:RedirectPage strings
$txt['admin_menu_RedirectPage'] = 'RedirectPage';
$txt['RedirectPage_settings_title'] = 'RedirectPage settings';
$txt['RedirectPage_settings_desc'] = 'Please edit RedirectPage settings';
//Strings for the settings area
$txt['RedirectPage_type'] = 'Redirection type';
$txt['RedirectPage_type_normal'] = 'normal';
$txt['RedirectPage_type_delayed'] = 'delayed';
$txt['RedirectPage_type_instant'] = 'instant';
$txt['RedirectPage_delay'] = 'Delay, seconds (for delayed redirection only)';
$txt['RedirectPage_use_theme'] = 'Use forums theme';
$txt['RedirectPage_encode'] = 'Encode links';
$txt['RedirectPage_text'] = 'Redirection page text<br />
<span style="color: #555; font-size: 85%;">
You can use:
<ul style="margin: 0;">
<li>{LINK} - active link</li>
<li>{link} - text link</li>
<li>{SITE} - site name</li>
<li>{DELAY} - delay in seconds</li>
</ul>
Set to blank for default text message.</span>';
$txt['RedirectPage_on_plain'] = 'Enable plain links redirection';
$txt['RedirectPage_on_url'] = 'Enable [url] tag redirection';
$txt['RedirectPage_on_iurl'] = 'Enable [iurl] tag redirection';
$txt['RedirectPage_on_members_sites'] = 'Enable members websites redirection';
$txt['RedirectPage_on_members_icq_etc'] = 'Enable icq and all other message services redirection';
$txt['RedirectPage_on_same_host'] = 'Enable redirection on same host';
$txt['RedirectPage_guests_only'] = 'Enable redirection for guests only';
$txt['RedirectPage_trim_links'] = 'Trim long links (set maximum links length or leave blank to disable trim function)';
$txt['RedirectPage_Aeva_compatibility'] = 'Use Aeva Media compatibility mode';
// Strings for redirection page
$txt['RedirectPage_title'] = 'Going to an external site...';
$txt['RedirectPage_default_text'] = 'You are leaving the site on an external link  <b>{LINK}</b> provided by one of users.<br /><br />Administration is not responsible for the content of the site <b>{SITE}</b>. In addition, the site may contain viruses, trojans and other malware to damage your PC. If you do not have serious reasons to trust this site, it is better not to pass by link.<br /><br />If you have not changed your mind, click on the <b><a href="{link}">link</a></b>. If you do not want to risk the security of your account and your computer, click <b><a href="javascript:window.close()">Cancel</a></b>.';
$txt['RedirectPage_robots_note'] = '
Dont forget to update your robots.txt.
Add to your robots.txt string<br />
<i>Disallow: {BOARD_URL}/go.php</i><br />
More info on <a href="http://www.robotstxt.org/" target="_blank">www.robotstxt.org</a>';

// End BIOHAZARD:RedirectPage strings