# XML DOM tree manipulation

import cgi

from HTMLParser import HTMLParser

from xml.dom import Node

import xml.dom.minidom as minidom

import strings

import util

def escape(str_):

    return strings.to_unicode(cgi.escape(str_, True)).encode('ascii',

        'xmlcharrefreplace')

def unescape(str_): return HTMLParser().unescape(str_)

#####

def get_id(node): return node.getAttribute('id')

def set_id(node, id_): node.setAttribute('id', id_)

#####

def is_completely_empty(node): return node.firstChild == None

def has_one_child(node):

    return node.firstChild != None and node.firstChild.nextSibling == None

class NodeIter:

    def __init__(self, node): self.child = node.firstChild

    def __iter__(self): return self

    def curr(self):

        if self.child != None: return self.child

        raise StopIteration

    def next(self):

        child = self.curr()

        self.child = self.child.nextSibling

        return child

#####

def is_comment(node): return node.nodeType == Node.COMMENT_NODE

def is_empty(node):

    for child in NodeIter(node):

        if not is_comment(child): return False

    return True

#####

def is_elem(node): return node.nodeType == Node.ELEMENT_NODE

class NodeElemIter:

    def __init__(self, node): self.child = node.firstChild

    def __iter__(self): return self

    def curr(self):

        while self.child != None:

            if is_elem(self.child): return self.child

            self.child = self.child.nextSibling

        raise StopIteration

    def next(self):

        child = self.curr()

        self.child = self.child.nextSibling

        return child

def first_elem(node): return NodeElemIter(node).next()

def has_elems(node):

    try: first_elem(node); return True

    except StopIteration: return False

class NodeElemReverseIter:

    def __init__(self, node): self.child = node.lastChild

    def __iter__(self): return self

    def curr(self):

        while self.child != None:

            if is_elem(self.child): return self.child

            self.child = self.child.previousSibling

        raise StopIteration

    def next(self):

        child = self.curr()

        self.child = self.child.previousSibling

        return child

def last_elem(node): return NodeElemReverseIter(node).next()

class NodeParentIter:

    def __init__(self, node): self.node = node

    def __iter__(self): return self

    def curr(self):

        if self.node != None and is_elem(self.node): return self.node

        raise StopIteration

    def next(self):

        node = self.curr()

        self.node = self.node.parentNode

        return node

def is_simple(node):

    '''Whether every child recursively has no more than one child'''

    return (not is_elem(node) or is_completely_empty(node)

        or (has_one_child(node) and is_simple(node.firstChild)))

#####

def is_text_node(node): return node.nodeType == Node.TEXT_NODE

def is_text(node): return has_one_child(node) and is_text_node(node.firstChild)

def value(node):

    if node.firstChild != None: return node.firstChild.nodeValue

    else: return node.nodeValue

def set_value(node, value):

    if is_elem(node): node.appendChild(node.ownerDocument.createTextNode(value))

    else: node.nodeValue = value

class NodeTextEntryIter:

    def __init__(self, node): self.iter_ = NodeElemIter(node)

    def __iter__(self): return self

    def curr(self):

        child = self.iter_.curr()

        name = child.tagName

        if is_text(child): child = value(child)

        return (name, child)

    def next(self):

        entry = self.curr()

        self.iter_.next()

        return entry

#####

def set_child(node, name, value):

    '''Note: does not remove any existing child of the same name'''

    child = node.ownerDocument.createElement(name)

    set_value(child, value)

    node.appendChild(child)

def remove(node): node.parentNode.removeChild(node)

def replace(old_node, new_node):

    old_node.parentNode.replaceChild(new_node, old_node) # note order reversed

def replace_with_text(node, str_):

    replace(node, node.ownerDocument.createTextNode(str_))

#####

def by_tag_name(node, name, last_only=False):

    '''last_only optimization returns last matching node'''

    children = []

    for child in NodeElemReverseIter(node):

        if child.tagName == name:

            children.append(child)

            if last_only: break

    return children

#####

def create_doc(root='_'):

    return minidom.getDOMImplementation().createDocument(None, root, None)

#####

prettyxml_config = dict(addindent='    ', newl='\n')

toprettyxml_config = prettyxml_config.copy()

util.rename_key(toprettyxml_config, 'addindent', 'indent')

#####

# minidom modifications

minidom._write_data = lambda writer, data: writer.write(escape(data))

minidom.Node.__iter__ = lambda self: NodeIter(self)

def __Node_str(self):

    if is_simple(self): return self.toxml()

    else: return self.toprettyxml(**toprettyxml_config)

minidom.Node.__str__ = __Node_str

minidom.Node.pop = lambda self: self.removeChild(self.lastChild)

def __Node_clear(self):

    while not is_empty(self): self.pop()

minidom.Node.clear = __Node_clear

def __Element_write_opening(self, writer, indent='', addindent='', newl=''):

    writer.write(indent+'<'+self.tagName)

    for attr_idx in xrange(self.attributes.length):

        attr = self.attributes.item(attr_idx)

        writer.write(' '+attr.name+'='+escape(attr.value))

    writer.write('>'+newl)

minidom.Element.write_opening = __Element_write_opening

def __Element_write_closing(self, writer, indent='', addindent='', newl=''):

    writer.write('</'+self.tagName+'>'+newl)

minidom.Element.write_closing = __Element_write_closing

_writexml_orig = minidom.Element.writexml

def __Element_writexml(self, writer, indent='', addindent='', newl=''):

    if isinstance(indent, int): indent = addindent*indent

    if is_text(self):

        self.write_opening(writer, indent, addindent, '') # no newline

        writer.write(escape(value(self)))

        self.write_closing(writer, indent, addindent, newl)

    else: _writexml_orig(self, writer, indent, addindent, newl)

minidom.Element.writexml = __Element_writexml

def __Document_write_opening(self, writer, indent='', addindent='', newl='',

    encoding=None):

    xmlDecl = '<?xml version="1.0" '

    if encoding != None: xmlDecl += 'encoding="'+escape(encoding)+'"'

    xmlDecl += '?>'+newl

    writer.write(xmlDecl)

    assert has_one_child(self)

    assert is_elem(self.firstChild)

    self.firstChild.write_opening(writer, indent, addindent, newl)

minidom.Document.write_opening = __Document_write_opening

def __Document_write_closing(self, writer, indent='', addindent='', newl=''):

    self.firstChild.write_closing(writer, indent, addindent, newl)

minidom.Document.write_closing = __Document_write_closing