| 1 | ///////////////////////////////////////////////////////////////////////////// |
| 2 | // Name: src/common/any.cpp |
| 3 | // Purpose: wxAny class, container for any type |
| 4 | // Author: Jaakko Salli |
| 5 | // Modified by: |
| 6 | // Created: 07/05/2009 |
| 7 | // RCS-ID: $Id$ |
| 8 | // Copyright: (c) wxWidgets team |
| 9 | // Licence: wxWindows licence |
| 10 | ///////////////////////////////////////////////////////////////////////////// |
| 11 | |
| 12 | // For compilers that support precompilation, includes "wx/wx.h". |
| 13 | #include "wx/wxprec.h" |
| 14 | |
| 15 | #ifdef __BORLANDC__ |
| 16 | #pragma hdrstop |
| 17 | #endif |
| 18 | |
| 19 | #include "wx/any.h" |
| 20 | |
| 21 | #if wxUSE_ANY |
| 22 | |
| 23 | #ifndef WX_PRECOMP |
| 24 | #include "wx/math.h" |
| 25 | #include "wx/crt.h" |
| 26 | #endif |
| 27 | |
| 28 | #include "wx/vector.h" |
| 29 | #include "wx/module.h" |
| 30 | #include "wx/hashmap.h" |
| 31 | #include "wx/hashset.h" |
| 32 | |
| 33 | using namespace wxPrivate; |
| 34 | |
| 35 | #if wxUSE_VARIANT |
| 36 | |
| 37 | //------------------------------------------------------------------------- |
| 38 | // wxAnyValueTypeGlobals |
| 39 | //------------------------------------------------------------------------- |
| 40 | |
| 41 | WX_DECLARE_HASH_MAP(wxAnyValueType*, |
| 42 | wxVariantDataFactory, |
| 43 | wxPointerHash, |
| 44 | wxPointerEqual, |
| 45 | wxAnyTypeToVariantDataFactoryMap); |
| 46 | |
| 47 | // |
| 48 | // Helper class to manage global variables related to type conversion |
| 49 | // between wxAny and wxVariant. |
| 50 | // |
| 51 | class wxAnyValueTypeGlobals |
| 52 | { |
| 53 | public: |
| 54 | wxAnyValueTypeGlobals() |
| 55 | { |
| 56 | } |
| 57 | ~wxAnyValueTypeGlobals() |
| 58 | { |
| 59 | m_anyToVariant.clear(); |
| 60 | } |
| 61 | |
| 62 | void PreRegisterAnyToVariant(wxAnyToVariantRegistration* reg) |
| 63 | { |
| 64 | m_anyToVariantRegs.push_back(reg); |
| 65 | } |
| 66 | |
| 67 | // Find wxVariantData factory function for given value type, |
| 68 | // (or compatible, if possible) |
| 69 | wxVariantDataFactory FindVariantDataFactory(const wxAnyValueType* type_) |
| 70 | { |
| 71 | // Ideally we'd have the hash map of type 'const wxAnyValueType*', |
| 72 | // but WX_DECLARE_HASH_MAP() has some trouble with it. |
| 73 | wxAnyValueType* type = const_cast<wxAnyValueType*>(type_); |
| 74 | |
| 75 | wxAnyTypeToVariantDataFactoryMap& anyToVariant = m_anyToVariant; |
| 76 | wxAnyTypeToVariantDataFactoryMap::const_iterator it; |
| 77 | it = anyToVariant.find(type); |
| 78 | if ( it != anyToVariant.end() ) |
| 79 | return it->second; |
| 80 | |
| 81 | // Not found, handle pre-registrations |
| 82 | size_t i = m_anyToVariantRegs.size(); |
| 83 | while ( i > 0 ) |
| 84 | { |
| 85 | i--; |
| 86 | wxAnyToVariantRegistration* reg = m_anyToVariantRegs[i]; |
| 87 | wxAnyValueType* assocType = reg->GetAssociatedType(); |
| 88 | if ( assocType ) |
| 89 | { |
| 90 | // Both variant data and wxAnyValueType have been |
| 91 | // now been properly initialized, so remove the |
| 92 | // pre-registration entry and move data to anyToVarian |
| 93 | // map. |
| 94 | anyToVariant[assocType] = reg->GetFactory(); |
| 95 | m_anyToVariantRegs.erase( m_anyToVariantRegs.begin() + i ); |
| 96 | } |
| 97 | } |
| 98 | |
| 99 | // Then try again |
| 100 | it = anyToVariant.find(type); |
| 101 | if ( it != anyToVariant.end() ) |
| 102 | return it->second; |
| 103 | |
| 104 | // Finally, attempt to find a compatible type |
| 105 | for ( it = anyToVariant.begin(); it != anyToVariant.end(); it++ ) |
| 106 | { |
| 107 | if ( type->IsSameType(it->first) ) |
| 108 | { |
| 109 | wxVariantDataFactory f = it->second; |
| 110 | anyToVariant[type] = f; |
| 111 | return f; |
| 112 | } |
| 113 | } |
| 114 | |
| 115 | // Nothing found |
| 116 | return NULL; |
| 117 | } |
| 118 | |
| 119 | private: |
| 120 | wxAnyTypeToVariantDataFactoryMap m_anyToVariant; |
| 121 | wxVector<wxAnyToVariantRegistration*> m_anyToVariantRegs; |
| 122 | }; |
| 123 | |
| 124 | static wxAnyValueTypeGlobals* g_wxAnyValueTypeGlobals = NULL; |
| 125 | |
| 126 | |
| 127 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImplVariantData) |
| 128 | |
| 129 | void wxPreRegisterAnyToVariant(wxAnyToVariantRegistration* reg) |
| 130 | { |
| 131 | if ( !g_wxAnyValueTypeGlobals ) |
| 132 | g_wxAnyValueTypeGlobals = new wxAnyValueTypeGlobals(); |
| 133 | g_wxAnyValueTypeGlobals->PreRegisterAnyToVariant(reg); |
| 134 | } |
| 135 | |
| 136 | bool wxConvertAnyToVariant(const wxAny& any, wxVariant* variant) |
| 137 | { |
| 138 | if ( any.IsNull() ) |
| 139 | { |
| 140 | variant->MakeNull(); |
| 141 | return true; |
| 142 | } |
| 143 | |
| 144 | // (signed) integer is a special case, because there is only one type |
| 145 | // in wxAny, and two ("long" and "longlong") in wxVariant. For better |
| 146 | // backwards compatibility, convert all values that fit in "long", |
| 147 | // and others to "longlong". |
| 148 | if ( wxANY_CHECK_TYPE(any, signed int) ) |
| 149 | { |
| 150 | #ifdef wxLongLong_t |
| 151 | wxLongLong_t ll = 0; |
| 152 | if ( any.GetAs(&ll) ) |
| 153 | { |
| 154 | // NB: Do not use LONG_MAX here. Explicitly using 32-bit |
| 155 | // integer constraint yields more consistent behaviour across |
| 156 | // builds. |
| 157 | if ( ll > wxINT32_MAX || ll < wxINT32_MIN ) |
| 158 | *variant = wxLongLong(ll); |
| 159 | else |
| 160 | *variant = (long) wxLongLong(ll).GetLo(); |
| 161 | } |
| 162 | else |
| 163 | { |
| 164 | return false; |
| 165 | } |
| 166 | #else |
| 167 | long l; |
| 168 | if ( any.GetAs(&l) ) |
| 169 | *variant = l; |
| 170 | else |
| 171 | return false; |
| 172 | #endif |
| 173 | return true; |
| 174 | } |
| 175 | |
| 176 | // Find matching factory function |
| 177 | wxVariantDataFactory f = |
| 178 | g_wxAnyValueTypeGlobals->FindVariantDataFactory(any.GetType()); |
| 179 | |
| 180 | wxVariantData* data = NULL; |
| 181 | |
| 182 | if ( f ) |
| 183 | { |
| 184 | data = f(any); |
| 185 | } |
| 186 | else |
| 187 | { |
| 188 | // Check if wxAny wrapped wxVariantData* |
| 189 | if ( !any.GetAs(&data) ) |
| 190 | { |
| 191 | // Ok, one last chance: while unlikely, it is possible that the |
| 192 | // wxAny actually contains wxVariant. |
| 193 | if ( wxANY_CHECK_TYPE(any, wxVariant) ) |
| 194 | *variant = wxANY_AS(any, wxVariant); |
| 195 | return false; |
| 196 | } |
| 197 | |
| 198 | // Wrapper's GetValue() does not increase reference |
| 199 | // count, se have to do it before the data gets passed |
| 200 | // to a new variant. |
| 201 | data->IncRef(); |
| 202 | } |
| 203 | |
| 204 | variant->SetData(data); |
| 205 | return true; |
| 206 | } |
| 207 | |
| 208 | // |
| 209 | // This class is to make sure that wxAnyValueType instances |
| 210 | // etc. get freed correctly. We must use a separate wxAnyValueTypeGlobals |
| 211 | // because wxModule itself is instantiated too late. |
| 212 | // |
| 213 | class wxAnyValueTypeGlobalsManager : public wxModule |
| 214 | { |
| 215 | DECLARE_DYNAMIC_CLASS(wxAnyValueTypeGlobalsManager) |
| 216 | public: |
| 217 | wxAnyValueTypeGlobalsManager() : wxModule() { } |
| 218 | virtual ~wxAnyValueTypeGlobalsManager() { } |
| 219 | |
| 220 | virtual bool OnInit() |
| 221 | { |
| 222 | return true; |
| 223 | } |
| 224 | virtual void OnExit() |
| 225 | { |
| 226 | wxDELETE(g_wxAnyValueTypeGlobals); |
| 227 | } |
| 228 | private: |
| 229 | }; |
| 230 | |
| 231 | IMPLEMENT_DYNAMIC_CLASS(wxAnyValueTypeGlobalsManager, wxModule) |
| 232 | |
| 233 | #endif // wxUSE_VARIANT |
| 234 | |
| 235 | |
| 236 | //------------------------------------------------------------------------- |
| 237 | // Dynamic conversion member functions |
| 238 | //------------------------------------------------------------------------- |
| 239 | |
| 240 | // |
| 241 | // Define integer minimum and maximum as helpers |
| 242 | #ifdef wxLongLong_t |
| 243 | #define UseIntMin (wxINT64_MIN) |
| 244 | #define UseIntMax (wxINT64_MAX) |
| 245 | #define UseUintMax (wxUINT64_MAX) |
| 246 | #else |
| 247 | #define UseIntMin (LONG_MIN) |
| 248 | #define UseIntMax (LONG_MAX) |
| 249 | #define UseUintMax (ULONG_MAX) |
| 250 | #endif |
| 251 | |
| 252 | namespace |
| 253 | { |
| 254 | |
| 255 | const double UseIntMinF = static_cast<double>(UseIntMin); |
| 256 | const double UseIntMaxF = static_cast<double>(UseIntMax); |
| 257 | const double UseUintMaxF = static_cast<double>(UseUintMax); |
| 258 | |
| 259 | } // anonymous namespace |
| 260 | |
| 261 | bool wxAnyValueTypeImplInt::ConvertValue(const wxAnyValueBuffer& src, |
| 262 | wxAnyValueType* dstType, |
| 263 | wxAnyValueBuffer& dst) const |
| 264 | { |
| 265 | wxAnyBaseIntType value = GetValue(src); |
| 266 | if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxString) ) |
| 267 | { |
| 268 | #ifdef wxLongLong_t |
| 269 | wxLongLong ll(value); |
| 270 | wxString s = ll.ToString(); |
| 271 | #else |
| 272 | wxString s = wxString::Format(wxS("%ld"), (long)value); |
| 273 | #endif |
| 274 | wxAnyValueTypeImpl<wxString>::SetValue(s, dst); |
| 275 | } |
| 276 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseUintType) ) |
| 277 | { |
| 278 | if ( value < 0 ) |
| 279 | return false; |
| 280 | wxAnyBaseUintType ul = (wxAnyBaseUintType) value; |
| 281 | wxAnyValueTypeImplUint::SetValue(ul, dst); |
| 282 | } |
| 283 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, double) ) |
| 284 | { |
| 285 | double value2 = static_cast<double>(value); |
| 286 | wxAnyValueTypeImplDouble::SetValue(value2, dst); |
| 287 | } |
| 288 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, bool) ) |
| 289 | { |
| 290 | bool value2 = value ? true : false; |
| 291 | wxAnyValueTypeImpl<bool>::SetValue(value2, dst); |
| 292 | } |
| 293 | else |
| 294 | return false; |
| 295 | |
| 296 | return true; |
| 297 | } |
| 298 | |
| 299 | bool wxAnyValueTypeImplUint::ConvertValue(const wxAnyValueBuffer& src, |
| 300 | wxAnyValueType* dstType, |
| 301 | wxAnyValueBuffer& dst) const |
| 302 | { |
| 303 | wxAnyBaseUintType value = GetValue(src); |
| 304 | if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxString) ) |
| 305 | { |
| 306 | #ifdef wxLongLong_t |
| 307 | wxULongLong ull(value); |
| 308 | wxString s = ull.ToString(); |
| 309 | #else |
| 310 | wxString s = wxString::Format(wxS("%lu"), (long)value); |
| 311 | #endif |
| 312 | wxAnyValueTypeImpl<wxString>::SetValue(s, dst); |
| 313 | } |
| 314 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseIntType) ) |
| 315 | { |
| 316 | if ( value > UseIntMax ) |
| 317 | return false; |
| 318 | wxAnyBaseIntType l = (wxAnyBaseIntType) value; |
| 319 | wxAnyValueTypeImplInt::SetValue(l, dst); |
| 320 | } |
| 321 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, double) ) |
| 322 | { |
| 323 | #ifndef __VISUALC6__ |
| 324 | double value2 = static_cast<double>(value); |
| 325 | #else |
| 326 | // VC6 doesn't implement conversion from unsigned __int64 to double |
| 327 | wxAnyBaseIntType value0 = static_cast<wxAnyBaseIntType>(value); |
| 328 | double value2 = static_cast<double>(value0); |
| 329 | #endif |
| 330 | wxAnyValueTypeImplDouble::SetValue(value2, dst); |
| 331 | } |
| 332 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, bool) ) |
| 333 | { |
| 334 | bool value2 = value ? true : false; |
| 335 | wxAnyValueTypeImpl<bool>::SetValue(value2, dst); |
| 336 | } |
| 337 | else |
| 338 | return false; |
| 339 | |
| 340 | return true; |
| 341 | } |
| 342 | |
| 343 | // Convert wxString to destination wxAny value type |
| 344 | bool wxAnyConvertString(const wxString& value, |
| 345 | wxAnyValueType* dstType, |
| 346 | wxAnyValueBuffer& dst) |
| 347 | { |
| 348 | if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxString) ) |
| 349 | { |
| 350 | wxAnyValueTypeImpl<wxString>::SetValue(value, dst); |
| 351 | } |
| 352 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseIntType) ) |
| 353 | { |
| 354 | wxAnyBaseIntType value2; |
| 355 | #ifdef wxLongLong_t |
| 356 | if ( !value.ToLongLong(&value2) ) |
| 357 | #else |
| 358 | if ( !value.ToLong(&value2) ) |
| 359 | #endif |
| 360 | return false; |
| 361 | wxAnyValueTypeImplInt::SetValue(value2, dst); |
| 362 | } |
| 363 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseUintType) ) |
| 364 | { |
| 365 | wxAnyBaseUintType value2; |
| 366 | #ifdef wxLongLong_t |
| 367 | if ( !value.ToULongLong(&value2) ) |
| 368 | #else |
| 369 | if ( !value.ToULong(&value2) ) |
| 370 | #endif |
| 371 | return false; |
| 372 | wxAnyValueTypeImplUint::SetValue(value2, dst); |
| 373 | } |
| 374 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, double) ) |
| 375 | { |
| 376 | double value2; |
| 377 | if ( !value.ToDouble(&value2) ) |
| 378 | return false; |
| 379 | wxAnyValueTypeImplDouble::SetValue(value2, dst); |
| 380 | } |
| 381 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, bool) ) |
| 382 | { |
| 383 | bool value2; |
| 384 | wxString s(value); |
| 385 | s.MakeLower(); |
| 386 | if ( s == wxS("true") || |
| 387 | s == wxS("yes") || |
| 388 | s == wxS('1') ) |
| 389 | value2 = true; |
| 390 | else if ( s == wxS("false") || |
| 391 | s == wxS("no") || |
| 392 | s == wxS('0') ) |
| 393 | value2 = false; |
| 394 | else |
| 395 | return false; |
| 396 | |
| 397 | wxAnyValueTypeImpl<bool>::SetValue(value2, dst); |
| 398 | } |
| 399 | else |
| 400 | return false; |
| 401 | |
| 402 | return true; |
| 403 | } |
| 404 | |
| 405 | bool wxAnyValueTypeImpl<bool>::ConvertValue(const wxAnyValueBuffer& src, |
| 406 | wxAnyValueType* dstType, |
| 407 | wxAnyValueBuffer& dst) const |
| 408 | { |
| 409 | bool value = GetValue(src); |
| 410 | if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseIntType) ) |
| 411 | { |
| 412 | wxAnyBaseIntType value2 = static_cast<wxAnyBaseIntType>(value); |
| 413 | wxAnyValueTypeImplInt::SetValue(value2, dst); |
| 414 | } |
| 415 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseUintType) ) |
| 416 | { |
| 417 | wxAnyBaseIntType value2 = static_cast<wxAnyBaseUintType>(value); |
| 418 | wxAnyValueTypeImplUint::SetValue(value2, dst); |
| 419 | } |
| 420 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxString) ) |
| 421 | { |
| 422 | wxString s; |
| 423 | if ( value ) |
| 424 | s = wxS("true"); |
| 425 | else |
| 426 | s = wxS("false"); |
| 427 | wxAnyValueTypeImpl<wxString>::SetValue(s, dst); |
| 428 | } |
| 429 | else |
| 430 | return false; |
| 431 | |
| 432 | return true; |
| 433 | } |
| 434 | |
| 435 | bool wxAnyValueTypeImplDouble::ConvertValue(const wxAnyValueBuffer& src, |
| 436 | wxAnyValueType* dstType, |
| 437 | wxAnyValueBuffer& dst) const |
| 438 | { |
| 439 | double value = GetValue(src); |
| 440 | if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseIntType) ) |
| 441 | { |
| 442 | if ( value < UseIntMinF || value > UseIntMaxF ) |
| 443 | return false; |
| 444 | wxAnyBaseUintType ul = static_cast<wxAnyBaseUintType>(value); |
| 445 | wxAnyValueTypeImplUint::SetValue(ul, dst); |
| 446 | } |
| 447 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxAnyBaseUintType) ) |
| 448 | { |
| 449 | if ( value < 0.0 || value > UseUintMaxF ) |
| 450 | return false; |
| 451 | wxAnyBaseUintType ul = static_cast<wxAnyBaseUintType>(value); |
| 452 | wxAnyValueTypeImplUint::SetValue(ul, dst); |
| 453 | } |
| 454 | else if ( wxANY_VALUE_TYPE_CHECK_TYPE(dstType, wxString) ) |
| 455 | { |
| 456 | wxString s = wxString::Format(wxS("%.14g"), value); |
| 457 | wxAnyValueTypeImpl<wxString>::SetValue(s, dst); |
| 458 | } |
| 459 | else |
| 460 | return false; |
| 461 | |
| 462 | return true; |
| 463 | } |
| 464 | |
| 465 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImplInt) |
| 466 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImplUint) |
| 467 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImpl<bool>) |
| 468 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImplDouble) |
| 469 | |
| 470 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImplwxString) |
| 471 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImplConstCharPtr) |
| 472 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImplConstWchar_tPtr) |
| 473 | |
| 474 | #if wxUSE_DATETIME |
| 475 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImpl<wxDateTime>) |
| 476 | #endif // wxUSE_DATETIME |
| 477 | |
| 478 | //WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImpl<wxObject*>) |
| 479 | //WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImpl<wxArrayString>) |
| 480 | |
| 481 | //------------------------------------------------------------------------- |
| 482 | // wxAnyNullValueType implementation |
| 483 | //------------------------------------------------------------------------- |
| 484 | |
| 485 | class wxAnyNullValue |
| 486 | { |
| 487 | private: |
| 488 | void* m_dummy; |
| 489 | }; |
| 490 | |
| 491 | template <> |
| 492 | class wxAnyValueTypeImpl<wxAnyNullValue> : public wxAnyValueType |
| 493 | { |
| 494 | WX_DECLARE_ANY_VALUE_TYPE(wxAnyValueTypeImpl<wxAnyNullValue>) |
| 495 | public: |
| 496 | // Dummy implementations |
| 497 | virtual void DeleteValue(wxAnyValueBuffer& buf) const |
| 498 | { |
| 499 | wxUnusedVar(buf); |
| 500 | } |
| 501 | |
| 502 | virtual void CopyBuffer(const wxAnyValueBuffer& src, |
| 503 | wxAnyValueBuffer& dst) const |
| 504 | { |
| 505 | wxUnusedVar(src); |
| 506 | wxUnusedVar(dst); |
| 507 | } |
| 508 | |
| 509 | virtual bool ConvertValue(const wxAnyValueBuffer& src, |
| 510 | wxAnyValueType* dstType, |
| 511 | wxAnyValueBuffer& dst) const |
| 512 | { |
| 513 | wxUnusedVar(src); |
| 514 | wxUnusedVar(dstType); |
| 515 | wxUnusedVar(dst); |
| 516 | return false; |
| 517 | } |
| 518 | |
| 519 | #if wxUSE_EXTENDED_RTTI |
| 520 | virtual const wxTypeInfo* GetTypeInfo() const |
| 521 | { |
| 522 | wxFAIL_MSG("Null Type Info not available"); |
| 523 | return NULL; |
| 524 | } |
| 525 | #endif |
| 526 | |
| 527 | private: |
| 528 | }; |
| 529 | |
| 530 | WX_IMPLEMENT_ANY_VALUE_TYPE(wxAnyValueTypeImpl<wxAnyNullValue>) |
| 531 | |
| 532 | wxAnyValueType* wxAnyNullValueType = |
| 533 | wxAnyValueTypeImpl<wxAnyNullValue>::GetInstance(); |
| 534 | |
| 535 | #include "wx/listimpl.cpp" |
| 536 | WX_DEFINE_LIST(wxAnyList) |
| 537 | |
| 538 | #endif // wxUSE_ANY |