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: releng/6.0/sys/fs/hpfs/hpfs_vnops.c 145006 2005-04-13 10:59:09Z jeff $
27 */
28
29 #include <sys/param.h>
30 #include <sys/systm.h>
31 #include <sys/kernel.h>
32 #include <sys/proc.h>
33 #include <sys/conf.h>
34 #include <sys/time.h>
35 #include <sys/types.h>
36 #include <sys/stat.h>
37 #include <sys/vnode.h>
38 #include <sys/mount.h>
39 #include <sys/namei.h>
40 #include <sys/malloc.h>
41 #include <sys/bio.h>
42 #include <sys/buf.h>
43 #include <sys/dirent.h>
44
45 #include <vm/vm.h>
46 #include <vm/vm_param.h>
47 #include <vm/vm_page.h>
48 #include <vm/vm_object.h>
49 #include <vm/vm_pager.h>
50 #include <vm/vnode_pager.h>
51 #include <vm/vm_extern.h>
52
53 #include <sys/unistd.h> /* for pathconf(2) constants */
54
55 #include <fs/hpfs/hpfs.h>
56 #include <fs/hpfs/hpfsmount.h>
57 #include <fs/hpfs/hpfs_subr.h>
58 #include <fs/hpfs/hpfs_ioctl.h>
59
60 static int hpfs_de_uiomove(struct hpfsmount *, struct hpfsdirent *,
61 struct uio *);
62 static vop_ioctl_t hpfs_ioctl;
63 static vop_read_t hpfs_read;
64 static vop_write_t hpfs_write;
65 static vop_getattr_t hpfs_getattr;
66 static vop_setattr_t hpfs_setattr;
67 static vop_inactive_t hpfs_inactive;
68 static vop_print_t hpfs_print;
69 static vop_reclaim_t hpfs_reclaim;
70 static vop_strategy_t hpfs_strategy;
71 static vop_access_t hpfs_access;
72 static vop_open_t hpfs_open;
73 static vop_close_t hpfs_close;
74 static vop_readdir_t hpfs_readdir;
75 static vop_cachedlookup_t hpfs_lookup;
76 static vop_create_t hpfs_create;
77 static vop_remove_t hpfs_remove;
78 static vop_bmap_t hpfs_bmap;
79 static vop_fsync_t hpfs_fsync;
80 static vop_pathconf_t hpfs_pathconf;
81
82 static int
83 hpfs_fsync(ap)
84 struct vop_fsync_args /* {
85 struct vnode *a_vp;
86 struct ucred *a_cred;
87 int a_waitfor;
88 struct thread *a_td;
89 } */ *ap;
90 {
91 /*
92 * Flush our dirty buffers.
93 */
94 vop_stdfsync(ap);
95
96 /*
97 * Write out the on-disc version of the vnode.
98 */
99 return hpfs_update(VTOHP(ap->a_vp));
100 }
101
102 static int
103 hpfs_ioctl (
104 struct vop_ioctl_args /* {
105 struct vnode *a_vp;
106 u_long a_command;
107 caddr_t a_data;
108 int a_fflag;
109 struct ucred *a_cred;
110 struct thread *a_td;
111 } */ *ap)
112 {
113 register struct vnode *vp = ap->a_vp;
114 register struct hpfsnode *hp = VTOHP(vp);
115 int error;
116
117 printf("hpfs_ioctl(0x%x, 0x%lx, 0x%p, 0x%x): ",
118 hp->h_no, ap->a_command, ap->a_data, ap->a_fflag);
119
120 switch (ap->a_command) {
121 case HPFSIOCGEANUM: {
122 u_long eanum;
123 u_long passed;
124 struct ea *eap;
125
126 eanum = 0;
127
128 if (hp->h_fn.fn_ealen > 0) {
129 eap = (struct ea *)&(hp->h_fn.fn_int);
130 passed = 0;
131
132 while (passed < hp->h_fn.fn_ealen) {
133
134 printf("EAname: %s\n", EA_NAME(eap));
135
136 eanum++;
137 passed += sizeof(struct ea) +
138 eap->ea_namelen + 1 + eap->ea_vallen;
139 eap = (struct ea *)((caddr_t)hp->h_fn.fn_int +
140 passed);
141 }
142 error = 0;
143 } else {
144 error = ENOENT;
145 }
146
147 printf("%lu eas\n", eanum);
148
149 *(u_long *)ap->a_data = eanum;
150
151 break;
152 }
153 case HPFSIOCGEASZ: {
154 u_long eanum;
155 u_long passed;
156 struct ea *eap;
157
158 printf("EA%ld\n", *(u_long *)ap->a_data);
159
160 eanum = 0;
161 if (hp->h_fn.fn_ealen > 0) {
162 eap = (struct ea *)&(hp->h_fn.fn_int);
163 passed = 0;
164
165 error = ENOENT;
166 while (passed < hp->h_fn.fn_ealen) {
167 printf("EAname: %s\n", EA_NAME(eap));
168
169 if (eanum == *(u_long *)ap->a_data) {
170 *(u_long *)ap->a_data =
171 eap->ea_namelen + 1 +
172 eap->ea_vallen;
173
174 error = 0;
175 break;
176 }
177
178 eanum++;
179 passed += sizeof(struct ea) +
180 eap->ea_namelen + 1 + eap->ea_vallen;
181 eap = (struct ea *)((caddr_t)hp->h_fn.fn_int +
182 passed);
183 }
184 } else {
185 error = ENOENT;
186 }
187
188 break;
189 }
190 case HPFSIOCRDEA: {
191 u_long eanum;
192 u_long passed;
193 struct hpfs_rdea *rdeap;
194 struct ea *eap;
195
196 rdeap = (struct hpfs_rdea *)ap->a_data;
197 printf("EA%ld\n", rdeap->ea_no);
198
199 eanum = 0;
200 if (hp->h_fn.fn_ealen > 0) {
201 eap = (struct ea *)&(hp->h_fn.fn_int);
202 passed = 0;
203
204 error = ENOENT;
205 while (passed < hp->h_fn.fn_ealen) {
206 printf("EAname: %s\n", EA_NAME(eap));
207
208 if (eanum == rdeap->ea_no) {
209 rdeap->ea_sz = eap->ea_namelen + 1 +
210 eap->ea_vallen;
211 copyout(EA_NAME(eap),rdeap->ea_data,
212 rdeap->ea_sz);
213 error = 0;
214 break;
215 }
216
217 eanum++;
218 passed += sizeof(struct ea) +
219 eap->ea_namelen + 1 + eap->ea_vallen;
220 eap = (struct ea *)((caddr_t)hp->h_fn.fn_int +
221 passed);
222 }
223 } else {
224 error = ENOENT;
225 }
226
227 break;
228 }
229 default:
230 error = ENOTTY;
231 break;
232 }
233 return (error);
234 }
235
236 /*
237 * Map file offset to disk offset.
238 */
239 int
240 hpfs_bmap(ap)
241 struct vop_bmap_args /* {
242 struct vnode *a_vp;
243 daddr_t a_bn;
244 struct bufobj **a_bop;
245 daddr_t *a_bnp;
246 int *a_runp;
247 int *a_runb;
248 } */ *ap;
249 {
250 register struct hpfsnode *hp = VTOHP(ap->a_vp);
251 daddr_t blkno;
252 int error;
253
254 if (ap->a_bop != NULL)
255 *ap->a_bop = &hp->h_devvp->v_bufobj;
256 if (ap->a_runb != NULL)
257 *ap->a_runb = 0;
258 if (ap->a_bnp == NULL)
259 return (0);
260
261 dprintf(("hpfs_bmap(0x%x, 0x%x): ",hp->h_no, ap->a_bn));
262
263 error = hpfs_hpbmap (hp, ap->a_bn, &blkno, ap->a_runp);
264 *ap->a_bnp = blkno;
265
266 return (error);
267 }
268
269 static int
270 hpfs_read(ap)
271 struct vop_read_args /* {
272 struct vnode *a_vp;
273 struct uio *a_uio;
274 int a_ioflag;
275 struct ucred *a_cred;
276 } */ *ap;
277 {
278 register struct vnode *vp = ap->a_vp;
279 register struct hpfsnode *hp = VTOHP(vp);
280 struct uio *uio = ap->a_uio;
281 struct buf *bp;
282 u_int xfersz, toread;
283 u_int off;
284 daddr_t lbn, bn;
285 int resid;
286 int runl;
287 int error = 0;
288
289 resid = min (uio->uio_resid, hp->h_fn.fn_size - uio->uio_offset);
290
291 dprintf(("hpfs_read(0x%x, off: %d resid: %d, segflg: %d): [resid: 0x%x]\n",hp->h_no,(u_int32_t)uio->uio_offset,uio->uio_resid,uio->uio_segflg, resid));
292
293 while (resid) {
294 lbn = uio->uio_offset >> DEV_BSHIFT;
295 off = uio->uio_offset & (DEV_BSIZE - 1);
296 dprintf(("hpfs_read: resid: 0x%x lbn: 0x%x off: 0x%x\n",
297 uio->uio_resid, lbn, off));
298 error = hpfs_hpbmap(hp, lbn, &bn, &runl);
299 if (error)
300 return (error);
301
302 toread = min(off + resid, min(DFLTPHYS, (runl+1)*DEV_BSIZE));
303 xfersz = (toread + DEV_BSIZE - 1) & ~(DEV_BSIZE - 1);
304 dprintf(("hpfs_read: bn: 0x%x (0x%x) toread: 0x%x (0x%x)\n",
305 bn, runl, toread, xfersz));
306
307 if (toread == 0)
308 break;
309
310 error = bread(hp->h_devvp, bn, xfersz, NOCRED, &bp);
311 if (error) {
312 brelse(bp);
313 break;
314 }
315
316 error = uiomove(bp->b_data + off, toread - off, uio);
317 if(error) {
318 brelse(bp);
319 break;
320 }
321 brelse(bp);
322 resid -= toread;
323 }
324 dprintf(("hpfs_read: successful\n"));
325 return (error);
326 }
327
328 static int
329 hpfs_write(ap)
330 struct vop_write_args /* {
331 struct vnode *a_vp;
332 struct uio *a_uio;
333 int a_ioflag;
334 struct ucred *a_cred;
335 } */ *ap;
336 {
337 register struct vnode *vp = ap->a_vp;
338 register struct hpfsnode *hp = VTOHP(vp);
339 struct uio *uio = ap->a_uio;
340 struct buf *bp;
341 u_int xfersz, towrite;
342 u_int off;
343 daddr_t lbn, bn;
344 int runl;
345 int error = 0;
346
347 dprintf(("hpfs_write(0x%x, off: %d resid: %d, segflg: %d):\n",hp->h_no,(u_int32_t)uio->uio_offset,uio->uio_resid,uio->uio_segflg));
348
349 if (ap->a_ioflag & IO_APPEND) {
350 dprintf(("hpfs_write: APPEND mode\n"));
351 uio->uio_offset = hp->h_fn.fn_size;
352 }
353 if (uio->uio_offset + uio->uio_resid > hp->h_fn.fn_size) {
354 error = hpfs_extend (hp, uio->uio_offset + uio->uio_resid);
355 if (error) {
356 printf("hpfs_write: hpfs_extend FAILED %d\n", error);
357 return (error);
358 }
359 }
360
361 while (uio->uio_resid) {
362 lbn = uio->uio_offset >> DEV_BSHIFT;
363 off = uio->uio_offset & (DEV_BSIZE - 1);
364 dprintf(("hpfs_write: resid: 0x%x lbn: 0x%x off: 0x%x\n",
365 uio->uio_resid, lbn, off));
366 error = hpfs_hpbmap(hp, lbn, &bn, &runl);
367 if (error)
368 return (error);
369
370 towrite = min(off + uio->uio_resid, min(DFLTPHYS, (runl+1)*DEV_BSIZE));
371 xfersz = (towrite + DEV_BSIZE - 1) & ~(DEV_BSIZE - 1);
372 dprintf(("hpfs_write: bn: 0x%x (0x%x) towrite: 0x%x (0x%x)\n",
373 bn, runl, towrite, xfersz));
374
375 if ((off == 0) && (towrite == xfersz)) {
376 bp = getblk(hp->h_devvp, bn, xfersz, 0, 0, 0);
377 clrbuf(bp);
378 } else {
379 error = bread(hp->h_devvp, bn, xfersz, NOCRED, &bp);
380 if (error) {
381 brelse(bp);
382 return (error);
383 }
384 }
385
386 error = uiomove(bp->b_data + off, towrite - off, uio);
387 if(error) {
388 brelse(bp);
389 return (error);
390 }
391
392 if (ap->a_ioflag & IO_SYNC)
393 bwrite(bp);
394 else
395 bawrite(bp);
396 }
397
398 dprintf(("hpfs_write: successful\n"));
399 return (0);
400 }
401
402 /*
403 * XXXXX do we need hpfsnode locking inside?
404 */
405 static int
406 hpfs_getattr(ap)
407 struct vop_getattr_args /* {
408 struct vnode *a_vp;
409 struct vattr *a_vap;
410 struct ucred *a_cred;
411 struct thread *a_td;
412 } */ *ap;
413 {
414 register struct vnode *vp = ap->a_vp;
415 register struct hpfsnode *hp = VTOHP(vp);
416 register struct vattr *vap = ap->a_vap;
417 int error;
418
419 dprintf(("hpfs_getattr(0x%x):\n", hp->h_no));
420
421 vap->va_fsid = dev2udev(hp->h_dev);
422 vap->va_fileid = hp->h_no;
423 vap->va_mode = hp->h_mode;
424 vap->va_nlink = 1;
425 vap->va_uid = hp->h_uid;
426 vap->va_gid = hp->h_gid;
427 vap->va_rdev = 0; /* XXX UNODEV ? */
428 vap->va_size = hp->h_fn.fn_size;
429 vap->va_bytes = ((hp->h_fn.fn_size + DEV_BSIZE-1) & ~(DEV_BSIZE-1)) +
430 DEV_BSIZE;
431
432 if (!(hp->h_flag & H_PARVALID)) {
433 error = hpfs_validateparent(hp);
434 if (error)
435 return (error);
436 }
437 vap->va_atime = hpfstimetounix(hp->h_atime);
438 vap->va_mtime = hpfstimetounix(hp->h_mtime);
439 vap->va_ctime = hpfstimetounix(hp->h_ctime);
440
441 vap->va_flags = 0;
442 vap->va_gen = 0;
443 vap->va_blocksize = DEV_BSIZE;
444 vap->va_type = vp->v_type;
445 vap->va_filerev = 0;
446
447 return (0);
448 }
449
450 /*
451 * XXXXX do we need hpfsnode locking inside?
452 */
453 static int
454 hpfs_setattr(ap)
455 struct vop_setattr_args /* {
456 struct vnode *a_vp;
457 struct vattr *a_vap;
458 struct ucred *a_cred;
459 struct thread *a_td;
460 } */ *ap;
461 {
462 struct vnode *vp = ap->a_vp;
463 struct hpfsnode *hp = VTOHP(vp);
464 struct vattr *vap = ap->a_vap;
465 struct ucred *cred = ap->a_cred;
466 struct thread *td = ap->a_td;
467 int error;
468
469 dprintf(("hpfs_setattr(0x%x):\n", hp->h_no));
470
471 /*
472 * Check for unsettable attributes.
473 */
474 if ((vap->va_type != VNON) || (vap->va_nlink != VNOVAL) ||
475 (vap->va_fsid != VNOVAL) || (vap->va_fileid != VNOVAL) ||
476 (vap->va_blocksize != VNOVAL) || (vap->va_rdev != VNOVAL) ||
477 (vap->va_bytes != VNOVAL) || (vap->va_gen != VNOVAL)) {
478 dprintf(("hpfs_setattr: changing nonsettable attr\n"));
479 return (EINVAL);
480 }
481
482 /* Can't change flags XXX Could be implemented */
483 if (vap->va_flags != VNOVAL) {
484 printf("hpfs_setattr: FLAGS CANNOT BE SET\n");
485 return (EINVAL);
486 }
487
488 /* Can't change uid/gid XXX Could be implemented */
489 if (vap->va_uid != (uid_t)VNOVAL || vap->va_gid != (gid_t)VNOVAL) {
490 printf("hpfs_setattr: UID/GID CANNOT BE SET\n");
491 return (EINVAL);
492 }
493
494 /* Can't change mode XXX Could be implemented */
495 if (vap->va_mode != (mode_t)VNOVAL) {
496 printf("hpfs_setattr: MODE CANNOT BE SET\n");
497 return (EINVAL);
498 }
499
500 /* Update times */
501 if (vap->va_atime.tv_sec != VNOVAL || vap->va_mtime.tv_sec != VNOVAL) {
502 if (vp->v_mount->mnt_flag & MNT_RDONLY)
503 return (EROFS);
504 if (cred->cr_uid != hp->h_uid &&
505 (error = suser_cred(cred, SUSER_ALLOWJAIL)) &&
506 ((vap->va_vaflags & VA_UTIMES_NULL) == 0 ||
507 (error = VOP_ACCESS(vp, VWRITE, cred, td))))
508 return (error);
509 if (vap->va_atime.tv_sec != VNOVAL)
510 hp->h_atime = vap->va_atime.tv_sec;
511 if (vap->va_mtime.tv_sec != VNOVAL)
512 hp->h_mtime = vap->va_mtime.tv_sec;
513
514 hp->h_flag |= H_PARCHANGE;
515 }
516
517 if (vap->va_size != VNOVAL) {
518 switch (vp->v_type) {
519 case VDIR:
520 return (EISDIR);
521 case VREG:
522 if (vp->v_mount->mnt_flag & MNT_RDONLY)
523 return (EROFS);
524 break;
525 default:
526 printf("hpfs_setattr: WRONG v_type\n");
527 return (EINVAL);
528 }
529
530 if (vap->va_size < hp->h_fn.fn_size) {
531 error = vtruncbuf(vp, cred, td, vap->va_size, DEV_BSIZE);
532 if (error)
533 return (error);
534 error = hpfs_truncate(hp, vap->va_size);
535 if (error)
536 return (error);
537
538 } else if (vap->va_size > hp->h_fn.fn_size) {
539 vnode_pager_setsize(vp, vap->va_size);
540 error = hpfs_extend(hp, vap->va_size);
541 if (error)
542 return (error);
543 }
544 }
545
546 return (0);
547 }
548
549 /*
550 * Last reference to a node. If necessary, write or delete it.
551 */
552 int
553 hpfs_inactive(ap)
554 struct vop_inactive_args /* {
555 struct vnode *a_vp;
556 } */ *ap;
557 {
558 register struct vnode *vp = ap->a_vp;
559 register struct hpfsnode *hp = VTOHP(vp);
560 int error;
561
562 dprintf(("hpfs_inactive(0x%x): \n", hp->h_no));
563
564 if (hp->h_flag & H_CHANGE) {
565 dprintf(("hpfs_inactive: node changed, update\n"));
566 error = hpfs_update (hp);
567 if (error)
568 return (error);
569 }
570
571 if (hp->h_flag & H_PARCHANGE) {
572 dprintf(("hpfs_inactive: parent node changed, update\n"));
573 error = hpfs_updateparent (hp);
574 if (error)
575 return (error);
576 }
577
578 if (prtactive && vrefcnt(vp) != 0)
579 vprint("hpfs_inactive: pushing active", vp);
580
581 if (hp->h_flag & H_INVAL) {
582 vrecycle(vp, ap->a_td);
583 return (0);
584 }
585
586 return (0);
587 }
588
589 /*
590 * Reclaim an inode so that it can be used for other purposes.
591 */
592 int
593 hpfs_reclaim(ap)
594 struct vop_reclaim_args /* {
595 struct vnode *a_vp;
596 } */ *ap;
597 {
598 register struct vnode *vp = ap->a_vp;
599 register struct hpfsnode *hp = VTOHP(vp);
600
601 dprintf(("hpfs_reclaim(0x%x0): \n", hp->h_no));
602
603 vfs_hash_remove(vp);
604
605 mtx_destroy(&hp->h_interlock);
606
607 vp->v_data = NULL;
608 vnode_destroy_vobject(vp);
609
610 FREE(hp, M_HPFSNO);
611
612 return (0);
613 }
614
615 static int
616 hpfs_print(ap)
617 struct vop_print_args /* {
618 struct vnode *a_vp;
619 } */ *ap;
620 {
621 register struct vnode *vp = ap->a_vp;
622 register struct hpfsnode *hp = VTOHP(vp);
623
624 printf("\tino 0x%x\n", hp->h_no);
625 return (0);
626 }
627
628 /*
629 * Calculate the logical to physical mapping if not done already,
630 * then call the device strategy routine.
631 *
632 * In order to be able to swap to a file, the hpfs_hpbmap operation may not
633 * deadlock on memory. See hpfs_bmap() for details. XXXXXXX (not impl)
634 */
635 int
636 hpfs_strategy(ap)
637 struct vop_strategy_args /* {
638 struct buf *a_bp;
639 } */ *ap;
640 {
641 register struct buf *bp = ap->a_bp;
642 register struct vnode *vp = ap->a_vp;
643 register struct hpfsnode *hp = VTOHP(ap->a_vp);
644 daddr_t blkno;
645 struct bufobj *bo;
646 int error;
647
648 dprintf(("hpfs_strategy(): \n"));
649
650 if (vp->v_type == VBLK || vp->v_type == VCHR)
651 panic("hpfs_strategy: spec");
652 if (bp->b_blkno == bp->b_lblkno) {
653 error = hpfs_hpbmap (hp, bp->b_lblkno, &blkno, NULL);
654 bp->b_blkno = blkno;
655 if (error) {
656 printf("hpfs_strategy: hpfs_bpbmap FAILED %d\n", error);
657 bp->b_error = error;
658 bp->b_ioflags |= BIO_ERROR;
659 bufdone(bp);
660 return (error);
661 }
662 if ((long)bp->b_blkno == -1)
663 vfs_bio_clrbuf(bp);
664 }
665 if ((long)bp->b_blkno == -1) {
666 bufdone(bp);
667 return (0);
668 }
669 bp->b_iooffset = dbtob(bp->b_blkno);
670 bo = hp->h_hpmp->hpm_bo;
671 BO_STRATEGY(bo, bp);
672 return (0);
673 }
674
675 /*
676 * XXXXX do we need hpfsnode locking inside?
677 */
678 int
679 hpfs_access(ap)
680 struct vop_access_args /* {
681 struct vnode *a_vp;
682 int a_mode;
683 struct ucred *a_cred;
684 struct thread *a_td;
685 } */ *ap;
686 {
687 struct vnode *vp = ap->a_vp;
688 struct hpfsnode *hp = VTOHP(vp);
689 mode_t mode = ap->a_mode;
690
691 dprintf(("hpfs_access(0x%x):\n", hp->h_no));
692
693 /*
694 * Disallow write attempts on read-only filesystems;
695 * unless the file is a socket, fifo, or a block or
696 * character device resident on the filesystem.
697 */
698 if (mode & VWRITE) {
699 switch ((int)vp->v_type) {
700 case VDIR:
701 case VLNK:
702 case VREG:
703 if (vp->v_mount->mnt_flag & MNT_RDONLY)
704 return (EROFS);
705 break;
706 }
707 }
708
709 return (vaccess(vp->v_type, hp->h_mode, hp->h_uid, hp->h_gid,
710 ap->a_mode, ap->a_cred, NULL));
711 }
712
713 /*
714 * Open called.
715 *
716 * Nothing to do.
717 */
718 /* ARGSUSED */
719 static int
720 hpfs_open(ap)
721 struct vop_open_args /* {
722 struct vnode *a_vp;
723 int a_mode;
724 struct ucred *a_cred;
725 struct thread *a_td;
726 } */ *ap;
727 {
728 #if HPFS_DEBUG
729 register struct vnode *vp = ap->a_vp;
730 register struct hpfsnode *hp = VTOHP(vp);
731
732 printf("hpfs_open(0x%x):\n",hp->h_no);
733 #endif
734
735 /*
736 * Files marked append-only must be opened for appending.
737 */
738
739 return (0);
740 }
741
742 /*
743 * Close called.
744 *
745 * Update the times on the inode.
746 */
747 /* ARGSUSED */
748 static int
749 hpfs_close(ap)
750 struct vop_close_args /* {
751 struct vnode *a_vp;
752 int a_fflag;
753 struct ucred *a_cred;
754 struct thread *a_td;
755 } */ *ap;
756 {
757 #if HPFS_DEBUG
758 register struct vnode *vp = ap->a_vp;
759 register struct hpfsnode *hp = VTOHP(vp);
760
761 printf("hpfs_close: %d\n",hp->h_no);
762 #endif
763
764 return (0);
765 }
766
767 static int
768 hpfs_de_uiomove (
769 struct hpfsmount *hpmp,
770 struct hpfsdirent *dep,
771 struct uio *uio)
772 {
773 struct dirent cde;
774 int i, error;
775
776 dprintf(("[no: 0x%x, size: %d, name: %2d:%.*s, flag: 0x%x] ",
777 dep->de_fnode, dep->de_size, dep->de_namelen,
778 dep->de_namelen, dep->de_name, dep->de_flag));
779
780 /*strncpy(cde.d_name, dep->de_name, dep->de_namelen);*/
781 for (i=0; i<dep->de_namelen; i++)
782 cde.d_name[i] = hpfs_d2u(hpmp, dep->de_name[i]);
783
784 cde.d_name[dep->de_namelen] = '\0';
785 cde.d_namlen = dep->de_namelen;
786 cde.d_fileno = dep->de_fnode;
787 cde.d_type = (dep->de_flag & DE_DIR) ? DT_DIR : DT_REG;
788 cde.d_reclen = sizeof(struct dirent);
789
790 error = uiomove((char *)&cde, sizeof(struct dirent), uio);
791 if (error)
792 return (error);
793
794 dprintf(("[0x%x] ", uio->uio_resid));
795 return (error);
796 }
797
798
799 static struct dirent hpfs_de_dot =
800 { 0, sizeof(struct dirent), DT_DIR, 1, "." };
801 static struct dirent hpfs_de_dotdot =
802 { 0, sizeof(struct dirent), DT_DIR, 2, ".." };
803 int
804 hpfs_readdir(ap)
805 struct vop_readdir_args /* {
806 struct vnode *a_vp;
807 struct uio *a_uio;
808 struct ucred *a_cred;
809 int *a_ncookies;
810 u_int **cookies;
811 } */ *ap;
812 {
813 register struct vnode *vp = ap->a_vp;
814 register struct hpfsnode *hp = VTOHP(vp);
815 struct hpfsmount *hpmp = hp->h_hpmp;
816 struct uio *uio = ap->a_uio;
817 int ncookies = 0, i, num, cnum;
818 int error = 0;
819 off_t off;
820 struct buf *bp;
821 struct dirblk *dp;
822 struct hpfsdirent *dep;
823 lsn_t olsn;
824 lsn_t lsn;
825 int level;
826
827 dprintf(("hpfs_readdir(0x%x, 0x%x, 0x%x): ",hp->h_no,(u_int32_t)uio->uio_offset,uio->uio_resid));
828
829 off = uio->uio_offset;
830
831 if( uio->uio_offset < sizeof(struct dirent) ) {
832 dprintf((". faked, "));
833 hpfs_de_dot.d_fileno = hp->h_no;
834 error = uiomove((char *)&hpfs_de_dot,sizeof(struct dirent),uio);
835 if(error) {
836 return (error);
837 }
838
839 ncookies ++;
840 }
841
842 if( uio->uio_offset < 2 * sizeof(struct dirent) ) {
843 dprintf((".. faked, "));
844 hpfs_de_dotdot.d_fileno = hp->h_fn.fn_parent;
845
846 error = uiomove((char *)&hpfs_de_dotdot, sizeof(struct dirent),
847 uio);
848 if(error) {
849 return (error);
850 }
851
852 ncookies ++;
853 }
854
855 num = uio->uio_offset / sizeof(struct dirent) - 2;
856 cnum = 0;
857
858 lsn = ((alleaf_t *)hp->h_fn.fn_abd)->al_lsn;
859
860 olsn = 0;
861 level = 1;
862
863 dive:
864 dprintf(("[dive 0x%x] ", lsn));
865 error = bread(hp->h_devvp, lsn, D_BSIZE, NOCRED, &bp);
866 if (error) {
867 brelse(bp);
868 return (error);
869 }
870
871 dp = (struct dirblk *) bp->b_data;
872 if (dp->d_magic != D_MAGIC) {
873 printf("hpfs_readdir: MAGIC DOESN'T MATCH\n");
874 brelse(bp);
875 return (EINVAL);
876 }
877
878 dep = D_DIRENT(dp);
879
880 if (olsn) {
881 dprintf(("[restore 0x%x] ", olsn));
882
883 while(!(dep->de_flag & DE_END) ) {
884 if((dep->de_flag & DE_DOWN) &&
885 (olsn == DE_DOWNLSN(dep)))
886 break;
887 dep = (hpfsdirent_t *)((caddr_t)dep + dep->de_reclen);
888 }
889
890 if((dep->de_flag & DE_DOWN) && (olsn == DE_DOWNLSN(dep))) {
891 if (dep->de_flag & DE_END)
892 goto blockdone;
893
894 if (!(dep->de_flag & DE_SPECIAL)) {
895 if (num <= cnum) {
896 if (uio->uio_resid < sizeof(struct dirent)) {
897 brelse(bp);
898 dprintf(("[resid] "));
899 goto readdone;
900 }
901
902 error = hpfs_de_uiomove(hpmp, dep, uio);
903 if (error) {
904 brelse (bp);
905 return (error);
906 }
907 ncookies++;
908
909 if (uio->uio_resid < sizeof(struct dirent)) {
910 brelse(bp);
911 dprintf(("[resid] "));
912 goto readdone;
913 }
914 }
915 cnum++;
916 }
917
918 dep = (hpfsdirent_t *)((caddr_t)dep + dep->de_reclen);
919 } else {
920 printf("hpfs_readdir: ERROR! oLSN not found\n");
921 brelse(bp);
922 return (EINVAL);
923 }
924 }
925
926 olsn = 0;
927
928 while(!(dep->de_flag & DE_END)) {
929 if(dep->de_flag & DE_DOWN) {
930 lsn = DE_DOWNLSN(dep);
931 brelse(bp);
932 level++;
933 goto dive;
934 }
935
936 if (!(dep->de_flag & DE_SPECIAL)) {
937 if (num <= cnum) {
938 if (uio->uio_resid < sizeof(struct dirent)) {
939 brelse(bp);
940 dprintf(("[resid] "));
941 goto readdone;
942 }
943
944 error = hpfs_de_uiomove(hpmp, dep, uio);
945 if (error) {
946 brelse (bp);
947 return (error);
948 }
949 ncookies++;
950
951 if (uio->uio_resid < sizeof(struct dirent)) {
952 brelse(bp);
953 dprintf(("[resid] "));
954 goto readdone;
955 }
956 }
957 cnum++;
958 }
959
960 dep = (hpfsdirent_t *)((caddr_t)dep + dep->de_reclen);
961 }
962
963 if(dep->de_flag & DE_DOWN) {
964 dprintf(("[enddive] "));
965 lsn = DE_DOWNLSN(dep);
966 brelse(bp);
967 level++;
968 goto dive;
969 }
970
971 blockdone:
972 dprintf(("[EOB] "));
973 olsn = lsn;
974 lsn = dp->d_parent;
975 brelse(bp);
976 level--;
977
978 dprintf(("[level %d] ", level));
979
980 if (level > 0)
981 goto dive; /* undive really */
982
983 if (ap->a_eofflag) {
984 dprintf(("[EOF] "));
985 *ap->a_eofflag = 1;
986 }
987
988 readdone:
989 dprintf(("[readdone]\n"));
990 if (!error && ap->a_ncookies != NULL) {
991 struct dirent* dpStart;
992 struct dirent* dp;
993 u_long *cookies;
994 u_long *cookiep;
995
996 dprintf(("%d cookies, ",ncookies));
997 if (uio->uio_segflg != UIO_SYSSPACE || uio->uio_iovcnt != 1)
998 panic("hpfs_readdir: unexpected uio from NFS server");
999 dpStart = (struct dirent *)
1000 ((caddr_t)uio->uio_iov->iov_base -
1001 (uio->uio_offset - off));
1002 MALLOC(cookies, u_long *, ncookies * sizeof(u_long),
1003 M_TEMP, M_WAITOK);
1004 for (dp = dpStart, cookiep = cookies, i=0;
1005 i < ncookies;
1006 dp = (struct dirent *)((caddr_t) dp + dp->d_reclen), i++) {
1007 off += dp->d_reclen;
1008 *cookiep++ = (u_int) off;
1009 }
1010 *ap->a_ncookies = ncookies;
1011 *ap->a_cookies = cookies;
1012 }
1013
1014 return (0);
1015 }
1016
1017 int
1018 hpfs_lookup(ap)
1019 struct vop_cachedlookup_args /* {
1020 struct vnode *a_dvp;
1021 struct vnode **a_vpp;
1022 struct componentname *a_cnp;
1023 } */ *ap;
1024 {
1025 register struct vnode *dvp = ap->a_dvp;
1026 register struct hpfsnode *dhp = VTOHP(dvp);
1027 struct hpfsmount *hpmp = dhp->h_hpmp;
1028 struct componentname *cnp = ap->a_cnp;
1029 struct ucred *cred = cnp->cn_cred;
1030 int error;
1031 int nameiop = cnp->cn_nameiop;
1032 int flags = cnp->cn_flags;
1033 dprintf(("hpfs_lookup(0x%x, %s, %ld):\n",
1034 dhp->h_no, cnp->cn_nameptr, cnp->cn_namelen));
1035
1036 if (nameiop != CREATE && nameiop != DELETE && nameiop != LOOKUP) {
1037 printf("hpfs_lookup: LOOKUP, DELETE and CREATE are only supported\n");
1038 return (EOPNOTSUPP);
1039 }
1040
1041 error = VOP_ACCESS(dvp, VEXEC, cred, cnp->cn_thread);
1042 if(error)
1043 return (error);
1044
1045 if( (cnp->cn_namelen == 1) &&
1046 !strncmp(cnp->cn_nameptr,".",1) ) {
1047 dprintf(("hpfs_lookup(0x%x,...): . faked\n",dhp->h_no));
1048
1049 VREF(dvp);
1050 *ap->a_vpp = dvp;
1051
1052 return (0);
1053 } else if( (cnp->cn_namelen == 2) &&
1054 !strncmp(cnp->cn_nameptr,"..",2) && (flags & ISDOTDOT) ) {
1055 dprintf(("hpfs_lookup(0x%x,...): .. faked (0x%x)\n",
1056 dhp->h_no, dhp->h_fn.fn_parent));
1057
1058 if (VFS_VGET(hpmp->hpm_mp, dhp->h_fn.fn_parent,
1059 LK_NOWAIT | LK_EXCLUSIVE, ap->a_vpp)) {
1060 VOP_UNLOCK(dvp,0,cnp->cn_thread);
1061 error = VFS_VGET(hpmp->hpm_mp,
1062 dhp->h_fn.fn_parent, LK_EXCLUSIVE, ap->a_vpp);
1063 vn_lock(dvp, LK_EXCLUSIVE|LK_RETRY, cnp->cn_thread);
1064 if (error)
1065 return(error);
1066 }
1067 return (0);
1068 } else {
1069 struct buf *bp;
1070 struct hpfsdirent *dep;
1071 struct hpfsnode *hp;
1072
1073 error = hpfs_genlookupbyname(dhp,
1074 cnp->cn_nameptr, cnp->cn_namelen, &bp, &dep);
1075 if (error) {
1076 if ((error == ENOENT) && (flags & ISLASTCN) &&
1077 (nameiop == CREATE || nameiop == RENAME)) {
1078 cnp->cn_flags |= SAVENAME;
1079 return (EJUSTRETURN);
1080 }
1081
1082 return (error);
1083 }
1084
1085 dprintf(("hpfs_lookup: fnode: 0x%x, CPID: 0x%x\n",
1086 dep->de_fnode, dep->de_cpid));
1087
1088 if (nameiop == DELETE && (flags & ISLASTCN)) {
1089 error = VOP_ACCESS(dvp, VWRITE, cred, cnp->cn_thread);
1090 if (error) {
1091 brelse(bp);
1092 return (error);
1093 }
1094 }
1095
1096 if (dhp->h_no == dep->de_fnode) {
1097 brelse(bp);
1098 VREF(dvp);
1099 *ap->a_vpp = dvp;
1100 return (0);
1101 }
1102
1103 error = VFS_VGET(hpmp->hpm_mp, dep->de_fnode, LK_EXCLUSIVE,
1104 ap->a_vpp);
1105 if (error) {
1106 printf("hpfs_lookup: VFS_VGET FAILED %d\n", error);
1107 brelse(bp);
1108 return(error);
1109 }
1110
1111 hp = VTOHP(*ap->a_vpp);
1112
1113 hp->h_mtime = dep->de_mtime;
1114 hp->h_ctime = dep->de_ctime;
1115 hp->h_atime = dep->de_atime;
1116 bcopy(dep->de_name, hp->h_name, dep->de_namelen);
1117 hp->h_name[dep->de_namelen] = '\0';
1118 hp->h_namelen = dep->de_namelen;
1119 hp->h_flag |= H_PARVALID;
1120
1121 brelse(bp);
1122
1123 if ((flags & MAKEENTRY) &&
1124 (!(flags & ISLASTCN) ||
1125 (nameiop != DELETE && nameiop != CREATE)))
1126 cache_enter(dvp, *ap->a_vpp, cnp);
1127 }
1128 return (error);
1129 }
1130
1131 int
1132 hpfs_remove(ap)
1133 struct vop_remove_args /* {
1134 struct vnode *a_dvp;
1135 struct vnode *a_vp;
1136 struct componentname *a_cnp;
1137 } */ *ap;
1138 {
1139 int error;
1140
1141 dprintf(("hpfs_remove(0x%x, %s, %ld): \n", VTOHP(ap->a_vp)->h_no,
1142 ap->a_cnp->cn_nameptr, ap->a_cnp->cn_namelen));
1143
1144 if (ap->a_vp->v_type == VDIR)
1145 return (EPERM);
1146
1147 error = hpfs_removefnode (ap->a_dvp, ap->a_vp, ap->a_cnp);
1148 return (error);
1149 }
1150
1151 int
1152 hpfs_create(ap)
1153 struct vop_create_args /* {
1154 struct vnode *a_dvp;
1155 struct vnode **a_vpp;
1156 struct componentname *a_cnp;
1157 struct vattr *a_vap;
1158 } */ *ap;
1159 {
1160 int error;
1161
1162 dprintf(("hpfs_create(0x%x, %s, %ld): \n", VTOHP(ap->a_dvp)->h_no,
1163 ap->a_cnp->cn_nameptr, ap->a_cnp->cn_namelen));
1164
1165 if (!(ap->a_cnp->cn_flags & HASBUF))
1166 panic ("hpfs_create: no name\n");
1167
1168 error = hpfs_makefnode (ap->a_dvp, ap->a_vpp, ap->a_cnp, ap->a_vap);
1169
1170 return (error);
1171 }
1172
1173 /*
1174 * Return POSIX pathconf information applicable to NTFS filesystem
1175 */
1176 int
1177 hpfs_pathconf(ap)
1178 struct vop_pathconf_args /* {
1179 struct vnode *a_vp;
1180 int a_name;
1181 register_t *a_retval;
1182 } */ *ap;
1183 {
1184 switch (ap->a_name) {
1185 case _PC_LINK_MAX:
1186 *ap->a_retval = 1;
1187 return (0);
1188 case _PC_NAME_MAX:
1189 *ap->a_retval = HPFS_MAXFILENAME;
1190 return (0);
1191 case _PC_PATH_MAX:
1192 *ap->a_retval = PATH_MAX;
1193 return (0);
1194 case _PC_CHOWN_RESTRICTED:
1195 *ap->a_retval = 1;
1196 return (0);
1197 case _PC_NO_TRUNC:
1198 *ap->a_retval = 0;
1199 return (0);
1200 default:
1201 return (EINVAL);
1202 }
1203 /* NOTREACHED */
1204 }
1205
1206
1207 /*
1208 * Global vfs data structures
1209 */
1210 struct vop_vector hpfs_vnodeops = {
1211 .vop_default = &default_vnodeops,
1212
1213 .vop_access = hpfs_access,
1214 .vop_bmap = hpfs_bmap,
1215 .vop_cachedlookup = hpfs_lookup,
1216 .vop_close = hpfs_close,
1217 .vop_create = hpfs_create,
1218 .vop_fsync = hpfs_fsync,
1219 .vop_getattr = hpfs_getattr,
1220 .vop_inactive = hpfs_inactive,
1221 .vop_ioctl = hpfs_ioctl,
1222 .vop_lookup = vfs_cache_lookup,
1223 .vop_open = hpfs_open,
1224 .vop_pathconf = hpfs_pathconf,
1225 .vop_print = hpfs_print,
1226 .vop_read = hpfs_read,
1227 .vop_readdir = hpfs_readdir,
1228 .vop_reclaim = hpfs_reclaim,
1229 .vop_remove = hpfs_remove,
1230 .vop_setattr = hpfs_setattr,
1231 .vop_strategy = hpfs_strategy,
1232 .vop_write = hpfs_write,
1233 };
Cache object: e3893203a48ab6eb9b3da1a10decfc66
|