Parent Directory
| 
Revision Log
++ whatpm/t/ChangeLog 10 May 2008 05:54:08 -0000 2008-05-10 Wakaba <wakaba@suika.fam.cx> * content-model-2.dat: Boolean attributes now allow uppercase letters (HTML5 revision 1572). ++ whatpm/Whatpm/ChangeLog 10 May 2008 05:57:19 -0000 2008-05-10 Wakaba <wakaba@suika.fam.cx> * CacheManifest.pm: Don't replace U+0000 NULL (HTML5 revision 1553). ++ whatpm/Whatpm/ContentChecker/ChangeLog 10 May 2008 05:54:35 -0000 2008-05-10 Wakaba <wakaba@suika.fam.cx> * HTML.pm ($GetHTMLBooleanAttrChecker): Allow uppercase letters (HTML5 revision 1572).
| 1 | wakaba | 1.1 | package Whatpm::ContentChecker; |
| 2 | use strict; | ||
| 3 | wakaba | 1.81 | our $VERSION=do{my @r=(q$Revision: 1.80 $=~/\d+/g);sprintf "%d."."%02d" x $#r,@r}; |
| 4 | wakaba | 1.1 | |
| 5 | wakaba | 1.18 | require Whatpm::URIChecker; |
| 6 | |||
| 7 | wakaba | 1.13 | ## ISSUE: How XML and XML Namespaces conformance can (or cannot) |
| 8 | ## be applied to an in-memory representation (i.e. DOM)? | ||
| 9 | |||
| 10 | wakaba | 1.50 | ## TODO: Conformance of an HTML document with non-html root element. |
| 11 | |||
| 12 | wakaba | 1.70 | ## Stability |
| 13 | wakaba | 1.67 | sub FEATURE_STATUS_REC () { 0b1 } ## Interoperable standard |
| 14 | sub FEATURE_STATUS_CR () { 0b10 } ## Call for implementation | ||
| 15 | sub FEATURE_STATUS_LC () { 0b100 } ## Last call for comments | ||
| 16 | sub FEATURE_STATUS_WD () { 0b1000 } ## Working or editor's draft | ||
| 17 | |||
| 18 | wakaba | 1.70 | ## Deprecated |
| 19 | sub FEATURE_DEPRECATED_SHOULD () { 0b100000 } ## SHOULD-level | ||
| 20 | sub FEATURE_DEPRECATED_INFO () { 0b1000000 } ## Does not affect conformance | ||
| 21 | |||
| 22 | ## Conformance | ||
| 23 | sub FEATURE_ALLOWED () { 0b10000 } | ||
| 24 | |||
| 25 | wakaba | 1.42 | my $HTML_NS = q<http://www.w3.org/1999/xhtml>; |
| 26 | wakaba | 1.9 | my $XML_NS = q<http://www.w3.org/XML/1998/namespace>; |
| 27 | my $XMLNS_NS = q<http://www.w3.org/2000/xmlns/>; | ||
| 28 | |||
| 29 | wakaba | 1.42 | my $Namespace = { |
| 30 | wakaba | 1.79 | '' => {loaded => 1}, |
| 31 | wakaba | 1.43 | q<http://www.w3.org/2005/Atom> => {module => 'Whatpm::ContentChecker::Atom'}, |
| 32 | wakaba | 1.72 | q<http://purl.org/syndication/history/1.0> |
| 33 | => {module => 'Whatpm::ContentChecker::Atom'}, | ||
| 34 | q<http://purl.org/syndication/threading/1.0> | ||
| 35 | => {module => 'Whatpm::ContentChecker::Atom'}, | ||
| 36 | wakaba | 1.42 | $HTML_NS => {module => 'Whatpm::ContentChecker::HTML'}, |
| 37 | $XML_NS => {loaded => 1}, | ||
| 38 | $XMLNS_NS => {loaded => 1}, | ||
| 39 | wakaba | 1.73 | q<http://www.w3.org/1999/02/22-rdf-syntax-ns#> => {loaded => 1}, |
| 40 | wakaba | 1.42 | }; |
| 41 | |||
| 42 | wakaba | 1.79 | sub load_ns_module ($) { |
| 43 | my $nsuri = shift; # namespace URI or '' | ||
| 44 |