2 rcs_id('$Id: BackLinks.php,v 1.15 2002-01-30 18:27:13 carstenklapp Exp $');
6 require_once('lib/PageList.php');
8 class WikiPlugin_BackLinks
12 return _("BackLinks");
15 function getDescription () {
16 return sprintf(_("Get BackLinks for %s"),'[pagename]');
19 function getDefaultArguments() {
20 return array('exclude' => '',
23 'pagename' => '[pagename]',
27 // info arg allows multiple columns info=mtime,hits,summary,version,author,locked,minor
28 // exclude arg allows multiple pagenames exclude=HomePage,RecentChanges
30 function run($dbi, $argstr, $request) {
31 $this->_args = $this->getArgs($argstr, $request);
32 extract($this->_args);
36 $p = $dbi->getPage($pagename);
37 $backlinks = $p->getLinks();
39 $pagelist = new PageList;
42 foreach (explode(",", $info) as $col)
43 $pagelist->insertColumn($col);
46 foreach (explode(",", $exclude) as $excludepage)
47 $pagelist->excludePageName($excludepage);
49 $pagelist->excludePageName($pagename);
51 while ($backlink = $backlinks->next()) {
52 $pagelist->addPage($backlink);
56 $pagelink = LinkWikiWord($pagename);
58 if ($pagelist->isEmpty())
59 return HTML::p(fmt("No pages link to %s.", $pagelink));
61 if ($pagelist->getTotal() == 1)
62 $pagelist->setCaption(fmt("1 page links to %s:",
65 $pagelist->setCaption(fmt("%s pages link to %s:",
66 $pagelist->getTotal(), $pagelink));
68 $pagelist->setMessageIfEmpty('');
80 // c-hanging-comment-ender-p: nil
81 // indent-tabs-mode: nil