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