Alex Schroeder 567ea8e0a8 Fix rollback-hang tests 1 yıl önce
..
feeds 0db6f8e731 Moved ln.txt to the testing feeds 9 yıl önce
README 57ab7ad761 Note that sometimes it is necessary to run InitVariables after 15 yıl önce
aggregate.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
all.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
ampersand.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
anchors.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
askpage.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
atom.t c0a6bfebf2 Add language to body element and various divs 5 yıl önce
ban-contributors.t f7b23d854f ban-contributors: test Net::IP use 3 yıl önce
ban-mixed-scripts.t e4c84d9b3a ban-mixed-scripts 6 yıl önce
ban-quick-editors.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
ban.t d669f783bb t/ban: test for homepage field 6 yıl önce
banned-regexps.t 836f3abecb Fixed bug in banned-regexps 6 yıl önce
bbcode.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
big-brother.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
cache.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
calendar.t bb11bdf789 Updated the tests for HTML5 4 yıl önce
checkbox.t 655d3b47c6 checkbox.t: new tests for checkbox.pl 6 yıl önce
clusters.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
comments.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
config-page.t bb11bdf789 Updated the tests for HTML5 4 yıl önce
conflict.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
contributors.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
cookie.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
creationdate.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
creole.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
creoleaddition.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
crossbar.t c0a6bfebf2 Add language to body element and various divs 5 yıl önce
crumbs.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
css.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
default-links.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
default-markup.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
definition-lists.t 4211d6aa03 definition-lists: new 5 yıl önce
despam.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
diff.t a5f5607667 Format the summaries of changes in a diff 6 yıl önce
dotfiles.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
download.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
drafts.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
duckduckgo-search.t eadeb460f5 Fixed tests 4 yıl önce
dynamic-comments.t bb11bdf789 Updated the tests for HTML5 4 yıl önce
edit-paragraphs.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
edit.t bb11bdf789 Updated the tests for HTML5 4 yıl önce
emailquote.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
enclosure.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
encoding.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
exclamation-mark.t 76b433c1da Perl 5.26 no longer adds . to @INC 7 yıl önce
fieldlist.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
find.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
fix-encoding.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
footer.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
gemini-server.t 72ae1bf56f gemini-server: fix month in Atom date 4 yıl önce
git.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
google-custom-search.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
google-plus-one.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
google-search.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
gopher-server.t 79c0a9fd02 gopher-server: fix test 5 yıl önce
gotobar.t 32fa6057c7 gotobar: support $$id in the GotoBar page 6 yıl önce
gravatar.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
grep-filtered.t acff0cb69f Add tests for grep-filtered 4 yıl önce
headers.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
history.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
hr.t c0a6bfebf2 Add language to body element and various divs 5 yıl önce
htmlcomment.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
image.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
include.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
index.t 65cfd93de9 Fix @IndexOptions 5 yıl önce
irc.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
journal-rss.t 4b1063c699 journal-rss: add one more test 3 yıl önce
journal.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
journal2.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
journal3.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
languages.t c0a6bfebf2 Add language to body element and various divs 5 yıl önce
like.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
link-all.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
links.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
listlocked.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
load-lang.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
localnames.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
lock-expiration.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
lock-on-creation.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
lock.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
logbannedcontent.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
macros.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
mail.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
maintain.t 1a898ee589 wiki: anonymize rc.log entries even if they are not moved 6 yıl önce
major.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
markdown-converter.t 9ae728bf13 markdown-convert: fix another hungry regexp 6 yıl önce
markdown-rule.t f73d420957 markdown-rule: be more lenient 1 yıl önce
markup-and-creole.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
markup.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
merge.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
meta-data.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
meta.t 7ecd7b784e t: updated copyright years 5 yıl önce
moin.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
mojolicious-namespaces.t 7ecd7b784e t: updated copyright years 5 yıl önce
mojolicious.t 7ecd7b784e t: updated copyright years 5 yıl önce
multi-url-spam-block.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
namespaces-2.2.6.pl 68e71cc535 upgrade.t: fixed old namespaces problem 10 yıl önce
namespaces.t e201c77696 namespaces: share BannedContent and BannedHosts 3 yıl önce
near-links.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
new.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
oddmuse-2.2.6.pl 0ba76bafb2 oddmuse-2.2.6.pl: use $q->end_form 9 yıl önce
org-mode.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
page-trail.t bb11bdf789 Updated the tests for HTML5 4 yıl önce
pagenames.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
password.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
permanent-anchors.t 8194d6bb81 permanent-anchors: fixed page deletion 6 yıl önce
pingback-server.t 6d37baabd9 Add pingback-server tests 5 yıl önce
portrait-support.t c0a6bfebf2 Add language to body element and various divs 5 yıl önce
preview.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
private-pages.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
private-wiki.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
pygmentize.t 2b6f2dfa0c pygmentize: add a test 4 yıl önce
questionasker.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
questionmark.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
raw.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
rc-pagination.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
rc.t eadeb460f5 Fixed tests 4 yıl önce
recaptcha.t 5941fcd7e6 recaptcha: fix tests 5 yıl önce
redirection.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
referrer-tracking.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
rename-pages.t 771b07e661 rename-pages: new 5 yıl önce
revisions.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
rollback-extras.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
rollback-hang.t 567ea8e0a8 Fix rollback-hang tests 1 yıl önce
rollback.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
rss.t bb11bdf789 Updated the tests for HTML5 4 yıl önce
search-inclusion.t 7bb1ca239b search-inclusion: new test and fix 6 yıl önce
search-tag.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
search.t 7bb1ca239b search-inclusion: new test and fix 6 yıl önce
searchtags.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
security.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
server.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
setext.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
setup.pl 6372907c4b Parallelize tests 9 yıl önce
sidebar.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
simple-rules.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
sitemap.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
sort.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
static-copy.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
subscriberc.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
summary.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
surge-protection.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
tables-long.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
tables.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
tags.t 7ecd7b784e t: updated copyright years 5 yıl önce
test.pl 18c4071da8 t/test: handle spaces in PERLBREW_PATH 3 yıl önce
tex.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
toc.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
translation-links.t dc9131e600 Fix translation-link.t 1 yıl önce
translations.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
upgrade-files.t 90e92c27b8 Perl 5.26 no longer adds . to @INC 7 yıl önce
upgrade.t 76b433c1da Perl 5.26 no longer adds . to @INC 7 yıl önce
upload.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
usemod-1.0.4.pl 72cd669bf0 Changed nearly remaining code from GPLv2 to GPLv3 8 yıl önce
usemod-options.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
usemod.t b5a4af9656 usemod: fix tables and ''''' 7 yıl önce
webdav.t 7ecd7b784e t: updated copyright years 5 yıl önce
weblog-3.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce
webmention.t 828482f439 webmention: various updates 4 yıl önce
xss.t b116a0103e Perl 5.26 no longer adds . to @INC 7 yıl önce

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.