git-svn-id: svn://10.65.10.50/branches/R_10_00@23289 c028cbd2-c16b-5b4b-a496-9718f37d4682
		
			
				
	
	
		
			818 lines
		
	
	
		
			26 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			818 lines
		
	
	
		
			26 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
/***************************************************************************
 | 
						|
 *                                  _   _ ____  _
 | 
						|
 *  Project                     ___| | | |  _ \| |
 | 
						|
 *                             / __| | | | |_) | |
 | 
						|
 *                            | (__| |_| |  _ <| |___
 | 
						|
 *                             \___|\___/|_| \_\_____|
 | 
						|
 *
 | 
						|
 * Copyright (C) 1998 - 2015, 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"
 | 
						|
 | 
						|
#if defined(USE_NTLM) && !defined(USE_WINDOWS_SSPI)
 | 
						|
 | 
						|
/*
 | 
						|
 * 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 "vtls/vtls.h"
 | 
						|
 | 
						|
#ifdef USE_NSS
 | 
						|
#include "vtls/nssg.h" /* for Curl_nss_force_init() */
 | 
						|
#endif
 | 
						|
 | 
						|
#define BUILDING_CURL_NTLM_MSGS_C
 | 
						|
#include "curl_ntlm_msgs.h"
 | 
						|
#include "curl_sasl.h"
 | 
						|
#include "curl_endian.h"
 | 
						|
#include "curl_printf.h"
 | 
						|
 | 
						|
/* The last #include files should be: */
 | 
						|
#include "curl_memory.h"
 | 
						|
#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
 | 
						|
 | 
						|
/*
 | 
						|
 * ntlm_decode_type2_target()
 | 
						|
 *
 | 
						|
 * This is used to decode the "target info" in the ntlm type-2 message
 | 
						|
 * received.
 | 
						|
 *
 | 
						|
 * Parameters:
 | 
						|
 *
 | 
						|
 * data      [in]     - The session handle.
 | 
						|
 * buffer    [in]     - The decoded type-2 message.
 | 
						|
 * size      [in]     - The input buffer size, at least 32 bytes.
 | 
						|
 * ntlm      [in/out] - The ntlm data struct being used and modified.
 | 
						|
 *
 | 
						|
 * Returns CURLE_OK on success.
 | 
						|
 */
 | 
						|
static CURLcode ntlm_decode_type2_target(struct SessionHandle *data,
 | 
						|
                                         unsigned char *buffer,
 | 
						|
                                         size_t size,
 | 
						|
                                         struct ntlmdata *ntlm)
 | 
						|
{
 | 
						|
  unsigned short target_info_len = 0;
 | 
						|
  unsigned int target_info_offset = 0;
 | 
						|
 | 
						|
  if(size >= 48) {
 | 
						|
    target_info_len = Curl_read16_le(&buffer[40]);
 | 
						|
    target_info_offset = Curl_read32_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_BAD_CONTENT_ENCODING;
 | 
						|
      }
 | 
						|
 | 
						|
      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;
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
  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_sasl_decode_ntlm_type2_message()
 | 
						|
 *
 | 
						|
 * This is used to decode an already encoded NTLM type-2 message. 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]     - The session handle.
 | 
						|
 * type2msg [in]     - The base64 encoded type-2 message.
 | 
						|
 * ntlm     [in/out] - The ntlm data struct being used and modified.
 | 
						|
 *
 | 
						|
 * Returns CURLE_OK on success.
 | 
						|
 */
 | 
						|
CURLcode Curl_sasl_decode_ntlm_type2_message(struct SessionHandle *data,
 | 
						|
                                             const char *type2msg,
 | 
						|
                                             struct ntlmdata *ntlm)
 | 
						|
{
 | 
						|
  static const char type2_marker[] = { 0x02, 0x00, 0x00, 0x00 };
 | 
						|
 | 
						|
  /* 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
 | 
						|
  */
 | 
						|
 | 
						|
  CURLcode result = CURLE_OK;
 | 
						|
  unsigned char *type2 = NULL;
 | 
						|
  size_t type2_len = 0;
 | 
						|
 | 
						|
#if defined(USE_NSS)
 | 
						|
  /* Make sure the crypto backend is initialized */
 | 
						|
  result = Curl_nss_force_init(data);
 | 
						|
  if(result)
 | 
						|
    return result;
 | 
						|
#elif defined(CURL_DISABLE_VERBOSE_STRINGS)
 | 
						|
  (void)data;
 | 
						|
#endif
 | 
						|
 | 
						|
  /* Decode the base-64 encoded type-2 message */
 | 
						|
  if(strlen(type2msg) && *type2msg != '=') {
 | 
						|
    result = Curl_base64_decode(type2msg, &type2, &type2_len);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
  }
 | 
						|
 | 
						|
  /* Ensure we have a valid type-2 message */
 | 
						|
  if(!type2) {
 | 
						|
    infof(data, "NTLM handshake failure (empty type-2 message)\n");
 | 
						|
    return CURLE_BAD_CONTENT_ENCODING;
 | 
						|
  }
 | 
						|
 | 
						|
  ntlm->flags = 0;
 | 
						|
 | 
						|
  if((type2_len < 32) ||
 | 
						|
     (memcmp(type2, NTLMSSP_SIGNATURE, 8) != 0) ||
 | 
						|
     (memcmp(type2 + 8, type2_marker, sizeof(type2_marker)) != 0)) {
 | 
						|
    /* This was not a good enough type-2 message */
 | 
						|
    free(type2);
 | 
						|
    infof(data, "NTLM handshake failure (bad type-2 message)\n");
 | 
						|
    return CURLE_BAD_CONTENT_ENCODING;
 | 
						|
  }
 | 
						|
 | 
						|
  ntlm->flags = Curl_read32_le(&type2[20]);
 | 
						|
  memcpy(ntlm->nonce, &type2[24], 8);
 | 
						|
 | 
						|
  if(ntlm->flags & NTLMFLAG_NEGOTIATE_TARGET_INFO) {
 | 
						|
    result = ntlm_decode_type2_target(data, type2, type2_len, ntlm);
 | 
						|
    if(result) {
 | 
						|
      free(type2);
 | 
						|
      infof(data, "NTLM handshake failure (bad type-2 message)\n");
 | 
						|
      return result;
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  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);
 | 
						|
  });
 | 
						|
 | 
						|
  free(type2);
 | 
						|
 | 
						|
  return result;
 | 
						|
}
 | 
						|
 | 
						|
/* 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';
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
/*
 | 
						|
 * Curl_sasl_create_ntlm_type1_message()
 | 
						|
 *
 | 
						|
 * This is used to generate an already encoded NTLM type-1 message ready for
 | 
						|
 * sending to the recipient using the appropriate compile time crypto 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_sasl_create_ntlm_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
 | 
						|
  */
 | 
						|
 | 
						|
  size_t size;
 | 
						|
 | 
						|
  unsigned char ntlmbuf[NTLM_BUFSIZE];
 | 
						|
  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;
 | 
						|
 | 
						|
  /* Clean up any former leftovers and initialise to defaults */
 | 
						|
  Curl_sasl_ntlm_cleanup(ntlm);
 | 
						|
 | 
						|
#if USE_NTRESPONSES && 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;
 | 
						|
 | 
						|
  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_sasl_create_ntlm_type3_message()
 | 
						|
 *
 | 
						|
 * This is used to generate an already encoded NTLM type-3 message ready for
 | 
						|
 * sending to the recipient using the appropriate compile time crypto 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_sasl_create_ntlm_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
 | 
						|
  */
 | 
						|
 | 
						|
  CURLcode result = CURLE_OK;
 | 
						|
  size_t size;
 | 
						|
  unsigned char ntlmbuf[NTLM_BUFSIZE];
 | 
						|
  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;
 | 
						|
 | 
						|
  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 && USE_NTLM_V2
 | 
						|
  if(ntlm->target_info_len) {
 | 
						|
    unsigned char ntbuffer[0x18];
 | 
						|
    unsigned int entropy[2];
 | 
						|
    unsigned char ntlmv2hash[0x18];
 | 
						|
 | 
						|
    entropy[0] = Curl_rand(data);
 | 
						|
    entropy[1] = Curl_rand(data);
 | 
						|
 | 
						|
    result = Curl_ntlm_core_mk_nt_hash(data, passwdp, ntbuffer);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
 | 
						|
    result = Curl_ntlm_core_mk_ntlmv2_hash(user, userlen, domain, domlen,
 | 
						|
                                           ntbuffer, ntlmv2hash);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
 | 
						|
    /* LMv2 response */
 | 
						|
    result = Curl_ntlm_core_mk_lmv2_resp(ntlmv2hash,
 | 
						|
                                         (unsigned char *)&entropy[0],
 | 
						|
                                         &ntlm->nonce[0], lmresp);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
 | 
						|
    /* NTLMv2 response */
 | 
						|
    result = Curl_ntlm_core_mk_ntlmv2_resp(ntlmv2hash,
 | 
						|
                                           (unsigned char *)&entropy[0],
 | 
						|
                                           ntlm, &ntlmv2resp, &ntresplen);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
 | 
						|
    ptr_ntresp = ntlmv2resp;
 | 
						|
  }
 | 
						|
  else
 | 
						|
#endif
 | 
						|
 | 
						|
#if USE_NTRESPONSES && 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 int entropy[2];
 | 
						|
 | 
						|
    /* Need to create 8 bytes random data */
 | 
						|
    entropy[0] = Curl_rand(data);
 | 
						|
    entropy[1] = Curl_rand(data);
 | 
						|
 | 
						|
    /* 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);
 | 
						|
 | 
						|
    result = Curl_ssl_md5sum(tmp, 16, md5sum, MD5_DIGEST_LENGTH);
 | 
						|
    if(!result)
 | 
						|
      /* 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 */
 | 
						|
      result = Curl_ntlm_core_mk_nt_hash(data, passwdp, ntbuffer);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
 | 
						|
    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
 | 
						|
    result = Curl_ntlm_core_mk_nt_hash(data, passwdp, ntbuffer);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
 | 
						|
    Curl_ntlm_core_lm_resp(ntbuffer, &ntlm->nonce[0], ntresp);
 | 
						|
#endif
 | 
						|
 | 
						|
    result = Curl_ntlm_core_mk_lm_hash(data, passwdp, lmbuffer);
 | 
						|
    if(result)
 | 
						|
      return result;
 | 
						|
 | 
						|
    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);
 | 
						|
  });
 | 
						|
 | 
						|
  free(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 */
 | 
						|
  result = Curl_convert_to_network(data, (char *)&ntlmbuf[domoff],
 | 
						|
                                   size - domoff);
 | 
						|
  if(result)
 | 
						|
    return CURLE_CONV_FAILED;
 | 
						|
 | 
						|
  /* Return with binary blob encoded into base64 */
 | 
						|
  result = Curl_base64_encode(NULL, (char *)ntlmbuf, size, outptr, outlen);
 | 
						|
 | 
						|
  Curl_sasl_ntlm_cleanup(ntlm);
 | 
						|
 | 
						|
  return result;
 | 
						|
}
 | 
						|
 | 
						|
#endif /* USE_NTLM && !USE_WINDOWS_SSPI */
 |