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