mirror of
https://github.com/michaelrsweet/mxml.git
synced 2024-11-24 11:25:30 +00:00
bcfa6ef518
Add mxmlNewOpaquef and mxmlSetOpaquef functions. Fix discussion writing code to look for opaque strings. Fix dependencies for documentation generation.
350 lines
7.8 KiB
C
350 lines
7.8 KiB
C
/*
|
|
* Attribute support code for Mini-XML, a small XML file parsing library.
|
|
*
|
|
* Copyright 2003-2017 by Michael R Sweet.
|
|
*
|
|
* These coded instructions, statements, and computer programs are the
|
|
* property of Michael R Sweet and are protected by Federal copyright
|
|
* law. Distribution and use rights are outlined in the file "COPYING"
|
|
* which should have been included with this file. If this file is
|
|
* missing or damaged, see the license at:
|
|
*
|
|
* https://michaelrsweet.github.io/mxml
|
|
*/
|
|
|
|
/*
|
|
* Include necessary headers...
|
|
*/
|
|
|
|
#include "config.h"
|
|
#include "mxml.h"
|
|
|
|
|
|
/*
|
|
* Local functions...
|
|
*/
|
|
|
|
static int mxml_set_attr(mxml_node_t *node, const char *name,
|
|
char *value);
|
|
|
|
|
|
/*
|
|
* 'mxmlElementDeleteAttr()' - Delete an attribute.
|
|
*
|
|
* @since Mini-XML 2.4@
|
|
*/
|
|
|
|
void
|
|
mxmlElementDeleteAttr(mxml_node_t *node,/* I - Element */
|
|
const char *name)/* I - Attribute name */
|
|
{
|
|
int i; /* Looping var */
|
|
mxml_attr_t *attr; /* Cirrent attribute */
|
|
|
|
|
|
#ifdef DEBUG
|
|
fprintf(stderr, "mxmlElementDeleteAttr(node=%p, name=\"%s\")\n",
|
|
node, name ? name : "(null)");
|
|
#endif /* DEBUG */
|
|
|
|
/*
|
|
* Range check input...
|
|
*/
|
|
|
|
if (!node || node->type != MXML_ELEMENT || !name)
|
|
return;
|
|
|
|
/*
|
|
* Look for the attribute...
|
|
*/
|
|
|
|
for (i = node->value.element.num_attrs, attr = node->value.element.attrs;
|
|
i > 0;
|
|
i --, attr ++)
|
|
{
|
|
#ifdef DEBUG
|
|
printf(" %s=\"%s\"\n", attr->name, attr->value);
|
|
#endif /* DEBUG */
|
|
|
|
if (!strcmp(attr->name, name))
|
|
{
|
|
/*
|
|
* Delete this attribute...
|
|
*/
|
|
|
|
free(attr->name);
|
|
free(attr->value);
|
|
|
|
i --;
|
|
if (i > 0)
|
|
memmove(attr, attr + 1, i * sizeof(mxml_attr_t));
|
|
|
|
node->value.element.num_attrs --;
|
|
|
|
if (node->value.element.num_attrs == 0)
|
|
free(node->value.element.attrs);
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* 'mxmlElementGetAttr()' - Get an attribute.
|
|
*
|
|
* This function returns @code NULL@ if the node is not an element or the
|
|
* named attribute does not exist.
|
|
*/
|
|
|
|
const char * /* O - Attribute value or @code NULL@ */
|
|
mxmlElementGetAttr(mxml_node_t *node, /* I - Element node */
|
|
const char *name) /* I - Name of attribute */
|
|
{
|
|
int i; /* Looping var */
|
|
mxml_attr_t *attr; /* Cirrent attribute */
|
|
|
|
|
|
#ifdef DEBUG
|
|
fprintf(stderr, "mxmlElementGetAttr(node=%p, name=\"%s\")\n",
|
|
node, name ? name : "(null)");
|
|
#endif /* DEBUG */
|
|
|
|
/*
|
|
* Range check input...
|
|
*/
|
|
|
|
if (!node || node->type != MXML_ELEMENT || !name)
|
|
return (NULL);
|
|
|
|
/*
|
|
* Look for the attribute...
|
|
*/
|
|
|
|
for (i = node->value.element.num_attrs, attr = node->value.element.attrs;
|
|
i > 0;
|
|
i --, attr ++)
|
|
{
|
|
#ifdef DEBUG
|
|
printf(" %s=\"%s\"\n", attr->name, attr->value);
|
|
#endif /* DEBUG */
|
|
|
|
if (!strcmp(attr->name, name))
|
|
{
|
|
#ifdef DEBUG
|
|
printf(" Returning \"%s\"!\n", attr->value);
|
|
#endif /* DEBUG */
|
|
return (attr->value);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Didn't find attribute, so return NULL...
|
|
*/
|
|
|
|
#ifdef DEBUG
|
|
puts(" Returning NULL!\n");
|
|
#endif /* DEBUG */
|
|
|
|
return (NULL);
|
|
}
|
|
|
|
|
|
/*
|
|
* 'mxmlElementGetAttrByIndex()' - Get an element attribute by index.
|
|
*
|
|
* The index ("idx") is 0-based. @code NULL@ is returned if the specified index
|
|
* is out of range.
|
|
*
|
|
* @since Mini-XML 2.11@
|
|
*/
|
|
|
|
const char * /* O - Attribute value */
|
|
mxmlElementGetAttrByIndex(
|
|
mxml_node_t *node, /* I - Node */
|
|
int idx, /* I - Attribute index, starting at 0 */
|
|
const char **name) /* O - Attribute name */
|
|
{
|
|
if (!node || node->type != MXML_ELEMENT || idx < 0 || idx >= node->value.element.num_attrs)
|
|
return (NULL);
|
|
|
|
if (name)
|
|
*name = node->value.element.attrs[idx].name;
|
|
|
|
return (node->value.element.attrs[idx].value);
|
|
}
|
|
|
|
|
|
/*
|
|
* 'mxmlElementGetAttrCount()' - Get the number of element attributes.
|
|
*
|
|
* @since Mini-XML 2.11@
|
|
*/
|
|
|
|
int /* O - Number of attributes */
|
|
mxmlElementGetAttrCount(
|
|
mxml_node_t *node) /* I - Node */
|
|
{
|
|
if (node && node->type == MXML_ELEMENT)
|
|
return (node->value.element.num_attrs);
|
|
else
|
|
return (0);
|
|
}
|
|
|
|
|
|
/*
|
|
* 'mxmlElementSetAttr()' - Set an attribute.
|
|
*
|
|
* If the named attribute already exists, the value of the attribute
|
|
* is replaced by the new string value. The string value is copied
|
|
* into the element node. This function does nothing if the node is
|
|
* not an element.
|
|
*/
|
|
|
|
void
|
|
mxmlElementSetAttr(mxml_node_t *node, /* I - Element node */
|
|
const char *name, /* I - Name of attribute */
|
|
const char *value) /* I - Attribute value */
|
|
{
|
|
char *valuec; /* Copy of value */
|
|
|
|
|
|
#ifdef DEBUG
|
|
fprintf(stderr, "mxmlElementSetAttr(node=%p, name=\"%s\", value=\"%s\")\n",
|
|
node, name ? name : "(null)", value ? value : "(null)");
|
|
#endif /* DEBUG */
|
|
|
|
/*
|
|
* Range check input...
|
|
*/
|
|
|
|
if (!node || node->type != MXML_ELEMENT || !name)
|
|
return;
|
|
|
|
if (value)
|
|
valuec = strdup(value);
|
|
else
|
|
valuec = NULL;
|
|
|
|
if (mxml_set_attr(node, name, valuec))
|
|
free(valuec);
|
|
}
|
|
|
|
|
|
/*
|
|
* 'mxmlElementSetAttrf()' - Set an attribute with a formatted value.
|
|
*
|
|
* If the named attribute already exists, the value of the attribute
|
|
* is replaced by the new formatted string. The formatted string value is
|
|
* copied into the element node. This function does nothing if the node
|
|
* is not an element.
|
|
*
|
|
* @since Mini-XML 2.3@
|
|
*/
|
|
|
|
void
|
|
mxmlElementSetAttrf(mxml_node_t *node, /* I - Element node */
|
|
const char *name, /* I - Name of attribute */
|
|
const char *format,/* I - Printf-style attribute value */
|
|
...) /* I - Additional arguments as needed */
|
|
{
|
|
va_list ap; /* Argument pointer */
|
|
char *value; /* Value */
|
|
|
|
|
|
#ifdef DEBUG
|
|
fprintf(stderr,
|
|
"mxmlElementSetAttrf(node=%p, name=\"%s\", format=\"%s\", ...)\n",
|
|
node, name ? name : "(null)", format ? format : "(null)");
|
|
#endif /* DEBUG */
|
|
|
|
/*
|
|
* Range check input...
|
|
*/
|
|
|
|
if (!node || node->type != MXML_ELEMENT || !name || !format)
|
|
return;
|
|
|
|
/*
|
|
* Format the value...
|
|
*/
|
|
|
|
va_start(ap, format);
|
|
value = _mxml_vstrdupf(format, ap);
|
|
va_end(ap);
|
|
|
|
if (!value)
|
|
mxml_error("Unable to allocate memory for attribute '%s' in element %s!",
|
|
name, node->value.element.name);
|
|
else if (mxml_set_attr(node, name, value))
|
|
free(value);
|
|
}
|
|
|
|
|
|
/*
|
|
* 'mxml_set_attr()' - Set or add an attribute name/value pair.
|
|
*/
|
|
|
|
static int /* O - 0 on success, -1 on failure */
|
|
mxml_set_attr(mxml_node_t *node, /* I - Element node */
|
|
const char *name, /* I - Attribute name */
|
|
char *value) /* I - Attribute value */
|
|
{
|
|
int i; /* Looping var */
|
|
mxml_attr_t *attr; /* New attribute */
|
|
|
|
|
|
/*
|
|
* Look for the attribute...
|
|
*/
|
|
|
|
for (i = node->value.element.num_attrs, attr = node->value.element.attrs;
|
|
i > 0;
|
|
i --, attr ++)
|
|
if (!strcmp(attr->name, name))
|
|
{
|
|
/*
|
|
* Free the old value as needed...
|
|
*/
|
|
|
|
if (attr->value)
|
|
free(attr->value);
|
|
|
|
attr->value = value;
|
|
|
|
return (0);
|
|
}
|
|
|
|
/*
|
|
* Add a new attribute...
|
|
*/
|
|
|
|
if (node->value.element.num_attrs == 0)
|
|
attr = malloc(sizeof(mxml_attr_t));
|
|
else
|
|
attr = realloc(node->value.element.attrs,
|
|
(node->value.element.num_attrs + 1) * sizeof(mxml_attr_t));
|
|
|
|
if (!attr)
|
|
{
|
|
mxml_error("Unable to allocate memory for attribute '%s' in element %s!",
|
|
name, node->value.element.name);
|
|
return (-1);
|
|
}
|
|
|
|
node->value.element.attrs = attr;
|
|
attr += node->value.element.num_attrs;
|
|
|
|
if ((attr->name = strdup(name)) == NULL)
|
|
{
|
|
mxml_error("Unable to allocate memory for attribute '%s' in element %s!",
|
|
name, node->value.element.name);
|
|
return (-1);
|
|
}
|
|
|
|
attr->value = value;
|
|
|
|
node->value.element.num_attrs ++;
|
|
|
|
return (0);
|
|
}
|