changing the tiles location is possible now too
[ikiwiki.git] / t / add_depends.t
1 #!/usr/bin/perl
2 use warnings;
3 use strict;
4 use Test::More tests => 40;
5
6 BEGIN { use_ok("IkiWiki"); }
7 %config=IkiWiki::defaultconfig();
8 $config{srcdir}=$config{destdir}="/dev/null";
9 IkiWiki::checkconfig();
10
11 $pagesources{"foo$_"}="foo$_.mdwn" for 0..9;
12
13 # avoids adding an unparseable pagespec
14 ok(! add_depends("foo0", "foo and (bar"));
15 ok(! add_depends("foo0", "foo another"));
16
17 # simple and not-so-simple dependencies split
18 ok(add_depends("foo0", "*"));
19 ok(add_depends("foo0", "bar"));
20 ok(add_depends("foo0", "BAZ"));
21 ok(exists $IkiWiki::depends_simple{foo0}{"bar"});
22 ok(exists $IkiWiki::depends_simple{foo0}{"baz"}); # lowercase
23 ok(! exists $IkiWiki::depends_simple{foo0}{"*"});
24 ok(! exists $IkiWiki::depends{foo0}{"bar"});
25 ok(! exists $IkiWiki::depends{foo0}{"baz"});
26
27 # default dependencies are content dependencies
28 ok($IkiWiki::depends{foo0}{"*"} & $IkiWiki::DEPEND_CONTENT);
29 ok(! ($IkiWiki::depends{foo0}{"*"} & ($IkiWiki::DEPEND_PRESENCE | $IkiWiki::DEPEND_LINKS)));
30 ok($IkiWiki::depends_simple{foo0}{"bar"} & $IkiWiki::DEPEND_CONTENT);
31 ok(! ($IkiWiki::depends_simple{foo0}{"bar"} & ($IkiWiki::DEPEND_PRESENCE | $IkiWiki::DEPEND_LINKS)));
32
33 # adding other dep types standalone
34 ok(add_depends("foo2", "*", deptype("presence")));
35 ok(add_depends("foo2", "bar", deptype("links")));
36 ok($IkiWiki::depends{foo2}{"*"} & $IkiWiki::DEPEND_PRESENCE);
37 ok(! ($IkiWiki::depends{foo2}{"*"} & ($IkiWiki::DEPEND_CONTENT | $IkiWiki::DEPEND_LINKS)));
38 ok($IkiWiki::depends_simple{foo2}{"bar"} & $IkiWiki::DEPEND_LINKS);
39 ok(! ($IkiWiki::depends_simple{foo2}{"bar"} & ($IkiWiki::DEPEND_PRESENCE | $IkiWiki::DEPEND_CONTENT)));
40
41 # adding combined dep types
42 ok(add_depends("foo2", "baz", deptype("links", "presence")));
43 ok($IkiWiki::depends_simple{foo2}{"baz"} & $IkiWiki::DEPEND_LINKS);
44 ok($IkiWiki::depends_simple{foo2}{"baz"} & $IkiWiki::DEPEND_PRESENCE);
45 ok(! ($IkiWiki::depends_simple{foo2}{"baz"} & $IkiWiki::DEPEND_CONTENT));
46
47 # adding dep types to existing dependencies should merge the flags
48 ok(add_depends("foo2", "baz"));
49 ok($IkiWiki::depends_simple{foo2}{"baz"} & $IkiWiki::DEPEND_LINKS);
50 ok($IkiWiki::depends_simple{foo2}{"baz"} & $IkiWiki::DEPEND_PRESENCE);
51 ok(($IkiWiki::depends_simple{foo2}{"baz"} & $IkiWiki::DEPEND_CONTENT));
52 ok(add_depends("foo2", "bar", deptype("presence"))); # had only links before
53 ok($IkiWiki::depends_simple{foo2}{"bar"} & ($IkiWiki::DEPEND_LINKS | $IkiWiki::DEPEND_PRESENCE));
54 ok(! ($IkiWiki::depends_simple{foo2}{"bar"} & $IkiWiki::DEPEND_CONTENT));
55 ok(add_depends("foo0", "bar", deptype("links"))); # had only content before
56 ok($IkiWiki::depends{foo0}{"*"} & ($IkiWiki::DEPEND_CONTENT | $IkiWiki::DEPEND_LINKS));
57 ok(! ($IkiWiki::depends{foo0}{"*"} & $IkiWiki::DEPEND_PRESENCE));
58
59 # content is the default if unknown types are entered
60 ok(add_depends("foo9", "*", deptype("monkey")));
61 ok($IkiWiki::depends{foo9}{"*"} & $IkiWiki::DEPEND_CONTENT);
62 ok(! ($IkiWiki::depends{foo9}{"*"} & ($IkiWiki::DEPEND_PRESENCE | $IkiWiki::DEPEND_LINKS)));
63
64 # Influences are added for dependencies involving links.
65 $pagesources{"foo"}="foo.mdwn";
66 $links{foo}=[qw{bar}]; 
67 $pagesources{"bar"}="bar.mdwn";
68 $links{bar}=[qw{}];
69 ok(add_depends("foo", "link(bar) and backlink(meep)"));
70 ok($IkiWiki::depends_simple{foo}{foo} == $IkiWiki::DEPEND_LINKS);