Unmap pages mapped during a failed fill_vmr()
[akaros.git] / kern / src / net / loopbackmedium.c
1 /* Copyright © 1994-1999 Lucent Technologies Inc.  All rights reserved.
2  * Portions Copyright © 1997-1999 Vita Nuova Limited
3  * Portions Copyright © 2000-2007 Vita Nuova Holdings Limited
4  *                                (www.vitanuova.com)
5  * Revisions Copyright © 2000-2007 Lucent Technologies Inc. and others
6  *
7  * Modified for the Akaros operating system:
8  * Copyright (c) 2013-2014 The Regents of the University of California
9  * Copyright (c) 2013-2015 Google Inc.
10  *
11  * Permission is hereby granted, free of charge, to any person obtaining a copy
12  * of this software and associated documentation files (the "Software"), to deal
13  * in the Software without restriction, including without limitation the rights
14  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
15  * copies of the Software, and to permit persons to whom the Software is
16  * furnished to do so, subject to the following conditions:
17  *
18  * The above copyright notice and this permission notice shall be included in
19  * all copies or substantial portions of the Software.
20  *
21  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
22  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
23  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
24  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
25  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
26  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
27  * SOFTWARE. */
28
29 #include <slab.h>
30 #include <kmalloc.h>
31 #include <kref.h>
32 #include <string.h>
33 #include <stdio.h>
34 #include <assert.h>
35 #include <error.h>
36 #include <cpio.h>
37 #include <pmap.h>
38 #include <smp.h>
39 #include <net/ip.h>
40
41 enum {
42         Maxtu = 16 * 1024,
43 };
44
45 typedef struct LB LB;
46 struct LB {
47         struct proc *readp;
48         struct queue *q;
49         struct Fs *f;
50 };
51
52 static void loopbackread(void *a);
53
54 static void loopbackbind(struct Ipifc *ifc, int unused_int,
55                          char **unused_char_pp_t)
56 {
57         LB *lb;
58
59         lb = kzmalloc(sizeof(*lb), 0);
60         lb->f = ifc->conv->p->f;
61         /* TO DO: make queue size a function of kernel memory */
62         lb->q = qopen(128 * 1024, Qmsg, NULL, NULL);
63         ifc->arg = lb;
64
65         ktask("loopbackread", loopbackread, ifc);
66
67 }
68
69 static void loopbackunbind(struct Ipifc *ifc)
70 {
71         LB *lb = ifc->arg;
72
73         printk("%s is messed up, shouldn't track procs\n", __FUNCTION__);
74
75         /*if(lb->readp)
76            postnote(lb->readp, 1, "unbind", 0);
77          */
78
79         /* wait for reader to die */
80         while (lb->readp != 0)
81                 kthread_usleep(300 * 1000);
82
83         /* clean up */
84         qfree(lb->q);
85         kfree(lb);
86 }
87
88 static void loopbackbwrite(struct Ipifc *ifc, struct block *bp, int unused_int,
89                            uint8_t *unused_uint8_p_t)
90 {
91         LB *lb;
92
93         ptclcsum_finalize(bp, 0);
94         lb = ifc->arg;
95         if (qpass(lb->q, bp) < 0)
96                 ifc->outerr++;
97         ifc->out++;
98 }
99
100 static void loopbackread(void *a)
101 {
102         ERRSTACK(2);
103         struct Ipifc *ifc;
104         struct block *bp;
105         LB *lb;
106
107         ifc = a;
108         lb = ifc->arg;
109         lb->readp = current;    /* hide identity under a rock for unbind */
110         if (waserror()) {
111                 lb->readp = 0;
112                 warn("loopbackread exits unexpectedly");
113                 return;
114                 poperror();
115         }
116         for (;;) {
117                 bp = qbread(lb->q, Maxtu);
118                 if (bp == NULL)
119                         continue;
120                 ifc->in++;
121                 if (!canrlock(&ifc->rwlock)) {
122                         freeb(bp);
123                         continue;
124                 }
125                 if (waserror()) {
126                         runlock(&ifc->rwlock);
127                         nexterror();
128                 }
129                 if (ifc->lifc == NULL) {
130                         freeb(bp);
131                 } else {
132                         ipifc_trace_block(ifc, bp);
133                         ipiput4(lb->f, ifc, bp);
134                 }
135                 runlock(&ifc->rwlock);
136                 poperror();
137         }
138         poperror();
139 }
140
141 struct medium loopbackmedium = {
142         .hsize = 0,
143         .mintu = 0,
144         .maxtu = Maxtu,
145         .maclen = 0,
146         .name = "loopback",
147         .bind = loopbackbind,
148         .unbind = loopbackunbind,
149         .bwrite = loopbackbwrite,
150 };
151
152 linker_func_4(loopbackmediumlink)
153 {
154         addipmedium(&loopbackmedium);
155 }