2 * SHLWAPI initialisation
4 * Copyright 1998 Marcus Meissner
5 * Copyright 1998 Juergen Schmied (jsch)
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
26 #define NO_SHLWAPI_REG
27 #define NO_SHLWAPI_STREAM
29 #include "wine/debug.h"
31 WINE_DEFAULT_DEBUG_CHANNEL(shell
);
33 DECLSPEC_HIDDEN HINSTANCE shlwapi_hInstance
= 0;
34 DECLSPEC_HIDDEN DWORD SHLWAPI_ThreadRef_index
= TLS_OUT_OF_INDEXES
;
36 /*************************************************************************
39 * The Shell Light-Weight Api dll provides a large number of utility functions
40 * which are commonly required by Win32 programs. Originally distributed with
41 * Internet Explorer as a free download, it became a core part of Windows when
42 * Internet Explorer was 'integrated' into the O/S with the release of Win98.
44 * All functions exported by ordinal are undocumented by MS. The vast majority
45 * of these are wrappers for Unicode functions that may not exist on early 16
46 * bit platforms. The remainder perform various small tasks and presumably were
47 * added to facilitate code reuse amongst the MS developers.
50 /*************************************************************************
54 * calling oleinitialize here breaks sone apps.
56 BOOL WINAPI
DllMain(HINSTANCE hinstDLL
, DWORD fdwReason
, LPVOID fImpLoad
)
58 TRACE("%p 0x%x %p\n", hinstDLL
, fdwReason
, fImpLoad
);
61 case DLL_PROCESS_ATTACH
:
62 DisableThreadLibraryCalls(hinstDLL
);
63 shlwapi_hInstance
= hinstDLL
;
64 SHLWAPI_ThreadRef_index
= TlsAlloc();
66 case DLL_PROCESS_DETACH
:
67 if (SHLWAPI_ThreadRef_index
!= TLS_OUT_OF_INDEXES
) TlsFree(SHLWAPI_ThreadRef_index
);
73 /***********************************************************************
74 * DllGetVersion [SHLWAPI.@]
76 * Retrieve "shlwapi.dll" version information.
79 * pdvi [O] pointer to version information structure.
82 * Success: S_OK. pdvi is updated with the version information
83 * Failure: E_INVALIDARG, if pdvi->cbSize is not set correctly.
86 * You may pass either a DLLVERSIONINFO of DLLVERSIONINFO2 structure
87 * as pdvi, provided that the size is set correctly.
88 * Returns version as shlwapi.dll from IE5.01.
90 HRESULT WINAPI
DllGetVersion (DLLVERSIONINFO
*pdvi
)
92 DLLVERSIONINFO2
*pdvi2
= (DLLVERSIONINFO2
*)pdvi
;
96 switch (pdvi2
->info1
.cbSize
)
98 case sizeof(DLLVERSIONINFO2
):
100 pdvi2
->ullVersion
= MAKEDLLVERULL(6, 0, 2800, 1612);
102 case sizeof(DLLVERSIONINFO
):
103 pdvi2
->info1
.dwMajorVersion
= 6;
104 pdvi2
->info1
.dwMinorVersion
= 0;
105 pdvi2
->info1
.dwBuildNumber
= 2800;
106 pdvi2
->info1
.dwPlatformID
= DLLVER_PLATFORM_WINDOWS
;
110 WARN("pdvi->cbSize = %d, unhandled\n", pdvi2
->info1
.cbSize
);