Alex Schroeder 7b40e6804a common-mark: down to 470 failed tests 7 år sedan
..
feeds 09cd299fda Moved ln.txt to the testing feeds 10 år sedan
README c1534ba635 Note that sometimes it is necessary to run InitVariables after 16 år sedan
aggregate.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
all.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
ampersand.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
anchors.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
askpage.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
atom.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
ban-contributors.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
ban-quick-editors.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
ban.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
banned-regexps.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
bbcode.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
big-brother.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
cache.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
calendar.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
clusters.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
comments.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
common-markdown-spec-0.28.json 7b40e6804a common-mark: down to 470 failed tests 7 år sedan
common-markdown.t 7b40e6804a common-mark: down to 470 failed tests 7 år sedan
config-page.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
conflict.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
contributors.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
cookie.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
creationdate.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
creole.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
creoleaddition.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
crossbar.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
crumbs.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
css.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
default-links.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
default-markup.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
despam.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
diff.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
dotfiles.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
download.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
drafts.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
duckduckgo-search.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
dynamic-comments.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
edit-paragraphs.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
edit.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
emailquote.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
enclosure.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
encoding.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
exclamation-mark.t 6d8cf29730 Perl 5.26 no longer adds . to @INC 7 år sedan
fieldlist.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
find.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
fix-encoding.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
footer.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
git.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
google-custom-search.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
google-plus-one.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
google-search.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
gopher-server.t 3b3a573f5e gopher-server: add support for adding maps 7 år sedan
gotobar.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
gravatar.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
headers.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
history.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
hr.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
htmlcomment.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
image.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
include.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
irc.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
journal-rss.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
journal.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
journal2.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
journal3.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
languages.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
like.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
link-all.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
links.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
listlocked.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
load-lang.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
localnames.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
lock-expiration.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
lock-on-creation.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
lock.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
logbannedcontent.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
macros.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
mail.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
maintain.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
major.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
markdown-rule.t 57f6b5c5e9 markdown-rule: space after list item marker 7 år sedan
markup-and-creole.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
markup.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
merge.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
meta-data.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
meta.t 6d8cf29730 Perl 5.26 no longer adds . to @INC 7 år sedan
moin.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
mojolicious-namespaces.t 4249db3568 Fixed mojolicious-namespaces hack 7 år sedan
mojolicious.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
multi-url-spam-block.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
namespaces-2.2.6.pl 233aeb661a upgrade.t: fixed old namespaces problem 10 år sedan
namespaces.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
near-links.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
new.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
oddmuse-2.2.6.pl 3a8987082f oddmuse-2.2.6.pl: use $q->end_form 9 år sedan
org-mode.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
page-trail.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
pagenames.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
password.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
permanent-anchors.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
portrait-support.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
preview.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
private-pages.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
private-wiki.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
pygmentize.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
questionasker.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
questionmark.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
raw.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
rc-pagination.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
rc.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
recaptcha.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
redirection.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
referrer-tracking.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
revisions.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
rollback-extras.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
rollback.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
rss.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
search-tag.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
search.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
searchtags.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
security.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
server.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
setext.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
setup.pl b9572f7ccf Parallelize tests 9 år sedan
sidebar.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
simple-rules.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
sitemap.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
sort.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
static-copy.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
subscriberc.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
summary.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
surge-protection.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
tables-long.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
tables.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
tags.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
test.pl 7b40e6804a common-mark: down to 470 failed tests 7 år sedan
tex.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
toc.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
translation-links.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
translations.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
upgrade-files.t 9768fa99cd Perl 5.26 no longer adds . to @INC 7 år sedan
upgrade.t 6d8cf29730 Perl 5.26 no longer adds . to @INC 7 år sedan
upload.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
usemod-1.0.4.pl 24377a8cb9 Changed nearly remaining code from GPLv2 to GPLv3 8 år sedan
usemod-options.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
usemod.t c89e9959c5 usemod: fix tables and ''''' 7 år sedan
webdav.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
weblog-3.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan
xss.t 26cad5c94b Perl 5.26 no longer adds . to @INC 7 år sedan

README



Writing Tests
=============

Here's how to write tests.

1. Create a new file in the t directory, called foo.t. Start with
the following lines:

require 't/test.pl';
package OddMuse;
use Test::More tests => $num
clear_pages();

This will load the testing library, make all its functions
available to you, announce that you plan to make $num tests, and
clear all the pages from the test wiki.

The test wiki will be created in /tmp/oddmuse.

2. The wiki is accessed via the command line only. You don't need to
have your code installed on a webserver! Just run the test from
the parent directory:

perl t/foo.t

3. Write $num tests. :)

4. To examine the situation after having run some tests, you can
also call the script from the command line. The only problem is
that the tests use a specific data directory that you need to
provide via an environment variable:

WikiDataDir=test-data perl wiki.pl action=index raw=1

add_module, remove_module, and remove_rule
------------------------------------------

Load a module before you run any tests:

add_module('usemod.pl');

If the module has important setup code, you might have to add the
following:

InitVariables();

The reason is this: If you add a module and the run the script
again, you're fine. But if you run tests that don't invoke another
copy of the script, then the init code will not have run.

Modules and rules need rarely be removed, since every *.t file
starts in a new process. If you then want to run additional tests
without the module you added (in the same *.t file!), then remove
both the module and the rules it added. You'll have to do this
manually, unfortunately.

remove_module('usemod.pl');
remove_rule(\&UsemodRule);



update_page
-----------

$page = update_page($pagename, $content);
update_page($pagename, $content, $summary, $minor, $admin, @rest);

@rest is a list of parameter=value string pairs:

@rest = ('username=joe', 'ns=Moore');

If updating the page resultet in a redirect, the redirect is stored
in the variable $redirect, and you still get the result page
returned.

test_page($redirect, split('\n',<<'EOT'));
banned text
wiki administrator
matched
See .*BannedContent.* for more information
EOT

You can even create pages containing file uploads directly:

$page = update_page('alex pic', "#FILE image/png\niVBORw0KGgoAAAA");


get_page
--------

$page = get_page('action=calendar');
$page = get_page('action=rc all=1 showedit=1');
$page = get_page('action=rc', 'all=1', 'showedit=1');
test_page(get_page('action=all'),
'restricted to administrators');

Return the text of the page. The parameters are the parameters
available to you from the command line when using the CGI library:

keyword1 keyword2 keyword3
keyword1+keyword2+keyword3
name1=value1 name2=value2
name1=value1&name2=value2
"name1='I am a long value'" "name2=two\ words"
/your/path/here?name1=value1&name2=value2



run_tests
---------

Takes a list of alternating input and output strings, applies rules
(and thus @MyRules) to input and compares it to the output. If you
have html attributes in the output you want to test, use
xpath_run_tests, because the order of the attributes is not
guaranteed and varies with CGI library version.

run_tests(q{"Get lost!", they say.},
q{“Get lost!”, they say.});

run_tests(split('\n', <<'EOT'));
input1
output1
input2
output2
EOT

Newline excapes \n in the input and output are translated to real
newlines when running the tests.

run_tests(split('\n',<<'EOT'));
* ''one\n** two
  • one
    • two

EOT



test_page and test_page_negative
--------------------------------

Tests any string for regular expression matches:

test_page($string, $regexp1, $regexp2, ...);
test_page(update_page($pagename, $content), $re1, $re2);

Or make sure that none of the regular expressions match:

test_page_negative($page,
"rollback",
"Rollback",
"EvilPage",
"AnotherEvilPage",
);



xpath_run_tests
---------------

This is the equivalent of run_tests using XPath instead of simple
string comparison. It takes a list of alternating input and xpath
tests, applies rules (and thus @MyRules) to the input and applies
the test to the output.

xpath_run_tests(split('\n',<<'EOT'));
WikiWord
//a[@class="edit"][@title="Click to edit this page"]
This is a [:day for fun and laughter].
//a[@class="anchor"][@name="day_for_fun_and_laughter"]
EOT

XPath is harder to write, but is ideal when the output contains tags
with more than one attribute, since the order of attributes is
undefined. And you don't even have to test for all the attributes.



xpath_test and negative_xpath_test
----------------------------------

The equivalent of test_page, but using xpath instead of exact
matches.


xpath_test(get_page('action=all pwd=foo'),
'//p/a[@href="#HomePage"][text()="HomePage"]',
'//h1/a[@name="foo"][text()="foo"]',
'//a[@class="local"][@href="#bar"][text()="bar"]',
'//h1/a[@name="bar"][text()="bar"]')

And the same thing for negative matches, of course:

negative_xpath_test($page, '//h1/a[not(text())]');


run_macro_tests
---------------

run_macro_tests(split('\n',<<'EOT'));
$input1
$output2
$input2
$output2
EOT

Tests @MyMacros.