git.oblomov.eu Git - wine/blob - 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18  */
  19
  20 #include "config.h"
  21 #include <stdarg.h>
  22 #include <stdio.h>
  23
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "wincrypt.h"
  27 #include "winreg.h"
  28 #include "winnls.h"
  29 #include "mssip.h"
  30 #include "crypt32_private.h"
  31 #include "wine/debug.h"
  32
  33 WINE_DEFAULT_DEBUG_CHANNEL(crypt);
  34
  35 static HCRYPTPROV hDefProv;
  36
  37 BOOL WINAPI DllMain(HINSTANCE hInstance, DWORD fdwReason, PVOID pvReserved)
  38 {
  39     switch (fdwReason)
  40     {
  41         case DLL_PROCESS_DETACH:
  42             if (hDefProv) CryptReleaseContext(hDefProv, 0);
  43             break;
  44     }
  45     return TRUE;
  46 }
  47
  48 HCRYPTPROV CRYPT_GetDefaultProvider(void)
  49 {
  50     if (!hDefProv)
  51         CryptAcquireContextW(&hDefProv, NULL, MS_ENHANCED_PROV_W,
  52          PROV_RSA_FULL, CRYPT_VERIFYCONTEXT);
  53     return hDefProv;
  54 }
  55
  56 typedef void * HLRUCACHE;
  57
  58 /* this function is called by Internet Explorer when it is about to verify a
  59  * downloaded component.  The first parameter appears to be a pointer to an
  60  * unknown type, native fails unless it points to a buffer of at least 20 bytes.
  61  * The second parameter appears to be an out parameter, whatever it's set to is
  62  * passed (by cryptnet.dll) to I_CryptFlushLruCache.
  63  */
  64 BOOL WINAPI I_CryptCreateLruCache(void *unknown, HLRUCACHE *out)
  65 {
  66     FIXME("(%p, %p): stub!\n", unknown, out);
  67     *out = (void *)0xbaadf00d;
  68     return TRUE;
  69 }
  70
  71 BOOL WINAPI I_CryptFindLruEntryData(DWORD unk0, DWORD unk1, DWORD unk2)
  72 {
  73     FIXME("(%08lx, %08lx, %08lx): stub!\n", unk0, unk1, unk2);
  74     return FALSE;
  75 }
  76
  77 DWORD WINAPI I_CryptFlushLruCache(HLRUCACHE h, DWORD unk0, DWORD unk1)
  78 {
  79     FIXME("(%p, %08lx, %08lx): stub!\n", h, unk0, unk1);
  80     return 0;
  81 }
  82
  83 HLRUCACHE WINAPI I_CryptFreeLruCache(HLRUCACHE h, DWORD unk0, DWORD unk1)
  84 {
  85     FIXME("(%p, %08lx, %08lx): stub!\n", h, unk0, unk1);
  86     return h;
  87 }
  88
  89 BOOL WINAPI CryptSIPRemoveProvider(GUID *pgProv)
  90 {
  91     FIXME("stub!\n");
  92     return FALSE;
  93 }
  94
  95 /* convert a guid to a wide character string */
  96 static void CRYPT_guid2wstr( LPGUID guid, LPWSTR wstr )
  97 {
  98     char str[40];
  99
 100     sprintf(str, "{%08lX-%04X-%04X-%02X%02X-%02X%02X%02X%02X%02X%02X}",
 101            guid->Data1, guid->Data2, guid->Data3,
 102            guid->Data4[0], guid->Data4[1], guid->Data4[2], guid->Data4[3],
 103            guid->Data4[4], guid->Data4[5], guid->Data4[6], guid->Data4[7] );
 104     MultiByteToWideChar( CP_ACP, 0, str, -1, wstr, 40 );
 105 }
 106
 107 /*
 108  * Helper for CryptSIPAddProvider
 109  *
 110  * Add a registry key containing a dll name and function under
 111  *  "Software\\Microsoft\\Cryptography\\OID\\EncodingType 0\\<func>\\<guid>"
 112  */
 113 static LONG CRYPT_SIPWriteFunction( LPGUID guid, LPCWSTR szKey,
 114               LPCWSTR szDll, LPCWSTR szFunction )
 115 {
 116     static const WCHAR szOID[] = {
 117         'S','o','f','t','w','a','r','e','\\',
 118         'M','i','c','r','o','s','o','f','t','\\',
 119         'C','r','y','p','t','o','g','r','a','p','h','y','\\',
 120         'O','I','D','\\',
 121         'E','n','c','o','d','i','n','g','T','y','p','e',' ','0','\\',
 122         'C','r','y','p','t','S','I','P','D','l','l', 0 };
 123     static const WCHAR szBackSlash[] = { '\\', 0 };
 124     static const WCHAR szDllName[] = { 'D','l','l',0 };
 125     static const WCHAR szFuncName[] = { 'F','u','n','c','N','a','m','e',0 };
 126     WCHAR szFullKey[ 0x100 ];
 127     LONG r;
 128     HKEY hKey;
 129
 130     if( !szFunction )
 131          return ERROR_SUCCESS;
 132
 133     /* max length of szFullKey depends on our code only, so we won't overrun */
 134     lstrcpyW( szFullKey, szOID );
 135     lstrcatW( szFullKey, szKey );
 136     lstrcatW( szFullKey, szBackSlash );
 137     CRYPT_guid2wstr( guid, &szFullKey[ lstrlenW( szFullKey ) ] );
 138     lstrcatW( szFullKey, szBackSlash );
 139
 140     TRACE("key is %s\n", debugstr_w( szFullKey ) );
 141
 142     r = RegCreateKeyW( HKEY_LOCAL_MACHINE, szFullKey, &hKey );
 143     if( r != ERROR_SUCCESS )
 144         return r;
 145
 146     /* write the values */
 147     RegSetValueExW( hKey, szFuncName, 0, REG_SZ, (const BYTE*) szFunction,
 148                     ( lstrlenW( szFunction ) + 1 ) * sizeof (WCHAR) );
 149     RegSetValueExW( hKey, szDllName, 0, REG_SZ, (const BYTE*) szDll,
 150                     ( lstrlenW( szDll ) + 1) * sizeof (WCHAR) );
 151
 152     RegCloseKey( hKey );
 153
 154     return ERROR_SUCCESS;
 155 }
 156
 157 BOOL WINAPI CryptSIPAddProvider(SIP_ADD_NEWPROVIDER *psNewProv)
 158 {
 159     static const WCHAR szCreate[] = {
 160        'C','r','e','a','t','e',
 161        'I','n','d','i','r','e','c','t','D','a','t','a',0};
 162     static const WCHAR szGetSigned[] = {
 163        'G','e','t','S','i','g','n','e','d','D','a','t','a','M','s','g',0};
 164     static const WCHAR szIsMyFile[] = {
 165        'I','s','M','y','F','i','l','e','T','y','p','e', 0 };
 166     static const WCHAR szPutSigned[] = {
 167        'P','u','t','S','i','g','n','e','d','D','a','t','a','M','s','g',0};
 168     static const WCHAR szRemoveSigned[] = {
 169        'R','e','m','o','v','e',
 170        'S','i','g','n','e','d','D','a','t','a','M','s','g',0};
 171     static const WCHAR szVerify[] = {
 172        'V','e','r','i','f','y',
 173        'I','n','d','i','r','e','c','t','D','a','t','a',0};
 174
 175     TRACE("%p\n", psNewProv);
 176
 177     if( !psNewProv )
 178         return FALSE;
 179
 180     TRACE("%s %s %s %s\n",
 181           debugstr_guid( psNewProv->pgSubject ),
 182           debugstr_w( psNewProv->pwszDLLFileName ),
 183           debugstr_w( psNewProv->pwszMagicNumber ),
 184           debugstr_w( psNewProv->pwszIsFunctionName ) );
 185
 186 #define CRYPT_SIPADDPROV( key, field ) \
 187     CRYPT_SIPWriteFunction( psNewProv->pgSubject, key, \
 188            psNewProv->pwszDLLFileName, psNewProv->field)
 189
 190     CRYPT_SIPADDPROV( szGetSigned, pwszGetFuncName );
 191     CRYPT_SIPADDPROV( szPutSigned, pwszPutFuncName );
 192     CRYPT_SIPADDPROV( szCreate, pwszCreateFuncName );
 193     CRYPT_SIPADDPROV( szVerify, pwszVerifyFuncName );
 194     CRYPT_SIPADDPROV( szRemoveSigned, pwszRemoveFuncName );
 195     CRYPT_SIPADDPROV( szIsMyFile, pwszIsFunctionNameFmt2 );
 196
 197 #undef CRYPT_SIPADDPROV
 198
 199     return TRUE;
 200 }
 201
 202 BOOL WINAPI CryptSIPRetrieveSubjectGuid
 203       (LPCWSTR FileName, HANDLE hFileIn, GUID *pgSubject)
 204 {
 205     FIXME("stub!\n");
 206     return FALSE;
 207 }
 208
 209 BOOL WINAPI CryptSIPLoad
 210        (const GUID *pgSubject, DWORD dwFlags, SIP_DISPATCH_INFO *pSipDispatch)
 211 {
 212     FIXME("stub!\n");
 213     return FALSE;
 214 }
 215
 216 BOOL WINAPI CryptRegisterDefaultOIDFunction(DWORD dwEncodingType,
 217                                      LPCSTR pszFuncName, DWORD dwIndex,
 218                                      LPCWSTR pwszDll)
 219 {
 220     FIXME("(%lx,%s,%lx,%s) stub!\n", dwEncodingType, pszFuncName, dwIndex,
 221           debugstr_w(pwszDll));
 222     return FALSE;
 223 }
 224
 225 BOOL WINAPI CryptInstallOIDFunctionAddress(HMODULE hModule,
 226  DWORD dwEncodingType, LPCSTR pszFuncName, DWORD cFuncEntry,
 227  const CRYPT_OID_FUNC_ENTRY rgFuncEntry[], DWORD dwFlags)
 228 {
 229     FIXME("(%p, %ld, %s, %ld, %p, %08lx): stub\n", hModule, dwEncodingType,
 230      debugstr_a(pszFuncName), cFuncEntry, rgFuncEntry, dwFlags);
 231     return TRUE;
 232 }
 233
 234 BOOL WINAPI CryptGetOIDFunctionAddress(HCRYPTOIDFUNCSET hFuncSet,
 235  DWORD dwEncodingType, LPCSTR pszOID, DWORD dwFlags, void **ppvFuncAddr,
 236  HCRYPTOIDFUNCADDR *phFuncAddr)
 237 {
 238     FIXME("(%p, %ld, %s, %08lx, %p, %p): stub\n", hFuncSet, dwEncodingType,
 239      debugstr_a(pszOID), dwFlags, ppvFuncAddr, phFuncAddr);
 240     return FALSE;
 241 }
 242
 243 BOOL WINAPI CryptGetDefaultOIDDllList(HCRYPTOIDFUNCSET hFuncSet,
 244  DWORD dwEncodingType, LPWSTR pwszDllList, DWORD *pcchDllList)
 245 {
 246     FIXME("(%p, %ld, %p, %p): stub\n", hFuncSet, dwEncodingType, pwszDllList,
 247      pcchDllList);
 248
 249     if (*pcchDllList)
 250         *pwszDllList = '\0';
 251     *pcchDllList = 1;
 252
 253     return TRUE;
 254 }
 255
 256 struct OIDToAlgID
 257 {
 258     LPCSTR oid;
 259     DWORD algID;
 260 };
 261
 262 static const struct OIDToAlgID oidToAlgID[] = {
 263  { szOID_RSA_RSA, CALG_RSA_KEYX },
 264  { szOID_RSA_MD2RSA, CALG_MD2 },
 265  { szOID_RSA_MD4RSA, CALG_MD4 },
 266  { szOID_RSA_MD5RSA, CALG_MD5 },
 267  { szOID_RSA_SHA1RSA, CALG_SHA },
 268  { szOID_RSA_DH, CALG_DH_SF },
 269  { szOID_RSA_SMIMEalgESDH, CALG_DH_EPHEM },
 270  { szOID_RSA_SMIMEalgCMS3DESwrap, CALG_3DES },
 271  { szOID_RSA_SMIMEalgCMSRC2wrap, CALG_RC2 },
 272  { szOID_RSA_MD2, CALG_MD2 },
 273  { szOID_RSA_MD4, CALG_MD4 },
 274  { szOID_RSA_MD5, CALG_MD5 },
 275  { szOID_RSA_RC2CBC, CALG_RC2 },
 276  { szOID_RSA_RC4, CALG_RC4 },
 277  { szOID_RSA_DES_EDE3_CBC, CALG_3DES },
 278  { szOID_ANSI_X942_DH, CALG_DH_SF },
 279  { szOID_X957_DSA, CALG_DSS_SIGN },
 280  { szOID_X957_SHA1DSA, CALG_SHA },
 281  { szOID_OIWSEC_md4RSA, CALG_MD4 },
 282  { szOID_OIWSEC_md5RSA, CALG_MD5 },
 283  { szOID_OIWSEC_md4RSA2, CALG_MD4 },
 284  { szOID_OIWSEC_desCBC, CALG_DES },
 285  { szOID_OIWSEC_dsa, CALG_DSS_SIGN },
 286  { szOID_OIWSEC_shaDSA, CALG_SHA },
 287  { szOID_OIWSEC_shaRSA, CALG_SHA },
 288  { szOID_OIWSEC_sha, CALG_SHA },
 289  { szOID_OIWSEC_rsaXchg, CALG_RSA_KEYX },
 290  { szOID_OIWSEC_sha1, CALG_SHA },
 291  { szOID_OIWSEC_dsaSHA1, CALG_SHA },
 292  { szOID_OIWSEC_sha1RSASign, CALG_SHA },
 293  { szOID_OIWDIR_md2RSA, CALG_MD2 },
 294  { szOID_INFOSEC_mosaicUpdatedSig, CALG_SHA },
 295  { szOID_INFOSEC_mosaicKMandUpdSig, CALG_DSS_SIGN },
 296 };
 297
 298 LPCSTR WINAPI CertAlgIdToOID(DWORD dwAlgId)
 299 {
 300     switch (dwAlgId)
 301     {
 302     case CALG_RSA_KEYX:
 303         return szOID_RSA_RSA;
 304     case CALG_DH_EPHEM:
 305         return szOID_RSA_SMIMEalgESDH;
 306     case CALG_MD2:
 307         return szOID_RSA_MD2;
 308     case CALG_MD4:
 309         return szOID_RSA_MD4;
 310     case CALG_MD5:
 311         return szOID_RSA_MD5;
 312     case CALG_RC2:
 313         return szOID_RSA_RC2CBC;
 314     case CALG_RC4:
 315         return szOID_RSA_RC4;
 316     case CALG_3DES:
 317         return szOID_RSA_DES_EDE3_CBC;
 318     case CALG_DH_SF:
 319         return szOID_ANSI_X942_DH;
 320     case CALG_DSS_SIGN:
 321         return szOID_X957_DSA;
 322     case CALG_DES:
 323         return szOID_OIWSEC_desCBC;
 324     case CALG_SHA:
 325         return szOID_OIWSEC_sha1;
 326     default:
 327         return NULL;
 328     }
 329 }
 330
 331 DWORD WINAPI CertOIDToAlgId(LPCSTR pszObjId)
 332 {
 333     int i;
 334
 335     if (pszObjId)
 336     {
 337         for (i = 0; i < sizeof(oidToAlgID) / sizeof(oidToAlgID[0]); i++)
 338         {
 339             if (!strcmp(pszObjId, oidToAlgID[i].oid))
 340                 return oidToAlgID[i].algID;
 341         }
 342     }
 343     return 0;
 344 }
 345
 346 LPVOID WINAPI CryptMemAlloc(ULONG cbSize)
 347 {
 348     return HeapAlloc(GetProcessHeap(), 0, cbSize);
 349 }
 350
 351 LPVOID WINAPI CryptMemRealloc(LPVOID pv, ULONG cbSize)
 352 {
 353     return HeapReAlloc(GetProcessHeap(), 0, pv, cbSize);
 354 }
 355
 356 VOID WINAPI CryptMemFree(LPVOID pv)
 357 {
 358     HeapFree(GetProcessHeap(), 0, pv);
 359 }
 360
 361 DWORD WINAPI I_CryptAllocTls(void)
 362 {
 363     return TlsAlloc();
 364 }
 365
 366 LPVOID WINAPI I_CryptDetachTls(DWORD dwTlsIndex)
 367 {
 368     LPVOID ret;
 369
 370     ret = TlsGetValue(dwTlsIndex);
 371     TlsSetValue(dwTlsIndex, NULL);
 372     return ret;
 373 }
 374
 375 LPVOID WINAPI I_CryptGetTls(DWORD dwTlsIndex)
 376 {
 377     return TlsGetValue(dwTlsIndex);
 378 }
 379
 380 BOOL WINAPI I_CryptSetTls(DWORD dwTlsIndex, LPVOID lpTlsValue)
 381 {
 382     return TlsSetValue(dwTlsIndex, lpTlsValue);
 383 }
 384
 385 BOOL WINAPI I_CryptFreeTls(DWORD dwTlsIndex, DWORD unknown)
 386 {
 387     TRACE("(%ld, %ld)\n", dwTlsIndex, unknown);
 388     return TlsFree(dwTlsIndex);
 389 }