Merge branch 'system-json-glib'
[profile/ivi/clutter.git] / clutter / clutter-color.c
1 /*
2  * Clutter.
3  *
4  * An OpenGL based 'interactive canvas' library.
5  *
6  * Authored By Matthew Allum  <mallum@openedhand.com>
7  *
8  * Copyright (C) 2006 OpenedHand
9  *
10  * This library is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU Lesser General Public
12  * License as published by the Free Software Foundation; either
13  * version 2 of the License, or (at your option) any later version.
14  *
15  * This library is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18  * Lesser General Public License for more details.
19  *
20  * You should have received a copy of the GNU Lesser General Public
21  * License along with this library; if not, write to the
22  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
23  * Boston, MA 02111-1307, USA.
24  */
25
26 /**
27  * SECTION:clutter-color
28  * @short_description: Color management and manipulation.
29  *
30  * #ClutterColor is a simple type for representing colors in Clutter.
31  *
32  * A #ClutterColor is expressed as a 4-tuple of values ranging from
33  * zero to 255, one for each color channel plus one for the alpha.
34  */
35
36 #ifdef HAVE_CONFIG_H
37 #include "config.h"
38 #endif
39
40 #include <pango/pango-attributes.h>
41 #include <gobject/gvaluecollector.h>
42
43 #include "clutter-main.h"
44 #include "clutter-color.h"
45 #include "clutter-private.h"
46 #include "clutter-debug.h"
47
48 /**
49  * clutter_color_add:
50  * @a: a #ClutterColor
51  * @b: a #ClutterColor
52  * @result: (out): return location for the result
53  *
54  * Adds @a to @b and saves the resulting color inside @result.
55  *
56  * The alpha channel of @result is set as as the maximum value
57  * between the alpha channels of @a and @b.
58  */
59 void
60 clutter_color_add (const ClutterColor *a,
61                    const ClutterColor *b,
62                    ClutterColor       *result)
63 {
64   g_return_if_fail (a != NULL);
65   g_return_if_fail (b != NULL);
66   g_return_if_fail (result != NULL);
67
68   result->red   = CLAMP (a->red   + b->red,   0, 255);
69   result->green = CLAMP (a->green + b->green, 0, 255);
70   result->blue  = CLAMP (a->blue  + b->blue,  0, 255);
71
72   result->alpha = MAX (a->alpha, b->alpha);
73 }
74
75 /**
76  * clutter_color_subtract:
77  * @a: a #ClutterColor
78  * @b: a #ClutterColor
79  * @result: (out): return location for the result
80  *
81  * Subtracts @b from @a and saves the resulting color inside @result.
82  *
83  * This function assumes that the components of @a are greater than the
84  * components of @b; the result is, otherwise, undefined.
85  *
86  * The alpha channel of @result is set as the minimum value
87  * between the alpha channels of @a and @b.
88  */
89 void
90 clutter_color_subtract (const ClutterColor *a,
91                         const ClutterColor *b,
92                         ClutterColor       *result)
93 {
94   g_return_if_fail (a != NULL);
95   g_return_if_fail (b != NULL);
96   g_return_if_fail (result != NULL);
97
98   result->red   = CLAMP (a->red   - b->red,   0, 255);
99   result->green = CLAMP (a->green - b->green, 0, 255);
100   result->blue  = CLAMP (a->blue  - b->blue,  0, 255);
101
102   result->alpha = MIN (a->alpha, b->alpha);
103 }
104
105 /**
106  * clutter_color_lighten:
107  * @color: a #ClutterColor
108  * @result: (out): return location for the lighter color
109  *
110  * Lightens @color by a fixed amount, and saves the changed color
111  * in @result.
112  */
113 void
114 clutter_color_lighten (const ClutterColor *color,
115                        ClutterColor       *result)
116 {
117   clutter_color_shade (color, 1.3, result);
118 }
119
120 /**
121  * clutter_color_darken:
122  * @color: a #ClutterColor
123  * @result: (out): return location for the darker color
124  *
125  * Darkens @color by a fixed amount, and saves the changed color
126  * in @result.
127  */
128 void
129 clutter_color_darken (const ClutterColor *color,
130                       ClutterColor       *result)
131 {
132   clutter_color_shade (color, 0.7, result);
133 }
134
135 /**
136  * clutter_color_to_hls:
137  * @color: a #ClutterColor
138  * @hue: return location for the hue value or %NULL
139  * @luminance: return location for the luminance value or %NULL
140  * @saturation: return location for the saturation value or %NULL
141  *
142  * Converts @color to the HLS format.
143  *
144  * The @hue value is in the 0 .. 360 range. The @luminance and
145  * @saturation values are in the 0 .. 1 range.
146  */
147 void
148 clutter_color_to_hls (const ClutterColor *color,
149                       float              *hue,
150                       float              *luminance,
151                       float              *saturation)
152 {
153   float red, green, blue;
154   float min, max, delta;
155   float h, l, s;
156   
157   g_return_if_fail (color != NULL);
158
159   red   = color->red / 255.0;
160   green = color->green / 255.0;
161   blue  = color->blue / 255.0;
162
163   if (red > green)
164     {
165       if (red > blue)
166         max = red;
167       else
168         max = blue;
169
170       if (green < blue)
171         min = green;
172       else
173         min = blue;
174     }
175   else
176     {
177       if (green > blue)
178         max = green;
179       else
180         max = blue;
181
182       if (red < blue)
183         min = red;
184       else
185         min = blue;
186     }
187
188   l = (max + min) / 2;
189   s = 0;
190   h = 0;
191
192   if (max != min)
193     {
194       if (l <= 0.5)
195         s = (max - min) / (max + min);
196       else
197         s = (max - min) / (2.0 - max - min);
198
199       delta = max - min;
200
201       if (red == max)
202         h = (green - blue) / delta;
203       else if (green == max)
204         h = 2.0 + (blue - red) / delta;
205       else if (blue == max)
206         h = 4.0 + (red - green) / delta;
207
208       h *= 60;
209
210       if (h < 0)
211         h += 360.0;
212     }
213
214   if (hue)
215     *hue = h;
216
217   if (luminance)
218     *luminance = l;
219
220   if (saturation)
221     *saturation = s;
222 }
223
224 /**
225  * clutter_color_from_hls:
226  * @color: (out): return location for a #ClutterColor
227  * @hue: hue value, in the 0 .. 360 range
228  * @luminance: luminance value, in the 0 .. 1 range
229  * @saturation: saturation value, in the 0 .. 1 range
230  *
231  * Converts a color expressed in HLS (hue, luminance and saturation)
232  * values into a #ClutterColor.
233  */
234 void
235 clutter_color_from_hls (ClutterColor *color,
236                         float         hue,
237                         float         luminance,
238                         float         saturation)
239 {
240   float tmp1, tmp2;
241   float tmp3[3];
242   float clr[3];
243   int   i;
244
245   hue /= 360.0;
246
247   if (saturation == 0)
248     {
249       color->red = color->green = color->blue = (luminance * 255);
250
251       return;
252     }
253
254   if (luminance <= 0.5)
255     tmp2 = luminance * (1.0 + saturation);
256   else
257     tmp2 = luminance + saturation - (luminance * saturation);
258
259   tmp1 = 2.0 * luminance - tmp2;
260
261   tmp3[0] = hue + 1.0 / 3.0;
262   tmp3[1] = hue;
263   tmp3[2] = hue - 1.0 / 3.0;
264
265   for (i = 0; i < 3; i++)
266     {
267       if (tmp3[i] < 0)
268         tmp3[i] += 1.0;
269
270       if (tmp3[i] > 1)
271         tmp3[i] -= 1.0;
272
273       if (6.0 * tmp3[i] < 1.0)
274         clr[i] = tmp1 + (tmp2 - tmp1) * tmp3[i] * 6.0;
275       else if (2.0 * tmp3[i] < 1.0)
276         clr[i] = tmp2;
277       else if (3.0 * tmp3[i] < 2.0)
278         clr[i] = (tmp1 + (tmp2 - tmp1) * ((2.0 / 3.0) - tmp3[i]) * 6.0);
279       else
280         clr[i] = tmp1;
281     }
282
283   color->red   = clr[0] * 255.0;
284   color->green = clr[1] * 255.0;
285   color->blue  = clr[2] * 255.0;
286 }
287
288 /**
289  * clutter_color_shade:
290  * @color: a #ClutterColor
291  * @factor: the shade factor to apply
292  * @result: (out): return location for the shaded color
293  *
294  * Shades @color by @factor and saves the modified color into @result.
295  */
296 void
297 clutter_color_shade (const ClutterColor *color,
298                      gdouble             factor,
299                      ClutterColor       *result)
300 {
301   float h, l, s;
302
303   g_return_if_fail (color != NULL);
304   g_return_if_fail (result != NULL);
305   
306   clutter_color_to_hls (color, &h, &l, &s);
307
308   l *= factor;
309   if (l > 1.0)
310     l = 1.0;
311   else if (l < 0)
312     l = 0;
313
314   s *= factor;
315   if (s > 1.0)
316     s = 1.0;
317   else if (s < 0)
318     s = 0;
319   
320   clutter_color_from_hls (result, h, l, s);
321
322   result->alpha = color->alpha;
323 }
324
325 /**
326  * clutter_color_to_pixel:
327  * @color: a #ClutterColor
328  *
329  * Converts @color into a packed 32 bit integer, containing
330  * all the four 8 bit channels used by #ClutterColor.
331  *
332  * Return value: a packed color
333  */
334 guint32
335 clutter_color_to_pixel (const ClutterColor *color)
336 {
337   g_return_val_if_fail (color != NULL, 0);
338   
339   return (color->alpha       |
340           color->blue  << 8  |
341           color->green << 16 |
342           color->red   << 24);
343 }
344
345 /**
346  * clutter_color_from_pixel:
347  * @color: (out): return location for a #ClutterColor
348  * @pixel: a 32 bit packed integer containing a color
349  *
350  * Converts @pixel from the packed representation of a four 8 bit channel
351  * color to a #ClutterColor.
352  */
353 void
354 clutter_color_from_pixel (ClutterColor *color,
355                           guint32       pixel)
356 {
357   g_return_if_fail (color != NULL);
358
359   color->red   =  pixel >> 24;
360   color->green = (pixel >> 16) & 0xff;
361   color->blue  = (pixel >> 8)  & 0xff;
362   color->alpha =  pixel        & 0xff;
363 }
364
365 /**
366  * clutter_color_from_string:
367  * @color: (out): return location for a #ClutterColor
368  * @str: a string specifiying a color (named color or #RRGGBBAA)
369  *
370  * Parses a string definition of a color, filling the
371  * <structfield>red</structfield>, <structfield>green</structfield>, 
372  * <structfield>blue</structfield> and <structfield>alpha</structfield> 
373  * channels of @color. If alpha is not specified it will be set full opaque.
374  *
375  * The @color is not allocated.
376  *
377  * The color may be defined by any of the formats understood by
378  * pango_color_from_string(); these include literal color names, like
379  * <literal>Red</literal> or <literal>DarkSlateGray</literal>, or
380  * hexadecimal specifications like <literal>&num;3050b2</literal> or
381  * <literal>&num;333</literal>.
382  *
383  * Return value: %TRUE if parsing succeeded.
384  *
385  * Since: 1.0
386  */
387 gboolean
388 clutter_color_from_string (ClutterColor *color,
389                            const gchar  *str)
390 {
391   PangoColor pango_color = { 0, };
392
393   g_return_val_if_fail (color != NULL, FALSE);
394   g_return_val_if_fail (str != NULL, FALSE);
395
396   /* if the string contains a color encoded using the hexadecimal
397    * notations (#rrggbbaa or #rgba) we attempt a rough pass at
398    * parsing the color ourselves, as we need the alpha channel that
399    * Pango can't retrieve.
400    */
401   if (str[0] == '#')
402     {
403       gint32 result;
404
405       if (sscanf (str + 1, "%x", &result))
406         {
407           if (strlen (str) == 9)
408             {
409               /* #rrggbbaa */
410               color->red   = (result >> 24) & 0xff;
411               color->green = (result >> 16) & 0xff;
412               color->blue  = (result >>  8) & 0xff;
413
414               color->alpha = result & 0xff;
415
416               return TRUE;
417             }
418           else if (strlen (str) == 5)
419             {
420               /* #rgba */
421               color->red   = ((result >> 12) & 0xf);
422               color->green = ((result >>  8) & 0xf);
423               color->blue  = ((result >>  4) & 0xf);
424               color->alpha = result & 0xf;
425
426               color->red   = (color->red   << 4) | color->red;
427               color->green = (color->green << 4) | color->green;
428               color->blue  = (color->blue  << 4) | color->blue;
429               color->alpha = (color->alpha << 4) | color->alpha;
430
431               return TRUE;
432             }
433         }
434     }
435   
436   /* Fall back to pango for named colors */
437   if (pango_color_parse (&pango_color, str))
438     {
439       color->red   = pango_color.red;
440       color->green = pango_color.green;
441       color->blue  = pango_color.blue;
442
443       color->alpha = 0xff;
444
445       return TRUE;
446     }
447
448   return FALSE;
449 }
450
451 /**
452  * clutter_color_to_string:
453  * @color: a #ClutterColor
454  *
455  * Returns a textual specification of @color in the hexadecimal form
456  * <literal>&num;rrggbbaa</literal>, where <literal>r</literal>,
457  * <literal>g</literal>, <literal>b</literal> and <literal>a</literal> are
458  * hex digits representing the red, green, blue and alpha components
459  * respectively.
460  *
461  * Return value: a newly-allocated text string
462  *
463  * Since: 0.2
464  */
465 gchar *
466 clutter_color_to_string (const ClutterColor *color)
467 {
468   g_return_val_if_fail (color != NULL, NULL);
469
470   return g_strdup_printf ("#%02x%02x%02x%02x",
471                           color->red,
472                           color->green,
473                           color->blue,
474                           color->alpha);
475 }
476
477 /**
478  * clutter_color_equal:
479  * @v1: a #ClutterColor
480  * @v2: a #ClutterColor
481  *
482  * Compares two #ClutterColor<!-- -->s and checks if they are the same.
483  *
484  * This function can be passed to g_hash_table_new() as the @key_equal_func
485  * parameter, when using #ClutterColor<!-- -->s as keys in a #GHashTable.
486  *
487  * Return value: %TRUE if the two colors are the same.
488  *
489  * Since: 0.2
490  */
491 gboolean
492 clutter_color_equal (gconstpointer v1,
493                      gconstpointer v2)
494 {
495   const ClutterColor *a, *b;
496
497   g_return_val_if_fail (v1 != NULL, FALSE);
498   g_return_val_if_fail (v2 != NULL, FALSE);
499
500   if (v1 == v2)
501     return TRUE;
502
503   a = v1;
504   b = v2;
505
506   return (a->red   == b->red   &&
507           a->green == b->green &&
508           a->blue  == b->blue  &&
509           a->alpha == b->alpha);
510 }
511
512 /**
513  * clutter_color_hash:
514  * @v: a #ClutterColor
515  *
516  * Converts a #ClutterColor to a hash value.
517  *
518  * This function can be passed to g_hash_table_new() as the @hash_func
519  * parameter, when using #ClutterColor<!-- -->s as keys in a #GHashTable.
520  *
521  * Return value: a hash value corresponding to the color
522  *
523  * Since: 1.0
524  */
525 guint
526 clutter_color_hash (gconstpointer v)
527 {
528   return clutter_color_to_pixel ((const ClutterColor *) v);
529 }
530
531 /**
532  * clutter_color_copy:
533  * @color: a #ClutterColor
534  *
535  * Makes a copy of the color structure.  The result must be
536  * freed using clutter_color_free().
537  *
538  * Return value: an allocated copy of @color.
539  *
540  * Since: 0.2
541  */
542 ClutterColor *
543 clutter_color_copy (const ClutterColor *color)
544 {
545   if (G_LIKELY (color != NULL))
546     return g_slice_dup (ClutterColor, color);
547
548   return NULL;
549 }
550
551 /**
552  * clutter_color_free:
553  * @color: a #ClutterColor
554  *
555  * Frees a color structure created with clutter_color_copy().
556  *
557  * Since: 0.2
558  */
559 void
560 clutter_color_free (ClutterColor *color)
561 {
562   if (G_LIKELY (color != NULL))
563     g_slice_free (ClutterColor, color);
564 }
565
566 /**
567  * clutter_color_new:
568  * @red: red component of the color, between 0 and 255
569  * @green: green component of the color, between 0 and 255
570  * @blue: blue component of the color, between 0 and 255
571  * @alpha: alpha component of the color, between 0 and 255
572  *
573  * Creates a new #ClutterColor with the given values.
574  *
575  * Return value: the newly allocated color. Use clutter_color_free()
576  *   when done
577  *
578  * Since: 0.8.4
579  */
580 ClutterColor *
581 clutter_color_new (guint8 red,
582                    guint8 green,
583                    guint8 blue,
584                    guint8 alpha)
585 {
586   ClutterColor *color;
587
588   color = g_slice_new (ClutterColor);
589
590   color->red   = red;
591   color->green = green;
592   color->blue  = blue;
593   color->alpha = alpha;
594
595   return color;
596 }
597
598 static void
599 clutter_value_transform_color_string (const GValue *src,
600                                       GValue       *dest)
601 {
602   gchar *string = clutter_color_to_string (src->data[0].v_pointer);
603
604   g_value_take_string (dest, string);
605 }
606
607 static void
608 clutter_value_transform_string_color (const GValue *src,
609                                       GValue       *dest)
610 {
611   ClutterColor color = { 0, };
612
613   clutter_color_from_string (&color, g_value_get_string (src));
614
615   clutter_value_set_color (dest, &color);
616 }
617
618 GType
619 clutter_color_get_type (void)
620 {
621   static GType _clutter_color_type = 0;
622   
623   if (G_UNLIKELY (_clutter_color_type == 0))
624     {
625        _clutter_color_type =
626          g_boxed_type_register_static (I_("ClutterColor"),
627                                        (GBoxedCopyFunc) clutter_color_copy,
628                                        (GBoxedFreeFunc) clutter_color_free);
629
630        g_value_register_transform_func (_clutter_color_type, G_TYPE_STRING,
631                                         clutter_value_transform_color_string);
632        g_value_register_transform_func (G_TYPE_STRING, _clutter_color_type,
633                                         clutter_value_transform_string_color);
634     }
635
636   return _clutter_color_type;
637 }
638
639 static void
640 clutter_value_init_color (GValue *value)
641 {
642   value->data[0].v_pointer = NULL;
643 }
644
645 static void
646 clutter_value_free_color (GValue *value)
647 {
648   if (!(value->data[1].v_uint & G_VALUE_NOCOPY_CONTENTS))
649     clutter_color_free (value->data[0].v_pointer);
650 }
651
652 static void
653 clutter_value_copy_color (const GValue *src,
654                           GValue       *dest)
655 {
656   dest->data[0].v_pointer = clutter_color_copy (src->data[0].v_pointer);
657 }
658
659 static gpointer
660 clutter_value_peek_color (const GValue *value)
661 {
662   return value->data[0].v_pointer;
663 }
664
665 static gchar *
666 clutter_value_collect_color (GValue      *value,
667                              guint        n_collect_values,
668                              GTypeCValue *collect_values,
669                              guint        collect_flags)
670 {
671   if (!collect_values[0].v_pointer)
672       value->data[0].v_pointer = NULL;
673   else
674     {
675       if (collect_flags & G_VALUE_NOCOPY_CONTENTS)
676         {
677           value->data[0].v_pointer = collect_values[0].v_pointer;
678           value->data[1].v_uint = G_VALUE_NOCOPY_CONTENTS;
679         }
680       else
681         {
682           value->data[0].v_pointer =
683             clutter_color_copy (collect_values[0].v_pointer);
684         }
685     }
686
687   return NULL;
688 }
689
690 static gchar *
691 clutter_value_lcopy_color (const GValue *value,
692                            guint         n_collect_values,
693                            GTypeCValue  *collect_values,
694                            guint         collect_flags)
695 {
696   ClutterColor **color_p = collect_values[0].v_pointer;
697
698   if (!color_p)
699     return g_strdup_printf ("value location for '%s' passed as NULL",
700                             G_VALUE_TYPE_NAME (value));
701
702   if (!value->data[0].v_pointer)
703     *color_p = NULL;
704   else
705     {
706       if (collect_flags & G_VALUE_NOCOPY_CONTENTS)
707         *color_p = value->data[0].v_pointer;
708       else
709         *color_p = clutter_color_copy (value->data[0].v_pointer);
710     }
711
712   return NULL;
713 }
714
715 /**
716  * clutter_value_set_color:
717  * @value: a #GValue initialized to #CLUTTER_TYPE_COLOR
718  * @color: the color to set
719  *
720  * Sets @value to @color.
721  *
722  * Since: 0.8.4
723  */
724 void
725 clutter_value_set_color (GValue             *value,
726                          const ClutterColor *color)
727 {
728   g_return_if_fail (CLUTTER_VALUE_HOLDS_COLOR (value));
729
730   value->data[0].v_pointer = clutter_color_copy (color);
731 }
732
733 /**
734  * clutter_value_get_color:
735  * @value: a #GValue initialized to #CLUTTER_TYPE_COLOR
736  *
737  * Gets the #ClutterColor contained in @value.
738  *
739  * Return value: the colors inside the passed #GValue
740  *
741  * Since: 0.8.4
742  */
743 G_CONST_RETURN ClutterColor *
744 clutter_value_get_color (const GValue *value)
745 {
746   g_return_val_if_fail (CLUTTER_VALUE_HOLDS_COLOR (value), NULL);
747
748   return value->data[0].v_pointer;
749 }
750
751 static void
752 param_color_init (GParamSpec *pspec)
753 {
754   ClutterParamSpecColor *cspec = CLUTTER_PARAM_SPEC_COLOR (pspec);
755
756   cspec->default_value = NULL;
757 }
758
759 static void
760 param_color_finalize (GParamSpec *pspec)
761 {
762   ClutterParamSpecColor *cspec = CLUTTER_PARAM_SPEC_COLOR (pspec);
763
764   clutter_color_free (cspec->default_value);
765 }
766
767 static void
768 param_color_set_default (GParamSpec *pspec,
769                         GValue     *value)
770 {
771   value->data[0].v_pointer = CLUTTER_PARAM_SPEC_COLOR (pspec)->default_value;
772   value->data[1].v_uint = G_VALUE_NOCOPY_CONTENTS;
773 }
774
775 static gint
776 param_color_values_cmp (GParamSpec   *pspec,
777                         const GValue *value1,
778                         const GValue *value2)
779 {
780   guint32 color1, color2;
781
782   color1 = clutter_color_to_pixel (value1->data[0].v_pointer);
783   color2 = clutter_color_to_pixel (value2->data[0].v_pointer);
784
785   if (color1 < color2)
786     return -1;
787   else if (color1 == color2)
788     return 0;
789   else
790     return 1;
791 }
792
793 static const GTypeValueTable _clutter_color_value_table = {
794   clutter_value_init_color,
795   clutter_value_free_color,
796   clutter_value_copy_color,
797   clutter_value_peek_color,
798   "p",
799   clutter_value_collect_color,
800   "p",
801   clutter_value_lcopy_color
802 };
803
804 GType
805 clutter_param_color_get_type (void)
806 {
807   static GType pspec_type = 0;
808
809   if (G_UNLIKELY (pspec_type == 0))
810     {
811       const GParamSpecTypeInfo pspec_info = {
812         sizeof (ClutterParamSpecColor),
813         16,
814         param_color_init,
815         CLUTTER_TYPE_COLOR,
816         param_color_finalize,
817         param_color_set_default,
818         NULL,
819         param_color_values_cmp,
820       };
821
822       pspec_type = g_param_type_register_static (I_("ClutterParamSpecColor"),
823                                                  &pspec_info);
824     }
825
826   return pspec_type;
827 }
828
829 /**
830  * clutter_param_spec_color:
831  * @name: name of the property
832  * @nick: short name
833  * @blurb: description (can be translatable)
834  * @default_value: default value
835  * @flags: flags for the param spec
836  *
837  * Creates a #GParamSpec for properties using #ClutterColor.
838  *
839  * Return value: the newly created #GParamSpec
840  *
841  * Since: 0.8.4
842  */
843 GParamSpec *
844 clutter_param_spec_color (const gchar        *name,
845                           const gchar        *nick,
846                           const gchar        *blurb,
847                           const ClutterColor *default_value,
848                           GParamFlags         flags)
849 {
850   ClutterParamSpecColor *cspec;
851
852   cspec = g_param_spec_internal (CLUTTER_TYPE_PARAM_COLOR,
853                                  name, nick, blurb, flags);
854
855   cspec->default_value = clutter_color_copy (default_value);
856
857   return G_PARAM_SPEC (cspec);
858 }