1970 lines
59 KiB
C
1970 lines
59 KiB
C
/*
|
|
* Copyright 2002 Mike McCormack for CodeWeavers
|
|
* Copyright 2005 Juan Lang
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "wincrypt.h"
|
|
#include "winreg.h"
|
|
#include "snmp.h"
|
|
#include "wine/debug.h"
|
|
|
|
/* a few asn.1 tags we need */
|
|
#define ASN_SETOF (ASN_UNIVERSAL | ASN_PRIMITIVE | 0x11)
|
|
#define ASN_NUMERICSTRING (ASN_UNIVERSAL | ASN_PRIMITIVE | 0x12)
|
|
#define ASN_PRINTABLESTRING (ASN_UNIVERSAL | ASN_PRIMITIVE | 0x13)
|
|
#define ASN_IA5STRING (ASN_UNIVERSAL | ASN_PRIMITIVE | 0x16)
|
|
#define ASN_UTCTIME (ASN_UNIVERSAL | ASN_PRIMITIVE | 0x17)
|
|
#define ASN_GENERALTIME (ASN_UNIVERSAL | ASN_PRIMITIVE | 0x18)
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(crypt);
|
|
|
|
static const WCHAR szDllName[] = { 'D','l','l',0 };
|
|
|
|
static char *CRYPT_GetKeyName(DWORD dwEncodingType, LPCSTR pszFuncName,
|
|
LPCSTR pszOID)
|
|
{
|
|
static const char szEncodingTypeFmt[] =
|
|
"Software\\Microsoft\\Cryptography\\OID\\EncodingType %ld\\%s\\%s";
|
|
UINT len;
|
|
char numericOID[7]; /* enough for "#65535" */
|
|
const char *oid;
|
|
LPSTR szKey;
|
|
|
|
/* MSDN says the encoding type is a mask, but it isn't treated that way.
|
|
* (E.g., if dwEncodingType were 3, the key names "EncodingType 1" and
|
|
* "EncodingType 2" would be expected if it were a mask. Instead native
|
|
* stores values in "EncodingType 3".
|
|
*/
|
|
if (!HIWORD(pszOID))
|
|
{
|
|
snprintf(numericOID, sizeof(numericOID), "#%d", (int)pszOID);
|
|
oid = numericOID;
|
|
}
|
|
else
|
|
oid = pszOID;
|
|
|
|
/* This is enough: the lengths of the two string parameters are explicitly
|
|
* counted, and we need up to five additional characters for the encoding
|
|
* type. These are covered by the "%d", "%s", and "%s" characters in the
|
|
* format specifier that are removed by sprintf.
|
|
*/
|
|
len = sizeof(szEncodingTypeFmt) + lstrlenA(pszFuncName) + lstrlenA(oid);
|
|
szKey = HeapAlloc(GetProcessHeap(), 0, len);
|
|
if (szKey)
|
|
sprintf(szKey, szEncodingTypeFmt, dwEncodingType, pszFuncName, oid);
|
|
return szKey;
|
|
}
|
|
|
|
BOOL WINAPI CryptRegisterOIDFunction(DWORD dwEncodingType, LPCSTR pszFuncName,
|
|
LPCSTR pszOID, LPCWSTR pwszDll, LPCSTR pszOverrideFuncName)
|
|
{
|
|
LONG r;
|
|
HKEY hKey;
|
|
LPSTR szKey;
|
|
|
|
TRACE("%lx %s %s %s %s\n", dwEncodingType, pszFuncName, pszOID,
|
|
debugstr_w(pwszDll), pszOverrideFuncName);
|
|
|
|
/* This only registers functions for encoding certs, not messages */
|
|
if (!GET_CERT_ENCODING_TYPE(dwEncodingType))
|
|
return TRUE;
|
|
|
|
/* Native does nothing pwszDll is NULL */
|
|
if (!pwszDll)
|
|
return TRUE;
|
|
|
|
/* I'm not matching MS bug for bug here, because I doubt any app depends on
|
|
* it:
|
|
* - native "succeeds" if pszFuncName is NULL, but the nonsensical entry
|
|
* it creates would never be used
|
|
* - native returns an HRESULT rather than a Win32 error if pszOID is NULL.
|
|
* Instead I disallow both of these with ERROR_INVALID_PARAMETER.
|
|
*/
|
|
if (!pszFuncName || !pszOID)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
|
|
szKey = CRYPT_GetKeyName(dwEncodingType, pszFuncName, pszOID);
|
|
TRACE("Key name is %s\n", debugstr_a(szKey));
|
|
|
|
if (!szKey)
|
|
return FALSE;
|
|
|
|
r = RegCreateKeyA(HKEY_LOCAL_MACHINE, szKey, &hKey);
|
|
HeapFree(GetProcessHeap(), 0, szKey);
|
|
if(r != ERROR_SUCCESS)
|
|
return FALSE;
|
|
|
|
/* write the values */
|
|
if (pszOverrideFuncName)
|
|
RegSetValueExA(hKey, "FuncName", 0, REG_SZ, pszOverrideFuncName,
|
|
lstrlenA(pszOverrideFuncName) + 1);
|
|
RegSetValueExW(hKey, szDllName, 0, REG_SZ, (const BYTE*) pwszDll,
|
|
(lstrlenW(pwszDll) + 1) * sizeof (WCHAR));
|
|
|
|
RegCloseKey(hKey);
|
|
return TRUE;
|
|
}
|
|
|
|
BOOL WINAPI CryptUnregisterOIDFunction(DWORD dwEncodingType, LPCSTR pszFuncName,
|
|
LPCSTR pszOID)
|
|
{
|
|
LPSTR szKey;
|
|
LONG rc;
|
|
|
|
TRACE("%lx %s %s\n", dwEncodingType, pszFuncName, pszOID);
|
|
|
|
if (!GET_CERT_ENCODING_TYPE(dwEncodingType))
|
|
return TRUE;
|
|
|
|
if (!pszFuncName || !pszOID)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
|
|
szKey = CRYPT_GetKeyName(dwEncodingType, pszFuncName, pszOID);
|
|
rc = RegDeleteKeyA(HKEY_LOCAL_MACHINE, szKey);
|
|
HeapFree(GetProcessHeap(), 0, szKey);
|
|
if (rc)
|
|
SetLastError(rc);
|
|
return rc ? FALSE : TRUE;
|
|
}
|
|
|
|
BOOL WINAPI CryptGetOIDFunctionValue(DWORD dwEncodingType, LPCSTR pszFuncName,
|
|
LPCSTR pszOID, LPCWSTR pwszValueName, DWORD *pdwValueType, BYTE *pbValueData,
|
|
DWORD *pcbValueData)
|
|
{
|
|
LPSTR szKey;
|
|
LONG rc;
|
|
HKEY hKey;
|
|
|
|
TRACE("%lx %s %s %s %p %p %p\n", dwEncodingType, debugstr_a(pszFuncName),
|
|
debugstr_a(pszOID), debugstr_w(pwszValueName), pdwValueType, pbValueData,
|
|
pcbValueData);
|
|
|
|
if (!GET_CERT_ENCODING_TYPE(dwEncodingType))
|
|
return TRUE;
|
|
|
|
if (!pszFuncName || !pszOID || !pwszValueName)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
|
|
szKey = CRYPT_GetKeyName(dwEncodingType, pszFuncName, pszOID);
|
|
rc = RegOpenKeyA(HKEY_LOCAL_MACHINE, szKey, &hKey);
|
|
HeapFree(GetProcessHeap(), 0, szKey);
|
|
if (rc)
|
|
SetLastError(rc);
|
|
else
|
|
{
|
|
rc = RegQueryValueExW(hKey, pwszValueName, NULL, pdwValueType,
|
|
pbValueData, pcbValueData);
|
|
if (rc)
|
|
SetLastError(rc);
|
|
RegCloseKey(hKey);
|
|
}
|
|
return rc ? FALSE : TRUE;
|
|
}
|
|
|
|
BOOL WINAPI CryptSetOIDFunctionValue(DWORD dwEncodingType, LPCSTR pszFuncName,
|
|
LPCSTR pszOID, LPCWSTR pwszValueName, DWORD dwValueType,
|
|
const BYTE *pbValueData, DWORD cbValueData)
|
|
{
|
|
LPSTR szKey;
|
|
LONG rc;
|
|
HKEY hKey;
|
|
|
|
TRACE("%lx %s %s %s %ld %p %ld\n", dwEncodingType, debugstr_a(pszFuncName),
|
|
debugstr_a(pszOID), debugstr_w(pwszValueName), dwValueType, pbValueData,
|
|
cbValueData);
|
|
|
|
if (!GET_CERT_ENCODING_TYPE(dwEncodingType))
|
|
return TRUE;
|
|
|
|
if (!pszFuncName || !pszOID || !pwszValueName)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
|
|
szKey = CRYPT_GetKeyName(dwEncodingType, pszFuncName, pszOID);
|
|
rc = RegOpenKeyA(HKEY_LOCAL_MACHINE, szKey, &hKey);
|
|
HeapFree(GetProcessHeap(), 0, szKey);
|
|
if (rc)
|
|
SetLastError(rc);
|
|
else
|
|
{
|
|
rc = RegSetValueExW(hKey, pwszValueName, 0, dwValueType, pbValueData,
|
|
cbValueData);
|
|
if (rc)
|
|
SetLastError(rc);
|
|
RegCloseKey(hKey);
|
|
}
|
|
return rc ? FALSE : TRUE;
|
|
}
|
|
|
|
/* Gets the registered function named szFuncName for dwCertEncodingType and
|
|
* lpszStructType, or NULL if one could not be found. *lib will be set to the
|
|
* handle of the module it's in, or NULL if no module was loaded. If the
|
|
* return value is NULL, *lib will also be NULL, to simplify error handling.
|
|
*/
|
|
static void *CRYPT_GetFunc(DWORD dwCertEncodingType, LPCSTR lpszStructType,
|
|
LPCSTR szFuncName, HMODULE *lib)
|
|
{
|
|
void *ret = NULL;
|
|
char *szKey = CRYPT_GetKeyName(dwCertEncodingType, szFuncName,
|
|
lpszStructType);
|
|
const char *funcName;
|
|
long r;
|
|
HKEY hKey;
|
|
DWORD type, size = 0;
|
|
|
|
*lib = NULL;
|
|
r = RegOpenKeyA(HKEY_LOCAL_MACHINE, szKey, &hKey);
|
|
HeapFree(GetProcessHeap(), 0, szKey);
|
|
if(r != ERROR_SUCCESS)
|
|
return NULL;
|
|
|
|
RegQueryValueExA(hKey, "FuncName", NULL, &type, NULL, &size);
|
|
if (GetLastError() == ERROR_MORE_DATA && type == REG_SZ)
|
|
{
|
|
funcName = HeapAlloc(GetProcessHeap(), 0, size);
|
|
RegQueryValueExA(hKey, "FuncName", NULL, &type, (LPBYTE)funcName,
|
|
&size);
|
|
}
|
|
else
|
|
funcName = szFuncName;
|
|
RegQueryValueExW(hKey, szDllName, NULL, &type, NULL, &size);
|
|
if (GetLastError() == ERROR_MORE_DATA && type == REG_SZ)
|
|
{
|
|
LPWSTR dllName = HeapAlloc(GetProcessHeap(), 0, size);
|
|
|
|
RegQueryValueExW(hKey, szDllName, NULL, &type, (LPBYTE)dllName,
|
|
&size);
|
|
*lib = LoadLibraryW(dllName);
|
|
if (*lib)
|
|
{
|
|
ret = GetProcAddress(*lib, funcName);
|
|
if (!ret)
|
|
{
|
|
/* Unload the library, the caller doesn't want to unload it
|
|
* when the return value is NULL.
|
|
*/
|
|
FreeLibrary(*lib);
|
|
*lib = NULL;
|
|
}
|
|
}
|
|
HeapFree(GetProcessHeap(), 0, dllName);
|
|
}
|
|
if (funcName != szFuncName)
|
|
HeapFree(GetProcessHeap(), 0, (char *)funcName);
|
|
return ret;
|
|
}
|
|
|
|
typedef BOOL (WINAPI *CryptEncodeObjectFunc)(DWORD, LPCSTR, const void *,
|
|
BYTE *, DWORD *);
|
|
|
|
BOOL WINAPI CryptEncodeObject(DWORD dwCertEncodingType, LPCSTR lpszStructType,
|
|
const void *pvStructInfo, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
BOOL ret = FALSE;
|
|
HMODULE lib;
|
|
CryptEncodeObjectFunc pCryptEncodeObject;
|
|
|
|
TRACE("(0x%08lx, %s, %p, %p, %p)\n",
|
|
dwCertEncodingType, HIWORD(lpszStructType) ? debugstr_a(lpszStructType) :
|
|
"(integer value)", pvStructInfo, pbEncoded, pcbEncoded);
|
|
|
|
if (!pbEncoded && !pcbEncoded)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
|
|
/* Try registered DLL first.. */
|
|
pCryptEncodeObject =
|
|
(CryptEncodeObjectFunc)CRYPT_GetFunc(dwCertEncodingType,
|
|
lpszStructType, "CryptEncodeObject", &lib);
|
|
if (pCryptEncodeObject)
|
|
{
|
|
ret = pCryptEncodeObject(dwCertEncodingType, lpszStructType,
|
|
pvStructInfo, pbEncoded, pcbEncoded);
|
|
FreeLibrary(lib);
|
|
}
|
|
else
|
|
{
|
|
/* If not, use CryptEncodeObjectEx */
|
|
ret = CryptEncodeObjectEx(dwCertEncodingType, lpszStructType,
|
|
pvStructInfo, 0, NULL, pbEncoded, pcbEncoded);
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/* Helper function to check *pcbEncoded, set it to the required size, and
|
|
* optionally to allocate memory. Assumes pbEncoded is not NULL.
|
|
* If CRYPT_ENCODE_ALLOC_FLAG is set in dwFlags, *pbEncoded will be set to a
|
|
* pointer to the newly allocated memory.
|
|
*/
|
|
static BOOL CRYPT_EncodeEnsureSpace(DWORD dwFlags,
|
|
PCRYPT_ENCODE_PARA pEncodePara, BYTE *pbEncoded, DWORD *pcbEncoded,
|
|
DWORD bytesNeeded)
|
|
{
|
|
BOOL ret = TRUE;
|
|
|
|
if (dwFlags & CRYPT_ENCODE_ALLOC_FLAG)
|
|
{
|
|
if (pEncodePara && pEncodePara->pfnAlloc)
|
|
*(BYTE **)pbEncoded = pEncodePara->pfnAlloc(bytesNeeded);
|
|
else
|
|
*(BYTE **)pbEncoded = LocalAlloc(0, bytesNeeded);
|
|
if (!*(BYTE **)pbEncoded)
|
|
ret = FALSE;
|
|
else
|
|
*pcbEncoded = bytesNeeded;
|
|
}
|
|
else if (bytesNeeded > *pcbEncoded)
|
|
{
|
|
*pcbEncoded = bytesNeeded;
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeOid(DWORD dwCertEncodingType,
|
|
LPCSTR pszObjId, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
DWORD bytesNeeded = 2;
|
|
BOOL ret = TRUE;
|
|
int firstPos = 0;
|
|
BYTE firstByte = 0;
|
|
|
|
if (pszObjId)
|
|
{
|
|
const char *ptr;
|
|
int val1, val2;
|
|
|
|
if (sscanf(pszObjId, "%d.%d.%n", &val1, &val2, &firstPos) != 2)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_ERROR);
|
|
return FALSE;
|
|
}
|
|
bytesNeeded++;
|
|
firstByte = val1 * 40 + val2;
|
|
ptr = pszObjId + firstPos;
|
|
while (ret && *ptr)
|
|
{
|
|
int pos;
|
|
|
|
/* note I assume each component is at most 32-bits long in base 2 */
|
|
if (sscanf(ptr, "%d%n", &val1, &pos) == 1)
|
|
{
|
|
if (val1 >= 0x10000000)
|
|
bytesNeeded += 5;
|
|
else if (val1 >= 0x200000)
|
|
bytesNeeded += 4;
|
|
else if (val1 >= 0x4000)
|
|
bytesNeeded += 3;
|
|
else if (val1 >= 0x80)
|
|
bytesNeeded += 2;
|
|
else
|
|
bytesNeeded += 1;
|
|
ptr += pos;
|
|
if (*ptr == '.')
|
|
ptr++;
|
|
}
|
|
else
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_ERROR);
|
|
return FALSE;
|
|
}
|
|
}
|
|
}
|
|
if (pbEncoded)
|
|
{
|
|
if (*pbEncoded < bytesNeeded)
|
|
{
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
*pbEncoded++ = ASN_OBJECTIDENTIFIER;
|
|
*pbEncoded++ = bytesNeeded - 2;
|
|
if (pszObjId)
|
|
{
|
|
const char *ptr;
|
|
int val, pos;
|
|
|
|
*pbEncoded++ = firstByte;
|
|
ptr = pszObjId + firstPos;
|
|
while (ret && *ptr)
|
|
{
|
|
sscanf(ptr, "%d%n", &val, &pos);
|
|
{
|
|
unsigned char outBytes[5];
|
|
int numBytes, i;
|
|
|
|
if (val >= 0x10000000)
|
|
numBytes = 5;
|
|
else if (val >= 0x200000)
|
|
numBytes = 4;
|
|
else if (val >= 0x4000)
|
|
numBytes = 3;
|
|
else if (val >= 0x80)
|
|
numBytes = 2;
|
|
else
|
|
numBytes = 1;
|
|
for (i = numBytes; i > 0; i--)
|
|
{
|
|
outBytes[i - 1] = val & 0x7f;
|
|
val >>= 7;
|
|
}
|
|
for (i = 0; i < numBytes - 1; i++)
|
|
*pbEncoded++ = outBytes[i] | 0x80;
|
|
*pbEncoded++ = outBytes[i];
|
|
ptr += pos;
|
|
if (*ptr == '.')
|
|
ptr++;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
*pcbEncoded = bytesNeeded;
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeNameValue(DWORD dwCertEncodingType,
|
|
CERT_NAME_VALUE *value, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
BYTE tag;
|
|
DWORD bytesNeeded;
|
|
BOOL ret = TRUE;
|
|
|
|
switch (value->dwValueType)
|
|
{
|
|
case CERT_RDN_NUMERIC_STRING:
|
|
tag = ASN_NUMERICSTRING;
|
|
bytesNeeded = 2 + value->Value.cbData;
|
|
break;
|
|
case CERT_RDN_PRINTABLE_STRING:
|
|
tag = ASN_PRINTABLESTRING;
|
|
bytesNeeded = 2 + value->Value.cbData;
|
|
break;
|
|
case CERT_RDN_IA5_STRING:
|
|
tag = ASN_IA5STRING;
|
|
bytesNeeded = 2 + value->Value.cbData;
|
|
break;
|
|
case CERT_RDN_ANY_TYPE:
|
|
/* explicitly disallowed */
|
|
SetLastError(HRESULT_FROM_WIN32(ERROR_INVALID_PARAMETER));
|
|
return FALSE;
|
|
default:
|
|
FIXME("String type %ld unimplemented\n", value->dwValueType);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded)
|
|
{
|
|
if (*pcbEncoded < bytesNeeded)
|
|
{
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
*pbEncoded++ = tag;
|
|
*pbEncoded++ = bytesNeeded - 2;
|
|
switch (value->dwValueType)
|
|
{
|
|
case CERT_RDN_NUMERIC_STRING:
|
|
case CERT_RDN_PRINTABLE_STRING:
|
|
case CERT_RDN_IA5_STRING:
|
|
memcpy(pbEncoded, value->Value.pbData, value->Value.cbData);
|
|
}
|
|
}
|
|
}
|
|
*pcbEncoded = bytesNeeded;
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeRdnAttr(DWORD dwCertEncodingType,
|
|
CERT_RDN_ATTR *attr, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
DWORD bytesNeeded, size;
|
|
BOOL ret;
|
|
|
|
bytesNeeded = 2; /* tag and len */
|
|
ret = CRYPT_AsnEncodeOid(dwCertEncodingType, attr->pszObjId, NULL, &size);
|
|
if (ret)
|
|
{
|
|
bytesNeeded += size;
|
|
/* hack: a CERT_RDN_ATTR is identical to a CERT_NAME_VALUE beginning
|
|
* with dwValueType, so "cast" it to get its encoded size
|
|
*/
|
|
ret = CRYPT_AsnEncodeNameValue(dwCertEncodingType,
|
|
(CERT_NAME_VALUE *)&attr->dwValueType, NULL, &size);
|
|
if (ret)
|
|
{
|
|
bytesNeeded += size;
|
|
if (pbEncoded)
|
|
{
|
|
if (*pcbEncoded < bytesNeeded)
|
|
{
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
*pbEncoded++ = ASN_CONSTRUCTOR | ASN_SEQUENCE;
|
|
*pbEncoded++ = bytesNeeded - 2;
|
|
size = bytesNeeded - 2;
|
|
ret = CRYPT_AsnEncodeOid(dwCertEncodingType, attr->pszObjId,
|
|
pbEncoded, &size);
|
|
if (ret)
|
|
{
|
|
pbEncoded += size;
|
|
size = bytesNeeded - 2 - size;
|
|
ret = CRYPT_AsnEncodeNameValue(dwCertEncodingType,
|
|
(CERT_NAME_VALUE *)&attr->dwValueType, pbEncoded,
|
|
&size);
|
|
}
|
|
}
|
|
}
|
|
*pcbEncoded = bytesNeeded;
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static int BLOBComp(const void *l, const void *r)
|
|
{
|
|
CRYPT_DER_BLOB *a = (CRYPT_DER_BLOB *)l, *b = (CRYPT_DER_BLOB *)r;
|
|
int ret;
|
|
|
|
if (!(ret = memcmp(a->pbData, b->pbData, min(a->cbData, b->cbData))))
|
|
ret = a->cbData - b->cbData;
|
|
return ret;
|
|
}
|
|
|
|
/* This encodes as a SET OF, which in DER must be lexicographically sorted.
|
|
*/
|
|
static BOOL WINAPI CRYPT_AsnEncodeRdn(DWORD dwCertEncodingType, CERT_RDN *rdn,
|
|
BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
DWORD bytesNeeded, i;
|
|
BOOL ret;
|
|
CRYPT_DER_BLOB *blobs = NULL;
|
|
|
|
ret = TRUE;
|
|
if (rdn->cRDNAttr)
|
|
{
|
|
if (!rdn->rgRDNAttr)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
blobs = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY,
|
|
rdn->cRDNAttr * sizeof(CRYPT_DER_BLOB));
|
|
if (!blobs)
|
|
ret = FALSE;
|
|
}
|
|
}
|
|
bytesNeeded = 2; /* tag and len */
|
|
for (i = 0; ret && i < rdn->cRDNAttr; i++)
|
|
{
|
|
ret = CRYPT_AsnEncodeRdnAttr(dwCertEncodingType, &rdn->rgRDNAttr[i],
|
|
NULL, &blobs[i].cbData);
|
|
if (ret)
|
|
bytesNeeded += blobs[i].cbData;
|
|
}
|
|
if (ret)
|
|
{
|
|
if (pbEncoded)
|
|
{
|
|
if (*pcbEncoded < bytesNeeded)
|
|
{
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
for (i = 0; ret && i < rdn->cRDNAttr; i++)
|
|
{
|
|
blobs[i].pbData = HeapAlloc(GetProcessHeap(), 0,
|
|
blobs[i].cbData);
|
|
if (!blobs[i].pbData)
|
|
ret = FALSE;
|
|
else
|
|
ret = CRYPT_AsnEncodeRdnAttr(dwCertEncodingType,
|
|
&rdn->rgRDNAttr[i], blobs[i].pbData, &blobs[i].cbData);
|
|
}
|
|
if (ret)
|
|
{
|
|
qsort(blobs, rdn->cRDNAttr, sizeof(CRYPT_DER_BLOB),
|
|
BLOBComp);
|
|
*pbEncoded++ = ASN_CONSTRUCTOR | ASN_SETOF;
|
|
*pbEncoded++ = (BYTE)bytesNeeded - 2;
|
|
for (i = 0; ret && i < rdn->cRDNAttr; i++)
|
|
{
|
|
memcpy(pbEncoded, blobs[i].pbData, blobs[i].cbData);
|
|
pbEncoded += blobs[i].cbData;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
*pcbEncoded = bytesNeeded;
|
|
}
|
|
if (blobs)
|
|
{
|
|
for (i = 0; i < rdn->cRDNAttr; i++)
|
|
HeapFree(GetProcessHeap(), 0, blobs[i].pbData);
|
|
HeapFree(GetProcessHeap(), 0, blobs);
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeName(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const void *pvStructInfo, DWORD dwFlags,
|
|
PCRYPT_ENCODE_PARA pEncodePara, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
CERT_NAME_INFO *info = (CERT_NAME_INFO *)pvStructInfo;
|
|
DWORD bytesNeeded, size, i;
|
|
BOOL ret;
|
|
|
|
if (!pvStructInfo)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
return FALSE;
|
|
}
|
|
if (info->cRDN && !info->rgRDN)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
return FALSE;
|
|
}
|
|
TRACE("encoding name with %ld RDNs\n", info->cRDN);
|
|
bytesNeeded = 2; /* tag and len */
|
|
ret = TRUE;
|
|
for (i = 0; ret && i < info->cRDN; i++)
|
|
{
|
|
ret = CRYPT_AsnEncodeRdn(dwCertEncodingType, &info->rgRDN[i], NULL,
|
|
&size);
|
|
if (ret)
|
|
bytesNeeded += size;
|
|
}
|
|
if (ret)
|
|
{
|
|
if (!pbEncoded)
|
|
{
|
|
*pcbEncoded = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (!CRYPT_EncodeEnsureSpace(dwFlags, pEncodePara, pbEncoded,
|
|
pcbEncoded, bytesNeeded))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_ENCODE_ALLOC_FLAG)
|
|
pbEncoded = *(BYTE **)pbEncoded;
|
|
*pbEncoded++ = ASN_CONSTRUCTOR | ASN_SEQUENCE;
|
|
*pbEncoded++ = (BYTE)bytesNeeded - 2;
|
|
for (i = 0; ret && i < info->cRDN; i++)
|
|
{
|
|
size = bytesNeeded;
|
|
ret = CRYPT_AsnEncodeRdn(dwCertEncodingType, &info->rgRDN[i],
|
|
pbEncoded, &size);
|
|
if (ret)
|
|
{
|
|
pbEncoded += size;
|
|
bytesNeeded -= size;
|
|
}
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeInt(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const void *pvStructInfo, DWORD dwFlags,
|
|
PCRYPT_ENCODE_PARA pEncodePara, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
INT val, i;
|
|
BYTE significantBytes, padByte = 0, bytesNeeded;
|
|
BOOL neg = FALSE, pad = FALSE;
|
|
|
|
if (!pvStructInfo)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
return FALSE;
|
|
}
|
|
|
|
memcpy(&val, pvStructInfo, sizeof(val));
|
|
/* Count the number of significant bytes. Temporarily swap sign for
|
|
* negatives so I count the minimum number of bytes.
|
|
*/
|
|
if (val < 0)
|
|
{
|
|
neg = TRUE;
|
|
val = -val;
|
|
}
|
|
for (significantBytes = sizeof(val); !(val & 0xff000000);
|
|
val <<= 8, significantBytes--)
|
|
;
|
|
if (neg)
|
|
{
|
|
val = -val;
|
|
if ((val & 0xff000000) < 0x80000000)
|
|
{
|
|
padByte = 0xff;
|
|
pad = TRUE;
|
|
}
|
|
}
|
|
else if ((val & 0xff000000) > 0x7f000000)
|
|
{
|
|
padByte = 0;
|
|
pad = TRUE;
|
|
}
|
|
bytesNeeded = 2 + significantBytes;
|
|
if (pad)
|
|
bytesNeeded++;
|
|
if (!pbEncoded)
|
|
{
|
|
*pcbEncoded = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (!CRYPT_EncodeEnsureSpace(dwFlags, pEncodePara, pbEncoded, pcbEncoded,
|
|
bytesNeeded))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_ENCODE_ALLOC_FLAG)
|
|
pbEncoded = *(BYTE **)pbEncoded;
|
|
*pbEncoded++ = ASN_INTEGER;
|
|
if (pad)
|
|
{
|
|
*pbEncoded++ = significantBytes + 1;
|
|
*pbEncoded++ = padByte;
|
|
}
|
|
else
|
|
*pbEncoded++ = significantBytes;
|
|
for (i = 0; i < significantBytes; i++, val <<= 8)
|
|
*(pbEncoded + i) = (BYTE)((val & 0xff000000) >> 24);
|
|
return TRUE;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeInteger(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const void *pvStructInfo, DWORD dwFlags,
|
|
PCRYPT_ENCODE_PARA pEncodePara, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
DWORD significantBytes;
|
|
BYTE padByte = 0, bytesNeeded;
|
|
BOOL pad = FALSE;
|
|
CRYPT_INTEGER_BLOB *blob = (CRYPT_INTEGER_BLOB *)pvStructInfo;
|
|
|
|
if (!pvStructInfo)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
return FALSE;
|
|
}
|
|
|
|
/* FIXME: use exception handling to protect against bogus pointers */
|
|
significantBytes = blob->cbData;
|
|
if (significantBytes)
|
|
{
|
|
if (blob->pbData[significantBytes - 1] & 0x80)
|
|
{
|
|
/* negative, lop off leading (little-endian) 0xffs */
|
|
for (; significantBytes > 0 &&
|
|
blob->pbData[significantBytes - 1] == 0xff; significantBytes--)
|
|
;
|
|
if (blob->pbData[significantBytes - 1] < 0x80)
|
|
{
|
|
padByte = 0xff;
|
|
pad = TRUE;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
/* positive, lop off leading (little-endian) zeroes */
|
|
for (; significantBytes > 0 && !blob->pbData[significantBytes - 1];
|
|
significantBytes--)
|
|
;
|
|
if (blob->pbData[significantBytes - 1] > 0x7f)
|
|
{
|
|
padByte = 0;
|
|
pad = TRUE;
|
|
}
|
|
}
|
|
}
|
|
bytesNeeded = 2 + significantBytes;
|
|
if (pad)
|
|
bytesNeeded++;
|
|
if (!pbEncoded)
|
|
{
|
|
*pcbEncoded = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (!CRYPT_EncodeEnsureSpace(dwFlags, pEncodePara, pbEncoded, pcbEncoded,
|
|
bytesNeeded))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_ENCODE_ALLOC_FLAG)
|
|
pbEncoded = *(BYTE **)pbEncoded;
|
|
*pbEncoded++ = ASN_INTEGER;
|
|
if (pad)
|
|
{
|
|
*pbEncoded++ = significantBytes + 1;
|
|
*pbEncoded++ = padByte;
|
|
}
|
|
else
|
|
*pbEncoded++ = significantBytes;
|
|
for (; significantBytes > 0; significantBytes--)
|
|
*(pbEncoded++) = blob->pbData[significantBytes - 1];
|
|
return TRUE;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeUtcTime(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const void *pvStructInfo, DWORD dwFlags,
|
|
PCRYPT_ENCODE_PARA pEncodePara, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
SYSTEMTIME sysTime;
|
|
/* sorry, magic number: enough for tag, len, YYMMDDHHMMSSZ\0. I use a
|
|
* temporary buffer because the output buffer is not NULL-terminated.
|
|
*/
|
|
char buf[16];
|
|
static const DWORD bytesNeeded = sizeof(buf) - 1;
|
|
|
|
if (!pvStructInfo)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
return FALSE;
|
|
}
|
|
/* Sanity check the year, this is a two-digit year format */
|
|
if (!FileTimeToSystemTime((const FILETIME *)pvStructInfo, &sysTime))
|
|
return FALSE;
|
|
if (sysTime.wYear < 1950 || sysTime.wYear > 2050)
|
|
{
|
|
SetLastError(CRYPT_E_BAD_ENCODE);
|
|
return FALSE;
|
|
}
|
|
if (!pbEncoded)
|
|
{
|
|
*pcbEncoded = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (!CRYPT_EncodeEnsureSpace(dwFlags, pEncodePara, pbEncoded, pcbEncoded,
|
|
bytesNeeded))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_ENCODE_ALLOC_FLAG)
|
|
pbEncoded = *(BYTE **)pbEncoded;
|
|
buf[0] = ASN_UTCTIME;
|
|
buf[1] = bytesNeeded - 2;
|
|
snprintf(buf + 2, sizeof(buf) - 2, "%02d%02d%02d%02d%02d%02dZ",
|
|
sysTime.wYear >= 2000 ? sysTime.wYear - 2000 : sysTime.wYear - 1900,
|
|
sysTime.wDay, sysTime.wMonth, sysTime.wHour, sysTime.wMinute,
|
|
sysTime.wSecond);
|
|
memcpy(pbEncoded, buf, bytesNeeded);
|
|
return TRUE;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeGeneralizedTime(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const void *pvStructInfo, DWORD dwFlags,
|
|
PCRYPT_ENCODE_PARA pEncodePara, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
SYSTEMTIME sysTime;
|
|
/* sorry, magic number: enough for tag, len, YYYYMMDDHHMMSSZ\0. I use a
|
|
* temporary buffer because the output buffer is not NULL-terminated.
|
|
*/
|
|
char buf[18];
|
|
static const DWORD bytesNeeded = sizeof(buf) - 1;
|
|
|
|
if (!pvStructInfo)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
return FALSE;
|
|
}
|
|
if (!pbEncoded)
|
|
{
|
|
*pcbEncoded = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (!FileTimeToSystemTime((const FILETIME *)pvStructInfo, &sysTime))
|
|
return FALSE;
|
|
if (!CRYPT_EncodeEnsureSpace(dwFlags, pEncodePara, pbEncoded, pcbEncoded,
|
|
bytesNeeded))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_ENCODE_ALLOC_FLAG)
|
|
pbEncoded = *(BYTE **)pbEncoded;
|
|
buf[0] = ASN_GENERALTIME;
|
|
buf[1] = bytesNeeded - 2;
|
|
snprintf(buf + 2, sizeof(buf) - 2, "%04d%02d%02d%02d%02d%02dZ",
|
|
sysTime.wYear, sysTime.wDay, sysTime.wMonth, sysTime.wHour,
|
|
sysTime.wMinute, sysTime.wSecond);
|
|
memcpy(pbEncoded, buf, bytesNeeded);
|
|
return TRUE;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnEncodeChoiceOfTime(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const void *pvStructInfo, DWORD dwFlags,
|
|
PCRYPT_ENCODE_PARA pEncodePara, BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
SYSTEMTIME sysTime;
|
|
BOOL ret;
|
|
|
|
if (!pvStructInfo)
|
|
{
|
|
SetLastError(STATUS_ACCESS_VIOLATION);
|
|
return FALSE;
|
|
}
|
|
/* Check the year, if it's in the UTCTime range call that encode func */
|
|
if (!FileTimeToSystemTime((const FILETIME *)pvStructInfo, &sysTime))
|
|
return FALSE;
|
|
if (sysTime.wYear >= 1950 && sysTime.wYear <= 2050)
|
|
ret = CRYPT_AsnEncodeUtcTime(dwCertEncodingType, lpszStructType,
|
|
pvStructInfo, dwFlags, pEncodePara, pbEncoded, pcbEncoded);
|
|
else
|
|
ret = CRYPT_AsnEncodeGeneralizedTime(dwCertEncodingType,
|
|
lpszStructType, pvStructInfo, dwFlags, pEncodePara, pbEncoded,
|
|
pcbEncoded);
|
|
return ret;
|
|
}
|
|
|
|
typedef BOOL (WINAPI *CryptEncodeObjectExFunc)(DWORD, LPCSTR, const void *,
|
|
DWORD, PCRYPT_ENCODE_PARA, BYTE *, DWORD *);
|
|
|
|
BOOL WINAPI CryptEncodeObjectEx(DWORD dwCertEncodingType, LPCSTR lpszStructType,
|
|
const void *pvStructInfo, DWORD dwFlags, PCRYPT_ENCODE_PARA pEncodePara,
|
|
BYTE *pbEncoded, DWORD *pcbEncoded)
|
|
{
|
|
BOOL ret = FALSE;
|
|
HMODULE lib = NULL;
|
|
CryptEncodeObjectExFunc encodeFunc = NULL;
|
|
|
|
TRACE("(0x%08lx, %s, %p, 0x%08lx, %p, %p, %p): semi-stub\n",
|
|
dwCertEncodingType, HIWORD(lpszStructType) ? debugstr_a(lpszStructType) :
|
|
"(integer value)", pvStructInfo, dwFlags, pEncodePara, pbEncoded,
|
|
pcbEncoded);
|
|
|
|
if (!pbEncoded && !pcbEncoded)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
if ((dwCertEncodingType & CERT_ENCODING_TYPE_MASK) != X509_ASN_ENCODING
|
|
&& (dwCertEncodingType & CMSG_ENCODING_TYPE_MASK) != PKCS_7_ASN_ENCODING)
|
|
{
|
|
SetLastError(ERROR_FILE_NOT_FOUND);
|
|
return FALSE;
|
|
}
|
|
|
|
SetLastError(NOERROR);
|
|
if (!HIWORD(lpszStructType))
|
|
{
|
|
switch (LOWORD(lpszStructType))
|
|
{
|
|
case (WORD)X509_NAME:
|
|
encodeFunc = CRYPT_AsnEncodeName;
|
|
break;
|
|
case (WORD)X509_INTEGER:
|
|
encodeFunc = CRYPT_AsnEncodeInt;
|
|
break;
|
|
case (WORD)X509_MULTI_BYTE_INTEGER:
|
|
encodeFunc = CRYPT_AsnEncodeInteger;
|
|
break;
|
|
case (WORD)X509_CHOICE_OF_TIME:
|
|
encodeFunc = CRYPT_AsnEncodeChoiceOfTime;
|
|
break;
|
|
case (WORD)PKCS_UTC_TIME:
|
|
encodeFunc = CRYPT_AsnEncodeUtcTime;
|
|
break;
|
|
default:
|
|
FIXME("%d: unimplemented\n", LOWORD(lpszStructType));
|
|
}
|
|
}
|
|
else if (!strcmp(lpszStructType, szOID_RSA_signingTime))
|
|
encodeFunc = CRYPT_AsnEncodeUtcTime;
|
|
if (!encodeFunc)
|
|
encodeFunc = (CryptEncodeObjectExFunc)CRYPT_GetFunc(dwCertEncodingType,
|
|
lpszStructType, "CryptEncodeObjectEx", &lib);
|
|
if (encodeFunc)
|
|
ret = encodeFunc(dwCertEncodingType, lpszStructType, pvStructInfo,
|
|
dwFlags, pEncodePara, pbEncoded, pcbEncoded);
|
|
else
|
|
SetLastError(ERROR_FILE_NOT_FOUND);
|
|
if (lib)
|
|
FreeLibrary(lib);
|
|
return ret;
|
|
}
|
|
|
|
typedef BOOL (WINAPI *CryptDecodeObjectFunc)(DWORD, LPCSTR, const BYTE *,
|
|
DWORD, DWORD, void *, DWORD *);
|
|
|
|
BOOL WINAPI CryptDecodeObject(DWORD dwCertEncodingType, LPCSTR lpszStructType,
|
|
const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags, void *pvStructInfo,
|
|
DWORD *pcbStructInfo)
|
|
{
|
|
BOOL ret = FALSE;
|
|
HMODULE lib;
|
|
CryptDecodeObjectFunc pCryptDecodeObject;
|
|
|
|
TRACE("(0x%08lx, %s, %p, %ld, 0x%08lx, %p, %p)\n",
|
|
dwCertEncodingType, HIWORD(lpszStructType) ? debugstr_a(lpszStructType) :
|
|
"(integer value)", pbEncoded, cbEncoded, dwFlags, pvStructInfo,
|
|
pcbStructInfo);
|
|
|
|
if (!pvStructInfo && !pcbStructInfo)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
|
|
/* Try registered DLL first.. */
|
|
pCryptDecodeObject =
|
|
(CryptDecodeObjectFunc)CRYPT_GetFunc(dwCertEncodingType,
|
|
lpszStructType, "CryptDecodeObject", &lib);
|
|
if (pCryptDecodeObject)
|
|
{
|
|
ret = pCryptDecodeObject(dwCertEncodingType, lpszStructType,
|
|
pbEncoded, cbEncoded, dwFlags, pvStructInfo, pcbStructInfo);
|
|
FreeLibrary(lib);
|
|
}
|
|
else
|
|
{
|
|
/* If not, use CryptDecodeObjectEx */
|
|
ret = CryptDecodeObjectEx(dwCertEncodingType, lpszStructType, pbEncoded,
|
|
cbEncoded, dwFlags, NULL, pvStructInfo, pcbStructInfo);
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/* Helper function to check *pcbStructInfo, set it to the required size, and
|
|
* optionally to allocate memory. Assumes pvStructInfo is not NULL.
|
|
* If CRYPT_DECODE_ALLOC_FLAG is set in dwFlags, *pvStructInfo will be set to a
|
|
* pointer to the newly allocated memory.
|
|
*/
|
|
static BOOL CRYPT_DecodeEnsureSpace(DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo,
|
|
DWORD bytesNeeded)
|
|
{
|
|
BOOL ret = TRUE;
|
|
|
|
if (dwFlags & CRYPT_DECODE_ALLOC_FLAG)
|
|
{
|
|
if (pDecodePara && pDecodePara->pfnAlloc)
|
|
*(BYTE **)pvStructInfo = pDecodePara->pfnAlloc(bytesNeeded);
|
|
else
|
|
*(BYTE **)pvStructInfo = LocalAlloc(0, bytesNeeded);
|
|
if (!*(BYTE **)pvStructInfo)
|
|
ret = FALSE;
|
|
else
|
|
*pcbStructInfo = bytesNeeded;
|
|
}
|
|
else if (*pcbStructInfo < bytesNeeded)
|
|
{
|
|
*pcbStructInfo = bytesNeeded;
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/* FIXME: honor the CRYPT_DECODE_SHARE_OID_FLAG. */
|
|
static BOOL WINAPI CRYPT_AsnDecodeOid(DWORD dwCertEncodingType,
|
|
const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags, LPSTR pszObjId,
|
|
DWORD *pcbObjId)
|
|
{
|
|
BOOL ret = TRUE;
|
|
DWORD bytesNeeded;
|
|
|
|
/* cbEncoded is an upper bound on the number of bytes, not the actual
|
|
* count: check the count for sanity.
|
|
*/
|
|
if (cbEncoded <= 1 || pbEncoded[1] > cbEncoded - 2)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[0] != ASN_OBJECTIDENTIFIER)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[1])
|
|
{
|
|
/* The largest possible string for the first two components is 2.175
|
|
* (= 2 * 40 + 175 = 255), so this is big enough.
|
|
*/
|
|
char firstTwo[6];
|
|
const BYTE *ptr;
|
|
|
|
snprintf(firstTwo, sizeof(firstTwo), "%d.%d", pbEncoded[2] / 40,
|
|
pbEncoded[2] - (pbEncoded[2] / 40) * 40);
|
|
bytesNeeded = strlen(firstTwo) + 1;
|
|
for (ptr = pbEncoded + 3; ret && ptr - pbEncoded - 2 < pbEncoded[1]; )
|
|
{
|
|
/* large enough for ".4000000" */
|
|
char str[9];
|
|
int val = 0;
|
|
|
|
while (ptr - pbEncoded - 2 < pbEncoded[1] && (*ptr & 0x80))
|
|
{
|
|
val <<= 7;
|
|
val |= *ptr & 0x7f;
|
|
ptr++;
|
|
}
|
|
if (ptr - pbEncoded - 2 >= pbEncoded[1] || (*ptr & 0x80))
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_CORRUPT);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
val <<= 7;
|
|
val |= *ptr++;
|
|
snprintf(str, sizeof(str), ".%d", val);
|
|
bytesNeeded += strlen(str);
|
|
}
|
|
}
|
|
if (!pszObjId)
|
|
*pcbObjId = bytesNeeded;
|
|
else if (*pcbObjId < bytesNeeded)
|
|
{
|
|
*pcbObjId = bytesNeeded;
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
sprintf(pszObjId, "%d.%d", pbEncoded[2] / 40,
|
|
pbEncoded[2] - (pbEncoded[2] / 40) * 40);
|
|
pszObjId += strlen(pszObjId);
|
|
for (ptr = pbEncoded + 3; ret && ptr - pbEncoded - 2 < pbEncoded[1];
|
|
)
|
|
{
|
|
int val = 0;
|
|
|
|
while (ptr - pbEncoded - 2 < pbEncoded[1] && (*ptr & 0x80))
|
|
{
|
|
val <<= 7;
|
|
val |= *ptr & 0x7f;
|
|
ptr++;
|
|
}
|
|
val <<= 7;
|
|
val |= *ptr++;
|
|
sprintf(pszObjId, ".%d", val);
|
|
pszObjId += strlen(pszObjId);
|
|
}
|
|
}
|
|
}
|
|
else
|
|
bytesNeeded = 0;
|
|
*pcbObjId = bytesNeeded;
|
|
return ret;
|
|
}
|
|
|
|
/* Warning: this assumes the address of value->Value.pbData is already set, in
|
|
* order to avoid overwriting memory. (In some cases, it may change it, if it
|
|
* doesn't copy anything to memory.) Be sure to set it correctly!
|
|
*/
|
|
static BOOL WINAPI CRYPT_AsnDecodeNameValue(DWORD dwCertEncodingType,
|
|
const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags, CERT_NAME_VALUE *value,
|
|
DWORD *pcbValue)
|
|
{
|
|
DWORD bytesNeeded;
|
|
BOOL ret = TRUE;
|
|
|
|
/* cbEncoded is an upper bound on the number of bytes, not the actual
|
|
* count: check the count for sanity.
|
|
*/
|
|
if (cbEncoded <= 1 || pbEncoded[1] > cbEncoded - 2)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
switch (pbEncoded[0])
|
|
{
|
|
case ASN_NUMERICSTRING:
|
|
case ASN_PRINTABLESTRING:
|
|
case ASN_IA5STRING:
|
|
break;
|
|
default:
|
|
FIXME("Unimplemented string type %02x\n", pbEncoded[0]);
|
|
SetLastError(OSS_UNIMPLEMENTED);
|
|
return FALSE;
|
|
}
|
|
bytesNeeded = sizeof(CERT_NAME_VALUE);
|
|
if (pbEncoded[1])
|
|
{
|
|
switch (pbEncoded[0])
|
|
{
|
|
case ASN_NUMERICSTRING:
|
|
case ASN_PRINTABLESTRING:
|
|
case ASN_IA5STRING:
|
|
if (!(dwFlags & CRYPT_DECODE_NOCOPY_FLAG))
|
|
bytesNeeded += pbEncoded[1];
|
|
break;
|
|
}
|
|
}
|
|
if (!value)
|
|
{
|
|
*pcbValue = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (*pcbValue < bytesNeeded)
|
|
{
|
|
*pcbValue = bytesNeeded;
|
|
SetLastError(ERROR_MORE_DATA);
|
|
return FALSE;
|
|
}
|
|
*pcbValue = bytesNeeded;
|
|
switch (pbEncoded[0])
|
|
{
|
|
case ASN_NUMERICSTRING:
|
|
value->dwValueType = CERT_RDN_NUMERIC_STRING;
|
|
break;
|
|
case ASN_PRINTABLESTRING:
|
|
value->dwValueType = CERT_RDN_PRINTABLE_STRING;
|
|
break;
|
|
case ASN_IA5STRING:
|
|
value->dwValueType = CERT_RDN_IA5_STRING;
|
|
break;
|
|
}
|
|
if (pbEncoded[1])
|
|
{
|
|
switch (pbEncoded[0])
|
|
{
|
|
case ASN_NUMERICSTRING:
|
|
case ASN_PRINTABLESTRING:
|
|
case ASN_IA5STRING:
|
|
value->Value.cbData = pbEncoded[1];
|
|
if (dwFlags & CRYPT_DECODE_NOCOPY_FLAG)
|
|
value->Value.pbData = (BYTE *)pbEncoded + 2;
|
|
else
|
|
{
|
|
if (!value->Value.pbData)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_INTERNAL);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
memcpy(value->Value.pbData, pbEncoded + 2, pbEncoded[1]);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
value->Value.cbData = 0;
|
|
value->Value.pbData = NULL;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeRdnAttr(DWORD dwCertEncodingType,
|
|
const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags, CERT_RDN_ATTR *attr,
|
|
DWORD *pcbAttr)
|
|
{
|
|
BOOL ret = TRUE;
|
|
DWORD bytesNeeded, size;
|
|
|
|
/* cbEncoded is an upper bound on the number of bytes, not the actual
|
|
* count: check the count for sanity. It must be at least 6, two for the
|
|
* tag and length for the RDN_ATTR, two for the OID, and two for the string.
|
|
*/
|
|
if (cbEncoded < 6 || pbEncoded[1] < 4 || pbEncoded[1] > cbEncoded - 2)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[0] != (ASN_CONSTRUCTOR | ASN_SEQUENCE))
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
bytesNeeded = sizeof(CERT_RDN_ATTR);
|
|
ret = CRYPT_AsnDecodeOid(dwCertEncodingType, pbEncoded + 2,
|
|
cbEncoded - 2, dwFlags, NULL, &size);
|
|
if (ret)
|
|
{
|
|
/* ugly: need to know the size of the next element of the sequence,
|
|
* so get it directly
|
|
*/
|
|
BYTE objIdLen = pbEncoded[3];
|
|
|
|
bytesNeeded += size;
|
|
/* hack: like encoding, this takes advantage of the fact that the rest
|
|
* of the structure is identical to a CERT_NAME_VALUE.
|
|
*/
|
|
ret = CRYPT_AsnDecodeNameValue(dwCertEncodingType, pbEncoded + 4 +
|
|
objIdLen, cbEncoded - 4 - objIdLen, dwFlags, NULL, &size);
|
|
if (ret)
|
|
{
|
|
bytesNeeded += size;
|
|
if (!attr)
|
|
*pcbAttr = bytesNeeded;
|
|
else if (*pcbAttr < bytesNeeded)
|
|
{
|
|
*pcbAttr = bytesNeeded;
|
|
SetLastError(ERROR_MORE_DATA);
|
|
ret = FALSE;
|
|
}
|
|
else
|
|
{
|
|
BYTE *originalData = attr->Value.pbData;
|
|
|
|
*pcbAttr = bytesNeeded;
|
|
/* strange: decode the value first, because it has a counted
|
|
* size, and we can store the OID after it. Keep track of the
|
|
* original data pointer, we'll need to know whether it was
|
|
* changed.
|
|
*/
|
|
size = bytesNeeded;
|
|
ret = CRYPT_AsnDecodeNameValue(dwCertEncodingType,
|
|
pbEncoded + 4 + objIdLen, cbEncoded - 4 - objIdLen,
|
|
dwFlags, (CERT_NAME_VALUE *)&attr->dwValueType, &size);
|
|
if (ret)
|
|
{
|
|
if (objIdLen)
|
|
{
|
|
/* if the data were copied to the original location,
|
|
* the OID goes after. Otherwise it goes in the
|
|
* spot originally reserved for the data.
|
|
*/
|
|
if (attr->Value.pbData == originalData)
|
|
attr->pszObjId = (LPSTR)(attr->Value.pbData +
|
|
attr->Value.cbData);
|
|
else
|
|
attr->pszObjId = originalData;
|
|
size = bytesNeeded - size;
|
|
ret = CRYPT_AsnDecodeOid(dwCertEncodingType,
|
|
pbEncoded + 2, cbEncoded - 2, dwFlags, attr->pszObjId,
|
|
&size);
|
|
}
|
|
else
|
|
attr->pszObjId = NULL;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeRdn(DWORD dwCertEncodingType,
|
|
const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags, CERT_RDN *rdn,
|
|
DWORD *pcbRdn)
|
|
{
|
|
BOOL ret = TRUE;
|
|
DWORD bytesNeeded, cRDNAttr = 0;
|
|
|
|
/* cbEncoded is an upper bound on the number of bytes, not the actual
|
|
* count: check the count for sanity.
|
|
*/
|
|
if (cbEncoded <= 1 || pbEncoded[1] > cbEncoded - 2)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[0] != (ASN_CONSTRUCTOR | ASN_SETOF))
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
bytesNeeded = sizeof(CERT_RDN);
|
|
if (pbEncoded[1])
|
|
{
|
|
const BYTE *ptr;
|
|
DWORD size;
|
|
|
|
for (ptr = pbEncoded + 2; ret && ptr - pbEncoded - 2 < pbEncoded[1]; )
|
|
{
|
|
ret = CRYPT_AsnDecodeRdnAttr(dwCertEncodingType, ptr,
|
|
cbEncoded - (ptr - pbEncoded), dwFlags, NULL, &size);
|
|
if (ret)
|
|
{
|
|
cRDNAttr++;
|
|
bytesNeeded += size;
|
|
ptr += ptr[1] + 2;
|
|
}
|
|
}
|
|
}
|
|
if (ret)
|
|
{
|
|
if (!rdn)
|
|
{
|
|
*pcbRdn = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (*pcbRdn < bytesNeeded)
|
|
{
|
|
*pcbRdn = bytesNeeded;
|
|
SetLastError(ERROR_MORE_DATA);
|
|
return FALSE;
|
|
}
|
|
*pcbRdn = bytesNeeded;
|
|
rdn->cRDNAttr = cRDNAttr;
|
|
if (rdn->cRDNAttr == 0)
|
|
rdn->rgRDNAttr = NULL;
|
|
else
|
|
{
|
|
DWORD size, i;
|
|
BYTE *nextData;
|
|
const BYTE *ptr;
|
|
|
|
rdn->rgRDNAttr = (CERT_RDN_ATTR *)((BYTE *)rdn + sizeof(CERT_RDN));
|
|
nextData = (BYTE *)rdn->rgRDNAttr +
|
|
rdn->cRDNAttr * sizeof(CERT_RDN_ATTR);
|
|
for (i = 0, ptr = pbEncoded + 2; ret && i < cRDNAttr &&
|
|
ptr - pbEncoded - 2 < pbEncoded[1]; i++)
|
|
{
|
|
rdn->rgRDNAttr[i].Value.pbData = nextData;
|
|
size = bytesNeeded;
|
|
ret = CRYPT_AsnDecodeRdnAttr(dwCertEncodingType, ptr,
|
|
cbEncoded - (ptr - pbEncoded), dwFlags, &rdn->rgRDNAttr[i],
|
|
&size);
|
|
if (ret)
|
|
{
|
|
bytesNeeded -= size;
|
|
/* If dwFlags & CRYPT_DECODE_NOCOPY_FLAG, the data may not
|
|
* have been copied.
|
|
*/
|
|
if (rdn->rgRDNAttr[i].Value.pbData == nextData)
|
|
nextData += rdn->rgRDNAttr[i].Value.cbData;
|
|
/* Ugly: the OID, if copied, is stored in memory after the
|
|
* value, so increment by its string length if it's set and
|
|
* points here.
|
|
*/
|
|
if ((const BYTE *)rdn->rgRDNAttr[i].pszObjId == nextData)
|
|
nextData += strlen(rdn->rgRDNAttr[i].pszObjId) + 1;
|
|
ptr += ptr[1] + 2;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeName(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo)
|
|
{
|
|
BOOL ret = TRUE;
|
|
DWORD bytesNeeded, cRDN = 0;
|
|
|
|
if (!pbEncoded || !cbEncoded)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[0] != (ASN_CONSTRUCTOR | ASN_SEQUENCEOF))
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
if (cbEncoded <= 1)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
bytesNeeded = sizeof(CERT_NAME_INFO);
|
|
if (pbEncoded[1])
|
|
{
|
|
const BYTE *ptr;
|
|
DWORD size;
|
|
|
|
for (ptr = pbEncoded + 2; ret && ptr - pbEncoded - 2 < pbEncoded[1]; )
|
|
{
|
|
ret = CRYPT_AsnDecodeRdn(dwCertEncodingType, ptr,
|
|
cbEncoded - (ptr - pbEncoded), dwFlags, NULL, &size);
|
|
if (ret)
|
|
{
|
|
cRDN++;
|
|
bytesNeeded += size;
|
|
ptr += ptr[1] + 2;
|
|
}
|
|
}
|
|
}
|
|
if (ret)
|
|
{
|
|
CERT_NAME_INFO *info;
|
|
|
|
if (!pvStructInfo)
|
|
{
|
|
*pcbStructInfo = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (!CRYPT_DecodeEnsureSpace(dwFlags, pDecodePara, pvStructInfo,
|
|
pcbStructInfo, bytesNeeded))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_DECODE_ALLOC_FLAG)
|
|
pvStructInfo = *(BYTE **)pvStructInfo;
|
|
info = (CERT_NAME_INFO *)pvStructInfo;
|
|
info->cRDN = cRDN;
|
|
if (info->cRDN == 0)
|
|
info->rgRDN = NULL;
|
|
else
|
|
{
|
|
DWORD size, i;
|
|
BYTE *nextData;
|
|
const BYTE *ptr;
|
|
|
|
info->rgRDN = (CERT_RDN *)((BYTE *)pvStructInfo +
|
|
sizeof(CERT_NAME_INFO));
|
|
nextData = (BYTE *)info->rgRDN + info->cRDN * sizeof(CERT_RDN);
|
|
for (i = 0, ptr = pbEncoded + 2; ret && i < cRDN &&
|
|
ptr - pbEncoded - 2 < pbEncoded[1]; i++)
|
|
{
|
|
info->rgRDN[i].rgRDNAttr = (CERT_RDN_ATTR *)nextData;
|
|
size = bytesNeeded;
|
|
ret = CRYPT_AsnDecodeRdn(dwCertEncodingType, ptr,
|
|
cbEncoded - (ptr - pbEncoded), dwFlags, &info->rgRDN[i],
|
|
&size);
|
|
if (ret)
|
|
{
|
|
nextData += size;
|
|
bytesNeeded -= size;
|
|
ptr += ptr[1] + 2;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeInt(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo)
|
|
{
|
|
int val, i;
|
|
|
|
if (!pbEncoded || !cbEncoded)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
if (!pvStructInfo)
|
|
{
|
|
*pcbStructInfo = sizeof(int);
|
|
return TRUE;
|
|
}
|
|
if (pbEncoded[0] != ASN_INTEGER)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
if (cbEncoded <= 1)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[1] == 0)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_CORRUPT);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[1] > sizeof(int))
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_LARGE);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[2] & 0x80)
|
|
{
|
|
/* initialize to a negative value to sign-extend */
|
|
val = -1;
|
|
}
|
|
else
|
|
val = 0;
|
|
for (i = 0; i < pbEncoded[1]; i++)
|
|
{
|
|
val <<= 8;
|
|
val |= pbEncoded[2 + i];
|
|
}
|
|
if (!CRYPT_DecodeEnsureSpace(dwFlags, pDecodePara, pvStructInfo,
|
|
pcbStructInfo, sizeof(int)))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_DECODE_ALLOC_FLAG)
|
|
pvStructInfo = *(BYTE **)pvStructInfo;
|
|
memcpy(pvStructInfo, &val, sizeof(int));
|
|
return TRUE;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeInteger(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo)
|
|
{
|
|
DWORD bytesNeeded;
|
|
CRYPT_INTEGER_BLOB *blob;
|
|
|
|
if (!pbEncoded || !cbEncoded)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[0] != ASN_INTEGER)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
if (cbEncoded <= 1)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
if (pbEncoded[1] > cbEncoded)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
bytesNeeded = pbEncoded[1] + sizeof(CRYPT_INTEGER_BLOB);
|
|
if (!pvStructInfo)
|
|
{
|
|
*pcbStructInfo = bytesNeeded;
|
|
return TRUE;
|
|
}
|
|
if (!CRYPT_DecodeEnsureSpace(dwFlags, pDecodePara, pvStructInfo,
|
|
pcbStructInfo, bytesNeeded))
|
|
return FALSE;
|
|
if (dwFlags & CRYPT_DECODE_ALLOC_FLAG)
|
|
pvStructInfo = *(BYTE **)pvStructInfo;
|
|
blob = (CRYPT_INTEGER_BLOB *)pvStructInfo;
|
|
blob->cbData = pbEncoded[1];
|
|
blob->pbData = (BYTE *)pvStructInfo + sizeof(CRYPT_INTEGER_BLOB);
|
|
if (blob->cbData)
|
|
{
|
|
DWORD i;
|
|
|
|
for (i = 0; i < blob->cbData; i++)
|
|
blob->pbData[i] = *(pbEncoded + 2 + pbEncoded[1] - i - 1);
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
#define CRYPT_TIME_GET_DIGITS(pbEncoded, len, numDigits, word) \
|
|
do { \
|
|
BYTE i; \
|
|
\
|
|
(word) = 0; \
|
|
for (i = 0; (len) > 0 && i < (numDigits); i++, (len)--) \
|
|
{ \
|
|
if (!isdigit(*(pbEncoded))) \
|
|
{ \
|
|
SetLastError(CRYPT_E_ASN1_CORRUPT); \
|
|
return FALSE; \
|
|
} \
|
|
(word) *= 10; \
|
|
(word) += *(pbEncoded)++ - '0'; \
|
|
} \
|
|
} while (0)
|
|
|
|
static BOOL CRYPT_AsnDecodeTimeZone(const BYTE *pbEncoded, DWORD len,
|
|
SYSTEMTIME *sysTime)
|
|
{
|
|
BOOL ret = TRUE;
|
|
|
|
if (len >= 3 && (*pbEncoded == '+' || *pbEncoded == '-'))
|
|
{
|
|
WORD hours, minutes = 0;
|
|
BYTE sign = *pbEncoded++;
|
|
|
|
len--;
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, hours);
|
|
if (hours >= 24)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_CORRUPT);
|
|
ret = FALSE;
|
|
goto end;
|
|
}
|
|
if (len >= 2)
|
|
{
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, minutes);
|
|
if (minutes >= 60)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_CORRUPT);
|
|
ret = FALSE;
|
|
goto end;
|
|
}
|
|
}
|
|
if (sign == '+')
|
|
{
|
|
sysTime->wHour += hours;
|
|
sysTime->wMinute += minutes;
|
|
}
|
|
else
|
|
{
|
|
if (hours > sysTime->wHour)
|
|
{
|
|
sysTime->wDay--;
|
|
sysTime->wHour = 24 - (hours - sysTime->wHour);
|
|
}
|
|
else
|
|
sysTime->wHour -= hours;
|
|
if (minutes > sysTime->wMinute)
|
|
{
|
|
sysTime->wHour--;
|
|
sysTime->wMinute = 60 - (minutes - sysTime->wMinute);
|
|
}
|
|
else
|
|
sysTime->wMinute -= minutes;
|
|
}
|
|
}
|
|
end:
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeUtcTime(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo)
|
|
{
|
|
SYSTEMTIME sysTime = { 0 };
|
|
BYTE len;
|
|
BOOL ret = TRUE;
|
|
|
|
if (!pbEncoded || !cbEncoded)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
if (!pvStructInfo)
|
|
{
|
|
*pcbStructInfo = sizeof(FILETIME);
|
|
return TRUE;
|
|
}
|
|
if (pbEncoded[0] != ASN_UTCTIME)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
if (cbEncoded <= 1)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
len = pbEncoded[1];
|
|
/* FIXME: magic # */
|
|
if (len < 10)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_CORRUPT);
|
|
return FALSE;
|
|
}
|
|
pbEncoded += 2;
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wYear);
|
|
if (sysTime.wYear >= 50)
|
|
sysTime.wYear += 1900;
|
|
else
|
|
sysTime.wYear += 2000;
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wMonth);
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wDay);
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wHour);
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wMinute);
|
|
if (len > 0)
|
|
{
|
|
if (len >= 2 && isdigit(*pbEncoded) && isdigit(*(pbEncoded + 1)))
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wSecond);
|
|
else if (isdigit(*pbEncoded))
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 1, sysTime.wSecond);
|
|
ret = CRYPT_AsnDecodeTimeZone(pbEncoded, len, &sysTime);
|
|
}
|
|
if (ret)
|
|
{
|
|
if (!CRYPT_DecodeEnsureSpace(dwFlags, pDecodePara, pvStructInfo,
|
|
pcbStructInfo, sizeof(FILETIME)))
|
|
ret = FALSE;
|
|
else
|
|
{
|
|
if (dwFlags & CRYPT_DECODE_ALLOC_FLAG)
|
|
pvStructInfo = *(BYTE **)pvStructInfo;
|
|
ret = SystemTimeToFileTime(&sysTime, (FILETIME *)pvStructInfo);
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeGeneralizedTime(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo)
|
|
{
|
|
SYSTEMTIME sysTime = { 0 };
|
|
BYTE len;
|
|
BOOL ret = TRUE;
|
|
|
|
if (!pbEncoded || !cbEncoded)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
if (!pvStructInfo)
|
|
{
|
|
*pcbStructInfo = sizeof(FILETIME);
|
|
return TRUE;
|
|
}
|
|
if (pbEncoded[0] != ASN_GENERALTIME)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
return FALSE;
|
|
}
|
|
if (cbEncoded <= 1)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_EOD);
|
|
return FALSE;
|
|
}
|
|
len = pbEncoded[1];
|
|
/* FIXME: magic # */
|
|
if (len < 10)
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_CORRUPT);
|
|
return FALSE;
|
|
}
|
|
pbEncoded += 2;
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 4, sysTime.wYear);
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wMonth);
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wDay);
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wHour);
|
|
if (len > 0)
|
|
{
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wMinute);
|
|
if (len > 0)
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, 2, sysTime.wSecond);
|
|
if (len > 0 && (*pbEncoded == '.' || *pbEncoded == ','))
|
|
{
|
|
BYTE digits;
|
|
|
|
pbEncoded++;
|
|
len--;
|
|
digits = min(len, 3); /* workaround macro weirdness */
|
|
CRYPT_TIME_GET_DIGITS(pbEncoded, len, digits,
|
|
sysTime.wMilliseconds);
|
|
}
|
|
ret = CRYPT_AsnDecodeTimeZone(pbEncoded, len, &sysTime);
|
|
}
|
|
if (ret)
|
|
{
|
|
if (!CRYPT_DecodeEnsureSpace(dwFlags, pDecodePara, pvStructInfo,
|
|
pcbStructInfo, sizeof(FILETIME)))
|
|
ret = FALSE;
|
|
else
|
|
{
|
|
if (dwFlags & CRYPT_DECODE_ALLOC_FLAG)
|
|
pvStructInfo = *(BYTE **)pvStructInfo;
|
|
ret = SystemTimeToFileTime(&sysTime, (FILETIME *)pvStructInfo);
|
|
}
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static BOOL WINAPI CRYPT_AsnDecodeChoiceOfTime(DWORD dwCertEncodingType,
|
|
LPCSTR lpszStructType, const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo)
|
|
{
|
|
BOOL ret;
|
|
|
|
if (!pbEncoded || !cbEncoded)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
if (!pvStructInfo)
|
|
{
|
|
*pcbStructInfo = sizeof(FILETIME);
|
|
return TRUE;
|
|
}
|
|
|
|
if (pbEncoded[0] == ASN_UTCTIME)
|
|
ret = CRYPT_AsnDecodeUtcTime(dwCertEncodingType, lpszStructType,
|
|
pbEncoded, cbEncoded, dwFlags, pDecodePara, pvStructInfo,
|
|
pcbStructInfo);
|
|
else if (pbEncoded[0] == ASN_GENERALTIME)
|
|
ret = CRYPT_AsnDecodeGeneralizedTime(dwCertEncodingType,
|
|
lpszStructType, pbEncoded, cbEncoded, dwFlags, pDecodePara,
|
|
pvStructInfo, pcbStructInfo);
|
|
else
|
|
{
|
|
SetLastError(CRYPT_E_ASN1_BADTAG);
|
|
ret = FALSE;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
typedef BOOL (WINAPI *CryptDecodeObjectExFunc)(DWORD, LPCSTR, const BYTE *,
|
|
DWORD, DWORD, PCRYPT_DECODE_PARA, void *, DWORD *);
|
|
|
|
BOOL WINAPI CryptDecodeObjectEx(DWORD dwCertEncodingType, LPCSTR lpszStructType,
|
|
const BYTE *pbEncoded, DWORD cbEncoded, DWORD dwFlags,
|
|
PCRYPT_DECODE_PARA pDecodePara, void *pvStructInfo, DWORD *pcbStructInfo)
|
|
{
|
|
BOOL ret = FALSE;
|
|
HMODULE lib = NULL;
|
|
CryptDecodeObjectExFunc decodeFunc = NULL;
|
|
|
|
TRACE("(0x%08lx, %s, %p, %ld, 0x%08lx, %p, %p, %p): semi-stub\n",
|
|
dwCertEncodingType, HIWORD(lpszStructType) ? debugstr_a(lpszStructType) :
|
|
"(integer value)", pbEncoded, cbEncoded, dwFlags, pDecodePara,
|
|
pvStructInfo, pcbStructInfo);
|
|
|
|
if (!pvStructInfo && !pcbStructInfo)
|
|
{
|
|
SetLastError(ERROR_INVALID_PARAMETER);
|
|
return FALSE;
|
|
}
|
|
if ((dwCertEncodingType & CERT_ENCODING_TYPE_MASK) != X509_ASN_ENCODING
|
|
&& (dwCertEncodingType & CMSG_ENCODING_TYPE_MASK) != PKCS_7_ASN_ENCODING)
|
|
{
|
|
SetLastError(ERROR_FILE_NOT_FOUND);
|
|
return FALSE;
|
|
}
|
|
|
|
SetLastError(NOERROR);
|
|
if (!HIWORD(lpszStructType))
|
|
{
|
|
switch (LOWORD(lpszStructType))
|
|
{
|
|
case (WORD)X509_NAME:
|
|
decodeFunc = CRYPT_AsnDecodeName;
|
|
break;
|
|
case (WORD)X509_INTEGER:
|
|
decodeFunc = CRYPT_AsnDecodeInt;
|
|
break;
|
|
case (WORD)X509_MULTI_BYTE_INTEGER:
|
|
decodeFunc = CRYPT_AsnDecodeInteger;
|
|
break;
|
|
case (WORD)X509_CHOICE_OF_TIME:
|
|
decodeFunc = CRYPT_AsnDecodeChoiceOfTime;
|
|
break;
|
|
case (WORD)PKCS_UTC_TIME:
|
|
decodeFunc = CRYPT_AsnDecodeUtcTime;
|
|
break;
|
|
default:
|
|
FIXME("%d: unimplemented\n", LOWORD(lpszStructType));
|
|
}
|
|
}
|
|
else if (!strcmp(lpszStructType, szOID_RSA_signingTime))
|
|
decodeFunc = CRYPT_AsnDecodeUtcTime;
|
|
if (!decodeFunc)
|
|
decodeFunc = (CryptDecodeObjectExFunc)CRYPT_GetFunc(dwCertEncodingType,
|
|
lpszStructType, "CryptDecodeObjectEx", &lib);
|
|
if (decodeFunc)
|
|
ret = decodeFunc(dwCertEncodingType, lpszStructType, pbEncoded,
|
|
cbEncoded, dwFlags, pDecodePara, pvStructInfo, pcbStructInfo);
|
|
else
|
|
SetLastError(ERROR_FILE_NOT_FOUND);
|
|
if (lib)
|
|
FreeLibrary(lib);
|
|
return ret;
|
|
}
|