2 * Copyright (c) 1999 Boris Popov
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
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.
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
29 #include <sys/param.h>
30 #include <sys/systm.h>
31 #include <sys/kernel.h>
34 #include <sys/mount.h>
35 #include <sys/namei.h>
36 #include <sys/vnode.h>
37 #include <sys/dirent.h>
38 #include <sys/sysctl.h>
41 #include <vm/vm_page.h>
42 #include <vm/vm_extern.h>
43 #include <vm/vm_object.h>
44 #include <vm/vm_pager.h>
45 #include <vm/vnode_pager.h>
47 #include <netncp/ncp.h>
48 #include <netncp/ncp_conn.h>
49 #include <netncp/ncp_subr.h>
50 #include <netncp/ncp_ncp.h>
52 #include <fs/nwfs/nwfs.h>
53 #include <fs/nwfs/nwfs_node.h>
54 #include <fs/nwfs/nwfs_subr.h>
56 static int nwfs_fastlookup = 1;
58 SYSCTL_DECL(_vfs_nwfs);
59 SYSCTL_INT(_vfs_nwfs, OID_AUTO, fastlookup, CTLFLAG_RW, &nwfs_fastlookup, 0, "");
62 extern int nwfs_pbuf_freecnt;
64 #define DE_SIZE (sizeof(struct dirent))
68 nwfs_readvdir(struct vnode *vp, struct uio *uio, struct ucred *cred) {
69 struct nwmount *nmp = VTONWFS(vp);
72 struct nwnode *np = VTONW(vp);
73 struct nw_entry_info fattr;
75 struct componentname cn;
79 NCPVNDEBUG("dirname='%s'\n",np->n_name);
80 if (uio->uio_resid < DE_SIZE || (uio->uio_offset < 0))
84 i = uio->uio_offset / DE_SIZE; /* offset in directory */
86 error = ncp_initsearch(vp, uio->uio_td, cred);
88 NCPVNDEBUG("cannot initialize search, error=%d",error);
93 for (; uio->uio_resid >= DE_SIZE; i++) {
94 bzero((char *) &dp, DE_SIZE);
95 dp.d_reclen = DE_SIZE;
99 dp.d_fileno = (i == 0) ? np->n_fid.f_id : np->n_parent.f_id;
100 if (!dp.d_fileno) dp.d_fileno = NWFS_ROOT_INO;
104 dp.d_name[i + 1] = '\0';
108 error = ncp_search_for_file_or_subdir(nmp, &np->n_seq, &fattr, uio->uio_td, cred);
109 if (error && error < 0x80) break;
110 dp.d_fileno = fattr.dirEntNum;
111 dp.d_type = (fattr.attributes & aDIR) ? DT_DIR : DT_REG;
112 dp.d_namlen = fattr.nameLen;
113 bcopy(fattr.entryName, dp.d_name, dp.d_namlen);
114 dp.d_name[dp.d_namlen] = '\0';
116 if (error && eofflag) {
123 if (nwfs_fastlookup && !error && i > 1) {
124 fid.f_id = fattr.dirEntNum;
125 fid.f_parent = np->n_fid.f_id;
126 error = nwfs_nget(vp->v_mount, fid, &fattr, vp, &newvp);
128 VTONW(newvp)->n_ctime = VTONW(newvp)->n_vattr.va_ctime.tv_sec;
129 cn.cn_nameptr = dp.d_name;
130 cn.cn_namelen = dp.d_namlen;
131 cache_enter(vp, newvp, &cn);
140 if ((error = uiomove(&dp, DE_SIZE, uio)))
144 uio->uio_offset = i * DE_SIZE;
149 nwfs_readvnode(struct vnode *vp, struct uio *uiop, struct ucred *cred) {
150 struct nwmount *nmp = VFSTONWFS(vp->v_mount);
151 struct nwnode *np = VTONW(vp);
156 if (vp->v_type != VREG && vp->v_type != VDIR) {
157 printf("%s: vn types other than VREG or VDIR are unsupported !\n",__func__);
160 if (uiop->uio_resid == 0) return 0;
161 if (uiop->uio_offset < 0) return EINVAL;
162 /* if (uiop->uio_offset + uiop->uio_resid > nmp->nm_maxfilesize)
165 if (vp->v_type == VDIR) {
166 error = nwfs_readvdir(vp, uiop, cred);
169 biosize = NWFSTOCONN(nmp)->buffer_size;
170 if (np->n_flag & NMODIFIED) {
171 nwfs_attr_cacheremove(vp);
172 error = VOP_GETATTR(vp, &vattr, cred);
173 if (error) return (error);
174 np->n_mtime = vattr.va_mtime.tv_sec;
176 error = VOP_GETATTR(vp, &vattr, cred);
177 if (error) return (error);
178 if (np->n_mtime != vattr.va_mtime.tv_sec) {
179 error = nwfs_vinvalbuf(vp, td);
180 if (error) return (error);
181 np->n_mtime = vattr.va_mtime.tv_sec;
184 error = ncp_read(NWFSTOCONN(nmp), &np->n_fh, uiop, cred);
189 nwfs_writevnode(vp, uiop, cred, ioflag)
195 struct nwmount *nmp = VTONWFS(vp);
196 struct nwnode *np = VTONW(vp);
198 /* struct vattr vattr;*/
201 if (vp->v_type != VREG) {
202 printf("%s: vn types other than VREG unsupported !\n",__func__);
205 NCPVNDEBUG("ofs=%d,resid=%d\n",(int)uiop->uio_offset, uiop->uio_resid);
206 if (uiop->uio_offset < 0) return EINVAL;
207 /* if (uiop->uio_offset + uiop->uio_resid > nmp->nm_maxfilesize)
210 if (ioflag & (IO_APPEND | IO_SYNC)) {
211 if (np->n_flag & NMODIFIED) {
212 nwfs_attr_cacheremove(vp);
213 error = nwfs_vinvalbuf(vp, td);
214 if (error) return (error);
216 if (ioflag & IO_APPEND) {
217 /* We can relay only on local information about file size,
218 * because until file is closed NetWare will not return
219 * the correct size. */
221 nwfs_attr_cacheremove(vp);
222 error = VOP_GETATTR(vp, &vattr, cred);
223 if (error) return (error);
225 uiop->uio_offset = np->n_size;
228 if (uiop->uio_resid == 0) return 0;
230 if (vn_rlimit_fsize(vp, uiop, td))
233 error = ncp_write(NWFSTOCONN(nmp), &np->n_fh, uiop, cred);
234 NCPVNDEBUG("after: ofs=%d,resid=%d\n",(int)uiop->uio_offset, uiop->uio_resid);
236 if (uiop->uio_offset > np->n_size) {
237 np->n_vattr.va_size = np->n_size = uiop->uio_offset;
238 vnode_pager_setsize(vp, np->n_size);
245 * Do an I/O operation to/from a cache block.
248 nwfs_doio(vp, bp, cr, td)
262 nmp = VFSTONWFS(vp->v_mount);
265 uiop->uio_iovcnt = 1;
266 uiop->uio_segflg = UIO_SYSSPACE;
268 if (bp->b_iocmd == BIO_READ) {
269 io.iov_len = uiop->uio_resid = bp->b_bcount;
270 io.iov_base = bp->b_data;
271 uiop->uio_rw = UIO_READ;
272 switch (vp->v_type) {
274 uiop->uio_offset = ((off_t)bp->b_blkno) * DEV_BSIZE;
275 error = ncp_read(NWFSTOCONN(nmp), &np->n_fh, uiop, cr);
278 if (uiop->uio_resid) {
279 int left = uiop->uio_resid;
280 int nread = bp->b_bcount - left;
282 bzero((char *)bp->b_data + nread, left);
286 nfsstats.readdir_bios++;
287 uiop->uio_offset = ((u_quad_t)bp->b_lblkno) * NFS_DIRBLKSIZ;
288 if (nmp->nm_flag & NFSMNT_RDIRPLUS) {
289 error = nfs_readdirplusrpc(vp, uiop, cr);
290 if (error == NFSERR_NOTSUPP)
291 nmp->nm_flag &= ~NFSMNT_RDIRPLUS;
293 if ((nmp->nm_flag & NFSMNT_RDIRPLUS) == 0)
294 error = nfs_readdirrpc(vp, uiop, cr);
295 if (error == 0 && uiop->uio_resid == bp->b_bcount)
296 bp->b_flags |= B_INVAL;
300 printf("nwfs_doio: type %x unexpected\n",vp->v_type);
304 bp->b_ioflags |= BIO_ERROR;
308 if (((bp->b_blkno * DEV_BSIZE) + bp->b_dirtyend) > np->n_size)
309 bp->b_dirtyend = np->n_size - (bp->b_blkno * DEV_BSIZE);
311 if (bp->b_dirtyend > bp->b_dirtyoff) {
312 io.iov_len = uiop->uio_resid = bp->b_dirtyend - bp->b_dirtyoff;
313 uiop->uio_offset = ((off_t)bp->b_blkno) * DEV_BSIZE + bp->b_dirtyoff;
314 io.iov_base = (char *)bp->b_data + bp->b_dirtyoff;
315 uiop->uio_rw = UIO_WRITE;
316 error = ncp_write(NWFSTOCONN(nmp), &np->n_fh, uiop, cr);
319 * For an interrupted write, the buffer is still valid
320 * and the write hasn't been pushed to the server yet,
321 * so we can't set BIO_ERROR and report the interruption
322 * by setting B_EINTR. For the B_ASYNC case, B_EINTR
323 * is not relevant, so the rpc attempt is essentially
324 * a noop. For the case of a V3 write rpc not being
325 * committed to stable storage, the block is still
326 * dirty and requires either a commit rpc or another
327 * write rpc with iomode == NFSV3WRITE_FILESYNC before
328 * the block is reused. This is indicated by setting
329 * the B_DELWRI and B_NEEDCOMMIT flags.
332 || (!error && (bp->b_flags & B_NEEDCOMMIT))) {
336 bp->b_flags &= ~(B_INVAL|B_NOCACHE);
337 if ((bp->b_flags & B_ASYNC) == 0)
338 bp->b_flags |= B_EINTR;
339 if ((bp->b_flags & B_PAGING) == 0) {
341 bp->b_flags &= ~B_DONE;
343 if ((bp->b_flags & B_ASYNC) == 0)
344 bp->b_flags |= B_EINTR;
348 bp->b_ioflags |= BIO_ERROR;
349 bp->b_error /*= np->n_error */= error;
350 /* np->n_flag |= NWRITEERR;*/
352 bp->b_dirtyoff = bp->b_dirtyend = 0;
360 bp->b_resid = uiop->uio_resid;
366 * Vnode op for VM getpages.
367 * Wish wish .... get rid from multiple IO routines
371 struct vop_getpages_args /* {
376 vm_ooffset_t a_offset;
380 return vop_stdgetpages(ap);(ap->a_vp, ap->a_m, ap->a_count,
382 int i, error, nextoff, size, toff, npages, count;
396 td = curthread; /* XXX */
397 cred = td->td_ucred; /* XXX */
399 nmp = VFSTONWFS(vp->v_mount);
403 if ((object = vp->v_object) == NULL) {
404 printf("nwfs_getpages: called with non-merged cache vnode??\n");
405 return VM_PAGER_ERROR;
408 bp = getpbuf(&nwfs_pbuf_freecnt);
409 npages = btoc(count);
410 kva = (vm_offset_t) bp->b_data;
411 pmap_qenter(kva, pages, npages);
413 iov.iov_base = (caddr_t) kva;
417 uio.uio_offset = IDX_TO_OFF(pages[0]->pindex);
418 uio.uio_resid = count;
419 uio.uio_segflg = UIO_SYSSPACE;
420 uio.uio_rw = UIO_READ;
423 error = ncp_read(NWFSTOCONN(nmp), &np->n_fh, &uio,cred);
424 pmap_qremove(kva, npages);
426 relpbuf(bp, &nwfs_pbuf_freecnt);
428 VM_OBJECT_LOCK(object);
429 if (error && (uio.uio_resid == count)) {
430 printf("nwfs_getpages: error %d\n",error);
431 for (i = 0; i < npages; i++) {
432 if (ap->a_reqpage != i) {
433 vm_page_lock(pages[i]);
434 vm_page_free(pages[i]);
435 vm_page_unlock(pages[i]);
438 VM_OBJECT_UNLOCK(object);
439 return VM_PAGER_ERROR;
442 size = count - uio.uio_resid;
444 for (i = 0, toff = 0; i < npages; i++, toff = nextoff) {
446 nextoff = toff + PAGE_SIZE;
449 if (nextoff <= size) {
450 m->valid = VM_PAGE_BITS_ALL;
451 KASSERT(m->dirty == 0,
452 ("nwfs_getpages: page %p is dirty", m));
454 int nvalid = ((size + DEV_BSIZE - 1) - toff) & ~(DEV_BSIZE - 1);
455 vm_page_set_valid(m, 0, nvalid);
456 KASSERT((m->dirty & vm_page_bits(0, nvalid)) == 0,
457 ("nwfs_getpages: page %p is dirty", m));
460 if (i != ap->a_reqpage) {
462 * Whether or not to leave the page activated is up in
463 * the air, but we should put the page on a page queue
464 * somewhere (it already is in the object). Result:
465 * It appears that emperical results show that
466 * deactivating pages is best.
470 * Just in case someone was asking for this page we
471 * now tell them that it is ok to use.
474 if (m->oflags & VPO_WANTED) {
480 vm_page_deactivate(m);
491 VM_OBJECT_UNLOCK(object);
493 #endif /* NWFS_RWCACHE */
497 * Vnode op for VM putpages.
498 * possible bug: all IO done in sync mode
499 * Note that vop_close always invalidate pages before close, so it's
500 * not necessary to open vnode.
504 struct vop_putpages_args /* {
510 vm_ooffset_t a_offset;
514 struct vnode *vp = ap->a_vp;
519 td = curthread; /* XXX */
520 cred = td->td_ucred; /* XXX */
521 VOP_OPEN(vp, FWRITE, cred, td, NULL);
522 error = vop_stdputpages(ap);
523 VOP_CLOSE(vp, FWRITE, cred, td);
530 int i, npages, count;
536 td = curthread; /* XXX */
537 cred = td->td_ucred; /* XXX */
538 /* VOP_OPEN(vp, FWRITE, cred, td, NULL);*/
540 nmp = VFSTONWFS(vp->v_mount);
543 rtvals = ap->a_rtvals;
544 npages = btoc(count);
546 for (i = 0; i < npages; i++) {
547 rtvals[i] = VM_PAGER_ERROR;
550 bp = getpbuf(&nwfs_pbuf_freecnt);
551 kva = (vm_offset_t) bp->b_data;
552 pmap_qenter(kva, pages, npages);
554 iov.iov_base = (caddr_t) kva;
558 uio.uio_offset = IDX_TO_OFF(pages[0]->pindex);
559 uio.uio_resid = count;
560 uio.uio_segflg = UIO_SYSSPACE;
561 uio.uio_rw = UIO_WRITE;
563 NCPVNDEBUG("ofs=%d,resid=%d\n",(int)uio.uio_offset, uio.uio_resid);
565 error = ncp_write(NWFSTOCONN(nmp), &np->n_fh, &uio, cred);
566 /* VOP_CLOSE(vp, FWRITE, cred, td);*/
567 NCPVNDEBUG("paged write done: %d\n", error);
569 pmap_qremove(kva, npages);
570 relpbuf(bp, &nwfs_pbuf_freecnt);
573 vnode_pager_undirty_pages(pages, rtvals, count - uio.uio_resid);
575 #endif /* NWFS_RWCACHE */
578 * Flush and invalidate all dirty buffers. If another process is already
579 * doing the flush, just wait for completion.
582 nwfs_vinvalbuf(vp, td)
586 struct nwnode *np = VTONW(vp);
587 /* struct nwmount *nmp = VTONWFS(vp);*/
590 if (vp->v_iflag & VI_DOOMED)
593 while (np->n_flag & NFLUSHINPROG) {
594 np->n_flag |= NFLUSHWANT;
595 error = tsleep(&np->n_flag, PRIBIO + 2, "nwfsvinv", 2 * hz);
596 error = ncp_chkintr(NWFSTOCONN(VTONWFS(vp)), td);
600 np->n_flag |= NFLUSHINPROG;
602 if (vp->v_bufobj.bo_object != NULL) {
603 VM_OBJECT_LOCK(vp->v_bufobj.bo_object);
604 vm_object_page_clean(vp->v_bufobj.bo_object, 0, 0, OBJPC_SYNC);
605 VM_OBJECT_UNLOCK(vp->v_bufobj.bo_object);
608 error = vinvalbuf(vp, V_SAVE, PCATCH, 0);
610 if (error == ERESTART || error == EINTR) {
611 np->n_flag &= ~NFLUSHINPROG;
612 if (np->n_flag & NFLUSHWANT) {
613 np->n_flag &= ~NFLUSHWANT;
618 error = vinvalbuf(vp, V_SAVE, PCATCH, 0);
620 np->n_flag &= ~(NMODIFIED | NFLUSHINPROG);
621 if (np->n_flag & NFLUSHWANT) {
622 np->n_flag &= ~NFLUSHWANT;