XoopsModules25x / mylinks

singlelink.php

<?php
/*
 * You may not change or alter any portion of this comment or credits
 * of supporting developers from this source code or any supporting source code
 * which is considered copyrighted (c) material of the original comment or credit authors.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 */

/**
 * @copyright    {@link https://xoops.org/ XOOPS Project}
 * @license      {@link https://www.gnu.org/licenses/gpl-2.0.html GNU GPL 2 or later}
 * @package
 * @since
 * @author       XOOPS Development Team
 */

use XoopsModules\Mylinks;
use XoopsModules\Mylinks\Providers;
use XoopsModules\Mylinks\Utility;

require_once __DIR__ . '/header.php';

/** @var Mylinks\Helper $helper */
$helper = Mylinks\Helper::getInstance();
$myts   = \MyTextSanitizer::getInstance(); // MyTextSanitizer object

require_once XOOPS_ROOT_PATH . '/class/tree.php';
$categoryHandler = $helper->getHandler('Category');
$catObjs           = $categoryHandler->getAll();
$myCatTree         = new \XoopsObjectTree($catObjs, 'cid', 'pid');

$lid = Mylinks\Utility::cleanVars($_GET, 'lid', 0, 'int', ['min' => 0]);

'lid' of type string is incompatible with the type XoopsModules\Mylinks\unknown_type expected by parameter $key of XoopsModules\Mylinks\Utility::cleanVars().

$cid = Mylinks\Utility::cleanVars($_GET, 'cid', 0, 'int', ['min' => 0]);

$GLOBALS['xoopsOption']['template_main'] = 'mylinks_singlelink.tpl';
require_once XOOPS_ROOT_PATH . '/header.php';

//wanikoo
$xoTheme->addStylesheet('browse.php?' . Utility::getStylePath('mylinks.css', 'include'));
$xoTheme->addScript('browse.php?' . Utility::getStylePath('mylinks.js', 'include'));

$result = $xoopsDB->query('SELECT l.lid, l.cid, l.title, l.url, l.logourl, l.status, l.date, l.hits, l.rating, l.votes, l.comments, t.description FROM ' . $xoopsDB->prefix('mylinks_links') . ' l, ' . $xoopsDB->prefix('mylinks_text') . " t WHERE l.lid={$lid} AND l.lid=t.lid AND status>0");
list($lid, $cid, $ltitle, $url, $logourl, $status, $time, $hits, $rating, $votes, $comments, $description) = $xoopsDB->fetchRow($result);

$thisCatObj     = $categoryHandler->get($cid);
$homePath       = "<a href='" . XOOPSMYLINKURL . "/index.php'>" . _MD_MYLINKS_MAIN . '</a>&nbsp;:&nbsp;';
$niceItemPath   = "<a href='" . XOOPSMYLINKURL . "/viewcat.php?cid={$cid}'>" . $thisCatObj->getVar('title') . '</a>';
$itemPath       = $thisCatObj->getVar('title');
$nicePathFromId = '';
$pathFromId     = '';
$myParent       = $thisCatObj->getVar('pid');
while (0 != $myParent) {
    $ancestorObj    = $myCatTree->getByKey($myParent);
    $nicePathFromId = "<a href='" . XOOPSMYLINKURL . '/viewcat.php?cid=' . $ancestorObj->getVar('cid') . "'>" . $ancestorObj->getVar('title') . "</a>&nbsp;:&nbsp;{$nicePathFromId}";
    $pathFromId     = $ancestorObj->getVar('title') . "/{$pathFromId}";
    $myParent       = $ancestorObj->getVar('pid');
}

$nicePathFromId = "{$homePath}{$nicePathFromId}{$niceItemPath}";
$nicePathFromId = str_replace('&nbsp;:&nbsp;', " <img src='" . Utility::getIconURL('arrow.gif') . "' style='border-width: 0px;' alt=''> ", $nicePathFromId);
$pathFromId     = _MD_MYLINKS_MAIN . "/{$pathFromId}{$itemPath}";
$pathFromId     = str_replace('/', " <img src='" . Utility::getIconURL('arrow.gif') . "' style='border-width: 0px;' alt=''> ", $pathFromId);
$xoopsTpl->assign('category_path', $nicePathFromId);

$xoopsTpl->assign('anontellafriend', $GLOBALS['xoopsModuleConfig']['anontellafriend']);

if ($xoopsUser && $xoopsUser->isAdmin($xoopsModule->mid())) {
    $adminlink = "<a href='" . XOOPSMYLINKURL . "/admin/main.php?op=modLink&amp;lid={$lid}'><img src='" . Utility::getIconURL('edit.png') . "' style='border-width: 0px;' alt='" . _MD_MYLINKS_EDITTHISLINK . "' title='" . _MD_MYLINKS_EDITTHISLINK . "'></a>";
} else {
    $adminlink = '';
}
$votestring = (1 == $votes) ? _MD_MYLINKS_ONEVOTE : sprintf(_MD_MYLINKS_NUMVOTES, $votes);
$new        = Utility::newLinkGraphic($time, $status);
$pop        = Utility::popGraphic($hits);

//$xoopsTpl->assign('link', array('id' => $lid, 'cid' => $cid, 'rating' => number_format($rating, 2), 'title' => $myts->htmlSpecialChars($ltitle).$new.$pop, 'category' => $path, 'logourl' => $myts->htmlSpecialChars($logourl), 'updated' => formatTimestamp($time,"m"), 'description' => $myts->displayTarea($description,0), 'adminlink' => $adminlink, 'hits' => $hits, 'votes' => $votestring, 'comments' => $comments, 'mail_subject' => rawurlencode(sprintf(_MD_MYLINKS_INTRESTLINK,$xoopsConfig['sitename'])), 'mail_body' => rawurlencode(sprintf(_MD_MYLINKS_INTLINKFOUND,$xoopsConfig['sitename']).':  '.XOOPSMYLINKURL.'/singlelink.php?lid='.$lid)));
//by wanikoo
/* setup shot provider information */
$shotImgSrc = $shotImgHref = $shotAttribution = '';
$useShots   = $helper->getConfig('useshots');
if ($useShots) {
    $shotWidth = $helper->getConfig('shotwidth');
    $xoopsTpl->assign(
        [
            'shotwidth'         => $shotWidth . 'px',
            //                            'tablewidth'        => ($shotWidth + 10) . "px",
            'show_screenshot'   => true,
            'lang_noscreenshot' => _MD_MYLINKS_NOSHOTS,
        ]
    );

    $shotProvider = mb_strtolower($helper->getConfig('shotprovider'));
    $shotImgHref  = XOOPS_URL . '/modules/' . $xoopsModule->getVar('dirname') . "/visit.php?cid={$cid}&amp;lid={$lid}";
    $logourl      = trim($logourl);
    if (!empty($logourl)) {
        if (file_exists(XOOPSMYLINKIMGPATH . "/{$mylinks_theme}")) {
            $shotImgSrc = XOOPSMYLINKIMGURL . "/{$mylinks_theme}/shots/" . $myts->htmlSpecialChars($logourl);
        } else {
            $shotImgSrc = XOOPSMYLINKIMGURL . '/shots/' . $myts->htmlSpecialChars($logourl);
        }
    } elseif (_NONE != $shotProvider) {
        if (file_exists(XOOPS_ROOT_PATH . '/modules/' . $xoopsModule->getVar('dirname') . '/class/Providers/' . mb_strtolower($shotProvider) . '.php')) {
            //            require_once XOOPS_ROOT_PATH . '/modules/' . $xoopsModule->getVar('dirname') . '/class/providers/' . mb_strtolower($shotProvider) . '.php';
            $shotClass = ucfirst($xoopsModule->getVar('dirname')) . ucfirst($shotProvider);
            $shotObj   = new $shotClass();
            $shotObj->setProviderPublicKey($helper->getConfig('shotpubkey'));
            $shotObj->setProviderPrivateKey($helper->getConfig('shotprivkey'));
            $shotObj->setShotSize(['width' => $helper->getConfig('shotwidth')]);
            $shotObj->setSiteUrl($myts->htmlSpecialChars($url));
            $shotImgSrc = $shotObj->getProviderUrl();
            if ($helper->getConfig('shotattribution')) {
                $shotAttribution = $shotObj->getAttribution(true);
            } else {
                $shotAttribution = '';
            }
        }
    }
} else {
    $xoopsTpl->assign('show_screenshot', false);
}
$xoopsTpl->assign('shot_attribution', $shotAttribution);
$xoopsTpl->assign(
    'link',
    [
        'url'           => $myts->htmlSpecialChars($url),
        'id'            => $lid,
        'cid'           => $cid,
        'rating'        => number_format($rating, 2),
        'ltitle'        => $myts->htmlSpecialChars($myts->stripSlashesGPC($ltitle)),
        'title'         => $myts->htmlSpecialChars($myts->stripSlashesGPC($ltitle)) . $new . $pop,
        'category'      => $pathFromId,
        'logourl'       => $myts->htmlSpecialChars(trim($logourl)),
        'updated'       => formatTimestamp($time, 'm'),
        'description'   => $myts->displayTarea($myts->stripSlashesGPC($description), 0),
        'adminlink'     => $adminlink,
        'hits'          => $hits,
        'votes'         => $votestring,
        'comments'      => $comments,
        'mail_subject'  => rawurlencode(sprintf(_MD_MYLINKS_INTRESTLINK, $xoopsConfig['sitename'])),
        'mail_body'     => rawurlencode(sprintf(_MD_MYLINKS_INTLINKFOUND, $xoopsConfig['sitename']) . ':  ' . XOOPSMYLINKURL . "/singlelink.php?lid={$lid}"),
        'shot_img_src'  => $shotImgSrc,
        'shot_img_href' => $shotImgHref,
    ]
);

$xoopsTpl->assign(
    [
        'lang_description'  => _MD_MYLINKS_DESCRIPTIONC,
        'lang_lastupdate'   => _MD_MYLINKS_LASTUPDATEC,
        'lang_hits'         => _MD_MYLINKS_HITSC,
        'lang_rating'       => _MD_MYLINKS_RATINGC,
        'lang_ratethissite' => _MD_MYLINKS_RATETHISSITE,
        'lang_reportbroken' => _MD_MYLINKS_REPORTBROKEN,
        'lang_tellafriend'  => _MD_MYLINKS_TELLAFRIEND,
        'lang_modify'       => _MD_MYLINKS_MODIFY,
        'lang_category'     => _MD_MYLINKS_CATEGORYC,
        'lang_visit'        => _MD_MYLINKS_VISIT,
        'lang_comments'     => _COMMENTS,
    ]
);
//wanikoo
/*
if (file_exists(XOOPS_ROOT_PATH."/include/moremetasearch.php")&&$mylinks_show_externalsearch) {
  require_once XOOPS_ROOT_PATH."/include/moremetasearch.php";
  $thisltitle = $myts->htmlSpecialChars($ltitle);
  $_REQUEST['query']= $thisltitle;
  $engineblocktitle = _MD_MYLINKS_EXTERNALSEARCH;
  $engineblocktitle .= sprintf(_MD_MYLINKS_EXTERNALSEARCH_KEYWORD, _MD_MYLINKS_TITLE, $thisltitle);
  $location_list=moremeta("meta_page","on");
  $metaresult = more_meta_page($location_list, $target="_blank", $display = false, $engineblocktitle);
  $xoopsTpl->assign('moremetasearch', "<br><br>".$metaresult);
} else {
  $xoopsTpl->assign('moremetasearch', '');
}
*/
$xoopsTpl->assign('moremetasearch', '');

//wanikoo theme changer
$xoopsTpl->assign('lang_themechanger', _MD_MYLINKS_THEMECHANGER);
$mymylinkstheme_options = '';

foreach ($GLOBALS['mylinks_allowed_theme'] as $mymylinkstheme) {
    $mymylinkstheme_options .= "<option value='{$mymylinkstheme}'";
    if ($mymylinkstheme == $GLOBALS['mylinks_theme']) {
        $mymylinkstheme_options .= ' selected';
    }
    $mymylinkstheme_options .= ">{$mymylinkstheme}</option>";
}

$mylinkstheme_select = "<select name='mylinks_theme_select' onchange='submit();' size='1'>{$mymylinkstheme_options}</select>";

$xoopsTpl->assign('mylinksthemeoption', $mylinkstheme_select);
//wanikoo end

//wanikoo search
if (file_exists(XOOPS_ROOT_PATH . '/language/' . $xoopsConfig['language'] . '/search.php')) {
    require_once XOOPS_ROOT_PATH . '/language/' . $xoopsConfig['language'] . '/search.php';
} else {
    require_once XOOPS_ROOT_PATH . '/language/english/search.php';
}
$xoopsTpl->assign('lang_all', _SR_ALL);
$xoopsTpl->assign('lang_any', _SR_ANY);
$xoopsTpl->assign('lang_exact', _SR_EXACT);
$xoopsTpl->assign('lang_search', _SR_SEARCH);
$xoopsTpl->assign('module_id', $xoopsModule->getVar('mid'));
//
//category head
$catarray = [];
if ($mylinks_show_letters) {
    $catarray['letters'] = Utility::letters();
}
if ($mylinks_show_toolbar) {
    $catarray['toolbar'] = Utility::toolbar();
}
$xoopsTpl->assign('catarray', $catarray);
//pagetitle (module name - singlelink)
$xoopsTpl->assign('xoops_pagetitle', $xoopsModule->getVar('name') . ' - ' . $myts->htmlSpecialChars($myts->stripSlashesGPC($ltitle)));
//category jump box
$catjumpbox = "<form name='catjumpbox' method='get' action='viewcat.php'>\n" . '  <strong>' . _MD_MYLINKS_CATEGORYC . "</strong>&nbsp;\n" . '  ' . $myCatTree->makeSelBox('title', 'title', $cid) . "&nbsp;\n" . "  <input type='submit' value='" . _SUBMIT . "'>\n" . "</form>\n";

The function XoopsObjectTree::makeSelBox() has been deprecated: since 2.5.9, please use makeSelectElement()

$xoopsTpl->assign('mylinksjumpbox', $catjumpbox);

require_once XOOPS_ROOT_PATH . '/include/comment_view.php';
require_once XOOPSMYLINKPATH . '/footer.php';