[SXS] Sync with Wine Staging 4.18. CORE-16441
[reactos.git] / dll / win32 / sxs / sxs.c
1 /*
2 * sxs main
3 *
4 * Copyright 2007 EA Durbin
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 <stdarg.h>
22
23 #include "windef.h"
24 #include "winbase.h"
25
26 #include "wine/heap.h"
27 #include "wine/debug.h"
28
29 WINE_DEFAULT_DEBUG_CHANNEL(sxs);
30
31 /***********************************************************************
32 * DllMain (SXS.@)
33 *
34 */
35 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved)
36 {
37 switch(fdwReason)
38 {
39 case DLL_WINE_PREATTACH:
40 return FALSE; /* prefer native version */
41 case DLL_PROCESS_ATTACH:
42 DisableThreadLibraryCalls( hinstDLL );
43 break;
44 }
45 return TRUE;
46 }
47
48 typedef struct _SXS_GUID_INFORMATION_CLR
49 {
50 DWORD cbSize;
51 DWORD dwFlags;
52 PCWSTR pcwszRuntimeVersion;
53 PCWSTR pcwszTypeName;
54 PCWSTR pcwszAssemblyIdentity;
55 } SXS_GUID_INFORMATION_CLR, *PSXS_GUID_INFORMATION_CLR;
56
57 #define SXS_GUID_INFORMATION_CLR_FLAG_IS_SURROGATE 0x1
58 #define SXS_GUID_INFORMATION_CLR_FLAG_IS_CLASS 0x2
59
60 #define SXS_LOOKUP_CLR_GUID_USE_ACTCTX 0x00000001
61 #define SXS_LOOKUP_CLR_GUID_FIND_SURROGATE 0x00010000
62 #define SXS_LOOKUP_CLR_GUID_FIND_CLR_CLASS 0x00020000
63
64 struct comclassredirect_data
65 {
66 ULONG size;
67 BYTE res;
68 BYTE miscmask;
69 BYTE res1[2];
70 DWORD model;
71 GUID clsid;
72 GUID alias;
73 GUID clsid2;
74 GUID tlbid;
75 ULONG name_len;
76 ULONG name_offset;
77 ULONG progid_len;
78 ULONG progid_offset;
79 ULONG clrdata_len;
80 ULONG clrdata_offset;
81 DWORD miscstatus;
82 DWORD miscstatuscontent;
83 DWORD miscstatusthumbnail;
84 DWORD miscstatusicon;
85 DWORD miscstatusdocprint;
86 };
87
88 struct clrclass_data
89 {
90 ULONG size;
91 DWORD res[2];
92 ULONG module_len;
93 ULONG module_offset;
94 ULONG name_len;
95 ULONG name_offset;
96 ULONG version_len;
97 ULONG version_offset;
98 DWORD res2[2];
99 };
100
101 BOOL WINAPI SxsLookupClrGuid(DWORD flags, GUID *clsid, HANDLE actctx, void *buffer, SIZE_T buffer_len,
102 SIZE_T *buffer_len_required)
103 {
104 ACTCTX_SECTION_KEYED_DATA guid_info = { sizeof(ACTCTX_SECTION_KEYED_DATA) };
105 ACTIVATION_CONTEXT_ASSEMBLY_DETAILED_INFORMATION *assembly_info;
106 SIZE_T bytes_assembly_info;
107 struct comclassredirect_data *redirect_data;
108 struct clrclass_data *class_data;
109 int len_version = 0, len_name, len_identity;
110 const void *ptr_name, *ptr_version, *ptr_identity;
111 SXS_GUID_INFORMATION_CLR *ret = buffer;
112 char *ret_strings;
113
114 TRACE("(%x, %s, %p, %p, %08lx, %p): stub\n", flags, wine_dbgstr_guid(clsid), actctx,
115 buffer, buffer_len, buffer_len_required);
116
117 if (flags & ~SXS_LOOKUP_CLR_GUID_FIND_CLR_CLASS)
118 FIXME("Ignored flags: %x\n", flags & ~SXS_LOOKUP_CLR_GUID_FIND_CLR_CLASS);
119
120 if (!FindActCtxSectionGuid(FIND_ACTCTX_SECTION_KEY_RETURN_HACTCTX, 0,
121 ACTIVATION_CONTEXT_SECTION_COM_SERVER_REDIRECTION, clsid, &guid_info))
122 {
123 SetLastError(ERROR_NOT_FOUND);
124 return FALSE;
125 }
126
127 QueryActCtxW(0, guid_info.hActCtx, &guid_info.ulAssemblyRosterIndex,
128 AssemblyDetailedInformationInActivationContext, NULL, 0, &bytes_assembly_info);
129 if (GetLastError() != ERROR_INSUFFICIENT_BUFFER)
130 {
131 ReleaseActCtx(guid_info.hActCtx);
132 return FALSE;
133 }
134 assembly_info = heap_alloc(bytes_assembly_info);
135 if(!QueryActCtxW(0, guid_info.hActCtx, &guid_info.ulAssemblyRosterIndex,
136 AssemblyDetailedInformationInActivationContext, assembly_info,
137 bytes_assembly_info, &bytes_assembly_info))
138 {
139 heap_free(assembly_info);
140 ReleaseActCtx(guid_info.hActCtx);
141 return FALSE;
142 }
143
144 redirect_data = guid_info.lpData;
145 class_data = (void *)((char*)redirect_data + redirect_data->clrdata_offset);
146
147 ptr_identity = assembly_info->lpAssemblyEncodedAssemblyIdentity;
148 ptr_name = (char *)class_data + class_data->name_offset;
149 ptr_version = (char *)class_data + class_data->version_offset;
150
151 len_identity = assembly_info->ulEncodedAssemblyIdentityLength + sizeof(WCHAR);
152 len_name = class_data->name_len + sizeof(WCHAR);
153 if (class_data->version_len > 0)
154 len_version = class_data->version_len + sizeof(WCHAR);
155
156 *buffer_len_required = sizeof(SXS_GUID_INFORMATION_CLR) + len_identity + len_version + len_name;
157 if (!buffer || buffer_len < *buffer_len_required)
158 {
159 SetLastError(ERROR_INSUFFICIENT_BUFFER);
160 heap_free(assembly_info);
161 ReleaseActCtx(guid_info.hActCtx);
162 return FALSE;
163 }
164
165 ret->cbSize = sizeof(SXS_GUID_INFORMATION_CLR);
166 ret->dwFlags = SXS_GUID_INFORMATION_CLR_FLAG_IS_CLASS;
167
168 /* Copy strings into buffer */
169 ret_strings = (char *)ret + sizeof(SXS_GUID_INFORMATION_CLR);
170
171 memcpy(ret_strings, ptr_identity, len_identity);
172 ret->pcwszAssemblyIdentity = (WCHAR *)ret_strings;
173 ret_strings += len_identity;
174
175 memcpy(ret_strings, ptr_name, len_name);
176 ret->pcwszTypeName = (WCHAR *)ret_strings;
177 ret_strings += len_name;
178
179 if (len_version > 0)
180 {
181 memcpy(ret_strings, ptr_version, len_version);
182 ret->pcwszRuntimeVersion = (WCHAR *)ret_strings;
183 }
184 else
185 ret->pcwszRuntimeVersion = NULL;
186
187 SetLastError(0);
188
189 ReleaseActCtx(guid_info.hActCtx);
190 heap_free(assembly_info);
191 return TRUE;
192 }