// Author: Francesco Montorsi
// Modified by:
// Created: 20/4/2006
-// RCS-ID: $Id$
// Copyright: (c) Francesco Montorsi
// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
#ifndef WX_PRECOMP
#include "wx/log.h"
+ #include "wx/utils.h"
+ #include "wx/gdicmn.h"
+ #include "wx/wxcrtvararg.h"
#endif
-#include "wx/gdicmn.h"
+#if wxUSE_VARIANT
+IMPLEMENT_VARIANT_OBJECT_EXPORTED(wxColour,WXDLLEXPORT)
+#endif
+
+
+// ----------------------------------------------------------------------------
+// XTI
+// ----------------------------------------------------------------------------
+#if wxUSE_EXTENDED_RTTI
+
+#include <string.h>
+
+template<> void wxStringReadValue(const wxString &s, wxColour &data )
+{
+ if ( !data.Set(s) )
+ {
+ wxLogError(_("String To Colour : Incorrect colour specification : %s"),
+ s.c_str() );
+ data = wxNullColour;
+ }
+}
+
+template<> void wxStringWriteValue(wxString &s, const wxColour &data )
+{
+ s = data.GetAsString(wxC2S_HTML_SYNTAX);
+}
+
+wxTO_STRING_IMP( wxColour )
+wxFROM_STRING_IMP( wxColour )
+
+wxIMPLEMENT_DYNAMIC_CLASS_WITH_COPY_AND_STREAMERS_XTI( wxColour, wxObject, \
+ "wx/colour.h", &wxTO_STRING( wxColour ), &wxFROM_STRING( wxColour ))
+//WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImpl<wxColour>)
+wxBEGIN_PROPERTIES_TABLE(wxColour)
+wxREADONLY_PROPERTY( Red, unsigned char, Red, wxEMPTY_PARAMETER_VALUE, \
+ 0 /*flags*/, wxT("Helpstring"), wxT("group"))
+wxREADONLY_PROPERTY( Green, unsigned char, Green, wxEMPTY_PARAMETER_VALUE, \
+ 0 /*flags*/, wxT("Helpstring"), wxT("group"))
+wxREADONLY_PROPERTY( Blue, unsigned char, Blue, wxEMPTY_PARAMETER_VALUE, \
+ 0 /*flags*/, wxT("Helpstring"), wxT("group"))
+wxEND_PROPERTIES_TABLE()
+
+wxDIRECT_CONSTRUCTOR_3( wxColour, unsigned char, Red, \
+ unsigned char, Green, unsigned char, Blue )
+
+wxEMPTY_HANDLERS_TABLE(wxColour)
+#else
+
+#if wxCOLOUR_IS_GDIOBJECT
+wxIMPLEMENT_DYNAMIC_CLASS(wxColour, wxGDIObject)
+#else
+wxIMPLEMENT_DYNAMIC_CLASS(wxColour, wxObject)
+#endif
+
+#endif
// ============================================================================
// wxString <-> wxColour conversions
// ============================================================================
-bool wxColourBase::FromString(const wxChar *str)
+bool wxColourBase::FromString(const wxString& str)
{
- if ( str == NULL || str[0] == wxT('\0'))
+ if ( str.empty() )
return false; // invalid or empty string
- if ( wxStrncmp(str, wxT("RGB"), 3) == 0 ||
- wxStrncmp(str, wxT("rgb"), 3) == 0 )
+ if ( wxStrnicmp(str, wxT("RGB"), 3) == 0 )
{
- // RGB specification CSS-like
- int red, green, blue;
- if (wxSscanf(&str[3], wxT("(%d, %d, %d)"), &red, &green, &blue) != 3)
- return false;
+ // CSS-like RGB specification
+ // according to http://www.w3.org/TR/css3-color/#colorunits
+ // values outside 0-255 range are allowed but should be clipped
+ int red, green, blue,
+ alpha = wxALPHA_OPAQUE;
+ if ( str.length() > 3 && (str[3] == wxT('a') || str[3] == wxT('A')) )
+ {
+ // We can't use sscanf() for the alpha value as sscanf() uses the
+ // current locale while the floating point numbers in CSS always
+ // use point as decimal separator, regardless of locale. So parse
+ // the tail of the string manually by putting it in a buffer and
+ // using wxString::ToCDouble() below. Notice that we can't use "%s"
+ // for this as it stops at white space and we need "%c" to avoid
+ // this and really get all the rest of the string into the buffer.
- Set((unsigned char)red, (unsigned char)green, (unsigned char)blue);
+ const unsigned len = str.length(); // always big enough
+ wxCharBuffer alphaBuf(len);
+ char * const alphaPtr = alphaBuf.data();
+
+ for ( unsigned n = 0; n < len; n++ )
+ alphaPtr[n] = '\0';
+
+ // Construct the format string which ensures that the last argument
+ // receives all the rest of the string.
+ wxString formatStr;
+ formatStr << wxS("( %d , %d , %d , %") << len << 'c';
+
+ // Notice that we use sscanf() here because if the string is not
+ // ASCII it can't represent a valid RGB colour specification anyhow
+ // and like this we can be sure that %c corresponds to "char *"
+ // while with wxSscanf() it depends on the type of the string
+ // passed as first argument: if it is a wide string, then %c
+ // expects "wchar_t *" matching parameter under MSW for example.
+ if ( sscanf(str.c_str() + 4,
+ formatStr.mb_str(),
+ &red, &green, &blue, alphaPtr) != 4 )
+ return false;
+
+ // Notice that we must explicitly specify the length to get rid of
+ // trailing NULs.
+ wxString alphaStr(alphaPtr, wxStrlen(alphaPtr));
+ if ( alphaStr.empty() || alphaStr.Last() != ')' )
+ return false;
+
+ alphaStr.RemoveLast();
+ alphaStr.Trim();
+
+ double a;
+ if ( !alphaStr.ToCDouble(&a) )
+ return false;
+
+ alpha = wxRound(a * 255);
+ }
+ else // no 'a' following "rgb"
+ {
+ if ( wxSscanf(str.wx_str() + 3, wxT("( %d , %d , %d )"),
+ &red, &green, &blue) != 3 )
+ return false;
+ }
+
+ Set((unsigned char)wxClip(red, 0, 255),
+ (unsigned char)wxClip(green, 0, 255),
+ (unsigned char)wxClip(blue, 0, 255),
+ (unsigned char)wxClip(alpha, 0, 255));
}
else if ( str[0] == wxT('#') && wxStrlen(str) == 7 )
{
// hexadecimal prefixed with # (HTML syntax)
unsigned long tmp;
- if (wxSscanf(&str[1], wxT("%lX"), &tmp) != 1)
+ if (wxSscanf(str.wx_str() + 1, wxT("%lx"), &tmp) != 1)
return false;
- Set(tmp); // set from packed long
+ Set((unsigned char)(tmp >> 16),
+ (unsigned char)(tmp >> 8),
+ (unsigned char)tmp);
}
else if (wxTheColourDatabase) // a colour name ?
{
// because this place can be called from constructor
// and 'this' could not be available yet
wxColour clr = wxTheColourDatabase->Find(str);
- if (clr.Ok())
+ if (clr.IsOk())
Set((unsigned char)clr.Red(),
(unsigned char)clr.Green(),
(unsigned char)clr.Blue());
}
- if (Ok())
+ if (IsOk())
return true;
wxLogDebug(wxT("wxColour::Set - couldn't set to colour string '%s'"), str);
{
wxString colName;
- if (flags & wxC2S_NAME)
- colName = wxTheColourDatabase->FindName((const wxColour &)(*this)).MakeLower();
+ const bool isOpaque = Alpha() == wxALPHA_OPAQUE;
- if ( colName.empty() && (flags & wxC2S_CSS_SYNTAX) )
+ // we can't use the name format if the colour is not opaque as the alpha
+ // information would be lost
+ if ( (flags & wxC2S_NAME) && isOpaque )
{
- // no name for this colour; return it in CSS syntax
- colName.Printf(wxT("rgb(%d, %d, %d)"),
- Red(), Green(), Blue());
+ colName = wxTheColourDatabase->FindName(
+ static_cast<const wxColour &>(*this)).MakeLower();
}
- else if ( colName.empty() && (flags & wxC2S_HTML_SYNTAX) )
+
+ if ( colName.empty() )
{
- // no name for this colour; return it in HTML syntax
- colName.Printf(wxT("#%02X%02X%02X"),
- Red(), Green(), Blue());
+ const int red = Red(),
+ blue = Blue(),
+ green = Green();
+
+ if ( flags & wxC2S_CSS_SYNTAX )
+ {
+ // no name for this colour; return it in CSS syntax
+ if ( isOpaque )
+ {
+ colName.Printf(wxT("rgb(%d, %d, %d)"), red, green, blue);
+ }
+ else // use rgba() form
+ {
+ colName.Printf(wxT("rgba(%d, %d, %d, %s)"),
+ red, green, blue,
+ wxString::FromCDouble(Alpha() / 255., 3));
+ }
+ }
+ else if ( flags & wxC2S_HTML_SYNTAX )
+ {
+ wxASSERT_MSG( isOpaque, "alpha is lost in HTML syntax" );
+
+ // no name for this colour; return it in HTML syntax
+ colName.Printf(wxT("#%02X%02X%02X"), red, green, blue);
+ }
}
- // this function always returns a non-empty string
+ // this function should alway returns a non-empty string
wxASSERT_MSG(!colName.empty(),
wxT("Invalid wxColour -> wxString conversion flags"));
return colName;
}
+// static
+void wxColourBase::MakeMono(unsigned char* r, unsigned char* g, unsigned char* b,
+ bool on)
+{
+ *r = *g = *b = on ? 255 : 0;
+}
+
+// static
+void wxColourBase::MakeGrey(unsigned char* r, unsigned char* g, unsigned char* b
+ /*, unsigned char brightness */
+ )
+{
+ *r = *g = *b = (wxByte)(((*b)*117UL + (*g)*601UL + (*r)*306UL) >> 10);
+}
+
+// static
+void wxColourBase::MakeGrey(unsigned char* r, unsigned char* g, unsigned char* b,
+ double weight_r, double weight_g, double weight_b)
+{
+ double luma = (*r) * weight_r + (*g) * weight_g + (*b) * weight_b;
+ *r = *g = *b = (wxByte)wxRound(luma);
+}
+
+// static
+void wxColourBase::MakeDisabled(unsigned char* r, unsigned char* g, unsigned char* b,
+ unsigned char brightness)
+{
+ //MakeGrey(r, g, b, brightness); // grey no-blend version
+ *r = AlphaBlend(*r, brightness, 0.4);
+ *g = AlphaBlend(*g, brightness, 0.4);
+ *b = AlphaBlend(*b, brightness, 0.4);
+}
+
+wxColour& wxColourBase::MakeDisabled(unsigned char brightness)
+{
+ unsigned char r = Red(),
+ g = Green(),
+ b = Blue();
+ MakeDisabled(&r, &g, &b, brightness);
+ Set(r, g, b, Alpha());
+ return static_cast<wxColour&>(*this);
+}
+
+// AlphaBlend is used by ChangeLightness and MakeDisabled
+
+// static
+unsigned char wxColourBase::AlphaBlend(unsigned char fg, unsigned char bg,
+ double alpha)
+{
+ double result = bg + (alpha * (fg - bg));
+ result = wxMax(result, 0.0);
+ result = wxMin(result, 255.0);
+ return (unsigned char)result;
+}
+
+// ChangeLightness() is a utility function that simply darkens
+// or lightens a color, based on the specified percentage
+// ialpha of 0 would be completely black, 100 completely white
+// an ialpha of 100 returns the same colour
+
+// static
+void wxColourBase::ChangeLightness(unsigned char* r, unsigned char* g, unsigned char* b,
+ int ialpha)
+{
+ if (ialpha == 100) return;
+
+ // ialpha is 0..200 where 0 is completely black
+ // and 200 is completely white and 100 is the same
+ // convert that to normal alpha 0.0 - 1.0
+ ialpha = wxMax(ialpha, 0);
+ ialpha = wxMin(ialpha, 200);
+ double alpha = ((double)(ialpha - 100.0))/100.0;
+
+ unsigned char bg;
+ if (ialpha > 100)
+ {
+ // blend with white
+ bg = 255;
+ alpha = 1.0 - alpha; // 0 = transparent fg; 1 = opaque fg
+ }
+ else
+ {
+ // blend with black
+ bg = 0;
+ alpha = 1.0 + alpha; // 0 = transparent fg; 1 = opaque fg
+ }
+
+ *r = AlphaBlend(*r, bg, alpha);
+ *g = AlphaBlend(*g, bg, alpha);
+ *b = AlphaBlend(*b, bg, alpha);
+}
+
+wxColour wxColourBase::ChangeLightness(int ialpha) const
+{
+ wxByte r = Red();
+ wxByte g = Green();
+ wxByte b = Blue();
+ ChangeLightness(&r, &g, &b, ialpha);
+ return wxColour(r,g,b);
+}
+
+#if WXWIN_COMPATIBILITY_2_6
+
+// static
wxColour wxColourBase::CreateByName(const wxString& name)
{
return wxColour(name);
}
+
+void wxColourBase::InitFromName(const wxString& col)
+{
+ Set(col);
+}
+
+#endif // WXWIN_COMPATIBILITY_2_6
+
+// wxColour <-> wxString utilities, used by wxConfig
+wxString wxToString(const wxColourBase& col)
+{
+ return col.IsOk() ? col.GetAsString(wxC2S_CSS_SYNTAX)
+ : wxString();
+}
+
+bool wxFromString(const wxString& str, wxColourBase *col)
+{
+ wxCHECK_MSG( col, false, wxT("NULL output parameter") );
+
+ if ( str.empty() )
+ {
+ *col = wxNullColour;
+ return true;
+ }
+
+ return col->Set(str);
+}
+
+