xmlNodePtr RoutingRule::toXML(xmlNodePtr parent)
{
xmlNodePtr me = FWObject::toXML(parent, false);
// xmlNewProp(me, TOXMLCAST("name"), STRTOXMLCAST(getName()));
xmlNewProp(me, TOXMLCAST("comment"), STRTOXMLCAST(getComment()));
FWObject *o;
if ( (o=getFirstByType( RuleElementRDst::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementRGtw::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementRItf::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RoutingRuleOptions::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( Routing::TYPENAME ))!=NULL )
o->toXML(me);
return me;
}
xmlNodePtr RuleSet::toXML(xmlNodePtr parent)
{
xmlNodePtr me = FWObject::toXML(parent, false);
xmlNewProp(me, XMLTools::ToXmlCast("name"), XMLTools::StrToXmlCast(getName()));
xmlNewProp(me, XMLTools::ToXmlCast("comment"), XMLTools::StrToXmlCast(getComment()));
xmlNewProp(me, XMLTools::ToXmlCast("ro"), XMLTools::ToXmlCast(((getRO()) ? "True" : "False")));
xmlNewProp(me, XMLTools::ToXmlCast("ipv4_rule_set"),
XMLTools::ToXmlCast(((ipv4) ? "True" : "False")));
xmlNewProp(me, XMLTools::ToXmlCast("ipv6_rule_set"),
XMLTools::ToXmlCast(((ipv6) ? "True" : "False")));
xmlNewProp(me, XMLTools::ToXmlCast("top_rule_set"),
XMLTools::ToXmlCast(((top) ? "True" : "False")));
// First all rules, skip options
for(list<FWObject*>::const_iterator j=begin(); j!=end(); ++j)
{
if (FWOptions::cast(*j) == nullptr) (*j)->toXML(me);
}
FWObject *o;
if ( (o=getFirstByType( RuleSetOptions::TYPENAME ))!=nullptr )
o->toXML(me);
return me;
}
xmlNodePtr ClusterGroup::toXML(xmlNodePtr parent)
{
xmlNodePtr me = FWObject::toXML(parent, false);
xmlNewProp(me, TOXMLCAST("name"), STRTOXMLCAST(getName()));
xmlNewProp(me, TOXMLCAST("comment"), STRTOXMLCAST(getComment()));
FWObject *o;
for (FWObjectTypedChildIterator it = findByType(FWObjectReference::TYPENAME);
it != it.end(); ++it)
{
o = *it; if (o) o->toXML(me);
}
for (FWObjectTypedChildIterator it = findByType(ClusterGroupOptions::TYPENAME);
it != it.end(); ++it)
{
o = *it; if (o) o->toXML(me);
}
return me;
}
xmlNodePtr PolicyRule::toXML(xmlNodePtr parent)
{
xmlNodePtr me = FWObject::toXML(parent, false);
xmlNewProp(me, TOXMLCAST("action"), STRTOXMLCAST(getActionAsString()));
xmlNewProp(me, TOXMLCAST("direction"),STRTOXMLCAST(getDirectionAsString()));
xmlNewProp(me, TOXMLCAST("comment"), STRTOXMLCAST(getComment()));
FWObject *o;
/*
* Save children to XML file in just this order (src, dst, srv).
* PolicyCompiler::checkForShadowing depends on it!
* But after all, DTD requires this order.
*
<!ELEMENT PolicyRule (Src,Dst,Srv?,Itf?,When?,PolicyRuleOptions?)>
*/
if ( (o=getFirstByType( RuleElementSrc::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementDst::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementSrv::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementItf::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementInterval::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( PolicyRuleOptions::TYPENAME ))!=NULL )
o->toXML(me);
// there should be no children Policy objects in v3
if ( (o=getFirstByType( Policy::TYPENAME ))!=NULL )
o->toXML(me);
return me;
}
xmlNodePtr NATRule::toXML(xmlNodePtr parent)
{
xmlNodePtr me = FWObject::toXML(parent, false);
// xmlNewProp(me, TOXMLCAST("name"), STRTOXMLCAST(getName()));
xmlNewProp(me, TOXMLCAST("action"), STRTOXMLCAST(getActionAsString()));
xmlNewProp(me, TOXMLCAST("comment"), STRTOXMLCAST(getComment()));
FWObject *o;
if ( (o=getFirstByType( RuleElementOSrc::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementODst::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementOSrv::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementTSrc::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementTDst::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementTSrv::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementItfInb::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementItfOutb::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( RuleElementInterval::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( NATRuleOptions::TYPENAME ))!=NULL )
o->toXML(me);
if ( (o=getFirstByType( NAT::TYPENAME ))!=NULL )
o->toXML(me);
return me;
}
