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