483 lines
15 KiB
PHP
483 lines
15 KiB
PHP
<?php
|
|
// $Header: /cvsroot/html2ps/xhtml.utils.inc.php,v 1.35 2007/03/15 18:37:36 Konstantin Exp $
|
|
|
|
function close_tag($tag, $sample_html) {
|
|
return preg_replace("!(<{$tag}(\s[^>]*[^/>])?)>!si","\\1/>",$sample_html);
|
|
};
|
|
|
|
function make_attr_value($attr, $html) {
|
|
return preg_replace("#(<[^>]*\s){$attr}(\s|>|/>)#si","\\1{$attr}=\"{$attr}\"\\2",$html);
|
|
};
|
|
|
|
|
|
function mk_open_tag_regexp($tag) { return "<\s*{$tag}(\s+[^>]*)?>"; };
|
|
function mk_close_tag_regexp($tag) { return "<\s*/\s*{$tag}\s*>"; };
|
|
|
|
function process_html($html) {
|
|
$open = mk_open_tag_regexp("html");
|
|
$close = mk_close_tag_regexp("html");
|
|
|
|
if (!preg_match("#{$open}#is",$html)) {
|
|
$html = "<html>".$html;
|
|
};
|
|
|
|
/**
|
|
* Let's check if there's more than one <html> tags inside the page text
|
|
* If there are, remove everything except the first one and content between the first and second <html>
|
|
*/
|
|
while (preg_match("#{$open}(.*?){$open}#is", $html)) {
|
|
$html = preg_replace("#{$open}(.*?){$open}#is", "<html>\\2", $html);
|
|
};
|
|
|
|
if (!preg_match("#{$close}#is", $html)) {
|
|
$html = $html."</html>";
|
|
};
|
|
|
|
// PHP 5.2.0 compatilibty issue
|
|
// preg_replace may accidentally return NULL on large files not matching this
|
|
$html = preg_replace("#.*({$open})#is","\\1",$html);
|
|
|
|
// PHP 5.2.0 compatilibty issue
|
|
// preg_replace may accidentally return NULL on large files not matching this
|
|
|
|
// Cut off all data before and after 'html' tag; unless we'll do it,
|
|
// the XML parser will die violently
|
|
$html = preg_replace("#^.*<html#is","<html",$html);
|
|
|
|
$html = preg_replace("#</html\s*>.*$#is","</html>",$html);
|
|
|
|
return $html;
|
|
}
|
|
|
|
function process_head($html) {
|
|
$open = mk_open_tag_regexp("head");
|
|
$close = mk_close_tag_regexp("head");
|
|
$ohtml = mk_open_tag_regexp("html");
|
|
$chtml = mk_close_tag_regexp("html");
|
|
$obody = mk_open_tag_regexp("body");
|
|
|
|
if (!preg_match("#{$open}#is",$html)) {
|
|
$html = preg_replace("#({$ohtml})(.*)({$obody})#is","\\1<head>\\3</head>\\4",$html);
|
|
} elseif (!preg_match("#{$close}#is",$html)) {
|
|
if (preg_match("#{$obody}#is",$html)) {
|
|
$html = preg_replace("#({$obody})#is","</head>\\1",$html);
|
|
} else {
|
|
$html = preg_replace("#({$chtml})#is","</head>\\1",$html);
|
|
};
|
|
};
|
|
return $html;
|
|
}
|
|
|
|
function process_body($html) {
|
|
$open = mk_open_tag_regexp("body");
|
|
$close = mk_close_tag_regexp("body");
|
|
$ohtml = mk_open_tag_regexp("html");
|
|
$chtml = mk_close_tag_regexp("html");
|
|
$chead = mk_close_tag_regexp("head");
|
|
|
|
if (!preg_match("#{$open}#is",$html)) {
|
|
if (preg_match("#{$chead}#is",$html)) {
|
|
$html = preg_replace("#({$chead})#is","\\1<body>",$html);
|
|
} else {
|
|
$html = preg_replace("#({$ohtml})#is","\\1<body>",$html);
|
|
};
|
|
};
|
|
if (!preg_match("#{$close}#is",$html)) {
|
|
$html = preg_replace("#({$chtml})#is","</body>\\1",$html);
|
|
};
|
|
|
|
// Now check is there any data between </head> and <body>.
|
|
$html = preg_replace("#({$chead})(.+)({$open})#is","\\1\\3\\2",$html);
|
|
// Check if there's any data between </body> and </html>
|
|
$html = preg_replace("#({$close})(.+)({$chtml})#is","\\2\\1\\3",$html);
|
|
|
|
return $html;
|
|
}
|
|
|
|
// Hmmm. May be we'll just write SAX parser on PHP? ;-)
|
|
function fix_tags($html) {
|
|
$result = "";
|
|
$tag_stack = array();
|
|
|
|
// these corrections can simplify the regexp used to parse tags
|
|
// remove whitespaces before '/' and between '/' and '>' in autoclosing tags
|
|
$html = preg_replace("#\s*/\s*>#is","/>",$html);
|
|
// remove whitespaces between '<', '/' and first tag letter in closing tags
|
|
$html = preg_replace("#<\s*/\s*#is","</",$html);
|
|
// remove whitespaces between '<' and first tag letter
|
|
$html = preg_replace("#<\s+#is","<",$html);
|
|
|
|
while (preg_match("#(.*?)(<([a-z\d]+)[^>]*/>|<([a-z\d]+)[^>]*(?<!/)>|</([a-z\d]+)[^>]*>)#is",$html,$matches)) {
|
|
$result .= $matches[1];
|
|
$html = substr($html, strlen($matches[0]));
|
|
|
|
// Closing tag
|
|
if (isset($matches[5])) {
|
|
$tag = $matches[5];
|
|
|
|
if ($tag == $tag_stack[0]) {
|
|
// Matched the last opening tag (normal state)
|
|
// Just pop opening tag from the stack
|
|
array_shift($tag_stack);
|
|
$result .= $matches[2];
|
|
} elseif (array_search($tag, $tag_stack)) {
|
|
// We'll never should close 'table' tag such way, so let's check if any 'tables' found on the stack
|
|
$no_critical_tags = !array_search('table',$tag_stack);
|
|
if (!$no_critical_tags) {
|
|
$no_critical_tags = (array_search('table',$tag_stack) >= array_search($tag, $tag_stack));
|
|
};
|
|
|
|
if ($no_critical_tags) {
|
|
// Corresponding opening tag exist on the stack (somewhere deep)
|
|
// Note that we can forget about 0 value returned by array_search, becaus it is handled by previous 'if'
|
|
|
|
// Insert a set of closing tags for all non-matching tags
|
|
$i = 0;
|
|
while ($tag_stack[$i] != $tag) {
|
|
$result .= "</{$tag_stack[$i]}> ";
|
|
$i++;
|
|
};
|
|
|
|
// close current tag
|
|
$result .= "</{$tag_stack[$i]}> ";
|
|
// remove it from the stack
|
|
array_splice($tag_stack, $i, 1);
|
|
// if this tag is not "critical", reopen "run-off" tags
|
|
$no_reopen_tags = array("tr","td","table","marquee","body","html");
|
|
if (array_search($tag, $no_reopen_tags) === false) {
|
|
while ($i > 0) {
|
|
$i--;
|
|
$result .= "<{$tag_stack[$i]}> ";
|
|
};
|
|
} else {
|
|
array_splice($tag_stack, 0, $i);
|
|
};
|
|
};
|
|
} else {
|
|
// No such tag found on the stack, just remove it (do nothing in out case, as we have to explicitly
|
|
// add things to result
|
|
};
|
|
} elseif (isset($matches[4])) {
|
|
// Opening tag
|
|
$tag = $matches[4];
|
|
array_unshift($tag_stack, $tag);
|
|
$result .= $matches[2];
|
|
} else {
|
|
// Autoclosing tag; do nothing specific
|
|
$result .= $matches[2];
|
|
};
|
|
};
|
|
|
|
// Close all tags left
|
|
while (count($tag_stack) > 0) {
|
|
$tag = array_shift($tag_stack);
|
|
$result .= "</".$tag.">";
|
|
}
|
|
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* This function adds quotes to attribute values; it attribute values already have quotes, no changes are made
|
|
*/
|
|
function quote_attrs($html) {
|
|
while (preg_match("!(<[^>]*)\s([^=>]+)=([^'\"\r\n >]+)([\r\n >])!si",$html, $matches)) {
|
|
$html = preg_replace("#(<[^>]*)\s([^=>]+)=([^'\"\r\n >]+)([\r\n >])#si","\\1 \\2='\\3'\\4",$html);
|
|
};
|
|
return $html;
|
|
};
|
|
|
|
function escape_attr_value_entities($html) {
|
|
$html = str_replace("<","<",$html);
|
|
$html = str_replace(">",">",$html);
|
|
|
|
// Replace all character references by their decimal codes
|
|
process_character_references($html);
|
|
$html = escape_amp($html);
|
|
return $html;
|
|
}
|
|
|
|
/**
|
|
* Updates attribute values: if there's any unescaped <, > or & symbols inside an attribute value,
|
|
* replaces them with corresponding entity. Also note that & should not be escaped if it is already the part
|
|
* of entity reference
|
|
*
|
|
* @param String $html source HTML code
|
|
* @return String updated HTML code
|
|
*/
|
|
function escape_attrs_entities($html) {
|
|
$result = "";
|
|
|
|
// Regular expression may be described as follows:
|
|
// (<[^>]*) - something starting with < (i.e. tag name and, probably, some attribute name/values pairs
|
|
// \s([^\s=>]+)= - space after "something", followed by attribute name (which may contain anything except spaces, = and > signs
|
|
// (['\"])([^\3]*?)\3 - quoted attribute value; (@todo won't work with escaped quotes inside value, by the way).
|
|
while (preg_match("#^(.*)(<[^>]*)\s([^\s=>]+)=(['\"])([^\\4]*?)\\4(.*)$#si", $html, $matches)) {
|
|
$new_value = escape_attr_value_entities($matches[5]);
|
|
|
|
$result .= $matches[1].$matches[2]." ".$matches[3]."=".$matches[4].$new_value.$matches[4];
|
|
$html = $matches[6];
|
|
};
|
|
|
|
return $result.$html;
|
|
};
|
|
|
|
function fix_attrs_spaces(&$html) {
|
|
while (preg_match("#(<[^>]*)\s([^\s=>]+)=\"([^\"]*?)\"([^\s])#si", $html)) {
|
|
$html = preg_replace("#(<[^>]*)\s([^\s=>]+)=\"([^\"]*?)\"([^\s])#si","\\1 \\2=\"\\3\" \\4",$html);
|
|
};
|
|
|
|
while (preg_match("#(<[^>]*)\s([^\s=>]+)='([^']*?)'([^\s])#si", $html)) {
|
|
$html = preg_replace("#(<[^>]*)\s([^\s=>]+)='([^']*?)'([^\s])#si","\\1 \\2='\\3' \\4",$html);
|
|
};
|
|
}
|
|
|
|
function fix_attrs_tag($tag) {
|
|
if (preg_match("#(<)(.*?)(/\s*>)#is",$tag, $matches)) {
|
|
$prefix = $matches[1];
|
|
$suffix = $matches[3];
|
|
$content = $matches[2];
|
|
} elseif (preg_match("#(<)(.*?)(>)#is",$tag, $matches)) {
|
|
$prefix = $matches[1];
|
|
$suffix = $matches[3];
|
|
$content = $matches[2];
|
|
} else {
|
|
return;
|
|
};
|
|
|
|
if (preg_match("#^\s*(\w+)\s*(.*)\s*/\s*\$#is", $content, $matches)) {
|
|
$tagname = $matches[1];
|
|
$raw_attrs = isset($matches[2]) ? $matches[2] : "";
|
|
} elseif (preg_match("#^\s*(\w+)\s*(.*)\$#is", $content, $matches)) {
|
|
$tagname = $matches[1];
|
|
$raw_attrs = isset($matches[2]) ? $matches[2] : "";
|
|
} else {
|
|
// A strange tag occurred; just remove everything
|
|
$tagname = "";
|
|
$raw_attrs = "";
|
|
};
|
|
|
|
$attrs = array();
|
|
while (!empty($raw_attrs)) {
|
|
if (preg_match("#^\s*(\w+?)\s*=\s*\"(.*?)\"(.*)$#is",$raw_attrs,$matches)) {
|
|
$attr = strtolower($matches[1]);
|
|
$value = $matches[2];
|
|
|
|
if (!isset($attrs[$attr])) {
|
|
$attrs[$attr] = $value;
|
|
};
|
|
|
|
$raw_attrs = $matches[3];
|
|
} elseif (preg_match("#^\s*(\w+?)\s*=\s*'(.*?)'(.*)$#is",$raw_attrs,$matches)) {
|
|
$attr = strtolower($matches[1]);
|
|
$value = $matches[2];
|
|
|
|
if (!isset($attrs[$attr])) {
|
|
$attrs[$attr] = $value;
|
|
};
|
|
|
|
$raw_attrs = $matches[3];
|
|
} elseif (preg_match("#^\s*(\w+?)=(\w+)(.*)$#is",$raw_attrs,$matches)) {
|
|
$attr = strtolower($matches[1]);
|
|
$value = $matches[2];
|
|
|
|
if (!isset($attrs[$attr])) {
|
|
$attrs[$attr] = $value;
|
|
};
|
|
|
|
$raw_attrs = $matches[3];
|
|
} elseif (preg_match("#^\s*\S+\s+(.*)$#is",$raw_attrs,$matches)) {
|
|
// Just a junk at the beginning; skip till the first space
|
|
$raw_attrs = $matches[1];
|
|
} else {
|
|
$raw_attrs = "";
|
|
};
|
|
};
|
|
|
|
$str = "";
|
|
foreach ($attrs as $key => $value) {
|
|
// In theory, if the garbage have been found inside the attrs section, we could get
|
|
// and invalid attribute name here; just ignore them in this case
|
|
if (HTML2PS_XMLUtils::valid_attribute_name($key)) {
|
|
if (strpos($value,'"') !== false) {
|
|
$str .= " ".$key."='".$value."'";
|
|
} else {
|
|
$str .= " ".$key."=\"".$value."\"";
|
|
};
|
|
};
|
|
};
|
|
|
|
return $prefix.$tagname.$str.$suffix;
|
|
}
|
|
|
|
function fix_attrs($html) {
|
|
$result = "";
|
|
|
|
while (preg_match("#^(.*?)(<[^/].*?>)#is",$html,$matches)) {
|
|
$result .= $matches[1].fix_attrs_tag($matches[2]);
|
|
$html = substr($html, strlen($matches[0]));
|
|
};
|
|
|
|
return $result.$html;
|
|
}
|
|
|
|
function fix_closing_tags($html) {
|
|
return preg_replace("#</\s*(\w+).*?>#","</\\1>",$html);
|
|
}
|
|
|
|
function process_pagebreak_commands(&$html) {
|
|
$html = preg_replace("#<\?page-break>|<!--NewPage-->#","<pagebreak/>",$html);
|
|
}
|
|
|
|
function xhtml2xhtml($html) {
|
|
process_pagebreak_commands($html);
|
|
|
|
// Remove STYLE tags for the same reason and store them in the temporary variable
|
|
// later they will be added back to HEAD section
|
|
$styles = process_style($html);
|
|
|
|
// Do HTML -> XML (XHTML) conversion
|
|
// Convert HTML character references to their Unicode analogues
|
|
process_character_references($html);
|
|
|
|
remove_comments($html);
|
|
|
|
// Convert all tags to lower case
|
|
$html = lowercase_tags($html);
|
|
$html = lowercase_closing_tags($html);
|
|
|
|
// Remove SCRIPT tags
|
|
$html = process_script($html);
|
|
|
|
$html = insert_styles($html, $styles);
|
|
|
|
return $html;
|
|
}
|
|
|
|
function html2xhtml($html) {
|
|
process_pagebreak_commands($html);
|
|
|
|
// Remove SCRIPT tags from the page being processed, as script content may
|
|
// mess the firther html-parsing utilities
|
|
$html = process_script($html);
|
|
|
|
// Remove STYLE tags for the same reason and store them in the temporary variable
|
|
// later they will be added back to HEAD section
|
|
$styles = process_style($html);
|
|
|
|
// Convert HTML character references to their Unicode analogues
|
|
process_character_references($html);
|
|
|
|
remove_comments($html);
|
|
|
|
fix_attrs_spaces($html);
|
|
$html = quote_attrs($html);
|
|
$html = escape_attrs_entities($html);
|
|
|
|
$html = lowercase_tags($html);
|
|
$html = lowercase_closing_tags($html);
|
|
|
|
$html = fix_closing_tags($html);
|
|
|
|
$html = close_tag("area",$html);
|
|
$html = close_tag("base",$html);
|
|
$html = close_tag("basefont",$html);
|
|
$html = close_tag("br",$html);
|
|
$html = close_tag("col",$html);
|
|
$html = close_tag("embed",$html);
|
|
$html = close_tag("frame",$html);
|
|
$html = close_tag("hr",$html);
|
|
$html = close_tag("img",$html);
|
|
$html = close_tag("input",$html);
|
|
$html = close_tag("isindex",$html);
|
|
$html = close_tag("link",$html);
|
|
$html = close_tag("meta",$html);
|
|
$html = close_tag("param",$html);
|
|
|
|
$html = make_attr_value("checked",$html);
|
|
$html = make_attr_value("compact",$html);
|
|
$html = make_attr_value("declare",$html);
|
|
$html = make_attr_value("defer",$html);
|
|
$html = make_attr_value("disabled",$html);
|
|
$html = make_attr_value("ismap",$html);
|
|
$html = make_attr_value("multiple",$html);
|
|
$html = make_attr_value("nohref",$html);
|
|
$html = make_attr_value("noresize",$html);
|
|
$html = make_attr_value("noshade",$html);
|
|
$html = make_attr_value("nowrap",$html);
|
|
$html = make_attr_value("readonly",$html);
|
|
$html = make_attr_value("selected",$html);
|
|
|
|
$html = process_html($html);
|
|
$html = process_body($html);
|
|
|
|
$html = process_head($html);
|
|
$html = process_p($html);
|
|
|
|
$html = escape_amp($html);
|
|
$html = escape_lt($html);
|
|
$html = escape_gt($html);
|
|
|
|
$html = escape_textarea_content($html);
|
|
|
|
process_tables($html,0);
|
|
|
|
process_lists($html,0);
|
|
process_deflists($html,0);
|
|
process_selects($html,0);
|
|
|
|
$html = fix_tags($html);
|
|
$html = fix_attrs($html);
|
|
|
|
$html = insert_styles($html, $styles);
|
|
|
|
return $html;
|
|
}
|
|
|
|
function escape_textarea_content($html) {
|
|
preg_match_all('#<textarea(.*)>(.*)<\s*/\s*textarea\s*>#Uis', $html, $matches, PREG_OFFSET_CAPTURE | PREG_SET_ORDER);
|
|
|
|
// Why cycle from the last to first match?
|
|
// It will keep unprocessed matches offsets valid,
|
|
// as escaped content may differ from original content in length,
|
|
for ($i = count($matches)-1; $i>=0; $i--) {
|
|
$match = $matches[$i];
|
|
$match_offset = $match[2][1];
|
|
$match_content = $match[2][0];
|
|
$match_length = strlen($match_content);
|
|
$escaped_content = preg_replace('/&([^#])/', '&\1',
|
|
str_replace('>', '>',
|
|
str_replace('<', '<', $match_content)));
|
|
$html = substr_replace($html, $escaped_content, $match_offset, $match_length);
|
|
};
|
|
|
|
return $html;
|
|
}
|
|
|
|
function lowercase_tags($html) {
|
|
$result = "";
|
|
|
|
while (preg_match("#^(.*?)(</?)([a-zA-z0-9]+)([\s>])#is",$html,$matches)) {
|
|
// Drop extracted part
|
|
$html = substr($html,strlen($matches[0]));
|
|
// Move extracted part to the result
|
|
$result .= $matches[1].$matches[2].strtolower($matches[3]).$matches[4];
|
|
};
|
|
|
|
return $result.$html;
|
|
};
|
|
|
|
function lowercase_closing_tags($html) {
|
|
$result = "";
|
|
|
|
while (preg_match("#^(.*?)(<)([a-zA-z0-9]+)(\s*/\s*>)#is",$html,$matches)) {
|
|
// Drop extracted part
|
|
$html = substr($html,strlen($matches[0]));
|
|
// Move extracted part to the result
|
|
$result .= $matches[1].$matches[2].strtolower($matches[3]).$matches[4];
|
|
};
|
|
|
|
return $result.$html;
|
|
};
|
|
|
|
?>
|