diff options
Diffstat (limited to 't')
-rwxr-xr-x | t/podcast.t | 56 | ||||
-rw-r--r-- | t/tinypodcast/index.mdwn | 1 | ||||
-rw-r--r-- | t/tinypodcast/piano.mp3 | bin | 0 -> 80991 bytes | |||
-rw-r--r-- | t/tinypodcast/scroll.3gp | bin | 0 -> 21590 bytes | |||
-rw-r--r-- | t/tinypodcast/walter.ogg | bin | 0 -> 28714 bytes |
5 files changed, 57 insertions, 0 deletions
diff --git a/t/podcast.t b/t/podcast.t new file mode 100755 index 000000000..50493aff6 --- /dev/null +++ b/t/podcast.t @@ -0,0 +1,56 @@ +#!/usr/bin/perl +use warnings; +use strict; + +BEGIN { + eval q{use XML::Feed}; + if ($@) { + eval q{use Test::More skip_all => "XML::Feed not available"}; + } + else { + eval q{use Test::More tests => 36}; + } +} + +sub simple_podcast { + my $baseurl = 'http://example.com'; + ok(! system("mkdir t/tmp")); + ok(! system("./ikiwiki.out -plugin inline -url=$baseurl -rss -atom -underlaydir=underlays/basewiki -set underlaydirbase=underlays -templatedir=templates t/tinypodcast t/tmp/out")); + + my %media_types = ( + 'piano.mp3' => 'audio/mpeg', + 'scroll.3gp' => 'video/3gpp', + 'walter.ogg' => 'video/x-theora+ogg', + ); + + for my $format (qw(atom rss)) { + my $feed = XML::Feed->parse("t/tmp/out/index.$format"); + + is($feed->title, 'wiki', qq{$format feed title}); + is($feed->link, "$baseurl/", qq{$format feed link}); + is($feed->description, $feed->title, qq{$format feed description}); + if ('atom' eq $format) { + is($feed->author, $feed->title, qq{$format feed author}); + is($feed->id, "$baseurl/", qq{$format feed id}); + is($feed->generator, "ikiwiki", qq{$format feed generator}); + } + + for my $entry ($feed->entries) { + my $title = $entry->title; + my $url = $entry->id; + my $enclosure = $entry->enclosure; + + is($url, "$baseurl/$title", qq{$format $title id}); + is($entry->link, $url, qq{$format $title link}); + is($enclosure->url, $url, qq{$format $title enclosure url}); + is($enclosure->type, $media_types{$title}, qq{$format $title enclosure type}); + # is($enclosure->length, '12345', qq{$format $title enclosure length}); + # creation date + # modification date + } + } + + ok(! system("rm -rf t/tmp t/tinypodcast/.ikiwiki")); +} + +simple_podcast(); diff --git a/t/tinypodcast/index.mdwn b/t/tinypodcast/index.mdwn new file mode 100644 index 000000000..a5c6c9bd8 --- /dev/null +++ b/t/tinypodcast/index.mdwn @@ -0,0 +1 @@ +[[!inline pages="*.3gp or *.mov or *.mp3 or *.ogg" rss=yes atom=yes]] diff --git a/t/tinypodcast/piano.mp3 b/t/tinypodcast/piano.mp3 Binary files differnew file mode 100644 index 000000000..3d6b6625a --- /dev/null +++ b/t/tinypodcast/piano.mp3 diff --git a/t/tinypodcast/scroll.3gp b/t/tinypodcast/scroll.3gp Binary files differnew file mode 100644 index 000000000..61e69e9da --- /dev/null +++ b/t/tinypodcast/scroll.3gp diff --git a/t/tinypodcast/walter.ogg b/t/tinypodcast/walter.ogg Binary files differnew file mode 100644 index 000000000..3eee48cd6 --- /dev/null +++ b/t/tinypodcast/walter.ogg |