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

cleanup index.xx files

master
Jean-Christian Paul Denis 2021-08-28 00:06:46 +02:00
parent d01496f5cf
commit 96fb6c7d23
9 changed files with 958 additions and 1067 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

173
inc/class.kutrl.php
View File

@ -10,95 +10,92 @@
# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html # http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
# -- END LICENSE BLOCK ------------------------------------ # -- END LICENSE BLOCK ------------------------------------
if (!defined('DC_RC_PATH')){return;} if (!defined('DC_RC_PATH')) {
return null;
}
# Generic class to play easily with services # Generic class to play easily with services
class kUtRL class kUtRL
{ {
# Load services list from behavior # Load services list from behavior
public static function getServices($core) public static function getServices($core)
{ {
$list = $core->getBehaviors('kutrlService'); $list = $core->getBehaviors('kutrlService');
if (empty($list)) return array(); if (empty($list)) {
return [];
$service = array(); }
foreach($list as $k => $callback) $service = [];
{ foreach($list as $k => $callback) {
try 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;
$services[(string) $service_id] = (string) $service_class; } catch (Exception $e) {
}
catch (Exception $e) {} }
} }
return $services; return $services;
} }
# Silently try to load a service according to its id # Silently try to load a service according to its id
# Return null on error else service on success # Return null on error else service on success
public static function quickService($id='') public static function quickService($id = '')
{ {
global $core; global $core;
try try {
{ if (empty($id)) {
if (empty($id)) { return null;
return null; }
} $services = self::getServices($core);
$services = self::getServices($core); if (isset($services[$id])) {
if (isset($services[$id])) { return new $services[$id]($core);
return new $services[$id]($core); }
} } catch(Exception $e) {
}
catch(Exception $e) { } }
return null;
return null; }
}
# Silently try to load a service according to its place
# Silently try to load a service according to its place # Return null on error else service on success
# Return null on error else service on success public static function quickPlace($place = 'plugin')
public static function quickPlace($place='plugin') {
{ global $core;
global $core;
try {
try if (!in_array($place, ['tpl', 'wiki', 'admin', 'plugin'])) {
{ return null;
if (!in_array($place,array('tpl','wiki','admin','plugin'))) { }
return null; $id = $core->blog->settings->kUtRL->get('kutrl_' . $place .'_service');
} if (!empty($id)) {
$id = $core->blog->settings->kUtRL->get('kutrl_'.$place.'_service'); return self::quickService($id);
if (!empty($id)) { }
return self::quickService($id); } catch(Exception $e) {
}
} }
catch(Exception $e) { } return null;
}
return null;
} # Silently try to reduce url (using 'plugin' place)
# return long url on error else short url on success
# Silently try to reduce url (using 'plugin' place) public static function quickReduce($url, $custom = null, $place = 'plugin')
# return long url on error else short url on success {
public static function quickReduce($url,$custom=null,$place='plugin') global $core;
{
global $core; try {
$srv = self::quickPlace($place);
try if (empty($srv)) {
{ return $url;
$srv = self::quickPlace($place); }
if (empty($srv)) { $rs = $srv->hash($url,$custom);
return $url; if (empty($rs)) {
} return $url;
$rs = $srv->hash($url,$custom); }
if (empty($rs)) { return $srv->url_base.$rs->hash;
return $url; } catch(Exception $e) {
}
}
return $srv->url_base.$rs->hash; return $url;
} }
catch(Exception $e) { } }
return $url;
}
}
?>

236
inc/index.link.php
View File

@ -12,142 +12,128 @@
# This file manage admin link creation of kUtRL (called from index.php) # This file manage admin link creation of kUtRL (called from index.php)
if (!defined('DC_CONTEXT_ADMIN')){return;} if (!defined('DC_CONTEXT_ADMIN')) {
return null;
}
$kut = kutrl::quickPlace('admin'); $kut = kutrl::quickPlace('admin');
# Create a new link # Create a new link
if ($action == 'createlink') { if ($action == 'createlink') {
try {
if (null === $kut) {
throw new Exception('Unknow service');
}
$url = trim($core->con->escape($_POST['str']));
$hash = empty($_POST['custom']) ? null : $_POST['custom'];
if (empty($url)) {
throw new Exception(__('There is nothing to shorten.'));
}
if (!$kut->testService()) {
throw new Exception(__('Service is not well configured.'));
}
if (null !== $hash && !$kut->allow_custom_hash) {
throw new Exception(__('This service does not allowed custom hash.'));
}
if (!$kut->isValidUrl($url)) {
throw new Exception(__('This link is not a valid URL.'));
}
if (!$kut->isLongerUrl($url)) {
throw new Exception(__('This link is too short.'));
}
if (!$kut->isProtocolUrl($url)) {
throw new Exception(__('This type of link is not allowed.'));
}
if (!$kut->allow_external_url && !$kut->isBlogUrl($url)) {
throw new Exception(__('Short links are limited to this blog URL.'));
}
if ($kut->isServiceUrl($url)) {
throw new Exception(__('This link is already a short link.'));
}
if (null !== $hash && false !== ($rs = $kut->isKnowHash($hash))) {
throw new Exception(__('This custom short url is already taken.'));
}
if (false !== ($rs = $kut->isKnowUrl($url))) {
$url = $rs->url;
$new_url = $kut->url_base .$rs->hash;
$msg =
'<p class="message">' .
sprintf(
__('Short link for %s is %s') ,
'<strong>' . html::escapeHTML($url) .'</strong>',
'<a href="' . $new_url . '">' . $new_url . '</a>'
) . '</p>';
} else {
if (false === ($rs = $kut->hash($url, $hash))) {
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;
$new_url = $kut->url_base . $rs->hash;
$msg =
'<p class="message">' .
sprintf(
__('Short link for %s is %s'),
'<strong>' . html::escapeHTML($url) . '</strong>',
'<a href="' . $new_url . '">' . $new_url . '</a>'
) . '</p>';
try # ex: Send new url to messengers
{ if (!empty($rs)) {
if (null === $kut) $core->callBehavior('adminAfterKutrlCreate', $core, $rs,__('New short URL'));
throw new Exception('Unknow service'); }
}
$url = trim($core->con->escape($_POST['str'])); }
$hash = empty($_POST['custom']) ? null : $_POST['custom']; } catch (Exception $e) {
$core->error->add($e->getMessage());
if (empty($url)) }
throw new Exception(__('There is nothing to shorten.'));
if (!$kut->testService())
throw new Exception(__('Service is not well configured.'));
if (null !== $hash && !$kut->allow_custom_hash)
throw new Exception(__('This service does not allowed custom hash.'));
if (!$kut->isValidUrl($url))
throw new Exception(__('This link is not a valid URL.'));
if (!$kut->isLongerUrl($url))
throw new Exception(__('This link is too short.'));
if (!$kut->isProtocolUrl($url))
throw new Exception(__('This type of link is not allowed.'));
if (!$kut->allow_external_url && !$kut->isBlogUrl($url))
throw new Exception(__('Short links are limited to this blog URL.'));
if ($kut->isServiceUrl($url))
throw new Exception(__('This link is already a short link.'));
if (null !== $hash && false !== ($rs = $kut->isKnowHash($hash)))
throw new Exception(__('This custom short url is already taken.'));
if (false !== ($rs = $kut->isKnowUrl($url)))
{
$url = $rs->url;
$new_url = $kut->url_base.$rs->hash;
$msg =
'<p class="message">'.
sprintf(__('Short link for %s is %s'),
'<strong>'.html::escapeHTML($url).'</strong>',
'<a href="'.$new_url.'">'.$new_url.'</a>'
).'</p>';
}
else
{
if (false === ($rs = $kut->hash($url,$hash)))
{
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;
$new_url = $kut->url_base.$rs->hash;
$msg =
'<p class="message">'.
sprintf(__('Short link for %s is %s'),
'<strong>'.html::escapeHTML($url).'</strong>',
'<a href="'.$new_url.'">'.$new_url.'</a>'
).'</p>';
# ex: Send new url to messengers
if (!empty($rs))
{
$core->callBehavior('adminAfterKutrlCreate',$core,$rs,__('New short URL'));
}
}
}
}
catch (Exception $e)
{
$core->error->add($e->getMessage());
}
} }
echo ' echo '
<html> <html>
<head><title>kUtRL, '.__('Links shortener').'</title>'.$header.'</head> <head><title>kUtRL, ' . __('Links shortener') . '</title>' . $header . '</head>
<body> <body>
<h2>kUtRL'. <h2>kUtRL' .
' &rsaquo; <a href="'.$p_url.'&amp;part=links">'.__('Links').'</a>'. ' &rsaquo; <a href="' . $p_url . '&amp;part=links">' . __('Links') . '</a>' .
' &rsaquo; '.__('New link'). ' &rsaquo; ' . __('New link') .
'</h2>'.$msg; '</h2>' . $msg;
if (null === $kut) if (null === $kut) {
{ echo '<p>' . __('You must set an admin service.') . '</p>';
echo '<p>'.__('You must set an admin service.').'</p>'; } else {
} echo '
else <form id="create-link" method="post" action="' . $p_url . '">
{
echo ' <h3>' . sprintf(__('Shorten link using service "%s"'), $kut->name) . '</h3>
<form id="create-link" method="post" action="'.$p_url.'"> <p class="classic"><label for="str">' . __('Long link:') .
form::field('str', 100, 255, '') . '</label></p>';
<h3>'.sprintf(__('Shorten link using service "%s"'),$kut->name).'</h3>
<p class="classic"><label for="str">'.__('Long link:'). if ($kut->allow_custom_hash) {
form::field('str',100,255,'').'</label></p>'; echo
'<p class="classic"><label for="custom">' .
if ($kut->allow_custom_hash) __('Custom short link:') .
{ form::field('custom', 50, 32, '') . '</label></p>' .
echo '<p class="form-note">' . __('Only if you want a custom short link.') . '</p>';
'<p class="classic"><label for="custom">'.
__('Custom short link:'). if ($s_admin_service == 'local') {
form::field('custom',50,32,'').'</label></p>'. echo '<p class="form-note">' .
'<p class="form-note">'.__('Only if you want a custom short link.').'</p>'; __('You can use "bob!!" if you want a semi-custom link, it starts with "bob" and "!!" will be replaced by an increment value.') .
'</p>';
if ($s_admin_service == 'local') }
{ }
echo '<p class="form-note">'.
__('You can use "bob!!" if you want a semi-custom link, it starts with "bob" and "!!" will be replaced by an increment value.'). echo '
'</p>'; <div class="clear">
} <p><input type="submit" name="save" value="' . __('save') . '" />' .
} $core->formNonce() .
form::hidden(['p'], 'kUtRL') .
echo ' form::hidden(['part'], 'link') .
<div class="clear"> form::hidden(['action'], 'createlink') . '
<p><input type="submit" name="save" value="'.__('save').'" />'. </p></div>
$core->formNonce(). </form>';
form::hidden(array('p'),'kUtRL').
form::hidden(array('part'),'link').
form::hidden(array('action'),'createlink').'
</p></div>
</form>';
} }
dcPage::helpBlock('kUtRL'); dcPage::helpBlock('kUtRL');
echo $footer.'</body></html>'; echo $footer . '</body></html>';
?>

342
inc/index.links.php
View File

@ -12,86 +12,86 @@
# This file manage links of kUtRL (called from index.php) # This file manage links of kUtRL (called from index.php)
if (!defined('DC_CONTEXT_ADMIN')){return;} if (!defined('DC_CONTEXT_ADMIN')) {
return null;
}
# Short links list # Short links list
class kutrlLinkslist extends adminGenericList class kutrlLinkslist extends adminGenericList
{ {
public function display($page,$nb_per_page,$url) public function display($page, $nb_per_page, $url)
{ {
if ($this->rs->isEmpty()) if ($this->rs->isEmpty()) {
echo '<p><strong>'.__('No short link').'</strong></p>'; echo '<p><strong>' . __('No short link') . '</strong></p>';
} else {
else { $pager = new pager($page, $this->rs_count, $nb_per_page, 10);
$pager = new pager($page,$this->rs_count,$nb_per_page,10);
$pager->base_url = $url; $pager->base_url = $url;
$html_block = $html_block =
'<table class="clear">'. '<table class="clear">' .
'<thead>'. '<thead>' .
'<tr>'. '<tr>' .
'<th class="nowrap" colspan="2">'.__('Hash').'</th>'. '<th class="nowrap" colspan="2">' . __('Hash') . '</th>' .
'<th class="maximal">'.__('Link').'</th>'. '<th class="maximal">' . __('Link') . '</th>' .
'<th class="nowrap">'.__('Date').'</th>'. '<th class="nowrap">' . __('Date') . '</th>' .
'<th class="nowrap">'.__('Service').'</th>'. '<th class="nowrap">' . __('Service') . '</th>' .
'</tr>'. '</tr>' .
'</thead>'. '</thead>' .
'<tbody>%s</tbody>'. '<tbody>%s</tbody>' .
'</table>'; '</table>';
echo '<p>'.__('Page(s)').' : '.$pager->getLinks().'</p>'; echo '<p>' . __('Page(s)') . ' : ' . $pager->getLinks() . '</p>';
$blocks = explode('%s',$html_block); $blocks = explode('%s', $html_block);
echo $blocks[0]; echo $blocks[0];
$this->rs->index(((integer)$page - 1) * $nb_per_page); $this->rs->index(((integer)$page - 1) * $nb_per_page);
$iter = 0; $iter = 0;
while ($iter < $nb_per_page) { while ($iter < $nb_per_page) {
echo $this->line($url,$iter); echo $this->line($url,$iter);
if ($this->rs->isEnd()) if ($this->rs->isEnd()) {
break; break;
else } else {
$this->rs->moveNext(); $this->rs->moveNext();
}
$iter++; $iter++;
} }
echo $blocks[1]; echo $blocks[1];
echo '<p>'.__('Page(s)').' : '.$pager->getLinks().'</p>'; echo '<p>' . __('Page(s)') . ' : ' . $pager->getLinks() . '</p>';
} }
} }
private function line($url,$loop) private function line($url, $loop)
{ {
$type = $this->rs->kut_type; $type = $this->rs->kut_type;
$hash = $this->rs->kut_hash; $hash = $this->rs->kut_hash;
if (null !== ($o = kutrl::quickService($this->rs->kut_type))) if (null !== ($o = kutrl::quickService($this->rs->kut_type))) {
{ $type = '<a href="' . $o->home . '" title="' . $o->name . '">' . $o->name . '</a>';
$type = '<a href="'.$o->home.'" title="'.$o->name.'">'.$o->name.'</a>'; $hash = '<a href="' . $o->url_base . $hash . '" title="' . $o->url_base . $hash . '">' . $hash . '</a>';
$hash = '<a href="'.$o->url_base.$hash.'" title="'.$o->url_base.$hash.'">'.$hash.'</a>'; }
}
return
return '<tr class="line">' . "\n" .
'<tr class="line">'."\n". '<td class="nowrap">' .
'<td class="nowrap">'. form::checkbox(['entries[' . $loop . ']'], $this->rs->kut_id, 0) .
form::checkbox(array('entries['.$loop.']'),$this->rs->kut_id,0). '</td>' .
'</td>'. '<td class="nowrap">' .
'<td class="nowrap">'. $hash .
$hash. "</td>\n" .
"</td>\n". '<td class="maximal">' .
'<td class="maximal">'. '<a href="' . $this->rs->kut_url . '">' . $this->rs->kut_url . '</a>' .
'<a href="'.$this->rs->kut_url.'">'.$this->rs->kut_url.'</a>'. "</td>\n" .
"</td>\n". '<td class="nowrap">' .
'<td class="nowrap">'. dt::dt2str(__('%Y-%m-%d %H:%M'), $this->rs->kut_dt, $this->core->auth->getInfo('user_tz')) .
dt::dt2str(__('%Y-%m-%d %H:%M'),$this->rs->kut_dt,$this->core->auth->getInfo('user_tz')). "</td>\n" .
"</td>\n". '<td class="nowrap">' .
'<td class="nowrap">'. $type .
$type. "</td>\n" .
"</td>\n". '</tr>' . "\n";
'</tr>'."\n"; }
}
} }
# Logs class # Logs class
@ -106,162 +106,158 @@ $order = !empty($_GET['order']) ? $_GET['order'] : 'desc';
$page = !empty($_GET['page']) ? (integer) $_GET['page'] : 1; $page = !empty($_GET['page']) ? (integer) $_GET['page'] : 1;
$nb_per_page = 30; $nb_per_page = 30;
if (!empty($_GET['nb']) && (integer) $_GET['nb'] > 0) { if (!empty($_GET['nb']) && (integer) $_GET['nb'] > 0) {
if ($nb_per_page != $_GET['nb']) $show_filters = true; if ($nb_per_page != $_GET['nb']) {
$nb_per_page = (integer) $_GET['nb']; $show_filters = true;
}
$nb_per_page = (integer) $_GET['nb'];
} }
# Combos # Combos
$sortby_combo = array( $sortby_combo = [
__('Date') => 'kut_dt', __('Date') => 'kut_dt',
__('Long link') => 'kut_url', __('Long link') => 'kut_url',
__('Short link') => 'kut_hash' __('Short link') => 'kut_hash'
); ];
$order_combo = array( $order_combo = [
__('Descending') => 'desc', __('Descending') => 'desc',
__('Ascending') => 'asc' __('Ascending') => 'asc'
); ];
$services_combo = array(); $services_combo = [];
foreach(kutrl::getServices($core) as $service_id => $service) foreach(kutrl::getServices($core) as $service_id => $service)
{ {
$o = new $service($core); $o = new $service($core);
$services_combo[__($o->name)] = $o->id; $services_combo[__($o->name)] = $o->id;
} }
$ext_services_combo = array_merge(array(__('Disabled')=>''),$services_combo); $ext_services_combo = array_merge([__('Disabled') => ''], $services_combo);
$lst_services_combo = array_merge(array('-'=>''),$services_combo); $lst_services_combo = array_merge(['-' => ''], $services_combo);
# Params for list # Params for list
$params = array(); $params = [];
$params['limit'] = array((($page-1)*$nb_per_page),$nb_per_page); $params['limit'] = [(($page-1)*$nb_per_page), $nb_per_page];
if ($sortby != '' && in_array($sortby,$sortby_combo)) if ($sortby != '' && in_array($sortby, $sortby_combo)) {
{ if ($urlsrv != '' && in_array($urlsrv, $lst_services_combo)) {
if ($urlsrv != '' && in_array($urlsrv,$lst_services_combo)) $params['kut_type'] = $urlsrv;
$params['kut_type'] = $urlsrv; }
if ($order != '' && in_array($order, $order_combo)) {
if ($order != '' && in_array($order,$order_combo)) $params['order'] = $sortby . ' ' . $order;
$params['order'] = $sortby.' '.$order; }
if ($sortby != 'kut_dt' || $order != 'desc' || $urlsrv != '') {
if ($sortby != 'kut_dt' || $order != 'desc' || $urlsrv != '') $show_filters = true;
$show_filters = true; }
} }
$pager_base_url = $pager_base_url =
$p_url. $p_url .
'&amp;tab=list'. '&amp;tab=list' .
'&amp;urlsrv='.$urlsrv. '&amp;urlsrv=' . $urlsrv .
'&amp;sortby='.$sortby. '&amp;sortby=' . $sortby .
'&amp;order='.$order. '&amp;order=' . $order .
'&amp;nb='.$nb_per_page. '&amp;nb=' . $nb_per_page .
'&amp;page=%s'; '&amp;page=%s';
# Delete links from list # Delete links from list
if ($action == 'deletelinks') if ($action == 'deletelinks') {
{ try {
try foreach($_POST['entries'] as $k => $id) {
{ $rs = $log->getLogs(['kut_id' => $id]);
foreach($_POST['entries'] as $k => $id) if ($rs->isEmpty()) {
{ continue;
$rs = $log->getLogs(array('kut_id'=>$id)); }
if ($rs->isEmpty()) continue; if (null === ($o = kutrl::quickService($rs->kut_type))) {
continue;
if (null === ($o = kutrl::quickService($rs->kut_type))) continue; }
$o->remove($rs->kut_url); $o->remove($rs->kut_url);
} }
$core->blog->triggerBlog(); $core->blog->triggerBlog();
http::redirect($p_url.'&part=links&urlsrv='.$urlsrv.'&sortby='.$sortby.'&order='.$order.'&nb='.$nb_per_page.'&page='.$page.'&msg='.$action); http::redirect($p_url . '&part=links&urlsrv=' . $urlsrv . '&sortby=' . $sortby . '&order=' . $order . '&nb=' . $nb_per_page . '&page=' . $page . '&msg=' . $action);
} } catch (Exception $e) {
catch (Exception $e) { $core->error->add($e->getMessage());
$core->error->add($e->getMessage()); }
}
} }
# Get links and pager # Get links and pager
try try {
{ $list_all = $log->getLogs($params);
$list_all = $log->getLogs($params); $list_counter = $log->getLogs($params, true)->f(0);
$list_counter = $log->getLogs($params,true)->f(0); $list_current = new kutrlLinksList($core, $list_all, $list_counter, $pager_base_url);
$list_current = new kutrlLinksList($core,$list_all,$list_counter,$pager_base_url); } catch (Exception $e) {
$core->error->add($e->getMessage());
} }
catch (Exception $e)
{
$core->error->add($e->getMessage());
}
if (!$show_filters) { if (!$show_filters) {
$header .= dcPage::jsLoad('js/filter-controls.js'); $header .= dcPage::jsLoad('js/filter-controls.js');
} }
echo ' echo '
<html> <html>
<head><title>kUtRL, '.__('Links shortener').'</title>'. <head><title>kUtRL, ' . __('Links shortener') . '</title>' .
"\n<script type=\"text/javascript\"> \n". "\n<script type=\"text/javascript\"> \n" .
"$(function(){ $('.checkboxes-helpers').each(function(){dotclear.checkboxesHelpers(this);}); }); \n". "$(function(){ $('.checkboxes-helpers').each(function(){dotclear.checkboxesHelpers(this);}); }); \n" .
"</script>\n". "</script>\n" .
$header.'</head> $header . '</head>
<body> <body>
<h2>kUtRL'. <h2>kUtRL' .
' &rsaquo; '.__('Links'). ' &rsaquo; ' . __('Links') .
' - <a class="button" href="'.$p_url.'&amp;part=link">'.__('New link').'</a>'. ' - <a class="button" href="' . $p_url . '&amp;part=link">' . __('New link') . '</a>' .
'</h2>'.$msg; '</h2>' . $msg;
if (!$show_filters) { if (!$show_filters) {
echo '<p><a id="filter-control" class="form-control" href="#">'. echo '<p><a id="filter-control" class="form-control" href="#">' .
__('Filters').'</a></p>'; __('Filters') . '</a></p>';
} }
echo ' echo '
<form action="'.$p_url.'&amp;part=links" method="get" id="filters-form"> <form action="' . $p_url . '&amp;part=links" method="get" id="filters-form">
<fieldset><legend>'.__('Filters').'</legend> <fieldset><legend>' . __('Filters') . '</legend>
<div class="three-cols"> <div class="three-cols">
<div class="col"> <div class="col">
<label>'.__('Service:').form::combo('urlsrv',$lst_services_combo,$urlsrv).' <label>' . __('Service:') . form::combo('urlsrv', $lst_services_combo, $urlsrv) . '
</label> </label>
</div> </div>
<div class="col"> <div class="col">
<label>'.__('Order by:').form::combo('sortby',$sortby_combo,$sortby).' <label>' . __('Order by:') . form::combo('sortby', $sortby_combo, $sortby) . '
</label> </label>
<label>'.__('Sort:').form::combo('order',$order_combo,$order).' <label>' . __('Sort:') . form::combo('order', $order_combo, $order) . '
</label> </label>
</div> </div>
<div class="col"> <div class="col">
<p> <p>
<label class="classic">'.form::field('nb',3,3,$nb_per_page).' '.__('Entries per page').' <label class="classic">' . form::field('nb', 3, 3, $nb_per_page) . ' ' . __('Entries per page') . '
</label> </label>
<input type="submit" value="'.__('filter').'" />'. <input type="submit" value="' . __('filter') . '" />' .
form::hidden(array('p'),'kUtRL'). form::hidden(['p'], 'kUtRL') .
form::hidden(array('part'),'links').' form::hidden(['part'], 'links') . '
</p> </p>
</div> </div>
</div> </div>
<br class="clear" /> <br class="clear" />
</fieldset> </fieldset>
</form> </form>
<form action="'.$p_url.'&amp;part=links" method="post" id="form-actions">'; <form action="' . $p_url . '&amp;part=links" method="post" id="form-actions">';
$list_current->display($page,$nb_per_page,$pager_base_url); $list_current->display($page, $nb_per_page, $pager_base_url);
echo ' echo '
<div class="two-cols"> <div class="two-cols">
<p class="col checkboxes-helpers"></p> <p class="col checkboxes-helpers"></p>
<p class="col right"> <p class="col right">
<input type="submit" value="'.__('Delete selected short links').'" />'. <input type="submit" value="' . __('Delete selected short links') . '" />' .
form::hidden(array('action'),'deletelinks'). form::hidden(['action'], 'deletelinks') .
form::hidden(array('urlsrv'),$urlsrv). form::hidden(['urlsrv'], $urlsrv) .
form::hidden(array('sortby'),$sortby). form::hidden(['sortby'], $sortby) .
form::hidden(array('order'),$order). form::hidden(['order'], $order) .
form::hidden(array('page'),$page). form::hidden(['page'], $page) .
form::hidden(array('nb'),$nb_per_page). form::hidden(['nb'], $nb_per_page) .
form::hidden(array('p'),'kUtRL'). form::hidden(['p'], 'kUtRL') .
form::hidden(array('part'),'links'). form::hidden(['part'], 'links') .
$core->formNonce().' $core->formNonce() . '
</p> </p>
</div> </div>
</form>'; </form>';
dcPage::helpBlock('kUtRL'); dcPage::helpBlock('kUtRL');
echo $footer.'</body></html>'; echo $footer . '</body></html>';
?> ?>

79
inc/index.service.php
View File

@ -12,66 +12,58 @@
# This file manage services of kUtRL (called from index.php) # This file manage services of kUtRL (called from index.php)
if (!defined('DC_CONTEXT_ADMIN')){return;} if (!defined('DC_CONTEXT_ADMIN')) {
return null;
}
# Save services settings # Save services settings
if ($action == 'saveservice') if ($action == 'saveservice') {
{ try {
try foreach(kutrl::getServices($core) as $service_id => $service) {
{
foreach(kutrl::getServices($core) as $service_id => $service)
{
$o = new $service($core); $o = new $service($core);
$o->saveSettings(); $o->saveSettings();
} }
$core->blog->triggerBlog(); $core->blog->triggerBlog();
http::redirect($p_url.'&part=service&section='.$section.'&msg='.$action); http::redirect($p_url . '&part=service&section=' . $section . '&msg=' . $action);
} } catch (Exception $e) {
catch (Exception $e)
{
$core->error->add($e->getMessage()); $core->error->add($e->getMessage());
} }
} }
echo ' echo '
<html> <html>
<head><title>kUtRL, '.__('Links shortener').'</title>'.$header. <head><title>kUtRL, ' . __('Links shortener') . '</title>' . $header .
dcPage::jsLoad('index.php?pf=kUtRL/js/service.js'). dcPage::jsLoad('index.php?pf=kUtRL/js/service.js') .
"<script type=\"text/javascript\">\n//<![CDATA[\n". "<script type=\"text/javascript\">\n//<![CDATA[\n" .
dcPage::jsVar('jcToolsBox.prototype.section',$section). dcPage::jsVar('jcToolsBox.prototype.section', $section) .
"\n//]]>\n</script>\n". "\n//]]>\n</script>\n" .
'</head> '</head>
<body> <body>
<h2>kUtRL'. <h2>kUtRL' .
' &rsaquo; <a href="'.$p_url.'&amp;part=links">'.__('Links').'</a>'. ' &rsaquo; <a href="' . $p_url . '&amp;part=links">' . __('Links') . '</a>' .
' &rsaquo; '.__('Services'). ' &rsaquo; ' . __('Services') .
' - <a class="button" href="'.$p_url.'&amp;part=link">'.__('New link').'</a>'. ' - <a class="button" href="' . $p_url . '&amp;part=link">' . __('New link') . '</a>' .
'</h2>'.$msg.' '</h2>' . $msg . '
<form id="service-form" method="post" action="'.$p_url.'">'; <form id="service-form" method="post" action="' . $p_url . '">';
foreach(kutrl::getServices($core) as $service_id => $service) foreach(kutrl::getServices($core) as $service_id => $service) {
{
$o = new $service($core); $o = new $service($core);
echo '<fieldset id="setting-'.$service_id.'"><legend>'.$o->name.'</legend>'; echo '<fieldset id="setting-' . $service_id . '"><legend>' . $o->name . '</legend>';
if (!empty($msg)) if (!empty($msg)) {
{ echo '<p><em>' . (
echo '<p><em>'.(
$o->testService() ? $o->testService() ?
$img_green.' '.sprintf(__('%s API is well configured and runing.'),$o->name) : $img_green . ' ' . sprintf(__('%s API is well configured and runing.'), $o->name) :
$img_red.' '.sprintf(__('Failed to test %s API.'),$o->name) $img_red . ' ' . sprintf(__('Failed to test %s API.'), $o->name)
).'</em></p>'; ) . '</em></p>';
//if ($o->error->flag()) { //if ($o->error->flag()) {
echo $o->error->toHTML(); echo $o->error->toHTML();
//} //}
} }
if (!empty($o->home)) {
if (!empty($o->home)) echo '<p><a title="' . __('homepage') . '" href="' . $o->home . '">' . sprintf(__('Learn more about %s.'), $o->name) . '</a></p>';
{
echo '<p><a title="'.__('homepage').'" href="'.$o->home.'">'.sprintf(__('Learn more about %s.'),$o->name).'</a></p>';
} }
$o->settingsForm(); $o->settingsForm();
echo '</fieldset>'; echo '</fieldset>';
@ -79,14 +71,13 @@ foreach(kutrl::getServices($core) as $service_id => $service)
echo ' echo '
<div class="clear"> <div class="clear">
<p><input type="submit" name="save" value="'.__('save').'" />'. <p><input type="submit" name="save" value="' . __('save') . '" />' .
$core->formNonce(). $core->formNonce() .
form::hidden(array('p'),'kUtRL'). form::hidden(['p'], 'kUtRL') .
form::hidden(array('part'),'service'). form::hidden(['part'], 'service') .
form::hidden(array('action'),'saveservice'). form::hidden(['action'], 'saveservice') .
form::hidden(array('section'),$section).' form::hidden(['section'], $section) . '
</p></div> </p></div>
</form>'; </form>';
dcPage::helpBlock('kUtRL'); dcPage::helpBlock('kUtRL');
echo $footer.'</body></html>'; echo $footer . '</body></html>';
?>

152
inc/index.setting.php
View File

@ -12,7 +12,9 @@
# This file manage settings of kUtRL (called from index.php) # This file manage settings of kUtRL (called from index.php)
if (!defined('DC_CONTEXT_ADMIN')){return;} if (!defined('DC_CONTEXT_ADMIN')) {
return null;
}
$s_active = (boolean) $s->kutrl_active; $s_active = (boolean) $s->kutrl_active;
$s_plugin_service = (string) $s->kutrl_plugin_service; $s_plugin_service = (string) $s->kutrl_plugin_service;
@ -24,8 +26,7 @@ $s_tpl_passive = (boolean) $s->kutrl_tpl_passive;
$s_tpl_active = (boolean) $s->kutrl_tpl_active; $s_tpl_active = (boolean) $s->kutrl_tpl_active;
$s_admin_entry_default = (string) $s->kutrl_admin_entry_default; $s_admin_entry_default = (string) $s->kutrl_admin_entry_default;
if ($default_part == 'setting' && $action == 'savesetting') if ($default_part == 'setting' && $action == 'savesetting') {
{
try { try {
$s_active = !empty($_POST['s_active']); $s_active = !empty($_POST['s_active']);
$s_admin_service = $_POST['s_admin_service']; $s_admin_service = $_POST['s_admin_service'];
@ -36,129 +37,126 @@ if ($default_part == 'setting' && $action == 'savesetting')
$s_tpl_passive = !empty($_POST['s_tpl_passive']); $s_tpl_passive = !empty($_POST['s_tpl_passive']);
$s_tpl_active = !empty($_POST['s_tpl_active']); $s_tpl_active = !empty($_POST['s_tpl_active']);
$s_admin_entry_default = !empty($_POST['s_admin_entry_default']); $s_admin_entry_default = !empty($_POST['s_admin_entry_default']);
$s->put('kutrl_active',$s_active); $s->put('kutrl_active', $s_active);
$s->put('kutrl_plugin_service',$s_plugin_service); $s->put('kutrl_plugin_service', $s_plugin_service);
$s->put('kutrl_admin_service',$s_admin_service); $s->put('kutrl_admin_service', $s_admin_service);
$s->put('kutrl_tpl_service',$s_tpl_service); $s->put('kutrl_tpl_service', $s_tpl_service);
$s->put('kutrl_wiki_service',$s_wiki_service); $s->put('kutrl_wiki_service', $s_wiki_service);
$s->put('kutrl_allow_external_url',$s_allow_external_url); $s->put('kutrl_allow_external_url', $s_allow_external_url);
$s->put('kutrl_tpl_passive',$s_tpl_passive); $s->put('kutrl_tpl_passive', $s_tpl_passive);
$s->put('kutrl_tpl_active',$s_tpl_active); $s->put('kutrl_tpl_active', $s_tpl_active);
$s->put('kutrl_admin_entry_default',$s_admin_entry_default); $s->put('kutrl_admin_entry_default', $s_admin_entry_default);
$core->blog->triggerBlog(); $core->blog->triggerBlog();
http::redirect($p_url.'&part=setting&msg='.$action.'&section='.$section); http::redirect($p_url . '&part=setting&msg=' . $action . '&section=' . $section);
} } catch (Exception $e) {
catch (Exception $e) {
$core->error->add($e->getMessage()); $core->error->add($e->getMessage());
} }
} }
$services_combo = array(); $services_combo = [];
foreach(kutrl::getServices($core) as $service_id => $service) foreach(kutrl::getServices($core) as $service_id => $service) {
{
$o = new $service($core); $o = new $service($core);
$services_combo[__($o->name)] = $o->id; $services_combo[__($o->name)] = $o->id;
} }
$ext_services_combo = array_merge(array(__('Disabled')=>''),$services_combo); $ext_services_combo = array_merge([__('Disabled')=>''], $services_combo);
$lst_services_combo = array_merge(array('-'=>''),$services_combo); $lst_services_combo = array_merge(['-'=>''], $services_combo);
echo ' echo '
<html> <html>
<head><title>kUtRL, '.__('Links shortener').'</title>'.$header. <head><title>kUtRL, ' . __('Links shortener') . '</title>' . $header .
dcPage::jsLoad('index.php?pf=kUtRL/js/setting.js'). dcPage::jsLoad('index.php?pf=kUtRL/js/setting.js') .
"<script type=\"text/javascript\">\n//<![CDATA[\n". "<script type=\"text/javascript\">\n//<![CDATA[\n" .
dcPage::jsVar('jcToolsBox.prototype.section',$section). dcPage::jsVar('jcToolsBox.prototype.section', $section) .
"\n//]]>\n</script>\n". "\n//]]>\n</script>\n" .
'</head> '</head>
<body> <body>
<h2>kUtRL'. <h2>kUtRL' .
' &rsaquo; <a href="'.$p_url.'&amp;part=links">'.__('Links').'</a>'. ' &rsaquo; <a href="' . $p_url . '&amp;part=links">' . __('Links') . '</a>' .
' &rsaquo; '.__('Settings'). ' &rsaquo; ' . __('Settings') .
' - <a class="button" href="'.$p_url.'&amp;part=link">'.__('New link').'</a>'. ' - <a class="button" href="' . $p_url . '&amp;part=link">' . __('New link') . '</a>' .
'</h2>'.$msg.' '</h2>' . $msg . '
<form id="setting-form" method="post" action="'.$p_url.'"> <form id="setting-form" method="post" action="' . $p_url . '">
<fieldset id="setting-plugin"><legend>'. __('Plugin activation').'</legend> <fieldset id="setting-plugin"><legend>' . __('Plugin activation') . '</legend>
<p><label class="classic">'. <p><label class="classic">' .
form::checkbox(array('s_active'),'1',$s_active). form::checkbox(['s_active'], '1', $s_active) .
__('Enable plugin').'</label></p> __('Enable plugin') . '</label></p>
</fieldset> </fieldset>
<fieldset id="setting-option"><legend>'. __('General rules').'</legend> <fieldset id="setting-option"><legend>' . __('General rules') . '</legend>
<p><label class="classic">'. <p><label class="classic">' .
form::checkbox(array('s_allow_external_url'),'1',$s_allow_external_url). form::checkbox(['s_allow_external_url'], '1', $s_allow_external_url) .
__('Allow short link for external URL').'</label></p> __('Allow short link for external URL') . '</label></p>
<p class="form-note">'.__('Not only link started with this blog URL could be shortened.').'</p> <p class="form-note">' . __('Not only link started with this blog URL could be shortened.') . '</p>
<p><label class="classic">'. <p><label class="classic">' .
form::checkbox(array('s_tpl_passive'),'1',$s_tpl_passive). form::checkbox(['s_tpl_passive'], '1', $s_tpl_passive) .
__('Passive mode').'</label></p> __('Passive mode') . '</label></p>
<p class="form-note">'.__('If this extension is disabled and the passive mode is enabled, "kutrl" tags (like EntryKurl) will display long urls instead of nothing on templates.').'</p> <p class="form-note">' . __('If this extension is disabled and the passive mode is enabled, "kutrl" tags (like EntryKurl) will display long urls instead of nothing on templates.') . '</p>
<p><label class="classic">'. <p><label class="classic">' .
form::checkbox(array('s_tpl_active'),'1',$s_tpl_active). form::checkbox(['s_tpl_active'], '1', $s_tpl_active) .
__('Active mode').'</label></p> __('Active mode') . '</label></p>
<p class="form-note">'.__('If the active mode is enabled, all know default template tags (like EntryURL) will display short urls instead of long ones on templates.').'<br />'. <p class="form-note">' . __('If the active mode is enabled, all know default template tags (like EntryURL) will display short urls instead of long ones on templates.') . '<br />' .
__('You can disable URL shortening for a specific template tag by adding attribute disable_kutrl="1" to it.').'</p> __('You can disable URL shortening for a specific template tag by adding attribute disable_kutrl="1" to it . ') . '</p>
<p><label class="classic">'. <p><label class="classic">' .
form::checkbox(array('s_admin_entry_default'),'1',$s_admin_entry_default). form::checkbox(['s_admin_entry_default'], '1', $s_admin_entry_default) .
__('Create short link for new entries').'</label></p> __('Create short link for new entries') . '</label></p>
<p class="form-note">'.__('This can be changed on page of creation/edition of an entry.').'</p> <p class="form-note">' . __('This can be changed on page of creation/edition of an entry.') . '</p>
</fieldset> </fieldset>
<fieldset id="setting-service"><legend>'. __('Default services').'</legend> <fieldset id="setting-service"><legend>' . __('Default services') . '</legend>
<p><label>'; <p><label>';
if (!empty($msg)) { if (!empty($msg)) {
if (null !== ($o = kutrl::quickPlace($s_admin_service))) { if (null !== ($o = kutrl::quickPlace($s_admin_service))) {
echo $o->testService() ? $img_green : $img_red; echo $o->testService() ? $img_green : $img_red;
} }
} }
echo '&nbsp;'.__('Administration:').'<br />'. echo '&nbsp;' . __('Administration:') . '<br />' .
form::combo(array('s_admin_service'),$services_combo,$s_admin_service).' form::combo(['s_admin_service'], $services_combo, $s_admin_service) . '
</label></p> </label></p>
<p class="form-note">'.__('Service to use in this admin page and on edit page of an entry.').'</p> <p class="form-note">' . __('Service to use in this admin page and on edit page of an entry.') . '</p>
<p><label>'; <p><label>';
if (!empty($msg)) { if (!empty($msg)) {
if (null !== ($o = kutrl::quickPlace($s_plugin_service))) { if (null !== ($o = kutrl::quickPlace($s_plugin_service))) {
echo $o->testService() ? $img_green : $img_red; echo $o->testService() ? $img_green : $img_red;
} }
} }
echo '&nbsp;'.__('Extensions:').'<br />'. echo '&nbsp;' . __('Extensions:') . '<br />' .
form::combo(array('s_plugin_service'),$services_combo,$s_plugin_service).' form::combo(['s_plugin_service'], $services_combo, $s_plugin_service) . '
</label></p> </label></p>
<p class="form-note">'.__('Service to use on third part plugins.').'</p> <p class="form-note">' . __('Service to use on third part plugins.') . '</p>
<p><label>'; <p><label>';
if (!empty($msg)) { if (!empty($msg)) {
if (null !== ($o = kutrl::quickPlace($s_tpl_service))) { if (null !== ($o = kutrl::quickPlace($s_tpl_service))) {
echo $o->testService() ? $img_green : $img_red; echo $o->testService() ? $img_green : $img_red;
} }
} }
echo '&nbsp;'.__('Templates:').'<br />'. echo '&nbsp;' . __('Templates:') . '<br />' .
form::combo(array('s_tpl_service'),$ext_services_combo,$s_tpl_service).' form::combo(['s_tpl_service'], $ext_services_combo, $s_tpl_service) . '
</label></p> </label></p>
<p class="form-note">'.__('Shorten links automatically when using template value like "EntryKutrl".').'</p> <p class="form-note">' . __('Shorten links automatically when using template value like "EntryKutrl".') . '</p>
<p><label>'; <p><label>';
if (!empty($msg)) { if (!empty($msg)) {
if (null !== ($o = kutrl::quickPlace($s_wiki_service))) { if (null !== ($o = kutrl::quickPlace($s_wiki_service))) {
echo $o->testService() ? $img_green : $img_red; echo $o->testService() ? $img_green : $img_red;
} }
} }
echo '&nbsp;'.__('Contents:').'<br />'. echo '&nbsp;' . __('Contents:') . '<br />' .
form::combo(array('s_wiki_service'),$ext_services_combo,$s_wiki_service).' form::combo(['s_wiki_service'], $ext_services_combo, $s_wiki_service) . '
</label></p> </label></p>
<p class="form-note">'.__('Shorten links automatically found in contents using wiki synthax.').'</p> <p class="form-note">' . __('Shorten links automatically found in contents using wiki synthax.') . '</p>
</fieldset> </fieldset>
<div class="clear"> <div class="clear">
<p><input type="submit" name="save" value="'.__('save').'" />'. <p><input type="submit" name="save" value="' . __('save') . '" />' .
$core->formNonce(). $core->formNonce() .
form::hidden(array('p'),'kUtRL'). form::hidden(['p'], 'kUtRL') .
form::hidden(array('part'),'setting'). form::hidden(['part'], 'setting') .
form::hidden(array('action'),'savesetting'). form::hidden(['action'], 'savesetting') .
form::hidden(array('section'),$section).' form::hidden(['section'], $section) . '
</p></div> </p></div>
</form>'; </form>';
dcPage::helpBlock('kUtRL'); dcPage::helpBlock('kUtRL');
echo $footer.'</body></html>'; echo $footer . '</body></html>';
?>

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

@ -12,27 +12,28 @@
# This file is used with plugin activityReport # This file is used with plugin activityReport
if (!defined('DC_RC_PATH')){return;} if (!defined('DC_RC_PATH')) {
return null;
}
$core->activityReport->addGroup('kutrl',__('Plugin kUtRL')); $core->activityReport->addGroup('kutrl', __('Plugin kUtRL'));
# from BEHAVIOR kutrlAfterCreateShortUrl in kUtRL/inc/lib.kutrl.srv.php # from BEHAVIOR kutrlAfterCreateShortUrl in kUtRL/inc/lib.kutrl.srv.php
$core->activityReport->addAction( $core->activityReport->addAction(
'kutrl', 'kutrl',
'create', 'create',
__('Short link creation'), __('Short link creation'),
__('New short link of type "%s" and hash "%s" was created.'), __('New short link of type "%s" and hash "%s" was created.'),
'kutrlAfterCreateShortUrl', 'kutrlAfterCreateShortUrl',
array('kutrlActivityReportBehaviors','kutrlCreate') ['kutrlActivityReportBehaviors', 'kutrlCreate']
); );
class kutrlActivityReportBehaviors class kutrlActivityReportBehaviors
{ {
public static function kutrlCreate($rs) public static function kutrlCreate($rs)
{ {
$logs = array($rs->type,$rs->hash); $logs = [$rs->type,$rs->hash];
$GLOBALS['core']->activityReport->addLog('kutrl','create',$logs); $GLOBALS['core']->activityReport->addLog('kutrl', 'create', $logs);
} }
} }
?>

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

@ -14,301 +14,244 @@
class kutrlLog class kutrlLog
{ {
public $core; public $core;
public $table; public $table;
public $blog; public $blog;
public $con; public $con;
public function __construct($core) public function __construct($core)
{ {
$this->core = $core; $this->core = $core;
$this->table = $core->prefix.'kutrl'; $this->table = $core->prefix . 'kutrl';
$this->blog = $core->con->escape($core->blog->id); $this->blog = $core->con->escape($core->blog->id);
$this->con = $core->con; $this->con = $core->con;
} }
public function nextId() public function nextId()
{ {
return $this->con->select( return $this->con->select(
'SELECT MAX(kut_id) FROM '.$this->table 'SELECT MAX(kut_id) FROM ' . $this->table
)->f(0) + 1; )->f(0) + 1;
} }
public function insert($url,$hash,$type,$service='kutrl') public function insert($url, $hash, $type, $service = 'kutrl')
{ {
$cur = $this->con->openCursor($this->table); $cur = $this->con->openCursor($this->table);
$this->con->writeLock($this->table); $this->con->writeLock($this->table);
try { try {
$cur->kut_id = $this->nextId(); $cur->kut_id = $this->nextId();
$cur->blog_id = $this->blog; $cur->blog_id = $this->blog;
$cur->kut_url = (string) $url; $cur->kut_url = (string) $url;
$cur->kut_hash = (string) $hash; $cur->kut_hash = (string) $hash;
$cur->kut_type = (string) $type; $cur->kut_type = (string) $type;
$cur->kut_service = (string) $service; $cur->kut_service = (string) $service;
$cur->kut_dt = date('Y-m-d H:i:s'); $cur->kut_dt = date('Y-m-d H:i:s');
$cur->kut_counter = 0; $cur->kut_counter = 0;
$cur->insert(); $cur->insert();
$this->con->unlock(); $this->con->unlock();
return array( return [
'id' => $cur->kut_id, 'id' => $cur->kut_id,
'url' => $url, 'url' => $url,
'hash' => $hash, 'hash' => $hash,
'type' => $type, 'type' => $type,
'service' => $service, 'service' => $service,
'counter '=> 0 'counter '=> 0
); ];
} } catch (Exception $e) {
catch (Exception $e) $this->con->unlock();
{ throw $e;
$this->con->unlock(); }
throw $e; return false;
} }
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); //$this->con->writeLock($this->table);
$req = $req =
'SELECT kut_id as id, kut_hash as hash, kut_url as url, '. '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 '. 'kut_type as type, kut_service as service, kut_counter as counter ' .
'FROM '.$this->table.' '. 'FROM ' . $this->table . ' ' .
"WHERE blog_id = '".$this->blog."' ". "WHERE blog_id = '" . $this->blog . "' " .
"AND kut_service = '".$this->con->escape($service)."' "; "AND kut_service = '" . $this->con->escape($service) . "' ";
if (null !== $url) if (null !== $url) {
$req .= "AND kut_url = '".$this->con->escape($url)."' "; $req .= "AND kut_url = '" . $this->con->escape($url) . "' ";
}
if (null !== $hash) {
$req .= "AND kut_hash = '" . $this->con->escape($hash) . "' ";
}
if (null !== $type) {
if (is_array($type)) {
$req .= "AND kut_type '" . $this->con->in($type) ."' ";
} else {
$req .= "AND kut_type = '" . $this->con->escape($type) . "' ";
}
}
if (null !== $hash) $req .= 'ORDER BY kut_dt DESC ' . $this->con->limit(1);
$req .= "AND kut_hash = '".$this->con->escape($hash)."' ";
if (null !== $type) { $rs = $this->con->select($req);
if (is_array($type)) { //$this->con->unlock();
$req .= "AND kut_type '".$this->con->in($type)."' ";
}
else {
$req .= "AND kut_type = '".$this->con->escape($type)."' ";
}
}
$req .= 'ORDER BY kut_dt DESC '.$this->con->limit(1); return $rs->isEmpty() ? false : $rs;
}
$rs = $this->con->select($req); public function clear($id)
//$this->con->unlock(); {
$id = (integer) $id;
return $rs->isEmpty() ? false : $rs; $cur = $this->con->openCursor($this->table);
} $this->con->writeLock($this->table);
public function clear($id)
{
$id = (integer) $id;
$cur = $this->con->openCursor($this->table);
$this->con->writeLock($this->table);
try
{
$cur->kut_url = '';
$cur->kut_dt = date('Y-m-d H:i:s');
$cur->kut_counter = 0;
$cur->update(
"WHERE blog_id='".$this->blog."' ".
"AND kut_id='".$id."' "
);
$this->con->unlock();
return true;
}
catch (Exception $e)
{
$this->con->unlock();
throw $e;
}
return false;
}
public function delete($id) try {
{ $cur->kut_url = '';
$id = (integer) $id; $cur->kut_dt = date('Y-m-d H:i:s');
$cur->kut_counter = 0;
$cur->update(
"WHERE blog_id='" . $this->blog . "' " .
"AND kut_id='" . $id . "' "
);
$this->con->unlock();
return $this->con->execute( return true;
'DELETE FROM '.$this->table.' '. } catch (Exception $e) {
"WHERE blog_id='".$this->blog."' ". $this->con->unlock();
"AND kut_id='".$id."' " throw $e;
); }
} return false;
}
public function counter($id,$do='get') public function delete($id)
{ {
$id = (integer) $id; $id = (integer) $id;
$rs = $this->con->select( return $this->con->execute(
'SELECT kut_counter '. 'DELETE FROM ' . $this->table . ' ' .
'FROM '.$this->table.' '. "WHERE blog_id='" . $this->blog . "' " .
"WHERE blog_id='".$this->blog."' ". "AND kut_id='" . $id . "' "
"AND kut_id='".$id."' " );
); }
$counter = $rs->isEmpty() ? 0 : $rs->kut_counter; public function counter($id, $do = 'get')
{
$id = (integer) $id;
if ('get' == $do) $rs = $this->con->select(
{ 'SELECT kut_counter ' .
return $counter; 'FROM ' . $this->table . ' ' .
} "WHERE blog_id='" . $this->blog . "' " .
elseif ('up' == $do) "AND kut_id='" . $id . "' "
{ );
$counter += 1;
}
elseif ('reset' == $do)
{
$counter = 0;
}
else
{
return 0;
}
$cur = $this->con->openCursor($this->table); $counter = $rs->isEmpty() ? 0 : $rs->kut_counter;
$this->con->writeLock($this->table);
$cur->kut_counter = (integer) $counter; if ('get' == $do) {
$cur->update( return $counter;
"WHERE blog_id='".$this->blog."' ". } elseif ('up' == $do) {
"AND kut_id='".$id."'" $counter += 1;
); } elseif ('reset' == $do) {
$this->con->unlock(); $counter = 0;
} else {
return 0;
}
return $counter; $cur = $this->con->openCursor($this->table);
} $this->con->writeLock($this->table);
public function getLogs($p,$count_only=false) $cur->kut_counter = (integer) $counter;
{ $cur->update(
if ($count_only) "WHERE blog_id='" . $this->blog . "' " .
{ "AND kut_id='" . $id . "'"
$r = 'SELECT count(S.kut_id) '; );
} $this->con->unlock();
else
{
$content_req = '';
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, '.
$content_req.'S.kut_dt ';
}
$r .= 'FROM '.$this->table.' S '; return $counter;
}
if (!empty($p['from'])) public function getLogs($p, $count_only = false)
{ {
$r .= $p['from'].' '; if ($count_only) {
} $r = 'SELECT count(S.kut_id) ';
$r .= "WHERE S.blog_id = '".$this->blog."' "; } else {
$content_req = '';
if (isset($p['kut_service']))
{ if (!empty($p['columns']) && is_array($p['columns'])) {
$r .= "AND kut_service='".$this->con->escape($p['kut_service'])."' "; $content_req .= implode(', ', $p['columns']) . ', ';
} }
else $r =
{ 'SELECT S.kut_id, S.kut_type, S.kut_hash, S.kut_url, ' .
$r .= "AND kut_service='kutrl' "; $content_req . 'S.kut_dt ';
} }
$r .= 'FROM ' . $this->table . ' S ';
if (isset($p['kut_type'])) if (!empty($p['from'])) {
{ $r .= $p['from'] . ' ';
if (is_array($p['kut_type']) && !empty($p['kut_type'])) }
{ $r .= "WHERE S.blog_id = '" . $this->blog . "' ";
$r .= 'AND kut_type '.$this->con->in($p['kut_type']); if (isset($p['kut_service'])) {
} $r .= "AND kut_service='" . $this->con->escape($p['kut_service']) . "' ";
elseif ($p['kut_type'] != '') } else {
{ $r .= "AND kut_service='kutrl' ";
$r .= "AND kut_type = '".$this->con->escape($p['kut_type'])."' "; }
} if (isset($p['kut_type'])) {
} if (is_array($p['kut_type']) && !empty($p['kut_type']))
{
if (isset($p['kut_id'])) $r .= 'AND kut_type ' . $this->con->in($p['kut_type']);
{ } elseif ($p['kut_type'] != '') {
if (is_array($p['kut_id']) && !empty($p['kut_id'])) $r .= "AND kut_type = '" . $this->con->escape($p['kut_type']) . "' ";
{ }
$r .= 'AND kut_id '.$this->con->in($p['kut_id']); }
} if (isset($p['kut_id'])) {
elseif ($p['kut_id'] != '') if (is_array($p['kut_id']) && !empty($p['kut_id'])) {
{ $r .= 'AND kut_id ' . $this->con->in($p['kut_id']);
$r .= "AND kut_id = '".$this->con->escape($p['kut_id'])."' "; } elseif ($p['kut_id'] != '') {
} $r .= "AND kut_id = '" . $this->con->escape($p['kut_id']) . "' ";
} }
}
if (isset($p['kut_hash'])) if (isset($p['kut_hash'])) {
{ if (is_array($p['kut_hash']) && !empty($p['kut_hash'])) {
if (is_array($p['kut_hash']) && !empty($p['kut_hash'])) $r .= 'AND kut_hash ' . $this->con->in($p['kut_hash']);
{ } elseif ($p['kut_hash'] != '') {
$r .= 'AND kut_hash '.$this->con->in($p['kut_hash']); $r .= "AND kut_hash = '" . $this->con->escape($p['kut_hash']) . "' ";
} }
elseif ($p['kut_hash'] != '') }
{ if (isset($p['kut_url'])) {
$r .= "AND kut_hash = '".$this->con->escape($p['kut_hash'])."' "; if (is_array($p['kut_url']) && !empty($p['kut_url'])) {
} $r .= 'AND kut_url ' . $this->con->in($p['kut_url']);
} } elseif ($p['kut_url'] != '') {
$r .= "AND kut_url = '" . $this->con->escape($p['kut_url']) . "' ";
if (isset($p['kut_url'])) }
{ }
if (is_array($p['kut_url']) && !empty($p['kut_url'])) if (!empty($p['kut_year'])) {
{ $r .=
$r .= 'AND kut_url '.$this->con->in($p['kut_url']); 'AND ' . $this->con->dateFormat('kut_dt', '%Y') . ' = ' .
} "'" . sprintf('%04d', $p['kut_year']) . "' ";
elseif ($p['kut_url'] != '') }
{ if (!empty($p['kut_month'])) {
$r .= "AND kut_url = '".$this->con->escape($p['kut_url'])."' "; $r .=
} 'AND ' . $this->con->dateFormat('kut_dt', '%m') . ' = ' .
} "'" . sprintf('%02d', $p['kut_month']) . "' ";
}
if (!empty($p['kut_year'])) if (!empty($p['kut_day'])) {
{ $r .=
$r .= 'AND ' . $this->con->dateFormat('kut_dt', '%d') . ' = ' .
'AND '.$this->con->dateFormat('kut_dt','%Y').' = '. "'" . sprintf('%02d', $p['kut_day']) . "' ";
"'".sprintf('%04d',$p['kut_year'])."' "; }
} if (!empty($p['sql'])) {
$r .= $p['sql'] . ' ';
if (!empty($p['kut_month'])) }
{ if (!$count_only) {
$r .= $r .= empty($p['order']) ?
'AND '.$this->con->dateFormat('kut_dt','%m').' = '. 'ORDER BY kut_dt DESC ' :
"'".sprintf('%02d',$p['kut_month'])."' "; 'ORDER BY ' . $this->con->escape($p['order']) . ' ';
} }
if (!$count_only && !empty($p['limit'])) {
if (!empty($p['kut_day'])) $r .= $this->con->limit($p['limit']);
{ }
$r .= return $this->con->select($r);
'AND '.$this->con->dateFormat('kut_dt','%d').' = '. }
"'".sprintf('%02d',$p['kut_day'])."' "; }
}
if (!empty($p['sql']))
{
$r .= $p['sql'].' ';
}
if (!$count_only)
{
$r .= empty($p['order']) ?
'ORDER BY kut_dt DESC ' :
'ORDER BY '.$this->con->escape($p['order']).' ';
}
if (!$count_only && !empty($p['limit']))
{
$r .= $this->con->limit($p['limit']);
}
return $this->con->select($r);
}
}
?>

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

@ -14,241 +14,223 @@
# A service class must extends this one # A service class must extends this one
class kutrlService class kutrlService
{ {
public $core; public $core;
public $error; public $error;
public $settings; public $settings;
public $log; public $log;
protected $config = array();
public function __construct($core)
{
$this->core = $core;
$this->settings = $core->blog->settings->kUtRL;
$this->log = new kutrlLog($core);
$this->error = new dcError();
$this->error->setHTMLFormat('%s',"%s\n");
$this->init();
// Force setting
$allow_external_url = $this->settings->kutrl_allow_external_url;
$this->config['$allow_external_url'] = null === $allow_external_url ?
true : $allow_external_url;
$this->config = array_merge(
array(
'id' => 'undefined',
'name' => 'undefined',
'home' => '',
'allow_external_url' => true,
'allow_custom_hash' => false,
'allow_protocols' => array('http://'),
'url_test' => 'http://dotclear.jcdenis.com/go/kUtRL',
'url_api' => '',
'url_base' => '',
'url_min_len' => 0
),
$this->config
);
}
# Magic get for config values
public function __get($k)
{
return isset($this->config[$k]) ? $this->config[$k] : null;
}
# Additionnal actions on child start
protected function init()
{
//
}
# Save settings from admin page protected $config = array();
public function saveSettings()
{
return null;
}
# Settings form for admin page public function __construct($core)
public function settingsForm() {
{ $this->core = $core;
echo $this->settings = $core->blog->settings->kUtRL;
'<p class="form-note">'. $this->log = new kutrlLog($core);
__('There is nothing to configure for this service.'). $this->error = new dcError();
'</p>'; $this->error->setHTMLFormat('%s', "%s\n");
}
# Test if service is well configured $this->init();
public function testService()
{
return null;
}
# Test if an url is valid // Force setting
public function isValidUrl($url) $allow_external_url = $this->settings->kutrl_allow_external_url;
{ $this->config['$allow_external_url'] = null === $allow_external_url ?
return (boolean) filter_var($url,FILTER_VALIDATE_URL); true : $allow_external_url;
}
# Test if an url contents know prefix $this->config = array_merge(
public function isServiceUrl($url) [
{ 'id' => 'undefined',
return strpos($url,$this->url_base) === 0; 'name' => 'undefined',
} 'home' => '',
# Test if an url is long enoutgh 'allow_external_url' => true,
public function isLongerUrl($url) 'allow_custom_hash' => false,
{ 'allow_protocols' => ['http://'],
return ((integer) $this->url_min_len >= $url);
}
# Test if an url protocol (eg: http://) is allowed 'url_test' => 'http://dotclear.jcdenis.com/go/kUtRL',
public function isProtocolUrl($url) 'url_api' => '',
{ 'url_base' => '',
foreach($this->allow_protocols as $protocol) 'url_min_len' => 0
{ ],
if (empty($protocol)) continue; $this->config
);
}
if (strpos($url,$protocol) === 0) return true; # Magic get for config values
} public function __get($k)
return false; {
} return isset($this->config[$k]) ? $this->config[$k] : null;
}
# Test if an url is from current blog # Additionnal actions on child start
public function isBlogUrl($url) protected function init()
{ {
$base = $this->core->blog->url; //
$url = substr($url,0,strlen($base)); }
return $url == $base; # Save settings from admin page
} public function saveSettings()
{
return null;
}
# Test if an url is know # Settings form for admin page
public function isKnowUrl($url) public function settingsForm()
{ {
return $this->log->select($url,null,$this->id,'kutrl'); echo
} '<p class="form-note">' .
__('There is nothing to configure for this service.') .
'</p>';
}
# Test if an custom short url is know # Test if service is well configured
public function isKnowHash($hash) public function testService()
{ {
return $this->log->select(null,$hash,$this->id,'kutrl'); return null;
} }
# Create hash from url # Test if an url is valid
public function hash($url,$hash=null) public function isValidUrl($url)
{ {
$url = trim($this->core->con->escape($url)); return (boolean) filter_var($url, FILTER_VALIDATE_URL);
if ('undefined' === $this->id) }
{
return false;
}
if ($hash && !$this->allow_custom_hash)
{
return false;
}
if ($this->isServiceUrl($url))
{
return false;
}
if (!$this->isLongerUrl($url))
{
return false;
}
if (!$this->allow_external_url && $this->isBlogUrl($url))
{
return false;
}
if ($hash && false !== ($rs = $this->isKnowHash($hash)))
{
return false;
}
if (false === ($rs = $this->isKnowUrl($url)))
{
if (false === ($rs = $this->createHash($url,$hash)))
{
return false;
}
$this->log->insert($rs->url,$rs->hash,$rs->type,'kutrl'); # Test if an url contents know prefix
$this->core->blog->triggerBlog(); public function isServiceUrl($url)
{
return strpos($url, $this->url_base) === 0;
}
# Test if an url is long enoutgh
public function isLongerUrl($url)
{
return ((integer) $this->url_min_len >= $url);
}
# --BEHAVIOR-- kutrlAfterCreateShortUrl # Test if an url protocol (eg: http://) is allowed
$this->core->callBehavior('kutrlAfterCreateShortUrl',$rs); public function isProtocolUrl($url)
{
foreach($this->allow_protocols as $protocol) {
if (empty($protocol)) {
continue;
}
if (strpos($url,$protocol) === 0) {
return true;
}
}
return false;
}
# Test if an url is from current blog
public function isBlogUrl($url)
{
$base = $this->core->blog->url;
$url = substr($url, 0, strlen($base));
} return $url == $base;
return $rs; }
}
# Create a hash for a given url (and its custom hash) # Test if an url is know
public function createHash($url,$hash=null) public function isKnowUrl($url)
{ {
return false; return $this->log->select($url, null, $this->id, 'kutrl');
} }
# Remove an url from list of know urls # Test if an custom short url is know
public function remove($url) public function isKnowHash($hash)
{ {
if (!($rs = $this->isKnowUrl($url))) return false; return $this->log->select(null, $hash, $this->id, 'kutrl');
echo 'la'; }
$this->deleteUrl($url);
$this->log->delete($rs->id);
return true;
}
# Delete url on service (second argument really delete urls) # Create hash from url
public function deleteUrl($url,$delete=false) public function hash($url, $hash = null)
{ {
return null; $url = trim($this->core->con->escape($url));
} if ('undefined' === $this->id) {
return false;
}
if ($hash && !$this->allow_custom_hash) {
return false;
}
if ($this->isServiceUrl($url)) {
return false;
}
if (!$this->isLongerUrl($url)) {
return false;
}
if (!$this->allow_external_url && $this->isBlogUrl($url)) {
return false;
}
if ($hash && false !== ($rs = $this->isKnowHash($hash))) {
return false;
}
if (false === ($rs = $this->isKnowUrl($url))) {
if (false === ($rs = $this->createHash($url, $hash))) {
return false;
}
# Retrieve long url from hash $this->log->insert($rs->url, $rs->hash, $rs->type, 'kutrl');
public function getUrl($hash) $this->core->blog->triggerBlog();
{
return false;
}
# Post request # --BEHAVIOR-- kutrlAfterCreateShortUrl
public static function post($server,$data,$verbose=true,$get=false,$headers=array()) $this->core->callBehavior('kutrlAfterCreateShortUrl', $rs);
{
$url = (string) $server;
$client = netHttp::initClient($url,$url);
$client->setUserAgent('kUtRL - http://kutrl.fr');
$client->setPersistReferers(false);
if (is_array($headers) && !empty($headers)) }
{ return $rs;
foreach($headers as $header) }
{
$client->setMoreHeader($header);
}
}
if ($get)
{
$client->get($url,$data);
}
else
{
$client->post($url,$data);
}
if (!$verbose && $client->getStatus() != 200) # Create a hash for a given url (and its custom hash)
{ public function createHash($url, $hash = null)
return false; {
} return false;
}
if ($verbose) # Remove an url from list of know urls
{ public function remove($url)
return $client->getContent(); {
} if (!($rs = $this->isKnowUrl($url))) {
return true; return false;
} }
} $this->deleteUrl($url);
?> $this->log->delete($rs->id);
return true;
}
# Delete url on service (second argument really delete urls)
public function deleteUrl($url, $delete = false)
{
return null;
}
# Retrieve long url from hash
public function getUrl($hash)
{
return false;
}
# Post request
public static function post($server, $data, $verbose = true, $get = false, $headers = [])
{
$url = (string) $server;
$client = netHttp::initClient($url, $url);
$client->setUserAgent('kUtRL - http://kutrl.fr');
$client->setPersistReferers(false);
if (is_array($headers) && !empty($headers)) {
foreach($headers as $header) {
$client->setMoreHeader($header);
}
}
if ($get) {
$client->get($url, $data);
} else {
$client->post($url, $data);
}
if (!$verbose && $client->getStatus() != 200) {
return false;
}
if ($verbose) {
return $client->getContent();
}
return true;
}
}

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

@ -12,69 +12,66 @@
# This file contents class to shorten url pass through wiki # This file contents class to shorten url pass through wiki
if (!defined('DC_RC_PATH')){return;} if (!defined('DC_RC_PATH')) {
return null;
}
class kutrlWiki class kutrlWiki
{ {
public static function coreInitWiki($wiki2xhtml) public static function coreInitWiki($wiki2xhtml)
{ {
global $core; global $core;
$s = $core->blog->settings->kUtRL; $s = $core->blog->settings->kUtRL;
# Do nothing on comment preview and post preview # Do nothing on comment preview and post preview
if (!empty($_POST['preview']) if (!empty($_POST['preview'])
|| !empty($GLOBALS['_ctx']) && $GLOBALS['_ctx']->preview || !empty($GLOBALS['_ctx']) && $GLOBALS['_ctx']->preview
|| !$s->kutrl_active) return; || !$s->kutrl_active) {
return null;
if (null === ($kut = kutrl::quickPlace('wiki'))) return; }
if (null === ($kut = kutrl::quickPlace('wiki'))) {
foreach($kut->allow_protocols as $protocol) return null;
{ }
$wiki2xhtml->registerFunction( foreach($kut->allow_protocols as $protocol) {
'url:'.$protocol, $wiki2xhtml->registerFunction(
array('kutrlWiki','transform') 'url:' . $protocol,
); ['kutrlWiki', 'transform']
} );
} }
}
public static function transform($url,$content)
{
global $core;
$s = $core->blog->settings->kUtRL;
if (!$s->kutrl_active) return;
if (null === ($kut = kutrl::quickPlace('wiki'))) return array();
# Test if long url exists
$is_new = false;
$rs = $kut->isKnowUrl($url);
if (!$rs)
{
$is_new = true;
$rs = $kut->hash($url);
}
if (!$rs) public static function transform($url, $content)
{ {
return array(); global $core;
} $s = $core->blog->settings->kUtRL;
else
{ if (!$s->kutrl_active) {
$res = array(); return null;
$testurl = strlen($rs->url) > 35 ? substr($rs->url,0,35).'...' : $rs->url; }
$res['url'] = $kut->url_base.$rs->hash; if (null === ($kut = kutrl::quickPlace('wiki'))) {
$res['title'] = sprintf(__('%s (Shorten with %s)'),$rs->url,__($kut->name)); return [];
if ($testurl == $content) $res['content'] = $res['url']; }
# Test if long url exists
# ex: Send new url to messengers $is_new = false;
if (!empty($rs)) $rs = $kut->isKnowUrl($url);
{ if (!$rs) {
$core->callBehavior('wikiAfterKutrlCreate',$core,$rs,__('New short URL')); $is_new = true;
} $rs = $kut->hash($url);
}
return $res; 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'];
# ex: Send new url to messengers
if (!empty($rs)) {
$core->callBehavior('wikiAfterKutrlCreate', $core, $rs, __('New short URL'));
}
return $res;
}
}
}