bool HTMLEnhancer::enhanceNode(Node *node, DOM::Node parentDNode, DOM::Node nextDNode)
{
DOM::Node domNode, domNode2, attr, *ptDomNode;
bool tbody, goUp;
Node *n;
QString script, filename, text, oldName;
KURL url, baseURL;
int oldType;
//FIRST update the src attr with the baseURL
if(node->rootNode())
{
domNode = node->rootNode()->attributes().getNamedItem("src");
if(!domNode.isNull())
{
baseURL.setPath(ViewManager::ref()->activeDocument()->url().directory());
QuantaCommon::setUrl(url, domNode.nodeValue().string());
url = QExtFileInfo::toAbsolute(url, baseURL);
domNode.setNodeValue(url.url());
#ifdef HEAVY_DEBUG
kdDebug(25001)<< "HTMLTranslator::translateNode() - new src : " << url.url() << endl;
#endif
}
}
//THEN update the href attr of the LINK node with the baseURL
if(node->tag->name.lower() == "link" && node->rootNode())
{
domNode = node->rootNode()->attributes().getNamedItem("href");
if(!domNode.isNull())
{
baseURL.setPath(ViewManager::ref()->activeDocument()->url().directory());
QuantaCommon::setUrl(url, domNode.nodeValue().string());
url = QExtFileInfo::toAbsolute(url, baseURL);
domNode.setNodeValue(url.url());
#ifdef HEAVY_DEBUG
kdDebug(25001)<< "HTMLTranslator::translateNode() - new href : " << url.url() << endl;
#endif
}
}
//THEN if it is the style element, add a DOM::Node::TEXT_NODE child gathering all the CSS
//by default, the parser parse it as a script, which can't be translated in DOM::Nodes.
if((node->tag->type == Tag::XmlTag && node->tag->name.lower() == "style") ||
(node->tag->type == Tag::ScriptTag && node->tag->name.lower().contains("style") != 0))
{
//If the style Node doesn't exists, create it
if(!node->rootNode())
{
oldType = node->tag->type;
node->tag->type = Tag::XmlTag;
oldName = node->tag->name;
node->tag->name = "style";
m_wkafkapart->buildKafkaNodeFromNode(node);
node->tag->type = oldType;
node->tag->name = oldName;
}
if(node->rootNode())
{
domNode = *node->rootNode();
n = node->child;
text = "";
goUp = false;
while(n)
{
text += n->tag->tagStr();
n = kafkaCommon::getNextNode(n, goUp, node);
}
#ifdef HEAVY_DEBUG
kdDebug(25001)<< "HTMLTranslator::translateNode() - CSS code : " << text << endl;
#endif
domNode2 = kafkaCommon::createTextDomNode(text, m_wkafkapart->getKafkaWidget()->document());
if(!kafkaCommon::insertDomNode(domNode2, domNode))
return false;
m_wkafkapart->connectDomNodeToQuantaNode(domNode2, node);
}
}
QTag* qTag = QuantaCommon::tagFromDTD(m_wkafkapart->getCurrentDoc()->defaultDTD(),
parentDNode.nodeName().string());
//THEN replace, if asked, scripts by a little icon.
if(node->tag->type == Tag::ScriptTag && m_showIconForScripts && qTag->isChild("IMG", false))
{
script = node->tag->name.left(node->tag->name.find("block", 0, false) - 1).lower();
#ifdef LIGHT_DEBUG
kdDebug(25001)<< "HTMLTranslator::translateNode() - BLOCK:" << script << ":" << endl;
#endif
filename = m_stddirs->findResource("data", "kafkapart/pics/" + script + ".png" );
if(!filename.isEmpty())
{
//FIXME DTD!
domNode = kafkaCommon::createDomNode("IMG", m_wkafkapart->defaultDTD(),
m_wkafkapart->getKafkaWidget()->document());
kafkaCommon::editDomNodeAttribute(domNode, "IMG", m_wkafkapart->defaultDTD(), "src",
filename, m_wkafkapart->getKafkaWidget()->document());
//Add a tooltip indicating the content of the script
n = node->child;
text = "";
goUp = false;
while(n && n != node)
{
text += n->tag->tagStr();
n = kafkaCommon::getNextNode(n, goUp, node);
}
//if(text == "")
// text = i18n("Empty")
kafkaCommon::editDomNodeAttribute(domNode, "img", m_wkafkapart->defaultDTD(),
"title", text, m_wkafkapart->getKafkaWidget()->document());
if(!kafkaCommon::insertDomNode(domNode, parentDNode, nextDNode))
return false;
m_wkafkapart->connectDomNodeToQuantaNode(domNode, node);
}
}
//THEN if it is a comment, add a little icon ;o)
if(node->tag->type == Tag::Comment && m_showIconForScripts && qTag->isChild("IMG", false))
{
#ifdef LIGHT_DEBUG
kdDebug(25001)<< "HTMLTranslator::translateNode() - Comment" << endl;
#endif
filename = m_stddirs->findResource("data", "kafkapart/pics/comment.png" );
if(!filename.isEmpty())
{
//FIXME DTD!
domNode = kafkaCommon::createDomNode("IMG", m_wkafkapart->defaultDTD(),
m_wkafkapart->getKafkaWidget()->document());
kafkaCommon::editDomNodeAttribute(domNode, "IMG", m_wkafkapart->defaultDTD(), "src",
filename, m_wkafkapart->getKafkaWidget()->document());
//Add a tooltip indicating the content of the script
n = node->child;
text = "";
goUp = false;
while(n && n != node)
{
text += n->tag->tagStr();
n = kafkaCommon::getNextNode(n, goUp, node);
}
//if(text == "")
// text = i18n("Empty")
kafkaCommon::editDomNodeAttribute(domNode, "img", m_wkafkapart->defaultDTD(),
"title", text, m_wkafkapart->getKafkaWidget()->document());
if(!kafkaCommon::insertDomNode(domNode, parentDNode, nextDNode))
return false;
m_wkafkapart->connectDomNodeToQuantaNode(domNode, node);
}
}
//THEN add a TBODY tag if necessary
if(node->rootNode() && node->rootNode()->nodeName().string().lower() == "table")
{
tbody = false;
n = node->child;
while(n)
{
if(n->tag->name.lower() == "tbody")
tbody = true;
n = n->next;
}
if(!tbody)
{
domNode = kafkaCommon::createDomNode("TBODY", m_wkafkapart->defaultDTD(),
m_wkafkapart->getKafkaWidget()->htmlDocument());
if(!kafkaCommon::insertDomNode(domNode, *node->rootNode()))
return false;
m_wkafkapart->connectDomNodeToQuantaNode(domNode, node);
ptDomNode = new DOM::Node(domNode);
node->setLeafNode(ptDomNode);
}
}
//THEN add a red dotted border to FORM tags.
if(node->rootNode() && node->rootNode()->nodeName().string().lower() == "form")
{
kafkaCommon::editDomNodeAttribute(*node->rootNode(), node, "style", "border: 1px dotted red",
m_wkafkapart->getKafkaWidget()->document());
}
// THEN add a tooltip indicating the content of the name attribute
if(node->rootNode() && node->rootNode()->nodeName().string().lower() == "input")
{
domNode = *(node->rootNode());
QString text = node->tag->attributeValue("name");
kafkaCommon::editDomNodeAttribute(domNode, "input", m_wkafkapart->defaultDTD(),
"title", text, m_wkafkapart->getKafkaWidget()->document());
}
//THEN add a blue dotted border to DL, OL, UL tags
if(node->rootNode())
{
text = node->rootNode()->nodeName().string().lower();
if(text == "dl" || text == "ol" || text == "ul")
{
kafkaCommon::editDomNodeAttribute(*node->rootNode(), node, "style", "border: 1px dotted blue",
m_wkafkapart->getKafkaWidget()->document());
}
}
//THEN add a minimal border for borderless tables
//TODO: make it configurable, and look if CSS hasn't defined a border first
if(node->rootNode() && node->rootNode()->nodeName().string().lower() == "table")
{
attr = node->rootNode()->attributes().getNamedItem("border");
if(attr.isNull() || (!attr.isNull() && attr.nodeValue().string() == "0"))
{
kafkaCommon::editDomNodeAttribute(*node->rootNode(), node, "border", "1",
m_wkafkapart->getKafkaWidget()->document());
}
}
//THEN add a blue dotted border to DIV tags
if(node->rootNode())
{
text = node->rootNode()->nodeName().string().lower();
if(text == "div")
{
kafkaCommon::editDomNodeAttribute(*node->rootNode(), node, "style", "border: 1px dotted green",
m_wkafkapart->getKafkaWidget()->document());
}
}
return true;
}
void EnhancedTagAttributeTree::deleteNode()
{
QuantaView *view = ViewManager::ref()->activeView();
if(!curNode || !view->document())
return;
Node *oldCurNode, *oldCurNodeParent, *child;
QTag *oldCurNodeParentQTag;
int curLine, curCol;
long offset;
DOM::Node domNode;
QValueList<int> loc;
NodeModifsSet *modifs;
//Save the cursor position in kafka/quanta
if(view->hadLastFocus() == QuantaView::SourceFocus)
curNode->tag->beginPos(curLine, curCol);
else
{
KafkaDocument::ref()->getKafkaWidget()->getCurrentNode(domNode, offset);
if(!domNode.previousSibling().isNull())
domNode = domNode.previousSibling();
else if(!domNode.parentNode().isNull())
domNode = domNode.parentNode();
else
domNode = KafkaDocument::ref()->getKafkaWidget()->document();
if(domNode.nodeType() == DOM::Node::TEXT_NODE)
offset = domNode.nodeValue().length();
else
offset = 0;
loc = kafkaCommon::getLocation(domNode);
}
//remove the Nodes
oldCurNode = curNode;
oldCurNodeParent = curNode->parent;
curNode = 0L;
attrTree->setCurrentNode(curNode);
modifs = new NodeModifsSet();
kafkaCommon::extractAndDeleteNode(oldCurNode, modifs, false);
//Then we see if the new parent - child relationships are valid, and if not, delete the child and restart
if(oldCurNodeParent)
{
oldCurNodeParentQTag = QuantaCommon::tagFromDTD(oldCurNodeParent);
if(oldCurNodeParentQTag)
{
child = oldCurNodeParent->child;
while(child)
{
if(!oldCurNodeParentQTag->isChild(child))
{
kafkaCommon::extractAndDeleteNode(child, modifs, false);
//too lazy to get the real next node ;-)
child = oldCurNodeParent->child;
}
else
child = child->next;
}
}
}
view->document()->docUndoRedo->addNewModifsSet(modifs, undoRedo::NodeTreeModif);
//set the cursor position in kafka/quanta
if(view->hadLastFocus() == QuantaView::SourceFocus)
view->document()->viewCursorIf->setCursorPositionReal((uint)curLine, (uint)curCol);
else
{
domNode = kafkaCommon::getNodeFromLocation(loc,
KafkaDocument::ref()->getKafkaWidget()->document());
KafkaDocument::ref()->getKafkaWidget()->setCurrentNode(domNode, offset);
}
}
void HTMLEnhancer::postEnhanceNode(DOM::Node domNode)
{
DOM::Node textNode;
kNodeAttrs *props;
QTag *qTag;
bool isInline;
if(domNode.isNull())
return;
//If domNode is a Block and there is no text around, and if domNode's parent can handle
//text or a P tag, add an empty text DOM::Node
// so that the user can access this area.
qTag = QuantaCommon::tagFromDTD(m_wkafkapart->getCurrentDoc()->defaultDTD(),
domNode.nodeName().string());
isInline = kafkaCommon::isInline(domNode.nodeName().string());
if(domNode.nodeType() == DOM::Node::ELEMENT_NODE &&
(!isInline || (isInline && qTag && qTag->isSingle())))
{
qTag = QuantaCommon::tagFromDTD(m_wkafkapart->getNode(domNode.parentNode()));
if((domNode.nextSibling().isNull() ||
(!domNode.nextSibling().isNull() &&
domNode.nextSibling().nodeType() == DOM::Node::ELEMENT_NODE &&
!kafkaCommon::isInline(domNode.nextSibling().nodeName().string())))
&& qTag && (qTag->isChild("#text", false) || qTag->isChild("p", false)) &&
domNode.nodeName().string().lower() != "p")
{
textNode = kafkaCommon::createTextDomNode("",
m_wkafkapart->getKafkaWidget()->document());
props = m_wkafkapart->connectDomNodeToQuantaNode(textNode, 0L);
props->setIsLinkedToNode(false);
props->setSpecialBehavior(kNodeAttrs::emptyTextSurroundingBlockElementAtTheRight);
kafkaCommon::insertDomNode(textNode, domNode.parentNode(),
domNode.nextSibling());
}
if((domNode.previousSibling().isNull() || (!domNode.previousSibling().isNull() &&
domNode.previousSibling().nodeType() == DOM::Node::ELEMENT_NODE &&
!kafkaCommon::isInline(domNode.previousSibling().nodeName().string())))
&& qTag && (qTag->isChild("#text", false) || qTag->isChild("p", false)) &&
domNode.nodeName().string().lower() != "p")
{
textNode = kafkaCommon::createTextDomNode("",
m_wkafkapart->getKafkaWidget()->document());
props = m_wkafkapart->connectDomNodeToQuantaNode(textNode, 0L);
props->setIsLinkedToNode(false);
props->setSpecialBehavior(kNodeAttrs::emptyTextSurroundingBlockElementAtTheLeft);
kafkaCommon::insertDomNode(textNode, domNode.parentNode(),
domNode);
}
}
//If domNode is an childless element, and if it can handle Text or a P tag,
//add an empty text DOM::Node so that the
//user can access this area.
qTag = QuantaCommon::tagFromDTD(m_wkafkapart->getNode(domNode));
if(domNode.nodeType() == DOM::Node::ELEMENT_NODE &&
!domNode.hasChildNodes() && qTag && (qTag->isChild("#text", false) ||
qTag->isChild("p", false)))
{
textNode = kafkaCommon::createTextDomNode("",
m_wkafkapart->getKafkaWidget()->document());
props = m_wkafkapart->connectDomNodeToQuantaNode(textNode, 0L);
props->setIsLinkedToNode(false);
props->setSpecialBehavior(kNodeAttrs::emptyTextAsChildOfAChildlessElement);
kafkaCommon::insertDomNode(textNode, domNode);
}
}
