Separate out common fstatat code into vfs_fstatat
[safe/jmp/linux-2.6] / fs / cifs / sess.c
1 /*
2  *   fs/cifs/sess.c
3  *
4  *   SMB/CIFS session setup handling routines
5  *
6  *   Copyright (c) International Business Machines  Corp., 2006, 2007
7  *   Author(s): Steve French (sfrench@us.ibm.com)
8  *
9  *   This library is free software; you can redistribute it and/or modify
10  *   it under the terms of the GNU Lesser General Public License as published
11  *   by the Free Software Foundation; either version 2.1 of the License, or
12  *   (at your option) any later version.
13  *
14  *   This library is distributed in the hope that it will be useful,
15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
17  *   the GNU Lesser General Public License for more details.
18  *
19  *   You should have received a copy of the GNU Lesser General Public License
20  *   along with this library; if not, write to the Free Software
21  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22  */
23
24 #include "cifspdu.h"
25 #include "cifsglob.h"
26 #include "cifsproto.h"
27 #include "cifs_unicode.h"
28 #include "cifs_debug.h"
29 #include "ntlmssp.h"
30 #include "nterr.h"
31 #include <linux/utsname.h>
32 #include "cifs_spnego.h"
33
34 extern void SMBNTencrypt(unsigned char *passwd, unsigned char *c8,
35                          unsigned char *p24);
36
37 /* Checks if this is the first smb session to be reconnected after
38    the socket has been reestablished (so we know whether to use vc 0).
39    Called while holding the cifs_tcp_ses_lock, so do not block */
40 static bool is_first_ses_reconnect(struct cifsSesInfo *ses)
41 {
42         struct list_head *tmp;
43         struct cifsSesInfo *tmp_ses;
44
45         list_for_each(tmp, &ses->server->smb_ses_list) {
46                 tmp_ses = list_entry(tmp, struct cifsSesInfo,
47                                      smb_ses_list);
48                 if (tmp_ses->need_reconnect == false)
49                         return false;
50         }
51         /* could not find a session that was already connected,
52            this must be the first one we are reconnecting */
53         return true;
54 }
55
56 /*
57  *      vc number 0 is treated specially by some servers, and should be the
58  *      first one we request.  After that we can use vcnumbers up to maxvcs,
59  *      one for each smb session (some Windows versions set maxvcs incorrectly
60  *      so maxvc=1 can be ignored).  If we have too many vcs, we can reuse
61  *      any vc but zero (some servers reset the connection on vcnum zero)
62  *
63  */
64 static __le16 get_next_vcnum(struct cifsSesInfo *ses)
65 {
66         __u16 vcnum = 0;
67         struct list_head *tmp;
68         struct cifsSesInfo *tmp_ses;
69         __u16 max_vcs = ses->server->max_vcs;
70         __u16 i;
71         int free_vc_found = 0;
72
73         /* Quoting the MS-SMB specification: "Windows-based SMB servers set this
74         field to one but do not enforce this limit, which allows an SMB client
75         to establish more virtual circuits than allowed by this value ... but
76         other server implementations can enforce this limit." */
77         if (max_vcs < 2)
78                 max_vcs = 0xFFFF;
79
80         write_lock(&cifs_tcp_ses_lock);
81         if ((ses->need_reconnect) && is_first_ses_reconnect(ses))
82                         goto get_vc_num_exit;  /* vcnum will be zero */
83         for (i = ses->server->srv_count - 1; i < max_vcs; i++) {
84                 if (i == 0) /* this is the only connection, use vc 0 */
85                         break;
86
87                 free_vc_found = 1;
88
89                 list_for_each(tmp, &ses->server->smb_ses_list) {
90                         tmp_ses = list_entry(tmp, struct cifsSesInfo,
91                                              smb_ses_list);
92                         if (tmp_ses->vcnum == i) {
93                                 free_vc_found = 0;
94                                 break; /* found duplicate, try next vcnum */
95                         }
96                 }
97                 if (free_vc_found)
98                         break; /* we found a vcnumber that will work - use it */
99         }
100
101         if (i == 0)
102                 vcnum = 0; /* for most common case, ie if one smb session, use
103                               vc zero.  Also for case when no free vcnum, zero
104                               is safest to send (some clients only send zero) */
105         else if (free_vc_found == 0)
106                 vcnum = 1;  /* we can not reuse vc=0 safely, since some servers
107                                 reset all uids on that, but 1 is ok. */
108         else
109                 vcnum = i;
110         ses->vcnum = vcnum;
111 get_vc_num_exit:
112         write_unlock(&cifs_tcp_ses_lock);
113
114         return le16_to_cpu(vcnum);
115 }
116
117 static __u32 cifs_ssetup_hdr(struct cifsSesInfo *ses, SESSION_SETUP_ANDX *pSMB)
118 {
119         __u32 capabilities = 0;
120
121         /* init fields common to all four types of SessSetup */
122         /* Note that offsets for first seven fields in req struct are same  */
123         /*      in CIFS Specs so does not matter which of 3 forms of struct */
124         /*      that we use in next few lines                               */
125         /* Note that header is initialized to zero in header_assemble */
126         pSMB->req.AndXCommand = 0xFF;
127         pSMB->req.MaxBufferSize = cpu_to_le16(ses->server->maxBuf);
128         pSMB->req.MaxMpxCount = cpu_to_le16(ses->server->maxReq);
129         pSMB->req.VcNumber = get_next_vcnum(ses);
130
131         /* Now no need to set SMBFLG_CASELESS or obsolete CANONICAL PATH */
132
133         /* BB verify whether signing required on neg or just on auth frame
134            (and NTLM case) */
135
136         capabilities = CAP_LARGE_FILES | CAP_NT_SMBS | CAP_LEVEL_II_OPLOCKS |
137                         CAP_LARGE_WRITE_X | CAP_LARGE_READ_X;
138
139         if (ses->server->secMode &
140             (SECMODE_SIGN_REQUIRED | SECMODE_SIGN_ENABLED))
141                 pSMB->req.hdr.Flags2 |= SMBFLG2_SECURITY_SIGNATURE;
142
143         if (ses->capabilities & CAP_UNICODE) {
144                 pSMB->req.hdr.Flags2 |= SMBFLG2_UNICODE;
145                 capabilities |= CAP_UNICODE;
146         }
147         if (ses->capabilities & CAP_STATUS32) {
148                 pSMB->req.hdr.Flags2 |= SMBFLG2_ERR_STATUS;
149                 capabilities |= CAP_STATUS32;
150         }
151         if (ses->capabilities & CAP_DFS) {
152                 pSMB->req.hdr.Flags2 |= SMBFLG2_DFS;
153                 capabilities |= CAP_DFS;
154         }
155         if (ses->capabilities & CAP_UNIX)
156                 capabilities |= CAP_UNIX;
157
158         return capabilities;
159 }
160
161 static void
162 unicode_oslm_strings(char **pbcc_area, const struct nls_table *nls_cp)
163 {
164         char *bcc_ptr = *pbcc_area;
165         int bytes_ret = 0;
166
167         /* Copy OS version */
168         bytes_ret = cifs_strtoUCS((__le16 *)bcc_ptr, "Linux version ", 32,
169                                   nls_cp);
170         bcc_ptr += 2 * bytes_ret;
171         bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, init_utsname()->release,
172                                   32, nls_cp);
173         bcc_ptr += 2 * bytes_ret;
174         bcc_ptr += 2; /* trailing null */
175
176         bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, CIFS_NETWORK_OPSYS,
177                                   32, nls_cp);
178         bcc_ptr += 2 * bytes_ret;
179         bcc_ptr += 2; /* trailing null */
180
181         *pbcc_area = bcc_ptr;
182 }
183
184 static void unicode_domain_string(char **pbcc_area, struct cifsSesInfo *ses,
185                                    const struct nls_table *nls_cp)
186 {
187         char *bcc_ptr = *pbcc_area;
188         int bytes_ret = 0;
189
190         /* copy domain */
191         if (ses->domainName == NULL) {
192                 /* Sending null domain better than using a bogus domain name (as
193                 we did briefly in 2.6.18) since server will use its default */
194                 *bcc_ptr = 0;
195                 *(bcc_ptr+1) = 0;
196                 bytes_ret = 0;
197         } else
198                 bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, ses->domainName,
199                                           256, nls_cp);
200         bcc_ptr += 2 * bytes_ret;
201         bcc_ptr += 2;  /* account for null terminator */
202
203         *pbcc_area = bcc_ptr;
204 }
205
206
207 static void unicode_ssetup_strings(char **pbcc_area, struct cifsSesInfo *ses,
208                                    const struct nls_table *nls_cp)
209 {
210         char *bcc_ptr = *pbcc_area;
211         int bytes_ret = 0;
212
213         /* BB FIXME add check that strings total less
214         than 335 or will need to send them as arrays */
215
216         /* unicode strings, must be word aligned before the call */
217 /*      if ((long) bcc_ptr % 2) {
218                 *bcc_ptr = 0;
219                 bcc_ptr++;
220         } */
221         /* copy user */
222         if (ses->userName == NULL) {
223                 /* null user mount */
224                 *bcc_ptr = 0;
225                 *(bcc_ptr+1) = 0;
226         } else { /* 300 should be long enough for any conceivable user name */
227                 bytes_ret = cifs_strtoUCS((__le16 *) bcc_ptr, ses->userName,
228                                           300, nls_cp);
229         }
230         bcc_ptr += 2 * bytes_ret;
231         bcc_ptr += 2; /* account for null termination */
232
233         unicode_domain_string(&bcc_ptr, ses, nls_cp);
234         unicode_oslm_strings(&bcc_ptr, nls_cp);
235
236         *pbcc_area = bcc_ptr;
237 }
238
239 static void ascii_ssetup_strings(char **pbcc_area, struct cifsSesInfo *ses,
240                                  const struct nls_table *nls_cp)
241 {
242         char *bcc_ptr = *pbcc_area;
243
244         /* copy user */
245         /* BB what about null user mounts - check that we do this BB */
246         /* copy user */
247         if (ses->userName == NULL) {
248                 /* BB what about null user mounts - check that we do this BB */
249         } else { /* 300 should be long enough for any conceivable user name */
250                 strncpy(bcc_ptr, ses->userName, 300);
251         }
252         /* BB improve check for overflow */
253         bcc_ptr += strnlen(ses->userName, 300);
254         *bcc_ptr = 0;
255         bcc_ptr++; /* account for null termination */
256
257         /* copy domain */
258
259         if (ses->domainName != NULL) {
260                 strncpy(bcc_ptr, ses->domainName, 256);
261                 bcc_ptr += strnlen(ses->domainName, 256);
262         } /* else we will send a null domain name
263              so the server will default to its own domain */
264         *bcc_ptr = 0;
265         bcc_ptr++;
266
267         /* BB check for overflow here */
268
269         strcpy(bcc_ptr, "Linux version ");
270         bcc_ptr += strlen("Linux version ");
271         strcpy(bcc_ptr, init_utsname()->release);
272         bcc_ptr += strlen(init_utsname()->release) + 1;
273
274         strcpy(bcc_ptr, CIFS_NETWORK_OPSYS);
275         bcc_ptr += strlen(CIFS_NETWORK_OPSYS) + 1;
276
277         *pbcc_area = bcc_ptr;
278 }
279
280 static int decode_unicode_ssetup(char **pbcc_area, int bleft,
281                                  struct cifsSesInfo *ses,
282                                  const struct nls_table *nls_cp)
283 {
284         int rc = 0;
285         int words_left, len;
286         char *data = *pbcc_area;
287
288         cFYI(1, ("bleft %d", bleft));
289
290         /*
291          * Windows servers do not always double null terminate their final
292          * Unicode string. Check to see if there are an uneven number of bytes
293          * left. If so, then add an extra NULL pad byte to the end of the
294          * response.
295          *
296          * See section 2.7.2 in "Implementing CIFS" for details
297          */
298         if (bleft % 2) {
299                 data[bleft] = 0;
300                 ++bleft;
301         }
302
303         words_left = bleft / 2;
304
305         /* save off server operating system */
306         len = UniStrnlen((wchar_t *) data, words_left);
307
308         if (len >= words_left)
309                 return rc;
310
311         kfree(ses->serverOS);
312         /* UTF-8 string will not grow more than four times as big as UCS-16 */
313         ses->serverOS = kzalloc((4 * len) + 2 /* trailing null */, GFP_KERNEL);
314         if (ses->serverOS != NULL) {
315                 cifs_strfromUCS_le(ses->serverOS, (__le16 *)data, len, nls_cp);
316                 cFYI(1, ("serverOS=%s", ses->serverOS));
317         }
318         data += 2 * (len + 1);
319         words_left -= len + 1;
320
321         /* save off server network operating system */
322         len = UniStrnlen((wchar_t *) data, words_left);
323
324         if (len >= words_left)
325                 return rc;
326
327         kfree(ses->serverNOS);
328         ses->serverNOS = kzalloc((4 * len) + 2 /* trailing null */, GFP_KERNEL);
329         if (ses->serverNOS != NULL) {
330                 cifs_strfromUCS_le(ses->serverNOS, (__le16 *)data, len,
331                                    nls_cp);
332                 cFYI(1, ("serverNOS=%s", ses->serverNOS));
333                 if (strncmp(ses->serverNOS, "NT LAN Manager 4", 16) == 0) {
334                         cFYI(1, ("NT4 server"));
335                         ses->flags |= CIFS_SES_NT4;
336                 }
337         }
338         data += 2 * (len + 1);
339         words_left -= len + 1;
340
341         /* save off server domain */
342         len = UniStrnlen((wchar_t *) data, words_left);
343
344         if (len > words_left)
345                 return rc;
346
347         kfree(ses->serverDomain);
348         ses->serverDomain = kzalloc((4 * len) + 2, GFP_KERNEL);
349         if (ses->serverDomain != NULL) {
350                 cifs_strfromUCS_le(ses->serverDomain, (__le16 *)data, len,
351                                    nls_cp);
352                 cFYI(1, ("serverDomain=%s", ses->serverDomain));
353         }
354         data += 2 * (len + 1);
355         words_left -= len + 1;
356
357         cFYI(1, ("words left: %d", words_left));
358
359         return rc;
360 }
361
362 static int decode_ascii_ssetup(char **pbcc_area, int bleft,
363                                struct cifsSesInfo *ses,
364                                const struct nls_table *nls_cp)
365 {
366         int rc = 0;
367         int len;
368         char *bcc_ptr = *pbcc_area;
369
370         cFYI(1, ("decode sessetup ascii. bleft %d", bleft));
371
372         len = strnlen(bcc_ptr, bleft);
373         if (len >= bleft)
374                 return rc;
375
376         kfree(ses->serverOS);
377
378         ses->serverOS = kzalloc(len + 1, GFP_KERNEL);
379         if (ses->serverOS)
380                 strncpy(ses->serverOS, bcc_ptr, len);
381         if (strncmp(ses->serverOS, "OS/2", 4) == 0) {
382                         cFYI(1, ("OS/2 server"));
383                         ses->flags |= CIFS_SES_OS2;
384         }
385
386         bcc_ptr += len + 1;
387         bleft -= len + 1;
388
389         len = strnlen(bcc_ptr, bleft);
390         if (len >= bleft)
391                 return rc;
392
393         kfree(ses->serverNOS);
394
395         ses->serverNOS = kzalloc(len + 1, GFP_KERNEL);
396         if (ses->serverNOS)
397                 strncpy(ses->serverNOS, bcc_ptr, len);
398
399         bcc_ptr += len + 1;
400         bleft -= len + 1;
401
402         len = strnlen(bcc_ptr, bleft);
403         if (len > bleft)
404                 return rc;
405
406         /* No domain field in LANMAN case. Domain is
407            returned by old servers in the SMB negprot response */
408         /* BB For newer servers which do not support Unicode,
409            but thus do return domain here we could add parsing
410            for it later, but it is not very important */
411         cFYI(1, ("ascii: bytes left %d", bleft));
412
413         return rc;
414 }
415
416 int
417 CIFS_SessSetup(unsigned int xid, struct cifsSesInfo *ses, int first_time,
418                 const struct nls_table *nls_cp)
419 {
420         int rc = 0;
421         int wct;
422         struct smb_hdr *smb_buf;
423         char *bcc_ptr;
424         char *str_area;
425         SESSION_SETUP_ANDX *pSMB;
426         __u32 capabilities;
427         int count;
428         int resp_buf_type;
429         struct kvec iov[3];
430         enum securityEnum type;
431         __u16 action;
432         int bytes_remaining;
433         struct key *spnego_key = NULL;
434
435         if (ses == NULL)
436                 return -EINVAL;
437
438         type = ses->server->secType;
439
440         cFYI(1, ("sess setup type %d", type));
441         if (type == LANMAN) {
442 #ifndef CONFIG_CIFS_WEAK_PW_HASH
443                 /* LANMAN and plaintext are less secure and off by default.
444                 So we make this explicitly be turned on in kconfig (in the
445                 build) and turned on at runtime (changed from the default)
446                 in proc/fs/cifs or via mount parm.  Unfortunately this is
447                 needed for old Win (e.g. Win95), some obscure NAS and OS/2 */
448                 return -EOPNOTSUPP;
449 #endif
450                 wct = 10; /* lanman 2 style sessionsetup */
451         } else if ((type == NTLM) || (type == NTLMv2)) {
452                 /* For NTLMv2 failures eventually may need to retry NTLM */
453                 wct = 13; /* old style NTLM sessionsetup */
454         } else /* same size: negotiate or auth, NTLMSSP or extended security */
455                 wct = 12;
456
457         rc = small_smb_init_no_tc(SMB_COM_SESSION_SETUP_ANDX, wct, ses,
458                             (void **)&smb_buf);
459         if (rc)
460                 return rc;
461
462         pSMB = (SESSION_SETUP_ANDX *)smb_buf;
463
464         capabilities = cifs_ssetup_hdr(ses, pSMB);
465
466         /* we will send the SMB in three pieces:
467         a fixed length beginning part, an optional
468         SPNEGO blob (which can be zero length), and a
469         last part which will include the strings
470         and rest of bcc area. This allows us to avoid
471         a large buffer 17K allocation */
472         iov[0].iov_base = (char *)pSMB;
473         iov[0].iov_len = smb_buf->smb_buf_length + 4;
474
475         /* setting this here allows the code at the end of the function
476            to free the request buffer if there's an error */
477         resp_buf_type = CIFS_SMALL_BUFFER;
478
479         /* 2000 big enough to fit max user, domain, NOS name etc. */
480         str_area = kmalloc(2000, GFP_KERNEL);
481         if (str_area == NULL) {
482                 rc = -ENOMEM;
483                 goto ssetup_exit;
484         }
485         bcc_ptr = str_area;
486
487         ses->flags &= ~CIFS_SES_LANMAN;
488
489         iov[1].iov_base = NULL;
490         iov[1].iov_len = 0;
491
492         if (type == LANMAN) {
493 #ifdef CONFIG_CIFS_WEAK_PW_HASH
494                 char lnm_session_key[CIFS_SESS_KEY_SIZE];
495
496                 pSMB->req.hdr.Flags2 &= ~SMBFLG2_UNICODE;
497
498                 /* no capabilities flags in old lanman negotiation */
499
500                 pSMB->old_req.PasswordLength = cpu_to_le16(CIFS_SESS_KEY_SIZE);
501                 /* BB calculate hash with password */
502                 /* and copy into bcc */
503
504                 calc_lanman_hash(ses->password, ses->server->cryptKey,
505                                  ses->server->secMode & SECMODE_PW_ENCRYPT ?
506                                         true : false, lnm_session_key);
507
508                 ses->flags |= CIFS_SES_LANMAN;
509                 memcpy(bcc_ptr, (char *)lnm_session_key, CIFS_SESS_KEY_SIZE);
510                 bcc_ptr += CIFS_SESS_KEY_SIZE;
511
512                 /* can not sign if LANMAN negotiated so no need
513                 to calculate signing key? but what if server
514                 changed to do higher than lanman dialect and
515                 we reconnected would we ever calc signing_key? */
516
517                 cFYI(1, ("Negotiating LANMAN setting up strings"));
518                 /* Unicode not allowed for LANMAN dialects */
519                 ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
520 #endif
521         } else if (type == NTLM) {
522                 char ntlm_session_key[CIFS_SESS_KEY_SIZE];
523
524                 pSMB->req_no_secext.Capabilities = cpu_to_le32(capabilities);
525                 pSMB->req_no_secext.CaseInsensitivePasswordLength =
526                         cpu_to_le16(CIFS_SESS_KEY_SIZE);
527                 pSMB->req_no_secext.CaseSensitivePasswordLength =
528                         cpu_to_le16(CIFS_SESS_KEY_SIZE);
529
530                 /* calculate session key */
531                 SMBNTencrypt(ses->password, ses->server->cryptKey,
532                              ntlm_session_key);
533
534                 if (first_time) /* should this be moved into common code
535                                   with similar ntlmv2 path? */
536                         cifs_calculate_mac_key(&ses->server->mac_signing_key,
537                                 ntlm_session_key, ses->password);
538                 /* copy session key */
539
540                 memcpy(bcc_ptr, (char *)ntlm_session_key, CIFS_SESS_KEY_SIZE);
541                 bcc_ptr += CIFS_SESS_KEY_SIZE;
542                 memcpy(bcc_ptr, (char *)ntlm_session_key, CIFS_SESS_KEY_SIZE);
543                 bcc_ptr += CIFS_SESS_KEY_SIZE;
544                 if (ses->capabilities & CAP_UNICODE) {
545                         /* unicode strings must be word aligned */
546                         if (iov[0].iov_len % 2) {
547                                 *bcc_ptr = 0;
548                                 bcc_ptr++;
549                         }
550                         unicode_ssetup_strings(&bcc_ptr, ses, nls_cp);
551                 } else
552                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
553         } else if (type == NTLMv2) {
554                 char *v2_sess_key =
555                         kmalloc(sizeof(struct ntlmv2_resp), GFP_KERNEL);
556
557                 /* BB FIXME change all users of v2_sess_key to
558                    struct ntlmv2_resp */
559
560                 if (v2_sess_key == NULL) {
561                         rc = -ENOMEM;
562                         goto ssetup_exit;
563                 }
564
565                 pSMB->req_no_secext.Capabilities = cpu_to_le32(capabilities);
566
567                 /* LM2 password would be here if we supported it */
568                 pSMB->req_no_secext.CaseInsensitivePasswordLength = 0;
569                 /*      cpu_to_le16(LM2_SESS_KEY_SIZE); */
570
571                 pSMB->req_no_secext.CaseSensitivePasswordLength =
572                         cpu_to_le16(sizeof(struct ntlmv2_resp));
573
574                 /* calculate session key */
575                 setup_ntlmv2_rsp(ses, v2_sess_key, nls_cp);
576                 if (first_time) /* should this be moved into common code
577                                    with similar ntlmv2 path? */
578                 /*   cifs_calculate_ntlmv2_mac_key(ses->server->mac_signing_key,
579                                 response BB FIXME, v2_sess_key); */
580
581                 /* copy session key */
582
583         /*      memcpy(bcc_ptr, (char *)ntlm_session_key,LM2_SESS_KEY_SIZE);
584                 bcc_ptr += LM2_SESS_KEY_SIZE; */
585                 memcpy(bcc_ptr, (char *)v2_sess_key,
586                        sizeof(struct ntlmv2_resp));
587                 bcc_ptr += sizeof(struct ntlmv2_resp);
588                 kfree(v2_sess_key);
589                 if (ses->capabilities & CAP_UNICODE) {
590                         if (iov[0].iov_len % 2) {
591                                 *bcc_ptr = 0;
592                                 bcc_ptr++;
593                         }
594                         unicode_ssetup_strings(&bcc_ptr, ses, nls_cp);
595                 } else
596                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
597         } else if (type == Kerberos || type == MSKerberos) {
598 #ifdef CONFIG_CIFS_UPCALL
599                 struct cifs_spnego_msg *msg;
600                 spnego_key = cifs_get_spnego_key(ses);
601                 if (IS_ERR(spnego_key)) {
602                         rc = PTR_ERR(spnego_key);
603                         spnego_key = NULL;
604                         goto ssetup_exit;
605                 }
606
607                 msg = spnego_key->payload.data;
608                 /* check version field to make sure that cifs.upcall is
609                    sending us a response in an expected form */
610                 if (msg->version != CIFS_SPNEGO_UPCALL_VERSION) {
611                         cERROR(1, ("incorrect version of cifs.upcall (expected"
612                                    " %d but got %d)",
613                                    CIFS_SPNEGO_UPCALL_VERSION, msg->version));
614                         rc = -EKEYREJECTED;
615                         goto ssetup_exit;
616                 }
617                 /* bail out if key is too long */
618                 if (msg->sesskey_len >
619                     sizeof(ses->server->mac_signing_key.data.krb5)) {
620                         cERROR(1, ("Kerberos signing key too long (%u bytes)",
621                                 msg->sesskey_len));
622                         rc = -EOVERFLOW;
623                         goto ssetup_exit;
624                 }
625                 if (first_time) {
626                         ses->server->mac_signing_key.len = msg->sesskey_len;
627                         memcpy(ses->server->mac_signing_key.data.krb5,
628                                 msg->data, msg->sesskey_len);
629                 }
630                 pSMB->req.hdr.Flags2 |= SMBFLG2_EXT_SEC;
631                 capabilities |= CAP_EXTENDED_SECURITY;
632                 pSMB->req.Capabilities = cpu_to_le32(capabilities);
633                 iov[1].iov_base = msg->data + msg->sesskey_len;
634                 iov[1].iov_len = msg->secblob_len;
635                 pSMB->req.SecurityBlobLength = cpu_to_le16(iov[1].iov_len);
636
637                 if (ses->capabilities & CAP_UNICODE) {
638                         /* unicode strings must be word aligned */
639                         if ((iov[0].iov_len + iov[1].iov_len) % 2) {
640                                 *bcc_ptr = 0;
641                                 bcc_ptr++;
642                         }
643                         unicode_oslm_strings(&bcc_ptr, nls_cp);
644                         unicode_domain_string(&bcc_ptr, ses, nls_cp);
645                 } else
646                 /* BB: is this right? */
647                         ascii_ssetup_strings(&bcc_ptr, ses, nls_cp);
648 #else /* ! CONFIG_CIFS_UPCALL */
649                 cERROR(1, ("Kerberos negotiated but upcall support disabled!"));
650                 rc = -ENOSYS;
651                 goto ssetup_exit;
652 #endif /* CONFIG_CIFS_UPCALL */
653         } else {
654                 cERROR(1, ("secType %d not supported!", type));
655                 rc = -ENOSYS;
656                 goto ssetup_exit;
657         }
658
659         iov[2].iov_base = str_area;
660         iov[2].iov_len = (long) bcc_ptr - (long) str_area;
661
662         count = iov[1].iov_len + iov[2].iov_len;
663         smb_buf->smb_buf_length += count;
664
665         BCC_LE(smb_buf) = cpu_to_le16(count);
666
667         rc = SendReceive2(xid, ses, iov, 3 /* num_iovecs */, &resp_buf_type,
668                           CIFS_STD_OP /* not long */ | CIFS_LOG_ERROR);
669         /* SMB request buf freed in SendReceive2 */
670
671         cFYI(1, ("ssetup rc from sendrecv2 is %d", rc));
672         if (rc)
673                 goto ssetup_exit;
674
675         pSMB = (SESSION_SETUP_ANDX *)iov[0].iov_base;
676         smb_buf = (struct smb_hdr *)iov[0].iov_base;
677
678         if ((smb_buf->WordCount != 3) && (smb_buf->WordCount != 4)) {
679                 rc = -EIO;
680                 cERROR(1, ("bad word count %d", smb_buf->WordCount));
681                 goto ssetup_exit;
682         }
683         action = le16_to_cpu(pSMB->resp.Action);
684         if (action & GUEST_LOGIN)
685                 cFYI(1, ("Guest login")); /* BB mark SesInfo struct? */
686         ses->Suid = smb_buf->Uid;   /* UID left in wire format (le) */
687         cFYI(1, ("UID = %d ", ses->Suid));
688         /* response can have either 3 or 4 word count - Samba sends 3 */
689         /* and lanman response is 3 */
690         bytes_remaining = BCC(smb_buf);
691         bcc_ptr = pByteArea(smb_buf);
692
693         if (smb_buf->WordCount == 4) {
694                 __u16 blob_len;
695                 blob_len = le16_to_cpu(pSMB->resp.SecurityBlobLength);
696                 bcc_ptr += blob_len;
697                 if (blob_len > bytes_remaining) {
698                         cERROR(1, ("bad security blob length %d", blob_len));
699                         rc = -EINVAL;
700                         goto ssetup_exit;
701                 }
702                 bytes_remaining -= blob_len;
703         }
704
705         /* BB check if Unicode and decode strings */
706         if (smb_buf->Flags2 & SMBFLG2_UNICODE) {
707                 /* unicode string area must be word-aligned */
708                 if (((unsigned long) bcc_ptr - (unsigned long) smb_buf) % 2) {
709                         ++bcc_ptr;
710                         --bytes_remaining;
711                 }
712                 rc = decode_unicode_ssetup(&bcc_ptr, bytes_remaining,
713                                            ses, nls_cp);
714         } else {
715                 rc = decode_ascii_ssetup(&bcc_ptr, bytes_remaining,
716                                          ses, nls_cp);
717         }
718
719 ssetup_exit:
720         if (spnego_key) {
721                 key_revoke(spnego_key);
722                 key_put(spnego_key);
723         }
724         kfree(str_area);
725         if (resp_buf_type == CIFS_SMALL_BUFFER) {
726                 cFYI(1, ("ssetup freeing small buf %p", iov[0].iov_base));
727                 cifs_small_buf_release(iov[0].iov_base);
728         } else if (resp_buf_type == CIFS_LARGE_BUFFER)
729                 cifs_buf_release(iov[0].iov_base);
730
731         return rc;
732 }