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
24 DECLSPEC_HIDDEN HINSTANCE shlwapi_hInstance
= 0;
25 DECLSPEC_HIDDEN DWORD SHLWAPI_ThreadRef_index
= TLS_OUT_OF_INDEXES
;
27 /*************************************************************************
30 * The Shell Light-Weight API dll provides a large number of utility functions
31 * which are commonly required by Win32 programs. Originally distributed with
32 * Internet Explorer as a free download, it became a core part of Windows when
33 * Internet Explorer was 'integrated' into the O/S with the release of Win98.
35 * All functions exported by ordinal are undocumented by MS. The vast majority
36 * of these are wrappers for Unicode functions that may not exist on early 16
37 * bit platforms. The remainder perform various small tasks and presumably were
38 * added to facilitate code reuse amongst the MS developers.
41 /*************************************************************************
45 * calling oleinitialize here breaks some apps.
47 BOOL WINAPI
DllMain(HINSTANCE hinstDLL
, DWORD fdwReason
, LPVOID fImpLoad
)
49 TRACE("%p 0x%x %p\n", hinstDLL
, fdwReason
, fImpLoad
);
52 case DLL_PROCESS_ATTACH
:
53 DisableThreadLibraryCalls(hinstDLL
);
54 shlwapi_hInstance
= hinstDLL
;
55 SHLWAPI_ThreadRef_index
= TlsAlloc();
57 case DLL_PROCESS_DETACH
:
59 if (SHLWAPI_ThreadRef_index
!= TLS_OUT_OF_INDEXES
) TlsFree(SHLWAPI_ThreadRef_index
);
65 /***********************************************************************
66 * DllGetVersion [SHLWAPI.@]
68 * Retrieve "shlwapi.dll" version information.
71 * pdvi [O] pointer to version information structure.
74 * Success: S_OK. pdvi is updated with the version information
75 * Failure: E_INVALIDARG, if pdvi->cbSize is not set correctly.
78 * You may pass either a DLLVERSIONINFO of DLLVERSIONINFO2 structure
79 * as pdvi, provided that the size is set correctly.
80 * Returns version as shlwapi.dll from IE5.01.
82 HRESULT WINAPI
DllGetVersion (DLLVERSIONINFO
*pdvi
)
84 DLLVERSIONINFO2
*pdvi2
= (DLLVERSIONINFO2
*)pdvi
;
88 switch (pdvi2
->info1
.cbSize
)
90 case sizeof(DLLVERSIONINFO2
):
92 pdvi2
->ullVersion
= MAKEDLLVERULL(6, 0, 2800, 1612);
94 case sizeof(DLLVERSIONINFO
):
95 pdvi2
->info1
.dwMajorVersion
= 6;
96 pdvi2
->info1
.dwMinorVersion
= 0;
97 pdvi2
->info1
.dwBuildNumber
= 2800;
98 pdvi2
->info1
.dwPlatformID
= DLLVER_PLATFORM_WINDOWS
;
102 WARN("pdvi->cbSize = %d, unhandled\n", pdvi2
->info1
.cbSize
);