/*
* bulia byak <buliabyak@users.sf.net>
* Tavmjong Bah <tavmjong@free.fr> (Documentation)
*
* Functions to manipulate SPCSSAttr which is a class derived from Inkscape::XML::Node See
* sp-css-attr.h and node.h
*
* SPCSSAttr is a special node type where the "attributes" are the properties in an element's style
* attribute. For example, style="fill:blue;stroke:none" is stored in a List (Inkscape::Util:List)
* where the key is the property (e.g. "fill" or "stroke") and the value is the property's value
* (e.g. "blue" or "none"). An element's properties are manipulated by adding, removing, or
* changing an item in the List. Utility functions are provided to go back and forth between the
* two ways of representing properties (by a string or by a list).
*
* Use sp_repr_css_write_string to go from a property list to a style string.
*
*/
#define SP_REPR_CSS_C
#include <cstring>
#include <string>
#include <sstream>
#include <glibmm/ustring.h>
#include "svg/css-ostringstream.h"
#include "xml/repr.h"
#include "xml/simple-document.h"
#include "xml/simple-node.h"
#include "xml/sp-css-attr.h"
#include "style.h"
#include "libcroco/cr-sel-eng.h"
using Inkscape::Util::List;
using Inkscape::XML::AttributeRecord;
using Inkscape::XML::SimpleNode;
using Inkscape::XML::Node;
using Inkscape::XML::NodeType;
using Inkscape::XML::Document;
struct SPCSSAttrImpl : public SimpleNode, public SPCSSAttr {
public:
SPCSSAttrImpl(Document *doc)
: SimpleNode(g_quark_from_static_string("css"), doc) {}
SPCSSAttrImpl(SPCSSAttrImpl const &other, Document *doc)
: SimpleNode(other, doc) {}
NodeType type() const { return Inkscape::XML::ELEMENT_NODE; }
protected:
SimpleNode *_duplicate(Document* doc) const { return new SPCSSAttrImpl(*this, doc); }
};
static void sp_repr_css_add_components(SPCSSAttr *css, Node *repr, gchar const *attr);
/**
* Creates an empty SPCSSAttr (a class for manipulating CSS style properties).
*/
SPCSSAttr *sp_repr_css_attr_new()
{
static Inkscape::XML::Document *attr_doc=NULL;
if (!attr_doc) {
attr_doc = new Inkscape::XML::SimpleDocument();
}
return new SPCSSAttrImpl(attr_doc);
}
/**
* Unreferences an SPCSSAttr (will be garbage collected if no references remain).
*/
void sp_repr_css_attr_unref(SPCSSAttr *css)
{
g_assert(css != NULL);
Inkscape::GC::release((Node *) css);
}
/**
* Creates a new SPCSSAttr with one attribute (i.e. style) copied from an existing repr (node). The
* repr attribute data is in the form of a char const * string (e.g. fill:#00ff00;stroke:none). The
* string is parsed by libcroco which returns a CRDeclaration list (a typical C linked list) of
* properties and values. This list is then used to fill the attributes of the new SPCSSAttr.
*/
SPCSSAttr *sp_repr_css_attr(Node *repr, gchar const *attr)
{
g_assert(repr != NULL);
g_assert(attr != NULL);
SPCSSAttr *css = sp_repr_css_attr_new();
sp_repr_css_add_components(css, repr, attr);
return css;
}
/**
* Attempt to parse the passed string as a hexadecimal RGB or RGBA color.
* @param text The Glib::ustring to parse
* @return New CSS style representation if the parsing was successful, NULL otherwise
*/
SPCSSAttr *sp_repr_css_attr_parse_color_to_fill(const Glib::ustring &text)
{
// TODO reuse existing code instead of replicating here.
Glib::ustring::size_type len = text.bytes();
char *str = const_cast<char *>(text.data());
bool attempt_alpha = false;
if ( !str || ( *str == '\0' ) ) {
return NULL; // this is OK due to boolean short-circuit
}
// those conditionals guard against parsing e.g. the string "fab" as "fab000"
// (incomplete color) and "45fab71" as "45fab710" (incomplete alpha)
if ( *str == '#' ) {
if ( len < 7 ) {
return NULL;
}
if ( len >= 9 ) {
attempt_alpha = true;
}
} else {
if ( len < 6 ) {
return NULL;
}
if ( len >= 8 ) {
attempt_alpha = true;
}
}
unsigned int color = 0, alpha = 0xff;
// skip a leading #, if present
if ( *str == '#' ) {
++str;
}
// try to parse first 6 digits
int res = sscanf(str, "%6x", &color);
if ( res && ( res != EOF ) ) {
if (attempt_alpha) {// try to parse alpha if there's enough characters
sscanf(str + 6, "%2x", &alpha);
if ( !res || res == EOF ) {
alpha = 0xff;
}
}
SPCSSAttr *color_css = sp_repr_css_attr_new();
// print and set properties
gchar color_str[16];
g_snprintf(color_str, 16, "#%06x", color);
sp_repr_css_set_property(color_css, "fill", color_str);
float opacity = static_cast<float>(alpha)/static_cast<float>(0xff);
if (opacity > 1.0) {
opacity = 1.0; // safeguard
}
Inkscape::CSSOStringStream opcss;
opcss << opacity;
sp_repr_css_set_property(color_css, "fill-opacity", opcss.str().data());
return color_css;
}
return NULL;
}
/**
* Adds an attribute to an existing SPCSAttr with the cascaded value including all parents.
*/
static void sp_repr_css_attr_inherited_recursive(SPCSSAttr *css, Node *repr, gchar const *attr)
{
Node *parent = repr->parent();
// read the ancestors from root down, using head recursion, so that children override parents
if (parent) {
sp_repr_css_attr_inherited_recursive(css, parent, attr);
}
sp_repr_css_add_components(css, repr, attr);
}
/**
* Creates a new SPCSSAttr with one attribute whose value is determined by cascading.
*/
SPCSSAttr *sp_repr_css_attr_inherited(Node *repr, gchar const *attr)
{
g_assert(repr != NULL);
g_assert(attr != NULL);
SPCSSAttr *css = sp_repr_css_attr_new();
sp_repr_css_attr_inherited_recursive(css, repr, attr);
return css;
}
/**
* Adds components (style properties) to an existing SPCSAttr from the specified attribute's data
* (nominally a style attribute).
*
*/
static void sp_repr_css_add_components(SPCSSAttr *css, Node *repr, gchar const *attr)
{
g_assert(css != NULL);
g_assert(repr != NULL);
g_assert(attr != NULL);
char const *data = repr->attribute(attr);
sp_repr_css_attr_add_from_string(css, data);
}
/**
* Returns a character string of the value of a given style property or a default value if the
* attribute is not found.
*/
char const *sp_repr_css_property(SPCSSAttr *css, gchar const *name, gchar const *defval)
{
g_assert(css != NULL);
g_assert(name != NULL);
char const *attr = ((Node *)css)->attribute(name);
return ( attr == NULL
? defval
: attr );
}
/**
* Returns true if a style property is present and its value is unset.
*/
bool sp_repr_css_property_is_unset(SPCSSAttr *css, gchar const *name)
{
g_assert(css != NULL);
g_assert(name != NULL);
char const *attr = ((Node *)css)->attribute(name);
return (attr && !strcmp(attr, "inkscape:unset"));
}
/**
* Set a style property to a new value (e.g. fill to #ffff00).
*/
void sp_repr_css_set_property(SPCSSAttr *css, gchar const *name, gchar const *value)
{
g_assert(css != NULL);
g_assert(name != NULL);
((Node *) css)->setAttribute(name, value, false);
}
/**
* Set a style property to "inkscape:unset".
*/
void sp_repr_css_unset_property(SPCSSAttr *css, gchar const *name)
{
g_assert(css != NULL);
g_assert(name != NULL);
((Node *) css)->setAttribute(name, "inkscape:unset", false);
}
/**
* Return the value of a style property if property define, or a default value if not.
*/
double sp_repr_css_double_property(SPCSSAttr *css, gchar const *name, double defval)
{
g_assert(css != NULL);
g_assert(name != NULL);
double val = defval;
sp_repr_get_double((Node *) css, name, &val);
return val;
}
/**
* Write a style attribute string from a list of properties stored in an SPCSAttr object.
*/
void sp_repr_css_write_string(SPCSSAttr *css, Glib::ustring &str)
{
str.clear();
for ( List<AttributeRecord const> iter = css->attributeList() ;
iter ; ++iter )
{
if (iter->value && !strcmp(iter->value, "inkscape:unset")) {
continue;
}
str.append(g_quark_to_string(iter->key));
str.push_back(':');
str.append(iter->value); // Any necessary quoting to be done by calling routine.
if (rest(iter)) {
str.push_back(';');
}
}
}
/**
* Sets an attribute (e.g. style) to a string created from a list of style properties.
*/
void sp_repr_css_set(Node *repr, SPCSSAttr *css, gchar const *attr)
{
g_assert(repr != NULL);
g_assert(css != NULL);
g_assert(attr != NULL);
Glib::ustring value;
sp_repr_css_write_string(css, value);
/*
* If the new value is different from the old value, this will sometimes send a signal via
* CompositeNodeObserver::notiftyAttributeChanged() which results in calling
* SPObject::repr_attr_changed and thus updates the object's SPStyle. This update
* results in another call to repr->setAttribute().
*/
repr->setAttribute(attr, value.c_str());
}
/**
* Loops through a List of style properties, printing key/value pairs.
*/
void sp_repr_css_print(SPCSSAttr *css)
{
for ( List<AttributeRecord const> iter = css->attributeList() ;
iter ; ++iter )
{
gchar const * key = g_quark_to_string(iter->key);
gchar const * val = iter->value;
g_print("%s:\t%s\n",key,val);
}
}
/**
* Merges two SPCSSAttr's. Properties in src overwrite properties in dst if present in both.
*/
void sp_repr_css_merge(SPCSSAttr *dst, SPCSSAttr *src)
{
g_assert(dst != NULL);
g_assert(src != NULL);
dst->mergeFrom(src, "");
}
/**
* Merges style properties as parsed by libcroco into an existing SPCSSAttr.
* libcroco converts all single quotes to double quotes, which needs to be
* undone as we always use single quotes inside our 'style' strings since
* double quotes are used outside: e.g.:
* style="font-family:'DejaVu Sans'"
*/
static void sp_repr_css_merge_from_decl(SPCSSAttr *css, CRDeclaration const *const decl)
{
guchar *const str_value_unsigned = cr_term_to_string(decl->value);
Glib::ustring value( reinterpret_cast<gchar *>(str_value_unsigned ) );
g_free(str_value_unsigned);
Glib::ustring::size_type pos = 0;
while( (pos=value.find("\"",pos)) != Glib::ustring::npos) {
value.replace(pos,1,"'");
++pos;
}
Glib::ustring units;
/*
* Problem with parsing of units em and ex, like font-size "1.2em" and "3.4ex"
* stringstream thinks they are in scientific "e" notation and fails
* Must be a better way using std::fixed, precision etc
*
* HACK for now is to strip off em and ex units and add them back at the end
*/
int le = value.length();
if (le > 2) {
units = value.substr(le-2, 2);
if ((units == "em") || (units == "ex")) {
value = value.substr(0, le-2);
}
else {
units.clear();
}
}
// libcroco uses %.17f for formatting... leading to trailing zeros or small rounding errors.
// CSSOStringStream is used here to write valid CSS (as in sp_style_write_string). This has
// the additional benefit of respecting the numerical precission set in the SVG Output
// preferences. We assume any numerical part comes first (if not, the whole string is copied).
std::stringstream ss( value );
double number = 0;
std::string characters;
std::string temp;
bool number_valid = !(ss >> number).fail();
if (!number_valid) {
ss.clear();
ss.seekg(0); // work-around for a bug in libc++ (see lp:1300271)
}
while( !(ss >> temp).eof() ) {
characters += temp;
characters += " ";
}
characters += temp;
Inkscape::CSSOStringStream os;
if( number_valid ) os << number;
os << characters;
if (!units.empty()) {
os << units;
//g_message("sp_repr_css_merge_from_decl looks like em or ex units %s --> %s", str_value, os.str().c_str());
}
((Node *) css)->setAttribute(decl->property->stryng->str, os.str().c_str(), false);
}
/**
* Merges style properties as parsed by libcroco into an existing SPCSSAttr.
*
* \pre decl_list != NULL
*/
static void sp_repr_css_merge_from_decl_list(SPCSSAttr *css, CRDeclaration const *const decl_list)
{
// read the decls from start to end, using tail recursion, so that latter declarations override
// (Ref: http://www.w3.org/TR/REC-CSS2/cascade.html#cascading-order point 4.)
// because sp_repr_css_merge_from_decl sets properties unconditionally
sp_repr_css_merge_from_decl(css, decl_list);
if (decl_list->next) {
sp_repr_css_merge_from_decl_list(css, decl_list->next);
}
}
/**
* Use libcroco to parse a string for CSS properties and then merge
* them into an existing SPCSSAttr.
*/
void sp_repr_css_attr_add_from_string(SPCSSAttr *css, gchar const *p)
{
if (p != NULL) {
CRDeclaration *const decl_list
= cr_declaration_parse_list_from_buf(reinterpret_cast<guchar const *>(p), CR_UTF_8);
if (decl_list) {
sp_repr_css_merge_from_decl_list(css, decl_list);
cr_declaration_destroy(decl_list);
}
}
}
/**
* Creates a new SPCSAttr with the values filled from a repr, merges in properties from the given
* SPCSAttr, and then replaces that SPCSAttr with the new one. This is called, for example, for
* each object in turn when a selection's style is updated via sp_desktop_set_style().
*/
void sp_repr_css_change(Node *repr, SPCSSAttr *css, gchar const *attr)
{
g_assert(repr != NULL);
g_assert(css != NULL);
g_assert(attr != NULL);
SPCSSAttr *current = sp_repr_css_attr(repr, attr);
sp_repr_css_merge(current, css);
sp_repr_css_set(repr, current, attr);
sp_repr_css_attr_unref(current);
}
void sp_repr_css_change_recursive(Node *repr, SPCSSAttr *css, gchar const *attr)
{
g_assert(repr != NULL);
g_assert(css != NULL);
g_assert(attr != NULL);
sp_repr_css_change(repr, css, attr);
for (Node *child = repr->firstChild(); child != NULL; child = child->next()) {
sp_repr_css_change_recursive(child, css, attr);
}
}
/*
Local Variables:
mode:c++
c-file-style:"stroustrup"
c-file-offsets:((innamespace . 0)(inline-open . 0)(case-label . +))
indent-tabs-mode:nil
fill-column:99
End:
*/
// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=8:softtabstop=4:fileencoding=utf-8:textwidth=99 :