$value) {
if (substr($value, 0, 2) !== './') {
continue;
}
$valid_starts[$key] = '.' . $value;
}
}
if ($other) {
$valid_starts[] = 'mailto:';
$valid_starts[] = 'ftp://';
}
if ($http) {
$valid_starts[] = 'http://';
}
if ($is_setup) {
$valid_starts[] = '?page=form&';
$valid_starts[] = '?page=servers&';
}
foreach ($valid_starts as $val) {
if (substr($url, 0, strlen($val)) == $val) {
return true;
}
}
return false;
}
/**
* Check if we are currently on a setup folder page
*/
public static function isSetup(): bool
{
return $GLOBALS['config'] !== null && $GLOBALS['config']->get('is_setup');
}
/**
* Callback function for replacing [a@link@target] links in bb code.
*
* @param array $found Array of preg matches
*
* @return string Replaced string
*/
public static function replaceBBLink(array $found)
{
/* Check for valid link */
if (! self::checkLink($found[1])) {
return $found[0];
}
/* a-z and _ allowed in target */
if (! empty($found[3]) && preg_match('/[^a-z_]+/i', $found[3])) {
return $found[0];
}
/* Construct target */
$target = '';
if (! empty($found[3])) {
$target = ' target="' . $found[3] . '"';
if ($found[3] === '_blank') {
$target .= ' rel="noopener noreferrer"';
}
}
/* Construct url */
if (substr($found[1], 0, 4) === 'http') {
$url = Core::linkURL($found[1]);
} else {
$url = $found[1];
}
return '';
}
/**
* Callback function for replacing [doc@anchor] links in bb code.
*
* @param string[] $found Array of preg matches
*/
public static function replaceDocLink(array $found): string
{
if (count($found) >= 4) {
/* doc@page@anchor pattern */
$page = $found[1];
$anchor = $found[3];
} else {
/* doc@anchor pattern */
$anchor = $found[1];
if (str_starts_with($anchor, 'faq')) {
$page = 'faq';
} elseif (str_starts_with($anchor, 'cfg')) {
$page = 'config';
} else {
/* Guess */
$page = 'setup';
}
}
$link = MySQLDocumentation::getDocumentationLink($page, $anchor, self::isSetup() ? '../' : './');
return '';
}
/**
* Sanitizes $message, taking into account our special codes
* for formatting.
*
* If you want to include result in element attribute, you should escape it.
*
* Examples:
*
*
*
* bar
*
* @param string $message the message
* @param bool $escape whether to escape html in result
* @param bool $safe whether string is safe (can keep < and > chars)
*/
public static function sanitizeMessage(string $message, $escape = false, $safe = false): string
{
if (! $safe) {
$message = strtr($message, ['<' => '<', '>' => '>']);
}
/* Interpret bb code */
$replace_pairs = [
'[em]' => '',
'[/em]' => '',
'[strong]' => '',
'[/strong]' => '',
'[code]' => '',
'[/code]' => '',
'[kbd]' => '',
'[/kbd]' => '',
'[br]' => '
',
'[/a]' => '',
'[/doc]' => '',
'[sup]' => '',
'[/sup]' => '',
'[conferr]' => '',
// used in libraries/Util.php
'[dochelpicon]' => Html\Generator::getImage('b_help', __('Documentation')),
];
$message = strtr($message, $replace_pairs);
/* Match links in bb code ([a@url@target], where @target is options) */
$pattern = '/\[a@([^]"@]*)(@([^]"]*))?\]/';
/* Find and replace all links */
$message = (string) preg_replace_callback($pattern, static function (array $match) {
return self::replaceBBLink($match);
}, $message);
/* Replace documentation links */
$message = (string) preg_replace_callback(
'/\[doc@([a-zA-Z0-9_-]+)(@([a-zA-Z0-9_-]*))?\]/',
/** @param string[] $match */
static function (array $match): string {
return self::replaceDocLink($match);
},
$message
);
/* Possibly escape result */
if ($escape) {
$message = htmlspecialchars($message);
}
return $message;
}
/**
* Sanitize a filename by removing anything besides legit characters
*
* Intended usecase:
* When using a filename in a Content-Disposition header
* the value should not contain ; or "
*
* When exporting, avoiding generation of an unexpected double-extension file
*
* @param string $filename The filename
* @param bool $replaceDots Whether to also replace dots
*
* @return string the sanitized filename
*/
public static function sanitizeFilename($filename, $replaceDots = false)
{
$pattern = '/[^A-Za-z0-9_';
// if we don't have to replace dots
if (! $replaceDots) {
// then add the dot to the list of legit characters
$pattern .= '.';
}
$pattern .= '-]/';
$filename = preg_replace($pattern, '_', $filename);
return $filename;
}
/**
* Format a string so it can be a string inside JavaScript code inside an
* eventhandler (onclick, onchange, on..., ).
* This function is used to displays a javascript confirmation box for
* "DROP/DELETE/ALTER" queries.
*
* @param string $a_string the string to format
* @param bool $add_backquotes whether to add backquotes to the string or not
*
* @return string the formatted string
*/
public static function jsFormat($a_string = '', $add_backquotes = true)
{
$a_string = htmlspecialchars((string) $a_string);
$a_string = self::escapeJsString($a_string);
// Needed for inline javascript to prevent some browsers
// treating it as a anchor
$a_string = str_replace('#', '\\#', $a_string);
return $add_backquotes
? Util::backquote($a_string)
: $a_string;
}
/**
* escapes a string to be inserted as string a JavaScript block
* enclosed by
* this requires only to escape ' with \' and end of script block
*
* We also remove NUL byte as some browsers (namely MSIE) ignore it and
* inserting it anywhere inside '',
'\\' => '\\\\',
'\'' => '\\\'',
'"' => '\"',
"\n" => '\n',
"\r" => '\r',
]
)
);
}
/**
* Formats a value for javascript code.
*
* @param string|bool|int $value String to be formatted.
*
* @return int|string formatted value.
*/
public static function formatJsVal($value)
{
if (is_bool($value)) {
if ($value) {
return 'true';
}
return 'false';
}
if (is_int($value)) {
return $value;
}
return '"' . self::escapeJsString($value) . '"';
}
/**
* Formats an javascript assignment with proper escaping of a value
* and support for assigning array of strings.
*
* @param string $key Name of value to set
* @param mixed $value Value to set, can be either string or array of strings
* @param bool $escape Whether to escape value or keep it as it is
* (for inclusion of js code)
*
* @return string Javascript code.
*/
public static function getJsValue($key, $value, $escape = true)
{
$result = $key . ' = ';
if (! $escape) {
$result .= $value;
} elseif (is_array($value)) {
$result .= '[';
foreach ($value as $val) {
$result .= self::formatJsVal($val) . ',';
}
$result .= "];\n";
} else {
$result .= self::formatJsVal($value) . ";\n";
}
return $result;
}
/**
* Removes all variables from request except allowed ones.
*
* @param string[] $allowList list of variables to allow
*/
public static function removeRequestVars(&$allowList): void
{
// do not check only $_REQUEST because it could have been overwritten
// and use type casting because the variables could have become
// strings
$keys = array_keys(
array_merge((array) $_REQUEST, (array) $_GET, (array) $_POST, (array) $_COOKIE)
);
foreach ($keys as $key) {
if (! in_array($key, $allowList)) {
unset($_REQUEST[$key], $_GET[$key], $_POST[$key]);
continue;
}
// allowed stuff could be compromised so escape it
// we require it to be a string
if (isset($_REQUEST[$key]) && ! is_string($_REQUEST[$key])) {
unset($_REQUEST[$key]);
}
if (isset($_POST[$key]) && ! is_string($_POST[$key])) {
unset($_POST[$key]);
}
if (isset($_COOKIE[$key]) && ! is_string($_COOKIE[$key])) {
unset($_COOKIE[$key]);
}
if (! isset($_GET[$key]) || is_string($_GET[$key])) {
continue;
}
unset($_GET[$key]);
}
}
}