smb_dev.c revision 242386 
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 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#include <sys/cdefs.h>
28__FBSDID("$FreeBSD: head/sys/netsmb/smb_dev.c 242386 2012-10-31 03:34:07Z davide $");
29
30#include <sys/param.h>
31#include <sys/kernel.h>
32#include <sys/module.h>
33#include <sys/systm.h>
34#include <sys/conf.h>
35#include <sys/fcntl.h>
36#include <sys/ioccom.h>
37#include <sys/lock.h>
38#include <sys/malloc.h>
39#include <sys/file.h>		/* Must come after sys/malloc.h */
40#include <sys/filedesc.h>
41#include <sys/mbuf.h>
42#include <sys/poll.h>
43#include <sys/proc.h>
44#include <sys/select.h>
45#include <sys/socket.h>
46#include <sys/socketvar.h>
47#include <sys/sysctl.h>
48#include <sys/uio.h>
49#include <sys/vnode.h>
50
51#include <net/if.h>
52
53#include <netsmb/smb.h>
54#include <netsmb/smb_conn.h>
55#include <netsmb/smb_subr.h>
56#include <netsmb/smb_dev.h>
57
58#define SMB_GETDEV(dev)		((struct smb_dev*)(dev)->si_drv1)
59#define	SMB_CHECKMINOR(dev)	do { \
60				    sdp = SMB_GETDEV(dev); \
61				    if (sdp == NULL) return ENXIO; \
62				} while(0)
63
64static d_open_t	 nsmb_dev_open;
65static d_close_t nsmb_dev_close;
66static d_ioctl_t nsmb_dev_ioctl;
67
68MODULE_DEPEND(netsmb, libiconv, 1, 1, 2);
69MODULE_VERSION(netsmb, NSMB_VERSION);
70
71static int smb_version = NSMB_VERSION;
72
73
74SYSCTL_DECL(_net_smb);
75SYSCTL_INT(_net_smb, OID_AUTO, version, CTLFLAG_RD, &smb_version, 0, "");
76
77static MALLOC_DEFINE(M_NSMBDEV, "NETSMBDEV", "NET/SMB device");
78
79
80/*
81int smb_dev_queue(struct smb_dev *ndp, struct smb_rq *rqp, int prio);
82*/
83
84static struct cdevsw nsmb_cdevsw = {
85	.d_version =	D_VERSION,
86	.d_flags =	D_NEEDGIANT | D_NEEDMINOR,
87	.d_open =	nsmb_dev_open,
88	.d_close =	nsmb_dev_close,
89	.d_ioctl =	nsmb_dev_ioctl,
90	.d_name =	NSMB_NAME
91};
92
93static eventhandler_tag	 nsmb_dev_tag;
94static struct clonedevs	*nsmb_clones;
95
96static void
97nsmb_dev_clone(void *arg, struct ucred *cred, char *name, int namelen,
98    struct cdev **dev)
99{
100	int i, u;
101
102	if (*dev != NULL)
103		return;
104
105	if (strcmp(name, NSMB_NAME) == 0)
106		u = -1;
107	else if (dev_stdclone(name, NULL, NSMB_NAME, &u) != 1)
108		return;
109	i = clone_create(&nsmb_clones, &nsmb_cdevsw, &u, dev, 0);
110	if (i) {
111		*dev = make_dev(&nsmb_cdevsw, u, UID_ROOT, GID_WHEEL, 0600,
112		    "%s%d", NSMB_NAME, u);
113		if (*dev != NULL) {
114			dev_ref(*dev);
115			(*dev)->si_flags |= SI_CHEAPCLONE;
116		}
117	}
118}
119
120static int
121nsmb_dev_open(struct cdev *dev, int oflags, int devtype, struct thread *td)
122{
123	struct smb_dev *sdp;
124	struct ucred *cred = td->td_ucred;
125	int s;
126
127	sdp = SMB_GETDEV(dev);
128	if (sdp && (sdp->sd_flags & NSMBFL_OPEN))
129		return EBUSY;
130	if (sdp == NULL) {
131		sdp = malloc(sizeof(*sdp), M_NSMBDEV, M_WAITOK);
132		dev->si_drv1 = (void*)sdp;
133	}
134	/*
135	 * XXX: this is just crazy - make a device for an already passed device...
136	 * someone should take care of it.
137	 */
138	if ((dev->si_flags & SI_NAMED) == 0)
139		make_dev(&nsmb_cdevsw, dev2unit(dev), cred->cr_uid,
140		    cred->cr_gid, 0700, NSMB_NAME"%d", dev2unit(dev));
141	bzero(sdp, sizeof(*sdp));
142/*
143	STAILQ_INIT(&sdp->sd_rqlist);
144	STAILQ_INIT(&sdp->sd_rplist);
145	bzero(&sdp->sd_pollinfo, sizeof(struct selinfo));
146*/
147	s = splimp();
148	sdp->sd_level = -1;
149	sdp->sd_flags |= NSMBFL_OPEN;
150	splx(s);
151	return 0;
152}
153
154static int
155nsmb_dev_close(struct cdev *dev, int flag, int fmt, struct thread *td)
156{
157	struct smb_dev *sdp;
158	struct smb_vc *vcp;
159	struct smb_share *ssp;
160	struct smb_cred *scred;
161	int s;
162
163	scred = malloc(sizeof(struct smb_cred), M_NSMBDEV, M_WAITOK);
164	SMB_CHECKMINOR(dev);
165	s = splimp();
166	if ((sdp->sd_flags & NSMBFL_OPEN) == 0) {
167		splx(s);
168		free(scred, M_NSMBDEV);
169		return EBADF;
170	}
171	smb_makescred(scred, td, NULL);
172	ssp = sdp->sd_share;
173	if (ssp != NULL)
174		smb_share_rele(ssp, scred);
175	vcp = sdp->sd_vc;
176	if (vcp != NULL)
177		smb_vc_rele(vcp, scred);
178/*
179	smb_flushq(&sdp->sd_rqlist);
180	smb_flushq(&sdp->sd_rplist);
181*/
182	dev->si_drv1 = NULL;
183	free(sdp, M_NSMBDEV);
184	destroy_dev_sched(dev);
185	splx(s);
186	free(scred, M_NSMBDEV);
187	return 0;
188}
189
190
191static int
192nsmb_dev_ioctl(struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td)
193{
194	struct smb_dev *sdp;
195	struct smb_vc *vcp;
196	struct smb_share *ssp;
197	struct smb_cred *scred;
198	int error = 0;
199
200	SMB_CHECKMINOR(dev);
201	if ((sdp->sd_flags & NSMBFL_OPEN) == 0)
202		return EBADF;
203
204	scred = malloc(sizeof(struct smb_cred), M_NSMBDEV, M_WAITOK);
205	smb_makescred(scred, td, NULL);
206	switch (cmd) {
207	    case SMBIOC_OPENSESSION:
208		if (sdp->sd_vc) {
209			error = EISCONN;
210			goto out;
211		}
212		error = smb_usr_opensession((struct smbioc_ossn*)data,
213		    scred, &vcp);
214		if (error)
215			break;
216		sdp->sd_vc = vcp;
217		smb_vc_unlock(vcp, 0);
218		sdp->sd_level = SMBL_VC;
219		break;
220	    case SMBIOC_OPENSHARE:
221		if (sdp->sd_share) {
222			error = EISCONN;
223			goto out;
224		}
225		if (sdp->sd_vc == NULL) {
226			error = ENOTCONN;
227			goto out;
228		}
229		error = smb_usr_openshare(sdp->sd_vc,
230		    (struct smbioc_oshare*)data, scred, &ssp);
231		if (error)
232			break;
233		sdp->sd_share = ssp;
234		smb_share_unlock(ssp, 0);
235		sdp->sd_level = SMBL_SHARE;
236		break;
237	    case SMBIOC_REQUEST:
238		if (sdp->sd_share == NULL) {
239			error = ENOTCONN;
240			goto out;
241		}
242		error = smb_usr_simplerequest(sdp->sd_share,
243		    (struct smbioc_rq*)data, scred);
244		break;
245	    case SMBIOC_T2RQ:
246		if (sdp->sd_share == NULL) {
247			error = ENOTCONN;
248			goto out;
249		}
250		error = smb_usr_t2request(sdp->sd_share,
251		    (struct smbioc_t2rq*)data, scred);
252		break;
253	    case SMBIOC_SETFLAGS: {
254		struct smbioc_flags *fl = (struct smbioc_flags*)data;
255		int on;
256
257		if (fl->ioc_level == SMBL_VC) {
258			if (fl->ioc_mask & SMBV_PERMANENT) {
259				on = fl->ioc_flags & SMBV_PERMANENT;
260				if ((vcp = sdp->sd_vc) == NULL) {
261					error = ENOTCONN;
262					goto out;
263				}
264				error = smb_vc_get(vcp, LK_EXCLUSIVE, scred);
265				if (error)
266					break;
267				if (on && (vcp->obj.co_flags & SMBV_PERMANENT) == 0) {
268					vcp->obj.co_flags |= SMBV_PERMANENT;
269					smb_vc_ref(vcp);
270				} else if (!on && (vcp->obj.co_flags & SMBV_PERMANENT)) {
271					vcp->obj.co_flags &= ~SMBV_PERMANENT;
272					smb_vc_rele(vcp, scred);
273				}
274				smb_vc_put(vcp, scred);
275			} else
276				error = EINVAL;
277		} else if (fl->ioc_level == SMBL_SHARE) {
278			if (fl->ioc_mask & SMBS_PERMANENT) {
279				on = fl->ioc_flags & SMBS_PERMANENT;
280				if ((ssp = sdp->sd_share) == NULL) {
281					error = ENOTCONN;
282					goto out;
283				}
284				error = smb_share_get(ssp, LK_EXCLUSIVE, scred);
285				if (error)
286					break;
287				if (on && (ssp->obj.co_flags & SMBS_PERMANENT) == 0) {
288					ssp->obj.co_flags |= SMBS_PERMANENT;
289					smb_share_ref(ssp);
290				} else if (!on && (ssp->obj.co_flags & SMBS_PERMANENT)) {
291					ssp->obj.co_flags &= ~SMBS_PERMANENT;
292					smb_share_rele(ssp, scred);
293				}
294				smb_share_put(ssp, scred);
295			} else
296				error = EINVAL;
297			break;
298		} else
299			error = EINVAL;
300		break;
301	    }
302	    case SMBIOC_LOOKUP:
303		if (sdp->sd_vc || sdp->sd_share) {
304			error = EISCONN;
305			goto out;
306		}
307		vcp = NULL;
308		ssp = NULL;
309		error = smb_usr_lookup((struct smbioc_lookup*)data, scred, &vcp, &ssp);
310		if (error)
311			break;
312		if (vcp) {
313			sdp->sd_vc = vcp;
314			smb_vc_unlock(vcp, 0);
315			sdp->sd_level = SMBL_VC;
316		}
317		if (ssp) {
318			sdp->sd_share = ssp;
319			smb_share_unlock(ssp, 0);
320			sdp->sd_level = SMBL_SHARE;
321		}
322		break;
323	    case SMBIOC_READ: case SMBIOC_WRITE: {
324		struct smbioc_rw *rwrq = (struct smbioc_rw*)data;
325		struct uio auio;
326		struct iovec iov;
327
328		if ((ssp = sdp->sd_share) == NULL) {
329			error = ENOTCONN;
330			goto out;
331	 	}
332		iov.iov_base = rwrq->ioc_base;
333		iov.iov_len = rwrq->ioc_cnt;
334		auio.uio_iov = &iov;
335		auio.uio_iovcnt = 1;
336		auio.uio_offset = rwrq->ioc_offset;
337		auio.uio_resid = rwrq->ioc_cnt;
338		auio.uio_segflg = UIO_USERSPACE;
339		auio.uio_rw = (cmd == SMBIOC_READ) ? UIO_READ : UIO_WRITE;
340		auio.uio_td = td;
341		if (cmd == SMBIOC_READ)
342			error = smb_read(ssp, rwrq->ioc_fh, &auio, scred);
343		else
344			error = smb_write(ssp, rwrq->ioc_fh, &auio, scred);
345		rwrq->ioc_cnt -= auio.uio_resid;
346		break;
347	    }
348	    default:
349		error = ENODEV;
350	}
351out:
352	free(scred, M_NSMBDEV);
353	return error;
354}
355
356static int
357nsmb_dev_load(module_t mod, int cmd, void *arg)
358{
359	int error = 0;
360
361	switch (cmd) {
362	    case MOD_LOAD:
363		error = smb_sm_init();
364		if (error)
365			break;
366		error = smb_iod_init();
367		if (error) {
368			smb_sm_done();
369			break;
370		}
371		clone_setup(&nsmb_clones);
372		nsmb_dev_tag = EVENTHANDLER_REGISTER(dev_clone, nsmb_dev_clone, 0, 1000);
373		break;
374	    case MOD_UNLOAD:
375		smb_iod_done();
376		error = smb_sm_done();
377		if (error)
378			break;
379		EVENTHANDLER_DEREGISTER(dev_clone, nsmb_dev_tag);
380		drain_dev_clone_events();
381		clone_cleanup(&nsmb_clones);
382		destroy_dev_drain(&nsmb_cdevsw);
383		break;
384	    default:
385		error = EINVAL;
386		break;
387	}
388	return error;
389}
390
391DEV_MODULE (dev_netsmb, nsmb_dev_load, 0);
392
393/*
394 * Convert a file descriptor to appropriate smb_share pointer
395 */
396static struct file*
397nsmb_getfp(struct filedesc* fdp, int fd, int flag)
398{
399	struct file* fp;
400
401	FILEDESC_SLOCK(fdp);
402	if (fd < 0 || fd >= fdp->fd_nfiles ||
403	    (fp = fdp->fd_ofiles[fd]) == NULL ||
404	    (fp->f_flag & flag) == 0) {
405		FILEDESC_SUNLOCK(fdp);
406		return (NULL);
407	}
408	fhold(fp);
409	FILEDESC_SUNLOCK(fdp);
410	return (fp);
411}
412
413int
414smb_dev2share(int fd, int mode, struct smb_cred *scred,
415	struct smb_share **sspp)
416{
417	struct file *fp;
418	struct vnode *vp;
419	struct smb_dev *sdp;
420	struct smb_share *ssp;
421	struct cdev *dev;
422	int error;
423
424	fp = nsmb_getfp(scred->scr_td->td_proc->p_fd, fd, FREAD | FWRITE);
425	if (fp == NULL)
426		return EBADF;
427	vp = fp->f_vnode;
428	if (vp == NULL) {
429		fdrop(fp, curthread);
430		return EBADF;
431	}
432	if (vp->v_type != VCHR) {
433		fdrop(fp, curthread);
434		return EBADF;
435	}
436	dev = vp->v_rdev;
437	SMB_CHECKMINOR(dev);
438	ssp = sdp->sd_share;
439	if (ssp == NULL) {
440		fdrop(fp, curthread);
441		return ENOTCONN;
442	}
443	error = smb_share_get(ssp, LK_EXCLUSIVE, scred);
444	if (error == 0)
445		*sspp = ssp;
446	fdrop(fp, curthread);
447	return error;
448}
449
450