blog->settings->kUtRL; # Default values $p_url = $core->adminurl->get('admin.plugin.kUtRL'); $part = isset($_REQUEST['part']) ? $_REQUEST['part'] : 'links'; $action = isset($_POST['action']) ? $_POST['action'] : ''; # used in setting & links if (in_array($part, ['setting', 'links'])) { $services_combo = []; 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); } # used in setting & service if (in_array($part, ['setting', 'service'])) { $img_green = ''; $img_red = ''; } # setting if ($part == 'setting') { $s_active = (boolean) $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_admin_entry_default = (string) $s->kutrl_admin_entry_default; if (!empty($_POST['save'])) { try { $s_active = !empty($_POST['s_active']); $s_admin_service = (string) $_POST['s_admin_service']; $s_plugin_service = (string) $_POST['s_plugin_service']; $s_tpl_service = (string) $_POST['s_tpl_service']; $s_wiki_service = (string) $_POST['s_wiki_service']; $s_allow_external_url = !empty($_POST['s_allow_external_url']); $s_tpl_passive = !empty($_POST['s_tpl_passive']); $s_tpl_active = !empty($_POST['s_tpl_active']); $s_admin_entry_default = !empty($_POST['s_admin_entry_default']); $s->put('kutrl_active', $s_active); $s->put('kutrl_plugin_service', $s_plugin_service); $s->put('kutrl_admin_service', $s_admin_service); $s->put('kutrl_tpl_service', $s_tpl_service); $s->put('kutrl_wiki_service', $s_wiki_service); $s->put('kutrl_allow_external_url', $s_allow_external_url); $s->put('kutrl_tpl_passive', $s_tpl_passive); $s->put('kutrl_tpl_active', $s_tpl_active); $s->put('kutrl_admin_entry_default', $s_admin_entry_default); $core->blog->triggerBlog(); dcPage::addSuccessNotice( __('Configuration successfully saved') ); http::redirect($p_url . '&part=setting'); } catch (Exception $e) { $core->error->add($e->getMessage()); } } } # services if ($part == 'service' && !empty($_POST['save'])) { try { foreach(kutrl::getServices($core) as $service_id => $service) { $o = new $service($core); $o->saveSettings(); } $core->blog->triggerBlog(); dcPage::addSuccessNotice( __('Configuration successfully saved') ); http::redirect($p_url . '&part=service'); } catch (Exception $e) { $core->error->add($e->getMessage()); } } # link creation if ($part == 'link') { $kut = kutrl::quickPlace('admin'); if (!empty($_POST['save'])) { 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; dcPage::addSuccessNotice(sprintf( __('Short link for %s is %s'), '' . html::escapeHTML($url) . '', '' . $new_url . '' )); } 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; dcPage::addSuccessNotice(sprintf( __('Short link for %s is %s'), '' . html::escapeHTML($url) . '', '' . $new_url . '' )); # 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()); } } } # links if ($part == 'links') { $log = new kutrlLog($core); $kUtRL_filter = new adminGenericFilter($core, 'kUtRL'); $sortby = $kUtRL_filter->getFilter('sortby'); $order = $kUtRL_filter->getFilter('order'); $nb = $kUtRL_filter->getFilter('nb'); $page = !empty($_GET['page']) ? max(1, (integer) $_GET['page']) : 1; $kUtRL_filter->setFilter('page', $page); $kUtRL_filter->setFilter('part', 'links'); $params = []; $params['limit'] = [(($page-1)*$nb), $nb]; $params['order'] = $sortby . ' ' . $order; $urlsrv = !empty($_GET['urlsrv']) ? $_GET['urlsrv'] : ''; if ($urlsrv === '' || !in_array($urlsrv, $lst_services_combo)) { $urlsrv = ''; } $urlsrv = $kUtRL_filter->setFilter([ 'id' => 'urlsrv', 'value' => $urlsrv, 'title' => __('Service:'), 'combo' => $lst_services_combo ]); if ($urlsrv != '') { $params['kut_type'] = $urlsrv; } try { $list_all = $log->getLogs($params); $list_counter = $log->getLogs($params, true)->f(0); $list_current = new kutrlLinksList($core, $list_all, $list_counter); } catch (Exception $e) { $core->error->add($e->getMessage()); } if (!empty($_POST['deletelinks'])) { try { foreach($_POST['entries'] as $id) { $rs = $log->getLogs(['kut_id' => $id]); if ($rs->isEmpty()) { continue; } if (null === ($o = kutrl::quickService($rs->kut_type))) { continue; } $o->remove($rs->kut_url); } $core->blog->triggerBlog(); dcPage::addSuccessNotice( __('Links successfully deleted') ); http::redirect($p_url . '&part=links&urlsrv=' . $urlsrv . '&sortby=' . $sortby . '&order=' . $order . '&nb=' . $nb . '&page=' . $page); } catch (Exception $e) { $core->error->add($e->getMessage()); } } } # display header echo '
' . __('Back to links list') . '
'; } # display service if ($part == 'service') { echo dcPage::breadcrumb( [ __('Links shortener') => '', __('Plugin configuration') => $p_url . '&part=setting', '' . __('Services configuration') . '' => '' ], ['hl' => false] ) . dcPage::notices() . '' . __('Back to links list') . '
' . ''; } # display link creation if ($part == 'link') { echo dcPage::breadcrumb( [ __('Links shortener') => '', __('Links') => $core->adminurl->get('admin.plugin.kUtRL'), '' . __('New link') . '' => '' ], ['hl' => false] ) . dcPage::notices(); if (null === $kut) { echo '' . __('You must set an admin service.') . '
'; } else { echo '' . __('Plugin configuration') . ' - ' . __('Services configuration') . ' - kUtRL - ' . $core->plugins->moduleInfo('kUtRL', 'version') . '
';