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