1/*
2   Unix SMB/Netbios implementation.
3   Version 1.9.
4   SMB parameters and setup
5   Copyright (C) Andrew Tridgell 1992-2000
6   Copyright (C) Luke Kenneth Casson Leighton 1996-2000
7   Modified by Jeremy Allison 1995.
8   Copyright (C) Andrew Bartlett <abartlet@samba.org> 2002-2003
9   Modified by Steve French (sfrench@us.ibm.com) 2002-2003
10
11   This program is free software; you can redistribute it and/or modify
12   it under the terms of the GNU General Public License as published by
13   the Free Software Foundation; either version 2 of the License, or
14   (at your option) any later version.
15
16   This program is distributed in the hope that it will be useful,
17   but WITHOUT ANY WARRANTY; without even the implied warranty of
18   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19   GNU General Public License for more details.
20
21   You should have received a copy of the GNU General Public License
22   along with this program; if not, write to the Free Software
23   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24*/
25
26#include <linux/module.h>
27#include <linux/fs.h>
28#include <linux/string.h>
29#include <linux/kernel.h>
30#include <linux/random.h>
31#include "cifs_unicode.h"
32#include "cifspdu.h"
33#include "cifsglob.h"
34#include "md5.h"
35#include "cifs_debug.h"
36#include "cifsencrypt.h"
37
38#ifndef FALSE
39#define FALSE 0
40#endif
41#ifndef TRUE
42#define TRUE 1
43#endif
44
45/* following came from the other byteorder.h to avoid include conflicts */
46#define CVAL(buf,pos) (((unsigned char *)(buf))[pos])
47#define SSVALX(buf,pos,val) (CVAL(buf,pos)=(val)&0xFF,CVAL(buf,pos+1)=(val)>>8)
48#define SSVAL(buf,pos,val) SSVALX((buf),(pos),((__u16)(val)))
49
50/*The following definitions come from  libsmb/smbencrypt.c  */
51
52void SMBencrypt(unsigned char *passwd, unsigned char *c8, unsigned char *p24);
53void E_md4hash(const unsigned char *passwd, unsigned char *p16);
54static void SMBOWFencrypt(unsigned char passwd[16], unsigned char *c8,
55		   unsigned char p24[24]);
56void SMBNTencrypt(unsigned char *passwd, unsigned char *c8, unsigned char *p24);
57
58/*
59   This implements the X/Open SMB password encryption
60   It takes a password, a 8 byte "crypt key" and puts 24 bytes of
61   encrypted password into p24 */
62/* Note that password must be uppercased and null terminated */
63void
64SMBencrypt(unsigned char *passwd, unsigned char *c8, unsigned char *p24)
65{
66	unsigned char p14[15], p21[21];
67
68	memset(p21, '\0', 21);
69	memset(p14, '\0', 14);
70	strncpy((char *) p14, (char *) passwd, 14);
71
72/*	strupper((char *)p14); *//* BB at least uppercase the easy range */
73	E_P16(p14, p21);
74
75	SMBOWFencrypt(p21, c8, p24);
76
77	memset(p14,0,15);
78	memset(p21,0,21);
79}
80
81/* Routines for Windows NT MD4 Hash functions. */
82static int
83_my_wcslen(__u16 * str)
84{
85	int len = 0;
86	while (*str++ != 0)
87		len++;
88	return len;
89}
90
91/*
92 * Convert a string into an NT UNICODE string.
93 * Note that regardless of processor type
94 * this must be in intel (little-endian)
95 * format.
96 */
97
98static int
99_my_mbstowcs(__u16 * dst, const unsigned char *src, int len)
100{				/* not a very good conversion routine - change/fix */
101	int i;
102	__u16 val;
103
104	for (i = 0; i < len; i++) {
105		val = *src;
106		SSVAL(dst, 0, val);
107		dst++;
108		src++;
109		if (val == 0)
110			break;
111	}
112	return i;
113}
114
115/*
116 * Creates the MD4 Hash of the users password in NT UNICODE.
117 */
118
119void
120E_md4hash(const unsigned char *passwd, unsigned char *p16)
121{
122	int len;
123	__u16 wpwd[129];
124
125	/* Password cannot be longer than 128 characters */
126	if(passwd) {
127		len = strlen((char *) passwd);
128		if (len > 128) {
129			len = 128;
130		}
131		/* Password must be converted to NT unicode */
132		_my_mbstowcs(wpwd, passwd, len);
133	} else
134		len = 0;
135
136	wpwd[len] = 0;	/* Ensure string is null terminated */
137	/* Calculate length in bytes */
138	len = _my_wcslen(wpwd) * sizeof (__u16);
139
140	mdfour(p16, (unsigned char *) wpwd, len);
141	memset(wpwd,0,129 * 2);
142}
143
144
145/* Does the NTLMv2 owfs of a user's password */
146
147/* Does the des encryption from the NT or LM MD4 hash. */
148static void
149SMBOWFencrypt(unsigned char passwd[16], unsigned char *c8,
150	      unsigned char p24[24])
151{
152	unsigned char p21[21];
153
154	memset(p21, '\0', 21);
155
156	memcpy(p21, passwd, 16);
157	E_P24(p21, c8, p24);
158}
159
160/* Does the des encryption from the FIRST 8 BYTES of the NT or LM MD4 hash. */
161
162/* Does the NT MD4 hash then des encryption. */
163
164void
165SMBNTencrypt(unsigned char *passwd, unsigned char *c8, unsigned char *p24)
166{
167	unsigned char p21[21];
168
169	memset(p21, '\0', 21);
170
171	E_md4hash(passwd, p21);
172	SMBOWFencrypt(p21, c8, p24);
173}
174
175
176/* Does the md5 encryption from the NT hash for NTLMv2. */
177/* These routines will be needed later */
178