X-Git-Url: http://git.vanrenterghem.biz/git.ikiwiki.info.git/blobdiff_plain/46c33b38324e9e71a9126f1aabd5e73e3358b22b..7aaacd17d07e216107ae3ae5f71e4b7d0a19c8a9:/IkiWiki/Render.pm diff --git a/IkiWiki/Render.pm b/IkiWiki/Render.pm index f38669728..2c1ea3eb7 100644 --- a/IkiWiki/Render.pm +++ b/IkiWiki/Render.pm @@ -20,19 +20,26 @@ sub linkify ($$$) { #{{{ return $content; } #}}} -sub htmlize ($$) { #{{{ +sub htmlize ($$$) { #{{{ + my $page=shift; my $type=shift; my $content=shift; if (exists $hooks{htmlize}{$type}) { - $content=$hooks{htmlize}{$type}{call}->($content); + $content=$hooks{htmlize}{$type}{call}->( + page => $page, + content => $content, + ); } else { error("htmlization of $type not supported"); } run_hooks(sanitize => sub { - $content=shift->($content); + $content=shift->( + page => $page, + content => $content, + ); }); return $content; @@ -84,6 +91,7 @@ sub parentlinks ($) { #{{{ return @ret; } #}}} +my %preprocessing; sub preprocess ($$$) { #{{{ my $page=shift; # the page the data comes from my $destpage=shift; # the page the data will appear in (different for inline) @@ -123,14 +131,21 @@ sub preprocess ($$$) { #{{{ push @params, $val, ''; } } - return $hooks{preprocess}{$command}{call}->( + if ($preprocessing{$page}++ > 3) { + # Avoid loops of preprocessed pages preprocessing + # other pages that preprocess them, etc. + return "[[$command preprocessing loop detected on $page at depth $preprocessing{$page}]]"; + } + my $ret=$hooks{preprocess}{$command}{call}->( @params, page => $page, destpage => $destpage, ); + $preprocessing{$page}--; + return $ret; } else { - return "[[$command not processed]]"; + return "[[$command $params]]"; } }; @@ -201,7 +216,10 @@ sub genpage ($$$) { #{{{ $content=$template->output; run_hooks(format => sub { - $content=shift->($content); + $content=shift->( + page => $page, + content => $content, + ); }); return $content; @@ -279,7 +297,7 @@ sub render ($) { #{{{ $content=preprocess($page, $page, $content); $content=linkify($page, $page, $content); - $content=htmlize($type, $content); + $content=htmlize($page, $type, $content); check_overwrite("$config{destdir}/".htmlpage($page), $page); writefile(htmlpage($page), $config{destdir},