1038 строки
33 KiB
C
1038 строки
33 KiB
C
/***************************************************************************
|
|
* _ _ ____ _
|
|
* Project ___| | | | _ \| |
|
|
* / __| | | | |_) | |
|
|
* | (__| |_| | _ <| |___
|
|
* \___|\___/|_| \_\_____|
|
|
*
|
|
* Copyright (C) 1998 - 2014, Daniel Stenberg, <daniel@haxx.se>, et al.
|
|
*
|
|
* This software is licensed as described in the file COPYING, which
|
|
* you should have received as part of this distribution. The terms
|
|
* are also available at http://curl.haxx.se/docs/copyright.html.
|
|
*
|
|
* You may opt to use, copy, modify, merge, publish, distribute and/or sell
|
|
* copies of the Software, and permit persons to whom the Software is
|
|
* furnished to do so, under the terms of the COPYING file.
|
|
*
|
|
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
|
* KIND, either express or implied.
|
|
*
|
|
***************************************************************************/
|
|
|
|
#include "curl_setup.h"
|
|
|
|
#ifdef USE_NTLM
|
|
|
|
/*
|
|
* NTLM details:
|
|
*
|
|
* http://davenport.sourceforge.net/ntlm.html
|
|
* http://www.innovation.ch/java/ntlm.html
|
|
*/
|
|
|
|
#define DEBUG_ME 0
|
|
|
|
#include "urldata.h"
|
|
#include "non-ascii.h"
|
|
#include "sendf.h"
|
|
#include "curl_base64.h"
|
|
#include "curl_ntlm_core.h"
|
|
#include "curl_gethostname.h"
|
|
#include "curl_multibyte.h"
|
|
#include "warnless.h"
|
|
#include "curl_memory.h"
|
|
|
|
#ifdef USE_WINDOWS_SSPI
|
|
# include "curl_sspi.h"
|
|
#endif
|
|
|
|
#include "vtls/vtls.h"
|
|
|
|
#define BUILDING_CURL_NTLM_MSGS_C
|
|
#include "curl_ntlm_msgs.h"
|
|
|
|
#define _MPRINTF_REPLACE /* use our functions only */
|
|
#include <curl/mprintf.h>
|
|
|
|
/* The last #include file should be: */
|
|
#include "memdebug.h"
|
|
|
|
/* "NTLMSSP" signature is always in ASCII regardless of the platform */
|
|
#define NTLMSSP_SIGNATURE "\x4e\x54\x4c\x4d\x53\x53\x50"
|
|
|
|
#define SHORTPAIR(x) ((x) & 0xff), (((x) >> 8) & 0xff)
|
|
#define LONGQUARTET(x) ((x) & 0xff), (((x) >> 8) & 0xff), \
|
|
(((x) >> 16) & 0xff), (((x) >> 24) & 0xff)
|
|
|
|
#if DEBUG_ME
|
|
# define DEBUG_OUT(x) x
|
|
static void ntlm_print_flags(FILE *handle, unsigned long flags)
|
|
{
|
|
if(flags & NTLMFLAG_NEGOTIATE_UNICODE)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_UNICODE ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_OEM)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_OEM ");
|
|
if(flags & NTLMFLAG_REQUEST_TARGET)
|
|
fprintf(handle, "NTLMFLAG_REQUEST_TARGET ");
|
|
if(flags & (1<<3))
|
|
fprintf(handle, "NTLMFLAG_UNKNOWN_3 ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_SIGN)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_SIGN ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_SEAL)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_SEAL ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_DATAGRAM_STYLE)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_DATAGRAM_STYLE ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_LM_KEY)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_LM_KEY ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_NETWARE)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_NETWARE ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_NTLM_KEY)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_NTLM_KEY ");
|
|
if(flags & (1<<10))
|
|
fprintf(handle, "NTLMFLAG_UNKNOWN_10 ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_ANONYMOUS)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_ANONYMOUS ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_DOMAIN_SUPPLIED)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_DOMAIN_SUPPLIED ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_WORKSTATION_SUPPLIED)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_WORKSTATION_SUPPLIED ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_LOCAL_CALL)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_LOCAL_CALL ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_ALWAYS_SIGN)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_ALWAYS_SIGN ");
|
|
if(flags & NTLMFLAG_TARGET_TYPE_DOMAIN)
|
|
fprintf(handle, "NTLMFLAG_TARGET_TYPE_DOMAIN ");
|
|
if(flags & NTLMFLAG_TARGET_TYPE_SERVER)
|
|
fprintf(handle, "NTLMFLAG_TARGET_TYPE_SERVER ");
|
|
if(flags & NTLMFLAG_TARGET_TYPE_SHARE)
|
|
fprintf(handle, "NTLMFLAG_TARGET_TYPE_SHARE ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_NTLM2_KEY)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_NTLM2_KEY ");
|
|
if(flags & NTLMFLAG_REQUEST_INIT_RESPONSE)
|
|
fprintf(handle, "NTLMFLAG_REQUEST_INIT_RESPONSE ");
|
|
if(flags & NTLMFLAG_REQUEST_ACCEPT_RESPONSE)
|
|
fprintf(handle, "NTLMFLAG_REQUEST_ACCEPT_RESPONSE ");
|
|
if(flags & NTLMFLAG_REQUEST_NONNT_SESSION_KEY)
|
|
fprintf(handle, "NTLMFLAG_REQUEST_NONNT_SESSION_KEY ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_TARGET_INFO)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_TARGET_INFO ");
|
|
if(flags & (1<<24))
|
|
fprintf(handle, "NTLMFLAG_UNKNOWN_24 ");
|
|
if(flags & (1<<25))
|
|
fprintf(handle, "NTLMFLAG_UNKNOWN_25 ");
|
|
if(flags & (1<<26))
|
|
fprintf(handle, "NTLMFLAG_UNKNOWN_26 ");
|
|
if(flags & (1<<27))
|
|
fprintf(handle, "NTLMFLAG_UNKNOWN_27 ");
|
|
if(flags & (1<<28))
|
|
fprintf(handle, "NTLMFLAG_UNKNOWN_28 ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_128)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_128 ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_KEY_EXCHANGE)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_KEY_EXCHANGE ");
|
|
if(flags & NTLMFLAG_NEGOTIATE_56)
|
|
fprintf(handle, "NTLMFLAG_NEGOTIATE_56 ");
|
|
}
|
|
|
|
static void ntlm_print_hex(FILE *handle, const char *buf, size_t len)
|
|
{
|
|
const char *p = buf;
|
|
(void)handle;
|
|
fprintf(stderr, "0x");
|
|
while(len-- > 0)
|
|
fprintf(stderr, "%02.2x", (unsigned int)*p++);
|
|
}
|
|
#else
|
|
# define DEBUG_OUT(x) Curl_nop_stmt
|
|
#endif
|
|
|
|
#ifndef USE_WINDOWS_SSPI
|
|
/*
|
|
* This function converts from the little endian format used in the
|
|
* incoming package to whatever endian format we're using natively.
|
|
* Argument is a pointer to a 4 byte buffer.
|
|
*/
|
|
static unsigned int readint_le(unsigned char *buf)
|
|
{
|
|
return ((unsigned int)buf[0]) | ((unsigned int)buf[1] << 8) |
|
|
((unsigned int)buf[2] << 16) | ((unsigned int)buf[3] << 24);
|
|
}
|
|
|
|
/*
|
|
* This function converts from the little endian format used in the incoming
|
|
* package to whatever endian format we're using natively. Argument is a
|
|
* pointer to a 2 byte buffer.
|
|
*/
|
|
static unsigned int readshort_le(unsigned char *buf)
|
|
{
|
|
return ((unsigned int)buf[0]) | ((unsigned int)buf[1] << 8);
|
|
}
|
|
|
|
/*
|
|
* Curl_ntlm_decode_type2_target()
|
|
*
|
|
* This is used to decode the "target info" in the ntlm type-2 message
|
|
* received.
|
|
*
|
|
* Parameters:
|
|
*
|
|
* data [in] - Pointer to the session handle
|
|
* buffer [in] - The decoded base64 ntlm header of Type 2
|
|
* size [in] - The input buffer size, atleast 32 bytes
|
|
* ntlm [in] - Pointer to ntlm data struct being used and modified.
|
|
*
|
|
* Returns CURLE_OK on success.
|
|
*/
|
|
CURLcode Curl_ntlm_decode_type2_target(struct SessionHandle *data,
|
|
unsigned char *buffer,
|
|
size_t size,
|
|
struct ntlmdata *ntlm)
|
|
{
|
|
unsigned int target_info_len = 0;
|
|
unsigned int target_info_offset = 0;
|
|
|
|
Curl_safefree(ntlm->target_info);
|
|
ntlm->target_info_len = 0;
|
|
|
|
if(size >= 48) {
|
|
target_info_len = readshort_le(&buffer[40]);
|
|
target_info_offset = readint_le(&buffer[44]);
|
|
if(target_info_len > 0) {
|
|
if(((target_info_offset + target_info_len) > size) ||
|
|
(target_info_offset < 48)) {
|
|
infof(data, "NTLM handshake failure (bad type-2 message). "
|
|
"Target Info Offset Len is set incorrect by the peer\n");
|
|
return CURLE_REMOTE_ACCESS_DENIED;
|
|
}
|
|
|
|
ntlm->target_info = malloc(target_info_len);
|
|
if(!ntlm->target_info)
|
|
return CURLE_OUT_OF_MEMORY;
|
|
|
|
memcpy(ntlm->target_info, &buffer[target_info_offset], target_info_len);
|
|
ntlm->target_info_len = target_info_len;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return CURLE_OK;
|
|
}
|
|
|
|
#endif
|
|
|
|
/*
|
|
NTLM message structure notes:
|
|
|
|
A 'short' is a 'network short', a little-endian 16-bit unsigned value.
|
|
|
|
A 'long' is a 'network long', a little-endian, 32-bit unsigned value.
|
|
|
|
A 'security buffer' represents a triplet used to point to a buffer,
|
|
consisting of two shorts and one long:
|
|
|
|
1. A 'short' containing the length of the buffer content in bytes.
|
|
2. A 'short' containing the allocated space for the buffer in bytes.
|
|
3. A 'long' containing the offset to the start of the buffer in bytes,
|
|
from the beginning of the NTLM message.
|
|
*/
|
|
|
|
/*
|
|
* Curl_ntlm_decode_type2_message()
|
|
*
|
|
* This is used to decode a ntlm type-2 message received from a HTTP or SASL
|
|
* based (such as SMTP, POP3 or IMAP) server. The message is first decoded
|
|
* from a base64 string into a raw ntlm message and checked for validity
|
|
* before the appropriate data for creating a type-3 message is written to
|
|
* the given ntlm data structure.
|
|
*
|
|
* Parameters:
|
|
*
|
|
* data [in] - Pointer to session handle.
|
|
* header [in] - Pointer to the input buffer.
|
|
* ntlm [in] - Pointer to ntlm data struct being used and modified.
|
|
*
|
|
* Returns CURLE_OK on success.
|
|
*/
|
|
CURLcode Curl_ntlm_decode_type2_message(struct SessionHandle *data,
|
|
const char *header,
|
|
struct ntlmdata *ntlm)
|
|
{
|
|
#ifndef USE_WINDOWS_SSPI
|
|
static const char type2_marker[] = { 0x02, 0x00, 0x00, 0x00 };
|
|
#endif
|
|
|
|
/* NTLM type-2 message structure:
|
|
|
|
Index Description Content
|
|
0 NTLMSSP Signature Null-terminated ASCII "NTLMSSP"
|
|
(0x4e544c4d53535000)
|
|
8 NTLM Message Type long (0x02000000)
|
|
12 Target Name security buffer
|
|
20 Flags long
|
|
24 Challenge 8 bytes
|
|
(32) Context 8 bytes (two consecutive longs) (*)
|
|
(40) Target Information security buffer (*)
|
|
(48) OS Version Structure 8 bytes (*)
|
|
32 (48) (56) Start of data block (*)
|
|
(*) -> Optional
|
|
*/
|
|
|
|
size_t size = 0;
|
|
unsigned char *buffer = NULL;
|
|
CURLcode error;
|
|
|
|
#if defined(CURL_DISABLE_VERBOSE_STRINGS) || defined(USE_WINDOWS_SSPI)
|
|
(void)data;
|
|
#endif
|
|
|
|
error = Curl_base64_decode(header, &buffer, &size);
|
|
if(error)
|
|
return error;
|
|
|
|
if(!buffer) {
|
|
infof(data, "NTLM handshake failure (unhandled condition)\n");
|
|
return CURLE_REMOTE_ACCESS_DENIED;
|
|
}
|
|
|
|
#ifdef USE_WINDOWS_SSPI
|
|
ntlm->type_2 = malloc(size + 1);
|
|
if(ntlm->type_2 == NULL) {
|
|
free(buffer);
|
|
return CURLE_OUT_OF_MEMORY;
|
|
}
|
|
ntlm->n_type_2 = curlx_uztoul(size);
|
|
memcpy(ntlm->type_2, buffer, size);
|
|
#else
|
|
ntlm->flags = 0;
|
|
|
|
if((size < 32) ||
|
|
(memcmp(buffer, NTLMSSP_SIGNATURE, 8) != 0) ||
|
|
(memcmp(buffer + 8, type2_marker, sizeof(type2_marker)) != 0)) {
|
|
/* This was not a good enough type-2 message */
|
|
free(buffer);
|
|
infof(data, "NTLM handshake failure (bad type-2 message)\n");
|
|
return CURLE_REMOTE_ACCESS_DENIED;
|
|
}
|
|
|
|
ntlm->flags = readint_le(&buffer[20]);
|
|
memcpy(ntlm->nonce, &buffer[24], 8);
|
|
|
|
if(ntlm->flags & NTLMFLAG_NEGOTIATE_TARGET_INFO) {
|
|
error = Curl_ntlm_decode_type2_target(data, buffer, size, ntlm);
|
|
if(error) {
|
|
free(buffer);
|
|
infof(data, "NTLM handshake failure (bad type-2 message)\n");
|
|
return error;
|
|
}
|
|
}
|
|
|
|
DEBUG_OUT({
|
|
fprintf(stderr, "**** TYPE2 header flags=0x%08.8lx ", ntlm->flags);
|
|
ntlm_print_flags(stderr, ntlm->flags);
|
|
fprintf(stderr, "\n nonce=");
|
|
ntlm_print_hex(stderr, (char *)ntlm->nonce, 8);
|
|
fprintf(stderr, "\n****\n");
|
|
fprintf(stderr, "**** Header %s\n ", header);
|
|
});
|
|
#endif
|
|
free(buffer);
|
|
|
|
return CURLE_OK;
|
|
}
|
|
|
|
#ifdef USE_WINDOWS_SSPI
|
|
void Curl_ntlm_sspi_cleanup(struct ntlmdata *ntlm)
|
|
{
|
|
Curl_safefree(ntlm->type_2);
|
|
if(ntlm->has_handles) {
|
|
s_pSecFn->DeleteSecurityContext(&ntlm->c_handle);
|
|
s_pSecFn->FreeCredentialsHandle(&ntlm->handle);
|
|
ntlm->has_handles = 0;
|
|
}
|
|
if(ntlm->p_identity) {
|
|
Curl_safefree(ntlm->identity.User);
|
|
Curl_safefree(ntlm->identity.Password);
|
|
Curl_safefree(ntlm->identity.Domain);
|
|
ntlm->p_identity = NULL;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
#ifndef USE_WINDOWS_SSPI
|
|
/* copy the source to the destination and fill in zeroes in every
|
|
other destination byte! */
|
|
static void unicodecpy(unsigned char *dest, const char *src, size_t length)
|
|
{
|
|
size_t i;
|
|
for(i = 0; i < length; i++) {
|
|
dest[2 * i] = (unsigned char)src[i];
|
|
dest[2 * i + 1] = '\0';
|
|
}
|
|
}
|
|
#endif
|
|
|
|
/*
|
|
* Curl_ntlm_create_type1_message()
|
|
*
|
|
* This is used to generate an already encoded NTLM type-1 message ready for
|
|
* sending to the recipient, be it a HTTP or SASL based (such as SMTP, POP3
|
|
* or IMAP) server, using the appropriate compile time crypo API.
|
|
*
|
|
* Parameters:
|
|
*
|
|
* userp [in] - The user name in the format User or Domain\User.
|
|
* passdwp [in] - The user's password.
|
|
* ntlm [in/out] - The ntlm data struct being used and modified.
|
|
* outptr [in/out] - The address where a pointer to newly allocated memory
|
|
* holding the result will be stored upon completion.
|
|
* outlen [out] - The length of the output message.
|
|
*
|
|
* Returns CURLE_OK on success.
|
|
*/
|
|
CURLcode Curl_ntlm_create_type1_message(const char *userp,
|
|
const char *passwdp,
|
|
struct ntlmdata *ntlm,
|
|
char **outptr,
|
|
size_t *outlen)
|
|
{
|
|
/* NTLM type-1 message structure:
|
|
|
|
Index Description Content
|
|
0 NTLMSSP Signature Null-terminated ASCII "NTLMSSP"
|
|
(0x4e544c4d53535000)
|
|
8 NTLM Message Type long (0x01000000)
|
|
12 Flags long
|
|
(16) Supplied Domain security buffer (*)
|
|
(24) Supplied Workstation security buffer (*)
|
|
(32) OS Version Structure 8 bytes (*)
|
|
(32) (40) Start of data block (*)
|
|
(*) -> Optional
|
|
*/
|
|
|
|
unsigned char ntlmbuf[NTLM_BUFSIZE];
|
|
size_t size;
|
|
|
|
#ifdef USE_WINDOWS_SSPI
|
|
|
|
SecBuffer buf;
|
|
SecBufferDesc desc;
|
|
SECURITY_STATUS status;
|
|
unsigned long attrs;
|
|
xcharp_u useranddomain;
|
|
xcharp_u user, dup_user;
|
|
xcharp_u domain, dup_domain;
|
|
xcharp_u passwd, dup_passwd;
|
|
size_t domlen = 0;
|
|
TimeStamp tsDummy; /* For Windows 9x compatibility of SSPI calls */
|
|
|
|
domain.const_tchar_ptr = TEXT("");
|
|
|
|
Curl_ntlm_sspi_cleanup(ntlm);
|
|
|
|
if(userp && *userp) {
|
|
|
|
/* null initialize ntlm identity's data to allow proper cleanup */
|
|
ntlm->p_identity = &ntlm->identity;
|
|
memset(ntlm->p_identity, 0, sizeof(*ntlm->p_identity));
|
|
|
|
useranddomain.tchar_ptr = Curl_convert_UTF8_to_tchar((char *)userp);
|
|
if(!useranddomain.tchar_ptr)
|
|
return CURLE_OUT_OF_MEMORY;
|
|
|
|
user.const_tchar_ptr = _tcschr(useranddomain.const_tchar_ptr, TEXT('\\'));
|
|
if(!user.const_tchar_ptr)
|
|
user.const_tchar_ptr = _tcschr(useranddomain.const_tchar_ptr, TEXT('/'));
|
|
|
|
if(user.tchar_ptr) {
|
|
domain.tchar_ptr = useranddomain.tchar_ptr;
|
|
domlen = user.tchar_ptr - useranddomain.tchar_ptr;
|
|
user.tchar_ptr++;
|
|
}
|
|
else {
|
|
user.tchar_ptr = useranddomain.tchar_ptr;
|
|
domain.const_tchar_ptr = TEXT("");
|
|
domlen = 0;
|
|
}
|
|
|
|
/* setup ntlm identity's user and length */
|
|
dup_user.tchar_ptr = _tcsdup(user.tchar_ptr);
|
|
if(!dup_user.tchar_ptr) {
|
|
Curl_unicodefree(useranddomain.tchar_ptr);
|
|
return CURLE_OUT_OF_MEMORY;
|
|
}
|
|
ntlm->identity.User = dup_user.tbyte_ptr;
|
|
ntlm->identity.UserLength = curlx_uztoul(_tcslen(dup_user.tchar_ptr));
|
|
dup_user.tchar_ptr = NULL;
|
|
|
|
/* setup ntlm identity's domain and length */
|
|
dup_domain.tchar_ptr = malloc(sizeof(TCHAR) * (domlen + 1));
|
|
if(!dup_domain.tchar_ptr) {
|
|
Curl_unicodefree(useranddomain.tchar_ptr);
|
|
return CURLE_OUT_OF_MEMORY;
|
|
}
|
|
_tcsncpy(dup_domain.tchar_ptr, domain.tchar_ptr, domlen);
|
|
*(dup_domain.tchar_ptr + domlen) = TEXT('\0');
|
|
ntlm->identity.Domain = dup_domain.tbyte_ptr;
|
|
ntlm->identity.DomainLength = curlx_uztoul(domlen);
|
|
dup_domain.tchar_ptr = NULL;
|
|
|
|
Curl_unicodefree(useranddomain.tchar_ptr);
|
|
|
|
/* setup ntlm identity's password and length */
|
|
passwd.tchar_ptr = Curl_convert_UTF8_to_tchar((char *)passwdp);
|
|
if(!passwd.tchar_ptr)
|
|
return CURLE_OUT_OF_MEMORY;
|
|
dup_passwd.tchar_ptr = _tcsdup(passwd.tchar_ptr);
|
|
if(!dup_passwd.tchar_ptr) {
|
|
Curl_unicodefree(passwd.tchar_ptr);
|
|
return CURLE_OUT_OF_MEMORY;
|
|
}
|
|
ntlm->identity.Password = dup_passwd.tbyte_ptr;
|
|
ntlm->identity.PasswordLength =
|
|
curlx_uztoul(_tcslen(dup_passwd.tchar_ptr));
|
|
dup_passwd.tchar_ptr = NULL;
|
|
|
|
Curl_unicodefree(passwd.tchar_ptr);
|
|
|
|
/* setup ntlm identity's flags */
|
|
ntlm->identity.Flags = SECFLAG_WINNT_AUTH_IDENTITY;
|
|
}
|
|
else
|
|
ntlm->p_identity = NULL;
|
|
|
|
status = s_pSecFn->AcquireCredentialsHandle(NULL,
|
|
(TCHAR *) TEXT("NTLM"),
|
|
SECPKG_CRED_OUTBOUND, NULL,
|
|
ntlm->p_identity, NULL, NULL,
|
|
&ntlm->handle, &tsDummy);
|
|
if(status != SEC_E_OK)
|
|
return CURLE_OUT_OF_MEMORY;
|
|
|
|
desc.ulVersion = SECBUFFER_VERSION;
|
|
desc.cBuffers = 1;
|
|
desc.pBuffers = &buf;
|
|
buf.cbBuffer = NTLM_BUFSIZE;
|
|
buf.BufferType = SECBUFFER_TOKEN;
|
|
buf.pvBuffer = ntlmbuf;
|
|
|
|
status = s_pSecFn->InitializeSecurityContext(&ntlm->handle, NULL,
|
|
(TCHAR *) TEXT(""),
|
|
ISC_REQ_CONFIDENTIALITY |
|
|
ISC_REQ_REPLAY_DETECT |
|
|
ISC_REQ_CONNECTION,
|
|
0, SECURITY_NETWORK_DREP,
|
|
NULL, 0,
|
|
&ntlm->c_handle, &desc,
|
|
&attrs, &tsDummy);
|
|
|
|
if(status == SEC_I_COMPLETE_AND_CONTINUE ||
|
|
status == SEC_I_CONTINUE_NEEDED)
|
|
s_pSecFn->CompleteAuthToken(&ntlm->c_handle, &desc);
|
|
else if(status != SEC_E_OK) {
|
|
s_pSecFn->FreeCredentialsHandle(&ntlm->handle);
|
|
return CURLE_RECV_ERROR;
|
|
}
|
|
|
|
ntlm->has_handles = 1;
|
|
size = buf.cbBuffer;
|
|
|
|
#else
|
|
|
|
const char *host = ""; /* empty */
|
|
const char *domain = ""; /* empty */
|
|
size_t hostlen = 0;
|
|
size_t domlen = 0;
|
|
size_t hostoff = 0;
|
|
size_t domoff = hostoff + hostlen; /* This is 0: remember that host and
|
|
domain are empty */
|
|
(void)userp;
|
|
(void)passwdp;
|
|
(void)ntlm;
|
|
|
|
#if USE_NTLM2SESSION
|
|
#define NTLM2FLAG NTLMFLAG_NEGOTIATE_NTLM2_KEY
|
|
#else
|
|
#define NTLM2FLAG 0
|
|
#endif
|
|
snprintf((char *)ntlmbuf, NTLM_BUFSIZE,
|
|
NTLMSSP_SIGNATURE "%c"
|
|
"\x01%c%c%c" /* 32-bit type = 1 */
|
|
"%c%c%c%c" /* 32-bit NTLM flag field */
|
|
"%c%c" /* domain length */
|
|
"%c%c" /* domain allocated space */
|
|
"%c%c" /* domain name offset */
|
|
"%c%c" /* 2 zeroes */
|
|
"%c%c" /* host length */
|
|
"%c%c" /* host allocated space */
|
|
"%c%c" /* host name offset */
|
|
"%c%c" /* 2 zeroes */
|
|
"%s" /* host name */
|
|
"%s", /* domain string */
|
|
0, /* trailing zero */
|
|
0, 0, 0, /* part of type-1 long */
|
|
|
|
LONGQUARTET(NTLMFLAG_NEGOTIATE_OEM |
|
|
NTLMFLAG_REQUEST_TARGET |
|
|
NTLMFLAG_NEGOTIATE_NTLM_KEY |
|
|
NTLM2FLAG |
|
|
NTLMFLAG_NEGOTIATE_ALWAYS_SIGN),
|
|
SHORTPAIR(domlen),
|
|
SHORTPAIR(domlen),
|
|
SHORTPAIR(domoff),
|
|
0, 0,
|
|
SHORTPAIR(hostlen),
|
|
SHORTPAIR(hostlen),
|
|
SHORTPAIR(hostoff),
|
|
0, 0,
|
|
host, /* this is empty */
|
|
domain /* this is empty */);
|
|
|
|
/* Initial packet length */
|
|
size = 32 + hostlen + domlen;
|
|
|
|
#endif
|
|
|
|
DEBUG_OUT({
|
|
fprintf(stderr, "* TYPE1 header flags=0x%02.2x%02.2x%02.2x%02.2x "
|
|
"0x%08.8x ",
|
|
LONGQUARTET(NTLMFLAG_NEGOTIATE_OEM |
|
|
NTLMFLAG_REQUEST_TARGET |
|
|
NTLMFLAG_NEGOTIATE_NTLM_KEY |
|
|
NTLM2FLAG |
|
|
NTLMFLAG_NEGOTIATE_ALWAYS_SIGN),
|
|
NTLMFLAG_NEGOTIATE_OEM |
|
|
NTLMFLAG_REQUEST_TARGET |
|
|
NTLMFLAG_NEGOTIATE_NTLM_KEY |
|
|
NTLM2FLAG |
|
|
NTLMFLAG_NEGOTIATE_ALWAYS_SIGN);
|
|
ntlm_print_flags(stderr,
|
|
NTLMFLAG_NEGOTIATE_OEM |
|
|
NTLMFLAG_REQUEST_TARGET |
|
|
NTLMFLAG_NEGOTIATE_NTLM_KEY |
|
|
NTLM2FLAG |
|
|
NTLMFLAG_NEGOTIATE_ALWAYS_SIGN);
|
|
fprintf(stderr, "\n****\n");
|
|
});
|
|
|
|
/* Return with binary blob encoded into base64 */
|
|
return Curl_base64_encode(NULL, (char *)ntlmbuf, size, outptr, outlen);
|
|
}
|
|
|
|
/*
|
|
* Curl_ntlm_create_type3_message()
|
|
*
|
|
* This is used to generate an already encoded NTLM type-3 message ready for
|
|
* sending to the recipient, be it a HTTP or SASL based (such as SMTP, POP3
|
|
* or IMAP) server, using the appropriate compile time crypo API.
|
|
*
|
|
* Parameters:
|
|
*
|
|
* data [in] - The session handle.
|
|
* userp [in] - The user name in the format User or Domain\User.
|
|
* passdwp [in] - The user's password.
|
|
* ntlm [in/out] - The ntlm data struct being used and modified.
|
|
* outptr [in/out] - The address where a pointer to newly allocated memory
|
|
* holding the result will be stored upon completion.
|
|
* outlen [out] - The length of the output message.
|
|
*
|
|
* Returns CURLE_OK on success.
|
|
*/
|
|
CURLcode Curl_ntlm_create_type3_message(struct SessionHandle *data,
|
|
const char *userp,
|
|
const char *passwdp,
|
|
struct ntlmdata *ntlm,
|
|
char **outptr,
|
|
size_t *outlen)
|
|
{
|
|
/* NTLM type-3 message structure:
|
|
|
|
Index Description Content
|
|
0 NTLMSSP Signature Null-terminated ASCII "NTLMSSP"
|
|
(0x4e544c4d53535000)
|
|
8 NTLM Message Type long (0x03000000)
|
|
12 LM/LMv2 Response security buffer
|
|
20 NTLM/NTLMv2 Response security buffer
|
|
28 Target Name security buffer
|
|
36 User Name security buffer
|
|
44 Workstation Name security buffer
|
|
(52) Session Key security buffer (*)
|
|
(60) Flags long (*)
|
|
(64) OS Version Structure 8 bytes (*)
|
|
52 (64) (72) Start of data block
|
|
(*) -> Optional
|
|
*/
|
|
|
|
unsigned char ntlmbuf[NTLM_BUFSIZE];
|
|
size_t size;
|
|
|
|
#ifdef USE_WINDOWS_SSPI
|
|
SecBuffer type_2;
|
|
SecBuffer type_3;
|
|
SecBufferDesc type_2_desc;
|
|
SecBufferDesc type_3_desc;
|
|
SECURITY_STATUS status;
|
|
unsigned long attrs;
|
|
TimeStamp tsDummy; /* For Windows 9x compatibility of SSPI calls */
|
|
|
|
(void)passwdp;
|
|
(void)userp;
|
|
(void)data;
|
|
|
|
type_2_desc.ulVersion = type_3_desc.ulVersion = SECBUFFER_VERSION;
|
|
type_2_desc.cBuffers = type_3_desc.cBuffers = 1;
|
|
type_2_desc.pBuffers = &type_2;
|
|
type_3_desc.pBuffers = &type_3;
|
|
|
|
type_2.BufferType = SECBUFFER_TOKEN;
|
|
type_2.pvBuffer = ntlm->type_2;
|
|
type_2.cbBuffer = ntlm->n_type_2;
|
|
type_3.BufferType = SECBUFFER_TOKEN;
|
|
type_3.pvBuffer = ntlmbuf;
|
|
type_3.cbBuffer = NTLM_BUFSIZE;
|
|
|
|
status = s_pSecFn->InitializeSecurityContext(&ntlm->handle,
|
|
&ntlm->c_handle,
|
|
(TCHAR *) TEXT(""),
|
|
ISC_REQ_CONFIDENTIALITY |
|
|
ISC_REQ_REPLAY_DETECT |
|
|
ISC_REQ_CONNECTION,
|
|
0, SECURITY_NETWORK_DREP,
|
|
&type_2_desc,
|
|
0, &ntlm->c_handle,
|
|
&type_3_desc,
|
|
&attrs, &tsDummy);
|
|
if(status != SEC_E_OK)
|
|
return CURLE_RECV_ERROR;
|
|
|
|
size = type_3.cbBuffer;
|
|
|
|
Curl_ntlm_sspi_cleanup(ntlm);
|
|
|
|
#else
|
|
int lmrespoff;
|
|
unsigned char lmresp[24]; /* fixed-size */
|
|
#if USE_NTRESPONSES
|
|
int ntrespoff;
|
|
unsigned int ntresplen = 24;
|
|
unsigned char ntresp[24]; /* fixed-size */
|
|
unsigned char *ptr_ntresp = &ntresp[0];
|
|
unsigned char *ntlmv2resp = NULL;
|
|
#endif
|
|
bool unicode = (ntlm->flags & NTLMFLAG_NEGOTIATE_UNICODE) ? TRUE : FALSE;
|
|
char host[HOSTNAME_MAX + 1] = "";
|
|
const char *user;
|
|
const char *domain = "";
|
|
size_t hostoff = 0;
|
|
size_t useroff = 0;
|
|
size_t domoff = 0;
|
|
size_t hostlen = 0;
|
|
size_t userlen = 0;
|
|
size_t domlen = 0;
|
|
CURLcode res = CURLE_OK;
|
|
|
|
user = strchr(userp, '\\');
|
|
if(!user)
|
|
user = strchr(userp, '/');
|
|
|
|
if(user) {
|
|
domain = userp;
|
|
domlen = (user - domain);
|
|
user++;
|
|
}
|
|
else
|
|
user = userp;
|
|
|
|
if(user)
|
|
userlen = strlen(user);
|
|
|
|
/* Get the machine's un-qualified host name as NTLM doesn't like the fully
|
|
qualified domain name */
|
|
if(Curl_gethostname(host, sizeof(host))) {
|
|
infof(data, "gethostname() failed, continuing without!\n");
|
|
hostlen = 0;
|
|
}
|
|
else {
|
|
hostlen = strlen(host);
|
|
}
|
|
|
|
#if USE_NTRESPONSES
|
|
if(ntlm->target_info_len) {
|
|
unsigned char ntbuffer[0x18];
|
|
unsigned char entropy[8];
|
|
unsigned char ntlmv2hash[0x18];
|
|
|
|
#if defined(DEBUGBUILD)
|
|
/* Use static client nonce in debug (Test Suite) builds */
|
|
memcpy(entropy, "12345678", sizeof(entropy));
|
|
#else
|
|
/* Create an 8 byte random client nonce */
|
|
Curl_ssl_random(data, entropy, sizeof(entropy));
|
|
#endif
|
|
|
|
res = Curl_ntlm_core_mk_nt_hash(data, passwdp, ntbuffer);
|
|
if(res)
|
|
return res;
|
|
|
|
res = Curl_ntlm_core_mk_ntlmv2_hash(user, userlen, domain, domlen,
|
|
ntbuffer, ntlmv2hash);
|
|
if(res)
|
|
return res;
|
|
|
|
/* LMv2 response */
|
|
res = Curl_ntlm_core_mk_lmv2_resp(ntlmv2hash, entropy, &ntlm->nonce[0],
|
|
lmresp);
|
|
if(res)
|
|
return res;
|
|
|
|
/* NTLMv2 response */
|
|
res = Curl_ntlm_core_mk_ntlmv2_resp(ntlmv2hash, entropy, ntlm, &ntlmv2resp,
|
|
&ntresplen);
|
|
if(res)
|
|
return res;
|
|
|
|
ptr_ntresp = ntlmv2resp;
|
|
}
|
|
else
|
|
#endif
|
|
|
|
#if USE_NTLM2SESSION
|
|
/* We don't support NTLM2 if we don't have USE_NTRESPONSES */
|
|
if(ntlm->flags & NTLMFLAG_NEGOTIATE_NTLM2_KEY) {
|
|
unsigned char ntbuffer[0x18];
|
|
unsigned char tmp[0x18];
|
|
unsigned char md5sum[MD5_DIGEST_LENGTH];
|
|
unsigned char entropy[8];
|
|
|
|
/* Need to create 8 bytes random data */
|
|
Curl_ssl_random(data, entropy, sizeof(entropy));
|
|
|
|
/* 8 bytes random data as challenge in lmresp */
|
|
memcpy(lmresp, entropy, 8);
|
|
|
|
/* Pad with zeros */
|
|
memset(lmresp + 8, 0, 0x10);
|
|
|
|
/* Fill tmp with challenge(nonce?) + entropy */
|
|
memcpy(tmp, &ntlm->nonce[0], 8);
|
|
memcpy(tmp + 8, entropy, 8);
|
|
|
|
Curl_ssl_md5sum(tmp, 16, md5sum, MD5_DIGEST_LENGTH);
|
|
|
|
/* We shall only use the first 8 bytes of md5sum, but the des
|
|
code in Curl_ntlm_core_lm_resp only encrypt the first 8 bytes */
|
|
if(CURLE_OUT_OF_MEMORY ==
|
|
Curl_ntlm_core_mk_nt_hash(data, passwdp, ntbuffer))
|
|
return CURLE_OUT_OF_MEMORY;
|
|
|
|
Curl_ntlm_core_lm_resp(ntbuffer, md5sum, ntresp);
|
|
|
|
/* End of NTLM2 Session code */
|
|
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
|
|
#if USE_NTRESPONSES
|
|
unsigned char ntbuffer[0x18];
|
|
#endif
|
|
unsigned char lmbuffer[0x18];
|
|
|
|
#if USE_NTRESPONSES
|
|
if(CURLE_OUT_OF_MEMORY ==
|
|
Curl_ntlm_core_mk_nt_hash(data, passwdp, ntbuffer))
|
|
return CURLE_OUT_OF_MEMORY;
|
|
Curl_ntlm_core_lm_resp(ntbuffer, &ntlm->nonce[0], ntresp);
|
|
#endif
|
|
|
|
Curl_ntlm_core_mk_lm_hash(data, passwdp, lmbuffer);
|
|
Curl_ntlm_core_lm_resp(lmbuffer, &ntlm->nonce[0], lmresp);
|
|
/* A safer but less compatible alternative is:
|
|
* Curl_ntlm_core_lm_resp(ntbuffer, &ntlm->nonce[0], lmresp);
|
|
* See http://davenport.sourceforge.net/ntlm.html#ntlmVersion2 */
|
|
}
|
|
|
|
if(unicode) {
|
|
domlen = domlen * 2;
|
|
userlen = userlen * 2;
|
|
hostlen = hostlen * 2;
|
|
}
|
|
|
|
lmrespoff = 64; /* size of the message header */
|
|
#if USE_NTRESPONSES
|
|
ntrespoff = lmrespoff + 0x18;
|
|
domoff = ntrespoff + ntresplen;
|
|
#else
|
|
domoff = lmrespoff + 0x18;
|
|
#endif
|
|
useroff = domoff + domlen;
|
|
hostoff = useroff + userlen;
|
|
|
|
/* Create the big type-3 message binary blob */
|
|
size = snprintf((char *)ntlmbuf, NTLM_BUFSIZE,
|
|
NTLMSSP_SIGNATURE "%c"
|
|
"\x03%c%c%c" /* 32-bit type = 3 */
|
|
|
|
"%c%c" /* LanManager length */
|
|
"%c%c" /* LanManager allocated space */
|
|
"%c%c" /* LanManager offset */
|
|
"%c%c" /* 2 zeroes */
|
|
|
|
"%c%c" /* NT-response length */
|
|
"%c%c" /* NT-response allocated space */
|
|
"%c%c" /* NT-response offset */
|
|
"%c%c" /* 2 zeroes */
|
|
|
|
"%c%c" /* domain length */
|
|
"%c%c" /* domain allocated space */
|
|
"%c%c" /* domain name offset */
|
|
"%c%c" /* 2 zeroes */
|
|
|
|
"%c%c" /* user length */
|
|
"%c%c" /* user allocated space */
|
|
"%c%c" /* user offset */
|
|
"%c%c" /* 2 zeroes */
|
|
|
|
"%c%c" /* host length */
|
|
"%c%c" /* host allocated space */
|
|
"%c%c" /* host offset */
|
|
"%c%c" /* 2 zeroes */
|
|
|
|
"%c%c" /* session key length (unknown purpose) */
|
|
"%c%c" /* session key allocated space (unknown purpose) */
|
|
"%c%c" /* session key offset (unknown purpose) */
|
|
"%c%c" /* 2 zeroes */
|
|
|
|
"%c%c%c%c", /* flags */
|
|
|
|
/* domain string */
|
|
/* user string */
|
|
/* host string */
|
|
/* LanManager response */
|
|
/* NT response */
|
|
|
|
0, /* zero termination */
|
|
0, 0, 0, /* type-3 long, the 24 upper bits */
|
|
|
|
SHORTPAIR(0x18), /* LanManager response length, twice */
|
|
SHORTPAIR(0x18),
|
|
SHORTPAIR(lmrespoff),
|
|
0x0, 0x0,
|
|
|
|
#if USE_NTRESPONSES
|
|
SHORTPAIR(ntresplen), /* NT-response length, twice */
|
|
SHORTPAIR(ntresplen),
|
|
SHORTPAIR(ntrespoff),
|
|
0x0, 0x0,
|
|
#else
|
|
0x0, 0x0,
|
|
0x0, 0x0,
|
|
0x0, 0x0,
|
|
0x0, 0x0,
|
|
#endif
|
|
SHORTPAIR(domlen),
|
|
SHORTPAIR(domlen),
|
|
SHORTPAIR(domoff),
|
|
0x0, 0x0,
|
|
|
|
SHORTPAIR(userlen),
|
|
SHORTPAIR(userlen),
|
|
SHORTPAIR(useroff),
|
|
0x0, 0x0,
|
|
|
|
SHORTPAIR(hostlen),
|
|
SHORTPAIR(hostlen),
|
|
SHORTPAIR(hostoff),
|
|
0x0, 0x0,
|
|
|
|
0x0, 0x0,
|
|
0x0, 0x0,
|
|
0x0, 0x0,
|
|
0x0, 0x0,
|
|
|
|
LONGQUARTET(ntlm->flags));
|
|
|
|
DEBUGASSERT(size == 64);
|
|
DEBUGASSERT(size == (size_t)lmrespoff);
|
|
|
|
/* We append the binary hashes */
|
|
if(size < (NTLM_BUFSIZE - 0x18)) {
|
|
memcpy(&ntlmbuf[size], lmresp, 0x18);
|
|
size += 0x18;
|
|
}
|
|
|
|
DEBUG_OUT({
|
|
fprintf(stderr, "**** TYPE3 header lmresp=");
|
|
ntlm_print_hex(stderr, (char *)&ntlmbuf[lmrespoff], 0x18);
|
|
});
|
|
|
|
#if USE_NTRESPONSES
|
|
if(size < (NTLM_BUFSIZE - ntresplen)) {
|
|
DEBUGASSERT(size == (size_t)ntrespoff);
|
|
memcpy(&ntlmbuf[size], ptr_ntresp, ntresplen);
|
|
size += ntresplen;
|
|
}
|
|
|
|
DEBUG_OUT({
|
|
fprintf(stderr, "\n ntresp=");
|
|
ntlm_print_hex(stderr, (char *)&ntlmbuf[ntrespoff], ntresplen);
|
|
});
|
|
|
|
Curl_safefree(ntlmv2resp);/* Free the dynamic buffer allocated for NTLMv2 */
|
|
|
|
#endif
|
|
|
|
DEBUG_OUT({
|
|
fprintf(stderr, "\n flags=0x%02.2x%02.2x%02.2x%02.2x 0x%08.8x ",
|
|
LONGQUARTET(ntlm->flags), ntlm->flags);
|
|
ntlm_print_flags(stderr, ntlm->flags);
|
|
fprintf(stderr, "\n****\n");
|
|
});
|
|
|
|
/* Make sure that the domain, user and host strings fit in the
|
|
buffer before we copy them there. */
|
|
if(size + userlen + domlen + hostlen >= NTLM_BUFSIZE) {
|
|
failf(data, "user + domain + host name too big");
|
|
return CURLE_OUT_OF_MEMORY;
|
|
}
|
|
|
|
DEBUGASSERT(size == domoff);
|
|
if(unicode)
|
|
unicodecpy(&ntlmbuf[size], domain, domlen / 2);
|
|
else
|
|
memcpy(&ntlmbuf[size], domain, domlen);
|
|
|
|
size += domlen;
|
|
|
|
DEBUGASSERT(size == useroff);
|
|
if(unicode)
|
|
unicodecpy(&ntlmbuf[size], user, userlen / 2);
|
|
else
|
|
memcpy(&ntlmbuf[size], user, userlen);
|
|
|
|
size += userlen;
|
|
|
|
DEBUGASSERT(size == hostoff);
|
|
if(unicode)
|
|
unicodecpy(&ntlmbuf[size], host, hostlen / 2);
|
|
else
|
|
memcpy(&ntlmbuf[size], host, hostlen);
|
|
|
|
size += hostlen;
|
|
|
|
/* Convert domain, user, and host to ASCII but leave the rest as-is */
|
|
res = Curl_convert_to_network(data, (char *)&ntlmbuf[domoff],
|
|
size - domoff);
|
|
if(res)
|
|
return CURLE_CONV_FAILED;
|
|
|
|
#endif
|
|
|
|
/* Return with binary blob encoded into base64 */
|
|
return Curl_base64_encode(NULL, (char *)ntlmbuf, size, outptr, outlen);
|
|
}
|
|
|
|
#endif /* USE_NTLM */
|