static GParamSpec *
copy_param_spec(GParamSpec *in, const gchar *name) {
const gchar * blurb = g_param_spec_get_blurb(in);
GParamSpec *out = NULL;
GParamFlags flags = G_PARAM_READWRITE;
// TODO: handle more things
if (G_IS_PARAM_SPEC_FLOAT(in)) {
GParamSpecFloat *f = G_PARAM_SPEC_FLOAT(in);
out = g_param_spec_double(name, name, blurb, f->minimum, f->maximum, f->default_value, flags);
} else if (G_IS_PARAM_SPEC_DOUBLE(in)) {
GParamSpecDouble *d = G_PARAM_SPEC_DOUBLE(in);
out = g_param_spec_double(name, name, blurb, d->minimum, d->maximum, d->default_value, flags);
} else if (G_IS_PARAM_SPEC_INT(in)) {
GParamSpecInt *i = G_PARAM_SPEC_INT(in);
out = g_param_spec_int(name, name, blurb, i->minimum, i->maximum, i->default_value, flags);
} else if (G_IS_PARAM_SPEC_UINT(in)) {
GParamSpecUInt *u = G_PARAM_SPEC_UINT(in);
out = g_param_spec_int(name, name, blurb, u->minimum, u->maximum, u->default_value, flags);
} else if (G_IS_PARAM_SPEC_LONG(in)) {
GParamSpecLong *l = G_PARAM_SPEC_LONG(in);
out = g_param_spec_int(name, name, blurb, l->minimum, l->maximum, l->default_value, flags);
} else if (GEGL_IS_PARAM_SPEC_COLOR(in)) {
GeglColor *default_value = gegl_param_spec_color_get_default(in);
out = gegl_param_spec_color(name, name, blurb, default_value, flags);
} else {
g_critical("json: Unknown param spec type for property %s", g_param_spec_get_nick(in));
}
return out;
}
static void
json_list_properties (GType type, const gchar *opname)
{
GParamSpec **self;
GParamSpec **parent;
guint n_self;
guint n_parent;
gint prop_no;
gboolean first_prop = TRUE;
g_print (",'properties':[\n");
if (!type)
return;
self = g_object_class_list_properties (
G_OBJECT_CLASS (g_type_class_ref (type)),
&n_self);
parent = g_object_class_list_properties (
/*G_OBJECT_CLASS (g_type_class_peek_parent (g_type_class_ref (type))),*/
G_OBJECT_CLASS (g_type_class_ref (GEGL_TYPE_OPERATION)),
&n_parent);
for (prop_no=0;prop_no<n_self;prop_no++)
{
gint parent_no;
gboolean found=FALSE;
for (parent_no=0;parent_no<n_parent;parent_no++)
if (self[prop_no]==parent[parent_no])
found=TRUE;
/* only print properties if we are an addition compared to
* GeglOperation
*/
if (!found)
{
const gchar *type_name = g_type_name (G_OBJECT_TYPE (self[prop_no]));
if (first_prop)
{
first_prop = FALSE;
g_print(" { 'name':'%s'\n", g_param_spec_get_name (self[prop_no]));
}
else
g_print(",{'name':'%s'\n", g_param_spec_get_name (self[prop_no]));
g_print(" ,'label':\"");
json_escape_string (g_param_spec_get_nick (self[prop_no]));
g_print ("\"\n");
if(strstr (type_name, "Param"))
{
type_name = strstr (type_name, "Param");
type_name+=5;
}
g_print(" ,'type':'");
{
for (const char *p = type_name; *p; p++)
g_print("%c", g_ascii_tolower (*p));
}
g_print("'\n");
if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_DOUBLE))
{
gdouble default_value = G_PARAM_SPEC_DOUBLE (self[prop_no])->default_value;
gdouble min = G_PARAM_SPEC_DOUBLE (self[prop_no])->minimum;
gdouble max = G_PARAM_SPEC_DOUBLE (self[prop_no])->maximum;
if (default_value<-10000000)
g_print (" ,'default':'-inf'\n");
else if (default_value>10000000)
g_print (" ,'default':'+inf'\n");
else
g_print (" ,'default':'%2.2f'\n", default_value);
if (min<-10000000)
g_print (" ,'minimum':'-inf'\n");
else
g_print (" ,'minimum':'%2.2f'\n", min);
if (max>10000000)
g_print (" ,'maximum':'+inf'\n");
else
g_print (" ,'maximum':'%2.2f'\n", max);
if (GEGL_IS_PARAM_SPEC_DOUBLE (self[prop_no]))
{
GeglParamSpecDouble *pspec =
GEGL_PARAM_SPEC_DOUBLE (self[prop_no]);
if (pspec->ui_minimum < -10000000)
g_print (" ,'ui-minimum':'-inf'\n");
else
g_print (" ,'ui-minimum':'%2.2f'\n", pspec->ui_minimum);
if (pspec->ui_maximum > 10000000)
g_print (" ,'ui-maximum':'+inf'\n");
else
g_print (" ,'ui-maximum':'%2.2f'\n", pspec->ui_maximum);
g_print (" ,'ui-gamma':'%2.2f'\n", pspec->ui_gamma);
g_print (" ,'ui-step-small':'%2.2f'\n", pspec->ui_step_small);
g_print (" ,'ui-step-big':'%2.2f'\n", pspec->ui_step_big);
g_print (" ,'ui-digits':'%i'\n", pspec->ui_digits);
}
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_INT))
{
gint default_value = G_PARAM_SPEC_INT (self[prop_no])->default_value;
gint min = G_PARAM_SPEC_INT (self[prop_no])->minimum;
gint max = G_PARAM_SPEC_INT (self[prop_no])->maximum;
if (default_value<-10000000)
g_print (" ,'default':'-inf'\n");
else if (default_value>10000000)
g_print (" ,'default':'+inf'\n");
else
g_print (" ,'default':'%i'\n", default_value);
if (min<-10000000)
g_print (" ,'minimum':'-inf'\n");
else
g_print (" ,'minimum':'%i'\n", min);
if (max>10000000)
g_print (" ,'maximum':'+inf'\n");
else
g_print (" ,'maximum':'%i'\n", max);
if (GEGL_IS_PARAM_SPEC_INT (self[prop_no]))
{
GeglParamSpecInt *pspec =
GEGL_PARAM_SPEC_INT (self[prop_no]);
if (pspec->ui_minimum < -10000000)
g_print (" ,'ui-minimum':'-inf'\n");
else
g_print (" ,'ui-minimum':'%i'\n", pspec->ui_minimum);
if (pspec->ui_maximum > 10000000)
g_print (" ,'ui-maximum':'+inf'\n");
else
g_print (" ,'ui-maximum':'%i'\n", pspec->ui_maximum);
g_print (" ,'ui-gamma':'%2.2f'\n", pspec->ui_gamma);
g_print (" ,'ui-step-small':'%i'\n", pspec->ui_step_small);
g_print (" ,'ui-step-big':'%i'\n", pspec->ui_step_big);
}
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_BOOLEAN))
{
g_print (" ,'default':'%s'\n", G_PARAM_SPEC_BOOLEAN (self[prop_no])->default_value?"True":"False");
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_STRING))
{
const gchar *string = G_PARAM_SPEC_STRING (self[prop_no])->default_value;
g_print (" ,'default':\"");
json_escape_string (string);
g_print ("\"\n");
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), GEGL_TYPE_COLOR))
{
GeglColor *color = gegl_param_spec_color_get_default (self[prop_no]);
if (color)
{
gchar *string;
g_object_get (color, "string", &string, NULL);
g_print (" ,'default':\"");
json_escape_string (string);
g_print ("\"\n");
g_free (string);
}
}
else
{
}
if (g_param_spec_get_blurb (self[prop_no]) &&
g_param_spec_get_blurb (self[prop_no])[0]!='\0')
{
g_print (" ,'description':\"");
json_escape_string (g_param_spec_get_blurb (self[prop_no]));
g_print ("\"\n");
}
{
guint count;
gchar **property_keys = gegl_operation_list_property_keys (
opname,
g_param_spec_get_name (self[prop_no]),
&count);
if (property_keys)
{
int i;
if (property_keys[0])
{
/* XXX: list is in reverse order */
for (i = 0; property_keys[i]; i++)
{
g_print (" ,'%s':'%s'\n",
property_keys[i],
gegl_operation_get_property_key (opname,
g_param_spec_get_name (self[prop_no]),
property_keys[i]));
}
}
g_free (property_keys);
}
}
g_print(" }");
}
}
if (self)
g_free (self);
if (parent)
g_free (parent);
g_print ("]");
}
static void
list_properties (GType type,
gint indent,
gboolean html)
{
GParamSpec **self;
GParamSpec **parent;
guint n_self;
guint n_parent;
gint prop_no;
if (!type)
return;
self = g_object_class_list_properties (
G_OBJECT_CLASS (g_type_class_ref (type)),
&n_self);
parent = g_object_class_list_properties (
/*G_OBJECT_CLASS (g_type_class_peek_parent (g_type_class_ref (type))),*/
G_OBJECT_CLASS (g_type_class_ref (GEGL_TYPE_OPERATION)),
&n_parent);
for (prop_no=0;prop_no<n_self;prop_no++)
{
gint parent_no;
gboolean found=FALSE;
for (parent_no=0;parent_no<n_parent;parent_no++)
if (self[prop_no]==parent[parent_no])
found=TRUE;
/* only print properties if we are an addition compared to
* GeglOperation
*/
if (!found)
{
const gchar *type_name = g_type_name (G_OBJECT_TYPE (self[prop_no]));
type_name = strstr (type_name, "Param");
type_name+=5;
g_print("<tr><td colspan='1'> </td><td colspan='1' class='prop_type' valign='top'>%s<br/><span style='font-style:normal;text-align:right;float:right;padding-right:1em;'>", type_name);
if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_DOUBLE))
{
g_print ("%2.2f", G_PARAM_SPEC_DOUBLE (self[prop_no])->default_value);
{
gdouble min = G_PARAM_SPEC_DOUBLE (self[prop_no])->minimum;
gdouble max = G_PARAM_SPEC_DOUBLE (self[prop_no])->maximum;
g_print ("<br/>");
if (min<-10000000)
g_print ("-inf ");
else
g_print ("%2.2f", min);
g_print ("-");
if (max>10000000)
g_print (" +inf");
else
g_print ("%2.2f", max);
}
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_INT))
{
g_print ("%i", G_PARAM_SPEC_INT (self[prop_no])->default_value);
{
gint min = G_PARAM_SPEC_INT (self[prop_no])->minimum;
gint max = G_PARAM_SPEC_INT (self[prop_no])->maximum;
g_print ("<br/>");
if (min<-10000000)
g_print ("-inf ");
else
g_print ("%i", min);
g_print ("-");
if (max>10000000)
g_print (" +inf");
else
g_print ("%i", max);
}
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_FLOAT))
{
g_print ("%2.2f", G_PARAM_SPEC_FLOAT (self[prop_no])->default_value);
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_BOOLEAN))
{
g_print ("%s", G_PARAM_SPEC_BOOLEAN (self[prop_no])->default_value?"True":"False");
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), G_TYPE_STRING))
{
const gchar *string = G_PARAM_SPEC_STRING (self[prop_no])->default_value;
if (strlen (string) > 8)
{
gchar copy[16];
g_snprintf (copy, 12, "%s..", string);
g_print ("%s", copy);
}
else
g_print ("%s", string);
}
else if (g_type_is_a (G_PARAM_SPEC_VALUE_TYPE (self[prop_no]), GEGL_TYPE_COLOR))
{
GeglColor *color = gegl_param_spec_color_get_default (self[prop_no]);
if (color)
{
gchar *string;
g_object_get (color, "string", &string, NULL);
g_print ("%s", string);
g_free (string);
g_object_unref (color);
}
}
else
{
g_print ("\n");
}
g_print ("</span></td>");
g_print("<td class='prop_name' valign='top'>%s</td>\n",
g_param_spec_get_name (self[prop_no]));
if (g_param_spec_get_blurb (self[prop_no])[0]!='\0')
g_print ("<td colspan='1' valign='top' class='prop_blurb'>%s</td>\n",
g_param_spec_get_blurb (self[prop_no]));
else
g_print ("<td><em>not documented</em></td>\n\n");
g_print ("</tr>\n");
}
}
if (self)
g_free (self);
if (parent)
g_free (parent);
}
