55 |
@@@WithFor: ManakaiDOM|ManakaiDOM |
@@@WithFor: ManakaiDOM|ManakaiDOM |
56 |
@@Module: |
@@Module: |
57 |
@@@WithFor: ManakaiDOM|ManakaiDOMLatest |
@@@WithFor: ManakaiDOM|ManakaiDOMLatest |
58 |
|
@@Module: |
59 |
|
@@@QName: DISlib|DISMarkup |
60 |
|
@@@WithFor: ManakaiDOM|all |
61 |
@DefaultFor: ManakaiDOM|ManakaiDOMLatest |
@DefaultFor: ManakaiDOM|ManakaiDOMLatest |
62 |
|
|
63 |
Namespace: |
Namespace: |
67 |
http://suika.fam.cx/~wakaba/archive/2004/8/18/dom-core# |
http://suika.fam.cx/~wakaba/archive/2004/8/18/dom-core# |
68 |
@cfg: |
@cfg: |
69 |
http://suika.fam.cx/www/2006/dom-config/ |
http://suika.fam.cx/www/2006/dom-config/ |
70 |
|
@DISlib: |
71 |
|
http://suika.fam.cx/~wakaba/archive/2004/dis/ |
72 |
@dis: |
@dis: |
73 |
http://suika.fam.cx/~wakaba/archive/2004/8/18/lang#dis-- |
http://suika.fam.cx/~wakaba/archive/2004/8/18/lang#dis-- |
74 |
@dlp: |
@dlp: |
75 |
http://suika.fam.cx/~wakaba/archive/2004/dis/Perl# |
http://suika.fam.cx/~wakaba/archive/2004/dis/Perl# |
|
@doc: |
|
|
http://suika.fam.cx/~wakaba/archive/2005/7/tutorial# |
|
76 |
@d: |
@d: |
77 |
http://suika.fam.cx/~wakaba/archive/2004/dom/xdt# |
http://suika.fam.cx/~wakaba/archive/2004/dom/xdt# |
78 |
@DOMMain: |
@DOMMain: |
79 |
http://suika.fam.cx/~wakaba/archive/2004/dom/main# |
http://suika.fam.cx/~wakaba/archive/2004/dom/main# |
80 |
|
@domperl: |
81 |
|
http://suika.fam.cx/~wakaba/archive/2006/dom/perl/ |
82 |
@dx: |
@dx: |
83 |
http://suika.fam.cx/~wakaba/archive/2005/manakai/Util/Error/DOMException# |
http://suika.fam.cx/~wakaba/archive/2005/manakai/Util/Error/DOMException# |
84 |
@dxm: |
@dxm: |
93 |
http://www.w3.org/1999/xhtml |
http://www.w3.org/1999/xhtml |
94 |
@idl: |
@idl: |
95 |
http://suika.fam.cx/~wakaba/archive/2004/dis/IDL# |
http://suika.fam.cx/~wakaba/archive/2004/dis/IDL# |
|
@infoset: |
|
|
http://www.w3.org/2001/04/infoset# |
|
96 |
@kwd: |
@kwd: |
97 |
http://suika.fam.cx/~wakaba/archive/2005/rfc2119/ |
http://suika.fam.cx/~wakaba/archive/2005/rfc2119/ |
98 |
@lang: |
@lang: |
99 |
http://suika.fam.cx/~wakaba/archive/2004/8/18/lang# |
http://suika.fam.cx/~wakaba/archive/2004/8/18/lang# |
100 |
@license: |
@license: |
101 |
http://suika.fam.cx/~wakaba/archive/2004/8/18/license# |
http://suika.fam.cx/~wakaba/archive/2004/8/18/license# |
|
@m12n: |
|
|
http://suika.fam.cx/www/2006/05/m12n/ |
|
102 |
@ManakaiDOM: |
@ManakaiDOM: |
103 |
http://suika.fam.cx/~wakaba/archive/2004/8/18/manakai-dom# |
http://suika.fam.cx/~wakaba/archive/2004/8/18/manakai-dom# |
104 |
@Markup: |
@Markup: |
105 |
http://suika.fam.cx/~wakaba/archive/2005/manakai/Markup# |
http://suika.fam.cx/~wakaba/archive/2005/manakai/Markup# |
|
@mat: |
|
|
http://suika.fam.cx/~wakaba/archive/2005/manakai/Markup/Atom/ |
|
106 |
@MDOM: |
@MDOM: |
107 |
http://suika.fam.cx/~wakaba/archive/2004/8/18/manakai-dom#ManakaiDOM. |
http://suika.fam.cx/~wakaba/archive/2004/8/18/manakai-dom#ManakaiDOM. |
108 |
@MDOMX: |
@MDOMX: |
121 |
http://suika.fam.cx/~wakaba/archive/2005/manakai/DOM/Element/ |
http://suika.fam.cx/~wakaba/archive/2005/manakai/DOM/Element/ |
122 |
@test: |
@test: |
123 |
http://suika.fam.cx/~wakaba/archive/2004/dis/Test# |
http://suika.fam.cx/~wakaba/archive/2004/dis/Test# |
124 |
|
@thr: |
125 |
|
http://purl.org/syndication/thread/1.0 |
126 |
@tx: |
@tx: |
127 |
http://suika.fam.cx/~wakaba/archive/2005/manakai/DOM/XML/ |
http://suika.fam.cx/~wakaba/archive/2005/manakai/DOM/XML/ |
128 |
@urigen: |
@urigen: |
274 |
@@@@: s|ElementType |
@@@@: s|ElementType |
275 |
@@@ForCheck: s|ForML |
@@@ForCheck: s|ForML |
276 |
|
|
|
@@f:implements: AtomFeature10 |
|
|
|
|
277 |
ElementTypeBinding: |
ElementTypeBinding: |
278 |
@Name: IFClsDef |
@Name: IFClsDef |
279 |
@ElementType: |
@ElementType: |
302 |
@@@ContentType: DISCore|TFPQNames |
@@@ContentType: DISCore|TFPQNames |
303 |
@@@ForCheck: ManakaiDOM|ForClass ManakaiDOM|ManakaiDOMLatest |
@@@ForCheck: ManakaiDOM|ForClass ManakaiDOM|ManakaiDOMLatest |
304 |
|
|
|
@@f:implements: AtomFeature10 |
|
|
|
|
305 |
ElementTypeBinding: |
ElementTypeBinding: |
306 |
@Name: IFClsConstructDef |
@Name: IFClsConstructDef |
307 |
@ElementType: |
@ElementType: |
341 |
@@@@: mv|ElementContentModel |
@@@@: mv|ElementContentModel |
342 |
@@@ForCheck: mv|ForCM |
@@@ForCheck: mv|ForCM |
343 |
|
|
|
@@f:implements: AtomFeature10 |
|
344 |
|
|
345 |
ElementTypeBinding: |
ElementTypeBinding: |
346 |
@Name: IFQName |
@Name: IFQName |
567 |
@@enDesc: |
@@enDesc: |
568 |
The Atom DOM, version 1.0. |
The Atom DOM, version 1.0. |
569 |
|
|
570 |
|
FeatureDef: |
571 |
|
@featureQName: fe|AtomThreading |
572 |
|
@QName: AtomThreadingFeature |
573 |
|
@FeatureVerDef: |
574 |
|
@@QName: AtomThreadingFeature10 |
575 |
|
@@Version: 1.0 |
576 |
|
@@f:instanceOf: AtomThreadingFeature |
577 |
|
@@f:requires: fe|AtomFeature10 |
578 |
|
@@enDesc: |
579 |
|
The Atom Threading Extension DOM, version 1.0. |
580 |
|
|
581 |
## -- Modules |
## -- Modules |
582 |
|
|
583 |
ModuleSetDef: |
ModuleSetDef: |
584 |
@QName: Atom |
@QName: Atom |
|
@mv:id: atom |
|
|
@mv:vid: 10 |
|
585 |
@enLN: Atom |
@enLN: Atom |
586 |
@mv:version: 1.0 |
@mv:version: 1.0 |
587 |
@mv:contains: AtomDatatypes |
@mv:contains: AtomDatatypes |
590 |
@mv:contains: AtomFeed |
@mv:contains: AtomFeed |
591 |
@mv:contains: AtomQName |
@mv:contains: AtomQName |
592 |
|
|
593 |
@infoset:namespaceName: |
@mv:targetNamespace: atom| |
594 |
http://www.w3.org/2005/Atom |
@mv:defaultNamespacePrefix: atom |
595 |
@infoset:prefix: atom |
@mv:systemIdentifierBaseURI: \ |
596 |
|
|
597 |
ModuleDef: |
ModuleDef: |
598 |
@QName: AtomFeed |
@QName: AtomFeed |
672 |
@DISCore:resourceType: mv|XMLDTDQNameModule |
@DISCore:resourceType: mv|XMLDTDQNameModule |
673 |
|
|
674 |
@mv:contains: Atom |
@mv:contains: Atom |
675 |
|
|
676 |
|
ResourceDef: |
677 |
|
@QName: Atom10 |
678 |
|
@enLN: Atom 1.0 |
679 |
|
@mv:id: atom10 |
680 |
|
@For: =ManakaiDOM|ManakaiDOMLatest |
681 |
|
@DISCore:resourceType: mv|XMLDTDDriver |
682 |
|
|
683 |
|
@mv:refers: Atom |
684 |
|
|
685 |
|
@mv:refers: AtomQName |
686 |
|
@mv:refers: AtomDatatypes |
687 |
|
@mv:refers: AtomProperties |
688 |
|
@mv:refers: AtomEntry |
689 |
|
@mv:refers: AtomFeed |
690 |
|
|
691 |
ElementTypeBinding: |
ElementTypeBinding: |
692 |
@Name: ModuleSetDef |
@Name: ModuleSetDef |
710 |
@IFQName: AtomImplementation |
@IFQName: AtomImplementation |
711 |
@ClsQName: ManakaiAtomImplementation |
@ClsQName: ManakaiAtomImplementation |
712 |
|
|
713 |
@IFISA: c|DOMImplementation |
@domperl:implementedByObjectsOf: c|DOMImplementation |
714 |
@ClsISA: c|ManakaiDOMImplementation |
@domperl:classImplementedByObjectsOf: c|ManakaiDOMImplementation |
715 |
|
|
716 |
@enDesc: |
@enDesc: |
717 |
The <IF::AtomImplementation> interface provides convenience |
The <IF::AtomImplementation> interface provides convenience |
718 |
methods to create Atom documents. |
methods to create Atom documents. |
719 |
|
|
720 |
@f:provides: AtomFeature10 |
@f:provides: AtomFeature10 |
721 |
|
@f:implements: AtomFeature10 |
722 |
|
|
723 |
@Test: |
@Test: |
724 |
@@QName: AtomImplementation.interface.test |
@@QName: AtomImplementation.interface.test |
727 |
<IFName::AtomImplementation>, |
<IFName::AtomImplementation>, |
728 |
<IFName::AtomImplementation||ManakaiDOM|ManakaiDOM>, |
<IFName::AtomImplementation||ManakaiDOM|ManakaiDOM>, |
729 |
<IFName::c|DOMImplementation>, |
<IFName::c|DOMImplementation>, |
|
<IFName::urigen|URIImplementation>, |
|
|
<IFName::f|MinimumImplementation>, |
|
730 |
<IFName::f|GetFeature>, |
<IFName::f|GetFeature>, |
731 |
) { |
) { |
732 |
$test->id ($interface); |
$test->id ($interface); |
733 |
$test->assert_true |
$test->assert_true |
734 |
(<Class::ManakaiAtomImplementation>->isa ($interface)); |
(<Class::c|ManakaiDOMImplementation>->isa ($interface)); |
735 |
} |
} |
736 |
@Test: |
@Test: |
737 |
@@QName: ImplementationRegistry.AtomImplementation.1.test |
@@QName: ImplementationRegistry.AtomImplementation.1.test |
738 |
@@PerlDef: |
@@PerlDef: |
739 |
require Message::Markup::Atom; |
require Message::Markup::Atom; |
740 |
my $impl = $Message::DOM::ImplementationRegistry |
my $impl = $Message::DOM::ImplementationRegistry |
741 |
->get_implementation ({ |
->get_dom_implementation ({ |
742 |
<Q::fe|Atom> => '1.0', |
<Q::fe|Atom> => '1.0', |
743 |
}); |
}); |
744 |
|
|
748 |
@@PerlDef: |
@@PerlDef: |
749 |
require Message::Markup::Atom; |
require Message::Markup::Atom; |
750 |
my $impl = $Message::DOM::ImplementationRegistry |
my $impl = $Message::DOM::ImplementationRegistry |
751 |
->get_implementation ({ |
->get_dom_implementation ({ |
752 |
Core => '3.0', |
Core => '3.0', |
753 |
<Q::fe|Atom> => '1.0', |
<Q::fe|Atom> => '1.0', |
754 |
}); |
}); |
759 |
@@PerlDef: |
@@PerlDef: |
760 |
require Message::Markup::Atom; |
require Message::Markup::Atom; |
761 |
my $impl = $Message::DOM::ImplementationRegistry |
my $impl = $Message::DOM::ImplementationRegistry |
762 |
->get_implementation ({ |
->get_dom_implementation ({ |
763 |
XML => '3.0', |
XML => '3.0', |
764 |
<Q::fe|Atom> => '1.0', |
<Q::fe|Atom> => '1.0', |
765 |
}); |
}); |
795 |
The implementation <kwd:MUST> treate <DOM::null> |
The implementation <kwd:MUST> treate <DOM::null> |
796 |
as if an empty string is specified. |
as if an empty string is specified. |
797 |
@@Return: |
@@Return: |
798 |
@@@Type: AtomFeedDocument |
@@@Type: AtomDocument |
799 |
@@@enDesc: |
@@@enDesc: |
800 |
The newly created Atom Feed Document. |
The newly created Atom Feed Document. |
801 |
|
|
978 |
The implementation <kwd:MUST> treate <DOM::null> |
The implementation <kwd:MUST> treate <DOM::null> |
979 |
as if an empty string is specified. |
as if an empty string is specified. |
980 |
@@Return: |
@@Return: |
981 |
@@@Type: AtomEntryDocument |
@@@Type: AtomDocument |
982 |
@@@enDesc: |
@@@enDesc: |
983 |
The newly created Atom Entry Document. |
The newly created Atom Entry Document. |
984 |
|
|
1521 |
<QUOTE::reflecting Date child element> attribute should |
<QUOTE::reflecting Date child element> attribute should |
1522 |
be provided for published and created? |
be provided for published and created? |
1523 |
} |
} |
|
##AtomImplementation |
|
1524 |
|
|
1525 |
IFClsDef: |
@CODE: |
1526 |
@IFQName: AtomDocument |
@@QName: getReflectAttrNonNegativeIntegerValue |
1527 |
@ClsQName: ManakaiAtomDocument |
@@enDesc: |
1528 |
|
{P:: If a DOM attribute is defined to <DFN::reflect the |
1529 |
|
non-negative integer value of the <VAR::attr-name> attribute> |
1530 |
|
of the node <VAR::E>, the getter of the attribute <kwd:MUST> |
1531 |
|
return the value defined by the algorithm: |
1532 |
|
|
1533 |
|
{OLI:: If the <VAR::E> contains an attribute node <VAR::A> whose name |
1534 |
|
is <VAR::attr-name>: |
1535 |
|
|
1536 |
|
= If the <A::Node.nodeValue> of the <VAR::A> is |
1537 |
|
one or more sequence of digits (<CHAR::DIGIT ZERO>, |
1538 |
|
<CHAR::DIGIT ONE>, ..., <CHAR::DIGIT NINE>) optionally |
1539 |
|
preceding by a <CHAR::PLUS SIGN>, then |
1540 |
|
the attribute getter <kwd:MUST> return a value |
1541 |
|
by interpreting the <A::Node.nodeValue> of the <VAR::A> |
1542 |
|
as a decimal number. |
1543 |
|
|
1544 |
@IFISA: Document |
} |
|
@ClsISA: td|ManakaiDOMDocument |
|
1545 |
|
|
1546 |
@s:rootElementType: AnyAtomElement||ManakaiDOM|all |
= If a default value is explicitly defined |
1547 |
|
where this algorithm is referenced, it <kwd:MUST> |
1548 |
|
return the default value. |
1549 |
|
|
1550 |
@enDesc: |
= Otherwise, it <kwd:MUST> return a binding-specific |
1551 |
If the <Feature::fe|Atom> feature version <FeatureVer::1.0> |
default value, if it is defined by the specification |
1552 |
is supported, a <IF::Document> object whose <A::Document.documentElement>'s |
of the binding, or <DOM::-1>. |
|
<A::Node.namespaceURI>, if any, is <URI^^DISCore|QName::atom|> at least |
|
|
at the time of creation <kwd:MUST> also |
|
|
implement the <IF::AtomDocument> interface. Other |
|
|
<IF:Document> objects <kwd:MAY> also implement |
|
|
the <IF::AtomDocument> interface. |
|
1553 |
|
|
1554 |
@Test: |
} |
|
@@QName: createDocument.AtomDocument.test |
|
|
@@PerlDef: |
|
|
my $impl; |
|
|
__CODE{tc|createImplForTest:: $impl => $impl}__; |
|
|
|
|
|
my $doc = $impl-><M::c|DOMImplementation.createDocument> |
|
|
(<Q::atom|>, 'unknown'); |
|
1555 |
|
|
1556 |
$test->id ('interface'); |
{NOTE:: |
1557 |
$test->assert_isa ($doc, <IFName::AtomDocument>); |
In Atom Threading Extension <SRC::RFC 4685>, |
1558 |
##AtomDocument |
the <CHAR::PLUS SIGN> and leading <CHAR::DIGIT ZERO>s |
1559 |
|
are prohibitted. |
1560 |
|
} |
1561 |
|
@@PerlDef: |
1562 |
|
__DEEP{ |
1563 |
|
E: { |
1564 |
|
$r = $node-><M::Element.getAttributeNS> ($namespaceURI, $localName); |
1565 |
|
if (defined $r) { |
1566 |
|
if ($r =~ /\A\+?([0-9]+)\z/) { |
1567 |
|
$r = 0+$1; |
1568 |
|
last E; |
1569 |
|
} |
1570 |
|
} |
1571 |
|
|
1572 |
IFClsDef: |
$r = $defaultValue; |
1573 |
@IFQName: AtomFeedDocument |
$r = -1 unless defined $r; |
1574 |
@ClsQName: ManakaiFeedEntryDocument |
} # E |
1575 |
|
}__; |
1576 |
|
|
1577 |
@IFISA: AtomDocument |
@CODE: |
1578 |
@ClsISA: ManakaiAtomDocument |
@@QName: setReflectAttrNonNegativeIntegerValue |
1579 |
|
@@enDesc: |
1580 |
|
{P:: If a DOM attribute is defined to <DFN::reflect the |
1581 |
|
non-negative integer value |
1582 |
|
of the <VAR::attr-name> attribute> of the node <VAR::E>, |
1583 |
|
the setter of the attribute <kwd:MUST> modify the node as |
1584 |
|
defined by the algorithm: |
1585 |
|
|
1586 |
@s:rootElementType: |
= If the given value is <DOM::-1> or one of binding-specific |
1587 |
@@@: atom|feed |
default values, if any, as defined by the specification |
1588 |
@@DISCore:stopISARecursive: 1 |
of the binding, it <kwd:MUST> |
1589 |
|
remove the <VAR::attr-name> attribute node, if any, |
1590 |
|
from the list of attribute nodes of <VAR::E>. |
1591 |
|
|
1592 |
@enDesc: |
= Otherwise, it <kwd:MUST> set the <VAR::attr-name> |
1593 |
The <IF::AtomFeedDocument> interface provides convenience |
attribute node value to a string representation |
1594 |
methods and attributes for an Atom |
of the given value as if |
1595 |
Feed Document, i.e. representation of an Atom feed. |
the <M::Element.setAttributeNS> method were invoked. |
1596 |
|
The string representation <kwd:MUST> be a decimal |
1597 |
|
number consist of one or more sequence of digits |
1598 |
|
(<CHAR::DIGIT ZERO>, <CHAR::DIGIT ONE>, ..., <CHAR::DIGIT NINE>) |
1599 |
|
<EM::without> any leading <CHAR::DIGIT ZERO>. |
1600 |
|
The <CHAR::PLUS SIGN> <kwd:MUST> be omitted. |
1601 |
|
|
1602 |
If the <Feature::fe|Atom> feature version <FeatureVer::1.0> |
} |
|
is supported, a <IF::Document> object whose <A::Document.documentElement>'s |
|
|
element type, if any, is <XE::atom|feed> at least at |
|
|
the time of creation <kwd:MUST> also |
|
|
implement the <IF::AtomFeedDocument> interface. Other |
|
|
<IF::Document> objects <kwd:MAY> also implement |
|
|
the <IF::AtomFeedDocument> interface. |
|
1603 |
|
|
1604 |
@Test: |
{NOTE:: |
1605 |
@@QName: createDocument.AtomFeedDocument.test |
It might throw an exception. |
1606 |
|
} |
1607 |
@@PerlDef: |
@@PerlDef: |
1608 |
my $impl; |
__DEEP{ |
1609 |
__CODE{tc|createImplForTest:: $impl => $impl}__; |
if (defined $given and $given >= 0) { |
1610 |
|
$node-><M::Element.setAttributeNS> |
1611 |
my $doc = $impl-><M::c|DOMImplementation.createDocument> |
($namespaceURI, $localName, 0+$given); |
1612 |
(<Q::atom|>, 'feed'); |
} else { |
1613 |
|
$node-><M::Element.removeAttributeNS> ($namespaceURI, $localName); |
1614 |
$test->id ('interface'); |
} |
1615 |
$test->assert_isa ($doc, <IFName::AtomFeedDocument>); |
}__; |
1616 |
##AtomFeedDocument |
##AtomImplementation |
1617 |
|
|
1618 |
IFClsDef: |
IFClsDef: |
1619 |
@IFQName: AtomEntryDocument |
@IFQName: AtomDocument |
1620 |
@ClsQName: ManakaiAtomEntryDocument |
@ClsQName: ManakaiAtomDocument |
1621 |
|
|
1622 |
@IFISA: AtomDocument |
@domperl:implementedByObjectsOf: Document |
1623 |
@ClsISA: ManakaiAtomDocument |
@domperl:classImplementedByObjectsOf: td|ManakaiDOMDocument |
1624 |
|
|
1625 |
@s:rootElementType: |
@f:implements: AtomFeature10 |
|
@@@: atom|entry |
|
|
@@DISCore:stopISARecursive: 1 |
|
1626 |
|
|
1627 |
@enDesc: |
@enDesc: |
|
The <IF::AtomEntryDocument> interface provides convenience |
|
|
methods and attributes for an Atom |
|
|
Entry Document, i.e. exactly one Atom entry, outside |
|
|
of the context of an Atom feed. |
|
|
|
|
1628 |
If the <Feature::fe|Atom> feature version <FeatureVer::1.0> |
If the <Feature::fe|Atom> feature version <FeatureVer::1.0> |
1629 |
is supported, a <IF::Document> object whose <A::Document.documentElement>'s |
is supported, a <IF::Document> object whose <A::Document.documentElement>'s |
1630 |
element type, if any, is <XE::atom|entry> at least at |
<A::Node.namespaceURI>, if any, is <URI^^DISCore|QName::atom|> at least |
1631 |
the time of the creation <kwd:MUST> also |
at the time of creation <kwd:MUST> also |
1632 |
implement the <IF::AtomEntryDocument> interface. Other |
implement the <IF::AtomDocument> interface. Other |
1633 |
<IF::Document> objects <kwd:MAY> also implement |
<IF:Document> objects <kwd:MAY> also implement |
1634 |
the <IF::AtomEntryDocument> interface. |
the <IF::AtomDocument> interface. |
1635 |
|
|
1636 |
@Test: |
@Test: |
1637 |
@@QName: createDocument.AtomEntryDocument.test |
@@QName: createDocument.AtomDocument.test |
1638 |
@@PerlDef: |
@@PerlDef: |
1639 |
my $impl; |
my $impl; |
1640 |
__CODE{tc|createImplForTest:: $impl => $impl}__; |
__CODE{tc|createImplForTest:: $impl => $impl}__; |
1641 |
|
|
1642 |
my $doc = $impl-><M::c|DOMImplementation.createDocument> |
my $doc = $impl-><M::c|DOMImplementation.createDocument> |
1643 |
(<Q::atom|>, 'entry'); |
(<Q::atom|>, 'unknown'); |
1644 |
|
|
1645 |
$test->id ('interface'); |
$test->id ('interface'); |
1646 |
$test->assert_isa ($doc, <IFName::AtomEntryDocument>); |
$test->assert_isa ($doc, <IFName::AtomDocument>); |
1647 |
##AtomEntryDocument |
##AtomDocument |
1648 |
|
|
1649 |
AGDef: |
AGDef: |
1650 |
@QName: atomCommonAttributes |
@QName: atomCommonAttributes |
1651 |
@enFN: common attributes |
@enFN: common attributes |
1652 |
@mv:attributeTypeGroupName: common |
@mv:attributeTypeGroupName: common |
1653 |
|
|
1654 |
|
@mv:refers: Atom |
1655 |
|
|
1656 |
@ATDef: |
@ATDef: |
1657 |
@@mv:attributeTypeName: xml|base |
@@mv:attributeTypeName: xml|base |
1756 |
@IFISA: Element |
@IFISA: Element |
1757 |
@ClsISA: te|ManakaiDOMElement |
@ClsISA: te|ManakaiDOMElement |
1758 |
|
|
1759 |
|
@f:implements: AtomFeature10 |
1760 |
@s:elementType: AnyAtomElement||ManakaiDOM|all |
@s:elementType: AnyAtomElement||ManakaiDOM|all |
1761 |
|
|
1762 |
@enDesc: |
@enDesc: |
1826 |
@IFISA: AtomElement |
@IFISA: AtomElement |
1827 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
1828 |
|
|
1829 |
|
@f:implements: AtomFeature10 |
1830 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
1831 |
|
|
1832 |
@cm: |
@cm: |
1968 |
@IFISA: AtomElement |
@IFISA: AtomElement |
1969 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
1970 |
|
|
1971 |
|
@f:implements: AtomFeature10 |
1972 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
1973 |
|
|
1974 |
@cm: |
@cm: |
2125 |
@IFISA: AtomElement |
@IFISA: AtomElement |
2126 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
2127 |
|
|
2128 |
|
@f:implements: AtomFeature10 |
2129 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
2130 |
|
|
2131 |
@cm: |
@cm: |
2233 |
@IFISA: AtomElement |
@IFISA: AtomElement |
2234 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
2235 |
|
|
2236 |
|
@f:implements: AtomFeature10 |
2237 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
2238 |
|
|
2239 |
@cm: |
@cm: |
2842 |
(<Q::atom|>, 'updated'); |
(<Q::atom|>, 'updated'); |
2843 |
$updatede-><AS::AtomDateConstruct.value> (scalar time); |
$updatede-><AS::AtomDateConstruct.value> (scalar time); |
2844 |
$r-><M::Node.appendChild> ($updatede); |
$r-><M::Node.appendChild> ($updatede); |
2845 |
|
|
2846 |
|
$self-><M::Node.appendChild> ($r); |
2847 |
}__; |
}__; |
2848 |
|
|
2849 |
@@Test: |
@@Test: |
2910 |
$test->assert_num_not_equals |
$test->assert_num_not_equals |
2911 |
(actual_value => $updated-><AG::AtomDateConstruct.value>, |
(actual_value => $updated-><AG::AtomDateConstruct.value>, |
2912 |
expected_value => 0); |
expected_value => 0); |
2913 |
|
|
2914 |
|
$test->id ('parent'); |
2915 |
|
$test->assert_equals ($ent-><AG::Node.parentNode>, $feed); |
2916 |
@@Test: |
@@Test: |
2917 |
@@@QName: AtomFeedElement.addNewEntry.2.test |
@@@QName: AtomFeedElement.addNewEntry.2.test |
2918 |
@@@enDesc: |
@@@enDesc: |
2957 |
@IFISA: AtomElement |
@IFISA: AtomElement |
2958 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
2959 |
|
|
2960 |
|
@f:implements: AtomFeature10 |
2961 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
2962 |
|
|
2963 |
@cm: |
@cm: |
3491 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3492 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3493 |
|
|
3494 |
|
@f:implements: AtomFeature10 |
3495 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
3496 |
|
|
3497 |
@cm: atomUriCM |
@cm: atomUriCM |
3506 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3507 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3508 |
|
|
3509 |
|
@f:implements: AtomFeature10 |
3510 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
3511 |
|
|
3512 |
@cm: atomUriCM |
@cm: atomUriCM |
3521 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3522 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3523 |
|
|
3524 |
|
@f:implements: AtomFeature10 |
3525 |
# no common attribs |
# no common attribs |
3526 |
@cm: TextCM |
@cm: TextCM |
3527 |
|
|
3528 |
|
@mv:refers: Atom |
3529 |
##AtomNameElement |
##AtomNameElement |
3530 |
|
|
3531 |
IFClsETDef: |
IFClsETDef: |
3537 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3538 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3539 |
|
|
3540 |
|
@f:implements: AtomFeature10 |
3541 |
# no common attribs |
# no common attribs |
3542 |
@cm: atomUriCM |
@cm: atomUriCM |
3543 |
|
|
3544 |
|
@mv:refers: Atom |
3545 |
##AtomUriElement |
##AtomUriElement |
3546 |
|
|
3547 |
IFClsETDef: |
IFClsETDef: |
3553 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3554 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3555 |
|
|
3556 |
|
@f:implements: AtomFeature10 |
3557 |
# no common attribs |
# no common attribs |
3558 |
@cm: atomEmailAddressCM |
@cm: atomEmailAddressCM |
3559 |
|
|
3560 |
|
@mv:refers: Atom |
3561 |
##AtomEmailElement |
##AtomEmailElement |
3562 |
|
|
3563 |
IFClsETDef: |
IFClsETDef: |
3569 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3570 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3571 |
|
|
3572 |
|
@f:implements: AtomFeature10 |
3573 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
3574 |
|
|
3575 |
@cm: atomUriCM |
@cm: atomUriCM |
3584 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3585 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3586 |
|
|
3587 |
|
@f:implements: AtomFeature10 |
3588 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
3589 |
|
|
3590 |
@cm: |
@cm: |
3594 |
The <XE::atom|content> element either contains or links to |
The <XE::atom|content> element either contains or links to |
3595 |
the content of the entry. |
the content of the entry. |
3596 |
|
|
3597 |
@Attr: |
@ATTR: |
3598 |
@@Name: type |
@@Name: type |
3599 |
@@enDesc: |
@@enDesc: |
3600 |
The type of the element. |
The type of the element. |
3659 |
$el-><AS::AtomContentElement.type> (null); |
$el-><AS::AtomContentElement.type> (null); |
3660 |
$test->assert_null ($el-><AG::AtomContentElement.type>); |
$test->assert_null ($el-><AG::AtomContentElement.type>); |
3661 |
|
|
3662 |
@Attr: |
@ATTR: |
3663 |
@@Name: src |
@@Name: src |
3664 |
@@enDesc: |
@@enDesc: |
3665 |
The source of the remote content of the element. |
The source of the remote content of the element. |
3838 |
|
|
3839 |
@IFISA: AtomPersonConstruct |
@IFISA: AtomPersonConstruct |
3840 |
@ClsISA: ManakaiAtomPersonConstruct |
@ClsISA: ManakaiAtomPersonConstruct |
3841 |
|
|
3842 |
|
@f:implements: AtomFeature10 |
3843 |
@mv:refers: PersonAG |
@mv:refers: PersonAG |
3844 |
@mv:elementContentModel: PersonCM |
@mv:elementContentModel: PersonCM |
3845 |
|
|
3857 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3858 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3859 |
|
|
3860 |
|
@f:implements: AtomFeature10 |
3861 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
3862 |
|
|
3863 |
@cm: undefinedContent |
@cm: undefinedContent |
3975 |
|
|
3976 |
@IFISA: AtomPersonConstruct |
@IFISA: AtomPersonConstruct |
3977 |
@ClsISA: ManakaiAtomPersonConstruct |
@ClsISA: ManakaiAtomPersonConstruct |
3978 |
|
|
3979 |
|
@f:implements: AtomFeature10 |
3980 |
@mv:refers: PersonAG |
@mv:refers: PersonAG |
3981 |
@mv:elementContentModel: PersonCM |
@mv:elementContentModel: PersonCM |
3982 |
|
|
3995 |
@IFISA: AtomElement |
@IFISA: AtomElement |
3996 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
3997 |
|
|
3998 |
|
@f:implements: AtomFeature10 |
3999 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
4000 |
|
|
4001 |
@cm: |
@cm: |
4082 |
@IFISA: AtomElement |
@IFISA: AtomElement |
4083 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
4084 |
|
|
4085 |
|
@f:implements: AtomFeature10 |
4086 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
4087 |
|
|
4088 |
@cm: undefinedContent |
@cm: undefinedContent |
4218 |
of the <XA::type> attribute> of the node. |
of the <XA::type> attribute> of the node. |
4219 |
@@Type: DOMString |
@@Type: DOMString |
4220 |
@@Get: |
@@Get: |
4221 |
|
@@@enDesc: |
4222 |
|
{P:: If the feature <Feature^^DISCore|QName::AtomThreadingFeature10> |
4223 |
|
is supported, the attribute getter <kwd:MUST> return |
4224 |
|
the string <CODE::application/atom+xml> when both of the |
4225 |
|
following conditions are met: |
4226 |
|
|
4227 |
|
- The attribute getter would otherwise return <DOM::null>. |
4228 |
|
|
4229 |
|
- The <A::AtomLinkElement.rel> attribute contains |
4230 |
|
a string value of <URI^^DISCore|QName::rel|replies>. |
4231 |
|
|
4232 |
|
} |
4233 |
@@@nullCase: |
@@@nullCase: |
4234 |
@@@@enDesc: |
@@@@enDesc: |
4235 |
If the algorithm returns <DOM::null>. |
If the algorithm returns <DOM::null>. |
4241 |
$r => $r, |
$r => $r, |
4242 |
$defaultValue => {null}, |
$defaultValue => {null}, |
4243 |
}__; |
}__; |
4244 |
|
|
4245 |
|
unless (defined $r) { |
4246 |
|
__DEEP{ |
4247 |
|
my $rel = $self-><AG::AtomLinkElement.rel>; |
4248 |
|
if (defined $rel and $rel eq <Q::rel|replies>) { |
4249 |
|
$r = q<application/atom+xml>; |
4250 |
|
} |
4251 |
|
}__; |
4252 |
|
} |
4253 |
@@Set: |
@@Set: |
4254 |
@@@nullCase: |
@@@nullCase: |
4255 |
@@@@enDesc: |
@@@@enDesc: |
4263 |
$given => $given, |
$given => $given, |
4264 |
}__; |
}__; |
4265 |
|
|
4266 |
|
@@Test: |
4267 |
|
@@@QName: AtomLinkElement.type.!rel.test |
4268 |
|
@@@PerlDef: |
4269 |
|
my $doc; |
4270 |
|
__CODE{tc|createEmptyDocumentForTest:: $doc => $doc}__; |
4271 |
|
|
4272 |
|
my $el = $doc-><M::Document.createElementNS> (<Q::atom|>, 'link'); |
4273 |
|
|
4274 |
|
$test->id ('implied'); |
4275 |
|
my $type0 = $el-><AG::AtomLinkElement.type>; |
4276 |
|
$test->assert_null ($type0); |
4277 |
|
|
4278 |
|
$test->id ('explicit'); |
4279 |
|
$el-><AS::AtomLinkElement.type> ('application/atom+xml'); |
4280 |
|
my $type1 = $el-><AG::AtomLinkElement.type>; |
4281 |
|
$test->assert_equals ($type1, q<application/atom+xml>); |
4282 |
|
|
4283 |
|
$test->id ('different'); |
4284 |
|
$el-><AS::AtomLinkElement.type> ('application/xhtml+xml'); |
4285 |
|
my $type2 = $el-><AG::AtomLinkElement.type>; |
4286 |
|
$test->assert_equals ($type2, q<application/xhtml+xml>); |
4287 |
|
@@Test: |
4288 |
|
@@@QName: AtomLinkElement.type.rel!=replies.test |
4289 |
|
@@@PerlDef: |
4290 |
|
my $doc; |
4291 |
|
__CODE{tc|createEmptyDocumentForTest:: $doc => $doc}__; |
4292 |
|
|
4293 |
|
my $el = $doc-><M::Document.createElementNS> (<Q::atom|>, 'link'); |
4294 |
|
|
4295 |
|
$el-><AS::AtomLinkElement.rel> (<Q::rel|alternate>); |
4296 |
|
|
4297 |
|
$test->id ('implied'); |
4298 |
|
my $type0 = $el-><AG::AtomLinkElement.type>; |
4299 |
|
$test->assert_null ($type0); |
4300 |
|
|
4301 |
|
$test->id ('explicit'); |
4302 |
|
$el-><AS::AtomLinkElement.type> ('application/atom+xml'); |
4303 |
|
my $type1 = $el-><AG::AtomLinkElement.type>; |
4304 |
|
$test->assert_equals ($type1, q<application/atom+xml>); |
4305 |
|
|
4306 |
|
$test->id ('different'); |
4307 |
|
$el-><AS::AtomLinkElement.type> ('application/xhtml+xml'); |
4308 |
|
my $type2 = $el-><AG::AtomLinkElement.type>; |
4309 |
|
$test->assert_equals ($type2, q<application/xhtml+xml>); |
4310 |
|
@@Test: |
4311 |
|
@@@QName: AtomLinkElement.type.rel=replies.test |
4312 |
|
@@@PerlDef: |
4313 |
|
my $doc; |
4314 |
|
__CODE{tc|createEmptyDocumentForTest:: $doc => $doc}__; |
4315 |
|
|
4316 |
|
my $el = $doc-><M::Document.createElementNS> (<Q::atom|>, 'link'); |
4317 |
|
|
4318 |
|
$el-><AS::AtomLinkElement.rel> (<Q::rel|replies>); |
4319 |
|
|
4320 |
|
$test->id ('implied'); |
4321 |
|
my $type0 = $el-><AG::AtomLinkElement.type>; |
4322 |
|
$test->assert_equals ($type0, q<application/atom+xml>); |
4323 |
|
|
4324 |
|
$test->id ('explicit'); |
4325 |
|
$el-><AS::AtomLinkElement.type> ('application/atom+xml'); |
4326 |
|
my $type1 = $el-><AG::AtomLinkElement.type>; |
4327 |
|
$test->assert_equals ($type1, q<application/atom+xml>); |
4328 |
|
|
4329 |
|
$test->id ('different'); |
4330 |
|
$el-><AS::AtomLinkElement.type> ('application/xhtml+xml'); |
4331 |
|
my $type2 = $el-><AG::AtomLinkElement.type>; |
4332 |
|
$test->assert_equals ($type2, q<application/xhtml+xml>); |
4333 |
|
|
4334 |
@ATTR: |
@ATTR: |
4335 |
@@Name: hreflang |
@@Name: hreflang |
4336 |
@@enDesc: |
@@enDesc: |
4439 |
|
|
4440 |
@IFISA: AtomDateConstruct |
@IFISA: AtomDateConstruct |
4441 |
@ClsISA: ManakaiAtomDateConstruct |
@ClsISA: ManakaiAtomDateConstruct |
4442 |
|
|
4443 |
|
@f:implements: AtomFeature10 |
4444 |
@mv:refers: DateAG |
@mv:refers: DateAG |
4445 |
@mv:elementContentModel: DateCM |
@mv:elementContentModel: DateCM |
4446 |
|
|
4461 |
|
|
4462 |
@IFISA: AtomTextConstruct |
@IFISA: AtomTextConstruct |
4463 |
@ClsISA: ManakaiAtomTextConstruct |
@ClsISA: ManakaiAtomTextConstruct |
4464 |
|
|
4465 |
|
@f:implements: AtomFeature10 |
4466 |
@mv:refers: TextAG |
@mv:refers: TextAG |
4467 |
@mv:elementContentModel: TextCM |
@mv:elementContentModel: TextCM |
4468 |
|
|
4498 |
@IFISA: AtomElement |
@IFISA: AtomElement |
4499 |
@ClsISA: ManakaiAtomElement |
@ClsISA: ManakaiAtomElement |
4500 |
|
|
4501 |
|
@f:implements: AtomFeature10 |
4502 |
@mv:refers: atomCommonAttributes |
@mv:refers: atomCommonAttributes |
4503 |
|
|
4504 |
@cm: |
@cm: |
4713 |
|
|
4714 |
@IFISA: AtomTextConstruct |
@IFISA: AtomTextConstruct |
4715 |
@ClsISA: ManakaiAtomTextConstruct |
@ClsISA: ManakaiAtomTextConstruct |
4716 |
|
|
4717 |
|
@f:implements: AtomFeature10 |
4718 |
@mv:refers: TextAG |
@mv:refers: TextAG |
4719 |
@mv:elementContentModel: TextCM |
@mv:elementContentModel: TextCM |
4720 |
|
|
4731 |
|
|
4732 |
@IFISA: AtomTextConstruct |
@IFISA: AtomTextConstruct |
4733 |
@ClsISA: ManakaiAtomTextConstruct |
@ClsISA: ManakaiAtomTextConstruct |
4734 |
|
|
4735 |
|
@f:implements: AtomFeature10 |
4736 |
@mv:refers: TextAG |
@mv:refers: TextAG |
4737 |
@mv:elementContentModel: TextCM |
@mv:elementContentModel: TextCM |
4738 |
|
|
4749 |
|
|
4750 |
@IFISA: AtomTextConstruct |
@IFISA: AtomTextConstruct |
4751 |
@ClsISA: ManakaiAtomTextConstruct |
@ClsISA: ManakaiAtomTextConstruct |
4752 |
|
|
4753 |
|
@f:implements: AtomFeature10 |
4754 |
@mv:refers: TextAG |
@mv:refers: TextAG |
4755 |
@mv:elementContentModel: TextCM |
@mv:elementContentModel: TextCM |
4756 |
|
|
4767 |
|
|
4768 |
@IFISA: AtomDateConstruct |
@IFISA: AtomDateConstruct |
4769 |
@ClsISA: ManakaiAtomDateConstruct |
@ClsISA: ManakaiAtomDateConstruct |
4770 |
|
|
4771 |
|
@f:implements: AtomFeature10 |
4772 |
@mv:refers: DateAG |
@mv:refers: DateAG |
4773 |
@mv:elementContentModel: DateCM |
@mv:elementContentModel: DateCM |
4774 |
|
|
4891 |
@cm: dxm|ANY||ManakaiDOM|all |
@cm: dxm|ANY||ManakaiDOM|all |
4892 |
@enImplNote: |
@enImplNote: |
4893 |
(text | anyForeignElement)* |
(text | anyForeignElement)* |
4894 |
|
|
4895 |
|
## -- Atom Threading Extension [RFC 4685] |
4896 |
|
|
4897 |
|
IFClsDef: |
4898 |
|
@IFQName: AtomEntryElementThread |
4899 |
|
@ClsQName: ManakaiAtomEntryElementThread |
4900 |
|
|
4901 |
|
@ClsISA: ManakaiAtomEntryElement |
4902 |
|
|
4903 |
|
@f:implements: AtomThreadingFeature10 |
4904 |
|
|
4905 |
|
@enDesc: |
4906 |
|
If the feature <Feature^^DISCore|QName::AtomThreadingFeature10> |
4907 |
|
is supported, any <IF::Element> whose element type |
4908 |
|
is <XE::atom|entry> <kwd:MUST> implement the <IF::AtomEntryElementThread> |
4909 |
|
interface in addition to other appropriate interfaces. |
4910 |
|
|
4911 |
|
@Test: |
4912 |
|
@@QName: AtomEntryElementThread.1.test |
4913 |
|
@@PerlDef: |
4914 |
|
my $doc; |
4915 |
|
__CODE{tc|createEmptyDocumentForTest:: $doc => $doc}__; |
4916 |
|
|
4917 |
|
my $el = $doc->create_element_ns (<Q::atom|>, 'entry'); |
4918 |
|
|
4919 |
|
$test->id ('interface'); |
4920 |
|
$test->assert_isa ($el, <IFName::AtomEntryElementThread>); |
4921 |
|
|
4922 |
|
$test->id ('feature'); |
4923 |
|
$test->assert_true ($el->is_supported (<Q::fe|AtomThreading> => '1.0')); |
4924 |
|
|
4925 |
|
@Attr: |
4926 |
|
@@Name: threadInReplyToElements |
4927 |
|
@@enDesc: |
4928 |
|
A static list of <XE::thr|in-reply-to> child elements of the node. |
4929 |
|
@@Type: StaticNodeList |
4930 |
|
@@Get: |
4931 |
|
@@@enDesc: |
4932 |
|
It <kwd:MUST> <I::return a <XE::thr|in-reply-to> child element list> |
4933 |
|
of the node. |
4934 |
|
@@@PerlDef: |
4935 |
|
__CODE{returnChildElementList:: |
4936 |
|
$node => $self, |
4937 |
|
$namespaceURI => {<Q::thr|>}, |
4938 |
|
$localName => 'in-reply-to', |
4939 |
|
$r => $r, |
4940 |
|
}__; |
4941 |
|
##AtomEntryElementThread |
4942 |
|
|
4943 |
|
IFClsETDef: |
4944 |
|
@IFQName: AtomThreadInReplyToElement |
4945 |
|
@ETQName: thr|in-reply-to |
4946 |
|
@ETRQName: thr|in-reply-to |
4947 |
|
@ClsQName: ManakaiAtomThreadInReplyToElement |
4948 |
|
|
4949 |
|
@IFISA: AtomDateConstruct |
4950 |
|
@ClsISA: ManakaiAtomDateConstruct |
4951 |
|
|
4952 |
|
@f:implements: AtomThreadingFeature10 |
4953 |
|
@mv:refers: atomCommonAttributes |
4954 |
|
|
4955 |
|
@cm: undefinedContent |
4956 |
|
|
4957 |
|
@enDesc: |
4958 |
|
The <XE::thr|in-reply-to> element is used to indicate |
4959 |
|
that an entry is a response to another resource. |
4960 |
|
|
4961 |
|
If the entry is a response to multiple resources, |
4962 |
|
additional <XE::thr|in-reply-to> element <kwd:MAY> |
4963 |
|
be used. |
4964 |
|
|
4965 |
|
RFC 4685 assigns no significance to the order in which |
4966 |
|
multiple <XE::thr|in-reply-to> element appear within |
4967 |
|
an entry. |
4968 |
|
|
4969 |
|
@Test: |
4970 |
|
@@QName: AtomThreadInReplyToElement.1.test |
4971 |
|
@@PerlDef: |
4972 |
|
my $doc; |
4973 |
|
__CODE{tc|createEmptyDocumentForTest:: $doc => $doc}__; |
4974 |
|
|
4975 |
|
my $el = $doc->create_element_ns (<Q::thr|>, 'in-reply-to'); |
4976 |
|
|
4977 |
|
$test->id ('interface'); |
4978 |
|
$test->assert_isa ($el, <IFName::AtomThreadInReplyToElement>); |
4979 |
|
|
4980 |
|
$test->id ('feature'); |
4981 |
|
$test->assert_true ($el->is_supported (<Q::fe|AtomThreading> => '1.0')); |
4982 |
|
|
4983 |
|
@ATTR: |
4984 |
|
@@Name: ref |
4985 |
|
@@enDesc: |
4986 |
|
The <XA::ref> attribute of the element. |
4987 |
|
|
4988 |
|
It <kwd:MUST> <I::reflect the URI value |
4989 |
|
of the <XA::ref> attribute> of the node. |
4990 |
|
|
4991 |
|
The <XA::ref> attribute specifies the persistent, |
4992 |
|
universally unique identifier of the resource being |
4993 |
|
responded to. The value <kwd:MUST> conform to |
4994 |
|
the same construction and comparison rules as the |
4995 |
|
value of the <XE::atom|id> element. Though the IRI |
4996 |
|
might use a dereferenceable scheme, processors <kwd:MUST-NOT> |
4997 |
|
assume that it can be dereferenced. |
4998 |
|
|
4999 |
|
The <XE::thr|in-reply-to> element <kwd:MUST> contain |
5000 |
|
a <XA::ref> attribute identifying the resource that |
5001 |
|
is being respnoded to. |
5002 |
|
|
5003 |
|
If the resource being responded to does not have a persistent, |
5004 |
|
universally unique identifier, the publisher <kwd:MUST> assign an |
5005 |
|
identifier that satisfies all the considerations in Section 4.2.6 of |
5006 |
|
RFC 4287 for use as the value of the <XA::ref> attribute. |
5007 |
|
In that case, if a representation of the resource can be retrieved |
5008 |
|
from an IRI that can be used as a valid atom:id value, then this IRI |
5009 |
|
<kwd:SHOULD> be used as the value of both the <XA::ref> and |
5010 |
|
<XA::href> attributes. |
5011 |
|
@@Type: DOMString |
5012 |
|
@@actualType: DOMURI |
5013 |
|
@@Get: |
5014 |
|
@@@nullCase: |
5015 |
|
@@@@enDesc: |
5016 |
|
If the algorithm returns <DOM::null>. |
5017 |
|
@@@PerlDef: |
5018 |
|
__CODE{getReflectAttrURIValue:: |
5019 |
|
$node => $self, |
5020 |
|
$namespaceURI => {null}, |
5021 |
|
$localName => 'ref', |
5022 |
|
$r => $r, |
5023 |
|
$defaultValue => {null}, |
5024 |
|
}__; |
5025 |
|
@@Set: |
5026 |
|
@@@nullCase: |
5027 |
|
@@@@enDesc: |
5028 |
|
Removes the attribute. |
5029 |
|
@@@NodeReadOnlyError: |
5030 |
|
@@@PerlDef: |
5031 |
|
__CODE{setReflectAttrURIValue:: |
5032 |
|
$node => $self, |
5033 |
|
$namespaceURI => {null}, |
5034 |
|
$localName => 'ref', |
5035 |
|
$given => $given, |
5036 |
|
}__; |
5037 |
|
|
5038 |
|
@ATTR: |
5039 |
|
@@Name: source |
5040 |
|
@@enDesc: |
5041 |
|
The <XA::source> attribute of the element. |
5042 |
|
|
5043 |
|
It <kwd:MUST> <I::reflect the URI value |
5044 |
|
of the <XA::source> attribute> of the node. |
5045 |
|
|
5046 |
|
The <XA::source> attribute <kwd:MAY> be used to specify the IRI |
5047 |
|
of an Atom Feed or Entry Document containing an |
5048 |
|
<XE::atom|entry> with an <XE::atom|id> value equal to the |
5049 |
|
value of the <XA::ref> attribute. The IRI specified <kwd:MUST> |
5050 |
|
be dereferenceable. |
5051 |
|
@@Type: DOMString |
5052 |
|
@@actualType: DOMURI |
5053 |
|
@@Get: |
5054 |
|
@@@nullCase: |
5055 |
|
@@@@enDesc: |
5056 |
|
If the algorithm returns <DOM::null>. |
5057 |
|
@@@PerlDef: |
5058 |
|
__CODE{getReflectAttrURIValue:: |
5059 |
|
$node => $self, |
5060 |
|
$namespaceURI => {null}, |
5061 |
|
$localName => 'source', |
5062 |
|
$r => $r, |
5063 |
|
$defaultValue => {null}, |
5064 |
|
}__; |
5065 |
|
@@Set: |
5066 |
|
@@@nullCase: |
5067 |
|
@@@@enDesc: |
5068 |
|
Removes the attribute. |
5069 |
|
@@@NodeReadOnlyError: |
5070 |
|
@@@PerlDef: |
5071 |
|
__CODE{setReflectAttrURIValue:: |
5072 |
|
$node => $self, |
5073 |
|
$namespaceURI => {null}, |
5074 |
|
$localName => 'source', |
5075 |
|
$given => $given, |
5076 |
|
}__; |
5077 |
|
|
5078 |
|
@ATTR: |
5079 |
|
@@Name: href |
5080 |
|
@@enDesc: |
5081 |
|
The <XA::href> attribute of the element. |
5082 |
|
|
5083 |
|
It <kwd:MUST> <I::reflect the URI value |
5084 |
|
of the <XA::href> attribute> of the node. |
5085 |
|
|
5086 |
|
The <XA::href> attribute specifies an IRI that may be used |
5087 |
|
to retrieve a representation of the resource being |
5088 |
|
responded to. The IRI specified <kwd:MUST> be |
5089 |
|
dereferenceable. |
5090 |
|
@@Type: DOMString |
5091 |
|
@@actualType: DOMURI |
5092 |
|
@@Get: |
5093 |
|
@@@nullCase: |
5094 |
|
@@@@enDesc: |
5095 |
|
If the algorithm returns <DOM::null>. |
5096 |
|
@@@PerlDef: |
5097 |
|
__CODE{getReflectAttrURIValue:: |
5098 |
|
$node => $self, |
5099 |
|
$namespaceURI => {null}, |
5100 |
|
$localName => 'href', |
5101 |
|
$r => $r, |
5102 |
|
$defaultValue => {null}, |
5103 |
|
}__; |
5104 |
|
@@Set: |
5105 |
|
@@@nullCase: |
5106 |
|
@@@@enDesc: |
5107 |
|
Removes the attribute. |
5108 |
|
@@@NodeReadOnlyError: |
5109 |
|
@@@PerlDef: |
5110 |
|
__CODE{setReflectAttrURIValue:: |
5111 |
|
$node => $self, |
5112 |
|
$namespaceURI => {null}, |
5113 |
|
$localName => 'href', |
5114 |
|
$given => $given, |
5115 |
|
}__; |
5116 |
|
|
5117 |
|
@ATTR: |
5118 |
|
@@Name: type |
5119 |
|
@@enDesc: |
5120 |
|
The <XA::type> attribute of the element. |
5121 |
|
|
5122 |
|
It <kwd:MUST> <I::reflect the string value |
5123 |
|
of the <XA::type> attribute> of the node. |
5124 |
|
|
5125 |
|
The <XA::type> attribute <kwd:MAY> be used to provide |
5126 |
|
a hint to the client about the media type of the |
5127 |
|
resource identified by the <XA::href> attribute. |
5128 |
|
The <XA::type> attribute is only meaningful if a |
5129 |
|
corresponding <XA::href> attribute is also provided. |
5130 |
|
@@Type: DOMString |
5131 |
|
@@Get: |
5132 |
|
@@@nullCase: |
5133 |
|
@@@@enDesc: |
5134 |
|
If the algorithm returns <DOM::null>. |
5135 |
|
@@@PerlDef: |
5136 |
|
__CODE{getReflectAttrStringValue:: |
5137 |
|
$node => $self, |
5138 |
|
$namespaceURI => {null}, |
5139 |
|
$localName => 'type', |
5140 |
|
$r => $r, |
5141 |
|
$defaultValue => {null}, |
5142 |
|
}__; |
5143 |
|
@@Set: |
5144 |
|
@@@nullCase: |
5145 |
|
@@@@enDesc: |
5146 |
|
Removes the attribute. |
5147 |
|
@@@NodeReadOnlyError: |
5148 |
|
@@@PerlDef: |
5149 |
|
__CODE{setReflectAttrStringValue:: |
5150 |
|
$node => $self, |
5151 |
|
$namespaceURI => {null}, |
5152 |
|
$localName => 'type', |
5153 |
|
$given => $given, |
5154 |
|
}__; |
5155 |
|
##AtomThreadInReplyToElement |
5156 |
|
|
5157 |
|
IFClsDef: |
5158 |
|
@IFQName: AtomLinkElementThread |
5159 |
|
@ClsQName: ManakaiAtomLinkElementThread |
5160 |
|
|
5161 |
|
@ClsISA: ManakaiAtomLinkElement |
5162 |
|
|
5163 |
|
@f:implements: AtomThreadingFeature10 |
5164 |
|
|
5165 |
|
@enDesc: |
5166 |
|
An <XE::atom|link> element with a <XA::rel> attribute value of |
5167 |
|
<XML::replies> may be used to reference a resource where responses |
5168 |
|
to an entry may be found. If the <XA::type> attribute of the |
5169 |
|
<XE::atom|link> is omitted, its value is assumed to be |
5170 |
|
<XML::application/atom+xml>. |
5171 |
|
|
5172 |
|
A <XML::replies> link appearing as a child of the <XE::atom|feed> |
5173 |
|
or <XE::atom|source> element indicates that the referenced |
5174 |
|
resource likely contains responses to any of that |
5175 |
|
feed's entries. A <XML::replies> |
5176 |
|
link appearing as a child of an <XE::atom|entry> element |
5177 |
|
indicates that the linked resource likely contains responses |
5178 |
|
specific to that entry. |
5179 |
|
|
5180 |
|
If the feature <Feature^^DISCore|QName::AtomThreadingFeature10> |
5181 |
|
is supported, any <IF::Element> whose element type |
5182 |
|
is <XE::atom|link> <kwd:MUST> implement the <IF::AtomLinkElementThread> |
5183 |
|
interface in addition to other appropriate interfaces. |
5184 |
|
|
5185 |
|
@Test: |
5186 |
|
@@QName: AtomLinkElementThread.1.test |
5187 |
|
@@PerlDef: |
5188 |
|
my $doc; |
5189 |
|
__CODE{tc|createEmptyDocumentForTest:: $doc => $doc}__; |
5190 |
|
|
5191 |
|
my $el = $doc->create_element_ns (<Q::atom|>, 'link'); |
5192 |
|
|
5193 |
|
$test->id ('interface'); |
5194 |
|
$test->assert_isa ($el, <IFName::AtomLinkElementThread>); |
5195 |
|
|
5196 |
|
$test->id ('feature'); |
5197 |
|
$test->assert_true ($el->is_supported (<Q::fe|AtomThreading> => '1.0')); |
5198 |
|
|
5199 |
|
@ATTR: |
5200 |
|
@@Name: threadCount |
5201 |
|
@@enDesc: |
5202 |
|
The <XA::thr|count> attribute of the element. |
5203 |
|
|
5204 |
|
It <kwd:MUST> <I::reflect the non-negative integer value |
5205 |
|
of the <XA::thr|count> attribute> of the node. |
5206 |
|
|
5207 |
|
An <XE::atom|link> element using the <XML::replies> |
5208 |
|
<XA::rel> attribute value <kwd:MAY> contain |
5209 |
|
a <XA::thr|count> attribute whose value is a |
5210 |
|
non-negative integer that provides a hint to clients |
5211 |
|
as to the total number of replies contained by the |
5212 |
|
linked resource. The value is advisory and |
5213 |
|
may not accurately reflect the actual number of replies. |
5214 |
|
@@Type: idl|long||ManakaiDOM|all |
5215 |
|
@@Get: |
5216 |
|
@@@PerlDef: |
5217 |
|
__CODE{getReflectAttrNonNegativeIntegerValue:: |
5218 |
|
$node => $self, |
5219 |
|
$namespaceURI => {<Q::thr|>}, |
5220 |
|
$localName => 'count', |
5221 |
|
$r => $r, |
5222 |
|
$defaultValue => {null}, |
5223 |
|
}__; |
5224 |
|
@@Set: |
5225 |
|
@@@NodeReadOnlyError: |
5226 |
|
@@@PerlDef: |
5227 |
|
__CODE{setReflectAttrNonNegativeIntegerValue:: |
5228 |
|
$node => $self, |
5229 |
|
$namespaceURI => {<Q::thr|>}, |
5230 |
|
$localName => 'count', |
5231 |
|
$given => $given, |
5232 |
|
}__; |
5233 |
|
|
5234 |
|
@@Test: |
5235 |
|
@@@QName: AtomLinkElementThread.threadCount.1.test |
5236 |
|
@@@PerlDef: |
5237 |
|
my $doc; |
5238 |
|
__CODE{tc|createEmptyDocumentForTest:: $doc => $doc}__; |
5239 |
|
|
5240 |
|
my $link = $doc->create_element_ns (<Q::atom|>, 'link'); |
5241 |
|
|
5242 |
|
$test->id ('default'); |
5243 |
|
$test->assert_num_equals |
5244 |
|
(expected_value => -1, |
5245 |
|
actual_value => |
5246 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5247 |
|
|
5248 |
|
$test->id ('zero'); |
5249 |
|
$link-><AS::AtomLinkElementThread.threadCount> (0); |
5250 |
|
$test->assert_num_equals |
5251 |
|
(expected_value => 0, |
5252 |
|
actual_value => |
5253 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5254 |
|
$test->id ('zero.attr'); |
5255 |
|
$test->assert_equals ($link->get_attribute_ns (<Q::thr|>, 'count'), '0'); |
5256 |
|
|
5257 |
|
$test->id ('one'); |
5258 |
|
$link-><AS::AtomLinkElementThread.threadCount> (1); |
5259 |
|
$test->assert_num_equals |
5260 |
|
(expected_value => 1, |
5261 |
|
actual_value => |
5262 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5263 |
|
$test->id ('one.attr'); |
5264 |
|
$test->assert_equals ($link->get_attribute_ns (<Q::thr|>, 'count'), '1'); |
5265 |
|
|
5266 |
|
$test->id ('10000'); |
5267 |
|
$link-><AS::AtomLinkElementThread.threadCount> (10000); |
5268 |
|
$test->assert_num_equals |
5269 |
|
(expected_value => 10000, |
5270 |
|
actual_value => |
5271 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5272 |
|
$test->id ('10000.attr'); |
5273 |
|
$test->assert_equals ($link->get_attribute_ns (<Q::thr|>, 'count'), |
5274 |
|
'10000'); |
5275 |
|
|
5276 |
|
$test->id ('+10000'); |
5277 |
|
$link->set_attribute_ns (<Q::thr|>, 'thr:count', '+10000'); |
5278 |
|
$test->assert_num_equals |
5279 |
|
(expected_value => 10000, |
5280 |
|
actual_value => |
5281 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5282 |
|
|
5283 |
|
$test->id ('010000'); |
5284 |
|
$link->set_attribute_ns (<Q::thr|>, 'thr:count', '010000'); |
5285 |
|
$test->assert_num_equals |
5286 |
|
(expected_value => 10000, |
5287 |
|
actual_value => |
5288 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5289 |
|
|
5290 |
|
$test->id ('-100'); |
5291 |
|
$link-><AS::AtomLinkElementThread.threadCount> (-100); |
5292 |
|
$test->assert_num_equals |
5293 |
|
(expected_value => -1, |
5294 |
|
actual_value => |
5295 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5296 |
|
$test->id ('-100.attr'); |
5297 |
|
$test->assert_false ($link->has_attribute_ns (<Q::thr|>, 'count')); |
5298 |
|
|
5299 |
|
$test->id ('120a'); |
5300 |
|
$link->set_attribute_ns (<Q::thr|>, 'thr:count', '120a'); |
5301 |
|
$test->assert_num_equals |
5302 |
|
(expected_value => -1, |
5303 |
|
actual_value => |
5304 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5305 |
|
|
5306 |
|
$test->id ('-1'); |
5307 |
|
$link-><AS::AtomLinkElementThread.threadCount> (-1); |
5308 |
|
$test->assert_num_equals |
5309 |
|
(expected_value => -1, |
5310 |
|
actual_value => |
5311 |
|
$link-><AG::AtomLinkElementThread.threadCount>); |
5312 |
|
$test->id ('-1.attr'); |
5313 |
|
$test->assert_false ($link->has_attribute_ns (<Q::thr|>, 'count')); |
5314 |
|
|
5315 |
|
@enImplNote: |
5316 |
|
@@ddid: updated |
5317 |
|
@@@: |
5318 |
|
{TODO:: |
5319 |
|
<XA::thr|updated> attribute |
5320 |
|
} |
5321 |
|
##AtomLinkElementThread |
5322 |
|
|
5323 |
|
enImplNote: |
5324 |
|
@@ddid: total |
5325 |
|
@@@: |
5326 |
|
{TODO:: |
5327 |
|
<XE::thr|total> |
5328 |
|
} |
5329 |
|
|
5330 |
|
enImplNote: |
5331 |
|
@@ddid: threaddtd |
5332 |
|
@@@: |
5333 |
|
{TODO:: |
5334 |
|
DTD impl for threading |
5335 |
|
} |