2
0
mirror of https://gitlab.isc.org/isc-projects/bind9 synced 2025-08-29 21:47:59 +00:00

handle <!ENTITY within <!DOCTYPE

This commit is contained in:
Mark Andrews 2015-10-06 18:19:24 +11:00
parent 6715db6593
commit 3db767c98f

View File

@ -317,6 +317,25 @@ foreach $file (keys %file_types) {
while (/^<!DOCTYPE/ || /^<!ENTITY/ || /^<\?xml-stylesheet/ || /^<\?xml /) { while (/^<!DOCTYPE/ || /^<!ENTITY/ || /^<\?xml-stylesheet/ || /^<\?xml /) {
# print "SGML: $_"; # print "SGML: $_";
$before_copyright = "$before_copyright$_"; $before_copyright = "$before_copyright$_";
if (/\]>$/ ) {
$_ = <SOURCE>;
close(SOURCE) if (eof(SOURCE));
next;
}
if (/^<!DOCTYPE/) {
while (!eof(SOURCE)) {
$_ = <SOURCE>;
next if (eof(SOURCE));
$before_copyright =
"$before_copyright$_";
if (/]>$/) {
$_ = <SOURCE>;
last;
}
}
close(SOURCE) if (eof(SOURCE));
next;
}
if (/>$/ ) { if (/>$/ ) {
$_ = <SOURCE>; $_ = <SOURCE>;
close(SOURCE) if (eof(SOURCE)); close(SOURCE) if (eof(SOURCE));