reactos/dll/win32/hlink/hlink_main.c

   1 /*
   2  * Implementation of hyperlinking (hlink.dll)
   3  *
   4  * Copyright 2005 Aric Stewart for CodeWeavers
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "hlink_private.h"
  22
  23 #include <winreg.h>
  24 #include <rpcproxy.h>
  25
  26 static HINSTANCE instance;
  27
  28 typedef HRESULT (*LPFNCREATEINSTANCE)(IUnknown*, REFIID, LPVOID*);
  29
  30 typedef struct
  31 {
  32     IClassFactory      IClassFactory_iface;
  33     LPFNCREATEINSTANCE lpfnCI;
  34 } CFImpl;
  35
  36 static inline CFImpl *impl_from_IClassFactory(IClassFactory *iface)
  37 {
  38     return CONTAINING_RECORD(iface, CFImpl, IClassFactory_iface);
  39 }
  40
  41 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
  42 {
  43     TRACE("%p %d %p\n", hinstDLL, fdwReason, lpvReserved);
  44
  45     switch (fdwReason)
  46     {
  47     case DLL_PROCESS_ATTACH:
  48         instance = hinstDLL;
  49         DisableThreadLibraryCalls(hinstDLL);
  50         break;
  51     }
  52     return TRUE;
  53 }
  54
  55 /***********************************************************************
  56  *             DllCanUnloadNow (HLINK.@)
  57  */
  58 HRESULT WINAPI DllCanUnloadNow( void )
  59 {
  60     return S_FALSE;
  61 }
  62
  63 /***********************************************************************
  64  *             HlinkCreateFromMoniker (HLINK.@)
  65  */
  66 HRESULT WINAPI HlinkCreateFromMoniker( IMoniker *pimkTrgt, LPCWSTR pwzLocation,
  67         LPCWSTR pwzFriendlyName, IHlinkSite* pihlsite, DWORD dwSiteData,
  68         IUnknown* piunkOuter, REFIID riid, void** ppvObj)
  69 {
  70     IHlink *hl = NULL;
  71     HRESULT r;
  72
  73     TRACE("%p %s %s %p %i %p %s %p\n", pimkTrgt, debugstr_w(pwzLocation),
  74             debugstr_w(pwzFriendlyName), pihlsite, dwSiteData, piunkOuter,
  75             debugstr_guid(riid), ppvObj);
  76
  77     r = CoCreateInstance(&CLSID_StdHlink, piunkOuter, CLSCTX_INPROC_SERVER, riid, (LPVOID*)&hl);
  78     if (FAILED(r))
  79         return r;
  80
  81     IHlink_SetMonikerReference(hl, HLINKSETF_LOCATION | HLINKSETF_TARGET, pimkTrgt, pwzLocation);
  82
  83     if (pwzFriendlyName)
  84         IHlink_SetFriendlyName(hl, pwzFriendlyName);
  85     if (pihlsite)
  86         IHlink_SetHlinkSite(hl, pihlsite, dwSiteData);
  87
  88     *ppvObj = hl;
  89
  90     TRACE("Returning %i\n",r);
  91
  92     return r;
  93 }
  94
  95 /***********************************************************************
  96  *             HlinkCreateFromString (HLINK.@)
  97  */
  98 HRESULT WINAPI HlinkCreateFromString( LPCWSTR pwzTarget, LPCWSTR pwzLocation,
  99         LPCWSTR pwzFriendlyName, IHlinkSite* pihlsite, DWORD dwSiteData,
 100         IUnknown* piunkOuter, REFIID riid, void** ppvObj)
 101 {
 102     IHlink *hl = NULL;
 103     HRESULT r;
 104     WCHAR *hash, *tgt;
 105     const WCHAR *loc;
 106
 107     TRACE("%s %s %s %p %i %p %s %p\n", debugstr_w(pwzTarget),
 108             debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName), pihlsite,
 109             dwSiteData, piunkOuter, debugstr_guid(riid), ppvObj);
 110
 111     r = CoCreateInstance(&CLSID_StdHlink, piunkOuter, CLSCTX_INPROC_SERVER, riid, (LPVOID*)&hl);
 112     if (FAILED(r))
 113         return r;
 114
 115     if (pwzTarget)
 116     {
 117         hash = strchrW(pwzTarget, '#');
 118         if (hash)
 119         {
 120             if (hash == pwzTarget)
 121                 tgt = NULL;
 122             else
 123             {
 124                 int tgt_len = hash - pwzTarget;
 125                 tgt = heap_alloc((tgt_len + 1) * sizeof(WCHAR));
 126                 if (!tgt)
 127                     return E_OUTOFMEMORY;
 128                 memcpy(tgt, pwzTarget, tgt_len * sizeof(WCHAR));
 129                 tgt[tgt_len] = 0;
 130             }
 131             if (!pwzLocation)
 132                 loc = hash + 1;
 133             else
 134                 loc = pwzLocation;
 135         }
 136         else
 137         {
 138             tgt = hlink_strdupW(pwzTarget);
 139             if (!tgt)
 140                 return E_OUTOFMEMORY;
 141             loc = pwzLocation;
 142         }
 143     }
 144     else
 145     {
 146         tgt = NULL;
 147         loc = pwzLocation;
 148     }
 149
 150     IHlink_SetStringReference(hl, HLINKSETF_TARGET | HLINKSETF_LOCATION, tgt, loc);
 151
 152     heap_free(tgt);
 153
 154     if (pwzFriendlyName)
 155         IHlink_SetFriendlyName(hl, pwzFriendlyName);
 156
 157     if (pihlsite)
 158         IHlink_SetHlinkSite(hl, pihlsite, dwSiteData);
 159
 160     TRACE("Returning %i\n",r);
 161     *ppvObj = hl;
 162
 163     return r;
 164 }
 165
 166
 167 /***********************************************************************
 168  *             HlinkCreateBrowseContext (HLINK.@)
 169  */
 170 HRESULT WINAPI HlinkCreateBrowseContext( IUnknown* piunkOuter, REFIID riid, void** ppvObj)
 171 {
 172     TRACE("%p %s %p\n", piunkOuter, debugstr_guid(riid), ppvObj);
 173     return CoCreateInstance(&CLSID_StdHlinkBrowseContext, piunkOuter, CLSCTX_INPROC_SERVER, riid, ppvObj);
 174 }
 175
 176 /***********************************************************************
 177  *             HlinkNavigate (HLINK.@)
 178  */
 179 HRESULT WINAPI HlinkNavigate(IHlink *phl, IHlinkFrame *phlFrame,
 180         DWORD grfHLNF, LPBC pbc, IBindStatusCallback *pbsc,
 181         IHlinkBrowseContext *phlbc)
 182 {
 183     HRESULT r = S_OK;
 184
 185     TRACE("%p %p %i %p %p %p\n", phl, phlFrame, grfHLNF, pbc, pbsc, phlbc);
 186
 187     if (phlFrame)
 188         r = IHlinkFrame_Navigate(phlFrame, grfHLNF, pbc, pbsc, phl);
 189     else if (phl)
 190         r = IHlink_Navigate(phl, grfHLNF, pbc, pbsc, phlbc);
 191
 192     return r;
 193 }
 194
 195 /***********************************************************************
 196  *             HlinkOnNavigate (HLINK.@)
 197  */
 198 HRESULT WINAPI HlinkOnNavigate( IHlinkFrame *phlFrame,
 199         IHlinkBrowseContext* phlbc, DWORD grfHLNF, IMoniker *pmkTarget,
 200         LPCWSTR pwzLocation, LPCWSTR pwzFriendlyName, ULONG* puHLID)
 201 {
 202     HRESULT r;
 203
 204     TRACE("%p %p %i %p %s %s %p\n",phlFrame, phlbc, grfHLNF, pmkTarget,
 205             debugstr_w(pwzLocation), debugstr_w(pwzFriendlyName), puHLID);
 206
 207     r = IHlinkBrowseContext_OnNavigateHlink(phlbc, grfHLNF, pmkTarget,
 208             pwzLocation, pwzFriendlyName, puHLID);
 209
 210     if (phlFrame)
 211         r = IHlinkFrame_OnNavigate(phlFrame,grfHLNF,pmkTarget, pwzLocation,
 212                 pwzFriendlyName, 0);
 213
 214     return r;
 215 }
 216
 217 /***********************************************************************
 218  *             HlinkCreateFromData (HLINK.@)
 219  */
 220 HRESULT WINAPI HlinkCreateFromData(IDataObject *piDataObj,
 221         IHlinkSite *pihlsite, DWORD dwSiteData, IUnknown *piunkOuter,
 222         REFIID riid, void **ppvObj)
 223 {
 224     FIXME("%p %p %d %p %p %p\n",
 225           piDataObj, pihlsite, dwSiteData, piunkOuter, riid, ppvObj);
 226     *ppvObj = NULL;
 227     return E_NOTIMPL;
 228 }
 229
 230 /***********************************************************************
 231  *             HlinkQueryCreateFromData (HLINK.@)
 232  */
 233 HRESULT WINAPI HlinkQueryCreateFromData(IDataObject* piDataObj)
 234 {
 235     FIXME("%p\n", piDataObj);
 236     return E_NOTIMPL;
 237 }
 238
 239 /***********************************************************************
 240  *             HlinkNavigateToStringReference (HLINK.@)
 241  */
 242 HRESULT WINAPI HlinkNavigateToStringReference( LPCWSTR pwzTarget,
 243         LPCWSTR pwzLocation, IHlinkSite *pihlsite, DWORD dwSiteData,
 244         IHlinkFrame *pihlframe, DWORD grfHLNF, LPBC pibc,
 245         IBindStatusCallback *pibsc, IHlinkBrowseContext *pihlbc)
 246 {
 247     HRESULT r;
 248     IHlink *hlink = NULL;
 249
 250     TRACE("%s %s %p %08x %p %08x %p %p %p\n",
 251           debugstr_w(pwzTarget), debugstr_w(pwzLocation), pihlsite,
 252           dwSiteData, pihlframe, grfHLNF, pibc, pibsc, pihlbc);
 253
 254     r = HlinkCreateFromString( pwzTarget, pwzLocation, NULL, pihlsite,
 255                                dwSiteData, NULL, &IID_IHlink, (LPVOID*) &hlink );
 256     if (SUCCEEDED(r)) {
 257         r = HlinkNavigate(hlink, pihlframe, grfHLNF, pibc, pibsc, pihlbc);
 258         IHlink_Release(hlink);
 259     }
 260
 261     return r;
 262 }
 263
 264 /***********************************************************************
 265  *             HlinkIsShortcut (HLINK.@)
 266  */
 267 HRESULT WINAPI HlinkIsShortcut(LPCWSTR pwzFileName)
 268 {
 269     int len;
 270
 271     static const WCHAR url_ext[] = {'.','u','r','l',0};
 272
 273     TRACE("(%s)\n", debugstr_w(pwzFileName));
 274
 275     if(!pwzFileName)
 276         return E_INVALIDARG;
 277
 278     len = strlenW(pwzFileName)-4;
 279     if(len < 0)
 280         return S_FALSE;
 281
 282     return strcmpiW(pwzFileName+len, url_ext) ? S_FALSE : S_OK;
 283 }
 284
 285 /***********************************************************************
 286  *             HlinkGetSpecialReference (HLINK.@)
 287  */
 288 HRESULT WINAPI HlinkGetSpecialReference(ULONG uReference, LPWSTR *ppwzReference)
 289 {
 290     DWORD res, type, size = 100;
 291     LPCWSTR value_name;
 292     WCHAR *buf;
 293     HKEY hkey;
 294
 295     static const WCHAR start_pageW[] = {'S','t','a','r','t',' ','P','a','g','e',0};
 296     static const WCHAR search_pageW[] = {'S','e','a','r','c','h',' ','P','a','g','e',0};
 297
 298     static const WCHAR ie_main_keyW[] =
 299         {'S','o','f','t','w','a','r','e',
 300          '\\','M','i','c','r','o','s','o','f','t','\\',
 301          'I','n','t','e','r','n','e','t',' ','E','x','p','l','o','r','e','r',
 302          '\\','M','a','i','n',0};
 303
 304     TRACE("(%u %p)\n", uReference, ppwzReference);
 305
 306     *ppwzReference = NULL;
 307
 308     switch(uReference) {
 309     case HLSR_HOME:
 310         value_name = start_pageW;
 311         break;
 312     case HLSR_SEARCHPAGE:
 313         value_name = search_pageW;
 314         break;
 315     case HLSR_HISTORYFOLDER:
 316         return E_NOTIMPL;
 317     default:
 318         return E_INVALIDARG;
 319     }
 320
 321     res = RegOpenKeyW(HKEY_CURRENT_USER, ie_main_keyW, &hkey);
 322     if(res != ERROR_SUCCESS) {
 323         WARN("Could not open key: %u\n", res);
 324         return HRESULT_FROM_WIN32(res);
 325     }
 326
 327     buf = CoTaskMemAlloc(size);
 328     res = RegQueryValueExW(hkey, value_name, NULL, &type, (PBYTE)buf, &size);
 329     buf = CoTaskMemRealloc(buf, size);
 330     if(res == ERROR_MORE_DATA)
 331         res = RegQueryValueExW(hkey, value_name, NULL, &type, (PBYTE)buf, &size);
 332     RegCloseKey(hkey);
 333     if(res != ERROR_SUCCESS) {
 334         WARN("Could not query value %s: %u\n", debugstr_w(value_name), res);
 335         CoTaskMemFree(buf);
 336         return HRESULT_FROM_WIN32(res);
 337     }
 338
 339     *ppwzReference = buf;
 340     return S_OK;
 341 }
 342
 343 /***********************************************************************
 344  *             HlinkTranslateURL (HLINK.@)
 345  */
 346 HRESULT WINAPI HlinkTranslateURL(LPCWSTR pwzURL, DWORD grfFlags, LPWSTR *ppwzTranslatedURL)
 347 {
 348     FIXME("(%s %08x %p)\n", debugstr_w(pwzURL), grfFlags, ppwzTranslatedURL);
 349     return E_NOTIMPL;
 350 }
 351
 352 /***********************************************************************
 353  *             HlinkUpdateStackItem (HLINK.@)
 354  */
 355 HRESULT WINAPI HlinkUpdateStackItem(IHlinkFrame *frame, IHlinkBrowseContext *bc,
 356         ULONG hlid, IMoniker *target, LPCWSTR location, LPCWSTR friendly_name)
 357 {
 358     HRESULT hr;
 359
 360     TRACE("(%p %p 0x%x %p %s %s)\n", frame, bc, hlid, target, debugstr_w(location), debugstr_w(friendly_name));
 361
 362     if (!frame && !bc) return E_INVALIDARG;
 363
 364     if (frame)
 365         hr = IHlinkFrame_UpdateHlink(frame, hlid, target, location, friendly_name);
 366     else
 367         hr = IHlinkBrowseContext_UpdateHlink(bc, hlid, target, location, friendly_name);
 368
 369     return hr;
 370 }
 371
 372 /***********************************************************************
 373  *             HlinkParseDisplayName (HLINK.@)
 374  */
 375 HRESULT WINAPI HlinkParseDisplayName(LPBC pibc, LPCWSTR pwzDisplayName, BOOL fNoForceAbs,
 376         ULONG *pcchEaten, IMoniker **ppimk)
 377 {
 378     HRESULT hres;
 379
 380     TRACE("(%p %s %x %p %p)\n", pibc, debugstr_w(pwzDisplayName), fNoForceAbs, pcchEaten, ppimk);
 381
 382     if(fNoForceAbs)
 383         FIXME("Unsupported fNoForceAbs\n");
 384
 385     hres = MkParseDisplayNameEx(pibc, pwzDisplayName, pcchEaten, ppimk);
 386     if(SUCCEEDED(hres))
 387         return hres;
 388
 389     hres = MkParseDisplayName(pibc, pwzDisplayName, pcchEaten, ppimk);
 390     if(SUCCEEDED(hres))
 391         return hres;
 392
 393     hres = CreateFileMoniker(pwzDisplayName, ppimk);
 394     if(SUCCEEDED(hres))
 395         *pcchEaten = strlenW(pwzDisplayName);
 396
 397     return hres;
 398 }
 399
 400 /***********************************************************************
 401  *             HlinkResolveMonikerForData (HLINK.@)
 402  */
 403 HRESULT WINAPI HlinkResolveMonikerForData(LPMONIKER pimkReference, DWORD reserved, LPBC pibc,
 404         ULONG cFmtetc, FORMATETC *rgFmtetc, IBindStatusCallback *pibsc, LPMONIKER pimkBase)
 405 {
 406     LPOLESTR name = NULL;
 407     IBindCtx *bctx;
 408     DWORD mksys = 0;
 409     void *obj = NULL;
 410     HRESULT hres;
 411
 412     TRACE("(%p %x %p %d %p %p %p)\n", pimkReference, reserved, pibc, cFmtetc, rgFmtetc, pibsc, pimkBase);
 413
 414     if(cFmtetc || rgFmtetc || pimkBase)
 415         FIXME("Unsupported args\n");
 416
 417     hres = RegisterBindStatusCallback(pibc, pibsc, NULL /* FIXME */, 0);
 418     if(FAILED(hres))
 419         return hres;
 420
 421     hres = IMoniker_IsSystemMoniker(pimkReference, &mksys);
 422     if(SUCCEEDED(hres) && mksys != MKSYS_URLMONIKER)
 423         WARN("sysmk = %x\n", mksys);
 424
 425     /* FIXME: What is it for? */
 426     CreateBindCtx(0, &bctx);
 427     hres = IMoniker_GetDisplayName(pimkReference, bctx, NULL, &name);
 428     IBindCtx_Release(bctx);
 429     if(SUCCEEDED(hres)) {
 430         TRACE("got display name %s\n", debugstr_w(name));
 431         CoTaskMemFree(name);
 432     }
 433
 434     return IMoniker_BindToStorage(pimkReference, pibc, NULL, &IID_IUnknown, &obj);
 435 }
 436
 437 /***********************************************************************
 438  *             HlinkClone (HLINK.@)
 439  */
 440 HRESULT WINAPI HlinkClone(IHlink *hlink, REFIID riid, IHlinkSite *hls,
 441         DWORD site_data, void **obj)
 442 {
 443     IMoniker *mk, *clone_mk = NULL;
 444     WCHAR *loc, *name = NULL;
 445     HRESULT hres;
 446
 447     if(!hlink || !riid || !obj)
 448         return E_INVALIDARG;
 449
 450     *obj = NULL;
 451
 452     hres = IHlink_GetMonikerReference(hlink, HLINKGETREF_DEFAULT, &mk, &loc);
 453     if(FAILED(hres))
 454         return hres;
 455
 456     if(mk) {
 457         IStream *strm;
 458         LARGE_INTEGER lgint;
 459
 460         hres = CreateStreamOnHGlobal(NULL, TRUE, &strm);
 461         if(FAILED(hres)) {
 462             IMoniker_Release(mk);
 463             goto cleanup;
 464         }
 465
 466         hres = OleSaveToStream((IPersistStream*)mk, strm);
 467         if(FAILED(hres)) {
 468             IStream_Release(strm);
 469             IMoniker_Release(mk);
 470             goto cleanup;
 471         }
 472         IMoniker_Release(mk);
 473
 474         lgint.QuadPart = 0;
 475         hres = IStream_Seek(strm, lgint, STREAM_SEEK_SET, NULL);
 476         if(FAILED(hres)) {
 477             IStream_Release(strm);
 478             goto cleanup;
 479         }
 480
 481         hres = OleLoadFromStream(strm, &IID_IMoniker, (void**)&clone_mk);
 482         IStream_Release(strm);
 483         if(FAILED(hres))
 484             goto cleanup;
 485     }
 486
 487     hres = IHlink_GetFriendlyName(hlink, HLFNAMEF_DEFAULT, &name);
 488     if(FAILED(hres))
 489         goto cleanup;
 490
 491     hres = HlinkCreateFromMoniker(clone_mk, loc, name, hls, site_data, NULL,
 492             &IID_IHlink, obj);
 493
 494 cleanup:
 495     if(clone_mk)
 496         IMoniker_Release(clone_mk);
 497     CoTaskMemFree(loc);
 498     CoTaskMemFree(name);
 499     return hres;
 500 }
 501
 502 static HRESULT WINAPI HLinkCF_fnQueryInterface ( LPCLASSFACTORY iface,
 503         REFIID riid, LPVOID *ppvObj)
 504 {
 505     CFImpl *This = impl_from_IClassFactory(iface);
 506
 507     TRACE("(%p)->(%s)\n",This,debugstr_guid(riid));
 508
 509     *ppvObj = NULL;
 510
 511     if (IsEqualIID(riid, &IID_IUnknown) ||
 512         IsEqualIID(riid, &IID_IClassFactory))
 513     {
 514         *ppvObj = This;
 515         return S_OK;
 516     }
 517
 518     TRACE("-- E_NOINTERFACE\n");
 519     return E_NOINTERFACE;
 520 }
 521
 522 static ULONG WINAPI HLinkCF_fnAddRef (LPCLASSFACTORY iface)
 523 {
 524     return 2;
 525 }
 526
 527 static ULONG WINAPI HLinkCF_fnRelease(LPCLASSFACTORY iface)
 528 {
 529     return 1;
 530 }
 531
 532 static HRESULT WINAPI HLinkCF_fnCreateInstance( LPCLASSFACTORY iface,
 533         LPUNKNOWN pUnkOuter, REFIID riid, LPVOID *ppvObject)
 534 {
 535     CFImpl *This = impl_from_IClassFactory(iface);
 536
 537     TRACE("%p->(%p,%s,%p)\n", This, pUnkOuter, debugstr_guid(riid), ppvObject);
 538
 539     *ppvObject = NULL;
 540
 541     return This->lpfnCI(pUnkOuter, riid, ppvObject);
 542 }
 543
 544 static HRESULT WINAPI HLinkCF_fnLockServer(LPCLASSFACTORY iface, BOOL fLock)
 545 {
 546     FIXME("%p %d\n", iface, fLock);
 547     return E_NOTIMPL;
 548 }
 549
 550 static const IClassFactoryVtbl hlcfvt =
 551 {
 552     HLinkCF_fnQueryInterface,
 553     HLinkCF_fnAddRef,
 554     HLinkCF_fnRelease,
 555     HLinkCF_fnCreateInstance,
 556     HLinkCF_fnLockServer
 557 };
 558
 559 static CFImpl HLink_cf = { { &hlcfvt }, HLink_Constructor };
 560 static CFImpl HLinkBrowseContext_cf = { { &hlcfvt }, HLinkBrowseContext_Constructor };
 561
 562 /***********************************************************************
 563  *             DllGetClassObject (HLINK.@)
 564  */
 565 HRESULT WINAPI DllGetClassObject(REFCLSID rclsid, REFIID iid, LPVOID *ppv)
 566 {
 567     IClassFactory   *pcf = NULL;
 568
 569     TRACE("%s %s %p\n", debugstr_guid(rclsid), debugstr_guid(iid), ppv);
 570
 571     if (!ppv)
 572         return E_INVALIDARG;
 573     *ppv = NULL;
 574
 575     if (IsEqualIID(rclsid, &CLSID_StdHlink))
 576         pcf = &HLink_cf.IClassFactory_iface;
 577     else if (IsEqualIID(rclsid, &CLSID_StdHlinkBrowseContext))
 578         pcf = &HLinkBrowseContext_cf.IClassFactory_iface;
 579     else
 580         return CLASS_E_CLASSNOTAVAILABLE;
 581
 582     return IClassFactory_QueryInterface(pcf, iid, ppv);
 583 }
 584
 585 /***********************************************************************
 586  *              DllRegisterServer (HLINK.@)
 587  */
 588 HRESULT WINAPI DllRegisterServer(void)
 589 {
 590     return __wine_register_resources( instance );
 591 }
 592
 593 /***********************************************************************
 594  *              DllUnregisterServer (HLINK.@)
 595  */
 596 HRESULT WINAPI DllUnregisterServer(void)
 597 {
 598     return __wine_unregister_resources( instance );
 599 }