1 /*-
2 * Copyright (c) 1998, 1999 Semen Ustimenko (semenu@FreeBSD.org)
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 *
26 * $FreeBSD: src/sys/fs/hpfs/hpfs_vnops.c,v 1.2.2.2 2002/01/15 18:35:09 semenu Exp $
27 */
28
29 #include <sys/param.h>
30 #include <sys/systm.h>
31 #include <sys/uio.h>
32 #include <sys/kernel.h>
33 #include <sys/proc.h>
34 #include <sys/caps.h>
35 #include <sys/time.h>
36 #include <sys/types.h>
37 #include <sys/stat.h>
38 #include <sys/vnode.h>
39 #include <sys/mount.h>
40 #include <sys/namei.h>
41 #include <sys/malloc.h>
42 #include <sys/buf.h>
43 #include <sys/dirent.h>
44
45 #include <machine/limits.h>
46
47 #include <vm/vm.h>
48 #include <vm/vm_param.h>
49 #if !defined(__DragonFly__)
50 #include <vm/vm_prot.h>
51 #endif
52 #include <vm/vm_page.h>
53 #include <vm/vm_object.h>
54 #include <vm/vm_pager.h>
55 #include <vm/vm_zone.h>
56 #if defined(__DragonFly__)
57 #include <vm/vnode_pager.h>
58 #endif
59 #include <vm/vm_extern.h>
60
61 #include <sys/buf2.h>
62
63 #if !defined(__DragonFly__)
64 #include <miscfs/specfs/specdev.h>
65 #include <miscfs/genfs/genfs.h>
66 #endif
67
68 #include <sys/unistd.h> /* for pathconf(2) constants */
69
70 #include "hpfs.h"
71 #include "hpfsmount.h"
72 #include "hpfs_subr.h"
73 #include "hpfs_ioctl.h"
74
75 static int hpfs_de_uiomove (int *, struct hpfsmount *,
76 struct hpfsdirent *, struct uio *);
77 static int hpfs_ioctl (struct vop_ioctl_args *ap);
78 static int hpfs_read (struct vop_read_args *);
79 static int hpfs_write (struct vop_write_args *ap);
80 static int hpfs_getattr (struct vop_getattr_args *ap);
81 static int hpfs_setattr (struct vop_setattr_args *ap);
82 static int hpfs_inactive (struct vop_inactive_args *ap);
83 static int hpfs_print (struct vop_print_args *ap);
84 static int hpfs_reclaim (struct vop_reclaim_args *ap);
85 static int hpfs_strategy (struct vop_strategy_args *ap);
86 static int hpfs_access (struct vop_access_args *ap);
87 static int hpfs_readdir (struct vop_readdir_args *ap);
88 static int hpfs_lookup (struct vop_old_lookup_args *ap);
89 static int hpfs_create (struct vop_old_create_args *);
90 static int hpfs_remove (struct vop_old_remove_args *);
91 static int hpfs_bmap (struct vop_bmap_args *ap);
92 #if defined(__DragonFly__)
93 static int hpfs_fsync (struct vop_fsync_args *ap);
94 #endif
95 static int hpfs_pathconf (struct vop_pathconf_args *ap);
96
97 #if defined(__DragonFly__)
98
99 /*
100 * hpfs_fsync(struct vnode *a_vp, int a_waitfor)
101 */
102 static int
hpfs_fsync(struct vop_fsync_args * ap)103 hpfs_fsync(struct vop_fsync_args *ap)
104 {
105 struct vnode *vp = ap->a_vp;
106
107 /*
108 * Flush all dirty buffers associated with a vnode.
109 */
110 #ifdef DIAGNOSTIC
111 loop:
112 #endif
113 vfsync(vp, ap->a_waitfor, 0, NULL, NULL);
114 #ifdef DIAGNOSTIC
115 if (ap->a_waitfor == MNT_WAIT && !RB_EMPTY(&vp->v_rbdirty_tree)) {
116 vprint("hpfs_fsync: dirty", vp);
117 goto loop;
118 }
119 #endif
120
121 /*
122 * Write out the on-disc version of the vnode.
123 */
124 return hpfs_update(VTOHP(vp));
125 }
126
127 #endif
128
129 /*
130 * hpfs_ioctl(struct vnode *a_vp, u_long a_command, caddr_t a_data,
131 * int a_fflag, struct ucred *a_cred)
132 */
133 static int
hpfs_ioctl(struct vop_ioctl_args * ap)134 hpfs_ioctl(struct vop_ioctl_args *ap)
135 {
136 struct vnode *vp = ap->a_vp;
137 struct hpfsnode *hp = VTOHP(vp);
138 int error;
139
140 kprintf("hpfs_ioctl(0x%x, 0x%lx, 0x%p, 0x%x): ",
141 hp->h_no, ap->a_command, ap->a_data, ap->a_fflag);
142
143 switch (ap->a_command) {
144 case HPFSIOCGEANUM: {
145 u_long eanum;
146 u_long passed;
147 struct ea *eap;
148
149 eanum = 0;
150
151 if (hp->h_fn.fn_ealen > 0) {
152 eap = (struct ea *)&(hp->h_fn.fn_int);
153 passed = 0;
154
155 while (passed < hp->h_fn.fn_ealen) {
156
157 kprintf("EAname: %s\n", EA_NAME(eap));
158
159 eanum++;
160 passed += sizeof(struct ea) +
161 eap->ea_namelen + 1 + eap->ea_vallen;
162 eap = (struct ea *)((caddr_t)hp->h_fn.fn_int +
163 passed);
164 }
165 error = 0;
166 } else {
167 error = ENOENT;
168 }
169
170 kprintf("%lu eas\n", eanum);
171
172 *(u_long *)ap->a_data = eanum;
173
174 break;
175 }
176 case HPFSIOCGEASZ: {
177 u_long eanum;
178 u_long passed;
179 struct ea *eap;
180
181 kprintf("EA%ld\n", *(u_long *)ap->a_data);
182
183 eanum = 0;
184 if (hp->h_fn.fn_ealen > 0) {
185 eap = (struct ea *)&(hp->h_fn.fn_int);
186 passed = 0;
187
188 error = ENOENT;
189 while (passed < hp->h_fn.fn_ealen) {
190 kprintf("EAname: %s\n", EA_NAME(eap));
191
192 if (eanum == *(u_long *)ap->a_data) {
193 *(u_long *)ap->a_data =
194 eap->ea_namelen + 1 +
195 eap->ea_vallen;
196
197 error = 0;
198 break;
199 }
200
201 eanum++;
202 passed += sizeof(struct ea) +
203 eap->ea_namelen + 1 + eap->ea_vallen;
204 eap = (struct ea *)((caddr_t)hp->h_fn.fn_int +
205 passed);
206 }
207 } else {
208 error = ENOENT;
209 }
210
211 break;
212 }
213 case HPFSIOCRDEA: {
214 u_long eanum;
215 u_long passed;
216 struct hpfs_rdea *rdeap;
217 struct ea *eap;
218
219 rdeap = (struct hpfs_rdea *)ap->a_data;
220 kprintf("EA%ld\n", rdeap->ea_no);
221
222 eanum = 0;
223 if (hp->h_fn.fn_ealen > 0) {
224 eap = (struct ea *)&(hp->h_fn.fn_int);
225 passed = 0;
226
227 error = ENOENT;
228 while (passed < hp->h_fn.fn_ealen) {
229 kprintf("EAname: %s\n", EA_NAME(eap));
230
231 if (eanum == rdeap->ea_no) {
232 rdeap->ea_sz = eap->ea_namelen + 1 +
233 eap->ea_vallen;
234 copyout(EA_NAME(eap),rdeap->ea_data,
235 rdeap->ea_sz);
236 error = 0;
237 break;
238 }
239
240 eanum++;
241 passed += sizeof(struct ea) +
242 eap->ea_namelen + 1 + eap->ea_vallen;
243 eap = (struct ea *)((caddr_t)hp->h_fn.fn_int +
244 passed);
245 }
246 } else {
247 error = ENOENT;
248 }
249
250 break;
251 }
252 default:
253 error = EOPNOTSUPP;
254 break;
255 }
256 return (error);
257 }
258
259 /*
260 * Map file offset to disk offset.
261 *
262 * hpfs_bmap(struct vnode *a_vp, off_t a_loffset,
263 * off_t *a_doffsetp, int *a_runp, int *a_runb)
264 */
265 int
hpfs_bmap(struct vop_bmap_args * ap)266 hpfs_bmap(struct vop_bmap_args *ap)
267 {
268 struct hpfsnode *hp = VTOHP(ap->a_vp);
269 int error;
270 daddr_t lbn;
271 daddr_t dbn;
272
273 if (ap->a_runb != NULL)
274 *ap->a_runb = 0;
275 if (ap->a_doffsetp == NULL)
276 return (0);
277
278 dprintf(("hpfs_bmap(0x%x): ", hp->h_no));
279
280 lbn = ap->a_loffset >> DEV_BSHIFT;
281 KKASSERT(((int)ap->a_loffset & DEV_BMASK) == 0);
282
283 error = hpfs_hpbmap (hp, lbn, &dbn, ap->a_runp);
284 if (error || dbn == (daddr_t)-1) {
285 *ap->a_doffsetp = NOOFFSET;
286 } else {
287 *ap->a_doffsetp = (off_t)dbn << DEV_BSHIFT;
288 }
289 return (error);
290 }
291
292 /*
293 * hpfs_read(struct vnode *a_vp, struct uio *a_uio, int a_ioflag,
294 * struct ucred *a_cred)
295 */
296 static int
hpfs_read(struct vop_read_args * ap)297 hpfs_read(struct vop_read_args *ap)
298 {
299 struct vnode *vp = ap->a_vp;
300 struct hpfsnode *hp = VTOHP(vp);
301 struct uio *uio = ap->a_uio;
302 struct buf *bp;
303 u_int xfersz, toread;
304 u_int off;
305 daddr_t lbn, bn;
306 int resid;
307 int runl;
308 int error = 0;
309
310 resid = (int)szmin(uio->uio_resid, hp->h_fn.fn_size - uio->uio_offset);
311
312 dprintf(("hpfs_read(0x%x, off: %d resid: %zx, segflg: %d): "
313 "[resid: 0x%x]\n",
314 hp->h_no, (u_int32_t)uio->uio_offset,
315 uio->uio_resid, uio->uio_segflg, resid));
316
317 while (resid) {
318 lbn = uio->uio_offset >> DEV_BSHIFT;
319 off = uio->uio_offset & (DEV_BSIZE - 1);
320 dprintf(("hpfs_read: resid: 0x%zx lbn: 0x%x off: 0x%x\n",
321 uio->uio_resid, lbn, off));
322 error = hpfs_hpbmap(hp, lbn, &bn, &runl);
323 if (error)
324 return (error);
325
326 toread = min(off + resid, min(64*1024, (runl+1)*DEV_BSIZE));
327 xfersz = roundup2(toread, DEV_BSIZE);
328 dprintf(("hpfs_read: bn: 0x%x (0x%x) toread: 0x%x (0x%x)\n",
329 bn, runl, toread, xfersz));
330
331 if (toread == 0)
332 break;
333
334 error = bread(hp->h_devvp, dbtodoff(bn), xfersz, &bp);
335 if (error) {
336 brelse(bp);
337 break;
338 }
339
340 error = uiomove(bp->b_data + off, (size_t)(toread - off), uio);
341 if(error) {
342 brelse(bp);
343 break;
344 }
345 brelse(bp);
346 resid -= toread;
347 }
348 dprintf(("hpfs_read: successful\n"));
349 return (error);
350 }
351
352 /*
353 * hpfs_write(struct vnode *a_vp, struct uio *a_uio, int a_ioflag,
354 * struct ucred *a_cred)
355 */
356 static int
hpfs_write(struct vop_write_args * ap)357 hpfs_write(struct vop_write_args *ap)
358 {
359 struct vnode *vp = ap->a_vp;
360 struct hpfsnode *hp = VTOHP(vp);
361 struct uio *uio = ap->a_uio;
362 struct buf *bp;
363 u_int xfersz, towrite;
364 u_int off;
365 daddr_t lbn, bn;
366 int runl;
367 int error = 0;
368
369 dprintf(("hpfs_write(0x%x, off: %d resid: %zd, segflg: %d):\n",
370 hp->h_no, (u_int32_t)uio->uio_offset,
371 uio->uio_resid, uio->uio_segflg));
372
373 if (ap->a_ioflag & IO_APPEND) {
374 dprintf(("hpfs_write: APPEND mode\n"));
375 uio->uio_offset = hp->h_fn.fn_size;
376 }
377 if (uio->uio_offset + uio->uio_resid > hp->h_fn.fn_size) {
378 error = hpfs_extend (hp, uio->uio_offset + uio->uio_resid);
379 if (error) {
380 kprintf("hpfs_write: hpfs_extend FAILED %d\n", error);
381 return (error);
382 }
383 }
384
385 while (uio->uio_resid) {
386 lbn = uio->uio_offset >> DEV_BSHIFT;
387 off = uio->uio_offset & (DEV_BSIZE - 1);
388 dprintf(("hpfs_write: resid: 0x%zx lbn: 0x%x off: 0x%x\n",
389 uio->uio_resid, lbn, off));
390 error = hpfs_hpbmap(hp, lbn, &bn, &runl);
391 if (error)
392 return (error);
393
394 towrite = szmin(off + uio->uio_resid,
395 min(64*1024, (runl+1)*DEV_BSIZE));
396 xfersz = roundup2(towrite, DEV_BSIZE);
397 dprintf(("hpfs_write: bn: 0x%x (0x%x) towrite: 0x%x (0x%x)\n",
398 bn, runl, towrite, xfersz));
399
400 /*
401 * We do not have to issue a read-before-write if the xfer
402 * size does not cover the whole block.
403 *
404 * In the UIO_NOCOPY case, however, we are not overwriting
405 * anything and must do a read-before-write to fill in
406 * any missing pieces.
407 */
408 if (off == 0 && towrite == xfersz &&
409 uio->uio_segflg != UIO_NOCOPY) {
410 bp = getblk(hp->h_devvp, dbtodoff(bn), xfersz, 0, 0);
411 clrbuf(bp);
412 } else {
413 error = bread(hp->h_devvp, dbtodoff(bn), xfersz, &bp);
414 if (error) {
415 brelse(bp);
416 return (error);
417 }
418 }
419
420 error = uiomove(bp->b_data + off, (size_t)(towrite - off), uio);
421 if(error) {
422 brelse(bp);
423 return (error);
424 }
425
426 if (ap->a_ioflag & IO_SYNC)
427 bwrite(bp);
428 else
429 bawrite(bp);
430 }
431
432 dprintf(("hpfs_write: successful\n"));
433 return (0);
434 }
435
436 /*
437 * XXXXX do we need hpfsnode locking inside?
438 *
439 * hpfs_getattr(struct vnode *a_vp, struct vattr *a_vap)
440 */
441 static int
hpfs_getattr(struct vop_getattr_args * ap)442 hpfs_getattr(struct vop_getattr_args *ap)
443 {
444 struct vnode *vp = ap->a_vp;
445 struct hpfsnode *hp = VTOHP(vp);
446 struct vattr *vap = ap->a_vap;
447 int error;
448
449 dprintf(("hpfs_getattr(0x%x):\n", hp->h_no));
450
451 #if defined(__DragonFly__)
452 vap->va_fsid = devid_from_dev(hp->h_dev);
453 #else /* defined(__NetBSD__) */
454 vap->va_fsid = ip->i_dev;
455 #endif
456 vap->va_fileid = hp->h_no;
457 vap->va_mode = hp->h_mode;
458 vap->va_nlink = 1;
459 vap->va_uid = hp->h_uid;
460 vap->va_gid = hp->h_gid;
461 vap->va_rmajor = VNOVAL;
462 vap->va_rminor = VNOVAL;
463 vap->va_size = hp->h_fn.fn_size;
464 vap->va_bytes = roundup2(hp->h_fn.fn_size, DEV_BSIZE) + DEV_BSIZE;
465
466 if (!(hp->h_flag & H_PARVALID)) {
467 error = hpfs_validateparent(hp);
468 if (error)
469 return (error);
470 }
471 vap->va_atime = hpfstimetounix(hp->h_atime);
472 vap->va_mtime = hpfstimetounix(hp->h_mtime);
473 vap->va_ctime = hpfstimetounix(hp->h_ctime);
474
475 vap->va_flags = 0;
476 vap->va_gen = 0;
477 vap->va_blocksize = DEV_BSIZE;
478 vap->va_type = vp->v_type;
479 vap->va_filerev = 0;
480
481 return (0);
482 }
483
484 /*
485 * XXXXX do we need hpfsnode locking inside?
486 *
487 * hpfs_setattr(struct vnode *a_vp, struct vattr *a_vap, struct ucred *a_cred)
488 */
489 static int
hpfs_setattr(struct vop_setattr_args * ap)490 hpfs_setattr(struct vop_setattr_args *ap)
491 {
492 struct vnode *vp = ap->a_vp;
493 struct hpfsnode *hp = VTOHP(vp);
494 struct vattr *vap = ap->a_vap;
495 struct ucred *cred = ap->a_cred;
496 int error;
497
498 dprintf(("hpfs_setattr(0x%x):\n", hp->h_no));
499
500 /*
501 * Check for unsettable attributes.
502 */
503 if ((vap->va_type != VNON) || (vap->va_nlink != VNOVAL) ||
504 (vap->va_fsid != VNOVAL) || (vap->va_fileid != VNOVAL) ||
505 (vap->va_blocksize != VNOVAL) || (vap->va_rmajor != VNOVAL) ||
506 (vap->va_bytes != VNOVAL) || (vap->va_gen != VNOVAL)) {
507 dprintf(("hpfs_setattr: changing nonsettable attr\n"));
508 return (EINVAL);
509 }
510
511 /* Can't change flags XXX Could be implemented */
512 if (vap->va_flags != VNOVAL) {
513 kprintf("hpfs_setattr: FLAGS CANNOT BE SET\n");
514 return (EINVAL);
515 }
516
517 /* Can't change uid/gid XXX Could be implemented */
518 if (vap->va_uid != (uid_t)VNOVAL || vap->va_gid != (gid_t)VNOVAL) {
519 kprintf("hpfs_setattr: UID/GID CANNOT BE SET\n");
520 return (EINVAL);
521 }
522
523 /* Can't change mode XXX Could be implemented */
524 if (vap->va_mode != (mode_t)VNOVAL) {
525 kprintf("hpfs_setattr: MODE CANNOT BE SET\n");
526 return (EINVAL);
527 }
528
529 /* Update times */
530 if (vap->va_atime.tv_sec != VNOVAL || vap->va_mtime.tv_sec != VNOVAL) {
531 if (vp->v_mount->mnt_flag & MNT_RDONLY)
532 return (EROFS);
533 if (cred->cr_uid != hp->h_uid &&
534 (error = caps_priv_check(cred, SYSCAP_NOVFS_SETATTR)) &&
535 ((vap->va_vaflags & VA_UTIMES_NULL) == 0 ||
536 (error = VOP_EACCESS(vp, VWRITE, cred))))
537 return (error);
538 if (vap->va_atime.tv_sec != VNOVAL)
539 hp->h_atime = vap->va_atime.tv_sec;
540 if (vap->va_mtime.tv_sec != VNOVAL)
541 hp->h_mtime = vap->va_mtime.tv_sec;
542
543 hp->h_flag |= H_PARCHANGE;
544 }
545
546 if (vap->va_size != VNOVAL) {
547 switch (vp->v_type) {
548 case VDIR:
549 return (EISDIR);
550 case VREG:
551 if (vp->v_mount->mnt_flag & MNT_RDONLY)
552 return (EROFS);
553 break;
554 default:
555 kprintf("hpfs_setattr: WRONG v_type\n");
556 return (EINVAL);
557 }
558
559 if (vap->va_size < hp->h_fn.fn_size) {
560 #if defined(__DragonFly__)
561 error = vtruncbuf(vp, vap->va_size, DEV_BSIZE);
562 if (error)
563 return (error);
564 #else /* defined(__NetBSD__) */
565 #error Need alternation for vtruncbuf()
566 #endif
567 error = hpfs_truncate(hp, vap->va_size);
568 if (error)
569 return (error);
570
571 } else if (vap->va_size > hp->h_fn.fn_size) {
572 #if defined(__DragonFly__)
573 vnode_pager_setsize(vp, vap->va_size);
574 #endif
575 error = hpfs_extend(hp, vap->va_size);
576 if (error)
577 return (error);
578 }
579 }
580
581 return (0);
582 }
583
584 /*
585 * Last reference to an node. If necessary, write or delete it.
586 *
587 * hpfs_inactive(struct vnode *a_vp)
588 */
589 int
hpfs_inactive(struct vop_inactive_args * ap)590 hpfs_inactive(struct vop_inactive_args *ap)
591 {
592 struct vnode *vp = ap->a_vp;
593 struct hpfsnode *hp = VTOHP(vp);
594 int error;
595
596 dprintf(("hpfs_inactive(0x%x): \n", hp->h_no));
597
598 if (hp->h_flag & H_CHANGE) {
599 dprintf(("hpfs_inactive: node changed, update\n"));
600 error = hpfs_update (hp);
601 if (error)
602 return (error);
603 }
604
605 if (hp->h_flag & H_PARCHANGE) {
606 dprintf(("hpfs_inactive: parent node changed, update\n"));
607 error = hpfs_updateparent (hp);
608 if (error)
609 return (error);
610 }
611
612 if (prtactive && VREFCNT(vp) > 1)
613 vprint("hpfs_inactive: pushing active", vp);
614
615 if (hp->h_flag & H_INVAL) {
616 #if defined(__DragonFly__)
617 vrecycle(vp);
618 #else /* defined(__NetBSD__) */
619 vgone(vp);
620 #endif
621 return (0);
622 }
623 return (0);
624 }
625
626 /*
627 * Reclaim an inode so that it can be used for other purposes.
628 *
629 * hpfs_reclaim(struct vnode *a_vp)
630 */
631 int
hpfs_reclaim(struct vop_reclaim_args * ap)632 hpfs_reclaim(struct vop_reclaim_args *ap)
633 {
634 struct vnode *vp = ap->a_vp;
635 struct hpfsnode *hp = VTOHP(vp);
636
637 dprintf(("hpfs_reclaim(0x%x0): \n", hp->h_no));
638
639 hpfs_hphashrem(hp);
640
641 /* Purge old data structures associated with the inode. */
642 if (hp->h_devvp) {
643 vrele(hp->h_devvp);
644 hp->h_devvp = NULL;
645 }
646
647 vp->v_data = NULL;
648
649 kfree(hp, M_HPFSNO);
650
651 return (0);
652 }
653
654 /*
655 * hpfs_print(struct vnode *a_vp)
656 */
657 static int
hpfs_print(struct vop_print_args * ap)658 hpfs_print(struct vop_print_args *ap)
659 {
660 struct vnode *vp = ap->a_vp;
661 struct hpfsnode *hp = VTOHP(vp);
662
663 kprintf("tag VT_HPFS, ino 0x%x",hp->h_no);
664 lockmgr_printinfo(&vp->v_lock);
665 kprintf("\n");
666 return (0);
667 }
668
669 /*
670 * Calculate the logical to physical mapping if not done already,
671 * then call the device strategy routine.
672 *
673 * In order to be able to swap to a file, the VOP_BMAP operation may not
674 * deadlock on memory. See hpfs_bmap() for details. XXXXXXX (not impl)
675 *
676 * hpfs_strategy(struct vnode *a_vp, struct bio *a_bio)
677 */
678 int
hpfs_strategy(struct vop_strategy_args * ap)679 hpfs_strategy(struct vop_strategy_args *ap)
680 {
681 struct bio *bio = ap->a_bio;
682 struct bio *nbio;
683 struct buf *bp = bio->bio_buf;
684 struct vnode *vp = ap->a_vp;
685 struct hpfsnode *hp;
686 int error;
687
688 dprintf(("hpfs_strategy(): \n"));
689
690 if (vp->v_type == VBLK || vp->v_type == VCHR)
691 panic("hpfs_strategy: spec");
692
693 nbio = push_bio(bio);
694 if (nbio->bio_offset == NOOFFSET) {
695 error = VOP_BMAP(vp, bio->bio_offset, &nbio->bio_offset,
696 NULL, NULL, bp->b_cmd);
697 if (error) {
698 kprintf("hpfs_strategy: VOP_BMAP FAILED %d\n", error);
699 bp->b_error = error;
700 bp->b_flags |= B_ERROR;
701 /* I/O was never started on nbio, must biodone(bio) */
702 biodone(bio);
703 return (error);
704 }
705 if (nbio->bio_offset == NOOFFSET)
706 vfs_bio_clrbuf(bp);
707 }
708 if (nbio->bio_offset == NOOFFSET) {
709 /* I/O was never started on nbio, must biodone(bio) */
710 biodone(bio);
711 return (0);
712 }
713 hp = VTOHP(ap->a_vp);
714 vn_strategy(hp->h_devvp, nbio);
715 return (0);
716 }
717
718 /*
719 * XXXXX do we need hpfsnode locking inside?
720 *
721 * hpfs_access(struct vnode *a_vp, int a_mode, struct ucred *a_cred)
722 */
723 int
hpfs_access(struct vop_access_args * ap)724 hpfs_access(struct vop_access_args *ap)
725 {
726 struct vnode *vp = ap->a_vp;
727 struct hpfsnode *hp = VTOHP(vp);
728
729 dprintf(("hpfs_access(0x%x):\n", hp->h_no));
730 return (vop_helper_access(ap, hp->h_uid, hp->h_gid, hp->h_mode, 0));
731 }
732
733 static int
hpfs_de_uiomove(int * error,struct hpfsmount * hpmp,struct hpfsdirent * dep,struct uio * uio)734 hpfs_de_uiomove(int *error, struct hpfsmount *hpmp, struct hpfsdirent *dep,
735 struct uio *uio)
736 {
737 char convname[HPFS_MAXFILENAME + 1];
738 int i, success;
739
740 dprintf(("[no: 0x%x, size: %d, name: %2d:%.*s, flag: 0x%x] ",
741 dep->de_fnode, dep->de_size, dep->de_namelen,
742 dep->de_namelen, dep->de_name, dep->de_flag));
743
744 /*strncpy(cde.d_name, dep->de_name, dep->de_namelen);*/
745 for (i=0; i<dep->de_namelen; i++)
746 convname[i] = hpfs_d2u(hpmp, dep->de_name[i]);
747 convname[dep->de_namelen] = '\0';
748
749 success = vop_write_dirent(error, uio, dep->de_fnode,
750 (dep->de_flag & DE_DIR) ? DT_DIR : DT_REG,
751 dep->de_namelen, convname);
752
753 dprintf(("[0x%zx] ", uio->uio_resid));
754 return (success);
755 }
756
757
758 /*
759 * hpfs_readdir(struct vnode *a_vp, struct uio *a_uio, struct ucred *a_cred,
760 * int *a_ncookies, off_t **cookies)
761 */
762 int
hpfs_readdir(struct vop_readdir_args * ap)763 hpfs_readdir(struct vop_readdir_args *ap)
764 {
765 struct vnode *vp = ap->a_vp;
766 struct hpfsnode *hp = VTOHP(vp);
767 struct hpfsmount *hpmp = hp->h_hpmp;
768 struct uio *uio = ap->a_uio;
769 int ncookies = 0, i, num, cnum;
770 int error = 0;
771 struct buf *bp;
772 struct dirblk *dp;
773 struct hpfsdirent *dep;
774 lsn_t olsn;
775 lsn_t lsn;
776 int level;
777
778 dprintf(("hpfs_readdir(0x%x, 0x%x, 0x%zx): ",
779 hp->h_no, (u_int32_t)uio->uio_offset, uio->uio_resid));
780
781 /*
782 * As we need to fake up . and .., and the remaining directory structure
783 * can't be expressed in one off_t as well, we just increment uio_offset
784 * by 1 for each entry.
785 *
786 * num is the entry we need to start reporting
787 * cnum is the current entry
788 */
789 if (uio->uio_offset < 0 || uio->uio_offset > INT_MAX)
790 return(EINVAL);
791 error = vn_lock(vp, LK_EXCLUSIVE | LK_RETRY | LK_FAILRECLAIM);
792 if (error)
793 return (error);
794
795 num = uio->uio_offset;
796 cnum = 0;
797
798 if( num <= cnum ) {
799 dprintf((". faked, "));
800 if (vop_write_dirent(&error, uio, hp->h_no, DT_DIR, 1, "."))
801 goto done;
802 if (error)
803 goto done;
804 ncookies ++;
805 }
806 cnum++;
807
808 if( num <= cnum ) {
809 dprintf((".. faked, "));
810 if (vop_write_dirent(&error, uio, hp->h_fn.fn_parent, DT_DIR, 2, ".."))
811 goto readdone;
812 if (error)
813 goto done;
814 ncookies ++;
815 }
816 cnum++;
817
818 lsn = ((alleaf_t *)hp->h_fn.fn_abd)->al_lsn;
819
820 olsn = 0;
821 level = 1;
822
823 dive:
824 dprintf(("[dive 0x%x] ", lsn));
825 error = bread(hp->h_devvp, dbtodoff(lsn), D_BSIZE, &bp);
826 if (error) {
827 brelse(bp);
828 goto done;
829 }
830
831 dp = (struct dirblk *) bp->b_data;
832 if (dp->d_magic != D_MAGIC) {
833 kprintf("hpfs_readdir: MAGIC DOESN'T MATCH\n");
834 brelse(bp);
835 error = EINVAL;
836 goto done;
837 }
838
839 dep = D_DIRENT(dp);
840
841 if (olsn) {
842 dprintf(("[restore 0x%x] ", olsn));
843
844 while(!(dep->de_flag & DE_END) ) {
845 if((dep->de_flag & DE_DOWN) &&
846 (olsn == DE_DOWNLSN(dep)))
847 break;
848 dep = (hpfsdirent_t *)((caddr_t)dep + dep->de_reclen);
849 }
850
851 if((dep->de_flag & DE_DOWN) && (olsn == DE_DOWNLSN(dep))) {
852 if (dep->de_flag & DE_END)
853 goto blockdone;
854
855 if (!(dep->de_flag & DE_SPECIAL)) {
856 if (num <= cnum) {
857 if (hpfs_de_uiomove(&error, hpmp, dep, uio)) {
858 brelse(bp);
859 dprintf(("[resid] "));
860 goto readdone;
861 }
862 if (error) {
863 brelse (bp);
864 goto done;
865 }
866 ncookies++;
867 }
868 cnum++;
869 }
870
871 dep = (hpfsdirent_t *)((caddr_t)dep + dep->de_reclen);
872 } else {
873 kprintf("hpfs_readdir: ERROR! oLSN not found\n");
874 brelse(bp);
875 error = EINVAL;
876 goto done;
877 }
878 }
879
880 olsn = 0;
881
882 while(!(dep->de_flag & DE_END)) {
883 if(dep->de_flag & DE_DOWN) {
884 lsn = DE_DOWNLSN(dep);
885 brelse(bp);
886 level++;
887 goto dive;
888 }
889
890 if (!(dep->de_flag & DE_SPECIAL)) {
891 if (num <= cnum) {
892 if (hpfs_de_uiomove(&error, hpmp, dep, uio)) {
893 brelse(bp);
894 dprintf(("[resid] "));
895 goto readdone;
896 }
897 if (error) {
898 brelse (bp);
899 goto done;
900 }
901 ncookies++;
902 }
903 cnum++;
904 }
905
906 dep = (hpfsdirent_t *)((caddr_t)dep + dep->de_reclen);
907 }
908
909 if(dep->de_flag & DE_DOWN) {
910 dprintf(("[enddive] "));
911 lsn = DE_DOWNLSN(dep);
912 brelse(bp);
913 level++;
914 goto dive;
915 }
916
917 blockdone:
918 dprintf(("[EOB] "));
919 olsn = lsn;
920 lsn = dp->d_parent;
921 brelse(bp);
922 level--;
923
924 dprintf(("[level %d] ", level));
925
926 if (level > 0)
927 goto dive; /* undive really */
928
929 if (ap->a_eofflag) {
930 dprintf(("[EOF] "));
931 *ap->a_eofflag = 1;
932 }
933
934 readdone:
935 uio->uio_offset = cnum;
936 dprintf(("[readdone]\n"));
937 if (!error && ap->a_ncookies != NULL) {
938 off_t *cookies;
939 off_t *cookiep;
940
941 dprintf(("%d cookies, ",ncookies));
942 if (uio->uio_segflg != UIO_SYSSPACE || uio->uio_iovcnt != 1)
943 panic("hpfs_readdir: unexpected uio from NFS server");
944 cookies = kmalloc(ncookies * sizeof(off_t), M_TEMP, M_WAITOK);
945 for (cookiep = cookies, i=0; i < ncookies; i++)
946 *cookiep++ = ++num;
947
948 *ap->a_ncookies = ncookies;
949 *ap->a_cookies = cookies;
950 }
951
952 done:
953 vn_unlock(ap->a_vp);
954 return (error);
955 }
956
957 /*
958 * hpfs_lookup(struct vnode *a_dvp, struct vnode **a_vpp,
959 * struct componentname *a_cnp)
960 */
961 int
hpfs_lookup(struct vop_old_lookup_args * ap)962 hpfs_lookup(struct vop_old_lookup_args *ap)
963 {
964 struct vnode *dvp = ap->a_dvp;
965 struct hpfsnode *dhp = VTOHP(dvp);
966 struct hpfsmount *hpmp = dhp->h_hpmp;
967 struct componentname *cnp = ap->a_cnp;
968 struct ucred *cred = cnp->cn_cred;
969 struct vnode **vpp = ap->a_vpp;
970 int error;
971 int nameiop = cnp->cn_nameiop;
972 int flags = cnp->cn_flags;
973 int lockparent = flags & CNP_LOCKPARENT;
974 #ifdef HPFS_DEBUG
975 int wantparent = flags & (CNP_LOCKPARENT | CNP_WANTPARENT);
976 #endif
977 *vpp = NULL;
978 dprintf(("hpfs_lookup(0x%x, %s, %ld, %d, %d): \n",
979 dhp->h_no, cnp->cn_nameptr, cnp->cn_namelen,
980 lockparent, wantparent));
981
982 if (nameiop != NAMEI_CREATE && nameiop != NAMEI_DELETE && nameiop != NAMEI_LOOKUP) {
983 kprintf("hpfs_lookup: LOOKUP, DELETE and CREATE are only supported\n");
984 return (EOPNOTSUPP);
985 }
986
987 error = VOP_EACCESS(dvp, VEXEC, cred);
988 if(error)
989 return (error);
990
991 if( (cnp->cn_namelen == 1) &&
992 !strncmp(cnp->cn_nameptr,".",1) ) {
993 dprintf(("hpfs_lookup(0x%x,...): . faked\n",dhp->h_no));
994
995 vref(dvp);
996 *vpp = dvp;
997
998 return (0);
999 } else if( (cnp->cn_namelen == 2) &&
1000 !strncmp(cnp->cn_nameptr,"..",2) && (flags & CNP_ISDOTDOT) ) {
1001 dprintf(("hpfs_lookup(0x%x,...): .. faked (0x%x)\n",
1002 dhp->h_no, dhp->h_fn.fn_parent));
1003
1004 VOP__UNLOCK(dvp, 0);
1005
1006 error = VFS_VGET(hpmp->hpm_mp, NULL,
1007 dhp->h_fn.fn_parent, vpp);
1008 if (error) {
1009 VOP__LOCK(dvp, 0);
1010 return(error);
1011 }
1012
1013 if (lockparent && (error = VOP__LOCK(dvp, 0))) {
1014 vput(*vpp);
1015 return (error);
1016 }
1017 return (error);
1018 } else {
1019 struct buf *bp;
1020 struct hpfsdirent *dep;
1021 struct hpfsnode *hp;
1022
1023 error = hpfs_genlookupbyname(dhp,
1024 cnp->cn_nameptr, cnp->cn_namelen, &bp, &dep);
1025 if (error) {
1026 if (error == ENOENT &&
1027 (nameiop == NAMEI_CREATE || nameiop == NAMEI_RENAME)) {
1028 if(!lockparent) {
1029 cnp->cn_flags |= CNP_PDIRUNLOCK;
1030 VOP__UNLOCK(dvp, 0);
1031 }
1032 return (EJUSTRETURN);
1033 }
1034
1035 return (error);
1036 }
1037
1038 dprintf(("hpfs_lookup: fnode: 0x%x, CPID: 0x%x\n",
1039 dep->de_fnode, dep->de_cpid));
1040
1041 if (nameiop == NAMEI_DELETE) {
1042 error = VOP_EACCESS(dvp, VWRITE, cred);
1043 if (error) {
1044 brelse(bp);
1045 return (error);
1046 }
1047 }
1048
1049 if (dhp->h_no == dep->de_fnode) {
1050 brelse(bp);
1051 vref(dvp);
1052 *vpp = dvp;
1053 return (0);
1054 }
1055
1056 error = VFS_VGET(hpmp->hpm_mp, NULL, dep->de_fnode, vpp);
1057 if (error) {
1058 kprintf("hpfs_lookup: VFS_VGET FAILED %d\n", error);
1059 brelse(bp);
1060 return(error);
1061 }
1062
1063 hp = VTOHP(*vpp);
1064
1065 hp->h_mtime = dep->de_mtime;
1066 hp->h_ctime = dep->de_ctime;
1067 hp->h_atime = dep->de_atime;
1068 bcopy(dep->de_name, hp->h_name, dep->de_namelen);
1069 hp->h_name[dep->de_namelen] = '\0';
1070 hp->h_namelen = dep->de_namelen;
1071 hp->h_flag |= H_PARVALID;
1072
1073 brelse(bp);
1074
1075 if(!lockparent) {
1076 cnp->cn_flags |= CNP_PDIRUNLOCK;
1077 VOP__UNLOCK(dvp, 0);
1078 }
1079 }
1080 return (error);
1081 }
1082
1083 /*
1084 * hpfs_remove(struct vnode *a_dvp, struct vnode *a_vp,
1085 * struct componentname *a_cnp)
1086 */
1087 int
hpfs_remove(struct vop_old_remove_args * ap)1088 hpfs_remove(struct vop_old_remove_args *ap)
1089 {
1090 int error;
1091
1092 dprintf(("hpfs_remove(0x%x, %s, %ld): \n", VTOHP(ap->a_vp)->h_no,
1093 ap->a_cnp->cn_nameptr, ap->a_cnp->cn_namelen));
1094
1095 if (ap->a_vp->v_type == VDIR)
1096 return (EPERM);
1097
1098 error = hpfs_removefnode (ap->a_dvp, ap->a_vp, ap->a_cnp);
1099 return (error);
1100 }
1101
1102 /*
1103 * hpfs_create(struct vnode *a_dvp, struct vnode **a_vpp,
1104 * struct componentname *a_cnp, struct vattr *a_vap)
1105 */
1106 int
hpfs_create(struct vop_old_create_args * ap)1107 hpfs_create(struct vop_old_create_args *ap)
1108 {
1109 int error;
1110
1111 dprintf(("hpfs_create(0x%x, %s, %ld): \n", VTOHP(ap->a_dvp)->h_no,
1112 ap->a_cnp->cn_nameptr, ap->a_cnp->cn_namelen));
1113
1114 error = hpfs_makefnode (ap->a_dvp, ap->a_vpp, ap->a_cnp, ap->a_vap);
1115
1116 return (error);
1117 }
1118
1119 /*
1120 * Return POSIX pathconf information applicable to NTFS filesystem
1121 *
1122 * hpfs_pathconf(struct vnode *a_vp, int a_name, t *a_retval)
1123 */
1124 int
hpfs_pathconf(struct vop_pathconf_args * ap)1125 hpfs_pathconf(struct vop_pathconf_args *ap)
1126 {
1127 switch (ap->a_name) {
1128 case _PC_LINK_MAX:
1129 *ap->a_retval = 1;
1130 return (0);
1131 case _PC_NAME_MAX:
1132 *ap->a_retval = HPFS_MAXFILENAME;
1133 return (0);
1134 case _PC_PATH_MAX:
1135 *ap->a_retval = PATH_MAX;
1136 return (0);
1137 case _PC_CHOWN_RESTRICTED:
1138 *ap->a_retval = 1;
1139 return (0);
1140 case _PC_NO_TRUNC:
1141 *ap->a_retval = 0;
1142 return (0);
1143 #if defined(__NetBSD__)
1144 case _PC_SYNC_IO:
1145 *ap->a_retval = 1;
1146 return (0);
1147 case _PC_FILESIZEBITS:
1148 *ap->a_retval = 32;
1149 return (0);
1150 #endif
1151 default:
1152 return (EINVAL);
1153 }
1154 /* NOTREACHED */
1155 }
1156
1157
1158 /*
1159 * Global vfs data structures
1160 */
1161
1162 struct vop_ops hpfs_vnode_vops = {
1163 .vop_default = vop_defaultop,
1164 .vop_getattr = hpfs_getattr,
1165 .vop_setattr = hpfs_setattr,
1166 .vop_inactive = hpfs_inactive,
1167 .vop_reclaim = hpfs_reclaim,
1168 .vop_print = hpfs_print,
1169 .vop_old_create = hpfs_create,
1170 .vop_old_remove = hpfs_remove,
1171 .vop_old_lookup = hpfs_lookup,
1172 .vop_access = hpfs_access,
1173 .vop_readdir = hpfs_readdir,
1174 .vop_fsync = hpfs_fsync,
1175 .vop_bmap = hpfs_bmap,
1176 .vop_getpages = vop_stdgetpages,
1177 .vop_putpages = vop_stdputpages,
1178 .vop_strategy = hpfs_strategy,
1179 .vop_read = hpfs_read,
1180 .vop_write = hpfs_write,
1181 .vop_ioctl = hpfs_ioctl,
1182 .vop_pathconf = hpfs_pathconf
1183 };
1184
1185