source: trunk/src/shlwapi/shlwapi_main.c@ 10367

Last change on this file since 10367 was 8584, checked in by sandervl, 23 years ago

resynced with latest Wine

File size: 2.9 KB
Line 
1/*
2 * SHLWAPI initialisation
3 *
4 * Copyright 1998 Marcus Meissner
5 * Copyright 1998 Juergen Schmied (jsch)
6 *
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.
11 *
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.
16 *
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 */
21
22#include "winbase.h"
23#include "winerror.h"
24#include "winreg.h"
25#include "wine/debug.h"
26#define NO_SHLWAPI_STREAM
27#include "shlwapi.h"
28
29WINE_DEFAULT_DEBUG_CHANNEL(shell);
30
31HINSTANCE shlwapi_hInstance = 0;
32HMODULE SHLWAPI_hshell32 = 0;
33HMODULE SHLWAPI_hwinmm = 0;
34HMODULE SHLWAPI_hcomdlg32 = 0;
35HMODULE SHLWAPI_hmpr = 0;
36HMODULE SHLWAPI_hmlang = 0;
37HMODULE SHLWAPI_hversion = 0;
38
39DWORD SHLWAPI_ThreadRef_index = -1;
40
41/*************************************************************************
42 * SHLWAPI LibMain
43 *
44 * NOTES
45 * calling oleinitialize here breaks sone apps.
46 */
47BOOL WINAPI SHLWAPI_LibMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID fImpLoad)
48{
49 TRACE("0x%x 0x%lx %p\n", hinstDLL, fdwReason, fImpLoad);
50 switch (fdwReason)
51 {
52 case DLL_PROCESS_ATTACH:
53 shlwapi_hInstance = hinstDLL;
54 SHLWAPI_ThreadRef_index = TlsAlloc();
55 break;
56 case DLL_PROCESS_DETACH:
57 if (SHLWAPI_hshell32) FreeLibrary(SHLWAPI_hshell32);
58 if (SHLWAPI_hwinmm) FreeLibrary(SHLWAPI_hwinmm);
59 if (SHLWAPI_hcomdlg32) FreeLibrary(SHLWAPI_hcomdlg32);
60 if (SHLWAPI_hmpr) FreeLibrary(SHLWAPI_hmpr);
61 if (SHLWAPI_hmlang) FreeLibrary(SHLWAPI_hmlang);
62 if (SHLWAPI_hversion) FreeLibrary(SHLWAPI_hversion);
63 if (SHLWAPI_ThreadRef_index >= 0) TlsFree(SHLWAPI_ThreadRef_index);
64 break;
65 }
66 return TRUE;
67}
68
69/***********************************************************************
70 * DllGetVersion [SHLWAPI.@]
71 *
72 * Retrieves version information of the 'SHLWAPI.DLL'
73 *
74 * PARAMS
75 * pdvi [O] pointer to version information structure.
76 *
77 * RETURNS
78 * Success: S_OK
79 * Failure: E_INVALIDARG
80 *
81 * NOTES
82 * Returns version of a SHLWAPI.dll from IE5.01.
83 */
84
85HRESULT WINAPI SHLWAPI_DllGetVersion (DLLVERSIONINFO *pdvi)
86{
87 if (pdvi->cbSize != sizeof(DLLVERSIONINFO))
88 {
89 WARN("wrong DLLVERSIONINFO size from app\n");
90 return E_INVALIDARG;
91 }
92
93 pdvi->dwMajorVersion = 5;
94 pdvi->dwMinorVersion = 0;
95 pdvi->dwBuildNumber = 2314;
96 pdvi->dwPlatformID = 1000;
97
98 TRACE("%lu.%lu.%lu.%lu\n",
99 pdvi->dwMajorVersion, pdvi->dwMinorVersion,
100 pdvi->dwBuildNumber, pdvi->dwPlatformID);
101
102 return S_OK;
103}
Note: See TracBrowser for help on using the repository browser.