You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
449 lines
15 KiB
449 lines
15 KiB
<?php
|
|
|
|
// (c) Copyright by authors of the Tiki Wiki CMS Groupware Project
|
|
//
|
|
// All Rights Reserved. See copyright.txt for details and a complete list of authors.
|
|
// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See license.txt for details.
|
|
// $Id$
|
|
|
|
/**
|
|
* @group unit
|
|
*
|
|
*/
|
|
class EditLib_ParseToWysiwyg_LinkTest extends TikiTestCase
|
|
{
|
|
private $el; // the EditLib
|
|
private $ext1 = 'test_ext1'; // name of the external Wiki 1
|
|
|
|
|
|
public function __construct()
|
|
{
|
|
$this->setPageRegex();
|
|
parent::__construct();
|
|
}
|
|
|
|
|
|
protected function setUp(): void
|
|
{
|
|
$_SERVER['HTTP_HOST'] = ''; // editlib expects that HTTP_HOST is defined
|
|
$_SERVER['SERVER_NAME'] = 'myserver'; // the ParserLib expects the servername to be set
|
|
|
|
global $prefs;
|
|
$prefs['feature_sefurl'] = 'n'; // default
|
|
|
|
$this->el = TikiLib::lib('edit');
|
|
}
|
|
|
|
|
|
/**
|
|
* remove the external Wikis defined in the tests
|
|
*/
|
|
protected function tearDown(): void
|
|
{
|
|
$tikilib = TikiLib::lib('tiki');
|
|
|
|
$query = 'SELECT `name`, `extwikiId` FROM `tiki_extwiki`';
|
|
$wikis = $tikilib->fetchMap($query);
|
|
$tmp_wikis = [$this->ext1];
|
|
|
|
foreach ($tmp_wikis as $w) {
|
|
if (isset($wikis[$w])) {
|
|
$id = $wikis[$w];
|
|
$tikilib::lib('admin')->remove_extwiki($id);
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/**
|
|
* Test links to pages of an external Wiki
|
|
*
|
|
* This test is used to detect changes in the parser. Here, the EditLib is not used.
|
|
*
|
|
* Note: Links with an invalid wiki identifier are parsed as regular Wiki page links.
|
|
*/
|
|
public function testExternalWiki(): void
|
|
{
|
|
|
|
/*
|
|
* setup the external wikis and the parser
|
|
*/
|
|
$tikilib = TikiLib::lib('tiki');
|
|
$tikilib::lib('admin')->replace_extwiki(0, 'http://tikiwiki.org/tiki-index.php?page=$page', $this->ext1);
|
|
$p = $tikilib::lib('parser');
|
|
|
|
|
|
/*
|
|
* External Wiki
|
|
* - page name
|
|
*/
|
|
$inData = "(($this->ext1:Download))";
|
|
$ex = '<a href="http://tikiwiki.org/tiki-index.php?page=Download" class="wiki ext_page test_ext1">Download</a>';
|
|
$out = trim($p->parse_data($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* External Wiki
|
|
* - page name
|
|
* - anchor
|
|
*/
|
|
$inData = "(($this->ext1:Download|#LTS_-_the_Long_Term_Support_release))";
|
|
$ex = '<a href="http://tikiwiki.org/tiki-index.php?page=Download#LTS_-_the_Long_Term_Support_release" class="wiki ext_page test_ext1">Download</a>';
|
|
$out = trim($p->parse_data($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* External Wiki
|
|
* - page name
|
|
* - anchor
|
|
* - description
|
|
*/
|
|
$inData = "(($this->ext1:Download|#LTS_-_the_Long_Term_Support_release|Download LTS))";
|
|
$ex = '<a href="http://tikiwiki.org/tiki-index.php?page=Download#LTS_-_the_Long_Term_Support_release" class="wiki ext_page test_ext1">Download LTS</a>';
|
|
$out = trim($p->parse_data($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
}
|
|
|
|
|
|
/**
|
|
* Test link to anchor within a page
|
|
*/
|
|
public function testInPage(): void
|
|
{
|
|
|
|
/*
|
|
* with description
|
|
*/
|
|
$inData = '[#A_Heading|Link to heading]';
|
|
$ex = '<a class="wiki" href="#A_Heading" rel="">Link to heading</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$out = preg_replace('/ {2}/', ' ', $out); // the parser writes to many spaces
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* no description
|
|
*/
|
|
$inData = '[#A_Heading]';
|
|
$ex = '<a class="wiki" href="#A_Heading" rel="">#A_Heading</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$out = preg_replace('/ {2}/', ' ', $out); // the parser writes to many spaces
|
|
$this->assertStringContainsString($ex, $out);
|
|
}
|
|
|
|
|
|
/**
|
|
* Test link for creating e-mail
|
|
*/
|
|
public function testMailTo(): void
|
|
{
|
|
|
|
/*
|
|
* e-mail
|
|
*/
|
|
$inData = '[mailto:sombody@nowhere.xyz]';
|
|
$ex = '<a class="wiki" href="mailto:sombody@nowhere.xyz" rel="">mailto:sombody@nowhere.xyz</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* e-mail with description
|
|
*/
|
|
$inData = '[mailto:sombody@nowhere.xyz|Mail to "Somebody"]';
|
|
$ex = '<a class="wiki" href="mailto:sombody@nowhere.xyz" rel="">Mail to "Somebody"</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
}
|
|
|
|
|
|
/**
|
|
* Test links to articles, blogs, ...
|
|
*/
|
|
public function testOtherTikiPages(): void
|
|
{
|
|
|
|
/*
|
|
* article
|
|
*/
|
|
$inData = '[article1]';
|
|
$ex = '<a class="wiki" href="article1" rel="">article1</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
$inData = '[article1|An Article]';
|
|
$ex = '<a class="wiki" href="article1" rel="">An Article</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* blog
|
|
*/
|
|
$inData = '[blog1]';
|
|
$ex = '<a class="wiki" href="blog1" rel="">blog1</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
$inData = '[blog1|A Blog]';
|
|
$ex = '<a class="wiki" href="blog1" rel="">A Blog</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* forum
|
|
*/
|
|
$inData = '[forum1]';
|
|
$ex = '<a class="wiki" href="forum1" rel="">forum1</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
$inData = '[forum1|A Forum]';
|
|
$ex = '<a class="wiki" href="forum1" rel="">A Forum</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
}
|
|
|
|
|
|
/**
|
|
* Test links to web pages
|
|
*
|
|
*/
|
|
public function testWebResource(): void
|
|
{
|
|
|
|
/* $this->markTestSkipped(
|
|
"As of 2013-10-02, this test is broken, and nobody knows how to fix it. Mark as Skipped for now."
|
|
);*/
|
|
|
|
/*
|
|
* Web Page:
|
|
* - link
|
|
*/
|
|
$inData = '[http://www.tiki.org]';
|
|
$ex = '<a class="wiki external" target="_blank" href="http://www.tiki.org" rel="external">http://www.tiki.org</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Web Page:
|
|
* - link
|
|
* - description
|
|
*/
|
|
$inData = '[http://www.tiki.org|Tiki Wiki CMS Groupware]';
|
|
$ex = '<a class="wiki external" target="_blank" href="http://www.tiki.org" rel="external">Tiki Wiki CMS Groupware</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Web Page:
|
|
* - link
|
|
* - description
|
|
* - anchor
|
|
*/
|
|
$inData = '[http://www.tiki.org#Tiki_News_|News of the Tiki Wiki CMS Groupware]';
|
|
$ex = '<a class="wiki external" target="_blank" href="http://www.tiki.org#Tiki_News_" rel="external">News of the Tiki Wiki CMS Groupware</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Web Page:
|
|
* - link
|
|
* - description
|
|
* - anchor
|
|
* - box
|
|
*/
|
|
$inData
|
|
= '[http://www.tiki.org#Tiki_News_|News of the Tiki Wiki CMS Groupware|box]';
|
|
$ex = '<a class="wiki external" target="_blank" href="http://www.tiki.org#Tiki_News_" rel="external" data-box="box">News of the Tiki Wiki CMS Groupware</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Link to video
|
|
* - link
|
|
*
|
|
*/
|
|
$inData = '[http://www.youtube.com/v/KBewVCducWw&autoplay=1|nocache]';
|
|
$ex = '<a class="wiki external" target="_blank" href="http://www.youtube.com/v/KBewVCducWw&autoplay=1" rel="external">http://www.youtube.com/v/KBewVCducWw&autoplay=1</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Link to video
|
|
* - link
|
|
* - description
|
|
*/
|
|
$inData
|
|
= '[http://www.youtube.com/v/KBewVCducWw&autoplay=1|You Tube video in their flash player|nocache]';
|
|
$ex
|
|
= '<a class="wiki external" target="_blank" href="http://www.youtube.com/v/KBewVCducWw&autoplay=1" rel="external">You Tube video in their flash player</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Link to video
|
|
* - link
|
|
* - description
|
|
* - box
|
|
*/
|
|
$inData
|
|
= '[http://www.youtube.com/v/KBewVCducWw&autoplay=1|You Tube video in their flash player|box]'; // additional nocache does not work
|
|
$ex
|
|
= '<a class="wiki external" target="_blank" href="http://www.youtube.com/v/KBewVCducWw&autoplay=1" rel="external" data-box="box">You Tube video in their flash player</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
}
|
|
|
|
|
|
/**
|
|
* Test links to internal wiki pages
|
|
*
|
|
* @group marked-as-skipped
|
|
*/
|
|
public function testWikiPage(): void
|
|
{
|
|
|
|
$tikilib = TikiLib::lib('tiki');
|
|
|
|
$this->markTestSkipped(
|
|
"As of 2013-10-02, this test is broken, and nobody knows how to fix it. Mark as Skipped for now."
|
|
);
|
|
|
|
$homePage = 'HomePage';
|
|
$noPage = 'Page does not exist not exist';
|
|
|
|
/*
|
|
* - existing page
|
|
*/
|
|
$inData = "(($homePage))";
|
|
$ex = '<a href="tiki-index.php?page=HomePage" title="HomePage" class="wiki wiki_page">HomePage</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* - existing page
|
|
* - description
|
|
*/
|
|
$inData = "(($homePage|The Home Page))";
|
|
$ex = '<a href="tiki-index.php?page=HomePage" title="HomePage" class="wiki wiki_page">The Home Page</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* - existing name
|
|
* - link to an anchor
|
|
* - description
|
|
*/
|
|
$inData = "(($homePage|#Get_Started_using_Admin_Panel|Home Page, Heading \"Admin Panel\"))";
|
|
$ex = '<a href="tiki-index.php?page=HomePage#Get_Started_using_Admin_Panel" title="HomePage" class="wiki wiki_page">Home Page, Heading "Admin Panel"</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Default behavior -> class="wiki wikinew"
|
|
*
|
|
* - inexistent page
|
|
*/
|
|
$inData = "(($noPage))";
|
|
$ex = 'Page does not exist not exist<a href="tiki-editpage.php?page=Page+does+not+exist+not+exist" title="Create page: Page does not exist not exist" class="wiki wikinew">?</a>';
|
|
$out = trim($tikilib::lib('parser')->parse_Data($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
/*
|
|
* Default behavior -> class="wiki wikinew"
|
|
*
|
|
* - inexistent page
|
|
* - description
|
|
*/
|
|
$inData = "(($noPage|Page does not exist))";
|
|
$ex = 'Page does not exist<a href="tiki-editpage.php?page=Page+does+not+exist+not+exist" title="Create page: Page does not exist not exist" class="wiki wikinew">?</a>';
|
|
$out = trim($tikilib::lib('parser')->parse_Data($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Default behavior -> class="wiki wikinew"
|
|
*
|
|
* - inexistent page
|
|
* - link to an anchor
|
|
* - description
|
|
*/
|
|
$inData = "(($noPage|#anchor|Page does not exist))";
|
|
$ex = 'Page does not exist<a href="tiki-editpage.php?page=Page+does+not+exist+not+exist" title="Create page: Page does not exist not exist" class="wiki wikinew">?</a>';
|
|
$out = trim($tikilib::lib('parser')->parse_Data($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* CKE behavior -> class="wiki page"
|
|
* - inexistent page
|
|
*/
|
|
$inData = "(($noPage))";
|
|
$ex = '<a href="tiki-index.php?page=Page+does+not+exist+not+exist" title="Page does not exist not exist" class="wiki wiki_page">Page does not exist not exist</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* CKE behavior -> class="wiki page"
|
|
*
|
|
* - inexistent page
|
|
* - description
|
|
*/
|
|
$inData = "(($noPage|Page does not exist))";
|
|
$ex = '<a href="tiki-index.php?page=Page+does+not+exist+not+exist" title="Page does not exist not exist" class="wiki wiki_page">Page does not exist</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* CKE behavior -> class="wiki page"
|
|
*
|
|
* - inexistent page
|
|
* - link to an anchor
|
|
* - description
|
|
*/
|
|
$inData = "(($noPage|#anchor|Page does not exist))";
|
|
$ex = '<a href="tiki-index.php?page=Page+does+not+exist+not+exist#anchor" title="Page does not exist not exist" class="wiki wiki_page">Page does not exist</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
|
|
|
|
/*
|
|
* Internation characters
|
|
*/
|
|
$inData = "((äöü€ Page))";
|
|
$ex = '<a href="tiki-index.php?page=%C3%A4%C3%B6%C3%BC%E2%82%AC+Page" title="äöü€ Page" class="wiki wiki_page">äöü€ Page</a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertStringContainsString($ex, $out);
|
|
}
|
|
|
|
|
|
/**
|
|
* Test anchors generated by {ANAME}
|
|
*
|
|
* @group marked-as-incomplete
|
|
*/
|
|
public function testPluginAname(): void
|
|
{
|
|
$this->markTestIncomplete('Work in progress.');
|
|
|
|
$inData = "{ANAME()}anchor{ANAME}";
|
|
$ex = '<a id="anchor"></a>';
|
|
$out = trim($this->el->parseToWysiwyg($inData));
|
|
$this->assertEquals($ex, $out);
|
|
}
|
|
}
|