exml 0.7.2

// Copyright of the original code is the following.
// --------
// Summary: interfaces for tree manipulation
// Description: this module describes the structures found in an tree resulting
//              from an XML or HTML parsing, as well as the API provided for
//              various processing on that tree
//
// Copy: See Copyright for the status of this software.
//
// Author: Daniel Veillard
// --------
// tree.c : implementation of access function for an XML tree.
//
// References:
//   XHTML 1.0 W3C REC: http://www.w3.org/TR/2002/REC-xhtml1-20020801/
//
// See Copyright for the status of this software.
//
// daniel@veillard.com

use std::{
    any::type_name,
    borrow::Cow,
    ops::{Deref, DerefMut},
    os::raw::c_void,
    ptr::{NonNull, null_mut},
};

use super::{
    InvalidNodePointerCastError, NodeCommon, XML_LOCAL_NAMESPACE, XML_XML_NAMESPACE, XmlDocPtr,
    XmlElementType, XmlGenericNodePtr, XmlNodePtr, XmlNsType, xml_tree_err_memory,
};

#[repr(C)]
pub struct XmlNs {
    pub next: Option<XmlNsPtr>,            /* next Ns link for this node  */
    pub(crate) typ: XmlNsType,             /* global or local */
    pub href: Option<Box<str>>,            /* URL for the namespace */
    pub prefix: Option<Box<str>>,          /* prefix for the namespace */
    pub _private: *mut c_void,             /* application data */
    pub(crate) context: Option<XmlDocPtr>, /* normally an xmlDoc */
    /// For XPath. Not used except for XPath.
    /// In the original libxml2, in order to handle namespaces and nodes as a set,
    /// the `next` is set to the node that will be the set.
    /// However, this crate provides a separate member for XPath.
    pub node: Option<XmlGenericNodePtr>,
}

impl XmlNs {
    pub fn prefix(&self) -> Option<Cow<'_, str>> {
        self.prefix.as_deref().map(Cow::Borrowed)
    }

    pub fn href(&self) -> Option<Cow<'_, str>> {
        self.href.as_deref().map(Cow::Borrowed)
    }

    /// Read the value of a node, this can be either the text carried
    /// directly by this node if it's a TEXT node or the aggregate string
    /// of the values carried by this node child's (TEXT and ENTITY_REF).  
    ///
    /// Entity references are substituted.
    ///
    /// Returns a new #XmlChar * or null_mut() if no content is available.  
    /// It's up to the caller to free the memory with xml_free().
    #[doc(alias = "xmlNodeGetContent")]
    pub fn get_content(&self) -> Option<String> {
        assert!(matches!(
            self.element_type(),
            XmlElementType::XmlNamespaceDecl
        ));
        self.href().map(|href| href.into_owned())
    }

    /// Read the value of a node `cur`, this can be either the text carried
    /// directly by this node if it's a TEXT node or the aggregate string
    /// of the values carried by this node child's (TEXT and ENTITY_REF).
    ///
    /// Entity references are substituted. Fills up the buffer `buf` with this value.
    ///
    /// Returns 0 in case of success and -1 in case of error.
    #[doc(alias = "xmlBufGetNodeContent")]
    pub fn get_content_to(&self, buf: &mut String) -> i32 {
        assert!(matches!(
            self.element_type(),
            XmlElementType::XmlNamespaceDecl
        ));
        buf.push_str(self.href().unwrap().as_ref());

        0
    }
}

impl Default for XmlNs {
    fn default() -> Self {
        Self {
            next: None,
            typ: XmlNsType::XmlNamespaceDecl,
            href: None,
            prefix: None,
            _private: null_mut(),
            context: None,
            node: None,
        }
    }
}

impl NodeCommon for XmlNs {
    fn document(&self) -> Option<XmlDocPtr> {
        self.context
    }
    fn set_document(&mut self, doc: Option<XmlDocPtr>) {
        self.context = doc;
    }
    fn element_type(&self) -> XmlElementType {
        self.typ
    }
    fn name(&self) -> Option<Cow<'_, str>> {
        self.href()
    }
    fn children(&self) -> Option<XmlGenericNodePtr> {
        None
    }
    fn set_children(&mut self, _children: Option<XmlGenericNodePtr>) {}
    fn last(&self) -> Option<XmlGenericNodePtr> {
        None
    }
    fn set_last(&mut self, _last: Option<XmlGenericNodePtr>) {}
    fn next(&self) -> Option<XmlGenericNodePtr> {
        self.next.map(|ns| ns.into())
    }
    fn set_next(&mut self, next: Option<XmlGenericNodePtr>) {
        self.next = next.map(|p| XmlNsPtr::try_from(p).unwrap());
    }
    fn prev(&self) -> Option<XmlGenericNodePtr> {
        None
    }
    fn set_prev(&mut self, _prev: Option<XmlGenericNodePtr>) {}
    fn parent(&self) -> Option<XmlGenericNodePtr> {
        None
    }
    fn set_parent(&mut self, _parent: Option<XmlGenericNodePtr>) {}

    fn unlink(&mut self) {}
}

#[derive(PartialEq, Eq, PartialOrd, Ord)]
pub struct XmlNsPtr(NonNull<XmlNs>);

impl XmlNsPtr {
    /// Allocate new memory and create new `XmlNsPtr` from an owned xml node.
    ///
    /// This method leaks allocated memory.  
    /// Users can use `free` method for deallocating memory.
    pub(crate) fn new(node: XmlNs) -> Option<Self> {
        let boxed = Box::new(node);
        NonNull::new(Box::leak(boxed)).map(Self)
    }

    /// Create `XmlNsPtr` from a raw pointer.  
    ///
    /// If `ptr` is a NULL pointer, return `Ok(None)`.  
    /// If `ptr` is a valid pointer of `XmlNs`, return `Ok(Some(Self))`.  
    /// Otherwise, return `Err`.
    ///
    /// # Safety
    /// - `ptr` must be a pointer of types that is implemented `NodeCommon` at least.
    ///
    /// # Todo
    /// - Fix to the private method.
    pub unsafe fn from_raw(ptr: *mut XmlNs) -> Result<Option<Self>, InvalidNodePointerCastError> {
        unsafe {
            if ptr.is_null() {
                return Ok(None);
            }
            match (*ptr).element_type() {
                XmlElementType::XmlNamespaceDecl => Ok(Some(Self(NonNull::new_unchecked(ptr)))),
                _ => Err(InvalidNodePointerCastError {
                    from: (*ptr).element_type(),
                    to: type_name::<Self>(),
                }),
            }
        }
    }

    // pub(crate) fn as_ptr(self) -> *mut XmlNs {
    //     self.0.as_ptr()
    // }

    /// Deallocate memory.
    ///
    /// # Safety
    /// This method should be called only once.  
    /// If called more than twice, the behavior is undefined.
    pub(crate) unsafe fn free(self) {
        unsafe {
            let _ = *Box::from_raw(self.0.as_ptr());
        }
    }

    // /// Acquire the ownership of the inner value.
    // /// As a result, `self` will be invalid. `self` must not be used after performs this method.
    // ///
    // /// # Safety
    // /// This method should be called only once.
    // /// If called more than twice, the behavior is undefined.
    // pub(crate) unsafe fn into_inner(self) -> Box<XmlNs> {
    //     unsafe { Box::from_raw(self.0.as_ptr()) }
    // }
}

impl Clone for XmlNsPtr {
    fn clone(&self) -> Self {
        *self
    }
}

impl Copy for XmlNsPtr {}

impl Deref for XmlNsPtr {
    type Target = XmlNs;
    fn deref(&self) -> &Self::Target {
        // # Safety
        // I don't implement the pointer casting and addition/subtraction methods
        // and don't expose the inner `NonNull` for `*mut XmlNs`.
        // Therefore, as long as the constructor is correctly implemented,
        // the pointer dereference is valid.
        unsafe { self.0.as_ref() }
    }
}

impl DerefMut for XmlNsPtr {
    fn deref_mut(&mut self) -> &mut Self::Target {
        // # Safety
        // I don't implement the pointer casting and addition/subtraction methods
        // and don't expose the inner `NonNull` for `*mut XmlNs`.
        // Therefore, as long as the constructor is correctly implemented,
        // the pointer dereference is valid.
        unsafe { self.0.as_mut() }
    }
}

impl TryFrom<XmlGenericNodePtr> for XmlNsPtr {
    type Error = InvalidNodePointerCastError;

    fn try_from(value: XmlGenericNodePtr) -> Result<Self, Self::Error> {
        match value.element_type() {
            XmlElementType::XmlNamespaceDecl => Ok(Self(value.0.cast())),
            _ => Err(InvalidNodePointerCastError {
                from: value.element_type(),
                to: type_name::<Self>(),
            }),
        }
    }
}

impl From<XmlNsPtr> for XmlGenericNodePtr {
    fn from(value: XmlNsPtr) -> Self {
        Self(value.0 as NonNull<dyn NodeCommon>)
    }
}

impl From<XmlNsPtr> for *mut XmlNs {
    fn from(value: XmlNsPtr) -> Self {
        value.0.as_ptr()
    }
}

/// Creation of a new Namespace. This function will refuse to create
/// a namespace with a similar prefix than an existing one present on this node.
/// Note that for a default namespace, `prefix` should be NULL.
///
/// We use href == NULL in the case of an element creation where the namespace was not defined.
///
/// Returns a new namespace pointer or NULL
#[doc(alias = "xmlNewNs")]
pub fn xml_new_ns(
    node: Option<XmlNodePtr>,
    href: Option<&str>,
    prefix: Option<&str>,
) -> Option<XmlNsPtr> {
    if node.is_some_and(|node| node.element_type() != XmlElementType::XmlElementNode) {
        return None;
    }

    if prefix == Some("xml") {
        // xml namespace is predefined, no need to add it
        if href == Some(XML_XML_NAMESPACE) {
            return None;
        }

        // Problem, this is an attempt to bind xml prefix to a wrong
        // namespace, which breaks
        // Namespace constraint: Reserved Prefixes and Namespace Names
        // from XML namespace. But documents authors may not care in
        // their context so let's proceed.
    }

    // Allocate a new Namespace and fill the fields.
    let Some(mut cur) = XmlNsPtr::new(XmlNs {
        typ: XML_LOCAL_NAMESPACE,
        ..Default::default()
    }) else {
        xml_tree_err_memory("building namespace");
        return None;
    };

    cur.href = href.map(|href| href.into());
    cur.prefix = prefix.map(|prefix| prefix.into());

    // Add it at the end to preserve parsing order ...
    // and checks for existing use of the prefix
    if let Some(mut node) = node {
        if let Some(ns_def) = node.ns_def {
            let mut prev = ns_def;
            if prev.prefix == cur.prefix {
                unsafe {
                    // # Safety
                    // `cur` is created this function and it is not leaked from here.
                    xml_free_ns(cur);
                }
                return None;
            }
            while let Some(next) = prev.next {
                prev = next;
                if prev.prefix == cur.prefix {
                    unsafe {
                        // # Safety
                        // `cur` is created this function and it is not leaked from here.
                        xml_free_ns(cur);
                    }
                    return None;
                }
            }
            prev.next = Some(cur);
        } else {
            node.ns_def = Some(cur);
        }
    }
    Some(cur)
}

/// Free up the structures associated to a namespace
#[doc(alias = "xmlFreeNs")]
pub unsafe fn xml_free_ns(cur: XmlNsPtr) {
    unsafe {
        cur.free();
    }
}

/// Free up all the structures associated to the chained namespaces.
#[doc(alias = "xmlFreeNsList")]
pub unsafe fn xml_free_ns_list(cur: XmlNsPtr) {
    unsafe {
        let mut next = cur.next;
        xml_free_ns(cur);
        while let Some(now) = next {
            next = now.next;
            xml_free_ns(now);
        }
    }
}