qio: Do not kick when calling qdiscard()
[akaros.git] / kern / src / ns / pgrp.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 <vfs.h>
30 #include <kfs.h>
31 #include <slab.h>
32 #include <kmalloc.h>
33 #include <kref.h>
34 #include <string.h>
35 #include <stdio.h>
36 #include <assert.h>
37 #include <error.h>
38 #include <cpio.h>
39 #include <pmap.h>
40 #include <smp.h>
41 #include <ip.h>
42
43 /* TODO: (ID) need a unique ID service.  These will loop around... */
44 static int pgrpid;
45 static int mountid;
46 #define NEXT_ID(x) (__sync_add_and_fetch(&(x), 1))
47
48 void closepgrp(struct pgrp *p)
49 {
50         struct mhead **h, **e, *f, *next;
51
52         wlock(&p->ns);
53         p->pgrpid = -1;
54
55         e = &p->mnthash[MNTHASH];
56         for (h = p->mnthash; h < e; h++) {
57                 for (f = *h; f; f = next) {
58                         wlock(&f->lock);
59                         cclose(f->from);
60                         mountfree(f->mount);
61                         f->mount = NULL;
62                         next = f->hash;
63                         wunlock(&f->lock);
64                         putmhead(f);
65                 }
66         }
67         wunlock(&p->ns);
68         cclose(p->dot);
69         cclose(p->slash);
70         kfree(p);
71 }
72
73 static void freepgrp(struct kref *k)
74 {
75         struct pgrp *p = container_of(k, struct pgrp, ref);
76         closepgrp(p);
77 }
78
79 struct pgrp *newpgrp(void)
80 {
81         struct pgrp *p;
82
83         p = kzmalloc(sizeof(struct pgrp), MEM_WAIT);
84         kref_init(&p->ref, freepgrp, 1);
85         p->pgrpid = NEXT_ID(pgrpid);
86         p->progmode = 0644;
87         qlock_init(&p->debug);
88         rwinit(&p->ns);
89         qlock_init(&p->nsh);
90         return p;
91 }
92
93 void pgrpinsert(struct mount **order, struct mount *m)
94 {
95         struct mount *f;
96
97         m->order = 0;
98         if (*order == 0) {
99                 *order = m;
100                 return;
101         }
102         for (f = *order; f; f = f->order) {
103                 if (m->mountid < f->mountid) {
104                         m->order = f;
105                         *order = m;
106                         return;
107                 }
108                 order = &f->order;
109         }
110         *order = m;
111 }
112
113 /*
114  * pgrpcpy MUST preserve the mountid allocation order of the parent group
115  */
116 void pgrpcpy(struct pgrp *to, struct pgrp *from)
117 {
118         ERRSTACK(2);
119         int i;
120         struct mount *n, *m, **link, *order;
121         struct mhead *f, **tom, **l, *mh;
122
123         wlock(&from->ns);
124         if (waserror()) {
125                 wunlock(&from->ns);
126                 nexterror();
127         }
128         order = 0;
129         tom = to->mnthash;
130         for (i = 0; i < MNTHASH; i++) {
131                 l = tom++;
132                 for (f = from->mnthash[i]; f; f = f->hash) {
133                         rlock(&f->lock);
134                         if (waserror()) {
135                                 runlock(&f->lock);
136                                 nexterror();
137                         }
138                         mh = newmhead(f->from);
139                         if (!mh)
140                                 error(ENOMEM, ERROR_FIXME);
141                         *l = mh;
142                         l = &mh->hash;
143                         link = &mh->mount;
144                         for (m = f->mount; m; m = m->next) {
145                                 n = newmount(mh, m->to, m->mflag, m->spec);
146                                 m->copy = n;
147                                 pgrpinsert(&order, m);
148                                 *link = n;
149                                 link = &n->next;
150                         }
151                         poperror();
152                         runlock(&f->lock);
153                 }
154         }
155         /*
156          * Allocate mount ids in the same sequence as the parent group
157          */
158         /* should probably protect with a spinlock and be done with it */
159         for (m = order; m; m = m->order) {
160                 m->copy->mountid = NEXT_ID(mountid);
161         }
162
163         to->progmode = from->progmode;
164         to->slash = cclone(from->slash);
165         to->dot = cclone(from->dot);
166         to->nodevs = from->nodevs;
167
168         poperror();
169         wunlock(&from->ns);
170 }
171
172 struct mount *newmount(struct mhead *mh, struct chan *to, int flag, char *spec)
173 {
174         struct mount *m;
175
176         m = kzmalloc(sizeof(struct mount), 0);
177         m->to = to;
178         m->head = mh;
179         chan_incref(to);
180         m->mountid = NEXT_ID(mountid);
181         m->mflag = flag;
182         if (spec != 0)
183                 kstrdup(&m->spec, spec);
184
185         return m;
186 }
187
188 void mountfree(struct mount *m)
189 {
190         struct mount *f;
191
192         while (m) {
193                 f = m->next;
194                 cclose(m->to);
195                 m->mountid = 0;
196                 kfree(m->spec);
197                 kfree(m);
198                 m = f;
199         }
200 }
201
202 #if 0
203 almost certainly not needed.void resrcwait(char *reason)
204 {
205         char *p;
206
207         if (current == 0)
208                 panic("resrcwait");
209
210         p = up->psstate;
211         if (reason) {
212                 up->psstate = reason;
213                 printd("%s\n", reason);
214         }
215
216         kthread_usleep(300 * 1000);
217         up->psstate = p;
218 }
219 #endif
220
221 /* TODO: We don't have any alloc / initializer methods for skeyset or signerkey
222  * yet.  When we do, use these releases for their kref_init. */
223 static void __sigs_release(struct kref *kref)
224 {
225         struct skeyset *s = container_of(kref, struct skeyset, ref);
226         int i;
227         for (i = 0; i < s->nkey; i++)
228                 freeskey(s->keys[i]);
229         kfree(s);
230 }
231
232 void closesigs(struct skeyset *s)
233 {
234         if (!s)
235                 return;
236         kref_put(&s->ref);
237 }
238
239 static void __key_release(struct kref *kref)
240 {
241         struct signerkey *key = container_of(kref, struct signerkey, ref);
242         kfree(key->owner);
243         (*key->pkfree) (key->pk);
244         kfree(key);
245 }
246
247 void freeskey(struct signerkey *key)
248 {
249         if (!key)
250                 return;
251         kref_put(&key->ref);
252 }