cleanup public file
parent
be3d060e51
commit
d01496f5cf
266
_public.php
266
_public.php
|
|
@ -10,38 +10,40 @@
|
|||
# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
|
||||
# -- END LICENSE BLOCK ------------------------------------
|
||||
|
||||
if (!defined('DC_RC_PATH')){return;}
|
||||
if (!defined('DC_RC_PATH')) {
|
||||
return null;
|
||||
}
|
||||
|
||||
require_once dirname(__FILE__) . '/_widgets.php';
|
||||
|
||||
$core->tpl->setPath($core->tpl->getPath(), dirname(__FILE__) . '/default-templates');
|
||||
|
||||
$core->addBehavior('publicBeforeDocument',array('pubKutrl','publicBeforeDocument'));
|
||||
$core->addBehavior('publicHeadContent',array('pubKutrl','publicHeadContent'));
|
||||
$core->addBehavior('publicBeforeContentFilter',array('pubKutrl','publicBeforeContentFilter'));
|
||||
$core->addBehavior('templateBeforeValue',array('pubKutrl','templateBeforeValue'));
|
||||
$core->addBehavior('templateAfterValue',array('pubKutrl','templateAfterValue'));
|
||||
$core->addBehavior('publicBeforeDocument', ['pubKutrl', 'publicBeforeDocument']);
|
||||
$core->addBehavior('publicHeadContent', ['pubKutrl', 'publicHeadContent']);
|
||||
$core->addBehavior('publicBeforeContentFilter', ['pubKutrl', 'publicBeforeContentFilter']);
|
||||
$core->addBehavior('templateBeforeValue', ['pubKutrl', 'templateBeforeValue']);
|
||||
$core->addBehavior('templateAfterValue', ['pubKutrl', 'templateAfterValue']);
|
||||
|
||||
$core->tpl->addBlock('kutrlPageIf',array('tplKutrl','pageIf'));
|
||||
$core->tpl->addBlock('kutrlMsgIf',array('tplKutrl','pageMsgIf'));
|
||||
$core->tpl->addBlock('kutrlPageIf', ['tplKutrl', 'pageIf']);
|
||||
$core->tpl->addBlock('kutrlMsgIf', ['tplKutrl', 'pageMsgIf']);
|
||||
|
||||
$core->tpl->addValue('kutrlPageURL',array('tplKutrl','pageURL'));
|
||||
$core->tpl->addValue('kutrlMsg',array('tplKutrl','pageMsg'));
|
||||
$core->tpl->addValue('kutrlHumanField',array('tplKutrl','humanField'));
|
||||
$core->tpl->addValue('kutrlHumanFieldProtect',array('tplKutrl','humanFieldProtect'));
|
||||
$core->tpl->addValue('kutrlPageURL', ['tplKutrl', 'pageURL']);
|
||||
$core->tpl->addValue('kutrlMsg', ['tplKutrl', 'pageMsg']);
|
||||
$core->tpl->addValue('kutrlHumanField', ['tplKutrl', 'humanField']);
|
||||
$core->tpl->addValue('kutrlHumanFieldProtect', ['tplKutrl', 'humanFieldProtect']);
|
||||
|
||||
$core->tpl->addBlock('AttachmentKutrlIf',array('tplKutrl','AttachmentKutrlIf'));
|
||||
$core->tpl->addValue('AttachmentKutrl',array('tplKutrl','AttachmentKutrl'));
|
||||
$core->tpl->addBlock('MediaKutrlIf',array('tplKutrl','MediaKutrlIf'));
|
||||
$core->tpl->addValue('MediaKutrl',array('tplKutrl','MediaKutrl'));
|
||||
$core->tpl->addBlock('EntryAuthorKutrlIf',array('tplKutrl','EntryAuthorKutrlIf'));
|
||||
$core->tpl->addValue('EntryAuthorKutrl',array('tplKutrl','EntryAuthorKutrl'));
|
||||
$core->tpl->addBlock('EntryKutrlIf',array('tplKutrl','EntryKutrlIf'));
|
||||
$core->tpl->addValue('EntryKutrl',array('tplKutrl','EntryKutrl'));
|
||||
$core->tpl->addBlock('CommentAuthorKutrlIf',array('tplKutrl','CommentAuthorKutrlIf'));
|
||||
$core->tpl->addValue('CommentAuthorKutrl',array('tplKutrl','CommentAuthorKutrl'));
|
||||
$core->tpl->addBlock('CommentPostKutrlIf',array('tplKutrl','CommentPostKutrlIf'));
|
||||
$core->tpl->addValue('CommentPostKutrl',array('tplKutrl','CommentPostKutrl'));
|
||||
$core->tpl->addBlock('AttachmentKutrlIf', ['tplKutrl', 'AttachmentKutrlIf']);
|
||||
$core->tpl->addValue('AttachmentKutrl', ['tplKutrl', 'AttachmentKutrl']);
|
||||
$core->tpl->addBlock('MediaKutrlIf', ['tplKutrl', 'MediaKutrlIf']);
|
||||
$core->tpl->addValue('MediaKutrl', ['tplKutrl', 'MediaKutrl']);
|
||||
$core->tpl->addBlock('EntryAuthorKutrlIf', ['tplKutrl', 'EntryAuthorKutrlIf']);
|
||||
$core->tpl->addValue('EntryAuthorKutrl', ['tplKutrl', 'EntryAuthorKutrl']);
|
||||
$core->tpl->addBlock('EntryKutrlIf', ['tplKutrl', 'EntryKutrlIf']);
|
||||
$core->tpl->addValue('EntryKutrl', ['tplKutrl', 'EntryKutrl']);
|
||||
$core->tpl->addBlock('CommentAuthorKutrlIf', ['tplKutrl', 'CommentAuthorKutrlIf']);
|
||||
$core->tpl->addValue('CommentAuthorKutrl', ['tplKutrl', 'CommentAuthorKutrl']);
|
||||
$core->tpl->addBlock('CommentPostKutrlIf', ['tplKutrl', 'CommentPostKutrlIf']);
|
||||
$core->tpl->addValue('CommentPostKutrl', ['tplKutrl', 'CommentPostKutrl']);
|
||||
|
||||
class urlKutrl extends dcUrlHandlers
|
||||
{
|
||||
|
|
@ -52,16 +54,14 @@ class urlKutrl extends dcUrlHandlers
|
|||
$s = $core->blog->settings->kUtRL;
|
||||
|
||||
# Not active, go to default 404
|
||||
if (!$s->kutrl_active)
|
||||
{
|
||||
if (!$s->kutrl_active) {
|
||||
self::p404();
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
# Not a valid url, go to kutrl 404
|
||||
if (!preg_match('#^(|(/(.*?)))$#',$args,$m))
|
||||
{
|
||||
if (!preg_match('#^(|(/(.*?)))$#', $args, $m)) {
|
||||
self::kutrl404();
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
|
||||
$args = isset($m[3]) ? $m[3] : '';
|
||||
|
|
@ -72,42 +72,36 @@ class urlKutrl extends dcUrlHandlers
|
|||
$kut = new localKutrlService($core);
|
||||
|
||||
# Nothing on url
|
||||
if ($m[1] == '/')
|
||||
{
|
||||
if ($m[1] == '/') {
|
||||
$_ctx->kutrl_msg = 'No link given.';
|
||||
}
|
||||
# find suffix on redirect url
|
||||
$suffix = '';
|
||||
if (preg_match('@^([^?/#]+)(.*?)$@',$args,$more))
|
||||
{
|
||||
if (preg_match('@^([^?/#]+)(.*?)$@', $args, $more)) {
|
||||
$args = $more[1];
|
||||
$suffix = $more[2];
|
||||
}
|
||||
# No arg, go to kurtl page
|
||||
if ($args == '')
|
||||
{
|
||||
if ($args == '') {
|
||||
self::pageKutrl($kut);
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
# Not find, go to kutrl 404
|
||||
if (false === ($url = $kut->getUrl($args)))
|
||||
{
|
||||
if (false === ($url = $kut->getUrl($args))) {
|
||||
//$_ctx->kutrl_msg = 'Failed to find short link.';
|
||||
//self::pageKutrl($kut);
|
||||
|
||||
self::kutrl404();
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
# Removed (empty url), go to kutrl 404
|
||||
if (!$url)
|
||||
{
|
||||
if (!$url) {
|
||||
self::kutrl404();
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
|
||||
$core->blog->triggerBlog();
|
||||
http::redirect($url . $suffix);
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
|
||||
private static function pageKutrl($kut)
|
||||
|
|
@ -116,86 +110,67 @@ class urlKutrl extends dcUrlHandlers
|
|||
$s = $core->blog->settings->kUtRL;
|
||||
|
||||
# Not active, go to default 404
|
||||
if (!$s->kutrl_active)
|
||||
{
|
||||
if (!$s->kutrl_active) {
|
||||
self::p404();
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
# Public page not active, go to kutrl 404
|
||||
if (!$s->kutrl_srv_local_public)
|
||||
{
|
||||
if (!$s->kutrl_srv_local_public) {
|
||||
self::kutrl404();
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
# Validation form
|
||||
$url = !empty($_POST['longurl']) ? trim($core->con->escape($_POST['longurl'])) : '';
|
||||
if (!empty($url))
|
||||
{
|
||||
if (!empty($url)) {
|
||||
$hmf = !empty($_POST['hmf']) ? $_POST['hmf'] : '!';
|
||||
$hmfu = !empty($_POST['hmfp']) ? hmfKutrl::unprotect($_POST['hmfp']) : '?';
|
||||
|
||||
$err = false;
|
||||
if (!$err)
|
||||
{
|
||||
if ($hmf != $hmfu)
|
||||
{
|
||||
if (!$err) {
|
||||
if ($hmf != $hmfu) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('Failed to verify protected field.');
|
||||
}
|
||||
}
|
||||
if (!$err)
|
||||
{
|
||||
if (!$kut->testService())
|
||||
{
|
||||
if (!$err) {
|
||||
if (!$kut->testService()) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('Service is not well configured.');
|
||||
}
|
||||
}
|
||||
if (!$err)
|
||||
{
|
||||
if (!$kut->isValidUrl($url))
|
||||
{
|
||||
if (!$err) {
|
||||
if (!$kut->isValidUrl($url)) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('This string is not a valid URL.');
|
||||
}
|
||||
}
|
||||
if (!$err)
|
||||
{
|
||||
if (!$kut->isLongerUrl($url))
|
||||
{
|
||||
if (!$err) {
|
||||
if (!$kut->isLongerUrl($url)) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('This link is too short.');
|
||||
}
|
||||
}
|
||||
if (!$err)
|
||||
{
|
||||
if (!$kut->isProtocolUrl($url))
|
||||
{
|
||||
if (!$err) {
|
||||
if (!$kut->isProtocolUrl($url)) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('This type of link is not allowed.');
|
||||
}
|
||||
}
|
||||
|
||||
if (!$err)
|
||||
{
|
||||
if (!$kut->allow_external_url && !$kut->isBlogUrl($url))
|
||||
{
|
||||
if (!$err) {
|
||||
if (!$kut->allow_external_url && !$kut->isBlogUrl($url)) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('Short links are limited to this blog URL.');
|
||||
}
|
||||
}
|
||||
if (!$err)
|
||||
{
|
||||
if ($kut->isServiceUrl($url))
|
||||
{
|
||||
if (!$err) {
|
||||
if ($kut->isServiceUrl($url)) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('This link is already a short link.');
|
||||
}
|
||||
}
|
||||
if (!$err)
|
||||
{
|
||||
if (false !== ($rs = $kut->isKnowUrl($url)))
|
||||
{
|
||||
if (!$err) {
|
||||
if (false !== ($rs = $kut->isKnowUrl($url))) {
|
||||
$err = true;
|
||||
|
||||
$url = $rs->url;
|
||||
|
|
@ -208,15 +183,11 @@ class urlKutrl extends dcUrlHandlers
|
|||
);
|
||||
}
|
||||
}
|
||||
if (!$err)
|
||||
{
|
||||
if (false === ($rs = $kut->hash($url)))
|
||||
{
|
||||
if (!$err) {
|
||||
if (false === ($rs = $kut->hash($url))) {
|
||||
$err = true;
|
||||
$_ctx->kutrl_msg = __('Failed to create short link.');
|
||||
}
|
||||
else
|
||||
{
|
||||
} else {
|
||||
$url = $rs->url;
|
||||
$new_url = $kut->url_base . $rs->hash;
|
||||
|
||||
|
|
@ -228,8 +199,7 @@ class urlKutrl extends dcUrlHandlers
|
|||
$core->blog->triggerBlog();
|
||||
|
||||
# ex: Send new url to messengers
|
||||
if (!empty($rs))
|
||||
{
|
||||
if (!empty($rs)) {
|
||||
$core->callBehavior('publicAfterKutrlCreate', $core, $rs, __('New public short URL'));
|
||||
}
|
||||
}
|
||||
|
|
@ -238,17 +208,16 @@ class urlKutrl extends dcUrlHandlers
|
|||
|
||||
$core->tpl->setPath($core->tpl->getPath(), dirname(__FILE__) . '/default-templates');
|
||||
self::serveDocument('kutrl.html');
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
|
||||
protected static function kutrl404()
|
||||
{
|
||||
global $core;
|
||||
|
||||
if (!$core->blog->settings->kUtRL->kutrl_srv_local_404_active)
|
||||
{
|
||||
if (!$core->blog->settings->kUtRL->kutrl_srv_local_404_active) {
|
||||
self::p404();
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
|
||||
$core->tpl->setPath($core->tpl->getPath(), dirname(__FILE__) . '/default-templates');
|
||||
|
|
@ -272,7 +241,7 @@ class urlKutrl extends dcUrlHandlers
|
|||
class pubKutrl
|
||||
{
|
||||
# List of template tag which content URL that can be shortenn
|
||||
public static $know_tags = array(
|
||||
public static $know_tags = [
|
||||
'AttachmentURL',
|
||||
'CategoryURL',
|
||||
'MediaURL',
|
||||
|
|
@ -281,59 +250,56 @@ class pubKutrl
|
|||
'EntryCategoryURL',
|
||||
'CommentAuthorURL',
|
||||
'CommentPostURL'
|
||||
);
|
||||
];
|
||||
|
||||
# Disable URL shoretning on filtered tag
|
||||
public static function templateBeforeValue($core, $tag, $attr)
|
||||
{
|
||||
if (!empty($attr['disable_kutrl']) && in_array($tag,pubKutrl::$know_tags))
|
||||
{
|
||||
if (!empty($attr['disable_kutrl']) && in_array($tag,pubKutrl::$know_tags)) {
|
||||
return '<?php $GLOBALS["disable_kutrl"] = true; ?>';
|
||||
}
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
|
||||
# Re unable it after tag
|
||||
public static function templateAfterValue($core, $tag, $attr)
|
||||
{
|
||||
if (!empty($attr['disable_kutrl']) && in_array($tag,pubKutrl::$know_tags))
|
||||
{
|
||||
if (!empty($attr['disable_kutrl']) && in_array($tag,pubKutrl::$know_tags)) {
|
||||
return '<?php $GLOBALS["disable_kutrl"] = false; ?>';
|
||||
}
|
||||
return;
|
||||
return null;
|
||||
}
|
||||
|
||||
# Replace long urls on the fly (on filter) for default tags
|
||||
public static function publicBeforeContentFilter($core, $tag, $args)
|
||||
{
|
||||
# Unknow tag
|
||||
if (!in_array($tag,pubKutrl::$know_tags)) return;
|
||||
|
||||
if (!in_array($tag,pubKutrl::$know_tags)) {
|
||||
return null;
|
||||
}
|
||||
# URL shortening is disabled by tag attribute
|
||||
if (empty($GLOBALS['disable_kutrl']))
|
||||
{
|
||||
if (empty($GLOBALS['disable_kutrl'])) {
|
||||
# kUtRL is not activated
|
||||
if (!$core->blog->settings->kUtRL->kutrl_active
|
||||
|| !$core->blog->settings->kUtRL->kutrl_tpl_active) return;
|
||||
|| !$core->blog->settings->kUtRL->kutrl_tpl_active) {
|
||||
return null;
|
||||
}
|
||||
|
||||
global $_ctx;
|
||||
|
||||
# Oups
|
||||
if (!$_ctx->exists('kutrl')) return;
|
||||
|
||||
# Existing
|
||||
if (false !== ($kutrl_rs = $_ctx->kutrl->isKnowUrl($args[0])))
|
||||
{
|
||||
$args[0] = $_ctx->kutrl->url_base.$kutrl_rs->hash;
|
||||
if (!$_ctx->exists('kutrl')) {
|
||||
return null;
|
||||
}
|
||||
# Existing
|
||||
if (false !== ($kutrl_rs = $_ctx->kutrl->isKnowUrl($args[0]))) {
|
||||
$args[0] = $_ctx->kutrl->url_base . $kutrl_rs->hash;
|
||||
# New
|
||||
elseif (false !== ($kutrl_rs = $_ctx->kutrl->hash($args[0])))
|
||||
{
|
||||
} elseif (false !== ($kutrl_rs = $_ctx->kutrl->hash($args[0]))) {
|
||||
$args[0] = $_ctx->kutrl->url_base . $kutrl_rs->hash;
|
||||
|
||||
# ex: Send new url to messengers
|
||||
if (!empty($kutrl_rs))
|
||||
{
|
||||
if (!empty($kutrl_rs)) {
|
||||
$core->callBehavior('publicAfterKutrlCreate', $core, $kutrl_rs, __('New public short URL'));
|
||||
}
|
||||
}
|
||||
|
|
@ -348,18 +314,19 @@ class pubKutrl
|
|||
# Passive : all kutrl tag return long url
|
||||
$_ctx->kutrl_passive = (boolean) $s->kutrl_tpl_passive;
|
||||
|
||||
if (!$s->kutrl_active || !$s->kutrl_tpl_service) return;
|
||||
|
||||
if (null === ($kut = kutrl::quickPlace('tpl'))) return;
|
||||
|
||||
if (!$s->kutrl_active || !$s->kutrl_tpl_service) {
|
||||
return null;
|
||||
}
|
||||
if (null === ($kut = kutrl::quickPlace('tpl'))) {
|
||||
return null;
|
||||
}
|
||||
$_ctx->kutrl = $kut;
|
||||
}
|
||||
|
||||
public static function publicHeadContent($core)
|
||||
{
|
||||
$css = $core->blog->settings->kUtRL->kutrl_srv_local_css;
|
||||
if ($css)
|
||||
{
|
||||
if ($css) {
|
||||
echo
|
||||
"\n<!-- CSS for kUtRL --> \n" .
|
||||
"<style type=\"text/css\"> \n" .
|
||||
|
|
@ -381,14 +348,11 @@ class tplKutrl
|
|||
{
|
||||
$operator = isset($attr['operator']) ? self::getOperator($attr['operator']) : '&&';
|
||||
|
||||
if (isset($attr['is_active']))
|
||||
{
|
||||
if (isset($attr['is_active'])) {
|
||||
$sign = (boolean) $attr['is_active'] ? '' : '!';
|
||||
$if[] = $sign . '$core->blog->settings->kUtRL->kutrl_srv_local_public';
|
||||
}
|
||||
|
||||
if (empty($if))
|
||||
{
|
||||
if (empty($if)) {
|
||||
return $content;
|
||||
}
|
||||
|
||||
|
|
@ -402,14 +366,11 @@ class tplKutrl
|
|||
{
|
||||
$operator = isset($attr['operator']) ? self::getOperator($attr['operator']) : '&&';
|
||||
|
||||
if (isset($attr['has_message']))
|
||||
{
|
||||
if (isset($attr['has_message'])) {
|
||||
$sign = (boolean) $attr['has_message'] ? '!' : '=';
|
||||
$if[] = '"" ' . $sign . '= $_ctx->kutrl_msg';
|
||||
}
|
||||
|
||||
if (empty($if))
|
||||
{
|
||||
if (empty($if)) {
|
||||
return $content;
|
||||
}
|
||||
|
||||
|
|
@ -500,26 +461,19 @@ class tplKutrl
|
|||
{
|
||||
$operator = isset($attr['operator']) ? self::getOperator($attr['operator']) : '&&';
|
||||
|
||||
if (isset($attr['is_active']))
|
||||
{
|
||||
if (isset($attr['is_active'])) {
|
||||
$sign = (boolean) $attr['is_active'] ? '' : '!';
|
||||
$if[] = $sign . '$_ctx->exists("kutrl")';
|
||||
}
|
||||
|
||||
if (isset($attr['passive_mode']))
|
||||
{
|
||||
if (isset($attr['passive_mode'])) {
|
||||
$sign = (boolean) $attr['passive_mode'] ? '' : '!';
|
||||
$if[] = $sign . '$_ctx->kutrl_passive';
|
||||
}
|
||||
|
||||
if (isset($attr['has_kutrl']))
|
||||
{
|
||||
if (isset($attr['has_kutrl'])) {
|
||||
$sign = (boolean) $attr['has_kutrl'] ? '!' : '=';
|
||||
$if[] = '($_ctx->exists("kutrl") && false ' . $sign . '== $_ctx->kutrl->select(' . $str . ',null,null,"kutrl"))';
|
||||
}
|
||||
|
||||
if (empty($if))
|
||||
{
|
||||
if (empty($if)) {
|
||||
return $content;
|
||||
}
|
||||
return
|
||||
|
|
@ -566,8 +520,7 @@ class tplKutrl
|
|||
|
||||
protected static function getOperator($op)
|
||||
{
|
||||
switch (strtolower($op))
|
||||
{
|
||||
switch (strtolower($op)) {
|
||||
case 'or':
|
||||
case '||':
|
||||
return '||';
|
||||
|
|
@ -587,12 +540,9 @@ class hmfKutrl
|
|||
{
|
||||
$res = '';
|
||||
$chars = self::$chars;
|
||||
|
||||
for($i = 0;$i < $len; $i++)
|
||||
{
|
||||
for($i = 0; $i < $len; $i++) {
|
||||
$res .= $chars[rand(0, strlen($chars)-1)];
|
||||
}
|
||||
|
||||
return $res;
|
||||
}
|
||||
|
||||
|
|
@ -600,26 +550,20 @@ class hmfKutrl
|
|||
{
|
||||
$res = '';
|
||||
$chars = self::$chars;
|
||||
|
||||
for($i = 0; $i < strlen($str); $i++)
|
||||
{
|
||||
$res .= $chars[rand(0, strlen($chars)-1)] . $str[$i];
|
||||
}
|
||||
|
||||
return $res;
|
||||
}
|
||||
|
||||
public static function unprotect($str)
|
||||
{
|
||||
$res = '';
|
||||
|
||||
for($i = 0; $i < strlen($str);$i++)
|
||||
{
|
||||
for($i = 0; $i < strlen($str); $i++) {
|
||||
$i++;
|
||||
$res .= $str[$i];
|
||||
}
|
||||
|
||||
return $res;
|
||||
}
|
||||
}
|
||||
?>
|
||||
Loading…
Reference in New Issue