proc->thread stage 4: rework the VFS and DEVICE subsystems to take thread
[dragonfly.git] / sys / netproto / smb / smb_conn.c
1 /*
2  * Copyright (c) 2000-2001 Boris Popov
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *    This product includes software developed by Boris Popov.
16  * 4. Neither the name of the author nor the names of any co-contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  *
32  * $FreeBSD: src/sys/netsmb/smb_conn.c,v 1.1.2.1 2001/05/22 08:32:33 bp Exp $
33  * $DragonFly: src/sys/netproto/smb/smb_conn.c,v 1.3 2003/06/25 03:56:06 dillon Exp $
34  */
35
36 /*
37  * Connection engine.
38  */
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/kernel.h>
43 #include <sys/malloc.h>
44 #include <sys/proc.h>
45 #include <sys/lock.h>
46 #include <sys/sysctl.h>
47 #include <sys/socketvar.h>
48
49 #include <sys/iconv.h>
50
51 #include <netsmb/smb.h>
52 #include <netsmb/smb_subr.h>
53 #include <netsmb/smb_conn.h>
54 #include <netsmb/smb_tran.h>
55 #include <netsmb/smb_trantcp.h>
56
57 static struct smb_connobj smb_vclist;
58 static int smb_vcnext = 1;      /* next unique id for VC */
59
60 extern struct linker_set sysctl_net_smb;
61
62 SYSCTL_NODE(_net, OID_AUTO, smb, CTLFLAG_RW, NULL, "SMB protocol");
63
64 MALLOC_DEFINE(M_SMBCONN, "SMB conn", "SMB connection");
65
66 static void smb_co_init(struct smb_connobj *cp, int level, char *objname,
67         struct thread *td);
68 static void smb_co_done(struct smb_connobj *cp);
69 static int  smb_co_lockstatus(struct smb_connobj *cp, struct thread *td);
70
71 static int  smb_vc_disconnect(struct smb_vc *vcp);
72 static void smb_vc_free(struct smb_connobj *cp);
73 static void smb_vc_gone(struct smb_connobj *cp, struct smb_cred *scred);
74 static smb_co_free_t smb_share_free;
75 static smb_co_gone_t smb_share_gone;
76
77 static int  smb_sysctl_treedump(SYSCTL_HANDLER_ARGS);
78
79 SYSCTL_PROC(_net_smb, OID_AUTO, treedump, CTLFLAG_RD | CTLTYPE_OPAQUE,
80             NULL, 0, smb_sysctl_treedump, "S,treedump", "Requester tree");
81
82 int
83 smb_sm_init(void)
84 {
85
86         smb_co_init(&smb_vclist, SMBL_SM, "smbsm", curthread);
87         smb_co_unlock(&smb_vclist, 0, curthread);
88         return 0;
89 }
90
91 int
92 smb_sm_done(void)
93 {
94
95         /* XXX: hold the mutex */
96         if (smb_vclist.co_usecount > 1) {
97                 SMBERROR("%d connections still active\n", smb_vclist.co_usecount - 1);
98                 return EBUSY;
99         }
100         smb_co_done(&smb_vclist);
101         return 0;
102 }
103
104 static int
105 smb_sm_lockvclist(int flags, struct thread *td)
106 {
107         return smb_co_lock(&smb_vclist, flags | LK_CANRECURSE, td);
108 }
109
110 static void
111 smb_sm_unlockvclist(struct thread *td)
112 {
113         smb_co_unlock(&smb_vclist, LK_RELEASE, td);
114 }
115
116 static int
117 smb_sm_lookupint(struct smb_vcspec *vcspec, struct smb_sharespec *shspec,
118         struct smb_cred *scred, struct smb_vc **vcpp)
119 {
120         struct thread *td = scred->scr_td;
121         struct smb_vc *vcp;
122         int exact = 1;
123         int error;
124
125         vcspec->shspec = shspec;
126         error = ENOENT;
127         SMBCO_FOREACH((struct smb_connobj*)vcp, &smb_vclist) {
128                 error = smb_vc_lock(vcp, LK_EXCLUSIVE, td);
129                 if (error)
130                         continue;
131                 itry {
132                         if ((vcp->obj.co_flags & SMBV_PRIVATE) ||
133                             !CONNADDREQ(vcp->vc_paddr, vcspec->sap) ||
134                             strcmp(vcp->vc_username, vcspec->username) != 0)
135                                 ithrow(1);
136                         if (vcspec->owner != SMBM_ANY_OWNER) {
137                                 if (vcp->vc_uid != vcspec->owner)
138                                         ithrow(1);
139                         } else
140                                 exact = 0;
141                         if (vcspec->group != SMBM_ANY_GROUP) {
142                                 if (vcp->vc_grp != vcspec->group)
143                                         ithrow(1);
144                         } else
145                                 exact = 0;
146
147                         if (vcspec->mode & SMBM_EXACT) {
148                                 if (!exact ||
149                                     (vcspec->mode & SMBM_MASK) != vcp->vc_mode)
150                                         ithrow(1);
151                         }
152                         if (smb_vc_access(vcp, scred, vcspec->mode) != 0)
153                                 ithrow(1);
154                         vcspec->ssp = NULL;
155                         if (shspec)
156                                 ithrow(smb_vc_lookupshare(vcp, shspec, scred, &vcspec->ssp));
157                         error = 0;
158                         break;
159                 } icatch(error) {
160                         smb_vc_unlock(vcp, 0, td);
161                 } ifinally {
162                 } iendtry;
163                 if (error == 0)
164                         break;
165         }
166         if (vcp) {
167                 smb_vc_ref(vcp, td);
168                 *vcpp = vcp;
169         }
170         return error;
171 }
172
173 int
174 smb_sm_lookup(struct smb_vcspec *vcspec, struct smb_sharespec *shspec,
175         struct smb_cred *scred, struct smb_vc **vcpp)
176 {
177         struct thread *td = scred->scr_td;
178         struct smb_vc *vcp;
179         struct smb_share *ssp = NULL;
180         int error;
181
182         *vcpp = vcp = NULL;
183
184         error = smb_sm_lockvclist(LK_EXCLUSIVE, td);
185         if (error)
186                 return error;
187         error = smb_sm_lookupint(vcspec, shspec, scred, vcpp);
188         if (error == 0 || (vcspec->flags & SMBV_CREATE) == 0) {
189                 smb_sm_unlockvclist(td);
190                 return error;
191         }
192         error = smb_sm_lookupint(vcspec, NULL, scred, &vcp);
193         if (error) {
194                 error = smb_vc_create(vcspec, scred, &vcp);
195                 if (error)
196                         goto out;
197                 error = smb_vc_connect(vcp, scred);
198                 if (error)
199                         goto out;
200         }
201         if (shspec == NULL)
202                 goto out;
203         error = smb_share_create(vcp, shspec, scred, &ssp);
204         if (error)
205                 goto out;
206         error = smb_smb_treeconnect(ssp, scred);
207         if (error == 0)
208                 vcspec->ssp = ssp;
209         else
210                 smb_share_put(ssp, scred);
211 out:
212         smb_sm_unlockvclist(td);
213         if (error == 0)
214                 *vcpp = vcp;
215         else if (vcp)
216                 smb_vc_put(vcp, scred);
217         return error;
218 }
219
220 /*
221  * Common code for connection object
222  */
223 static void
224 smb_co_init(struct smb_connobj *cp, int level, char *objname, struct thread *td)
225 {
226         SLIST_INIT(&cp->co_children);
227         smb_sl_init(&cp->co_interlock, objname);
228         lockinit(&cp->co_lock, PZERO, objname, 0, 0);
229         cp->co_level = level;
230         cp->co_usecount = 1;
231         KASSERT(smb_co_lock(cp, LK_EXCLUSIVE, td) == 0,
232             ("smb_co_init: lock failed"));
233 }
234
235 static void
236 smb_co_done(struct smb_connobj *cp)
237 {
238         smb_sl_destroy(&cp->co_interlock);
239         lockdestroy(&cp->co_lock);
240 }
241
242 static void
243 smb_co_gone(struct smb_connobj *cp, struct smb_cred *scred)
244 {
245         struct smb_connobj *parent;
246
247         if (cp->co_gone)
248                 cp->co_gone(cp, scred);
249         parent = cp->co_parent;
250         if (parent) {
251                 smb_co_lock(parent, LK_EXCLUSIVE, scred->scr_td);
252                 SLIST_REMOVE(&parent->co_children, cp, smb_connobj, co_next);
253                 smb_co_put(parent, scred);
254         }
255         if (cp->co_free)
256                 cp->co_free(cp);
257 }
258
259 void
260 smb_co_ref(struct smb_connobj *cp, struct thread *td)
261 {
262
263         SMB_CO_LOCK(cp);
264         cp->co_usecount++;
265         SMB_CO_UNLOCK(cp);
266 }
267
268 void
269 smb_co_rele(struct smb_connobj *cp, struct smb_cred *scred)
270 {
271         struct thread *td = scred->scr_td;
272
273         SMB_CO_LOCK(cp);
274         if (cp->co_usecount > 1) {
275                 cp->co_usecount--;
276                 SMB_CO_UNLOCK(cp);
277                 return;
278         }
279         if (cp->co_usecount == 0) {
280                 SMBERROR("negative use_count for object %d", cp->co_level);
281                 SMB_CO_UNLOCK(cp);
282                 return;
283         }
284         cp->co_usecount--;
285         cp->co_flags |= SMBO_GONE;
286
287         lockmgr(&cp->co_lock, LK_DRAIN | LK_INTERLOCK, &cp->co_interlock, td);
288         smb_co_gone(cp, scred);
289 }
290
291 int
292 smb_co_get(struct smb_connobj *cp, int flags, struct smb_cred *scred)
293 {
294         int error;
295
296         if ((flags & LK_INTERLOCK) == 0)
297                 SMB_CO_LOCK(cp);
298         cp->co_usecount++;
299         error = smb_co_lock(cp, flags | LK_INTERLOCK, scred->scr_td);
300         if (error) {
301                 SMB_CO_LOCK(cp);
302                 cp->co_usecount--;
303                 SMB_CO_UNLOCK(cp);
304                 return error;
305         }
306         return 0;
307 }
308
309 void
310 smb_co_put(struct smb_connobj *cp, struct smb_cred *scred)
311 {
312         struct thread *td = scred->scr_td;
313         int flags;
314
315         flags = LK_RELEASE;
316         SMB_CO_LOCK(cp);
317         if (cp->co_usecount > 1) {
318                 cp->co_usecount--;
319         } else if (cp->co_usecount == 1) {
320                 cp->co_usecount--;
321                 cp->co_flags |= SMBO_GONE;
322                 flags = LK_DRAIN;
323         } else {
324                 SMBERROR("negative usecount");
325         }
326         lockmgr(&cp->co_lock, LK_RELEASE | LK_INTERLOCK, &cp->co_interlock, td);
327         if ((cp->co_flags & SMBO_GONE) == 0)
328                 return;
329         lockmgr(&cp->co_lock, LK_DRAIN, NULL, td);
330         smb_co_gone(cp, scred);
331 }
332
333 int
334 smb_co_lockstatus(struct smb_connobj *cp, struct thread *td)
335 {
336         return lockstatus(&cp->co_lock, td);
337 }
338
339 int
340 smb_co_lock(struct smb_connobj *cp, int flags, struct thread *td)
341 {
342
343         if (cp->co_flags & SMBO_GONE)
344                 return EINVAL;
345         if ((flags & LK_TYPE_MASK) == 0)
346                 flags |= LK_EXCLUSIVE;
347         if (smb_co_lockstatus(cp, td) == LK_EXCLUSIVE && 
348             (flags & LK_CANRECURSE) == 0) {
349                 SMBERROR("recursive lock for object %d\n", cp->co_level);
350                 return 0;
351         }
352         return lockmgr(&cp->co_lock, flags, &cp->co_interlock, td);
353 }
354
355 void
356 smb_co_unlock(struct smb_connobj *cp, int flags, struct thread *td)
357 {
358         (void)lockmgr(&cp->co_lock, flags | LK_RELEASE, &cp->co_interlock, td);
359 }
360
361 static void
362 smb_co_addchild(struct smb_connobj *parent, struct smb_connobj *child)
363 {
364         KASSERT(smb_co_lockstatus(parent, curthread) == LK_EXCLUSIVE, ("smb_co_addchild: parent not locked"));
365         KASSERT(smb_co_lockstatus(child, curthread) == LK_EXCLUSIVE, ("smb_co_addchild: child not locked"));
366
367         smb_co_ref(parent, curthread);
368         SLIST_INSERT_HEAD(&parent->co_children, child, co_next);
369         child->co_parent = parent;
370 }
371
372 /*
373  * Session implementation
374  */
375
376 int
377 smb_vc_create(struct smb_vcspec *vcspec,
378         struct smb_cred *scred, struct smb_vc **vcpp)
379 {
380         struct smb_vc *vcp;
381         struct thread *td = scred->scr_td;
382         struct ucred *cred = scred->scr_cred;
383         uid_t uid = vcspec->owner;
384         gid_t gid = vcspec->group;
385         uid_t realuid = cred->cr_uid;
386         char *domain = vcspec->domain;
387         int error, isroot;
388
389         isroot = smb_suser(cred) == 0;
390         /*
391          * Only superuser can create VCs with different uid and gid
392          */
393         if (uid != SMBM_ANY_OWNER && uid != realuid && !isroot)
394                 return EPERM;
395         if (gid != SMBM_ANY_GROUP && !groupmember(gid, cred) && !isroot)
396                 return EPERM;
397
398         vcp = smb_zmalloc(sizeof(*vcp), M_SMBCONN, M_WAITOK);
399         smb_co_init(VCTOCP(vcp), SMBL_VC, "smb_vc", td);
400         vcp->obj.co_free = smb_vc_free;
401         vcp->obj.co_gone = smb_vc_gone;
402         vcp->vc_number = smb_vcnext++;
403         vcp->vc_timo = SMB_DEFRQTIMO;
404         vcp->vc_smbuid = SMB_UID_UNKNOWN;
405         vcp->vc_mode = vcspec->rights & SMBM_MASK;
406         vcp->obj.co_flags = vcspec->flags & (SMBV_PRIVATE | SMBV_SINGLESHARE);
407         vcp->vc_tdesc = &smb_tran_nbtcp_desc;
408
409         if (uid == SMBM_ANY_OWNER)
410                 uid = realuid;
411         if (gid == SMBM_ANY_GROUP)
412                 gid = cred->cr_groups[0];
413         vcp->vc_uid = uid;
414         vcp->vc_grp = gid;
415
416         smb_sl_init(&vcp->vc_stlock, "vcstlock");
417         error = 0;
418         itry {
419                 vcp->vc_paddr = dup_sockaddr(vcspec->sap, 1);
420                 ierror(vcp->vc_paddr == NULL, ENOMEM);
421
422                 vcp->vc_laddr = dup_sockaddr(vcspec->lap, 1);
423                 ierror(vcp->vc_laddr == NULL, ENOMEM);
424
425                 ierror((vcp->vc_pass = smb_strdup(vcspec->pass)) == NULL, ENOMEM);
426
427                 vcp->vc_domain = smb_strdup((domain && domain[0]) ? domain : "NODOMAIN");
428                 ierror(vcp->vc_domain == NULL, ENOMEM);
429
430                 ierror((vcp->vc_srvname = smb_strdup(vcspec->srvname)) == NULL, ENOMEM);
431                 ierror((vcp->vc_username = smb_strdup(vcspec->username)) == NULL, ENOMEM);
432
433                 ithrow(iconv_open("tolower", vcspec->localcs, &vcp->vc_tolower));
434                 ithrow(iconv_open("toupper", vcspec->localcs, &vcp->vc_toupper));
435                 if (vcspec->servercs[0]) {
436                         ithrow(iconv_open(vcspec->servercs, vcspec->localcs,
437                             &vcp->vc_toserver));
438                         ithrow(iconv_open(vcspec->localcs, vcspec->servercs,
439                             &vcp->vc_tolocal));
440                 }
441
442                 ithrow(smb_iod_create(vcp));
443                 *vcpp = vcp;
444                 smb_co_addchild(&smb_vclist, VCTOCP(vcp));
445         } icatch(error) {
446                 smb_vc_put(vcp, scred);
447         } ifinally {
448         } iendtry;
449         return error;
450 }
451
452 static void
453 smb_vc_free(struct smb_connobj *cp)
454 {
455         struct smb_vc *vcp = CPTOVC(cp);
456
457         if (vcp->vc_iod)
458                 smb_iod_destroy(vcp->vc_iod);
459         SMB_STRFREE(vcp->vc_username);
460         SMB_STRFREE(vcp->vc_srvname);
461         SMB_STRFREE(vcp->vc_pass);
462         SMB_STRFREE(vcp->vc_domain);
463         if (vcp->vc_paddr)
464                 free(vcp->vc_paddr, M_SONAME);
465         if (vcp->vc_laddr)
466                 free(vcp->vc_laddr, M_SONAME);
467         if (vcp->vc_tolower)
468                 iconv_close(vcp->vc_tolower);
469         if (vcp->vc_toupper)
470                 iconv_close(vcp->vc_toupper);
471         if (vcp->vc_tolocal)
472                 iconv_close(vcp->vc_tolocal);
473         if (vcp->vc_toserver)
474                 iconv_close(vcp->vc_toserver);
475         smb_co_done(VCTOCP(vcp));
476         smb_sl_destroy(&vcp->vc_stlock);
477         free(vcp, M_SMBCONN);
478 }
479
480 /*
481  * Called when use count of VC dropped to zero.
482  * VC should be locked on enter with LK_DRAIN.
483  */
484 static void
485 smb_vc_gone(struct smb_connobj *cp, struct smb_cred *scred)
486 {
487         struct smb_vc *vcp = CPTOVC(cp);
488
489         smb_vc_disconnect(vcp);
490 }
491
492 void
493 smb_vc_ref(struct smb_vc *vcp, struct thread *td)
494 {
495         smb_co_ref(VCTOCP(vcp), td);
496 }
497
498 void
499 smb_vc_rele(struct smb_vc *vcp, struct smb_cred *scred)
500 {
501         smb_co_rele(VCTOCP(vcp), scred);
502 }
503
504 int
505 smb_vc_get(struct smb_vc *vcp, int flags, struct smb_cred *scred)
506 {
507         return smb_co_get(VCTOCP(vcp), flags, scred);
508 }
509
510 void
511 smb_vc_put(struct smb_vc *vcp, struct smb_cred *scred)
512 {
513         smb_co_put(VCTOCP(vcp), scred);
514 }
515
516 int
517 smb_vc_lock(struct smb_vc *vcp, int flags, struct thread *td)
518 {
519         return smb_co_lock(VCTOCP(vcp), flags, td);
520 }
521
522 void
523 smb_vc_unlock(struct smb_vc *vcp, int flags, struct thread *td)
524 {
525         smb_co_unlock(VCTOCP(vcp), flags, td);
526 }
527
528 int
529 smb_vc_access(struct smb_vc *vcp, struct smb_cred *scred, mode_t mode)
530 {
531         struct ucred *cred = scred->scr_cred;
532
533         if (smb_suser(cred) == 0 || cred->cr_uid == vcp->vc_uid)
534                 return 0;
535         mode >>= 3;
536         if (!groupmember(vcp->vc_grp, cred))
537                 mode >>= 3;
538         return (vcp->vc_mode & mode) == mode ? 0 : EACCES;
539 }
540
541 static int
542 smb_vc_cmpshare(struct smb_share *ssp, struct smb_sharespec *dp)
543 {
544         int exact = 1;
545
546         if (strcmp(ssp->ss_name, dp->name) != 0)
547                 return 1;
548         if (dp->owner != SMBM_ANY_OWNER) {
549                 if (ssp->ss_uid != dp->owner)
550                         return 1;
551         } else
552                 exact = 0;
553         if (dp->group != SMBM_ANY_GROUP) {
554                 if (ssp->ss_grp != dp->group)
555                         return 1;
556         } else
557                 exact = 0;
558
559         if (dp->mode & SMBM_EXACT) {
560                 if (!exact)
561                         return 1;
562                 return (dp->mode & SMBM_MASK) == ssp->ss_mode ? 0 : 1;
563         }
564         if (smb_share_access(ssp, dp->scred, dp->mode) != 0)
565                 return 1;
566         return 0;
567 }
568
569 /*
570  * Lookup share in the given VC. Share referenced and locked on return.
571  * VC expected to be locked on entry and will be left locked on exit.
572  */
573 int
574 smb_vc_lookupshare(struct smb_vc *vcp, struct smb_sharespec *dp,
575         struct smb_cred *scred, struct smb_share **sspp)
576 {
577         struct thread *td = scred->scr_td;
578         struct smb_share *ssp = NULL;
579         int error;
580
581         *sspp = NULL;
582         dp->scred = scred;
583         SMBCO_FOREACH((struct smb_connobj*)ssp, VCTOCP(vcp)) {
584                 error = smb_share_lock(ssp, LK_EXCLUSIVE, td);
585                 if (error)
586                         continue;
587                 if (smb_vc_cmpshare(ssp, dp) == 0)
588                         break;
589                 smb_share_unlock(ssp, 0, td);
590         }
591         if (ssp) {
592                 smb_share_ref(ssp, td);
593                 *sspp = ssp;
594                 error = 0;
595         } else
596                 error = ENOENT;
597         return error;
598 }
599
600 int
601 smb_vc_connect(struct smb_vc *vcp, struct smb_cred *scred)
602 {
603
604         return smb_iod_request(vcp->vc_iod, SMBIOD_EV_CONNECT | SMBIOD_EV_SYNC, NULL);
605 }
606
607 /*
608  * Destroy VC to server, invalidate shares linked with it.
609  * Transport should be locked on entry.
610  */
611 int
612 smb_vc_disconnect(struct smb_vc *vcp)
613 {
614
615         smb_iod_request(vcp->vc_iod, SMBIOD_EV_DISCONNECT | SMBIOD_EV_SYNC, NULL);
616         return 0;
617 }
618
619 static char smb_emptypass[] = "";
620
621 const char *
622 smb_vc_getpass(struct smb_vc *vcp)
623 {
624         if (vcp->vc_pass)
625                 return vcp->vc_pass;
626         return smb_emptypass;
627 }
628
629 static int
630 smb_vc_getinfo(struct smb_vc *vcp, struct smb_vc_info *vip)
631 {
632         bzero(vip, sizeof(struct smb_vc_info));
633         vip->itype = SMB_INFO_VC;
634         vip->usecount = vcp->obj.co_usecount;
635         vip->uid = vcp->vc_uid;
636         vip->gid = vcp->vc_grp;
637         vip->mode = vcp->vc_mode;
638         vip->flags = vcp->obj.co_flags;
639         vip->sopt = vcp->vc_sopt;
640         vip->iodstate = vcp->vc_iod->iod_state;
641         bzero(&vip->sopt.sv_skey, sizeof(vip->sopt.sv_skey));
642         snprintf(vip->srvname, sizeof(vip->srvname), "%s", vcp->vc_srvname);
643         snprintf(vip->vcname, sizeof(vip->vcname), "%s", vcp->vc_username);
644         return 0;
645 }
646
647 u_short
648 smb_vc_nextmid(struct smb_vc *vcp)
649 {
650         u_short r;
651
652         SMB_CO_LOCK(&vcp->obj);
653         r = vcp->vc_mid++;
654         SMB_CO_UNLOCK(&vcp->obj);
655         return r;
656 }
657
658 /*
659  * Share implementation
660  */
661 /*
662  * Allocate share structure and attach it to the given VC
663  * Connection expected to be locked on entry. Share will be returned
664  * in locked state.
665  */
666 int
667 smb_share_create(struct smb_vc *vcp, struct smb_sharespec *shspec,
668         struct smb_cred *scred, struct smb_share **sspp)
669 {
670         struct smb_share *ssp;
671         struct thread *td = scred->scr_td;
672         struct ucred *cred = scred->scr_cred;
673         uid_t realuid = cred->cr_uid;
674         uid_t uid = shspec->owner;
675         gid_t gid = shspec->group;
676         int error, isroot;
677
678         isroot = smb_suser(cred) == 0;
679         /*
680          * Only superuser can create shares with different uid and gid
681          */
682         if (uid != SMBM_ANY_OWNER && uid != realuid && !isroot)
683                 return EPERM;
684         if (gid != SMBM_ANY_GROUP && !groupmember(gid, cred) && !isroot)
685                 return EPERM;
686         error = smb_vc_lookupshare(vcp, shspec, scred, &ssp);
687         if (!error) {
688                 smb_share_put(ssp, scred);
689                 return EEXIST;
690         }
691         if (uid == SMBM_ANY_OWNER)
692                 uid = realuid;
693         if (gid == SMBM_ANY_GROUP)
694                 gid = cred->cr_groups[0];
695         ssp = smb_zmalloc(sizeof(*ssp), M_SMBCONN, M_WAITOK);
696         smb_co_init(SSTOCP(ssp), SMBL_SHARE, "smbss", td);
697         ssp->obj.co_free = smb_share_free;
698         ssp->obj.co_gone = smb_share_gone;
699         smb_sl_init(&ssp->ss_stlock, "ssstlock");
700         ssp->ss_name = smb_strdup(shspec->name);
701         if (shspec->pass && shspec->pass[0])
702                 ssp->ss_pass = smb_strdup(shspec->pass);
703         ssp->ss_type = shspec->stype;
704         ssp->ss_tid = SMB_TID_UNKNOWN;
705         ssp->ss_uid = uid;
706         ssp->ss_grp = gid;
707         ssp->ss_mode = shspec->rights & SMBM_MASK;
708         smb_co_addchild(VCTOCP(vcp), SSTOCP(ssp));
709         *sspp = ssp;
710         return 0;
711 }
712
713 static void
714 smb_share_free(struct smb_connobj *cp)
715 {
716         struct smb_share *ssp = CPTOSS(cp);
717
718         SMB_STRFREE(ssp->ss_name);
719         SMB_STRFREE(ssp->ss_pass);
720         smb_sl_destroy(&ssp->ss_stlock);
721         smb_co_done(SSTOCP(ssp));
722         free(ssp, M_SMBCONN);
723 }
724
725 static void
726 smb_share_gone(struct smb_connobj *cp, struct smb_cred *scred)
727 {
728         struct smb_share *ssp = CPTOSS(cp);
729
730         smb_smb_treedisconnect(ssp, scred);
731 }
732
733 void
734 smb_share_ref(struct smb_share *ssp, struct thread *td)
735 {
736         smb_co_ref(SSTOCP(ssp), td);
737 }
738
739 void
740 smb_share_rele(struct smb_share *ssp, struct smb_cred *scred)
741 {
742         smb_co_rele(SSTOCP(ssp), scred);
743 }
744
745 int
746 smb_share_get(struct smb_share *ssp, int flags, struct smb_cred *scred)
747 {
748         return smb_co_get(SSTOCP(ssp), flags, scred);
749 }
750
751 void
752 smb_share_put(struct smb_share *ssp, struct smb_cred *scred)
753 {
754         smb_co_put(SSTOCP(ssp), scred);
755 }
756
757 int
758 smb_share_lock(struct smb_share *ssp, int flags, struct thread *td)
759 {
760         return smb_co_lock(SSTOCP(ssp), flags, td);
761 }
762
763 void
764 smb_share_unlock(struct smb_share *ssp, int flags, struct thread *td)
765 {
766         smb_co_unlock(SSTOCP(ssp), flags, td);
767 }
768
769 int
770 smb_share_access(struct smb_share *ssp, struct smb_cred *scred, mode_t mode)
771 {
772         struct ucred *cred = scred->scr_cred;
773
774         if (smb_suser(cred) == 0 || cred->cr_uid == ssp->ss_uid)
775                 return 0;
776         mode >>= 3;
777         if (!groupmember(ssp->ss_grp, cred))
778                 mode >>= 3;
779         return (ssp->ss_mode & mode) == mode ? 0 : EACCES;
780 }
781
782 void
783 smb_share_invalidate(struct smb_share *ssp)
784 {
785         ssp->ss_tid = SMB_TID_UNKNOWN;
786 }
787
788 int
789 smb_share_valid(struct smb_share *ssp)
790 {
791         return ssp->ss_tid != SMB_TID_UNKNOWN &&
792             ssp->ss_vcgenid == SSTOVC(ssp)->vc_genid;
793 }
794
795 const char*
796 smb_share_getpass(struct smb_share *ssp)
797 {
798         struct smb_vc *vcp;
799
800         if (ssp->ss_pass)
801                 return ssp->ss_pass;
802         vcp = SSTOVC(ssp);
803         if (vcp->vc_pass)
804                 return vcp->vc_pass;
805         return smb_emptypass;
806 }
807
808 static int
809 smb_share_getinfo(struct smb_share *ssp, struct smb_share_info *sip)
810 {
811         bzero(sip, sizeof(struct smb_share_info));
812         sip->itype = SMB_INFO_SHARE;
813         sip->usecount = ssp->obj.co_usecount;
814         sip->tid  = ssp->ss_tid;
815         sip->type= ssp->ss_type;
816         sip->uid = ssp->ss_uid;
817         sip->gid = ssp->ss_grp;
818         sip->mode= ssp->ss_mode;
819         sip->flags = ssp->obj.co_flags;
820         snprintf(sip->sname, sizeof(sip->sname), "%s", ssp->ss_name);
821         return 0;
822 }
823
824 /*
825  * Dump an entire tree into sysctl call
826  */
827 static int
828 smb_sysctl_treedump(SYSCTL_HANDLER_ARGS)
829 {
830         struct thread *td = req->td;
831         struct ucred *ucred;
832         struct smb_cred scred;
833         struct smb_vc *vcp;
834         struct smb_share *ssp;
835         struct smb_vc_info vci;
836         struct smb_share_info ssi;
837         int error, itype;
838
839         KKASSERT(td->td_proc);
840         ucred = td->td_proc->p_ucred;
841
842         smb_makescred(&scred, td, ucred);
843         error = smb_sm_lockvclist(LK_SHARED, td);
844         if (error)
845                 return error;
846         SMBCO_FOREACH((struct smb_connobj*)vcp, &smb_vclist) {
847                 error = smb_vc_lock(vcp, LK_SHARED, td);
848                 if (error)
849                         continue;
850                 smb_vc_getinfo(vcp, &vci);
851                 error = SYSCTL_OUT(req, &vci, sizeof(struct smb_vc_info));
852                 if (error) {
853                         smb_vc_unlock(vcp, 0, td);
854                         break;
855                 }
856                 SMBCO_FOREACH((struct smb_connobj*)ssp, VCTOCP(vcp)) {
857                         error = smb_share_lock(ssp, LK_SHARED, td);
858                         if (error) {
859                                 error = 0;
860                                 continue;
861                         }
862                         smb_share_getinfo(ssp, &ssi);
863                         smb_share_unlock(ssp, 0, td);
864                         error = SYSCTL_OUT(req, &ssi, sizeof(struct smb_share_info));
865                         if (error)
866                                 break;
867                 }
868                 smb_vc_unlock(vcp, 0, td);
869                 if (error)
870                         break;
871         }
872         if (!error) {
873                 itype = SMB_INFO_NONE;
874                 error = SYSCTL_OUT(req, &itype, sizeof(itype));
875         }
876         smb_sm_unlockvclist(td);
877         return error;
878 }