2012-10-11 08:00:15 +00:00
|
|
|
<?
|
|
|
|
// This is a file of miscellaneous functions that are called so damn often
|
|
|
|
// that it'd just be annoying to stick them in namespaces.
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Return true if the given string is numeric.
|
|
|
|
*
|
|
|
|
* @param string $Str
|
|
|
|
* @return true if $Str numeric
|
|
|
|
*/
|
2013-02-24 08:00:18 +00:00
|
|
|
if (PHP_INT_SIZE === 4) {
|
|
|
|
function is_number($Str) {
|
|
|
|
if ($Str[0] == '-' || $Str[0] == '+') { // Leading plus/minus signs are ok
|
|
|
|
$Str[0] = 0;
|
|
|
|
}
|
|
|
|
return ltrim($Str, "0..9") === '';
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
function is_number($Str) {
|
|
|
|
return $Str == strval(intval($Str));
|
|
|
|
}
|
2012-10-11 08:00:15 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* HTML-escape a string for output.
|
|
|
|
* This is preferable to htmlspecialchars because it doesn't screw up upon a double escape.
|
|
|
|
*
|
|
|
|
* @param string $Str
|
|
|
|
* @return string escaped string.
|
|
|
|
*/
|
|
|
|
function display_str($Str) {
|
2013-04-13 08:00:19 +00:00
|
|
|
if ($Str === NULL || $Str === false || is_array($Str)) {
|
2012-10-11 08:00:15 +00:00
|
|
|
return '';
|
|
|
|
}
|
2013-04-13 08:00:19 +00:00
|
|
|
if ($Str != '' && !is_number($Str)) {
|
2012-10-11 08:00:15 +00:00
|
|
|
$Str = Format::make_utf8($Str);
|
|
|
|
$Str = mb_convert_encoding($Str,"HTML-ENTITIES","UTF-8");
|
|
|
|
$Str = preg_replace("/&(?![A-Za-z]{0,4}\w{2,3};|#[0-9]{2,5};)/m","&",$Str);
|
|
|
|
|
|
|
|
$Replace = array(
|
|
|
|
"'",'"',"<",">",
|
|
|
|
'€','‚','ƒ','„','…','†','‡','ˆ',
|
|
|
|
'‰','Š','‹','Œ','Ž','‘','’','“',
|
|
|
|
'”','•','–','—','˜','™','š','›',
|
|
|
|
'œ','ž','Ÿ'
|
|
|
|
);
|
|
|
|
|
|
|
|
$With = array(
|
|
|
|
''','"','<','>',
|
|
|
|
'€','‚','ƒ','„','…','†','‡','ˆ',
|
|
|
|
'‰','Š','‹','Œ','Ž','‘','’','“',
|
|
|
|
'”','•','–','—','˜','™','š','›',
|
|
|
|
'œ','ž','Ÿ'
|
|
|
|
);
|
|
|
|
|
|
|
|
$Str = str_replace($Replace, $With, $Str);
|
|
|
|
}
|
|
|
|
return $Str;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Send a message to an IRC bot listening on SOCKET_LISTEN_PORT
|
|
|
|
*
|
|
|
|
* @param string $Raw An IRC protocol snippet to send.
|
|
|
|
*/
|
|
|
|
function send_irc($Raw) {
|
|
|
|
$IRCSocket = fsockopen(SOCKET_LISTEN_ADDRESS, SOCKET_LISTEN_PORT);
|
|
|
|
$Raw = str_replace(array("\n", "\r"), '', $Raw);
|
|
|
|
fwrite($IRCSocket, $Raw);
|
|
|
|
fclose($IRCSocket);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Display a critical error and kills the page.
|
|
|
|
*
|
|
|
|
* @param string $Error Error type. Automatically supported:
|
|
|
|
* 403, 404, 0 (invalid input), -1 (invalid request)
|
|
|
|
* If you use your own string for Error, it becomes the error description.
|
|
|
|
* @param boolean $Ajax If true, the header/footer won't be shown, just the description.
|
|
|
|
* @param string $Log If true, the user is given a link to search $Log in the site log.
|
|
|
|
*/
|
|
|
|
function error($Error, $Ajax=false, $Log=false) {
|
|
|
|
global $Debug;
|
|
|
|
require(SERVER_ROOT.'/sections/error/index.php');
|
|
|
|
$Debug->profile();
|
|
|
|
die();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Convenience function. See doc in class_permissions.php
|
|
|
|
*/
|
|
|
|
function check_perms($PermissionName, $MinClass = 0) {
|
|
|
|
return Permissions::check_perms($PermissionName, $MinClass);
|
|
|
|
}
|
|
|
|
|
2013-04-24 08:00:23 +00:00
|
|
|
/*
|
|
|
|
* Print json status result with an optional message and die.
|
|
|
|
*/
|
|
|
|
|
|
|
|
function json_die($Status, $Message) {
|
|
|
|
if ($Status == "success" && $Message) {
|
|
|
|
print json_encode(array('status' => $Status, 'response' => $Message));
|
|
|
|
} else if ($Message) {
|
|
|
|
print json_encode(array('status' => $Status, 'error' => $Message));
|
|
|
|
} else {
|
|
|
|
print json_encode(array('status' => $Status));
|
|
|
|
}
|
|
|
|
die();
|
|
|
|
}
|
2012-10-11 08:00:15 +00:00
|
|
|
?>
|