puffs_msgif.c revision 1.101.10.9 1 /* $NetBSD: puffs_msgif.c,v 1.101.10.9 2019/01/18 00:01:01 pgoyette Exp $ */
2
3 /*
4 * Copyright (c) 2005, 2006, 2007 Antti Kantee. All Rights Reserved.
5 *
6 * Development of this software was supported by the
7 * Google Summer of Code program and the Ulla Tuominen Foundation.
8 * The Google SoC project was mentored by Bill Studenmund.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
20 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
21 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
22 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
25 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 __KERNEL_RCSID(0, "$NetBSD: puffs_msgif.c,v 1.101.10.9 2019/01/18 00:01:01 pgoyette Exp $");
34
35 #include <sys/param.h>
36 #include <sys/kernel.h>
37 #include <sys/atomic.h>
38 #include <sys/kmem.h>
39 #include <sys/kthread.h>
40 #include <sys/lock.h>
41 #include <sys/mount.h>
42 #include <sys/namei.h>
43 #include <sys/proc.h>
44 #include <sys/vnode.h>
45 #include <sys/atomic.h>
46 #include <sys/compat_stub.h>
47
48 #include <uvm/uvm.h>
49
50 #include <dev/putter/putter_sys.h>
51
52 #include <fs/puffs/puffs_msgif.h>
53 #include <fs/puffs/puffs_sys.h>
54
55 /*
56 * waitq data structures
57 */
58
59 /*
60 * While a request is going to userspace, park the caller within the
61 * kernel. This is the kernel counterpart of "struct puffs_req".
62 */
63 struct puffs_msgpark {
64 struct puffs_req *park_preq; /* req followed by buf */
65
66 size_t park_copylen; /* userspace copylength */
67 size_t park_maxlen; /* max size in comeback */
68
69 struct puffs_req *park_creq; /* non-compat preq */
70 size_t park_creqlen; /* non-compat preq len */
71
72 parkdone_fn park_done; /* "biodone" a'la puffs */
73 void *park_donearg;
74
75 int park_flags;
76 int park_refcount;
77
78 kcondvar_t park_cv;
79 kmutex_t park_mtx;
80
81 TAILQ_ENTRY(puffs_msgpark) park_entries;
82 };
83 #define PARKFLAG_WAITERGONE 0x01
84 #define PARKFLAG_DONE 0x02
85 #define PARKFLAG_ONQUEUE1 0x04
86 #define PARKFLAG_ONQUEUE2 0x08
87 #define PARKFLAG_CALL 0x10
88 #define PARKFLAG_WANTREPLY 0x20
89 #define PARKFLAG_HASERROR 0x40
90
91 static pool_cache_t parkpc;
92 #ifdef PUFFSDEBUG
93 static int totalpark;
94 #endif
95
96 int puffs_sopreq_expire_timeout = PUFFS_SOPREQ_EXPIRE_TIMEOUT;
97
98 static int
99 makepark(void *arg, void *obj, int flags)
100 {
101 struct puffs_msgpark *park = obj;
102
103 mutex_init(&park->park_mtx, MUTEX_DEFAULT, IPL_NONE);
104 cv_init(&park->park_cv, "puffsrpl");
105
106 return 0;
107 }
108
109 static void
110 nukepark(void *arg, void *obj)
111 {
112 struct puffs_msgpark *park = obj;
113
114 cv_destroy(&park->park_cv);
115 mutex_destroy(&park->park_mtx);
116 }
117
118 void
119 puffs_msgif_init(void)
120 {
121
122 parkpc = pool_cache_init(sizeof(struct puffs_msgpark), 0, 0, 0,
123 "puffprkl", NULL, IPL_NONE, makepark, nukepark, NULL);
124 }
125
126 void
127 puffs_msgif_destroy(void)
128 {
129
130 pool_cache_destroy(parkpc);
131 }
132
133 static struct puffs_msgpark *
134 puffs_msgpark_alloc(int waitok)
135 {
136 struct puffs_msgpark *park;
137
138 KASSERT(curlwp != uvm.pagedaemon_lwp || !waitok);
139
140 park = pool_cache_get(parkpc, waitok ? PR_WAITOK : PR_NOWAIT);
141 if (park == NULL)
142 return park;
143
144 park->park_refcount = 1;
145 park->park_preq = park->park_creq = NULL;
146 park->park_flags = PARKFLAG_WANTREPLY;
147
148 #ifdef PUFFSDEBUG
149 totalpark++;
150 #endif
151
152 return park;
153 }
154
155 static void
156 puffs_msgpark_reference(struct puffs_msgpark *park)
157 {
158
159 KASSERT(mutex_owned(&park->park_mtx));
160 park->park_refcount++;
161 }
162
163 /*
164 * Release reference to park structure.
165 */
166 static void
167 puffs_msgpark_release1(struct puffs_msgpark *park, int howmany)
168 {
169 struct puffs_req *preq = park->park_preq;
170 struct puffs_req *creq = park->park_creq;
171 int refcnt;
172
173 KASSERT(mutex_owned(&park->park_mtx));
174 refcnt = park->park_refcount -= howmany;
175 mutex_exit(&park->park_mtx);
176
177 KASSERT(refcnt >= 0);
178
179 if (refcnt == 0) {
180 if (preq)
181 kmem_free(preq, park->park_maxlen);
182 #if 1
183 if (creq)
184 kmem_free(creq, park->park_creqlen);
185 #endif
186 pool_cache_put(parkpc, park);
187
188 #ifdef PUFFSDEBUG
189 totalpark--;
190 #endif
191 }
192 }
193 #define puffs_msgpark_release(a) puffs_msgpark_release1(a, 1)
194
195 #ifdef PUFFSDEBUG
196 static void
197 parkdump(struct puffs_msgpark *park)
198 {
199
200 DPRINTF(("park %p, preq %p, id %" PRIu64 "\n"
201 "\tcopy %zu, max %zu - done: %p/%p\n"
202 "\tflags 0x%08x, refcount %d, cv/mtx: %p/%p\n",
203 park, park->park_preq, park->park_preq->preq_id,
204 park->park_copylen, park->park_maxlen,
205 park->park_done, park->park_donearg,
206 park->park_flags, park->park_refcount,
207 &park->park_cv, &park->park_mtx));
208 }
209
210 static void
211 parkqdump(struct puffs_wq *q, int dumpall)
212 {
213 struct puffs_msgpark *park;
214 int total = 0;
215
216 TAILQ_FOREACH(park, q, park_entries) {
217 if (dumpall)
218 parkdump(park);
219 total++;
220 }
221 DPRINTF(("puffs waitqueue at %p dumped, %d total\n", q, total));
222
223 }
224 #endif /* PUFFSDEBUG */
225
226 /*
227 * A word about locking in the park structures: the lock protects the
228 * fields of the *park* structure (not preq) and acts as an interlock
229 * in cv operations. The lock is always internal to this module and
230 * callers do not need to worry about it.
231 */
232
233 int
234 puffs_msgmem_alloc(size_t len, struct puffs_msgpark **ppark, void **mem,
235 int cansleep)
236 {
237 struct puffs_msgpark *park;
238 void *m;
239
240 KASSERT(curlwp != uvm.pagedaemon_lwp || !cansleep);
241 m = kmem_zalloc(len, cansleep ? KM_SLEEP : KM_NOSLEEP);
242 if (m == NULL) {
243 KASSERT(cansleep == 0);
244 return ENOMEM;
245 }
246
247 park = puffs_msgpark_alloc(cansleep);
248 if (park == NULL) {
249 KASSERT(cansleep == 0);
250 kmem_free(m, len);
251 return ENOMEM;
252 }
253
254 park->park_preq = m;
255 park->park_maxlen = park->park_copylen = len;
256
257 *ppark = park;
258 *mem = m;
259
260 return 0;
261 }
262
263 void
264 puffs_msgmem_release(struct puffs_msgpark *park)
265 {
266
267 if (park == NULL)
268 return;
269
270 mutex_enter(&park->park_mtx);
271 puffs_msgpark_release(park);
272 }
273
274 void
275 puffs_msg_setfaf(struct puffs_msgpark *park)
276 {
277
278 KASSERT((park->park_flags & PARKFLAG_CALL) == 0);
279 park->park_flags &= ~PARKFLAG_WANTREPLY;
280 }
281
282 void
283 puffs_msg_setdelta(struct puffs_msgpark *park, size_t delta)
284 {
285
286 KASSERT(delta < park->park_maxlen); /* "<=" wouldn't make sense */
287 park->park_copylen = park->park_maxlen - delta;
288 }
289
290 void
291 puffs_msg_setinfo(struct puffs_msgpark *park, int opclass, int type,
292 puffs_cookie_t ck)
293 {
294
295 park->park_preq->preq_opclass = PUFFSOP_OPCLASS(opclass);
296 park->park_preq->preq_optype = type;
297 park->park_preq->preq_cookie = ck;
298 }
299
300 void
301 puffs_msg_setcall(struct puffs_msgpark *park, parkdone_fn donefn, void *donearg)
302 {
303
304 KASSERT(park->park_flags & PARKFLAG_WANTREPLY);
305 park->park_done = donefn;
306 park->park_donearg = donearg;
307 park->park_flags |= PARKFLAG_CALL;
308 }
309
310 /*
311 * kernel-user-kernel waitqueues
312 */
313
314 static uint64_t
315 puffs_getmsgid(struct puffs_mount *pmp)
316 {
317 uint64_t rv;
318
319 mutex_enter(&pmp->pmp_lock);
320 rv = pmp->pmp_nextmsgid++;
321 mutex_exit(&pmp->pmp_lock);
322
323 return rv;
324 }
325
326 /* Routines to call the compat hooks */
327 /* Out-going */
328 MODULE_CALL_HOOK_DECL(puffs_50_out_hook, int,
329 (struct puffs_req *oreq, struct puffs_req **creqp, ssize_t *deltap));
330 MODULE_CALL_HOOK(puffs_50_out_hook, int,
331 (struct puffs_req *oreq, struct puffs_req **creqp, ssize_t *deltap),
332 (oreq, creqp, deltap), enosys());
333
334 /* Incoming */
335 MODULE_CALL_VOID_HOOK_DECL(puffs_50_in_hook,
336 (struct puffs_req *oreq, struct puffs_req *creqp));
337 MODULE_CALL_VOID_HOOK(puffs_50_in_hook,
338 (struct puffs_req *oreq, struct puffs_req *creqp),
339 (oreq, creqp), __nothing);
340
341 /*
342 * A word about reference counting of parks. A reference must be taken
343 * when accessing a park and additionally when it is on a queue. So
344 * when taking it off a queue and releasing the access reference, the
345 * reference count is generally decremented by 2.
346 */
347
348 void
349 puffs_msg_enqueue(struct puffs_mount *pmp, struct puffs_msgpark *park)
350 {
351 struct lwp *l = curlwp;
352 struct puffs_req *preq, *creq;
353 ssize_t delta;
354
355 /*
356 * Some clients reuse a park, so reset some flags. We might
357 * want to provide a caller-side interface for this and add
358 * a few more invariant checks here, but this will do for now.
359 */
360 park->park_flags &= ~(PARKFLAG_DONE | PARKFLAG_HASERROR);
361 KASSERT((park->park_flags & PARKFLAG_WAITERGONE) == 0);
362
363 preq = park->park_preq;
364
365 #if 1
366 /* check if we do compat adjustments */
367 if (pmp->pmp_docompat &&
368 puffs_50_out_hook_call(preq, &creq, &delta) == 0) {
369 park->park_creq = park->park_preq;
370 park->park_creqlen = park->park_maxlen;
371
372 park->park_maxlen += delta;
373 park->park_copylen += delta;
374 park->park_preq = preq = creq;
375 }
376 #endif
377
378 preq->preq_buflen = park->park_maxlen;
379 KASSERT(preq->preq_id == 0
380 || (preq->preq_opclass & PUFFSOPFLAG_ISRESPONSE));
381
382 if ((park->park_flags & PARKFLAG_WANTREPLY) == 0)
383 preq->preq_opclass |= PUFFSOPFLAG_FAF;
384 else
385 preq->preq_id = puffs_getmsgid(pmp);
386
387 /* fill in caller information */
388 preq->preq_pid = l->l_proc->p_pid;
389 preq->preq_lid = l->l_lid;
390
391 /*
392 * To support cv_sig, yet another movie: check if there are signals
393 * pending and we are issueing a non-FAF. If so, return an error
394 * directly UNLESS we are issueing INACTIVE/RECLAIM. In that case,
395 * convert it to a FAF, fire off to the file server and return
396 * an error. Yes, this is bordering disgusting. Barfbags are on me.
397 */
398 if (__predict_false((park->park_flags & PARKFLAG_WANTREPLY)
399 && (park->park_flags & PARKFLAG_CALL) == 0
400 && (l->l_flag & LW_PENDSIG) != 0 && sigispending(l, 0))) {
401 sigset_t ss;
402
403 /*
404 * see the comment about signals in puffs_msg_wait.
405 */
406 sigpending1(l, &ss);
407 if (sigismember(&ss, SIGINT) ||
408 sigismember(&ss, SIGTERM) ||
409 sigismember(&ss, SIGKILL) ||
410 sigismember(&ss, SIGHUP) ||
411 sigismember(&ss, SIGQUIT)) {
412 park->park_flags |= PARKFLAG_HASERROR;
413 preq->preq_rv = EINTR;
414 if (PUFFSOP_OPCLASS(preq->preq_opclass) == PUFFSOP_VN
415 && (preq->preq_optype == PUFFS_VN_INACTIVE
416 || preq->preq_optype == PUFFS_VN_RECLAIM)) {
417 park->park_preq->preq_opclass |=
418 PUFFSOPFLAG_FAF;
419 park->park_flags &= ~PARKFLAG_WANTREPLY;
420 DPRINTF(("puffs_msg_enqueue: "
421 "converted to FAF %p\n", park));
422 } else {
423 return;
424 }
425 }
426 }
427
428 mutex_enter(&pmp->pmp_lock);
429 if (pmp->pmp_status != PUFFSTAT_RUNNING) {
430 mutex_exit(&pmp->pmp_lock);
431 park->park_flags |= PARKFLAG_HASERROR;
432 preq->preq_rv = ENXIO;
433 return;
434 }
435
436 #ifdef PUFFSDEBUG
437 parkqdump(&pmp->pmp_msg_touser, puffsdebug > 1);
438 parkqdump(&pmp->pmp_msg_replywait, puffsdebug > 1);
439 #endif
440
441 /*
442 * Note: we don't need to lock park since we have the only
443 * reference to it at this point.
444 */
445 TAILQ_INSERT_TAIL(&pmp->pmp_msg_touser, park, park_entries);
446 park->park_flags |= PARKFLAG_ONQUEUE1;
447 pmp->pmp_msg_touser_count++;
448 park->park_refcount++;
449
450 cv_broadcast(&pmp->pmp_msg_waiter_cv);
451 mutex_exit(&pmp->pmp_lock);
452 putter_notify(pmp->pmp_pi);
453
454 DPRINTF(("touser: req %" PRIu64 ", preq: %p, park: %p, "
455 "c/t: 0x%x/0x%x, f: 0x%x\n", preq->preq_id, preq, park,
456 preq->preq_opclass, preq->preq_optype, park->park_flags));
457 }
458
459 int
460 puffs_msg_wait(struct puffs_mount *pmp, struct puffs_msgpark *park)
461 {
462 lwp_t *l = curlwp;
463 proc_t *p = l->l_proc;
464 struct puffs_req *preq = park->park_preq; /* XXX: hmmm */
465 sigset_t ss;
466 sigset_t oss;
467 int error = 0;
468 int rv;
469
470 /*
471 * block unimportant signals.
472 *
473 * The set of "important" signals here was chosen to be same as
474 * nfs interruptible mount.
475 */
476 sigfillset(&ss);
477 sigdelset(&ss, SIGINT);
478 sigdelset(&ss, SIGTERM);
479 sigdelset(&ss, SIGKILL);
480 sigdelset(&ss, SIGHUP);
481 sigdelset(&ss, SIGQUIT);
482 mutex_enter(p->p_lock);
483 sigprocmask1(l, SIG_BLOCK, &ss, &oss);
484 mutex_exit(p->p_lock);
485
486 mutex_enter(&pmp->pmp_lock);
487 puffs_mp_reference(pmp);
488 mutex_exit(&pmp->pmp_lock);
489
490 mutex_enter(&park->park_mtx);
491 /* did the response beat us to the wait? */
492 if (__predict_false((park->park_flags & PARKFLAG_DONE)
493 || (park->park_flags & PARKFLAG_HASERROR))) {
494 rv = park->park_preq->preq_rv;
495 mutex_exit(&park->park_mtx);
496 goto skipwait;
497 }
498
499 if ((park->park_flags & PARKFLAG_WANTREPLY) == 0
500 || (park->park_flags & PARKFLAG_CALL)) {
501 mutex_exit(&park->park_mtx);
502 rv = 0;
503 goto skipwait;
504 }
505
506 error = cv_wait_sig(&park->park_cv, &park->park_mtx);
507 DPRINTF(("puffs_touser: waiter for %p woke up with %d\n",
508 park, error));
509 if (error) {
510 park->park_flags |= PARKFLAG_WAITERGONE;
511 if (park->park_flags & PARKFLAG_DONE) {
512 rv = preq->preq_rv;
513 mutex_exit(&park->park_mtx);
514 } else {
515 /*
516 * ok, we marked it as going away, but
517 * still need to do queue ops. take locks
518 * in correct order.
519 *
520 * We don't want to release our reference
521 * if it's on replywait queue to avoid error
522 * to file server. putop() code will DTRT.
523 */
524 mutex_exit(&park->park_mtx);
525 mutex_enter(&pmp->pmp_lock);
526 mutex_enter(&park->park_mtx);
527
528 /*
529 * Still on queue1? We can safely remove it
530 * without any consequences since the file
531 * server hasn't seen it. "else" we need to
532 * wait for the response and just ignore it
533 * to avoid signalling an incorrect error to
534 * the file server.
535 */
536 if (park->park_flags & PARKFLAG_ONQUEUE1) {
537 TAILQ_REMOVE(&pmp->pmp_msg_touser,
538 park, park_entries);
539 puffs_msgpark_release(park);
540 pmp->pmp_msg_touser_count--;
541 park->park_flags &= ~PARKFLAG_ONQUEUE1;
542 } else {
543 mutex_exit(&park->park_mtx);
544 }
545 mutex_exit(&pmp->pmp_lock);
546
547 rv = EINTR;
548 }
549 } else {
550 rv = preq->preq_rv;
551 mutex_exit(&park->park_mtx);
552 }
553
554 skipwait:
555 mutex_enter(&pmp->pmp_lock);
556 puffs_mp_release(pmp);
557 mutex_exit(&pmp->pmp_lock);
558
559 mutex_enter(p->p_lock);
560 sigprocmask1(l, SIG_SETMASK, &oss, NULL);
561 mutex_exit(p->p_lock);
562
563 return rv;
564 }
565
566 /*
567 * XXX: this suuuucks. Hopefully I'll get rid of this lossage once
568 * the whole setback-nonsense gets fixed.
569 */
570 int
571 puffs_msg_wait2(struct puffs_mount *pmp, struct puffs_msgpark *park,
572 struct puffs_node *pn1, struct puffs_node *pn2)
573 {
574 struct puffs_req *preq;
575 int rv;
576
577 rv = puffs_msg_wait(pmp, park);
578
579 preq = park->park_preq;
580 if (pn1 && preq->preq_setbacks & PUFFS_SETBACK_INACT_N1)
581 pn1->pn_stat |= PNODE_DOINACT;
582 if (pn2 && preq->preq_setbacks & PUFFS_SETBACK_INACT_N2)
583 pn2->pn_stat |= PNODE_DOINACT;
584
585 if (pn1 && preq->preq_setbacks & PUFFS_SETBACK_NOREF_N1)
586 pn1->pn_stat |= PNODE_NOREFS;
587 if (pn2 && preq->preq_setbacks & PUFFS_SETBACK_NOREF_N2)
588 pn2->pn_stat |= PNODE_NOREFS;
589
590 return rv;
591
592 }
593
594 /*
595 * XXX: lazy bum. please, for the love of foie gras, fix me.
596 * This should *NOT* depend on setfaf. Also "memcpy" could
597 * be done more nicely.
598 */
599 void
600 puffs_msg_sendresp(struct puffs_mount *pmp, struct puffs_req *origpreq, int rv)
601 {
602 struct puffs_msgpark *park;
603 struct puffs_req *preq;
604
605 puffs_msgmem_alloc(sizeof(struct puffs_req), &park, (void *)&preq, 1);
606 puffs_msg_setfaf(park); /* XXXXXX: avoids reqid override */
607
608 memcpy(preq, origpreq, sizeof(struct puffs_req));
609 preq->preq_rv = rv;
610 preq->preq_opclass |= PUFFSOPFLAG_ISRESPONSE;
611
612 puffs_msg_enqueue(pmp, park);
613 puffs_msgmem_release(park);
614 }
615
616 /*
617 * Get next request in the outgoing queue. "maxsize" controls the
618 * size the caller can accommodate and "nonblock" signals if this
619 * should block while waiting for input. Handles all locking internally.
620 */
621 int
622 puffs_msgif_getout(void *ctx, size_t maxsize, int nonblock,
623 uint8_t **data, size_t *dlen, void **parkptr)
624 {
625 struct puffs_mount *pmp = ctx;
626 struct puffs_msgpark *park = NULL;
627 struct puffs_req *preq = NULL;
628 int error;
629
630 error = 0;
631 mutex_enter(&pmp->pmp_lock);
632 puffs_mp_reference(pmp);
633 for (;;) {
634 /* RIP? */
635 if (pmp->pmp_status != PUFFSTAT_RUNNING) {
636 error = ENXIO;
637 break;
638 }
639
640 /* need platinum yendorian express card? */
641 if (TAILQ_EMPTY(&pmp->pmp_msg_touser)) {
642 DPRINTF(("puffs_getout: no outgoing op, "));
643 if (nonblock) {
644 DPRINTF(("returning EWOULDBLOCK\n"));
645 error = EWOULDBLOCK;
646 break;
647 }
648 DPRINTF(("waiting ...\n"));
649
650 error = cv_wait_sig(&pmp->pmp_msg_waiter_cv,
651 &pmp->pmp_lock);
652 if (error)
653 break;
654 else
655 continue;
656 }
657
658 park = TAILQ_FIRST(&pmp->pmp_msg_touser);
659 if (park == NULL)
660 continue;
661
662 mutex_enter(&park->park_mtx);
663 puffs_msgpark_reference(park);
664
665 DPRINTF(("puffs_getout: found park at %p, ", park));
666
667 /* If it's a goner, don't process any furher */
668 if (park->park_flags & PARKFLAG_WAITERGONE) {
669 DPRINTF(("waitergone!\n"));
670 puffs_msgpark_release(park);
671 continue;
672 }
673 preq = park->park_preq;
674
675 #if 0
676 /* check size */
677 /*
678 * XXX: this check is not valid for now, we don't know
679 * the size of the caller's input buffer. i.e. this
680 * will most likely go away
681 */
682 if (maxsize < preq->preq_frhdr.pfr_len) {
683 DPRINTF(("buffer too small\n"));
684 puffs_msgpark_release(park);
685 error = E2BIG;
686 break;
687 }
688 #endif
689
690 DPRINTF(("returning\n"));
691
692 /*
693 * Ok, we found what we came for. Release it from the
694 * outgoing queue but do not unlock. We will unlock
695 * only after we "releaseout" it to avoid complications:
696 * otherwise it is (theoretically) possible for userland
697 * to race us into "put" before we have a change to put
698 * this baby on the receiving queue.
699 */
700 TAILQ_REMOVE(&pmp->pmp_msg_touser, park, park_entries);
701 KASSERT(park->park_flags & PARKFLAG_ONQUEUE1);
702 park->park_flags &= ~PARKFLAG_ONQUEUE1;
703 mutex_exit(&park->park_mtx);
704
705 pmp->pmp_msg_touser_count--;
706 KASSERT(pmp->pmp_msg_touser_count >= 0);
707
708 break;
709 }
710 puffs_mp_release(pmp);
711 mutex_exit(&pmp->pmp_lock);
712
713 if (error == 0) {
714 *data = (uint8_t *)preq;
715 preq->preq_pth.pth_framelen = park->park_copylen;
716 *dlen = preq->preq_pth.pth_framelen;
717 *parkptr = park;
718 }
719
720 return error;
721 }
722
723 /*
724 * Release outgoing structure. Now, depending on the success of the
725 * outgoing send, it is either going onto the result waiting queue
726 * or the death chamber.
727 */
728 void
729 puffs_msgif_releaseout(void *ctx, void *parkptr, int status)
730 {
731 struct puffs_mount *pmp = ctx;
732 struct puffs_msgpark *park = parkptr;
733
734 DPRINTF(("puffs_releaseout: returning park %p, errno %d: " ,
735 park, status));
736 mutex_enter(&pmp->pmp_lock);
737 mutex_enter(&park->park_mtx);
738 if (park->park_flags & PARKFLAG_WANTREPLY) {
739 if (status == 0) {
740 DPRINTF(("enqueue replywait\n"));
741 TAILQ_INSERT_TAIL(&pmp->pmp_msg_replywait, park,
742 park_entries);
743 park->park_flags |= PARKFLAG_ONQUEUE2;
744 } else {
745 DPRINTF(("error path!\n"));
746 park->park_preq->preq_rv = status;
747 park->park_flags |= PARKFLAG_DONE;
748 cv_signal(&park->park_cv);
749 }
750 puffs_msgpark_release(park);
751 } else {
752 DPRINTF(("release\n"));
753 puffs_msgpark_release1(park, 2);
754 }
755 mutex_exit(&pmp->pmp_lock);
756 }
757
758 size_t
759 puffs_msgif_waitcount(void *ctx)
760 {
761 struct puffs_mount *pmp = ctx;
762 size_t rv;
763
764 mutex_enter(&pmp->pmp_lock);
765 rv = pmp->pmp_msg_touser_count;
766 mutex_exit(&pmp->pmp_lock);
767
768 return rv;
769 }
770
771 /*
772 * XXX: locking with this one?
773 */
774 static void
775 puffsop_msg(void *ctx, struct puffs_req *preq)
776 {
777 struct puffs_mount *pmp = ctx;
778 struct putter_hdr *pth = &preq->preq_pth;
779 struct puffs_msgpark *park;
780 int wgone;
781
782 mutex_enter(&pmp->pmp_lock);
783
784 /* Locate waiter */
785 TAILQ_FOREACH(park, &pmp->pmp_msg_replywait, park_entries) {
786 if (park->park_preq->preq_id == preq->preq_id)
787 break;
788 }
789 if (park == NULL) {
790 DPRINTF(("puffsop_msg: no request: %" PRIu64 "\n",
791 preq->preq_id));
792 mutex_exit(&pmp->pmp_lock);
793 return; /* XXX send error */
794 }
795
796 mutex_enter(&park->park_mtx);
797 puffs_msgpark_reference(park);
798 if (pth->pth_framelen > park->park_maxlen) {
799 DPRINTF(("puffsop_msg: invalid buffer length: "
800 "%" PRIu64 " (req %" PRIu64 ", \n", pth->pth_framelen,
801 preq->preq_id));
802 park->park_preq->preq_rv = EPROTO;
803 cv_signal(&park->park_cv);
804 puffs_msgpark_release1(park, 2);
805 mutex_exit(&pmp->pmp_lock);
806 return; /* XXX: error */
807 }
808 wgone = park->park_flags & PARKFLAG_WAITERGONE;
809
810 KASSERT(park->park_flags & PARKFLAG_ONQUEUE2);
811 TAILQ_REMOVE(&pmp->pmp_msg_replywait, park, park_entries);
812 park->park_flags &= ~PARKFLAG_ONQUEUE2;
813 mutex_exit(&pmp->pmp_lock);
814
815 if (wgone) {
816 DPRINTF(("puffsop_msg: bad service - waiter gone for "
817 "park %p\n", park));
818 } else {
819 #if 1
820 if (park->park_creq) {
821 struct puffs_req *creq;
822 size_t csize;
823
824 KASSERT(pmp->pmp_docompat);
825 puffs_50_in_hook_call(preq, park->park_creq);
826 creq = park->park_creq;
827 csize = park->park_creqlen;
828 park->park_creq = park->park_preq;
829 park->park_creqlen = park->park_maxlen;
830
831 park->park_preq = creq;
832 park->park_maxlen = csize;
833
834 memcpy(park->park_creq, preq, pth->pth_framelen);
835 } else {
836 #endif
837 memcpy(park->park_preq, preq, pth->pth_framelen);
838 }
839
840 if (park->park_flags & PARKFLAG_CALL) {
841 DPRINTF(("puffsop_msg: call for %p, arg %p\n",
842 park->park_preq, park->park_donearg));
843 park->park_done(pmp, preq, park->park_donearg);
844 }
845 }
846
847 if (!wgone) {
848 DPRINTF(("puffs_putop: flagging done for "
849 "park %p\n", park));
850 cv_signal(&park->park_cv);
851 }
852
853 park->park_flags |= PARKFLAG_DONE;
854 puffs_msgpark_release1(park, 2);
855 }
856
857 /*
858 * Node expiry. We come here after an inactive on an unexpired node.
859 * The expiry has been queued and is done in sop thread.
860 */
861 static void
862 puffsop_expire(struct puffs_mount *pmp, puffs_cookie_t cookie)
863 {
864 struct vnode *vp;
865
866 KASSERT(PUFFS_USE_FS_TTL(pmp));
867
868 /*
869 * If it still exists and has no reference,
870 * vrele should cause it to be reclaimed.
871 * Otherwise, we have nothing to do.
872 */
873 if (puffs_cookie2vnode(pmp, cookie, &vp) == 0) {
874 VPTOPP(vp)->pn_stat &= ~PNODE_SOPEXP;
875 vrele(vp);
876 }
877
878 return;
879 }
880
881 static void
882 puffsop_flush(struct puffs_mount *pmp, struct puffs_flush *pf)
883 {
884 struct vnode *vp;
885 voff_t offlo, offhi;
886 int rv, flags = 0;
887
888 KASSERT(pf->pf_req.preq_pth.pth_framelen == sizeof(struct puffs_flush));
889
890 /* XXX: slurry */
891 if (pf->pf_op == PUFFS_INVAL_NAMECACHE_ALL) {
892 cache_purgevfs(PMPTOMP(pmp));
893 rv = 0;
894 goto out;
895 }
896
897 /*
898 * Get vnode, don't lock it. Namecache is protected by its own lock
899 * and we have a reference to protect against premature harvesting.
900 *
901 * The node we want here might be locked and the op is in
902 * userspace waiting for us to complete ==> deadlock. Another
903 * reason we need to eventually bump locking to userspace, as we
904 * will need to lock the node if we wish to do flushes.
905 */
906 rv = puffs_cookie2vnode(pmp, pf->pf_cookie, &vp);
907 if (rv) {
908 if (rv == PUFFS_NOSUCHCOOKIE)
909 rv = ENOENT;
910 goto out;
911 }
912
913 switch (pf->pf_op) {
914 #if 0
915 /* not quite ready, yet */
916 case PUFFS_INVAL_NAMECACHE_NODE:
917 struct componentname *pf_cn;
918 char *name;
919 /* get comfortab^Wcomponentname */
920 pf_cn = kmem_alloc(componentname);
921 memset(pf_cn, 0, sizeof(struct componentname));
922 break;
923
924 #endif
925 case PUFFS_INVAL_NAMECACHE_DIR:
926 if (vp->v_type != VDIR) {
927 rv = EINVAL;
928 break;
929 }
930 cache_purge1(vp, NULL, 0, PURGE_CHILDREN);
931 break;
932
933 case PUFFS_INVAL_PAGECACHE_NODE_RANGE:
934 flags = PGO_FREE;
935 /*FALLTHROUGH*/
936 case PUFFS_FLUSH_PAGECACHE_NODE_RANGE:
937 if (flags == 0)
938 flags = PGO_CLEANIT;
939
940 if (pf->pf_end > vp->v_size || vp->v_type != VREG) {
941 rv = EINVAL;
942 break;
943 }
944
945 offlo = trunc_page(pf->pf_start);
946 offhi = round_page(pf->pf_end);
947 if (offhi != 0 && offlo >= offhi) {
948 rv = EINVAL;
949 break;
950 }
951
952 mutex_enter(vp->v_uobj.vmobjlock);
953 rv = VOP_PUTPAGES(vp, offlo, offhi, flags);
954 break;
955
956 default:
957 rv = EINVAL;
958 }
959
960 vrele(vp);
961
962 out:
963 puffs_msg_sendresp(pmp, &pf->pf_req, rv);
964 }
965
966 int
967 puffs_msgif_dispatch(void *ctx, struct putter_hdr *pth)
968 {
969 struct puffs_mount *pmp = ctx;
970 struct puffs_req *preq = (struct puffs_req *)pth;
971 struct puffs_sopreq *psopr;
972
973 if (pth->pth_framelen < sizeof(struct puffs_req)) {
974 puffs_msg_sendresp(pmp, preq, EINVAL); /* E2SMALL */
975 return 0;
976 }
977
978 switch (PUFFSOP_OPCLASS(preq->preq_opclass)) {
979 case PUFFSOP_VN:
980 case PUFFSOP_VFS:
981 DPRINTF(("dispatch: vn/vfs message 0x%x\n", preq->preq_optype));
982 puffsop_msg(pmp, preq);
983 break;
984
985 case PUFFSOP_FLUSH: /* process in sop thread */
986 {
987 struct puffs_flush *pf;
988
989 DPRINTF(("dispatch: flush 0x%x\n", preq->preq_optype));
990
991 if (preq->preq_pth.pth_framelen != sizeof(struct puffs_flush)) {
992 puffs_msg_sendresp(pmp, preq, EINVAL); /* E2SMALL */
993 break;
994 }
995 pf = (struct puffs_flush *)preq;
996
997 KASSERT(curlwp != uvm.pagedaemon_lwp);
998 psopr = kmem_alloc(sizeof(*psopr), KM_SLEEP);
999 memcpy(&psopr->psopr_pf, pf, sizeof(*pf));
1000 psopr->psopr_sopreq = PUFFS_SOPREQ_FLUSH;
1001
1002 mutex_enter(&pmp->pmp_sopmtx);
1003 if (pmp->pmp_sopthrcount == 0) {
1004 mutex_exit(&pmp->pmp_sopmtx);
1005 kmem_free(psopr, sizeof(*psopr));
1006 puffs_msg_sendresp(pmp, preq, ENXIO);
1007 } else {
1008 TAILQ_INSERT_TAIL(&pmp->pmp_sopfastreqs,
1009 psopr, psopr_entries);
1010 cv_signal(&pmp->pmp_sopcv);
1011 mutex_exit(&pmp->pmp_sopmtx);
1012 }
1013 break;
1014 }
1015
1016 case PUFFSOP_UNMOUNT: /* process in sop thread */
1017 {
1018
1019 DPRINTF(("dispatch: unmount 0x%x\n", preq->preq_optype));
1020
1021 KASSERT(curlwp != uvm.pagedaemon_lwp);
1022 psopr = kmem_alloc(sizeof(*psopr), KM_SLEEP);
1023 psopr->psopr_preq = *preq;
1024 psopr->psopr_sopreq = PUFFS_SOPREQ_UNMOUNT;
1025
1026 mutex_enter(&pmp->pmp_sopmtx);
1027 if (pmp->pmp_sopthrcount == 0) {
1028 mutex_exit(&pmp->pmp_sopmtx);
1029 kmem_free(psopr, sizeof(*psopr));
1030 puffs_msg_sendresp(pmp, preq, ENXIO);
1031 } else {
1032 TAILQ_INSERT_TAIL(&pmp->pmp_sopfastreqs,
1033 psopr, psopr_entries);
1034 cv_signal(&pmp->pmp_sopcv);
1035 mutex_exit(&pmp->pmp_sopmtx);
1036 }
1037 break;
1038 }
1039
1040 default:
1041 DPRINTF(("dispatch: invalid opclass 0x%x\n", preq->preq_opclass));
1042 puffs_msg_sendresp(pmp, preq, EOPNOTSUPP);
1043 break;
1044 }
1045
1046 return 0;
1047 }
1048
1049 /*
1050 * Work loop for thread processing all ops from server which
1051 * cannot safely be handled in caller context. This includes
1052 * everything which might need a lock currently "held" by the file
1053 * server, i.e. a long-term kernel lock which will be released only
1054 * once the file server acknowledges a request
1055 */
1056 #define TIMED_OUT(expire) \
1057 ((int)((unsigned int)hardclock_ticks - (unsigned int)expire) > 0)
1058 void
1059 puffs_sop_thread(void *arg)
1060 {
1061 struct puffs_mount *pmp = arg;
1062 struct mount *mp = PMPTOMP(pmp);
1063 struct puffs_sopreq *psopr;
1064 bool keeprunning;
1065 bool unmountme = false;
1066 int timeo;
1067
1068 timeo = PUFFS_USE_FS_TTL(pmp) ? puffs_sopreq_expire_timeout : 0;
1069
1070 mutex_enter(&pmp->pmp_sopmtx);
1071 for (keeprunning = true; keeprunning; ) {
1072 /*
1073 * We have a fast queue for flush and umount, and a node
1074 * queue for delayes node reclaims. Requests on node queue * are not honoured before clock reaches psopr_at. This
1075 * code assumes that requests are ordered by psopr_at.
1076 */
1077 do {
1078 psopr = TAILQ_FIRST(&pmp->pmp_sopfastreqs);
1079 if (psopr != NULL) {
1080 TAILQ_REMOVE(&pmp->pmp_sopfastreqs,
1081 psopr, psopr_entries);
1082 break;
1083 }
1084
1085 psopr = TAILQ_FIRST(&pmp->pmp_sopnodereqs);
1086 if ((psopr != NULL) && TIMED_OUT(psopr->psopr_at)) {
1087 TAILQ_REMOVE(&pmp->pmp_sopnodereqs,
1088 psopr, psopr_entries);
1089 break;
1090 }
1091
1092 cv_timedwait(&pmp->pmp_sopcv, &pmp->pmp_sopmtx, timeo);
1093 } while (1 /* CONSTCOND */);
1094
1095 mutex_exit(&pmp->pmp_sopmtx);
1096
1097 switch (psopr->psopr_sopreq) {
1098 case PUFFS_SOPREQSYS_EXIT:
1099 keeprunning = false;
1100 break;
1101 case PUFFS_SOPREQ_FLUSH:
1102 puffsop_flush(pmp, &psopr->psopr_pf);
1103 break;
1104 case PUFFS_SOPREQ_EXPIRE:
1105 puffsop_expire(pmp, psopr->psopr_ck);
1106 break;
1107 case PUFFS_SOPREQ_UNMOUNT:
1108 puffs_msg_sendresp(pmp, &psopr->psopr_preq, 0);
1109
1110 unmountme = true;
1111 keeprunning = false;
1112
1113 /*
1114 * We know the mountpoint is still alive because
1115 * the thread that is us (poetic?) is still alive.
1116 */
1117 vfs_ref(mp);
1118 break;
1119 }
1120
1121 kmem_free(psopr, sizeof(*psopr));
1122 mutex_enter(&pmp->pmp_sopmtx);
1123 }
1124
1125 /*
1126 * Purge remaining ops.
1127 */
1128 while ((psopr = TAILQ_FIRST(&pmp->pmp_sopfastreqs)) != NULL) {
1129 TAILQ_REMOVE(&pmp->pmp_sopfastreqs, psopr, psopr_entries);
1130 mutex_exit(&pmp->pmp_sopmtx);
1131 puffs_msg_sendresp(pmp, &psopr->psopr_preq, ENXIO);
1132 kmem_free(psopr, sizeof(*psopr));
1133 mutex_enter(&pmp->pmp_sopmtx);
1134 }
1135
1136 while ((psopr = TAILQ_FIRST(&pmp->pmp_sopnodereqs)) != NULL) {
1137 TAILQ_REMOVE(&pmp->pmp_sopnodereqs, psopr, psopr_entries);
1138 mutex_exit(&pmp->pmp_sopmtx);
1139 KASSERT(psopr->psopr_sopreq == PUFFS_SOPREQ_EXPIRE);
1140 kmem_free(psopr, sizeof(*psopr));
1141 mutex_enter(&pmp->pmp_sopmtx);
1142 }
1143
1144 pmp->pmp_sopthrcount--;
1145 cv_broadcast(&pmp->pmp_sopcv);
1146 mutex_exit(&pmp->pmp_sopmtx); /* not allowed to access fs after this */
1147
1148 /*
1149 * If unmount was requested, we can now safely do it here, since
1150 * our context is dead from the point-of-view of puffs_unmount()
1151 * and we are just another thread. dounmount() makes internally
1152 * sure that VFS_UNMOUNT() isn't called reentrantly and that it
1153 * is eventually completed.
1154 */
1155 if (unmountme) {
1156 (void)dounmount(mp, MNT_FORCE, curlwp);
1157 vfs_rele(mp);
1158 }
1159
1160 kthread_exit(0);
1161 }
1162
1163 int
1164 puffs_msgif_close(void *ctx)
1165 {
1166 struct puffs_mount *pmp = ctx;
1167 struct mount *mp = PMPTOMP(pmp);
1168
1169 mutex_enter(&pmp->pmp_lock);
1170 puffs_mp_reference(pmp);
1171
1172 /*
1173 * Free the waiting callers before proceeding any further.
1174 * The syncer might be jogging around in this file system
1175 * currently. If we allow it to go to the userspace of no
1176 * return while trying to get the syncer lock, well ...
1177 */
1178 puffs_userdead(pmp);
1179
1180 /*
1181 * Make sure someone from puffs_unmount() isn't currently in
1182 * userspace. If we don't take this precautionary step,
1183 * they might notice that the mountpoint has disappeared
1184 * from under them once they return. Especially note that we
1185 * cannot simply test for an unmounter before calling
1186 * dounmount(), since it might be possible that that particular
1187 * invocation of unmount was called without MNT_FORCE. Here we
1188 * *must* make sure unmount succeeds. Also, restart is necessary
1189 * since pmp isn't locked. We might end up with PUTTER_DEAD after
1190 * restart and exit from there.
1191 */
1192 if (pmp->pmp_unmounting) {
1193 cv_wait(&pmp->pmp_unmounting_cv, &pmp->pmp_lock);
1194 puffs_mp_release(pmp);
1195 mutex_exit(&pmp->pmp_lock);
1196 DPRINTF(("puffs_fop_close: unmount was in progress for pmp %p, "
1197 "restart\n", pmp));
1198 return ERESTART;
1199 }
1200
1201 /* Won't access pmp from here anymore */
1202 vfs_ref(mp);
1203 puffs_mp_release(pmp);
1204 mutex_exit(&pmp->pmp_lock);
1205
1206 /* Detach from VFS. */
1207 (void)dounmount(mp, MNT_FORCE, curlwp);
1208 vfs_rele(mp);
1209
1210 return 0;
1211 }
1212
1213 /*
1214 * We're dead, kaput, RIP, slightly more than merely pining for the
1215 * fjords, belly-up, fallen, lifeless, finished, expired, gone to meet
1216 * our maker, ceased to be, etcetc. YASD. It's a dead FS!
1217 *
1218 * Caller must hold puffs mutex.
1219 */
1220 void
1221 puffs_userdead(struct puffs_mount *pmp)
1222 {
1223 struct puffs_msgpark *park, *park_next;
1224
1225 /*
1226 * Mark filesystem status as dying so that operations don't
1227 * attempt to march to userspace any longer.
1228 */
1229 pmp->pmp_status = PUFFSTAT_DYING;
1230
1231 /* signal waiters on REQUEST TO file server queue */
1232 for (park = TAILQ_FIRST(&pmp->pmp_msg_touser); park; park = park_next) {
1233
1234 mutex_enter(&park->park_mtx);
1235 puffs_msgpark_reference(park);
1236 park_next = TAILQ_NEXT(park, park_entries);
1237
1238 KASSERT(park->park_flags & PARKFLAG_ONQUEUE1);
1239 TAILQ_REMOVE(&pmp->pmp_msg_touser, park, park_entries);
1240 park->park_flags &= ~PARKFLAG_ONQUEUE1;
1241 pmp->pmp_msg_touser_count--;
1242
1243 /*
1244 * Even though waiters on QUEUE1 are removed in touser()
1245 * in case of WAITERGONE, it is still possible for us to
1246 * get raced here due to having to retake locks in said
1247 * touser(). In the race case simply "ignore" the item
1248 * on the queue and move on to the next one.
1249 */
1250 if (park->park_flags & PARKFLAG_WAITERGONE) {
1251 KASSERT((park->park_flags & PARKFLAG_CALL) == 0);
1252 KASSERT(park->park_flags & PARKFLAG_WANTREPLY);
1253 puffs_msgpark_release(park);
1254
1255 } else {
1256 park->park_preq->preq_rv = ENXIO;
1257
1258 if (park->park_flags & PARKFLAG_CALL) {
1259 park->park_done(pmp, park->park_preq,
1260 park->park_donearg);
1261 puffs_msgpark_release1(park, 2);
1262 } else if ((park->park_flags & PARKFLAG_WANTREPLY)==0) {
1263 puffs_msgpark_release1(park, 2);
1264 } else {
1265 park->park_preq->preq_rv = ENXIO;
1266 cv_signal(&park->park_cv);
1267 puffs_msgpark_release(park);
1268 }
1269 }
1270 }
1271
1272 /* signal waiters on RESPONSE FROM file server queue */
1273 for (park=TAILQ_FIRST(&pmp->pmp_msg_replywait); park; park=park_next) {
1274 mutex_enter(&park->park_mtx);
1275 puffs_msgpark_reference(park);
1276 park_next = TAILQ_NEXT(park, park_entries);
1277
1278 KASSERT(park->park_flags & PARKFLAG_ONQUEUE2);
1279 KASSERT(park->park_flags & PARKFLAG_WANTREPLY);
1280
1281 TAILQ_REMOVE(&pmp->pmp_msg_replywait, park, park_entries);
1282 park->park_flags &= ~PARKFLAG_ONQUEUE2;
1283
1284 if (park->park_flags & PARKFLAG_WAITERGONE) {
1285 KASSERT((park->park_flags & PARKFLAG_CALL) == 0);
1286 puffs_msgpark_release(park);
1287 } else {
1288 park->park_preq->preq_rv = ENXIO;
1289 if (park->park_flags & PARKFLAG_CALL) {
1290 park->park_done(pmp, park->park_preq,
1291 park->park_donearg);
1292 puffs_msgpark_release1(park, 2);
1293 } else {
1294 cv_signal(&park->park_cv);
1295 puffs_msgpark_release(park);
1296 }
1297 }
1298 }
1299
1300 cv_broadcast(&pmp->pmp_msg_waiter_cv);
1301 }
1302