dlls/crypt32/main.c

   1 /*
   2  * Copyright 2002 Mike McCormack for CodeWeavers
   3  * Copyright 2005 Juan Lang
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19
  20 #include <stdarg.h>
  21 #include <stdlib.h>
  22 #include <stdio.h>
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "winternl.h"
  27 #include "wincrypt.h"
  28 #include "winreg.h"
  29 #include "winuser.h"
  30 #include "i_cryptasn1tls.h"
  31 #include "crypt32_private.h"
  32 #include "wine/debug.h"
  33
  34 WINE_DEFAULT_DEBUG_CHANNEL(crypt);
  35
  36 static HCRYPTPROV hDefProv;
  37 HINSTANCE hInstance;
  38
  39 static CRITICAL_SECTION prov_param_cs;
  40 static CRITICAL_SECTION_DEBUG prov_param_cs_debug =
  41 {
  42     0, 0, &prov_param_cs,
  43     { &prov_param_cs_debug.ProcessLocksList,
  44     &prov_param_cs_debug.ProcessLocksList },
  45     0, 0, { (DWORD_PTR)(__FILE__ ": prov_param_cs") }
  46 };
  47 static CRITICAL_SECTION prov_param_cs = { &prov_param_cs_debug, -1, 0, 0, 0, 0 };
  48
  49 BOOL WINAPI DllMain(HINSTANCE hInst, DWORD reason, PVOID pvReserved)
  50 {
  51     switch (reason)
  52     {
  53         case DLL_PROCESS_ATTACH:
  54             hInstance = hInst;
  55             DisableThreadLibraryCalls(hInst);
  56             init_empty_store();
  57             crypt_oid_init();
  58             if (__wine_init_unix_call())
  59                 return FALSE;
  60             CRYPT32_CALL( process_attach, NULL );
  61             break;
  62         case DLL_PROCESS_DETACH:
  63             if (pvReserved) break;
  64             crypt_oid_free();
  65             crypt_sip_free();
  66             default_chain_engine_free();
  67             if (hDefProv) CryptReleaseContext(hDefProv, 0);
  68             CRYPT32_CALL( process_detach, NULL );
  69             break;
  70     }
  71     return TRUE;
  72 }
  73
  74 static HCRYPTPROV CRYPT_GetDefaultProvider(void)
  75 {
  76     if (!hDefProv)
  77     {
  78         HCRYPTPROV prov;
  79
  80         if (!CryptAcquireContextW(&prov, NULL, MS_ENH_RSA_AES_PROV_W,
  81          PROV_RSA_AES, CRYPT_VERIFYCONTEXT))
  82             return hDefProv;
  83         InterlockedCompareExchangePointer((PVOID *)&hDefProv, (PVOID)prov,
  84          NULL);
  85         if (hDefProv != prov)
  86             CryptReleaseContext(prov, 0);
  87     }
  88     return hDefProv;
  89 }
  90
  91 typedef void * HLRUCACHE;
  92
  93 /* this function is called by Internet Explorer when it is about to verify a
  94  * downloaded component.  The first parameter appears to be a pointer to an
  95  * unknown type, native fails unless it points to a buffer of at least 20 bytes.
  96  * The second parameter appears to be an out parameter, whatever it's set to is
  97  * passed (by cryptnet.dll) to I_CryptFlushLruCache.
  98  */
  99 BOOL WINAPI I_CryptCreateLruCache(void *unknown, HLRUCACHE *out)
 100 {
 101     FIXME("(%p, %p): stub!\n", unknown, out);
 102     *out = (void *)0xbaadf00d;
 103     return TRUE;
 104 }
 105
 106 BOOL WINAPI I_CryptFindLruEntry(DWORD unk0, DWORD unk1)
 107 {
 108     FIXME("(%08lx, %08lx): stub!\n", unk0, unk1);
 109     return FALSE;
 110 }
 111
 112 BOOL WINAPI I_CryptFindLruEntryData(DWORD unk0, DWORD unk1, DWORD unk2)
 113 {
 114     FIXME("(%08lx, %08lx, %08lx): stub!\n", unk0, unk1, unk2);
 115     return FALSE;
 116 }
 117
 118 BOOL WINAPI I_CryptCreateLruEntry(HLRUCACHE h, DWORD unk0, DWORD unk1)
 119 {
 120     FIXME("(%p, %08lx, %08lx): stub!\n", h, unk0, unk1);
 121     return FALSE;
 122 }
 123
 124 DWORD WINAPI I_CryptFlushLruCache(HLRUCACHE h, DWORD unk0, DWORD unk1)
 125 {
 126     FIXME("(%p, %08lx, %08lx): stub!\n", h, unk0, unk1);
 127     return 0;
 128 }
 129
 130 HLRUCACHE WINAPI I_CryptFreeLruCache(HLRUCACHE h, DWORD unk0, DWORD unk1)
 131 {
 132     FIXME("(%p, %08lx, %08lx): stub!\n", h, unk0, unk1);
 133     return h;
 134 }
 135
 136 LPVOID WINAPI CryptMemAlloc(ULONG cbSize)
 137 {
 138     return malloc(cbSize);
 139 }
 140
 141 LPVOID WINAPI CryptMemRealloc(LPVOID pv, ULONG cbSize)
 142 {
 143     return realloc(pv, cbSize);
 144 }
 145
 146 VOID WINAPI CryptMemFree(LPVOID pv)
 147 {
 148     free(pv);
 149 }
 150
 151 DWORD WINAPI I_CryptAllocTls(void)
 152 {
 153     return TlsAlloc();
 154 }
 155
 156 LPVOID WINAPI I_CryptDetachTls(DWORD dwTlsIndex)
 157 {
 158     LPVOID ret;
 159
 160     ret = TlsGetValue(dwTlsIndex);
 161     TlsSetValue(dwTlsIndex, NULL);
 162     return ret;
 163 }
 164
 165 LPVOID WINAPI I_CryptGetTls(DWORD dwTlsIndex)
 166 {
 167     return TlsGetValue(dwTlsIndex);
 168 }
 169
 170 BOOL WINAPI I_CryptSetTls(DWORD dwTlsIndex, LPVOID lpTlsValue)
 171 {
 172     return TlsSetValue(dwTlsIndex, lpTlsValue);
 173 }
 174
 175 BOOL WINAPI I_CryptFreeTls(DWORD dwTlsIndex, DWORD unknown)
 176 {
 177     BOOL ret;
 178
 179     TRACE("(%ld, %ld)\n", dwTlsIndex, unknown);
 180
 181     ret = TlsFree(dwTlsIndex);
 182     if (!ret) SetLastError( E_INVALIDARG );
 183     return ret;
 184 }
 185
 186 BOOL WINAPI I_CryptGetOssGlobal(DWORD x)
 187 {
 188     FIXME("%08lx\n", x);
 189     return FALSE;
 190 }
 191
 192 static BOOL is_supported_algid(HCRYPTPROV prov, ALG_ID algid)
 193 {
 194     PROV_ENUMALGS prov_algs;
 195     DWORD size = sizeof(prov_algs);
 196     BOOL ret = FALSE;
 197
 198     /* This enumeration is not thread safe */
 199     EnterCriticalSection(&prov_param_cs);
 200     if (CryptGetProvParam(prov, PP_ENUMALGS, (BYTE *)&prov_algs, &size, CRYPT_FIRST))
 201     {
 202         do
 203         {
 204             if (prov_algs.aiAlgid == algid)
 205             {
 206                 ret = TRUE;
 207                 break;
 208             }
 209         } while (CryptGetProvParam(prov, PP_ENUMALGS, (BYTE *)&prov_algs, &size, CRYPT_NEXT));
 210     }
 211     LeaveCriticalSection(&prov_param_cs);
 212     return ret;
 213 }
 214
 215 HCRYPTPROV WINAPI DECLSPEC_HOTPATCH I_CryptGetDefaultCryptProv(ALG_ID algid)
 216 {
 217     HCRYPTPROV prov, defprov;
 218
 219     TRACE("(%08x)\n", algid);
 220
 221     defprov = CRYPT_GetDefaultProvider();
 222
 223     if (algid && !is_supported_algid(defprov, algid))
 224     {
 225         DWORD i = 0, type, size;
 226
 227         while (CryptEnumProvidersW(i, NULL, 0, &type, NULL, &size))
 228         {
 229             WCHAR *name = CryptMemAlloc(size);
 230             if (name)
 231             {
 232                 if (CryptEnumProvidersW(i, NULL, 0, &type, name, &size))
 233                 {
 234                     if (CryptAcquireContextW(&prov, NULL, name, type, CRYPT_VERIFYCONTEXT))
 235                     {
 236                         if (is_supported_algid(prov, algid))
 237                         {
 238                             CryptMemFree(name);
 239                             return prov;
 240                         }
 241                         CryptReleaseContext(prov, 0);
 242                     }
 243                 }
 244                 CryptMemFree(name);
 245             }
 246             i++;
 247         }
 248
 249         SetLastError(E_INVALIDARG);
 250         return 0;
 251     }
 252
 253     CryptContextAddRef(defprov, NULL, 0);
 254     return defprov;
 255 }
 256
 257 BOOL WINAPI I_CryptReadTrustedPublisherDWORDValueFromRegistry(LPCWSTR name,
 258  DWORD *value)
 259 {
 260     HKEY key;
 261     LONG rc;
 262     BOOL ret = FALSE;
 263
 264     TRACE("(%s, %p)\n", debugstr_w(name), value);
 265
 266     *value = 0;
 267     rc = RegCreateKeyW(HKEY_LOCAL_MACHINE, L"Software\\Policies\\Microsoft\\SystemCertificates\\TrustedPublisher\\Safer", &key);
 268     if (rc == ERROR_SUCCESS)
 269     {
 270         DWORD size = sizeof(DWORD);
 271
 272         if (!RegQueryValueExW(key, name, NULL, NULL, (LPBYTE)value, &size))
 273             ret = TRUE;
 274         RegCloseKey(key);
 275     }
 276     return ret;
 277 }
 278
 279 DWORD WINAPI I_CryptInstallOssGlobal(DWORD x, DWORD y, DWORD z)
 280 {
 281     static int ret = 8;
 282     ret++;
 283     FIXME("%08lx %08lx %08lx, return value %d\n", x, y, z,ret);
 284     return ret;
 285 }
 286
 287 BOOL WINAPI I_CryptInstallAsn1Module(ASN1module_t x, DWORD y, void* z)
 288 {
 289     FIXME("(%p %08lx %p): stub\n", x, y, z);
 290     return TRUE;
 291 }
 292
 293 BOOL WINAPI I_CryptUninstallAsn1Module(HCRYPTASN1MODULE x)
 294 {
 295     FIXME("(%08lx): stub\n", x);
 296     return TRUE;
 297 }
 298
 299 ASN1decoding_t WINAPI I_CryptGetAsn1Decoder(HCRYPTASN1MODULE x)
 300 {
 301     FIXME("(%08lx): stub\n", x);
 302     return NULL;
 303 }
 304
 305 ASN1encoding_t WINAPI I_CryptGetAsn1Encoder(HCRYPTASN1MODULE x)
 306 {
 307     FIXME("(%08lx): stub\n", x);
 308     return NULL;
 309 }
 310
 311 BOOL WINAPI CryptProtectMemory(void *data, DWORD len, DWORD flags)
 312 {
 313     static int fixme_once;
 314     if (!fixme_once++) FIXME("(%p %lu %08lx): stub\n", data, len, flags);
 315     return TRUE;
 316 }
 317
 318 BOOL WINAPI CryptUnprotectMemory(void *data, DWORD len, DWORD flags)
 319 {
 320     static int fixme_once;
 321     if (!fixme_once++) FIXME("(%p %lu %08lx): stub\n", data, len, flags);
 322     return TRUE;
 323 }