advfsops.c revision 1.64 1 1.64 elad /* $NetBSD: advfsops.c,v 1.64 2012/03/13 18:40:35 elad Exp $ */
2 1.1 jdolecek
3 1.1 jdolecek /*
4 1.1 jdolecek * Copyright (c) 1994 Christian E. Hopps
5 1.1 jdolecek * Copyright (c) 1996 Matthias Scheler
6 1.1 jdolecek * All rights reserved.
7 1.1 jdolecek *
8 1.1 jdolecek * Redistribution and use in source and binary forms, with or without
9 1.1 jdolecek * modification, are permitted provided that the following conditions
10 1.1 jdolecek * are met:
11 1.1 jdolecek * 1. Redistributions of source code must retain the above copyright
12 1.1 jdolecek * notice, this list of conditions and the following disclaimer.
13 1.1 jdolecek * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 jdolecek * notice, this list of conditions and the following disclaimer in the
15 1.1 jdolecek * documentation and/or other materials provided with the distribution.
16 1.1 jdolecek * 3. All advertising materials mentioning features or use of this software
17 1.1 jdolecek * must display the following acknowledgement:
18 1.1 jdolecek * This product includes software developed by Christian E. Hopps.
19 1.1 jdolecek * 4. The name of the author may not be used to endorse or promote products
20 1.1 jdolecek * derived from this software without specific prior written permission
21 1.1 jdolecek *
22 1.1 jdolecek * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
23 1.1 jdolecek * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
24 1.1 jdolecek * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
25 1.1 jdolecek * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
26 1.1 jdolecek * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
27 1.1 jdolecek * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
28 1.1 jdolecek * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
29 1.1 jdolecek * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
30 1.1 jdolecek * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
31 1.1 jdolecek * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
32 1.1 jdolecek */
33 1.1 jdolecek
34 1.1 jdolecek #include <sys/cdefs.h>
35 1.64 elad __KERNEL_RCSID(0, "$NetBSD: advfsops.c,v 1.64 2012/03/13 18:40:35 elad Exp $");
36 1.1 jdolecek
37 1.1 jdolecek #if defined(_KERNEL_OPT)
38 1.1 jdolecek #include "opt_compat_netbsd.h"
39 1.1 jdolecek #endif
40 1.1 jdolecek
41 1.1 jdolecek #include <sys/param.h>
42 1.1 jdolecek #include <sys/systm.h>
43 1.9 atatat #include <sys/sysctl.h>
44 1.1 jdolecek #include <sys/vnode.h>
45 1.1 jdolecek #include <sys/mount.h>
46 1.1 jdolecek #include <sys/proc.h>
47 1.1 jdolecek #include <sys/time.h>
48 1.1 jdolecek #include <sys/malloc.h>
49 1.1 jdolecek #include <sys/pool.h>
50 1.1 jdolecek #include <sys/disklabel.h>
51 1.48 dholland #include <miscfs/genfs/genfs.h>
52 1.1 jdolecek #include <miscfs/specfs/specdev.h> /* XXX */
53 1.1 jdolecek #include <sys/fcntl.h>
54 1.1 jdolecek #include <sys/namei.h>
55 1.1 jdolecek #include <sys/ioctl.h>
56 1.1 jdolecek #include <sys/queue.h>
57 1.1 jdolecek #include <sys/buf.h>
58 1.1 jdolecek #include <sys/conf.h>
59 1.28 christos #include <sys/kauth.h>
60 1.51 rumble #include <sys/module.h>
61 1.1 jdolecek #include <fs/adosfs/adosfs.h>
62 1.1 jdolecek
63 1.51 rumble MODULE(MODULE_CLASS_VFS, adosfs, NULL);
64 1.51 rumble
65 1.41 pooka VFS_PROTOS(adosfs);
66 1.1 jdolecek
67 1.53 rumble static struct sysctllog *adosfs_sysctl_log;
68 1.53 rumble
69 1.54 dsl int adosfs_mountfs(struct vnode *, struct mount *, struct lwp *);
70 1.54 dsl int adosfs_loadbitmap(struct adosfsmount *);
71 1.1 jdolecek
72 1.61 rmind kmutex_t adosfs_hashlock;
73 1.1 jdolecek
74 1.36 pooka struct pool adosfs_node_pool;
75 1.2 thorpej
76 1.36 pooka MALLOC_JUSTDEFINE(M_ANODE, "adosfs anode","adosfs anode structures and tables");
77 1.1 jdolecek
78 1.23 yamt static const struct genfs_ops adosfs_genfsops = {
79 1.23 yamt .gop_size = genfs_size,
80 1.1 jdolecek };
81 1.1 jdolecek
82 1.54 dsl int (**adosfs_vnodeop_p)(void *);
83 1.1 jdolecek
84 1.1 jdolecek int
85 1.55 dsl adosfs_mount(struct mount *mp, const char *path, void *data, size_t *data_len)
86 1.1 jdolecek {
87 1.44 pooka struct lwp *l = curlwp;
88 1.1 jdolecek struct vnode *devvp;
89 1.37 dsl struct adosfs_args *args = data;
90 1.1 jdolecek struct adosfsmount *amp;
91 1.1 jdolecek int error;
92 1.1 jdolecek mode_t accessmode;
93 1.1 jdolecek
94 1.37 dsl if (*data_len < sizeof *args)
95 1.37 dsl return EINVAL;
96 1.37 dsl
97 1.1 jdolecek if (mp->mnt_flag & MNT_GETARGS) {
98 1.1 jdolecek amp = VFSTOADOSFS(mp);
99 1.1 jdolecek if (amp == NULL)
100 1.1 jdolecek return EIO;
101 1.37 dsl args->uid = amp->uid;
102 1.37 dsl args->gid = amp->gid;
103 1.37 dsl args->mask = amp->mask;
104 1.37 dsl args->fspec = NULL;
105 1.37 dsl *data_len = sizeof *args;
106 1.37 dsl return 0;
107 1.1 jdolecek }
108 1.21 perry
109 1.1 jdolecek if ((mp->mnt_flag & MNT_RDONLY) == 0)
110 1.1 jdolecek return (EROFS);
111 1.25 jmmv
112 1.37 dsl if ((mp->mnt_flag & MNT_UPDATE) && args->fspec == NULL)
113 1.25 jmmv return EOPNOTSUPP;
114 1.25 jmmv
115 1.1 jdolecek /*
116 1.1 jdolecek * Not an update, or updating the name: look up the name
117 1.1 jdolecek * and verify that it refers to a sensible block device.
118 1.1 jdolecek */
119 1.58 dholland error = namei_simple_user(args->fspec,
120 1.58 dholland NSM_FOLLOW_NOEMULROOT, &devvp);
121 1.58 dholland if (error != 0)
122 1.1 jdolecek return (error);
123 1.1 jdolecek
124 1.1 jdolecek if (devvp->v_type != VBLK) {
125 1.1 jdolecek vrele(devvp);
126 1.1 jdolecek return (ENOTBLK);
127 1.1 jdolecek }
128 1.1 jdolecek if (bdevsw_lookup(devvp->v_rdev) == NULL) {
129 1.1 jdolecek vrele(devvp);
130 1.1 jdolecek return (ENXIO);
131 1.1 jdolecek }
132 1.1 jdolecek /*
133 1.1 jdolecek * If mount by non-root, then verify that user has necessary
134 1.1 jdolecek * permissions on the device.
135 1.1 jdolecek */
136 1.57 elad accessmode = VREAD;
137 1.57 elad if ((mp->mnt_flag & MNT_RDONLY) == 0)
138 1.57 elad accessmode |= VWRITE;
139 1.57 elad vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY);
140 1.64 elad error = kauth_authorize_system(l->l_cred, KAUTH_SYSTEM_MOUNT,
141 1.64 elad KAUTH_REQ_SYSTEM_MOUNT_DEVICE, mp, devvp, KAUTH_ARG(accessmode));
142 1.60 hannken VOP_UNLOCK(devvp);
143 1.57 elad if (error) {
144 1.57 elad vrele(devvp);
145 1.57 elad return (error);
146 1.1 jdolecek }
147 1.1 jdolecek /* MNT_UPDATE? */
148 1.26 christos if ((error = adosfs_mountfs(devvp, mp, l)) != 0) {
149 1.1 jdolecek vrele(devvp);
150 1.1 jdolecek return (error);
151 1.1 jdolecek }
152 1.1 jdolecek amp = VFSTOADOSFS(mp);
153 1.37 dsl amp->uid = args->uid;
154 1.37 dsl amp->gid = args->gid;
155 1.37 dsl amp->mask = args->mask;
156 1.37 dsl return set_statvfs_info(path, UIO_USERSPACE, args->fspec, UIO_USERSPACE,
157 1.38 pooka mp->mnt_op->vfs_name, mp, l);
158 1.1 jdolecek }
159 1.1 jdolecek
160 1.1 jdolecek int
161 1.55 dsl adosfs_mountfs(struct vnode *devvp, struct mount *mp, struct lwp *l)
162 1.1 jdolecek {
163 1.1 jdolecek struct disklabel dl;
164 1.1 jdolecek struct partition *parp;
165 1.1 jdolecek struct adosfsmount *amp;
166 1.1 jdolecek struct buf *bp;
167 1.1 jdolecek struct vnode *rvp;
168 1.61 rmind size_t bitmap_sz = 0;
169 1.1 jdolecek int error, part, i;
170 1.1 jdolecek
171 1.1 jdolecek part = DISKPART(devvp->v_rdev);
172 1.1 jdolecek amp = NULL;
173 1.1 jdolecek
174 1.47 ad if ((error = vinvalbuf(devvp, V_SAVE, l->l_cred, l, 0, 0)) != 0)
175 1.1 jdolecek return (error);
176 1.1 jdolecek
177 1.21 perry /*
178 1.1 jdolecek * open blkdev and read root block
179 1.1 jdolecek */
180 1.63 hannken vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY);
181 1.63 hannken if ((error = VOP_OPEN(devvp, FREAD, NOCRED)) != 0) {
182 1.63 hannken VOP_UNLOCK(devvp);
183 1.1 jdolecek return (error);
184 1.63 hannken }
185 1.44 pooka error = VOP_IOCTL(devvp, DIOCGDINFO, &dl, FREAD, NOCRED);
186 1.63 hannken VOP_UNLOCK(devvp);
187 1.1 jdolecek if (error)
188 1.1 jdolecek goto fail;
189 1.1 jdolecek
190 1.1 jdolecek parp = &dl.d_partitions[part];
191 1.61 rmind amp = kmem_zalloc(sizeof(struct adosfsmount), KM_SLEEP);
192 1.1 jdolecek amp->mp = mp;
193 1.1 jdolecek if (dl.d_type == DTYPE_FLOPPY) {
194 1.1 jdolecek amp->bsize = dl.d_secsize;
195 1.1 jdolecek amp->secsperblk = 1;
196 1.1 jdolecek }
197 1.1 jdolecek else {
198 1.1 jdolecek amp->bsize = parp->p_fsize * parp->p_frag;
199 1.1 jdolecek amp->secsperblk = parp->p_frag;
200 1.1 jdolecek }
201 1.1 jdolecek
202 1.1 jdolecek /* invalid fs ? */
203 1.1 jdolecek if (amp->secsperblk == 0) {
204 1.1 jdolecek error = EINVAL;
205 1.1 jdolecek goto fail;
206 1.1 jdolecek }
207 1.1 jdolecek
208 1.1 jdolecek bp = NULL;
209 1.1 jdolecek if ((error = bread(devvp, (daddr_t)BBOFF,
210 1.52 hannken amp->bsize, NOCRED, 0, &bp)) != 0) {
211 1.42 ad brelse(bp, 0);
212 1.1 jdolecek goto fail;
213 1.1 jdolecek }
214 1.1 jdolecek amp->dostype = adoswordn(bp, 0);
215 1.42 ad brelse(bp, 0);
216 1.1 jdolecek
217 1.1 jdolecek /* basic sanity checks */
218 1.1 jdolecek if (amp->dostype < 0x444f5300 || amp->dostype > 0x444f5305) {
219 1.1 jdolecek error = EINVAL;
220 1.1 jdolecek goto fail;
221 1.1 jdolecek }
222 1.1 jdolecek
223 1.1 jdolecek amp->rootb = (parp->p_size / amp->secsperblk - 1 + parp->p_cpg) >> 1;
224 1.1 jdolecek amp->numblks = parp->p_size / amp->secsperblk - parp->p_cpg;
225 1.1 jdolecek
226 1.1 jdolecek amp->nwords = amp->bsize >> 2;
227 1.1 jdolecek amp->dbsize = amp->bsize - (IS_FFS(amp) ? 0 : OFS_DATA_OFFSET);
228 1.1 jdolecek amp->devvp = devvp;
229 1.21 perry
230 1.1 jdolecek mp->mnt_data = amp;
231 1.18 jdolecek mp->mnt_stat.f_fsidx.__fsid_val[0] = (long)devvp->v_rdev;
232 1.18 jdolecek mp->mnt_stat.f_fsidx.__fsid_val[1] = makefstype(MOUNT_ADOSFS);
233 1.18 jdolecek mp->mnt_stat.f_fsid = mp->mnt_stat.f_fsidx.__fsid_val[0];
234 1.19 skrll mp->mnt_stat.f_namemax = ADMAXNAMELEN;
235 1.1 jdolecek mp->mnt_fs_bshift = ffs(amp->bsize) - 1;
236 1.1 jdolecek mp->mnt_dev_bshift = DEV_BSHIFT; /* XXX */
237 1.1 jdolecek mp->mnt_flag |= MNT_LOCAL;
238 1.1 jdolecek
239 1.1 jdolecek /*
240 1.1 jdolecek * init anode table.
241 1.1 jdolecek */
242 1.21 perry for (i = 0; i < ANODEHASHSZ; i++)
243 1.1 jdolecek LIST_INIT(&->anodetab[i]);
244 1.1 jdolecek
245 1.1 jdolecek /*
246 1.1 jdolecek * get the root anode, if not a valid fs this will fail.
247 1.1 jdolecek */
248 1.7 thorpej if ((error = VFS_ROOT(mp, &rvp)) != 0)
249 1.1 jdolecek goto fail;
250 1.1 jdolecek /* allocate and load bitmap, set free space */
251 1.61 rmind bitmap_sz = ((amp->numblks + 31) / 32) * sizeof(*amp->bitmap);
252 1.61 rmind amp->bitmap = kmem_alloc(bitmap_sz, KM_SLEEP);
253 1.1 jdolecek if (amp->bitmap)
254 1.1 jdolecek adosfs_loadbitmap(amp);
255 1.1 jdolecek if (mp->mnt_flag & MNT_RDONLY && amp->bitmap) {
256 1.1 jdolecek /*
257 1.1 jdolecek * Don't need the bitmap any more if it's read-only.
258 1.1 jdolecek */
259 1.61 rmind kmem_free(amp->bitmap, bitmap_sz);
260 1.1 jdolecek amp->bitmap = NULL;
261 1.1 jdolecek }
262 1.1 jdolecek vput(rvp);
263 1.1 jdolecek
264 1.1 jdolecek return(0);
265 1.1 jdolecek
266 1.1 jdolecek fail:
267 1.1 jdolecek vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY);
268 1.44 pooka (void) VOP_CLOSE(devvp, FREAD, NOCRED);
269 1.60 hannken VOP_UNLOCK(devvp);
270 1.1 jdolecek if (amp && amp->bitmap)
271 1.61 rmind kmem_free(amp->bitmap, bitmap_sz);
272 1.1 jdolecek if (amp)
273 1.61 rmind kmem_free(amp, sizeof(*amp));
274 1.1 jdolecek return (error);
275 1.1 jdolecek }
276 1.1 jdolecek
277 1.1 jdolecek int
278 1.55 dsl adosfs_start(struct mount *mp, int flags)
279 1.1 jdolecek {
280 1.1 jdolecek
281 1.1 jdolecek return (0);
282 1.1 jdolecek }
283 1.1 jdolecek
284 1.1 jdolecek int
285 1.55 dsl adosfs_unmount(struct mount *mp, int mntflags)
286 1.1 jdolecek {
287 1.1 jdolecek struct adosfsmount *amp;
288 1.1 jdolecek int error, flags;
289 1.1 jdolecek
290 1.1 jdolecek flags = 0;
291 1.1 jdolecek if (mntflags & MNT_FORCE)
292 1.1 jdolecek flags |= FORCECLOSE;
293 1.1 jdolecek if ((error = vflush(mp, NULLVP, flags)) != 0)
294 1.1 jdolecek return (error);
295 1.1 jdolecek amp = VFSTOADOSFS(mp);
296 1.1 jdolecek if (amp->devvp->v_type != VBAD)
297 1.1 jdolecek amp->devvp->v_specmountpoint = NULL;
298 1.1 jdolecek vn_lock(amp->devvp, LK_EXCLUSIVE | LK_RETRY);
299 1.44 pooka error = VOP_CLOSE(amp->devvp, FREAD, NOCRED);
300 1.1 jdolecek vput(amp->devvp);
301 1.61 rmind if (amp->bitmap) {
302 1.61 rmind size_t bitmap_sz = ((amp->numblks + 31) / 32) *
303 1.61 rmind sizeof(*amp->bitmap);
304 1.61 rmind kmem_free(amp->bitmap, bitmap_sz);
305 1.61 rmind }
306 1.61 rmind kmem_free(amp, sizeof(*amp));
307 1.1 jdolecek mp->mnt_data = NULL;
308 1.1 jdolecek mp->mnt_flag &= ~MNT_LOCAL;
309 1.1 jdolecek return (error);
310 1.1 jdolecek }
311 1.1 jdolecek
312 1.1 jdolecek int
313 1.55 dsl adosfs_root(struct mount *mp, struct vnode **vpp)
314 1.1 jdolecek {
315 1.1 jdolecek struct vnode *nvp;
316 1.1 jdolecek int error;
317 1.1 jdolecek
318 1.1 jdolecek if ((error = VFS_VGET(mp, (ino_t)VFSTOADOSFS(mp)->rootb, &nvp)) != 0)
319 1.1 jdolecek return (error);
320 1.1 jdolecek /* XXX verify it's a root block? */
321 1.1 jdolecek *vpp = nvp;
322 1.1 jdolecek return (0);
323 1.1 jdolecek }
324 1.1 jdolecek
325 1.1 jdolecek int
326 1.55 dsl adosfs_statvfs(struct mount *mp, struct statvfs *sbp)
327 1.1 jdolecek {
328 1.1 jdolecek struct adosfsmount *amp;
329 1.1 jdolecek
330 1.1 jdolecek amp = VFSTOADOSFS(mp);
331 1.1 jdolecek sbp->f_bsize = amp->bsize;
332 1.12 christos sbp->f_frsize = amp->bsize;
333 1.1 jdolecek sbp->f_iosize = amp->dbsize;
334 1.1 jdolecek sbp->f_blocks = amp->numblks;
335 1.1 jdolecek sbp->f_bfree = amp->freeblks;
336 1.1 jdolecek sbp->f_bavail = amp->freeblks;
337 1.12 christos sbp->f_bresvd = 0;
338 1.1 jdolecek sbp->f_files = 0; /* who knows */
339 1.1 jdolecek sbp->f_ffree = 0; /* " " */
340 1.12 christos sbp->f_favail = 0; /* " " */
341 1.12 christos sbp->f_fresvd = 0;
342 1.12 christos copy_statvfs_info(sbp, mp);
343 1.1 jdolecek return (0);
344 1.1 jdolecek }
345 1.1 jdolecek
346 1.21 perry /*
347 1.1 jdolecek * lookup an anode, check mount's hash table if not found, create
348 1.1 jdolecek * return locked and referenced al la vget(vp, 1);
349 1.1 jdolecek */
350 1.1 jdolecek int
351 1.55 dsl adosfs_vget(struct mount *mp, ino_t an, struct vnode **vpp)
352 1.1 jdolecek {
353 1.1 jdolecek struct adosfsmount *amp;
354 1.1 jdolecek struct vnode *vp;
355 1.1 jdolecek struct anode *ap;
356 1.1 jdolecek struct buf *bp;
357 1.1 jdolecek char *nam, *tmp;
358 1.1 jdolecek int namlen, error;
359 1.1 jdolecek
360 1.1 jdolecek error = 0;
361 1.1 jdolecek amp = VFSTOADOSFS(mp);
362 1.1 jdolecek bp = NULL;
363 1.1 jdolecek
364 1.21 perry /*
365 1.1 jdolecek * check hash table. we are done if found
366 1.1 jdolecek */
367 1.1 jdolecek if ((*vpp = adosfs_ahashget(mp, an)) != NULL)
368 1.1 jdolecek return (0);
369 1.1 jdolecek
370 1.62 rmind error = getnewvnode(VT_ADOSFS, mp, adosfs_vnodeop_p, NULL, &vp);
371 1.1 jdolecek if (error)
372 1.1 jdolecek return (error);
373 1.1 jdolecek
374 1.1 jdolecek /*
375 1.1 jdolecek * setup, insert in hash, and lock before io.
376 1.1 jdolecek */
377 1.1 jdolecek vp->v_data = ap = pool_get(&adosfs_node_pool, PR_WAITOK);
378 1.1 jdolecek memset(ap, 0, sizeof(struct anode));
379 1.1 jdolecek ap->vp = vp;
380 1.1 jdolecek ap->amp = amp;
381 1.1 jdolecek ap->block = an;
382 1.1 jdolecek ap->nwords = amp->nwords;
383 1.49 ad genfs_node_init(vp, &adosfs_genfsops);
384 1.1 jdolecek adosfs_ainshash(amp, ap);
385 1.1 jdolecek
386 1.1 jdolecek if ((error = bread(amp->devvp, an * amp->bsize / DEV_BSIZE,
387 1.52 hannken amp->bsize, NOCRED, 0, &bp)) != 0) {
388 1.42 ad brelse(bp, 0);
389 1.1 jdolecek vput(vp);
390 1.1 jdolecek return (error);
391 1.1 jdolecek }
392 1.1 jdolecek
393 1.1 jdolecek /*
394 1.1 jdolecek * get type and fill rest in based on that.
395 1.1 jdolecek */
396 1.1 jdolecek switch (ap->type = adosfs_getblktype(amp, bp)) {
397 1.1 jdolecek case AROOT:
398 1.1 jdolecek vp->v_type = VDIR;
399 1.43 ad vp->v_vflag |= VV_ROOT;
400 1.1 jdolecek ap->mtimev.days = adoswordn(bp, ap->nwords - 10);
401 1.1 jdolecek ap->mtimev.mins = adoswordn(bp, ap->nwords - 9);
402 1.1 jdolecek ap->mtimev.ticks = adoswordn(bp, ap->nwords - 8);
403 1.1 jdolecek ap->created.days = adoswordn(bp, ap->nwords - 7);
404 1.1 jdolecek ap->created.mins = adoswordn(bp, ap->nwords - 6);
405 1.1 jdolecek ap->created.ticks = adoswordn(bp, ap->nwords - 5);
406 1.1 jdolecek break;
407 1.1 jdolecek case ALDIR:
408 1.1 jdolecek case ADIR:
409 1.1 jdolecek vp->v_type = VDIR;
410 1.1 jdolecek break;
411 1.1 jdolecek case ALFILE:
412 1.1 jdolecek case AFILE:
413 1.1 jdolecek vp->v_type = VREG;
414 1.1 jdolecek ap->fsize = adoswordn(bp, ap->nwords - 47);
415 1.1 jdolecek break;
416 1.1 jdolecek case ASLINK: /* XXX soft link */
417 1.1 jdolecek vp->v_type = VLNK;
418 1.1 jdolecek /*
419 1.1 jdolecek * convert from BCPL string and
420 1.1 jdolecek * from: "part:dir/file" to: "/part/dir/file"
421 1.1 jdolecek */
422 1.34 yamt nam = (char *)bp->b_data + (6 * sizeof(long));
423 1.1 jdolecek namlen = strlen(nam);
424 1.1 jdolecek tmp = nam;
425 1.1 jdolecek while (*tmp && *tmp != ':')
426 1.1 jdolecek tmp++;
427 1.1 jdolecek if (*tmp == 0) {
428 1.1 jdolecek ap->slinkto = malloc(namlen + 1, M_ANODE, M_WAITOK);
429 1.1 jdolecek memcpy(ap->slinkto, nam, namlen);
430 1.1 jdolecek } else if (*nam == ':') {
431 1.1 jdolecek ap->slinkto = malloc(namlen + 1, M_ANODE, M_WAITOK);
432 1.1 jdolecek memcpy(ap->slinkto, nam, namlen);
433 1.1 jdolecek ap->slinkto[0] = '/';
434 1.1 jdolecek } else {
435 1.1 jdolecek ap->slinkto = malloc(namlen + 2, M_ANODE, M_WAITOK);
436 1.1 jdolecek ap->slinkto[0] = '/';
437 1.1 jdolecek memcpy(&ap->slinkto[1], nam, namlen);
438 1.1 jdolecek ap->slinkto[tmp - nam + 1] = '/';
439 1.1 jdolecek namlen++;
440 1.1 jdolecek }
441 1.1 jdolecek ap->slinkto[namlen] = 0;
442 1.1 jdolecek ap->fsize = namlen;
443 1.1 jdolecek break;
444 1.1 jdolecek default:
445 1.42 ad brelse(bp, 0);
446 1.1 jdolecek vput(vp);
447 1.1 jdolecek return (EINVAL);
448 1.1 jdolecek }
449 1.1 jdolecek
450 1.1 jdolecek /*
451 1.1 jdolecek * Get appropriate data from this block; hard link needs
452 1.1 jdolecek * to get other data from the "real" block.
453 1.1 jdolecek */
454 1.1 jdolecek
455 1.1 jdolecek /*
456 1.1 jdolecek * copy in name (from original block)
457 1.1 jdolecek */
458 1.34 yamt nam = (char *)bp->b_data + (ap->nwords - 20) * sizeof(u_int32_t);
459 1.1 jdolecek namlen = *(u_char *)nam++;
460 1.1 jdolecek if (namlen > 30) {
461 1.1 jdolecek #ifdef DIAGNOSTIC
462 1.24 christos printf("adosfs: aget: name length too long blk %llu\n",
463 1.24 christos (unsigned long long)an);
464 1.1 jdolecek #endif
465 1.42 ad brelse(bp, 0);
466 1.1 jdolecek vput(vp);
467 1.1 jdolecek return (EINVAL);
468 1.1 jdolecek }
469 1.1 jdolecek memcpy(ap->name, nam, namlen);
470 1.1 jdolecek ap->name[namlen] = 0;
471 1.1 jdolecek
472 1.21 perry /*
473 1.21 perry * if dir alloc hash table and copy it in
474 1.1 jdolecek */
475 1.1 jdolecek if (vp->v_type == VDIR) {
476 1.1 jdolecek int i;
477 1.1 jdolecek
478 1.1 jdolecek ap->tab = malloc(ANODETABSZ(ap) * 2, M_ANODE, M_WAITOK);
479 1.1 jdolecek ap->ntabent = ANODETABENT(ap);
480 1.1 jdolecek ap->tabi = (int *)&ap->tab[ap->ntabent];
481 1.1 jdolecek memset(ap->tabi, 0, ANODETABSZ(ap));
482 1.1 jdolecek for (i = 0; i < ap->ntabent; i++)
483 1.1 jdolecek ap->tab[i] = adoswordn(bp, i + 6);
484 1.1 jdolecek }
485 1.1 jdolecek
486 1.1 jdolecek /*
487 1.1 jdolecek * misc.
488 1.1 jdolecek */
489 1.1 jdolecek ap->pblock = adoswordn(bp, ap->nwords - 3);
490 1.1 jdolecek ap->hashf = adoswordn(bp, ap->nwords - 4);
491 1.1 jdolecek ap->linknext = adoswordn(bp, ap->nwords - 10);
492 1.1 jdolecek ap->linkto = adoswordn(bp, ap->nwords - 11);
493 1.1 jdolecek
494 1.1 jdolecek /*
495 1.1 jdolecek * setup last indirect block cache.
496 1.1 jdolecek */
497 1.1 jdolecek ap->lastlindblk = 0;
498 1.1 jdolecek if (ap->type == AFILE) {
499 1.1 jdolecek ap->lastindblk = ap->block;
500 1.1 jdolecek if (adoswordn(bp, ap->nwords - 10))
501 1.1 jdolecek ap->linkto = ap->block;
502 1.1 jdolecek } else if (ap->type == ALFILE) {
503 1.1 jdolecek ap->lastindblk = ap->linkto;
504 1.42 ad brelse(bp, 0);
505 1.1 jdolecek bp = NULL;
506 1.1 jdolecek error = bread(amp->devvp, ap->linkto * amp->bsize / DEV_BSIZE,
507 1.52 hannken amp->bsize, NOCRED, 0, &bp);
508 1.1 jdolecek if (error) {
509 1.42 ad brelse(bp, 0);
510 1.1 jdolecek vput(vp);
511 1.1 jdolecek return (error);
512 1.1 jdolecek }
513 1.1 jdolecek ap->fsize = adoswordn(bp, ap->nwords - 47);
514 1.1 jdolecek /*
515 1.1 jdolecek * Should ap->block be set to the real file header block?
516 1.1 jdolecek */
517 1.1 jdolecek ap->block = ap->linkto;
518 1.1 jdolecek }
519 1.1 jdolecek
520 1.1 jdolecek if (ap->type == AROOT) {
521 1.1 jdolecek ap->adprot = 15;
522 1.1 jdolecek ap->uid = amp->uid;
523 1.1 jdolecek ap->gid = amp->gid;
524 1.1 jdolecek } else {
525 1.1 jdolecek ap->adprot = adoswordn(bp, ap->nwords - 48) ^ 15;
526 1.1 jdolecek /*
527 1.1 jdolecek * ADOS directories do not have a `x' protection bit as
528 1.1 jdolecek * it is known in VFS; this functionality is fulfilled
529 1.1 jdolecek * by the ADOS `r' bit.
530 1.1 jdolecek *
531 1.1 jdolecek * To retain the ADOS behaviour, fake execute permissions
532 1.1 jdolecek * in that case.
533 1.1 jdolecek */
534 1.1 jdolecek if ((ap->type == ADIR || ap->type == ALDIR) &&
535 1.1 jdolecek (ap->adprot & 0x00000008) == 0)
536 1.1 jdolecek ap->adprot &= ~0x00000002;
537 1.1 jdolecek
538 1.1 jdolecek /*
539 1.1 jdolecek * Get uid/gid from extensions in file header
540 1.1 jdolecek * (really need to know if this is a muFS partition)
541 1.1 jdolecek */
542 1.1 jdolecek ap->uid = (adoswordn(bp, ap->nwords - 49) >> 16) & 0xffff;
543 1.1 jdolecek ap->gid = adoswordn(bp, ap->nwords - 49) & 0xffff;
544 1.1 jdolecek if (ap->uid || ap->gid) {
545 1.1 jdolecek if (ap->uid == 0xffff)
546 1.1 jdolecek ap->uid = 0;
547 1.1 jdolecek if (ap->gid == 0xffff)
548 1.1 jdolecek ap->gid = 0;
549 1.1 jdolecek ap->adprot |= 0x40000000; /* Kludge */
550 1.1 jdolecek }
551 1.1 jdolecek else {
552 1.1 jdolecek /*
553 1.1 jdolecek * uid & gid extension don't exist,
554 1.1 jdolecek * so use the mount-point uid/gid
555 1.1 jdolecek */
556 1.1 jdolecek ap->uid = amp->uid;
557 1.1 jdolecek ap->gid = amp->gid;
558 1.1 jdolecek }
559 1.1 jdolecek }
560 1.1 jdolecek ap->mtime.days = adoswordn(bp, ap->nwords - 23);
561 1.1 jdolecek ap->mtime.mins = adoswordn(bp, ap->nwords - 22);
562 1.1 jdolecek ap->mtime.ticks = adoswordn(bp, ap->nwords - 21);
563 1.1 jdolecek
564 1.1 jdolecek *vpp = vp;
565 1.42 ad brelse(bp, 0);
566 1.39 pooka uvm_vnp_setsize(vp, ap->fsize);
567 1.1 jdolecek return (0);
568 1.1 jdolecek }
569 1.1 jdolecek
570 1.1 jdolecek /*
571 1.1 jdolecek * Load the bitmap into memory, and count the number of available
572 1.1 jdolecek * blocks.
573 1.1 jdolecek * The bitmap will be released if the filesystem is read-only; it's
574 1.1 jdolecek * only needed to find the free space.
575 1.1 jdolecek */
576 1.1 jdolecek int
577 1.55 dsl adosfs_loadbitmap(struct adosfsmount *amp)
578 1.1 jdolecek {
579 1.1 jdolecek struct buf *bp, *mapbp;
580 1.1 jdolecek u_long bn;
581 1.1 jdolecek int blkix, endix, mapix;
582 1.1 jdolecek int bmsize;
583 1.1 jdolecek int error;
584 1.1 jdolecek
585 1.1 jdolecek bp = mapbp = NULL;
586 1.1 jdolecek bn = amp->rootb;
587 1.1 jdolecek if ((error = bread(amp->devvp, bn * amp->bsize / DEV_BSIZE, amp->bsize,
588 1.52 hannken NOCRED, 0, &bp)) != 0) {
589 1.42 ad brelse(bp, 0);
590 1.1 jdolecek return (error);
591 1.1 jdolecek }
592 1.1 jdolecek blkix = amp->nwords - 49;
593 1.1 jdolecek endix = amp->nwords - 24;
594 1.1 jdolecek mapix = 0;
595 1.1 jdolecek bmsize = (amp->numblks + 31) / 32;
596 1.1 jdolecek while (mapix < bmsize) {
597 1.1 jdolecek int n;
598 1.1 jdolecek u_long bits;
599 1.1 jdolecek
600 1.1 jdolecek if (adoswordn(bp, blkix) == 0)
601 1.1 jdolecek break;
602 1.1 jdolecek if (mapbp != NULL)
603 1.42 ad brelse(mapbp, 0);
604 1.1 jdolecek if ((error = bread(amp->devvp,
605 1.1 jdolecek adoswordn(bp, blkix) * amp->bsize / DEV_BSIZE, amp->bsize,
606 1.52 hannken NOCRED, 0, &mapbp)) != 0)
607 1.1 jdolecek break;
608 1.1 jdolecek if (adoscksum(mapbp, amp->nwords)) {
609 1.1 jdolecek #ifdef DIAGNOSTIC
610 1.1 jdolecek printf("adosfs: loadbitmap - cksum of blk %d failed\n",
611 1.1 jdolecek adoswordn(bp, blkix));
612 1.1 jdolecek #endif
613 1.1 jdolecek /* XXX Force read-only? Set free space 0? */
614 1.1 jdolecek break;
615 1.1 jdolecek }
616 1.1 jdolecek n = 1;
617 1.1 jdolecek while (n < amp->nwords && mapix < bmsize) {
618 1.1 jdolecek amp->bitmap[mapix++] = bits = adoswordn(mapbp, n);
619 1.1 jdolecek ++n;
620 1.1 jdolecek if (mapix == bmsize && amp->numblks & 31)
621 1.1 jdolecek bits &= ~(0xffffffff << (amp->numblks & 31));
622 1.1 jdolecek while (bits) {
623 1.1 jdolecek if (bits & 1)
624 1.1 jdolecek ++amp->freeblks;
625 1.1 jdolecek bits >>= 1;
626 1.1 jdolecek }
627 1.1 jdolecek }
628 1.1 jdolecek ++blkix;
629 1.1 jdolecek if (mapix < bmsize && blkix == endix) {
630 1.1 jdolecek bn = adoswordn(bp, blkix);
631 1.42 ad brelse(bp, 0);
632 1.1 jdolecek if ((error = bread(amp->devvp, bn * amp->bsize / DEV_BSIZE,
633 1.52 hannken amp->bsize, NOCRED, 0, &bp)) != 0)
634 1.1 jdolecek break;
635 1.1 jdolecek /*
636 1.1 jdolecek * Why is there no checksum on these blocks?
637 1.1 jdolecek */
638 1.1 jdolecek blkix = 0;
639 1.1 jdolecek endix = amp->nwords - 1;
640 1.1 jdolecek }
641 1.1 jdolecek }
642 1.1 jdolecek if (bp)
643 1.42 ad brelse(bp, 0);
644 1.1 jdolecek if (mapbp)
645 1.42 ad brelse(mapbp, 0);
646 1.1 jdolecek return (error);
647 1.1 jdolecek }
648 1.1 jdolecek
649 1.1 jdolecek
650 1.1 jdolecek /*
651 1.1 jdolecek * File handle to vnode
652 1.1 jdolecek *
653 1.1 jdolecek * Have to be really careful about stale file handles:
654 1.1 jdolecek * - check that the inode number is in range
655 1.1 jdolecek * - call iget() to get the locked inode
656 1.1 jdolecek * - check for an unallocated inode (i_mode == 0)
657 1.1 jdolecek * - check that the generation number matches
658 1.1 jdolecek */
659 1.1 jdolecek
660 1.1 jdolecek struct ifid {
661 1.1 jdolecek ushort ifid_len;
662 1.1 jdolecek ushort ifid_pad;
663 1.1 jdolecek int ifid_ino;
664 1.1 jdolecek long ifid_start;
665 1.1 jdolecek };
666 1.1 jdolecek
667 1.1 jdolecek int
668 1.55 dsl adosfs_fhtovp(struct mount *mp, struct fid *fhp, struct vnode **vpp)
669 1.1 jdolecek {
670 1.29 martin struct ifid ifh;
671 1.1 jdolecek #if 0
672 1.1 jdolecek struct anode *ap;
673 1.1 jdolecek #endif
674 1.1 jdolecek struct vnode *nvp;
675 1.1 jdolecek int error;
676 1.1 jdolecek
677 1.29 martin if (fhp->fid_len != sizeof(struct ifid))
678 1.29 martin return EINVAL;
679 1.29 martin
680 1.1 jdolecek #ifdef ADOSFS_DIAGNOSTIC
681 1.59 phx printf("adfhtovp(%p, %p, %p)\n", mp, fhp, vpp);
682 1.1 jdolecek #endif
683 1.21 perry
684 1.29 martin memcpy(&ifh, fhp, sizeof(ifh));
685 1.29 martin
686 1.29 martin if ((error = VFS_VGET(mp, ifh.ifid_ino, &nvp)) != 0) {
687 1.1 jdolecek *vpp = NULLVP;
688 1.1 jdolecek return (error);
689 1.1 jdolecek }
690 1.1 jdolecek #if 0
691 1.1 jdolecek ap = VTOA(nvp);
692 1.1 jdolecek if (ap->inode.iso_mode == 0) {
693 1.1 jdolecek vput(nvp);
694 1.1 jdolecek *vpp = NULLVP;
695 1.1 jdolecek return (ESTALE);
696 1.1 jdolecek }
697 1.1 jdolecek #endif
698 1.1 jdolecek *vpp = nvp;
699 1.1 jdolecek return(0);
700 1.1 jdolecek }
701 1.1 jdolecek
702 1.1 jdolecek int
703 1.55 dsl adosfs_vptofh(struct vnode *vp, struct fid *fhp, size_t *fh_size)
704 1.1 jdolecek {
705 1.1 jdolecek struct anode *ap = VTOA(vp);
706 1.29 martin struct ifid ifh;
707 1.21 perry
708 1.29 martin if (*fh_size < sizeof(struct ifid)) {
709 1.29 martin *fh_size = sizeof(struct ifid);
710 1.29 martin return E2BIG;
711 1.29 martin }
712 1.29 martin *fh_size = sizeof(struct ifid);
713 1.29 martin
714 1.29 martin memset(&ifh, 0, sizeof(ifh));
715 1.29 martin ifh.ifid_len = sizeof(struct ifid);
716 1.29 martin ifh.ifid_ino = ap->block;
717 1.29 martin ifh.ifid_start = ap->block;
718 1.29 martin memcpy(fhp, &ifh, sizeof(ifh));
719 1.21 perry
720 1.1 jdolecek #ifdef ADOSFS_DIAGNOSTIC
721 1.59 phx printf("advptofh(%p, %p)\n", vp, fhp);
722 1.1 jdolecek #endif
723 1.1 jdolecek return(0);
724 1.1 jdolecek }
725 1.1 jdolecek
726 1.1 jdolecek int
727 1.55 dsl adosfs_sync(struct mount *mp, int waitfor, kauth_cred_t uc)
728 1.1 jdolecek {
729 1.1 jdolecek #ifdef ADOSFS_DIAGNOSTIC
730 1.59 phx printf("ad_sync(%p, %d)\n", mp, waitfor);
731 1.1 jdolecek #endif
732 1.1 jdolecek return(0);
733 1.1 jdolecek }
734 1.1 jdolecek
735 1.1 jdolecek void
736 1.56 cegger adosfs_init(void)
737 1.1 jdolecek {
738 1.36 pooka
739 1.11 atatat malloc_type_attach(M_ANODE);
740 1.61 rmind mutex_init(&adosfs_hashlock, MUTEX_DEFAULT, IPL_NONE);
741 1.15 atatat pool_init(&adosfs_node_pool, sizeof(struct anode), 0, 0, 0, "adosndpl",
742 1.35 ad &pool_allocator_nointr, IPL_NONE);
743 1.1 jdolecek }
744 1.1 jdolecek
745 1.1 jdolecek void
746 1.56 cegger adosfs_done(void)
747 1.1 jdolecek {
748 1.36 pooka
749 1.1 jdolecek pool_destroy(&adosfs_node_pool);
750 1.61 rmind mutex_destroy(&adosfs_hashlock);
751 1.11 atatat malloc_type_detach(M_ANODE);
752 1.1 jdolecek }
753 1.1 jdolecek
754 1.1 jdolecek /*
755 1.1 jdolecek * vfs generic function call table
756 1.1 jdolecek */
757 1.1 jdolecek
758 1.21 perry extern const struct vnodeopv_desc adosfs_vnodeop_opv_desc;
759 1.1 jdolecek
760 1.1 jdolecek const struct vnodeopv_desc *adosfs_vnodeopv_descs[] = {
761 1.1 jdolecek &adosfs_vnodeop_opv_desc,
762 1.1 jdolecek NULL,
763 1.1 jdolecek };
764 1.1 jdolecek
765 1.1 jdolecek struct vfsops adosfs_vfsops = {
766 1.1 jdolecek MOUNT_ADOSFS,
767 1.37 dsl sizeof (struct adosfs_args),
768 1.1 jdolecek adosfs_mount,
769 1.1 jdolecek adosfs_start,
770 1.1 jdolecek adosfs_unmount,
771 1.1 jdolecek adosfs_root,
772 1.44 pooka (void *)eopnotsupp, /* vfs_quotactl */
773 1.21 perry adosfs_statvfs,
774 1.21 perry adosfs_sync,
775 1.1 jdolecek adosfs_vget,
776 1.21 perry adosfs_fhtovp,
777 1.21 perry adosfs_vptofh,
778 1.21 perry adosfs_init,
779 1.1 jdolecek NULL,
780 1.1 jdolecek adosfs_done,
781 1.1 jdolecek NULL, /* vfs_mountroot */
782 1.17 hannken (int (*)(struct mount *, struct vnode *, struct timespec *)) eopnotsupp,
783 1.20 thorpej vfs_stdextattrctl,
784 1.40 pooka (void *)eopnotsupp, /* vfs_suspendctl */
785 1.48 dholland genfs_renamelock_enter,
786 1.48 dholland genfs_renamelock_exit,
787 1.50 ad (void *)eopnotsupp,
788 1.1 jdolecek adosfs_vnodeopv_descs,
789 1.31 christos 0,
790 1.31 christos { NULL, NULL },
791 1.1 jdolecek };
792 1.51 rumble
793 1.51 rumble static int
794 1.51 rumble adosfs_modcmd(modcmd_t cmd, void *arg)
795 1.51 rumble {
796 1.53 rumble int error;
797 1.51 rumble
798 1.51 rumble switch (cmd) {
799 1.51 rumble case MODULE_CMD_INIT:
800 1.53 rumble error = vfs_attach(&adosfs_vfsops);
801 1.53 rumble if (error != 0)
802 1.53 rumble break;
803 1.53 rumble sysctl_createv(&adosfs_sysctl_log, 0, NULL, NULL,
804 1.53 rumble CTLFLAG_PERMANENT,
805 1.53 rumble CTLTYPE_NODE, "vfs", NULL,
806 1.53 rumble NULL, 0, NULL, 0,
807 1.53 rumble CTL_VFS, CTL_EOL);
808 1.53 rumble sysctl_createv(&adosfs_sysctl_log, 0, NULL, NULL,
809 1.53 rumble CTLFLAG_PERMANENT,
810 1.53 rumble CTLTYPE_NODE, "adosfs",
811 1.53 rumble SYSCTL_DESCR("AmigaDOS file system"),
812 1.53 rumble NULL, 0, NULL, 0,
813 1.53 rumble CTL_VFS, 16, CTL_EOL);
814 1.53 rumble /*
815 1.53 rumble * XXX the "16" above could be dynamic, thereby eliminating
816 1.53 rumble * one more instance of the "number to vfs" mapping problem,
817 1.53 rumble * but "16" is the order as taken from sys/mount.h
818 1.53 rumble */
819 1.53 rumble break;
820 1.51 rumble case MODULE_CMD_FINI:
821 1.53 rumble error = vfs_detach(&adosfs_vfsops);
822 1.53 rumble if (error != 0)
823 1.53 rumble break;
824 1.53 rumble sysctl_teardown(&adosfs_sysctl_log);
825 1.53 rumble break;
826 1.51 rumble default:
827 1.53 rumble error = ENOTTY;
828 1.53 rumble break;
829 1.51 rumble }
830 1.53 rumble
831 1.53 rumble return (error);
832 1.51 rumble }
833