Home | History | Annotate | Line # | Download | only in libperfuse
perfuse.c revision 1.2
      1 /*  $NetBSD: perfuse.c,v 1.2 2010/08/27 09:58:17 manu Exp $ */
      2 
      3 /*-
      4  *  Copyright (c) 2010 Emmanuel Dreyfus. All rights reserved.
      5  *
      6  *  Redistribution and use in source and binary forms, with or without
      7  *  modification, are permitted provided that the following conditions
      8  *  are met:
      9  *  1. Redistributions of source code must retain the above copyright
     10  *     notice, this list of conditions and the following disclaimer.
     11  *  2. Redistributions in binary form must reproduce the above copyright
     12  *     notice, this list of conditions and the following disclaimer in the
     13  *     documentation and/or other materials provided with the distribution.
     14  *
     15  *  THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     16  *  ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     17  *  TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     18  *  PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     19  *  BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     20  *  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     21  *  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     22  *  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     23  *  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     24  *  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     25  *  POSSIBILITY OF SUCH DAMAGE.
     26  */
     27 
     28 #include <stdio.h>
     29 #include <unistd.h>
     30 #include <stdlib.h>
     31 #include <fcntl.h>
     32 #include <string.h>
     33 #include <errno.h>
     34 #include <puffs.h>
     35 #include <sys/types.h>
     36 #include <sys/socket.h>
     37 #include <sys/un.h>
     38 
     39 #define LIBPERFUSE
     40 #include "perfuse.h"
     41 #include "perfuse_if.h"
     42 #include "perfuse_priv.h"
     43 
     44 int perfuse_diagflags = 0; /* global used only in DPRINTF/DERR/DWARN */
     45 
     46 static struct perfuse_state *init_state(void);
     47 static int get_fd(const char *);
     48 
     49 static struct perfuse_state *
     50 init_state(void)
     51 {
     52 	struct perfuse_state *ps;
     53 
     54 	if ((ps = malloc(sizeof(*ps))) == NULL)
     55 		DERR(EX_OSERR, "malloc failed");
     56 
     57 	(void)memset(ps, 0, sizeof(*ps));
     58 	ps->ps_max_write = UINT_MAX;
     59 	ps->ps_max_readahead = UINT_MAX;
     60 
     61 	return ps;
     62 }
     63 
     64 
     65 static int
     66 get_fd(data)
     67 	const char *data;
     68 {
     69 	char *string;
     70 	const char fdopt[] = "fd=";
     71 	char *lastp;
     72 	char *opt;
     73 	int fd = -1;
     74 
     75 	if ((string = strdup(data)) == NULL)
     76 		return -1;
     77 
     78 	for (opt = strtok_r(string, ",", &lastp);
     79 	     opt != NULL;
     80 	     opt = strtok_r(NULL, ",", &lastp)) {
     81 		if (strncmp(opt, fdopt, strlen(fdopt)) == 0) {
     82 			fd =  atoi(opt + strlen(fdopt));
     83 			break;
     84 		}
     85 	}
     86 
     87 	/*
     88 	 * No file descriptor found
     89 	 */
     90 	if (fd == -1)
     91 		errno = EINVAL;
     92 
     93 	free(string);
     94 	return fd;
     95 
     96 }
     97 
     98 int
     99 perfuse_open(path, flags, mode)
    100 	const char *path;
    101 	int flags;
    102 	mode_t mode;
    103 {
    104 	int sv[2];
    105 	struct sockaddr_un sun;
    106 	struct sockaddr *sa;
    107 	char progname[] = _PATH_PERFUSED;
    108 	char minus_i[] = "-i";
    109 	char fdstr[16];
    110 	char *const argv[] = { progname, minus_i, fdstr, NULL};
    111 	char *const envp[] = { NULL };
    112 
    113 	if (strcmp(path, _PATH_FUSE) != 0)
    114 		return open(path, flags, mode);
    115 
    116 	if ((sv[0] = socket(PF_LOCAL, SOCK_STREAM, 0)) == -1) {
    117 #ifdef PERFUSE_DEBUG
    118 		printf("%s:%d socket failed: %s\n",
    119 		       __func__, __LINE__, strerror(errno));
    120 #endif
    121 		return -1;
    122 	}
    123 
    124 	sa = (struct sockaddr *)(void *)&sun;
    125 	sun.sun_len = sizeof(sun);
    126 	sun.sun_family = AF_LOCAL;
    127 	(void)strcpy(sun.sun_path, path);
    128 
    129 	if (connect(sv[0], sa, (socklen_t)sun.sun_len) == 0)
    130 		return sv[0];
    131 
    132 
    133 	/*
    134 	 * Attempt to run perfused on our own
    135 	 * if it does not run yet; In that case
    136 	 * we will talk using a socketpair
    137 	 * instead of /dev/fuse.
    138 	 */
    139 	if (socketpair(PF_LOCAL, SOCK_STREAM, 0, sv) != 0) {
    140 #ifdef PERFUSE_DEBUG
    141 		printf("%s:%d: socketpair failed: %s\n",
    142 		       __func__, __LINE__, strerror(errno));
    143 #endif
    144 		return -1;
    145 	}
    146 
    147 	(void)sprintf(fdstr, "%d", sv[1]);
    148 
    149 	switch(fork()) {
    150 	case -1:
    151 #ifdef PERFUSE_DEBUG
    152 		printf("%s:%d: fork failed: %s\n",
    153 		       __func__, __LINE__, strerror(errno));
    154 #endif
    155 		return -1;
    156 		/* NOTREACHED */
    157 		break;
    158 	case 0:
    159 		(void)execve(argv[0], argv, envp);
    160 #ifdef PERFUSE_DEBUG
    161 		printf("%s:%d: execve failed: %s\n",
    162 		       __func__, __LINE__, strerror(errno));
    163 #endif
    164 		return -1;
    165 		/* NOTREACHED */
    166 		break;
    167 	default:
    168 		break;
    169 	}
    170 
    171 	return sv[0];
    172 }
    173 
    174 
    175 int
    176 perfuse_mount(source, target, filesystemtype, mountflags, data)
    177 	const char *source;
    178 	const char *target;
    179 	const char *filesystemtype;
    180 	long mountflags;
    181 	const void *data;
    182 {
    183 	int s;
    184 #if 0
    185 	struct sockaddr_un sun;
    186 #endif
    187 	size_t len;
    188 	struct perfuse_mount_out pmo;
    189 
    190 #ifdef PERFUSE_DEBUG
    191 	printf("%s(\"%s\", \"%s\", \"%s\", 0x%lx, \"%s\")\n", __func__,
    192 	       source, target, filesystemtype, mountflags, (const char *)data);
    193 #endif
    194 
    195 #if 0
    196 	if ((s = socket(PF_LOCAL, SOCK_STREAM, 0)) == -1)
    197 		err(EX_OSERR, "socket failed");
    198 
    199 	sun.sun_len = sizeof(sun);
    200 	sun.sun_family = AF_LOCAL;
    201 	(void)strcpy(sun.sun_path, _PATH_FUSE);
    202 
    203 	if (connect(s, (struct sockaddr *)&sun, sun.sun_len) == -1)
    204 		err(EX_UNAVAILABLE, "cannot connect to \"%s\"", _PATH_FUSE);
    205 #endif
    206 	if ((s = get_fd(data)) == -1)
    207 		return -1;
    208 
    209 
    210 	pmo.pmo_len = sizeof(pmo);
    211 	pmo.pmo_len += source ? strlen(source) : 0;
    212 	pmo.pmo_len += target ? strlen(target) : 0;
    213 	pmo.pmo_len += filesystemtype ? strlen(filesystemtype) : 0;
    214 	pmo.pmo_len += data ? strlen(data) : 0;
    215 	pmo.pmo_error = 0;
    216 	pmo.pmo_unique = (uint64_t)-1;
    217 
    218 	(void)strcpy(pmo.pmo_magic, PERFUSE_MOUNT_MAGIC);
    219 	pmo.pmo_source_len = source ? strlen(source) : 0;
    220 	pmo.pmo_target_len = target ? strlen(target) : 0;
    221 	pmo.pmo_filesystemtype_len =
    222 	    filesystemtype ? strlen(filesystemtype) : 0;
    223 	pmo.pmo_mountflags = mountflags;
    224 	pmo.pmo_data_len = data ? strlen(data) : 0;
    225 
    226 
    227 	if (write(s, &pmo, sizeof(pmo)) != sizeof(pmo)) {
    228 #ifdef PERFUSE_DEBUG
    229 		printf("%s:%d short write\n", __func__, __LINE__);
    230 #endif
    231 		return -1;
    232 	}
    233 
    234 	if (source) {
    235 		len = pmo.pmo_source_len;
    236 		if (write(s, source, len) != (ssize_t)len) {
    237 #ifdef PERFUSE_DEBUG
    238 			printf("%s:%d short write\n", __func__, __LINE__);
    239 #endif
    240 			return -1;
    241 		}
    242 	}
    243 
    244 	if (target) {
    245 		len = pmo.pmo_target_len;
    246 		if (write(s, target, len) != (ssize_t)len) {
    247 #ifdef PERFUSE_DEBUG
    248 			printf("%s:%d short write\n", __func__, __LINE__);
    249 #endif
    250 			return -1;
    251 		}
    252 	}
    253 
    254 	if (filesystemtype) {
    255 		len = pmo.pmo_filesystemtype_len;
    256 		if (write(s, filesystemtype, len) != (ssize_t)len) {
    257 #ifdef PERFUSE_DEBUG
    258 			printf("%s:%d short write\n", __func__, __LINE__);
    259 #endif
    260 			return -1;
    261 		}
    262 	}
    263 
    264 	if (data) {
    265 		len = pmo.pmo_data_len;
    266 		if (write(s, data, len) != (ssize_t)len) {
    267 #ifdef PERFUSE_DEBUG
    268 			printf("%s:%d short write\n", __func__, __LINE__);
    269 #endif
    270 			return -1;
    271 		}
    272 	}
    273 
    274 	return 0;
    275 }
    276 
    277 
    278 uint64_t
    279 perfuse_next_unique(pu)
    280 	struct puffs_usermount *pu;
    281 {
    282 	struct perfuse_state *ps;
    283 
    284 	ps = puffs_getspecific(pu);
    285 
    286 	return ps->ps_unique++;
    287 }
    288 
    289 struct puffs_usermount *
    290 perfuse_init(pc, pmi)
    291 	struct perfuse_callbacks *pc;
    292 	struct perfuse_mount_info *pmi;
    293 {
    294 	struct perfuse_state *ps;
    295 	struct puffs_usermount *pu;
    296 	struct puffs_ops *pops;
    297 	char name[] = "perfuse";
    298 	unsigned int puffs_flags;
    299 	struct puffs_node *pn_root;
    300 	struct puffs_pathobj *po_root;
    301 
    302 	ps = init_state();
    303 	ps->ps_owner_uid = pmi->pmi_uid;
    304 
    305 	if (pmi->pmi_source)
    306 		ps->ps_source = strdup(pmi->pmi_source);
    307 	if (pmi->pmi_filesystemtype)
    308 		ps->ps_filesystemtype = strdup(pmi->pmi_filesystemtype);
    309 	ps->ps_target = strdup(pmi->pmi_target);
    310 	ps->ps_mountflags = pmi->pmi_mountflags;
    311 
    312 	/*
    313 	 * Some options are forbidden for non root users
    314 	 */
    315 	if (ps->ps_owner_uid != 0)
    316 	    ps->ps_mountflags |= MNT_NOSUID|MNT_NODEV;
    317 
    318 	PUFFSOP_INIT(pops);
    319 	PUFFSOP_SET(pops, perfuse, fs, unmount);
    320 	PUFFSOP_SET(pops, perfuse, fs, statvfs);
    321 	PUFFSOP_SET(pops, perfuse, fs, sync);
    322 	PUFFSOP_SET(pops, perfuse, node, lookup);
    323 	PUFFSOP_SET(pops, perfuse, node, create);
    324 	PUFFSOP_SET(pops, perfuse, node, mknod);
    325 	PUFFSOP_SET(pops, perfuse, node, open);
    326 	PUFFSOP_SET(pops, perfuse, node, close);
    327 	PUFFSOP_SET(pops, perfuse, node, access);
    328 	PUFFSOP_SET(pops, perfuse, node, getattr);
    329 	PUFFSOP_SET(pops, perfuse, node, setattr);
    330 	PUFFSOP_SET(pops, perfuse, node, poll);
    331 #if 0
    332 	PUFFSOP_SET(pops, perfuse, node, mmap);
    333 #endif
    334 	PUFFSOP_SET(pops, perfuse, node, fsync);
    335 	PUFFSOP_SET(pops, perfuse, node, seek);
    336 	PUFFSOP_SET(pops, perfuse, node, remove);
    337 	PUFFSOP_SET(pops, perfuse, node, link);
    338 	PUFFSOP_SET(pops, perfuse, node, rename);
    339 	PUFFSOP_SET(pops, perfuse, node, mkdir);
    340 	PUFFSOP_SET(pops, perfuse, node, rmdir);
    341 	PUFFSOP_SET(pops, perfuse, node, symlink);
    342 	PUFFSOP_SET(pops, perfuse, node, readdir);
    343 	PUFFSOP_SET(pops, perfuse, node, readlink);
    344 	PUFFSOP_SET(pops, perfuse, node, reclaim);
    345 	PUFFSOP_SET(pops, perfuse, node, inactive);
    346 	PUFFSOP_SET(pops, perfuse, node, print);
    347 	PUFFSOP_SET(pops, perfuse, node, advlock);
    348 	PUFFSOP_SET(pops, perfuse, node, read);
    349 	PUFFSOP_SET(pops, perfuse, node, write);
    350 
    351 	puffs_flags = PUFFS_FLAG_BUILDPATH | PUFFS_FLAG_HASHPATH;
    352 	if (perfuse_diagflags & PDF_PUFFS)
    353 		puffs_flags |= PUFFS_FLAG_OPDUMP;
    354 
    355 	if ((pu = puffs_init(pops, _PATH_PUFFS, name, ps, puffs_flags)) == NULL)
    356 		DERR(EX_OSERR, "puffs_init failed");
    357 
    358 	ps->ps_pu = pu;
    359 
    360 	/*
    361 	 * Setup filesystem root
    362 	 */
    363 	pn_root = perfuse_new_pn(pu, NULL);
    364 	PERFUSE_NODE_DATA(pn_root)->pnd_ino = FUSE_ROOT_ID;
    365 	puffs_setroot(pu, pn_root);
    366 	ps->ps_fsid = pn_root->pn_va.va_fsid;
    367 
    368 	po_root = puffs_getrootpathobj(pu);
    369 	if ((po_root->po_path = strdup("/")) == NULL)
    370 		DERRX(EX_OSERR, "perfuse_mount_start() failed");
    371 
    372 	po_root->po_len = 1;
    373 	puffs_path_buildhash(pu, po_root);
    374 
    375 	puffs_vattr_null(&pn_root->pn_va);
    376 	pn_root->pn_va.va_type = VDIR;
    377 	pn_root->pn_va.va_mode = 0755;
    378 
    379 	ps->ps_root = pn_root;
    380 
    381 	/*
    382 	 *  Callbacks
    383 	 */
    384 	ps->ps_new_msg = pc->pc_new_msg;
    385 	ps->ps_xchg_msg = pc->pc_xchg_msg;
    386 	ps->ps_destroy_msg = pc->pc_destroy_msg;
    387 	ps->ps_get_inhdr = pc->pc_get_inhdr;
    388 	ps->ps_get_inpayload = pc->pc_get_inpayload;
    389 	ps->ps_get_outhdr = pc->pc_get_outhdr;
    390 	ps->ps_get_outpayload = pc->pc_get_outpayload;
    391 
    392 	return pu;
    393 }
    394 
    395 void
    396 perfuse_setspecific(pu, priv)
    397 	struct puffs_usermount *pu;
    398 	void *priv;
    399 {
    400 	struct perfuse_state *ps;
    401 
    402 	ps = puffs_getspecific(pu);
    403 	ps->ps_private = priv;
    404 
    405 	return;
    406 }
    407 
    408 void *
    409 perfuse_getspecific(pu)
    410 	struct puffs_usermount *pu;
    411 {
    412 	struct perfuse_state *ps;
    413 
    414 	ps = puffs_getspecific(pu);
    415 
    416 	return ps->ps_private;
    417 }
    418 
    419 int
    420 perfuse_inloop(pu)
    421 	struct puffs_usermount *pu;
    422 {
    423 	struct perfuse_state *ps;
    424 
    425 	ps = puffs_getspecific(pu);
    426 
    427 	return ps->ps_flags & PS_INLOOP;
    428 }
    429 
    430 int
    431 perfuse_mainloop(pu)
    432 	struct puffs_usermount *pu;
    433 {
    434 	struct perfuse_state *ps;
    435 
    436 	ps = puffs_getspecific(pu);
    437 
    438 	ps->ps_flags |= PS_INLOOP;
    439 	if (puffs_mainloop(ps->ps_pu) != 0)
    440 		DERR(EX_OSERR, "puffs_mainloop failed");
    441 	DERR(EX_OSERR, "puffs_mainloop exit");
    442 
    443 	/* NOTREACHED */
    444 	return -1;
    445 }
    446 
    447 /* ARGSUSED0 */
    448 uint64_t
    449 perfuse_get_ino(pu, opc)
    450 	struct puffs_usermount *pu;
    451 	puffs_cookie_t opc;
    452 {
    453 	return PERFUSE_NODE_DATA(opc)->pnd_ino;
    454 }
    455 
    456 int
    457 perfuse_unmount(pu)
    458 	struct puffs_usermount *pu;
    459 {
    460 	struct perfuse_state *ps;
    461 
    462 	ps = puffs_getspecific(pu);
    463 
    464 	return unmount(ps->ps_target, MNT_FORCE);
    465 }
    466