dlls/windows.globalization/main.c

   1 /* WinRT Windows.Globalization implementation
   2  *
   3  * Copyright 2021 Rémi Bernon for CodeWeavers
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #include <stdarg.h>
  21
  22 #define COBJMACROS
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "winstring.h"
  26 #include "wine/debug.h"
  27 #include "objbase.h"
  28
  29 #include "initguid.h"
  30 #include "activation.h"
  31
  32 #define WIDL_using_Windows_Foundation
  33 #define WIDL_using_Windows_Foundation_Collections
  34 #include "windows.foundation.h"
  35 #define WIDL_using_Windows_Globalization
  36 #include "windows.globalization.h"
  37 #define WIDL_using_Windows_System_UserProfile
  38 #include "windows.system.userprofile.h"
  39
  40 WINE_DEFAULT_DEBUG_CHANNEL(locale);
  41
  42 static const char *debugstr_hstring(HSTRING hstr)
  43 {
  44     const WCHAR *str;
  45     UINT32 len;
  46     if (hstr && !((ULONG_PTR)hstr >> 16)) return "(invalid)";
  47     str = WindowsGetStringRawBuffer(hstr, &len);
  48     return wine_dbgstr_wn(str, len);
  49 }
  50
  51 struct hstring_vector
  52 {
  53     IVectorView_HSTRING IVectorView_HSTRING_iface;
  54     LONG ref;
  55
  56     ULONG count;
  57     HSTRING values[1];
  58 };
  59
  60 static inline struct hstring_vector *impl_from_IVectorView_HSTRING(IVectorView_HSTRING *iface)
  61 {
  62     return CONTAINING_RECORD(iface, struct hstring_vector, IVectorView_HSTRING_iface);
  63 }
  64
  65 static HRESULT STDMETHODCALLTYPE hstring_vector_QueryInterface(IVectorView_HSTRING *iface,
  66         REFIID iid, void **out)
  67 {
  68     struct hstring_vector *impl = impl_from_IVectorView_HSTRING(iface);
  69     TRACE("iface %p, iid %s, out %p stub!\n", iface, debugstr_guid(iid), out);
  70
  71     if (IsEqualGUID(iid, &IID_IUnknown) ||
  72         IsEqualGUID(iid, &IID_IInspectable) ||
  73         IsEqualGUID(iid, &IID_IAgileObject) ||
  74         IsEqualGUID(iid, &IID_IVectorView_HSTRING))
  75     {
  76         IUnknown_AddRef(iface);
  77         *out = &impl->IVectorView_HSTRING_iface;
  78         return S_OK;
  79     }
  80
  81     FIXME("%s not implemented, returning E_NOINTERFACE.\n", debugstr_guid(iid));
  82     *out = NULL;
  83     return E_NOINTERFACE;
  84 }
  85
  86 static ULONG STDMETHODCALLTYPE hstring_vector_AddRef(IVectorView_HSTRING *iface)
  87 {
  88     struct hstring_vector *impl = impl_from_IVectorView_HSTRING(iface);
  89     ULONG ref = InterlockedIncrement(&impl->ref);
  90     TRACE("iface %p, ref %u.\n", iface, ref);
  91     return ref;
  92 }
  93
  94 static ULONG STDMETHODCALLTYPE hstring_vector_Release(IVectorView_HSTRING *iface)
  95 {
  96     struct hstring_vector *impl = impl_from_IVectorView_HSTRING(iface);
  97     ULONG ref = InterlockedDecrement(&impl->ref);
  98     TRACE("iface %p, ref %u.\n", iface, ref);
  99     if (ref == 0)
 100     {
 101         while (impl->count--) WindowsDeleteString(impl->values[impl->count]);
 102         free(impl);
 103     }
 104     return ref;
 105 }
 106
 107 static HRESULT STDMETHODCALLTYPE hstring_vector_GetIids(IVectorView_HSTRING *iface,
 108         ULONG *iid_count, IID **iids)
 109 {
 110     FIXME("iface %p, iid_count %p, iids %p stub!\n", iface, iid_count, iids);
 111     return E_NOTIMPL;
 112 }
 113
 114 static HRESULT STDMETHODCALLTYPE hstring_vector_GetRuntimeClassName(IVectorView_HSTRING *iface,
 115         HSTRING *class_name)
 116 {
 117     FIXME("iface %p, class_name %p stub!\n", iface, class_name);
 118     return E_NOTIMPL;
 119 }
 120
 121 static HRESULT STDMETHODCALLTYPE hstring_vector_GetTrustLevel(IVectorView_HSTRING *iface,
 122         TrustLevel *trust_level)
 123 {
 124     FIXME("iface %p, trust_level %p stub!\n", iface, trust_level);
 125     return E_NOTIMPL;
 126 }
 127
 128 static HRESULT STDMETHODCALLTYPE hstring_vector_GetAt(IVectorView_HSTRING *iface,
 129         ULONG index, HSTRING *value)
 130 {
 131     struct hstring_vector *impl = impl_from_IVectorView_HSTRING(iface);
 132
 133     TRACE("iface %p, index %#x, value %p.\n", iface, index, value);
 134
 135     *value = NULL;
 136     if (index >= impl->count) return E_BOUNDS;
 137     return WindowsDuplicateString(impl->values[index], value);
 138 }
 139
 140 static HRESULT STDMETHODCALLTYPE hstring_vector_get_Size(IVectorView_HSTRING *iface,
 141         ULONG *value)
 142 {
 143     struct hstring_vector *impl = impl_from_IVectorView_HSTRING(iface);
 144
 145     TRACE("iface %p, value %p.\n", iface, value);
 146
 147     *value = impl->count;
 148     return S_OK;
 149 }
 150
 151 static HRESULT STDMETHODCALLTYPE hstring_vector_IndexOf(IVectorView_HSTRING *iface,
 152         HSTRING element, ULONG *index, BOOLEAN *found)
 153 {
 154     struct hstring_vector *impl = impl_from_IVectorView_HSTRING(iface);
 155     INT32 i, order;
 156
 157     TRACE("iface %p, element %p, index %p, found %p.\n", iface, element, index, found);
 158
 159     for (i = 0; i < impl->count; ++i)
 160         if (SUCCEEDED(WindowsCompareStringOrdinal(impl->values[i], element, &order)) && order == 0)
 161             break;
 162
 163     if (i < impl->count)
 164     {
 165         *found = TRUE;
 166         *index = i;
 167     }
 168     else
 169     {
 170         *found = FALSE;
 171         *index = 0;
 172     }
 173
 174     return S_OK;
 175 }
 176
 177 static HRESULT STDMETHODCALLTYPE hstring_vector_GetMany(IVectorView_HSTRING *iface,
 178         ULONG start_index, ULONG items_size, HSTRING *items, UINT *count)
 179 {
 180     struct hstring_vector *impl = impl_from_IVectorView_HSTRING(iface);
 181     HRESULT hr = S_OK;
 182     ULONG i;
 183
 184     TRACE("iface %p, start_index %#x, items %p, count %p.\n", iface, start_index, items, count);
 185
 186     memset(items, 0, items_size * sizeof(HSTRING *));
 187
 188     for (i = start_index; i < impl->count && i < start_index + items_size; ++i)
 189         if (FAILED(hr = WindowsDuplicateString(impl->values[i], items + i - start_index)))
 190             break;
 191
 192     if (FAILED(hr)) while (i-- > start_index) WindowsDeleteString(items[i - start_index]);
 193     *count = i - start_index;
 194     return hr;
 195 }
 196
 197 static const struct IVectorView_HSTRINGVtbl hstring_vector_vtbl =
 198 {
 199     hstring_vector_QueryInterface,
 200     hstring_vector_AddRef,
 201     hstring_vector_Release,
 202     /* IInspectable methods */
 203     hstring_vector_GetIids,
 204     hstring_vector_GetRuntimeClassName,
 205     hstring_vector_GetTrustLevel,
 206     /* IVectorView<HSTRING> methods */
 207     hstring_vector_GetAt,
 208     hstring_vector_get_Size,
 209     hstring_vector_IndexOf,
 210     hstring_vector_GetMany,
 211 };
 212
 213 static HRESULT hstring_vector_create(HSTRING *values, SIZE_T count, IVectorView_HSTRING **out)
 214 {
 215     struct hstring_vector *impl;
 216
 217     if (!(impl = malloc(offsetof(struct hstring_vector, values[count])))) return E_OUTOFMEMORY;
 218     impl->ref = 1;
 219
 220     impl->IVectorView_HSTRING_iface.lpVtbl = &hstring_vector_vtbl;
 221     impl->count = count;
 222     memcpy(impl->values, values, count * sizeof(HSTRING));
 223
 224     *out = &impl->IVectorView_HSTRING_iface;
 225     return S_OK;
 226 }
 227
 228 struct windows_globalization
 229 {
 230     IActivationFactory IActivationFactory_iface;
 231     IGlobalizationPreferencesStatics IGlobalizationPreferencesStatics_iface;
 232     LONG ref;
 233 };
 234
 235 static inline struct windows_globalization *impl_from_IActivationFactory(IActivationFactory *iface)
 236 {
 237     return CONTAINING_RECORD(iface, struct windows_globalization, IActivationFactory_iface);
 238 }
 239
 240 static inline struct windows_globalization *impl_from_IGlobalizationPreferencesStatics(IGlobalizationPreferencesStatics *iface)
 241 {
 242     return CONTAINING_RECORD(iface, struct windows_globalization, IGlobalizationPreferencesStatics_iface);
 243 }
 244
 245 static HRESULT STDMETHODCALLTYPE windows_globalization_QueryInterface(
 246         IActivationFactory *iface, REFIID iid, void **out)
 247 {
 248     struct windows_globalization *impl = impl_from_IActivationFactory(iface);
 249     TRACE("iface %p, iid %s, out %p stub!\n", iface, debugstr_guid(iid), out);
 250
 251     if (IsEqualGUID(iid, &IID_IUnknown) ||
 252         IsEqualGUID(iid, &IID_IInspectable) ||
 253         IsEqualGUID(iid, &IID_IAgileObject) ||
 254         IsEqualGUID(iid, &IID_IActivationFactory))
 255     {
 256         IUnknown_AddRef(iface);
 257         *out = &impl->IActivationFactory_iface;
 258         return S_OK;
 259     }
 260
 261     if (IsEqualGUID(iid, &IID_IGlobalizationPreferencesStatics))
 262     {
 263         IUnknown_AddRef(iface);
 264         *out = &impl->IGlobalizationPreferencesStatics_iface;
 265         return S_OK;
 266     }
 267
 268     FIXME("%s not implemented, returning E_NOINTERFACE.\n", debugstr_guid(iid));
 269     *out = NULL;
 270     return E_NOINTERFACE;
 271 }
 272
 273 static ULONG STDMETHODCALLTYPE windows_globalization_AddRef(
 274         IActivationFactory *iface)
 275 {
 276     struct windows_globalization *impl = impl_from_IActivationFactory(iface);
 277     ULONG ref = InterlockedIncrement(&impl->ref);
 278     TRACE("iface %p, ref %u.\n", iface, ref);
 279     return ref;
 280 }
 281
 282 static ULONG STDMETHODCALLTYPE windows_globalization_Release(
 283         IActivationFactory *iface)
 284 {
 285     struct windows_globalization *impl = impl_from_IActivationFactory(iface);
 286     ULONG ref = InterlockedDecrement(&impl->ref);
 287     TRACE("iface %p, ref %u.\n", iface, ref);
 288     return ref;
 289 }
 290
 291 static HRESULT STDMETHODCALLTYPE windows_globalization_GetIids(
 292         IActivationFactory *iface, ULONG *iid_count, IID **iids)
 293 {
 294     FIXME("iface %p, iid_count %p, iids %p stub!\n", iface, iid_count, iids);
 295     return E_NOTIMPL;
 296 }
 297
 298 static HRESULT STDMETHODCALLTYPE windows_globalization_GetRuntimeClassName(
 299         IActivationFactory *iface, HSTRING *class_name)
 300 {
 301     FIXME("iface %p, class_name %p stub!\n", iface, class_name);
 302     return E_NOTIMPL;
 303 }
 304
 305 static HRESULT STDMETHODCALLTYPE windows_globalization_GetTrustLevel(
 306         IActivationFactory *iface, TrustLevel *trust_level)
 307 {
 308     FIXME("iface %p, trust_level %p stub!\n", iface, trust_level);
 309     return E_NOTIMPL;
 310 }
 311
 312 static HRESULT STDMETHODCALLTYPE windows_globalization_ActivateInstance(
 313         IActivationFactory *iface, IInspectable **instance)
 314 {
 315     FIXME("iface %p, instance %p stub!\n", iface, instance);
 316     return E_NOTIMPL;
 317 }
 318
 319 static const struct IActivationFactoryVtbl activation_factory_vtbl =
 320 {
 321     windows_globalization_QueryInterface,
 322     windows_globalization_AddRef,
 323     windows_globalization_Release,
 324     /* IInspectable methods */
 325     windows_globalization_GetIids,
 326     windows_globalization_GetRuntimeClassName,
 327     windows_globalization_GetTrustLevel,
 328     /* IActivationFactory methods */
 329     windows_globalization_ActivateInstance,
 330 };
 331
 332 static HRESULT STDMETHODCALLTYPE globalization_preferences_QueryInterface(
 333         IGlobalizationPreferencesStatics *iface, REFIID iid, void **object)
 334 {
 335     struct windows_globalization *impl = impl_from_IGlobalizationPreferencesStatics(iface);
 336     return windows_globalization_QueryInterface(&impl->IActivationFactory_iface, iid, object);
 337 }
 338
 339 static ULONG STDMETHODCALLTYPE globalization_preferences_AddRef(
 340         IGlobalizationPreferencesStatics *iface)
 341 {
 342     struct windows_globalization *impl = impl_from_IGlobalizationPreferencesStatics(iface);
 343     return windows_globalization_AddRef(&impl->IActivationFactory_iface);
 344 }
 345
 346 static ULONG STDMETHODCALLTYPE globalization_preferences_Release(
 347         IGlobalizationPreferencesStatics *iface)
 348 {
 349     struct windows_globalization *impl = impl_from_IGlobalizationPreferencesStatics(iface);
 350     return windows_globalization_Release(&impl->IActivationFactory_iface);
 351 }
 352
 353 static HRESULT STDMETHODCALLTYPE globalization_preferences_GetIids(
 354         IGlobalizationPreferencesStatics *iface, ULONG *iid_count, IID **iids)
 355 {
 356     FIXME("iface %p, iid_count %p, iids %p stub!\n", iface, iid_count, iids);
 357     return E_NOTIMPL;
 358 }
 359
 360 static HRESULT STDMETHODCALLTYPE globalization_preferences_GetRuntimeClassName(
 361         IGlobalizationPreferencesStatics *iface, HSTRING *class_name)
 362 {
 363     FIXME("iface %p, class_name %p stub!\n", iface, class_name);
 364     return E_NOTIMPL;
 365 }
 366
 367 static HRESULT STDMETHODCALLTYPE globalization_preferences_GetTrustLevel(
 368         IGlobalizationPreferencesStatics *iface, TrustLevel *trust_level)
 369 {
 370     FIXME("iface %p, trust_level %p stub!\n", iface, trust_level);
 371     return E_NOTIMPL;
 372 }
 373
 374 static HRESULT STDMETHODCALLTYPE globalization_preferences_get_Calendars(
 375         IGlobalizationPreferencesStatics *iface, IVectorView_HSTRING **out)
 376 {
 377     FIXME("iface %p, out %p stub!\n", iface, out);
 378     return hstring_vector_create(NULL, 0, out);
 379 }
 380
 381 static HRESULT STDMETHODCALLTYPE globalization_preferences_get_Clocks(
 382         IGlobalizationPreferencesStatics *iface, IVectorView_HSTRING **out)
 383 {
 384     FIXME("iface %p, out %p stub!\n", iface, out);
 385     return hstring_vector_create(NULL, 0, out);
 386 }
 387
 388 static HRESULT STDMETHODCALLTYPE globalization_preferences_get_Currencies(
 389         IGlobalizationPreferencesStatics *iface, IVectorView_HSTRING **out)
 390 {
 391     FIXME("iface %p, out %p stub!\n", iface, out);
 392     return hstring_vector_create(NULL, 0, out);
 393 }
 394
 395 static HRESULT STDMETHODCALLTYPE globalization_preferences_get_Languages(
 396         IGlobalizationPreferencesStatics *iface, IVectorView_HSTRING **out)
 397 {
 398     HSTRING hstring;
 399     HRESULT hr;
 400     WCHAR locale[LOCALE_NAME_MAX_LENGTH];
 401
 402     TRACE("iface %p, out %p.\n", iface, out);
 403
 404     if (!GetUserDefaultLocaleName(locale, LOCALE_NAME_MAX_LENGTH))
 405         return E_FAIL;
 406
 407     TRACE("returning language %s\n", debugstr_w(locale));
 408
 409     if (FAILED(hr = WindowsCreateString(locale, wcslen(locale), &hstring)))
 410         return hr;
 411
 412     return hstring_vector_create(&hstring, 1, out);
 413 }
 414
 415 static HRESULT STDMETHODCALLTYPE globalization_preferences_get_HomeGeographicRegion(
 416         IGlobalizationPreferencesStatics *iface, HSTRING* out)
 417 {
 418     WCHAR country[16];
 419
 420     TRACE("iface %p, out %p.\n", iface, out);
 421
 422     if (!GetUserDefaultGeoName(country, 16))
 423         return E_FAIL;
 424
 425     TRACE("returning country %s\n", debugstr_w(country));
 426
 427     return WindowsCreateString(country, wcslen(country), out);
 428 }
 429
 430 static HRESULT STDMETHODCALLTYPE globalization_preferences_get_WeekStartsOn(
 431         IGlobalizationPreferencesStatics *iface, enum DayOfWeek* out)
 432 {
 433     FIXME("iface %p, out %p stub!\n", iface, out);
 434     return E_NOTIMPL;
 435 }
 436
 437 static const struct IGlobalizationPreferencesStaticsVtbl globalization_preferences_vtbl =
 438 {
 439     globalization_preferences_QueryInterface,
 440     globalization_preferences_AddRef,
 441     globalization_preferences_Release,
 442     /* IInspectable methods */
 443     globalization_preferences_GetIids,
 444     globalization_preferences_GetRuntimeClassName,
 445     globalization_preferences_GetTrustLevel,
 446     /* IGlobalizationPreferencesStatics methods */
 447     globalization_preferences_get_Calendars,
 448     globalization_preferences_get_Clocks,
 449     globalization_preferences_get_Currencies,
 450     globalization_preferences_get_Languages,
 451     globalization_preferences_get_HomeGeographicRegion,
 452     globalization_preferences_get_WeekStartsOn,
 453 };
 454
 455 static struct windows_globalization windows_globalization =
 456 {
 457     {&activation_factory_vtbl},
 458     {&globalization_preferences_vtbl},
 459     0
 460 };
 461
 462 HRESULT WINAPI DllCanUnloadNow(void)
 463 {
 464     return S_FALSE;
 465 }
 466
 467 HRESULT WINAPI DllGetClassObject(REFCLSID clsid, REFIID riid, void **out)
 468 {
 469     FIXME("clsid %s, riid %s, out %p stub!\n", debugstr_guid(clsid), debugstr_guid(riid), out);
 470     return CLASS_E_CLASSNOTAVAILABLE;
 471 }
 472
 473 HRESULT WINAPI DllGetActivationFactory(HSTRING classid, IActivationFactory **factory)
 474 {
 475     TRACE("classid %s, factory %p.\n", debugstr_hstring(classid), factory);
 476     *factory = &windows_globalization.IActivationFactory_iface;
 477     IUnknown_AddRef(*factory);
 478     return S_OK;
 479 }