mathematical 1.6.17 → 1.6.20

data/ext/mathematical/lasem/src/lsmproperties.h

@@ -0,0 +1,85 @@
+/* Lasem
+ *
+ * Copyright © 2007-2009 Emmanuel Pacaud
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General
+ * Public License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1335, USA.
+ *
+ * Author:
+ * 	Emmanuel Pacaud <emmanuel@gnome.org>
+ */
+
+#ifndef LSM_PROPERTIES_H
+#define LSM_PROPERTIES_H
+
+#include <lsmtypes.h>
+#include <lsmtraits.h>
+
+G_BEGIN_DECLS
+
+#define LSM_PROPERTY_OFFSET_TO_ID(structure,member) (offsetof (structure, member) / sizeof (void *))
+#define LSM_PROPERTY_ID_TO_OFFSET(id) ((id) * sizeof (void *))
+
+typedef struct {
+	guint16	id;
+	guint16	flags;
+	char *	value;
+} LsmProperty;
+
+typedef struct {
+	char const *		name;
+	guint16			id;
+	const LsmTraitClass *	trait_class;
+	const char *		trait_default;
+} LsmPropertyInfos;
+
+typedef struct {
+	GSList *properties;
+} LsmPropertyBag;
+
+typedef struct _LsmPropertyManager LsmPropertyManager;
+
+#define LSM_TYPE_PROPERTY_MANAGER (lsm_property_manager_get_type())
+
+GType lsm_property_manager_get_type (void);
+
+LsmPropertyManager *	lsm_property_manager_new	(unsigned int n_properties,
+							 const LsmPropertyInfos *property_infos);
+LsmPropertyManager *	lsm_property_manager_ref	(LsmPropertyManager *manager);
+void			lsm_property_manager_unref	(LsmPropertyManager *manager);
+
+gboolean 	lsm_property_manager_set_property 	(LsmPropertyManager *manager,
+							 LsmPropertyBag *property_bag,
+							 const char *name,
+							 const char *value);
+const char *	lsm_property_manager_get_property 	(LsmPropertyManager *manager,
+							 LsmPropertyBag *property_bag,
+							 const char *name);
+void		lsm_property_manager_clean_properties	(LsmPropertyManager *manager,
+							 LsmPropertyBag *property_bag);
+char * 		lsm_property_manager_serialize 		(LsmPropertyManager *property_manager,
+							 LsmPropertyBag *property_bag);
+void		lsm_property_manager_apply_property_bag (LsmPropertyManager *property_manager,
+							 LsmPropertyBag *property_bag,
+							 void *style,
+							 const void *parent_style);
+void		lsm_property_manager_init_default_style (LsmPropertyManager *property_manager,
+							 void *style);
+
+void		lsm_property_bag_init			(LsmPropertyBag *bag);
+
+G_END_DECLS
+
+#endif

data/ext/mathematical/lasem/src/lsmstr.c

@@ -0,0 +1,231 @@
+/* Lasem
+ *
+ * Copyright © 2009 Emmanuel Pacaud
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General
+ * Public License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1335, USA.
+ *
+ * Author:
+ * 	Emmanuel Pacaud <emmanuel@gnome.org>
+ */
+
+#include <lsmstr.h>
+#include <lsmutils.h>
+#include <glib.h>
+#include <stdio.h>
+#include <string.h>
+#include <math.h>
+
+/* http://www.ietf.org/rfc/rfc2396.txt - Implementation comes from librsvg (rsvg-base.c). */
+
+gboolean
+lsm_str_is_uri  (const char *str)
+{
+	char const *p;
+
+	if (str == NULL)
+		return FALSE;
+
+	if (strlen (str) < 4)
+		return FALSE;
+
+	if (   (str[0] < 'a' || str[0] > 'z')
+	       && (str[0] < 'A' || str[0] > 'Z'))
+		return FALSE;
+
+	for (p = &str[1];
+	     (*p >= 'a' && *p <= 'z')
+	     || (*p >= 'A' && *p <= 'Z')
+	     || (*p >= '0' && *p <= '9')
+	     || *p == '+'
+	     || *p == '-'
+	     || *p == '.';
+	     p++);
+
+	if (strlen (p) < 3)
+		return FALSE;
+
+	return (p[0] == ':' && p[1] == '/' && p[2] == '/');
+}
+
+char *
+lsm_str_to_uri (const char *str)
+{
+	gchar *current_dir;
+	gchar *absolute_filename;
+	gchar *uri;
+
+	if (str == NULL)
+		return NULL;
+
+	if (lsm_str_is_uri (str))
+		return g_strdup (str);
+
+	if (g_path_is_absolute (str))
+		return g_filename_to_uri (str, NULL, NULL);
+
+	current_dir = g_get_current_dir ();
+	absolute_filename = g_build_filename (current_dir, str, NULL);
+	uri = g_filename_to_uri (absolute_filename, NULL, NULL);
+	g_free (absolute_filename);
+	g_free (current_dir);
+
+	return uri;
+}
+
+gboolean
+lsm_str_parse_double (char **str, double *x)
+{
+	char *end, *c;
+	gboolean integer_part = FALSE;
+	gboolean fractional_part = FALSE;
+	gboolean exponent_part = FALSE;
+	double mantissa = 0.0;
+	double exponent =0.0;
+	double divisor;
+	gboolean mantissa_sign = 1.0;
+	gboolean exponent_sign = 1.0;
+
+	c = *str;
+
+	if (*c == '-') {
+		mantissa_sign = -1.0;
+		c++;
+	} else if (*c == '+')
+		c++;
+
+	if (*c >= '0' && *c <= '9') {
+		integer_part = TRUE;
+		mantissa = *c - '0';
+		c++;
+
+		while (*c >= '0' && *c <= '9') {
+			mantissa = mantissa * 10.0 + *c - '0';
+			c++;
+		}
+	}
+
+
+	if (*c == '.')
+		c++;
+	else if (!integer_part)
+		return FALSE;
+
+	if (*c >= '0' && *c <= '9') {
+		fractional_part = TRUE;
+		mantissa += (*c - '0') * 0.1;
+		divisor = 0.01;
+		c++;
+
+		while (*c >= '0' && *c <= '9') {
+			mantissa += (*c - '0') * divisor;
+			divisor *= 0.1;
+			c++;
+		}
+	}
+
+	if (!fractional_part && !integer_part)
+		return FALSE;
+
+	end = c;
+
+	if (*c == 'E' || *c == 'e') {
+		c++;
+
+		if (*c == '-') {
+			exponent_sign = -1.0;
+			c++;
+		} else if (*c == '+')
+			c++;
+
+		if (*c >= '0' && *c <= '9') {
+			exponent_part = TRUE;
+			exponent = *c - '0';
+			c++;
+
+			while (*c >= '0' && *c <= '9') {
+				exponent = exponent * 10.0 + *c - '0';
+				c++;
+			}
+		}
+	}
+
+	if (exponent_part) {
+		end = c;
+		*x = mantissa_sign * mantissa * pow (10.0, exponent_sign * exponent);
+	} else
+		*x = mantissa_sign * mantissa;
+
+	*str = end;
+
+	return TRUE;
+}
+
+unsigned int
+lsm_str_parse_double_list (char **str, unsigned int n_values, double *values)
+{
+	char *ptr = *str;
+	unsigned int i;
+
+	lsm_str_skip_comma_and_spaces (str);
+
+	for (i = 0; i < n_values; i++) {
+		if (!lsm_str_parse_double (str, &values[i])) {
+			*str = ptr;
+			return i;
+		}
+		lsm_str_skip_comma_and_spaces (str);
+	}
+
+	return i;
+}
+
+void
+lsm_str_point_list_exents (const char *point_list, LsmExtents *extents)
+{
+	char *str = (char *) point_list;
+	int count = 0;
+	int n_values;
+	double values[2];
+
+	if (extents == NULL)
+		return;
+
+	if (point_list == NULL) {
+		extents->x1 = 0;
+		extents->x2 = 0;
+		extents->y1 = 0;
+		extents->y2 = 0;
+		return;
+	}
+
+	do {
+		n_values = lsm_str_parse_double_list (&str, 2, values);
+		if (n_values == 2) {
+			if (count == 0) {
+				extents->x1 = values[0];
+				extents->x2 = values[0];
+				extents->y1 = values[1];
+				extents->y2 = values[1];
+			} else {
+				extents->x1 = MIN (values[0], extents->x1);
+				extents->x2 = MAX (values[0], extents->x2);
+				extents->y1 = MIN (values[1], extents->y1);
+				extents->y2 = MAX (values[1], extents->y2);
+			}
+		}
+		count++;
+	} while (n_values == 2);
+}

data/ext/mathematical/lasem/src/lsmstr.h

@@ -0,0 +1,114 @@
+/* Lasem
+ *
+ * Copyright © 2009 Emmanuel Pacaud
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General
+ * Public License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1335, USA.
+ *
+ * Author:
+ * 	Emmanuel Pacaud <emmanuel@gnome.org>
+ */
+
+#ifndef LSM_STR_H
+#define LSM_STR_H
+
+#include <lsmtypes.h>
+
+G_BEGIN_DECLS
+
+gboolean 	lsm_str_is_uri 		(const char *str);
+char *   	lsm_str_to_uri 		(const char *str);
+
+gboolean 	lsm_str_parse_double 		(char **str, double *x);
+unsigned int 	lsm_str_parse_double_list 	(char **str, unsigned int n_values, double *values);
+
+void		lsm_str_point_list_exents	(const char *point_list, LsmExtents *extents);
+
+static inline void
+lsm_str_skip_spaces (char **str)
+{
+	while (g_ascii_isspace (**str))
+		(*str)++;
+}
+
+static inline void
+lsm_str_skip_char (char **str, char c)
+{
+	while (**str == c)
+		(*str)++;
+}
+
+static inline void
+lsm_str_skip_comma_and_spaces (char **str)
+{
+	while (g_ascii_isspace (**str) || **str == ',')
+		(*str)++;
+}
+
+static inline void
+lsm_str_skip_semicolon_and_spaces (char **str)
+{
+	while (g_ascii_isspace (**str) || **str == ';')
+		(*str)++;
+}
+
+static inline void
+lsm_str_skip_colon_and_spaces (char **str)
+{
+	while (g_ascii_isspace (**str) || **str == ':')
+		(*str)++;
+}
+
+/**
+ * lsm_str_consolidate:
+ * @str: a utf8 string
+ *
+ * Removes trailing and heading ascii spaces from str, and reduce consecutive spaces to one space.
+ */
+
+static inline void
+lsm_str_consolidate (char *str)
+{
+	char *to_ptr;
+	char *from_ptr;
+
+	if (str == NULL)
+		return;
+
+	from_ptr = str;
+	to_ptr = str;
+	while (*from_ptr != '\0') {
+		if (g_ascii_isspace (*from_ptr)) {
+			if (to_ptr != str &&
+			    *(to_ptr - 1) != ' ') {
+				*to_ptr = ' ';
+				to_ptr++;
+			}
+		} else {
+			*to_ptr = *from_ptr;
+			to_ptr++;
+		}
+		from_ptr++;
+	}
+
+	if (to_ptr != str && *(to_ptr - 1) == ' ')
+		*(to_ptr - 1) = '\0';
+	else
+		*to_ptr = '\0';
+}
+
+G_END_DECLS
+
+#endif

data/ext/mathematical/lasem/src/lsmsvg.h

@@ -0,0 +1,67 @@
+/* Lasem
+ *
+ * Copyright © 2009-10 Emmanuel Pacaud
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General
+ * Public License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1335, USA.
+ *
+ * Author:
+ * 	Emmanuel Pacaud <emmanuel@gnome.org>
+ */
+
+#ifndef LSM_SVG_H
+#define LSM_SVG_H
+
+#include <lsmdom.h>
+
+#include <lsmsvgtypes.h>
+
+#include <lsmsvgtraits.h>
+#include <lsmsvgattributes.h>
+#include <lsmsvgstyle.h>
+#include <lsmsvgcolors.h>
+#include <lsmsvglength.h>
+#include <lsmsvgview.h>
+#include <lsmsvgmatrix.h>
+#include <lsmsvgdocument.h>
+#include <lsmsvgelement.h>
+#include <lsmsvgclippathelement.h>
+#include <lsmsvgsvgelement.h>
+#include <lsmsvggelement.h>
+#include <lsmsvgdefselement.h>
+#include <lsmsvguseelement.h>
+#include <lsmsvgimageelement.h>
+#include <lsmsvgsymbolelement.h>
+#include <lsmsvgmarkerelement.h>
+#include <lsmsvgrectelement.h>
+#include <lsmsvgcircleelement.h>
+#include <lsmsvgellipseelement.h>
+#include <lsmsvglineelement.h>
+#include <lsmsvgpathelement.h>
+#include <lsmsvgpolylineelement.h>
+#include <lsmsvgpolygonelement.h>
+#include <lsmsvgtextelement.h>
+#include <lsmsvgtspanelement.h>
+#include <lsmsvggradientelement.h>
+#include <lsmsvglineargradientelement.h>
+#include <lsmsvgradialgradientelement.h>
+#include <lsmsvgstopelement.h>
+#include <lsmsvgpatternelement.h>
+#include <lsmsvgmaskelement.h>
+#include <lsmsvgfilterelement.h>
+#include <lsmsvgfilterprimitive.h>
+#include <lsmsvgfiltergaussianblur.h>
+
+#endif

data/ext/mathematical/lasem/src/lsmsvgaelement.c

@@ -0,0 +1,73 @@
+/* Lasem
+ *
+ * Copyright © 2012 Emmanuel Pacaud
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General
+ * Public License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1335, USA.
+ *
+ * Author:
+ * 	Emmanuel Pacaud <emmanuel@gnome.org>
+ */
+
+#include <lsmsvgaelement.h>
+#include <lsmdebug.h>
+#include <stdio.h>
+
+static GObjectClass *parent_class;
+
+/* GdomNode implementation */
+
+static const char *
+lsm_svg_a_element_get_node_name (LsmDomNode *node)
+{
+	return "a";
+}
+
+/* GGElement implementation */
+
+/* LsmSvgElement implementation */
+
+/* LsmSvgAElement implementation */
+
+LsmDomNode *
+lsm_svg_a_element_new (void)
+{
+	return g_object_new (LSM_TYPE_SVG_A_ELEMENT, NULL);
+}
+
+static void
+lsm_svg_a_element_init (LsmSvgAElement *self)
+{
+}
+
+/* LsmSvgAElement class */
+
+
+static void
+lsm_svg_a_element_class_init (LsmSvgAElementClass *s_g_class)
+{
+	LsmDomNodeClass *d_node_class = LSM_DOM_NODE_CLASS (s_g_class);
+	LsmSvgElementClass *s_element_class = LSM_SVG_ELEMENT_CLASS (s_g_class);
+
+	parent_class = g_type_class_peek_parent (s_g_class);
+
+	d_node_class->get_node_name = lsm_svg_a_element_get_node_name;
+
+	s_element_class->category =
+		LSM_SVG_ELEMENT_CATEGORY_CONTAINER |
+		LSM_SVG_ELEMENT_CATEGORY_STRUCTURAL;
+}
+
+G_DEFINE_TYPE (LsmSvgAElement, lsm_svg_a_element, LSM_TYPE_SVG_TRANSFORMABLE)

data/ext/mathematical/lasem/src/lsmsvgaelement.h

@@ -0,0 +1,55 @@
+/* Lasem
+ *
+ * Copyright © 2012 Emmanuel Pacaud
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General
+ * Public License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ * Boston, MA 02110-1335, USA.
+ *
+ * Author:
+ * 	Emmanuel Pacaud <emmanuel@gnome.org>
+ */
+
+#ifndef LSM_SVG_A_ELEMENT_H
+#define LSM_SVG_A_ELEMENT_H
+
+#include <lsmsvgtypes.h>
+#include <lsmsvgtransformable.h>
+
+G_BEGIN_DECLS
+
+#define LSM_TYPE_SVG_A_ELEMENT             (lsm_svg_a_element_get_type ())
+#define LSM_SVG_A_ELEMENT(obj)             (G_TYPE_CHECK_INSTANCE_CAST ((obj), LSM_TYPE_SVG_A_ELEMENT, LsmSvgAElement))
+#define LSM_SVG_A_ELEMENT_CLASS(klass)     (G_TYPE_CHECK_CLASS_CAST ((klass), LSM_TYPE_SVG_A_ELEMENT, LsmSvgAElementClass))
+#define LSM_IS_SVG_A_ELEMENT(obj)          (G_TYPE_CHECK_INSTANCE_TYPE ((obj), LSM_TYPE_SVG_A_ELEMENT))
+#define LSM_IS_SVG_A_ELEMENT_CLASS(klass)  (G_TYPE_CHECK_CLASS_TYPE ((klass), LSM_TYPE_SVG_A_ELEMENT))
+#define LSM_SVG_A_ELEMENT_GET_CLASS(obj)   (G_TYPE_INSTANCE_GET_CLASS((obj), LSM_TYPE_SVG_A_ELEMENT, LsmSvgAElementClass))
+
+typedef struct _LsmSvgAElementClass LsmSvgAElementClass;
+
+struct _LsmSvgAElement {
+	LsmSvgTransformable base;
+};
+
+struct _LsmSvgAElementClass {
+	LsmSvgTransformableClass  base_class;
+};
+
+GType lsm_svg_a_element_get_type (void);
+
+LsmDomNode *		lsm_svg_a_element_new 		(void);
+
+G_END_DECLS
+
+#endif