JcDenis
/
kUtRL
1
0
Fork 0
Code Issues 1 Pull Requests Releases 3 Activity

update to PSR12

master
Jean-Christian Paul Denis 2021-11-06 16:43:02 +01:00
parent 40a3269b20
commit cfcccf32d7
Signed by: JcDenis
GPG Key ID: 1B5B8C5B90B6C951
29 changed files with 798 additions and 790 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
_admin.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_CONTEXT_ADMIN')) {
return null;
}
@ -124,8 +123,7 @@ class adminKutrl
$rs = false;
}
$ret =
'<div id="kUtRL"><h5>' . __('Short link') . '</h5>' .
$ret = '<div id="kUtRL"><h5>' . __('Short link') . '</h5>' .
form::hidden(['kutrl_old_post_url'], $post_url);
if (!$rs) {
@ -134,14 +132,12 @@ class adminKutrl
} else {
$chk = !empty($_POST['kutrl_create']);
}
$ret .=
'<p><label class="classic">' .
$ret .= '<p><label class="classic">' .
form::checkbox('kutrl_create', 1, $chk, '', 3) . ' ' .
__('Create short link') . '</label></p>';
if ($kut->allow_custom_hash) {
$ret .=
'<p class="classic">' .
$ret .= '<p class="classic">' .
'<label for="custom">' . __('Custom short link:') . ' ' .
form::field('kutrl_create_custom', 32, 32, '', 3) .
'</label></p>';
@ -153,12 +149,11 @@ class adminKutrl
} elseif ($count == 1) {
$title = __('followed one time');
} else {
$title = sprintf(__('followed %s times'),$count);
$title = sprintf(__('followed %s times'), $count);
}
$href = $kut->url_base . $rs->hash;
$ret .=
'<p><label class="classic">' .
$ret .= '<p><label class="classic">' .
form::checkbox('kutrl_delete', 1, !empty($_POST['kutrl_delete']), '', 3) . ' ' .
__('Delete short link') . '</label></p>' .
'<p><a href="' . $href . '" ' . 'title="' . $title . '">' . $href . '</a></p>';
@ -213,7 +208,7 @@ class adminKutrl
# ex: Send new url to messengers
if (!empty($rs)) {
$core->callBehavior('adminAfterKutrlCreate' ,$core, $rs, $title);
$core->callBehavior('adminAfterKutrlCreate', $core, $rs, $title);
}
}
}
@ -274,7 +269,7 @@ class adminKutrl
$s = $core->blog->settings->kUtRL;
if (!$s->kutrl_active
|| !$core->auth->check('admin',$core->blog->id)) {
|| !$core->auth->check('admin', $core->blog->id)) {
return null;
}
@ -316,7 +311,8 @@ class backupKutrl
{
public static function exportSingle($core, $exp, $blog_id)
{
$exp->export('kutrl',
$exp->export(
'kutrl',
'SELECT kut_id, blog_id, kut_service, kut_type, ' .
'kut_hash, kut_url, kut_dt, kut_password, kut_counter ' .
'FROM ' . $core->prefix . 'kutrl ' .
@ -335,7 +331,7 @@ class backupKutrl
$bk->kutrl = new kutrlLog($core);
}
public static function importSingle($line,$bk,$core)
public static function importSingle($line, $bk, $core)
{
if ($line->__name == 'kutrl') {
# Do nothing if str/type exists !
@ -349,14 +345,14 @@ class backupKutrl
{
if ($line->__name == 'kutrl') {
$bk->cur_kutrl->clean();
$bk->cur_kutrl->kut_id = (integer) $line->kut_id;
$bk->cur_kutrl->kut_id = (int) $line->kut_id;
$bk->cur_kutrl->blog_id = (string) $line->blog_id;
$bk->cur_kutrl->kut_service = (string) $line->kut_service;
$bk->cur_kutrl->kut_type = (string) $line->kut_type;
$bk->cur_kutrl->kut_hash = (string) $line->kut_hash;
$bk->cur_kutrl->kut_url = (string) $line->kut_url;
$bk->cur_kutrl->kut_dt = (string) $line->miniurl_dt;
$bk->cur_kutrl->kut_counter = (integer) $line->kut_counter;
$bk->cur_kutrl->kut_counter = (int) $line->kut_counter;
$bk->cur_kutrl->kut_password = (string) $line->kut_password;
$bk->cur_kutrl->insert();
}

18
_config.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_CONTEXT_ADMIN')) {
return;
}
@ -26,21 +25,21 @@ $img_green = '<img src="images/check-on.png" alt="ok" />';
$img_red = '<img src="images/check-off.png" alt="fail" />';
$services_combo = [];
foreach(kutrl::getServices($core) as $service_id => $service) {
foreach (kutrl::getServices($core) as $service_id => $service) {
$o = new $service($core);
$services_combo[__($o->name)] = $o->id;
}
$ext_services_combo = array_merge([__('Disabled') => ''], $services_combo);
$lst_services_combo = array_merge(['-' => ''], $services_combo);
$s_active = (boolean) $s->kutrl_active;
$s_active = (bool) $s->kutrl_active;
$s_plugin_service = (string) $s->kutrl_plugin_service;
$s_admin_service = (string) $s->kutrl_admin_service;
$s_tpl_service = (string) $s->kutrl_tpl_service;
$s_wiki_service = (string) $s->kutrl_wiki_service;
$s_allow_external_url = (boolean) $s->kutrl_allow_external_url;
$s_tpl_passive = (boolean) $s->kutrl_tpl_passive;
$s_tpl_active = (boolean) $s->kutrl_tpl_active;
$s_allow_external_url = (bool) $s->kutrl_allow_external_url;
$s_tpl_passive = (bool) $s->kutrl_tpl_passive;
$s_tpl_active = (bool) $s->kutrl_tpl_active;
$s_admin_entry_default = (string) $s->kutrl_admin_entry_default;
if (!empty($_POST['save'])) {
@ -67,7 +66,7 @@ if (!empty($_POST['save'])) {
$s->put('kutrl_admin_entry_default', $s_admin_entry_default);
# services
foreach(kutrl::getServices($core) as $service_id => $service) {
foreach (kutrl::getServices($core) as $service_id => $service) {
$o = new $service($core);
$o->saveSettings();
}
@ -164,17 +163,18 @@ form::combo(['s_wiki_service'], $ext_services_combo, $s_wiki_service) . '
</div>
<div class="fieldset">
<h4>' .__('Services') . '</h4>
<h4>' . __('Services') . '</h4>
<p class="info">' . __('List of services you can use to shorten links with pkugin kUtRL.') . '</p>
';
foreach(kutrl::getServices($core) as $service_id => $service) {
foreach (kutrl::getServices($core) as $service_id => $service) {
$o = new $service($core);
echo '<hr/><div id="setting-' . $service_id . '"><h5>' . $o->name . '</h5>';
if (!empty($_REQUEST['chk'])) {
$img_chk = $img_red . ' ' . sprintf(__('Failed to test %s API.'), $o->name);
try {
if ($o->testService()) {
$img_chk = $img_green . ' ' . sprintf(__('%s API is well configured and runing.'), $o->name);

1
_define.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}

7
_install.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_CONTEXT_ADMIN')) {
return;
}
@ -61,9 +60,8 @@ try {
$s->put('kutrl_tpl_active', false, 'boolean', 'Return short url on dotclear tags if kutrl is active', false, true);
$s->put('kutrl_admin_entry_default', true, 'boolean', 'Create short link on new entry by default', false, true);
# Settings for "local" service
$local_css =
".shortenkutrlwidget input { border: 1px solid #CCCCCC; }\n" .
".dc-kutrl input { border: 1px solid #CCCCCC; margin: 10px; }";
$local_css = ".shortenkutrlwidget input { border: 1px solid #CCCCCC; }\n" .
'.dc-kutrl input { border: 1px solid #CCCCCC; margin: 10px; }';
$s->put('kutrl_srv_local_protocols', 'http:,https:,ftp:,ftps:,irc:', 'string', 'Allowed kutrl local service protocols', false, true);
$s->put('kutrl_srv_local_public', false, 'boolean', 'Enabled local service public page', false, true);
$s->put('kutrl_srv_local_css', $local_css, 'string', 'Special CSS for kutrl local service', false, true);
@ -82,6 +80,7 @@ try {
if ($core->plugins->moduleExists('dcMiniUrl')) {
require_once dirname(__FILE__) . '/inc/patch.dcminiurl.php';
}
return true;
} catch (Exception $e) {
$core->error->add($e->getMessage());

21
_prepend.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return;
}
@ -41,22 +40,22 @@ $__autoload['kutrlLinksList'] = $d . 'lib.kutrl.lst.php';
# Services
$__autoload['defaultKutrlService'] = $d . 'services/class.default.service.php';
$core->addBehavior('kutrlService', function() { return ["default","defaultKutrlService"]; } );
$core->addBehavior('kutrlService', function () { return ['default','defaultKutrlService']; });
if (!defined('SHORTEN_SERVICE_DISABLE_CUSTOM')) {
$__autoload['customKutrlService'] = $d . 'services/class.custom.service.php';
$core->addBehavior('kutrlService', function() { return ["custom","customKutrlService"]; } );
$core->addBehavior('kutrlService', function () { return ['custom','customKutrlService']; });
}
if (!defined('SHORTEN_SERVICE_DISABLE_LOCAL')) {
$__autoload['localKutrlService'] = $d . 'services/class.local.service.php';
$core->addBehavior('kutrlService', function() { return ["local","localKutrlService"]; } );
$core->addBehavior('kutrlService', function () { return ['local','localKutrlService']; });
}
if (!defined('SHORTEN_SERVICE_DISABLE_BILBOLINKS')) {
$__autoload['bilbolinksKutrlService'] = $d . 'services/class.bilbolinks.service.php';
$core->addBehavior('kutrlService', function() { return ["bilbolinks","bilbolinksKutrlService"]; } );
$core->addBehavior('kutrlService', function () { return ['bilbolinks','bilbolinksKutrlService']; });
}
if (!defined('SHORTEN_SERVICE_DISABLE_BITLY')) {
$__autoload['bitlyKutrlService'] = $d . 'services/class.bitly.service.php';
$core->addBehavior('kutrlService', function() { return ["bitly","bitlyKutrlService"]; } );
$core->addBehavior('kutrlService', function () { return ['bitly','bitlyKutrlService']; });
}
//if (!defined('SHORTEN_SERVICE_DISABLE_GOOGL')) {
// $__autoload['googlKutrlService'] = $d . 'services/class.googl.service.php';
@ -64,7 +63,7 @@ if (!defined('SHORTEN_SERVICE_DISABLE_BITLY')) {
//}
if (!defined('SHORTEN_SERVICE_DISABLE_ISGD')) {
$__autoload['isgdKutrlService'] = $d . 'services/class.isgd.service.php';
$core->addBehavior('kutrlService', function() { return ["isgd","isgdKutrlService"]; } );
$core->addBehavior('kutrlService', function () { return ['isgd','isgdKutrlService']; });
}
//if (!defined('SHORTEN_SERVICE_DISABLE_SHORTTO')) {
// $__autoload['shorttoKutrlService'] = $d . 'services/class.shortto.service.php';
@ -76,7 +75,7 @@ if (!defined('SHORTEN_SERVICE_DISABLE_ISGD')) {
//}
if (!defined('SHORTEN_SERVICE_DISABLE_YOURLS')) {
$__autoload['yourlsKutrlService'] = $d . 'services/class.yourls.service.php';
$core->addBehavior('kutrlService', function() { return ["yourls","yourlsKutrlService"]; } );
$core->addBehavior('kutrlService', function () { return ['yourls','yourlsKutrlService']; });
}
//if (!defined('SHORTEN_SERVICE_DISABLE_SUPR')) {
// $__autoload['suprKutrlService'] = $d . 'services/class.supr.service.php';
@ -85,9 +84,9 @@ if (!defined('SHORTEN_SERVICE_DISABLE_YOURLS')) {
# Shorten url passed through wiki functions
$__autoload['kutrlWiki'] = $d . 'lib.wiki.kutrl.php';
$core->addBehavior('coreInitWikiPost',['kutrlWiki','coreInitWiki']);
$core->addBehavior('coreInitWikiComment',['kutrlWiki','coreInitWiki']);
$core->addBehavior('coreInitWikiSimpleComment',['kutrlWiki','coreInitWiki']);
$core->addBehavior('coreInitWikiPost', ['kutrlWiki','coreInitWiki']);
$core->addBehavior('coreInitWikiComment', ['kutrlWiki','coreInitWiki']);
$core->addBehavior('coreInitWikiSimpleComment', ['kutrlWiki','coreInitWiki']);
# Public page
$core->url->register('kutrl', 'go', '^go(/(.*?)|)$', ['urlKutrl', 'redirectUrl']);

72
_public.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -67,7 +66,7 @@ class urlKutrl extends dcUrlHandlers
return null;
}
$args = isset($m[3]) ? $m[3] : '';
$args = $m[3] ?? '';
$_ctx->kutrl_msg = '';
$_ctx->kutrl_hmf = hmfKutrl::create();
$_ctx->kutrl_hmfp = hmfKutrl::protect($_ctx->kutrl_hmf);
@ -232,7 +231,7 @@ class urlKutrl extends dcUrlHandlers
}
$core->tpl->setPath($core->tpl->getPath(), dirname(__FILE__) . '/default-templates');
$_ctx =& $GLOBALS['_ctx'];
$_ctx = & $GLOBALS['_ctx'];
$core = $GLOBALS['core'];
header('Content-Type: text/html; charset=UTF-8');
@ -266,18 +265,20 @@ class pubKutrl
# 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 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 null;
}
@ -285,7 +286,7 @@ class pubKutrl
public static function publicBeforeContentFilter($core, $tag, $args)
{
# Unknow tag
if (!in_array($tag,pubKutrl::$know_tags)) {
if (!in_array($tag, pubKutrl::$know_tags)) {
return null;
}
# URL shortening is disabled by tag attribute
@ -324,7 +325,7 @@ class pubKutrl
$s = $core->blog->settings->kUtRL;
# Passive : all kutrl tag return long url
$_ctx->kutrl_passive = (boolean) $s->kutrl_tpl_passive;
$_ctx->kutrl_passive = (bool) $s->kutrl_tpl_passive;
if (!$s->kutrl_active || !$s->kutrl_tpl_service) {
return null;
@ -353,6 +354,7 @@ class tplKutrl
public static function pageURL($attr)
{
$f = $GLOBALS['core']->tpl->getFilters($attr);
return '<?php echo ' . sprintf($f, '$core->blog->url.$core->url->getBase("kutrl")') . '; ?>';
}
@ -361,7 +363,7 @@ class tplKutrl
$operator = isset($attr['operator']) ? self::getOperator($attr['operator']) : '&&';
if (isset($attr['is_active'])) {
$sign = (boolean) $attr['is_active'] ? '' : '!';
$sign = (bool) $attr['is_active'] ? '' : '!';
$if[] = $sign . '$core->blog->settings->kUtRL->kutrl_srv_local_public';
}
if (empty($if)) {
@ -369,7 +371,7 @@ class tplKutrl
}
return
"<?php if(" . implode(' ' . $operator . ' ', $if) . ") : ?>\n" .
'<?php if(' . implode(' ' . $operator . ' ', $if) . ") : ?>\n" .
$content .
"<?php endif; unset(\$s);?>\n";
}
@ -379,7 +381,7 @@ class tplKutrl
$operator = isset($attr['operator']) ? self::getOperator($attr['operator']) : '&&';
if (isset($attr['has_message'])) {
$sign = (boolean) $attr['has_message'] ? '!' : '=';
$sign = (bool) $attr['has_message'] ? '!' : '=';
$if[] = '"" ' . $sign . '= $_ctx->kutrl_msg';
}
if (empty($if)) {
@ -387,7 +389,7 @@ class tplKutrl
}
return
"<?php if(" . implode(' ' . $operator . ' ', $if) . ") : ?>\n" .
'<?php if(' . implode(' ' . $operator . ' ', $if) . ") : ?>\n" .
$content .
"<?php endif; ?>\n";
}
@ -405,8 +407,8 @@ class tplKutrl
public static function humanFieldProtect($attr)
{
return
"<input type=\"hidden\" name=\"hmfp\" id=\"hmfp\" value=\"<?php echo \$_ctx->kutrl_hmfp; ?>\" />".
"<?php echo \$core->formNonce(); ?>";
'<input type="hidden" name="hmfp" id="hmfp" value="<?php echo $_ctx->kutrl_hmfp; ?>" />' .
'<?php echo $core->formNonce(); ?>';
}
public static function AttachmentKutrlIf($attr, $content)
@ -439,7 +441,7 @@ class tplKutrl
return self::genericKutrl('$_ctx->posts->user_url', $attr);
}
public static function EntryKutrlIf($attr,$content)
public static function EntryKutrlIf($attr, $content)
{
return self::genericKutrlIf('$_ctx->posts->getURL()', $attr, $content);
}
@ -474,22 +476,23 @@ class tplKutrl
$operator = isset($attr['operator']) ? self::getOperator($attr['operator']) : '&&';
if (isset($attr['is_active'])) {
$sign = (boolean) $attr['is_active'] ? '' : '!';
$sign = (bool) $attr['is_active'] ? '' : '!';
$if[] = $sign . '$_ctx->exists("kutrl")';
}
if (isset($attr['passive_mode'])) {
$sign = (boolean) $attr['passive_mode'] ? '' : '!';
$sign = (bool) $attr['passive_mode'] ? '' : '!';
$if[] = $sign . '$_ctx->kutrl_passive';
}
if (isset($attr['has_kutrl'])) {
$sign = (boolean) $attr['has_kutrl'] ? '!' : '=';
$sign = (bool) $attr['has_kutrl'] ? '!' : '=';
$if[] = '($_ctx->exists("kutrl") && false ' . $sign . '== $_ctx->kutrl->select(' . $str . ',null,null,"kutrl"))';
}
if (empty($if)) {
return $content;
}
return
"<?php if(" . implode(' ' . $operator . ' ', $if) . ") : ?>\n" .
'<?php if(' . implode(' ' . $operator . ' ', $if) . ") : ?>\n" .
$content .
"<?php endif; ?>\n";
}
@ -497,29 +500,30 @@ class tplKutrl
protected static function genericKutrl($str, $attr)
{
$f = $GLOBALS['core']->tpl->getFilters($attr);
return
"<?php \n" .
# Preview
"if (\$_ctx->preview) { \n" .
" echo " . sprintf($f, $str) . "; " .
' echo ' . sprintf($f, $str) . '; ' .
"} else { \n" .
# Disable
"if (!\$_ctx->exists('kutrl')) { \n" .
# Passive mode
" if (\$_ctx->kutrl_passive) { " .
" echo " . sprintf($f, $str) . "; " .
' if ($_ctx->kutrl_passive) { ' .
' echo ' . sprintf($f, $str) . '; ' .
" } \n" .
"} else { \n" .
# Existing
" if (false !== (\$kutrl_rs = \$_ctx->kutrl->isKnowUrl(" . $str . "))) { " .
" echo " . sprintf($f, '$_ctx->kutrl->url_base.$kutrl_rs->hash') . "; " .
' if (false !== ($kutrl_rs = $_ctx->kutrl->isKnowUrl(' . $str . '))) { ' .
' echo ' . sprintf($f, '$_ctx->kutrl->url_base.$kutrl_rs->hash') . '; ' .
" } \n" .
# New
" elseif (false !== (\$kutrl_rs = \$_ctx->kutrl->hash(" . $str . "))) { " .
" echo " . sprintf($f, '$_ctx->kutrl->url_base.$kutrl_rs->hash') . "; " .
' elseif (false !== ($kutrl_rs = $_ctx->kutrl->hash(' . $str . '))) { ' .
' echo ' . sprintf($f, '$_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')); " .
" } \n" .
@ -548,13 +552,14 @@ class hmfKutrl
{
public static $chars = 'abcdefghijkmnopqrstuvwxyzABCDEFGHJKLMNPQRSTUVWXYZ23456789';
public static function create($len=6)
public static function create($len = 6)
{
$res = '';
$chars = self::$chars;
for($i = 0; $i < $len; $i++) {
$res .= $chars[rand(0, strlen($chars)-1)];
for ($i = 0; $i < $len; $i++) {
$res .= $chars[rand(0, strlen($chars) - 1)];
}
return $res;
}
@ -562,20 +567,21 @@ class hmfKutrl
{
$res = '';
$chars = self::$chars;
for($i = 0; $i < strlen($str); $i++)
{
$res .= $chars[rand(0, strlen($chars)-1)] . $str[$i];
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;
}
}

85
_uninstall.php
View File

@ -10,59 +10,86 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_CONTEXT_ADMIN')) {
return;
}
$this->addUserAction(
/* type */ 'settings',
/* action */ 'delete_all',
/* ns */ 'kUtRL',
/* description */ __('delete all settings')
/* type */
'settings',
/* action */
'delete_all',
/* ns */
'kUtRL',
/* description */
__('delete all settings')
);
$this->addUserAction(
/* type */ 'tables',
/* action */ 'delete',
/* ns */ 'kutrl',
/* description */ __('delete table')
/* type */
'tables',
/* action */
'delete',
/* ns */
'kutrl',
/* description */
__('delete table')
);
$this->addUserAction(
/* type */ 'plugins',
/* action */ 'delete',
/* ns */ 'kUtRL',
/* description */ __('delete plugin files')
/* type */
'plugins',
/* action */
'delete',
/* ns */
'kUtRL',
/* description */
__('delete plugin files')
);
$this->addUserAction(
/* type */ 'versions',
/* action */ 'delete',
/* ns */ 'kUtRL',
/* description */ __('delete the version number')
/* type */
'versions',
/* action */
'delete',
/* ns */
'kUtRL',
/* description */
__('delete the version number')
);
# Delete only dc version and plugin files from pluginsBeforeDelete
# Keep table
$this->addDirectAction(
/* type */ 'settings',
/* action */ 'delete_all',
/* ns */ 'kUtRL',
/* description */ sprintf(__('delete all %s settings'),'kUtRL')
/* type */
'settings',
/* action */
'delete_all',
/* ns */
'kUtRL',
/* description */
sprintf(__('delete all %s settings'), 'kUtRL')
);
$this->addDirectAction(
/* type */ 'versions',
/* action */ 'delete',
/* ns */ 'kUtRL',
/* description */ sprintf(__('delete %s version number'),'kUtRL')
/* type */
'versions',
/* action */
'delete',
/* ns */
'kUtRL',
/* description */
sprintf(__('delete %s version number'), 'kUtRL')
);
$this->addDirectAction(
/* type */ 'plugins',
/* action */ 'delete',
/* ns */ 'kUtRL',
/* description */ sprintf(__('delete %s plugin files'),'kUtRL')
/* type */
'plugins',
/* action */
'delete',
/* ns */
'kUtRL',
/* description */
sprintf(__('delete %s plugin files'), 'kUtRL')
);

28
_widgets.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -60,7 +59,8 @@ class widgetKutrl
'type',
__('Type:'),
'all',
'combo',[
'combo',
[
__('All') => '-',
__('Mini URL') => 'localnormal',
__('Custom URL') => 'localcustom',
@ -140,10 +140,10 @@ class widgetKutrl
'</label></p>' .
'<p><label>' .
sprintf(__('Rewrite "%s" in next field to show that you are not a robot:'), $hmf) . '<br />' .
form::field('hmf',20,255,'') .
form::field('hmf', 20, 255, '') .
'</label></p>' .
'<p><input class="submit" type="submit" name="submiturl" value="' . __('Shorten') . '" />' .
form::hidden('hmfp',$hmfp) .
form::hidden('hmfp', $hmfp) .
$core->formNonce() .
'</p>' .
'</form>'
@ -162,9 +162,9 @@ class widgetKutrl
$type = in_array($w->type, ['localnormal', 'localmix', 'localcustom']) ?
"AND kut_type ='" . $w->type . "' " :
"AND kut_type " . $core->con->in(['localnormal', 'localmix', 'localcustom']) . " ";
'AND kut_type ' . $core->con->in(['localnormal', 'localmix', 'localcustom']) . ' ';
$hide = (boolean) $w->hideempty ? 'AND kut_counter > 0 ' : '';
$hide = (bool) $w->hideempty ? 'AND kut_counter > 0 ' : '';
$more = '';
if ($w->type == 'localmix' && '' != $w->mixprefix) {
@ -176,11 +176,11 @@ class widgetKutrl
$order .= $w->sort == 'desc' ? ' DESC' : ' ASC';
$limit = $core->con->limit(abs((integer) $w->limit));
$limit = $core->con->limit(abs((int) $w->limit));
$rs = $core->con->select(
'SELECT kut_counter, kut_hash ' .
"FROM " . $core->prefix . "kutrl " .
'FROM ' . $core->prefix . 'kutrl ' .
"WHERE blog_id='" . $core->con->escape($core->blog->id) . "' " .
"AND kut_service = 'local' " .
$type . $hide . $more . 'ORDER BY ' . $order . $limit
@ -192,22 +192,22 @@ class widgetKutrl
$content = '';
$i = 0;
while($rs->fetch()) {
while ($rs->fetch()) {
$i++;
$rank = '<span class="rankkutrl-rank">' . $i . '</span>';
$hash = $rs->kut_hash;
$url = $core->blog->url . $core->url->getBase('kutrl') . '/' . $hash;
$cut_len = - abs((integer) $w->urllen);
$cut_len = - abs((int) $w->urllen);
if (strlen($url) > $cut_len) {
$url = '...' . substr($url, $cut_len);
}
/*
/*
if (strlen($hash) > $cut_len) {
$url = '...'.substr($hash, $cut_len);
}
//*/
//*/
if ($rs->kut_counter == 0) {
$counttext = __('never followed');
} elseif ($rs->kut_counter == 1) {
@ -216,8 +216,7 @@ class widgetKutrl
$counttext = sprintf(__('followed %s times'), $rs->kut_counter);
}
$content .=
'<li><a href="' .
$content .= '<li><a href="' .
$core->blog->url . $core->url->getBase('kutrl') . '/' . $rs->kut_hash .
'">' .
str_replace(
@ -239,6 +238,5 @@ class widgetKutrl
($w->title ? $w->renderTitle(html::escapeHTML($w->title)) : '') .
sprintf('<ul>%s</ul>', $content)
);
}
}

26
inc/class.kutrl.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -24,16 +23,14 @@ class kUtRL
$list = $core->getBehaviors('kutrlService');
if (empty($list)) {
return [];
}
$services = [];
foreach($list as $k => $callback) {
foreach ($list as $k => $callback) {
try {
list($service_id,$service_class) = call_user_func($callback);
list($service_id, $service_class) = call_user_func($callback);
$services[(string) $service_id] = (string) $service_class;
} catch (Exception $e) {
}
}
@ -48,15 +45,13 @@ class kUtRL
try {
if (empty($id)) {
return null;
}
$services = self::getServices($core);
if (isset($services[$id])) {
return new $services[$id]($core);
}
} catch(Exception $e) {
} catch (Exception $e) {
}
return null;
@ -70,15 +65,13 @@ class kUtRL
try {
if (!in_array($place, ['tpl', 'wiki', 'admin', 'plugin'])) {
return null;
}
$id = $core->blog->settings->kUtRL->get('kutrl_' . $place .'_service');
$id = $core->blog->settings->kUtRL->get('kutrl_' . $place . '_service');
if (!empty($id)) {
return self::quickService($id);
}
} catch(Exception $e) {
} catch (Exception $e) {
}
return null;
@ -93,16 +86,15 @@ class kUtRL
try {
$srv = self::quickPlace($place);
if (empty($srv)) {
return $url;
}
$rs = $srv->hash($url,$custom);
$rs = $srv->hash($url, $custom);
if (empty($rs)) {
return $url;
}
return $srv->url_base.$rs->hash;
} catch(Exception $e) {
return $srv->url_base . $rs->hash;
} catch (Exception $e) {
}
return $url;

1
inc/lib.kutrl.activityreport.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
# This file is used with plugin activityReport
if (!defined('DC_RC_PATH')) {

37
inc/lib.kutrl.log.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
# This file contents class to acces local short links records
class kutrlLog
@ -59,22 +58,22 @@ class kutrlLog
'hash' => $hash,
'type' => $type,
'service' => $service,
'counter '=> 0
'counter ' => 0
];
} catch (Exception $e) {
$this->con->unlock();
throw $e;
}
return false;
}
public function select($url = null, $hash = null, $type =null, $service = 'kutrl')
public function select($url = null, $hash = null, $type = null, $service = 'kutrl')
{
//$this->con->writeLock($this->table);
$req =
'SELECT kut_id as id, kut_hash as hash, kut_url as url, ' .
$req = 'SELECT kut_id as id, kut_hash as hash, kut_url as url, ' .
'kut_type as type, kut_service as service, kut_counter as counter ' .
'FROM ' . $this->table . ' ' .
"WHERE blog_id = '" . $this->blog . "' " .
@ -88,7 +87,7 @@ class kutrlLog
}
if (null !== $type) {
if (is_array($type)) {
$req .= "AND kut_type '" . $this->con->in($type) ."' ";
$req .= "AND kut_type '" . $this->con->in($type) . "' ";
} else {
$req .= "AND kut_type = '" . $this->con->escape($type) . "' ";
}
@ -104,7 +103,7 @@ class kutrlLog
public function clear($id)
{
$id = (integer) $id;
$id = (int) $id;
$cur = $this->con->openCursor($this->table);
$this->con->writeLock($this->table);
@ -123,6 +122,7 @@ class kutrlLog
return true;
} catch (Exception $e) {
$this->con->unlock();
throw $e;
}
@ -131,7 +131,7 @@ class kutrlLog
public function delete($id)
{
$id = (integer) $id;
$id = (int) $id;
return $this->con->execute(
'DELETE FROM ' . $this->table . ' ' .
@ -142,7 +142,7 @@ class kutrlLog
public function counter($id, $do = 'get')
{
$id = (integer) $id;
$id = (int) $id;
$rs = $this->con->select(
'SELECT kut_counter ' .
@ -154,21 +154,19 @@ class kutrlLog
$counter = $rs->isEmpty() ? 0 : $rs->kut_counter;
if ('get' == $do) {
return $counter;
} elseif ('up' == $do) {
$counter += 1;
} elseif ('reset' == $do) {
$counter = 0;
} else {
return 0;
}
$cur = $this->con->openCursor($this->table);
$this->con->writeLock($this->table);
$cur->kut_counter = (integer) $counter;
$cur->kut_counter = (int) $counter;
$cur->update(
"WHERE blog_id='" . $this->blog . "' " .
"AND kut_id='" . $id . "'"
@ -188,8 +186,7 @@ class kutrlLog
if (!empty($p['columns']) && is_array($p['columns'])) {
$content_req .= implode(', ', $p['columns']) . ', ';
}
$r =
'SELECT S.kut_id, S.kut_type, S.kut_hash, S.kut_url, ' .
$r = 'SELECT S.kut_id, S.kut_type, S.kut_hash, S.kut_url, ' .
$content_req . 'S.kut_dt ';
}
$r .= 'FROM ' . $this->table . ' S ';
@ -203,8 +200,7 @@ class kutrlLog
$r .= "AND kut_service='kutrl' ";
}
if (isset($p['kut_type'])) {
if (is_array($p['kut_type']) && !empty($p['kut_type']))
{
if (is_array($p['kut_type']) && !empty($p['kut_type'])) {
$r .= 'AND kut_type ' . $this->con->in($p['kut_type']);
} elseif ($p['kut_type'] != '') {
$r .= "AND kut_type = '" . $this->con->escape($p['kut_type']) . "' ";
@ -232,18 +228,15 @@ class kutrlLog
}
}
if (!empty($p['kut_year'])) {
$r .=
'AND ' . $this->con->dateFormat('kut_dt', '%Y') . ' = ' .
$r .= 'AND ' . $this->con->dateFormat('kut_dt', '%Y') . ' = ' .
"'" . sprintf('%04d', $p['kut_year']) . "' ";
}
if (!empty($p['kut_month'])) {
$r .=
'AND ' . $this->con->dateFormat('kut_dt', '%m') . ' = ' .
$r .= 'AND ' . $this->con->dateFormat('kut_dt', '%m') . ' = ' .
"'" . sprintf('%02d', $p['kut_month']) . "' ";
}
if (!empty($p['kut_day'])) {
$r .=
'AND ' . $this->con->dateFormat('kut_dt', '%d') . ' = ' .
$r .= 'AND ' . $this->con->dateFormat('kut_dt', '%d') . ' = ' .
"'" . sprintf('%02d', $p['kut_day']) . "' ";
}
if (!empty($p['sql'])) {

11
inc/lib.kutrl.lst.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
class kutrlLinkslist
{
protected $core;
@ -55,7 +54,7 @@ class kutrlLinkslist
$links = [];
if (isset($_REQUEST['entries'])) {
foreach ($_REQUEST['entries'] as $v) {
$links[(integer) $v] = true;
$links[(int) $v] = true;
}
}
@ -68,13 +67,13 @@ class kutrlLinkslist
$cols = new ArrayObject($cols);
$this->userColumns('kUtRL', $cols);
$html_block =
'<div class="table-outer">' .
$html_block = '<div class="table-outer">' .
'<table>' .
'<caption>' . ($filter ?
'<caption>' . (
$filter ?
sprintf(__('List of %s links matching the filter.'), $this->rs_count) :
sprintf(__('List of links (%s)'), $this->rs_count)
). '</caption>' .
) . '</caption>' .
'<thead>' .
'<tr>' . implode(iterator_to_array($cols)) . '</tr>' .
'</thead>' .

18
inc/lib.kutrl.srv.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
# Generic class for shorten link service
# A service class must extends this one
class kutrlService
@ -20,7 +19,7 @@ class kutrlService
public $settings;
public $log;
protected $config = array();
protected $config = [];
public function __construct($core)
{
@ -65,7 +64,7 @@ class kutrlService
# get config value
public function get($k)
{
return isset($this->config[$k]) ? $this->config[$k] : null;
return $this->config[$k] ?? null;
}
# Additionnal actions on child start
@ -98,7 +97,7 @@ class kutrlService
# Test if an url is valid
public function isValidUrl($url)
{
return (boolean) filter_var($url, FILTER_VALIDATE_URL);
return (bool) filter_var($url, FILTER_VALIDATE_URL);
}
# Test if an url contents know prefix
@ -110,18 +109,17 @@ class kutrlService
# Test if an url is long enoutgh
public function isLongerUrl($url)
{
return (strlen($url) >= (integer) $this->url_min_len);
return (strlen($url) >= (int) $this->url_min_len);
}
# Test if an url protocol (eg: http://) is allowed
public function isProtocolUrl($url)
{
foreach($this->allow_protocols as $protocol) {
foreach ($this->allow_protocols as $protocol) {
if (empty($protocol)) {
continue;
}
if (strpos($url,$protocol) === 0) {
if (strpos($url, $protocol) === 0) {
return true;
}
}
@ -182,8 +180,8 @@ class kutrlService
# --BEHAVIOR-- kutrlAfterCreateShortUrl
$this->core->callBehavior('kutrlAfterCreateShortUrl', $rs);
}
return $rs;
}
@ -226,7 +224,7 @@ class kutrlService
$client->setPersistReferers(false);
if (is_array($headers) && !empty($headers)) {
foreach($headers as $header) {
foreach ($headers as $header) {
$client->setMoreHeader($header);
}
}

11
inc/lib.wiki.kutrl.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
# This file contents class to shorten url pass through wiki
if (!defined('DC_RC_PATH')) {
@ -34,7 +33,7 @@ class kutrlWiki
if (null === ($kut = kutrl::quickPlace('wiki'))) {
return null;
}
foreach($kut->allow_protocols as $protocol) {
foreach ($kut->allow_protocols as $protocol) {
$wiki2xhtml->registerFunction(
'url:' . $protocol,
['kutrlWiki', 'transform']
@ -62,18 +61,20 @@ class kutrlWiki
}
if (!$rs) {
return [];
} else {
}
$res = [];
$testurl = strlen($rs->url) > 35 ? substr($rs->url, 0, 35) . '...' : $rs->url;
$res['url'] = $kut->url_base . $rs->hash;
$res['title'] = sprintf(__('%s (Shorten with %s)'), $rs->url, __($kut->name));
if ($testurl == $content) $res['content'] = $res['url'];
if ($testurl == $content) {
$res['content'] = $res['url'];
}
# ex: Send new url to messengers
if (!empty($rs)) {
$core->callBehavior('wikiAfterKutrlCreate', $core, $rs, __('New short URL'));
}
return $res;
}
}
}

47
inc/patch.dcminiurl.php
View File

@ -10,21 +10,18 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
# This file takes records from plugin dcMiniUrl
# and inserts them into plugin kUtRL.
if (!defined('DC_CONTEXT_ADMIN')){return;}
if (!defined('DC_CONTEXT_ADMIN')) {
return;
}
$miniurl_patch = new dcMiniUrl2kUtRL($core);
if ($miniurl_patch->parseRecords())
{
try
{
if ($miniurl_patch->parseRecords()) {
try {
$core->plugins->deactivateModule('dcMiniUrl');
}
catch (Exception $e)
{
} catch (Exception $e) {
//$core->error->add($e->getMessage());
}
}
@ -40,30 +37,29 @@ class dcMiniUrl2kUtRL
{
$this->core = $core;
$this->con = $core->con;
$this->k_tb = $core->prefix.'kutrl';
$this->m_tb = $core->prefix.'miniurl';
$this->k_tb = $core->prefix . 'kutrl';
$this->m_tb = $core->prefix . 'miniurl';
}
public function parseRecords()
{
$rs = $this->con->select(
'SELECT * FROM '.$this->m_tb.' '
'SELECT * FROM ' . $this->m_tb . ' '
);
while ($rs->fetch())
{
if ($rs->miniurl_type == 'customurl' || $rs->miniurl_type == 'miniurl')
{
if ($this->exists($rs)) continue;
while ($rs->fetch()) {
if ($rs->miniurl_type == 'customurl' || $rs->miniurl_type == 'miniurl') {
if ($this->exists($rs)) {
continue;
}
$this->insertKutrl($rs);
$this->insertLocal($rs);
}
else
{
} else {
$this->insertOther($rs);
}
}
return true;
}
@ -118,18 +114,19 @@ class dcMiniUrl2kUtRL
private function exists($rs)
{
$chk = $this->con->select(
'SELECT kut_hash FROM '.$this->k_tb.' '.
"WHERE blog_id = '".$rs->blog_id."' ".
"AND kut_service = 'local' ".
"AND kut_hash = '".$rs->miniurl_id."' "
'SELECT kut_hash FROM ' . $this->k_tb . ' ' .
"WHERE blog_id = '" . $rs->blog_id . "' " .
"AND kut_service = 'local' " .
"AND kut_hash = '" . $rs->miniurl_id . "' "
);
return !$chk->isEmpty();
}
private function nextId()
{
return $this->con->select(
'SELECT MAX(kut_id) FROM '.$this->k_tb.' '
'SELECT MAX(kut_id) FROM ' . $this->k_tb . ' '
)->f(0) + 1;
}
}

3
inc/services/class.bilbolinks.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -67,7 +66,7 @@ class bilbolinksKutrlService extends kutrlService
}
$arg = ['longurl' => urlencode($this->url_test)];
if (!self::post($this->url_api, $arg, true,true)) {
if (!self::post($this->url_api, $arg, true, true)) {
$this->error->add(__('Service is unavailable.'));
return false;

1
inc/services/class.bitly.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}

3
inc/services/class.custom.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -88,7 +87,6 @@ class customKutrlService extends kutrlService
public function testService()
{
if (empty($this->url_api)) {
return false;
}
$url = $this->url_encode ? urlencode($this->url_test) : $this->url_test;
@ -109,6 +107,7 @@ class customKutrlService extends kutrlService
if (!($response = self::post($this->url_api, $arg, true, true))) {
$this->error->add(__('Service is unavailable.'));
return false;
}
$rs = new ArrayObject();

1
inc/services/class.default.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}

8
inc/services/class.googl.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -26,7 +25,7 @@ class googlKutrlService extends kutrlService
private $args = [
'key' => ''
];
private $headers = array('Content-Type: application/json');
private $headers = ['Content-Type: application/json'];
protected function init()
{
@ -40,6 +39,7 @@ class googlKutrlService extends kutrlService
$args['shortUrl'] = $this->url_base . 'PLovn';
if (!($response = self::post($this->url_api, $args, true, true, $this->headers))) {
$this->error->add(__('Failed to call service.'));
return false;
}
@ -47,8 +47,10 @@ class googlKutrlService extends kutrlService
if (empty($rsp->status)) {
$this->error->add(__('An error occured'));
return false;
}
return true;
}
@ -60,6 +62,7 @@ class googlKutrlService extends kutrlService
if (!($response = self::post($this->url_api, $args, true, false, $this->headers))) {
$this->error->add(__('Failed to call service.'));
return false;
}
@ -67,6 +70,7 @@ class googlKutrlService extends kutrlService
if (empty($rsp->id)) {
$this->error->add(__('An error occured'));
return false;
}

5
inc/services/class.isgd.service.php
View File

@ -10,8 +10,9 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')){return;}
if (!defined('DC_RC_PATH')) {
return;
}
class isgdKutrlService extends kutrlService
{

15
inc/services/class.local.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -32,7 +31,6 @@ class localKutrlService extends kutrlService
$this->config['url_base'] = $this->core->blog->url . $this->core->url->getBase('kutrl') . '/';
$this->config['url_min_len'] = strlen($this->url_base) + 2;
}
public function saveSettings()
@ -64,7 +62,7 @@ class localKutrlService extends kutrlService
'</label></p>' .
'<p class="area" id="style-area"><label for="_style">' . __('CSS:') . '</label>' .
form::textarea('kutrl_srv_local_css',50,3,html::escapeHTML($this->settings->kutrl_srv_local_css), '', 2) .
form::textarea('kutrl_srv_local_css', 50, 3, html::escapeHTML($this->settings->kutrl_srv_local_css), '', 2) .
'</p>' .
'<p class="form-note">' . __('You can add here special cascading style sheet. Body of page has class "dc-kutrl" and widgets have class "shortenkutrlwidget" and "rankkutrlwidget".') . '</p>' .
@ -104,14 +102,12 @@ class localKutrlService extends kutrlService
{
$ap = $this->allow_protocols;
if (!empty($ap)) {
return true;
} else {
}
$this->error->add(__('Service is not well configured.'));
return false;
}
}
public function createHash($url, $hash = null)
{
@ -170,11 +166,12 @@ class localKutrlService extends kutrlService
if ($last_id == -1) {
$next_id = 0;
} else {
for($x = 1; $x <= strlen($last_id); $x++) {
for ($x = 1; $x <= strlen($last_id); $x++) {
$pos = strlen($last_id) - $x;
if ($last_id[$pos] != 'z') {
$next_id = $this->increment($last_id, $pos);
break;
}
}
@ -183,7 +180,7 @@ class localKutrlService extends kutrlService
}
}
return false === $this->log->select(null,$prefix . $next_id, null, 'local') ?
return false === $this->log->select(null, $prefix . $next_id, null, 'local') ?
$next_id : $this->next($next_id, $prefix);
}
@ -221,7 +218,6 @@ class localKutrlService extends kutrlService
public function getUrl($hash)
{
if (false === ($rs = $this->log->select(null, $hash, null, 'local'))) {
return false;
}
if (!$rs->url) { //previously removed url
@ -236,7 +232,6 @@ class localKutrlService extends kutrlService
public function deleteUrl($url, $delete = false)
{
if (false === ($rs = $this->log->select($url, null, null, 'local'))) {
return false;
}
if ($delete) {

4
inc/services/class.shortto.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -32,8 +31,10 @@ class shorttoKutrlService extends kutrlService
$arg = ['url' => urlencode($this->url_test)];
if (!self::post($this->url_api, $arg, true, true)) {
$this->error->add(__('Service is unavailable.'));
return false;
}
return true;
}
@ -43,6 +44,7 @@ class shorttoKutrlService extends kutrlService
if (!($response = self::post($this->url_api, $arg, true, true))) {
$this->error->add(__('Service is unavailable.'));
return false;
}

68
inc/services/class.supr.service.php
View File

@ -10,12 +10,13 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')){return;}
if (!defined('DC_RC_PATH')) {
return;
}
class suprKutrlService extends kutrlService
{
protected $config = array(
protected $config = [
'id' => 'supr',
'name' => 'su.pr StumbleUpon',
'home' => 'http://su.pr',
@ -23,14 +24,14 @@ class suprKutrlService extends kutrlService
'url_api' => 'http://su.pr/api/',
'url_base' => 'http://su.pr/',
'url_min_len' => 23
);
];
private $args = array(
private $args = [
'version' => '1.0',
'format' => 'xml',
'login' => '',
'apiKey' => ''
);
];
protected function init()
{
@ -40,40 +41,40 @@ class suprKutrlService extends kutrlService
public function saveSettings()
{
$this->settings->put('kutrl_srv_supr_login',$_POST['kutrl_srv_supr_login']);
$this->settings->put('kutrl_srv_supr_apikey',$_POST['kutrl_srv_supr_apikey']);
$this->settings->put('kutrl_srv_supr_login', $_POST['kutrl_srv_supr_login']);
$this->settings->put('kutrl_srv_supr_apikey', $_POST['kutrl_srv_supr_apikey']);
}
public function settingsForm()
{
echo
'<p><label class="classic">'.__('Login:').'<br />'.
form::field(array('kutrl_srv_supr_login'),50,255,$this->settings->kutrl_srv_supr_login).
'</label></p>'.
'<p class="form-note">'.
sprintf(__('This is your login to sign up to %s'),$this->config['name']).
'</p>'.
'<p><label class="classic">'.__('API Key:').'<br />'.
form::field(array('kutrl_srv_supr_apikey'),50,255,$this->settings->kutrl_srv_supr_apikey).
'</label></p>'.
'<p class="form-note">'.
sprintf(__('This is your personnal %s API key. You can find it on your account page.'),$this->config['name']).
'<p><label class="classic">' . __('Login:') . '<br />' .
form::field(['kutrl_srv_supr_login'], 50, 255, $this->settings->kutrl_srv_supr_login) .
'</label></p>' .
'<p class="form-note">' .
sprintf(__('This is your login to sign up to %s'), $this->config['name']) .
'</p>' .
'<p><label class="classic">' . __('API Key:') . '<br />' .
form::field(['kutrl_srv_supr_apikey'], 50, 255, $this->settings->kutrl_srv_supr_apikey) .
'</label></p>' .
'<p class="form-note">' .
sprintf(__('This is your personnal %s API key. You can find it on your account page.'), $this->config['name']) .
'</p>';
}
public function testService()
{
if (empty($this->args['login']) || empty($this->args['apiKey']))
{
if (empty($this->args['login']) || empty($this->args['apiKey'])) {
$this->error->add(__('Service is not well configured.'));
return false;
}
$args = $this->args;
$arg['longUrl'] = $this->url_test;
if (!($response = self::post($this->url_api.'shorten',$args,true)))
{
if (!($response = self::post($this->url_api . 'shorten', $args, true))) {
$this->error->add(__('Failed to call service.'));
return false;
}
@ -81,22 +82,24 @@ class suprKutrlService extends kutrlService
$status = (string) $rsp->statusCode;
if ($status != 'OK') {
$err_no = (integer) $rsp->errorCode;
$err_msg = (integer) $rsp->errorMessage;
$this->error->add(sprintf(__('An error occured with code %s and message "%s"'),$err_no,$err_msg));
$err_no = (int) $rsp->errorCode;
$err_msg = (int) $rsp->errorMessage;
$this->error->add(sprintf(__('An error occured with code %s and message "%s"'), $err_no, $err_msg));
return false;
}
return true;
}
public function createHash($url,$hash=null)
public function createHash($url, $hash = null)
{
$args = $this->args;
$args['longUrl'] = $url;
if (!($response = self::post($this->url_api.'shorten',$args,true)))
{
if (!($response = self::post($this->url_api . 'shorten', $args, true))) {
$this->error->add(__('Failed to call service.'));
return false;
}
@ -104,9 +107,10 @@ class suprKutrlService extends kutrlService
$status = (string) $rsp->statusCode;
if ($status != 'OK') {
$err_no = (integer) $rsp->errorCode;
$err_msg = (integer) $rsp->errorMessage;
$this->error->add(sprintf(__('An error occured with code %s and message "%s"'),$err_no,$err_msg));
$err_no = (int) $rsp->errorCode;
$err_msg = (int) $rsp->errorMessage;
$this->error->add(sprintf(__('An error occured with code %s and message "%s"'), $err_no, $err_msg));
return false;
}

73
inc/services/class.trim.service.php
View File

@ -10,12 +10,13 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')){return;}
if (!defined('DC_RC_PATH')) {
return;
}
class trimKutrlService extends kutrlService
{
protected $config = array(
protected $config = [
'id' => 'trim',
'name' => 'tr.im',
'home' => 'http://tr.im',
@ -23,12 +24,12 @@ class trimKutrlService extends kutrlService
'url_api' => 'http://api.tr.im/v1/',
'url_base' => 'http://tr.im/',
'url_min_len' => 25
);
];
private $args = array(
private $args = [
'username' => '',
'password' => ''
);
];
private $api_rate_time = 0;
@ -37,82 +38,81 @@ class trimKutrlService extends kutrlService
$this->args['username'] = $this->settings->kutrl_srv_trim_username;
$this->args['password'] = $this->settings->kutrl_srv_trim_password;
$this->api_rate_time = (integer) $this->settings->kutrl_srv_trim_apiratetime;
$this->api_rate_time = (int) $this->settings->kutrl_srv_trim_apiratetime;
}
public function saveSettings()
{
$this->settings->put('kutrl_srv_trim_username',$_POST['kutrl_srv_trim_username']);
$this->settings->put('kutrl_srv_trim_password',$_POST['kutrl_srv_trim_password']);
$this->settings->put('kutrl_srv_trim_username', $_POST['kutrl_srv_trim_username']);
$this->settings->put('kutrl_srv_trim_password', $_POST['kutrl_srv_trim_password']);
}
public function settingsForm()
{
echo
'<p><label class="classic">'.__('Login:').'<br />'.
form::field(array('kutrl_srv_trim_username'),50,255,$this->settings->kutrl_srv_trim_username).
'</label></p>'.
'<p class="form-note">'.
__('This is your login to sign up to tr.im.').
'</p>'.
'<p><label class="classic">'.__('Password:').'<br />'.
form::field(array('kutrl_srv_trim_password'),50,255,$this->settings->kutrl_srv_trim_password).
'</label></p>'.
'<p class="form-note">'.
__('This is your password to sign up to tr.im.').
'<p><label class="classic">' . __('Login:') . '<br />' .
form::field(['kutrl_srv_trim_username'], 50, 255, $this->settings->kutrl_srv_trim_username) .
'</label></p>' .
'<p class="form-note">' .
__('This is your login to sign up to tr.im.') .
'</p>' .
'<p><label class="classic">' . __('Password:') . '<br />' .
form::field(['kutrl_srv_trim_password'], 50, 255, $this->settings->kutrl_srv_trim_password) .
'</label></p>' .
'<p class="form-note">' .
__('This is your password to sign up to tr.im.') .
'</p>';
}
public function testService()
{
if (empty($this->args['username']) || empty($this->args['password']))
{
if (empty($this->args['username']) || empty($this->args['password'])) {
$this->error->add(__('Service is not well configured.'));
return false;
}
if (time() < $this->api_rate_time + 300) // bloc service within 5min on API rate limit
{
if (time() < $this->api_rate_time + 300) { // bloc service within 5min on API rate limit
$this->error->add(__('Prevent service rate limit.'));
return false;
}
if (!($rsp = self::post($this->url_api.'verify.xml',$this->args,true,true)))
{
if (!($rsp = self::post($this->url_api . 'verify.xml', $this->args, true, true))) {
$this->error->add(__('Service is unavailable.'));
return false;
}
$r = simplexml_load_string($rsp);
if ($r['code'] == 200)
{
if ($r['code'] == 200) {
return true;
}
$this->error->add(__('Authentication to service failed.'));
return false;
}
public function createHash($url,$hash=null)
public function createHash($url, $hash = null)
{
$arg = $this->args;
$arg['url'] = $url;
if (!($rsp = self::post($this->url_api.'trim_url.xml',$arg,true,true)))
{
if (!($rsp = self::post($this->url_api . 'trim_url.xml', $arg, true, true))) {
$this->error->add(__('Service is unavailable.'));
return false;
}
$r = simplexml_load_string($rsp);
# API rate limit
if ($r['code'] == 425)
{
$this->settings->put('kutrl_srv_trim_apiratetime',time());
if ($r['code'] == 425) {
$this->settings->put('kutrl_srv_trim_apiratetime', time());
$this->error->add(__('Service rate limit exceeded.'));
return false;
}
if (isset($r->trimpath))
{
if (isset($r->trimpath)) {
$rs = new ArrayObject();
$rs->hash = $r->trimpath;
$rs->url = $url;
@ -121,6 +121,7 @@ class trimKutrlService extends kutrlService
return $rs;
}
$this->error->add(__('Unreadable service response.'));
return false;
}
}

4
inc/services/class.yourls.service.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return null;
}
@ -40,7 +39,7 @@ class yourlsKutrlService extends kutrlService
$this->config['url_api'] = $base;
$this->config['url_base'] = $base;
$this->config['url_min_len'] = strlen($base)+3;
$this->config['url_min_len'] = strlen($base) + 3;
}
public function saveSettings()
@ -93,7 +92,6 @@ class yourlsKutrlService extends kutrlService
$rsp = @simplexml_load_string($response);
if ($rsp && $rsp->status == 'success') {
return true;
}
$this->error->add(__('Authentication to service failed.'));

30
index.php
View File

@ -10,7 +10,6 @@
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_CONTEXT_ADMIN')) {
return;
}
@ -19,8 +18,8 @@ if (!defined('DC_CONTEXT_ADMIN')) {
dcPage::check('admin');
$header = '';
$part = isset($_REQUEST['part']) ? $_REQUEST['part'] : 'links';
$action = isset($_POST['action']) ? $_POST['action'] : '';
$part = $_REQUEST['part'] ?? 'links';
$action = $_POST['action'] ?? '';
# link creation
if ($part == 'link') {
@ -63,7 +62,7 @@ if ($part == 'link') {
}
if (false !== ($rs = $kut->isKnowUrl($url))) {
$url = $rs->url;
$new_url = $kut->url_base .$rs->hash;
$new_url = $kut->url_base . $rs->hash;
dcPage::addSuccessNotice(sprintf(
__('Short link for %s is %s'),
@ -75,6 +74,7 @@ if ($part == 'link') {
if ($kut->error->flag()) {
throw new Exception($kut->error->toHTML());
}
throw new Exception(__('Failed to create short link. This could be caused by a service failure.'));
} else {
$url = $rs->url;
@ -88,7 +88,7 @@ if ($part == 'link') {
# ex: Send new url to messengers
if (!empty($rs)) {
$core->callBehavior('adminAfterKutrlCreate', $core, $rs,__('New short URL'));
$core->callBehavior('adminAfterKutrlCreate', $core, $rs, __('New short URL'));
}
}
}
@ -97,15 +97,15 @@ if ($part == 'link') {
}
}
# links
# links
} else {
$services_combo = [];
foreach(kutrl::getServices($core) as $service_id => $service) {
foreach (kutrl::getServices($core) as $service_id => $service) {
$o = new $service($core);
$services_combo[__($o->name)] = $o->id;
}
$ext_services_combo = array_merge([__('Disabled')=>''], $services_combo);
$lst_services_combo = array_merge(['-'=>''], $services_combo);
$ext_services_combo = array_merge([__('Disabled') => ''], $services_combo);
$lst_services_combo = array_merge(['-' => ''], $services_combo);
$log = new kutrlLog($core);
@ -113,7 +113,10 @@ if ($part == 'link') {
$kUtRL_filter->add('part', 'links');
$kUtRL_filter->add(dcAdminFilters::getPageFilter());
$kUtRL_filter->add(dcAdminFilters::getSelectFilter(
'urlsrv', __('Service:'), $lst_services_combo, 'kut_type'
'urlsrv',
__('Service:'),
$lst_services_combo,
'kut_type'
));
$params = $kUtRL_filter->params();
@ -126,13 +129,12 @@ if ($part == 'link') {
$core->error->add($e->getMessage());
}
$header =
$kUtRL_filter->js($core->adminurl->get('admin.plugin.kUtRL', ['part' => 'links'])) .
$header = $kUtRL_filter->js($core->adminurl->get('admin.plugin.kUtRL', ['part' => 'links'])) .
dcPage::jsLoad(dcPage::getPF('kUtRL/js/admin.js'));
if (!empty($_POST['deletelinks'])) {
try {
foreach($_POST['entries'] as $id) {
foreach ($_POST['entries'] as $id) {
$rs = $log->getLogs(['kut_id' => $id]);
if ($rs->isEmpty()) {
continue;
@ -212,7 +214,7 @@ if ($part == 'link') {
'<p class="top-add"><a class="button add" href="' .
$core->adminurl->get('admin.plugin.kUtRL', ['part' => 'link']) .
'">' . __('New Link') .'</a></p>';
'">' . __('New Link') . '</a></p>';
$kUtRL_filter->display('admin.plugin.kUtRL', form::hidden('p', 'kUtRL') . form::hidden('part', 'links'));

29
locales/en/resources.php
View File

@ -1,16 +1,17 @@
<?php
# -- BEGIN LICENSE BLOCK ----------------------------------
#
# This file is part of kUtRL, a plugin for Dotclear 2.
#
# Copyright (c) 2009-2021 Jean-Christian Denis and contributors
#
# Licensed under the GPL version 2.0 license.
# A copy of this license is available in LICENSE file or at
# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
#
# -- END LICENSE BLOCK ------------------------------------
/**
* @brief kUtRL, a plugin for Dotclear 2
*
* @package Dotclear
* @subpackage Plugin
*
* @author Jean-Christian Denis and contributors
*
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return;
}
if (!defined('DC_RC_PATH')) { return; }
$__resources['help']['kUtRL'] = dirname(__FILE__).'/help/help.html';
$__resources['help']['kUtRL'] = dirname(__FILE__) . '/help/help.html';

29
locales/fr/resources.php
View File

@ -1,16 +1,17 @@
<?php
# -- BEGIN LICENSE BLOCK ----------------------------------
#
# This file is part of kUtRL, a plugin for Dotclear 2.
#
# Copyright (c) 2009-2021 Jean-Christian Denis and contributors
#
# Licensed under the GPL version 2.0 license.
# A copy of this license is available in LICENSE file or at
# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
#
# -- END LICENSE BLOCK ------------------------------------
/**
* @brief kUtRL, a plugin for Dotclear 2
*
* @package Dotclear
* @subpackage Plugin
*
* @author Jean-Christian Denis and contributors
*
* @copyright Jean-Christian Denis
* @copyright GPL-2.0 https://www.gnu.org/licenses/gpl-2.0.html
*/
if (!defined('DC_RC_PATH')) {
return;
}
if (!defined('DC_RC_PATH')) { return; }
$__resources['help']['kUtRL'] = dirname(__FILE__).'/help/help.html';
$__resources['help']['kUtRL'] = dirname(__FILE__) . '/help/help.html';