| 1 | /* |
| 2 | * Copyright (c) 1999, 2000 Boris Popov |
| 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 | * 3. All advertising materials mentioning features or use of this software |
| 14 | * must display the following acknowledgement: |
| 15 | * This product includes software developed by Boris Popov. |
| 16 | * 4. Neither the name of the author nor the names of any co-contributors |
| 17 | * may be used to endorse or promote products derived from this software |
| 18 | * without specific prior written permission. |
| 19 | * |
| 20 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND |
| 21 | * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| 22 | * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| 23 | * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE |
| 24 | * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
| 25 | * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
| 26 | * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
| 27 | * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
| 28 | * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
| 29 | * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| 30 | * SUCH DAMAGE. |
| 31 | * |
| 32 | * $FreeBSD: src/sys/nwfs/nwfs_node.c,v 1.3.2.8 2001/12/25 01:44:45 dillon Exp $ |
| 33 | * $DragonFly: src/sys/vfs/nwfs/nwfs_node.c,v 1.27 2007/08/08 00:12:52 swildner Exp $ |
| 34 | */ |
| 35 | #include <sys/param.h> |
| 36 | #include <sys/systm.h> |
| 37 | #include <sys/kernel.h> |
| 38 | #include <sys/time.h> |
| 39 | #include <sys/proc.h> |
| 40 | #include <sys/mount.h> |
| 41 | #include <sys/vnode.h> |
| 42 | #include <sys/malloc.h> |
| 43 | #include <sys/sysctl.h> |
| 44 | #include <vm/vm.h> |
| 45 | #include <vm/vm_extern.h> |
| 46 | #include <vm/vm_page.h> |
| 47 | #include <vm/vm_object.h> |
| 48 | #include <sys/queue.h> |
| 49 | |
| 50 | #include <netproto/ncp/ncp.h> |
| 51 | #include <netproto/ncp/ncp_conn.h> |
| 52 | #include <netproto/ncp/ncp_subr.h> |
| 53 | |
| 54 | #include "nwfs.h" |
| 55 | #include "nwfs_mount.h" |
| 56 | #include "nwfs_node.h" |
| 57 | #include "nwfs_subr.h" |
| 58 | |
| 59 | #define NWNOHASH(fhsum) (&nwhashtbl[(fhsum.f_id) & nwnodehash]) |
| 60 | |
| 61 | static LIST_HEAD(nwnode_hash_head,nwnode) *nwhashtbl; |
| 62 | static u_long nwnodehash; |
| 63 | static struct lock nwhashlock; |
| 64 | |
| 65 | MALLOC_DEFINE(M_NWNODE, "NWFS node", "NWFS vnode private part"); |
| 66 | MALLOC_DEFINE(M_NWFSHASH, "NWFS hash", "NWFS has table"); |
| 67 | |
| 68 | static int nwfs_sysctl_vnprint(SYSCTL_HANDLER_ARGS); |
| 69 | |
| 70 | SYSCTL_DECL(_vfs_nwfs); |
| 71 | |
| 72 | SYSCTL_PROC(_vfs_nwfs, OID_AUTO, vnprint, CTLFLAG_WR|CTLTYPE_OPAQUE, |
| 73 | NULL, 0, nwfs_sysctl_vnprint, "S,vnlist", "vnode hash"); |
| 74 | |
| 75 | void |
| 76 | nwfs_hash_init(void) |
| 77 | { |
| 78 | nwhashtbl = hashinit(desiredvnodes, M_NWFSHASH, &nwnodehash); |
| 79 | lockinit(&nwhashlock, "nwfshl", 0, 0); |
| 80 | } |
| 81 | |
| 82 | void |
| 83 | nwfs_hash_free(void) |
| 84 | { |
| 85 | kfree(nwhashtbl, M_NWFSHASH); |
| 86 | } |
| 87 | |
| 88 | int |
| 89 | nwfs_sysctl_vnprint(SYSCTL_HANDLER_ARGS) |
| 90 | { |
| 91 | struct nwnode *np; |
| 92 | struct nwnode_hash_head *nhpp; |
| 93 | struct vnode *vp; |
| 94 | int i; |
| 95 | |
| 96 | if (nwfs_debuglevel == 0) |
| 97 | return 0; |
| 98 | kprintf("Name:uc:hc:fid:pfid\n"); |
| 99 | for(i = 0; i <= nwnodehash; i++) { |
| 100 | nhpp = &nwhashtbl[i]; |
| 101 | LIST_FOREACH(np, nhpp, n_hash) { |
| 102 | vp = NWTOV(np); |
| 103 | vprint(NULL, vp); |
| 104 | kprintf("%s:%d:%d:%d:%d\n", |
| 105 | np->n_name, vp->v_sysref.refcnt, vp->v_auxrefs, |
| 106 | np->n_fid.f_id, np->n_fid.f_parent); |
| 107 | } |
| 108 | } |
| 109 | return 0; |
| 110 | } |
| 111 | |
| 112 | /* |
| 113 | * Search nwnode with given fid. |
| 114 | * Hash list should be locked by caller. |
| 115 | */ |
| 116 | static int |
| 117 | nwfs_hashlookup(struct nwmount *nmp, ncpfid fid, struct nwnode **npp) |
| 118 | { |
| 119 | struct nwnode *np; |
| 120 | struct nwnode_hash_head *nhpp; |
| 121 | |
| 122 | nhpp = NWNOHASH(fid); |
| 123 | LIST_FOREACH(np, nhpp, n_hash) { |
| 124 | if (nmp != np->n_mount || !NWCMPF(&fid, &np->n_fid)) |
| 125 | continue; |
| 126 | if (npp) |
| 127 | *npp = np; |
| 128 | return 0; |
| 129 | } |
| 130 | return ENOENT; |
| 131 | } |
| 132 | |
| 133 | /* |
| 134 | * Allocate new nwfsnode/vnode from given nwnode. |
| 135 | * Vnode referenced and not locked. |
| 136 | */ |
| 137 | int |
| 138 | nwfs_allocvp(struct mount *mp, ncpfid fid, struct vnode **vpp) |
| 139 | { |
| 140 | struct nwnode *np; |
| 141 | struct nwnode_hash_head *nhpp; |
| 142 | struct nwmount *nmp = VFSTONWFS(mp); |
| 143 | struct vnode *vp; |
| 144 | int error; |
| 145 | |
| 146 | loop: |
| 147 | lockmgr(&nwhashlock, LK_EXCLUSIVE); |
| 148 | rescan: |
| 149 | if (nwfs_hashlookup(nmp, fid, &np) == 0) { |
| 150 | vp = NWTOV(np); |
| 151 | lockmgr(&nwhashlock, LK_RELEASE); |
| 152 | if (vget(vp, LK_EXCLUSIVE)) |
| 153 | goto loop; |
| 154 | if (nwfs_hashlookup(nmp, fid, &np) || NWTOV(np) != vp) { |
| 155 | vput(vp); |
| 156 | goto loop; |
| 157 | } |
| 158 | *vpp = vp; |
| 159 | return(0); |
| 160 | } |
| 161 | lockmgr(&nwhashlock, LK_RELEASE); |
| 162 | |
| 163 | /* |
| 164 | * Do the MALLOC before the getnewvnode since doing so afterward |
| 165 | * might cause a bogus v_data pointer to get dereferenced |
| 166 | * elsewhere if MALLOC should block. |
| 167 | */ |
| 168 | MALLOC(np, struct nwnode *, sizeof *np, M_NWNODE, M_WAITOK | M_ZERO); |
| 169 | error = getnewvnode(VT_NWFS, mp, &vp, 0, 0); |
| 170 | if (error) { |
| 171 | *vpp = NULL; |
| 172 | FREE(np, M_NWNODE); |
| 173 | return (error); |
| 174 | } |
| 175 | np->n_vnode = vp; |
| 176 | np->n_mount = nmp; |
| 177 | |
| 178 | /* |
| 179 | * Another process can create vnode while we blocked in malloc() or |
| 180 | * getnewvnode(). Rescan list again. |
| 181 | */ |
| 182 | lockmgr(&nwhashlock, LK_EXCLUSIVE); |
| 183 | if (nwfs_hashlookup(nmp, fid, NULL) == 0) { |
| 184 | np->n_vnode = NULL; |
| 185 | vx_put(vp); |
| 186 | kfree(np, M_NWNODE); |
| 187 | goto rescan; |
| 188 | } |
| 189 | *vpp = vp; |
| 190 | vp->v_data = np; |
| 191 | np->n_fid = fid; |
| 192 | np->n_flag |= NNEW; |
| 193 | lockinit(&np->n_lock, "nwnode", VLKTIMEOUT, LK_CANRECURSE); |
| 194 | nhpp = NWNOHASH(fid); |
| 195 | LIST_INSERT_HEAD(nhpp, np, n_hash); |
| 196 | lockmgr(&nwhashlock, LK_RELEASE); |
| 197 | return 0; |
| 198 | } |
| 199 | |
| 200 | int |
| 201 | nwfs_lookupnp(struct nwmount *nmp, ncpfid fid, struct thread *td, |
| 202 | struct nwnode **npp) |
| 203 | { |
| 204 | int error; |
| 205 | |
| 206 | lockmgr(&nwhashlock, LK_EXCLUSIVE); |
| 207 | error = nwfs_hashlookup(nmp, fid, npp); |
| 208 | lockmgr(&nwhashlock, LK_RELEASE); |
| 209 | return error; |
| 210 | } |
| 211 | |
| 212 | /* |
| 213 | * Free nwnode, and give vnode back to system |
| 214 | * |
| 215 | * nwfs_reclaim(struct vnode *a_vp) |
| 216 | */ |
| 217 | int |
| 218 | nwfs_reclaim(struct vop_reclaim_args *ap) |
| 219 | { |
| 220 | struct vnode *dvp = NULL, *vp = ap->a_vp; |
| 221 | struct nwnode *dnp, *np = VTONW(vp); |
| 222 | struct nwmount *nmp = VTONWFS(vp); |
| 223 | struct thread *td = curthread; /* XXX */ |
| 224 | |
| 225 | NCPVNDEBUG("%s,%d\n", (np ? np->n_name : "?"), vp->v_sysref.refcnt); |
| 226 | if (np && np->n_refparent) { |
| 227 | np->n_refparent = 0; |
| 228 | if (nwfs_lookupnp(nmp, np->n_parent, td, &dnp) == 0) { |
| 229 | dvp = dnp->n_vnode; |
| 230 | } else { |
| 231 | NCPVNDEBUG("%s: has no parent ?\n",np->n_name); |
| 232 | } |
| 233 | } |
| 234 | if (np) { |
| 235 | lockmgr(&nwhashlock, LK_EXCLUSIVE); |
| 236 | LIST_REMOVE(np, n_hash); |
| 237 | lockmgr(&nwhashlock, LK_RELEASE); |
| 238 | } |
| 239 | if (nmp->n_root == np) |
| 240 | nmp->n_root = NULL; |
| 241 | vp->v_data = NULL; |
| 242 | if (np) |
| 243 | kfree(np, M_NWNODE); |
| 244 | if (dvp) |
| 245 | vrele(dvp); |
| 246 | return (0); |
| 247 | } |
| 248 | |
| 249 | /* |
| 250 | * nwfs_inactive(struct vnode *a_vp) |
| 251 | */ |
| 252 | int |
| 253 | nwfs_inactive(struct vop_inactive_args *ap) |
| 254 | { |
| 255 | struct thread *td = curthread; /* XXX */ |
| 256 | struct ucred *cred; |
| 257 | struct vnode *vp = ap->a_vp; |
| 258 | struct nwnode *np = VTONW(vp); |
| 259 | int error; |
| 260 | |
| 261 | KKASSERT(td->td_proc); /* XXX */ |
| 262 | cred = td->td_proc->p_ucred; /* XXX */ |
| 263 | |
| 264 | NCPVNDEBUG("%s: %d\n", VTONW(vp)->n_name, vp->v_sysref.refcnt); |
| 265 | if (np && np->opened) { |
| 266 | error = nwfs_vinvalbuf(vp, V_SAVE, 1); |
| 267 | error = ncp_close_file(NWFSTOCONN(VTONWFS(vp)), &np->n_fh, td, cred); |
| 268 | np->opened = 0; |
| 269 | } |
| 270 | if (np == NULL || (np->n_flag & NSHOULDFREE)) { |
| 271 | vgone_vxlocked(vp); |
| 272 | } |
| 273 | return (0); |
| 274 | } |
| 275 | /* |
| 276 | * routines to maintain vnode attributes cache |
| 277 | * nwfs_attr_cacheenter: unpack np.i to va structure |
| 278 | */ |
| 279 | void |
| 280 | nwfs_attr_cacheenter(struct vnode *vp, const struct nw_entry_info *fi) |
| 281 | { |
| 282 | struct nwnode *np = VTONW(vp); |
| 283 | struct nwmount *nmp = VTONWFS(vp); |
| 284 | struct vattr *va = &np->n_vattr; |
| 285 | |
| 286 | va->va_type = vp->v_type; /* vnode type (for create) */ |
| 287 | np->n_nmlen = fi->nameLen; |
| 288 | bcopy(fi->entryName, np->n_name, np->n_nmlen); |
| 289 | np->n_name[fi->nameLen] = 0; |
| 290 | if (vp->v_type == VREG) { |
| 291 | if (va->va_size != fi->dataStreamSize) { |
| 292 | va->va_size = fi->dataStreamSize; |
| 293 | vnode_pager_setsize(vp, va->va_size); |
| 294 | } |
| 295 | va->va_mode = nmp->m.file_mode; /* files access mode and type */ |
| 296 | } else if (vp->v_type == VDIR) { |
| 297 | va->va_size = 16384; /* should be a better way ... */ |
| 298 | va->va_mode = nmp->m.dir_mode; /* files access mode and type */ |
| 299 | } else |
| 300 | return; |
| 301 | np->n_size = va->va_size; |
| 302 | va->va_nlink = 1; /* number of references to file */ |
| 303 | va->va_uid = nmp->m.uid; /* owner user id */ |
| 304 | va->va_gid = nmp->m.gid; /* owner group id */ |
| 305 | va->va_fsid = vp->v_mount->mnt_stat.f_fsid.val[0]; |
| 306 | va->va_fileid = np->n_fid.f_id; /* file id */ |
| 307 | if (va->va_fileid == 0) |
| 308 | va->va_fileid = NWFS_ROOT_INO; |
| 309 | va->va_blocksize=nmp->connh->nh_conn->buffer_size;/* blocksize preferred for i/o */ |
| 310 | /* time of last modification */ |
| 311 | ncp_dos2unixtime(fi->modifyDate, fi->modifyTime, 0, nmp->m.tz, &va->va_mtime); |
| 312 | /* time of last access */ |
| 313 | ncp_dos2unixtime(fi->lastAccessDate, 0, 0, nmp->m.tz, &va->va_atime); |
| 314 | va->va_ctime = va->va_mtime; /* time file changed */ |
| 315 | va->va_gen = VNOVAL; /* generation number of file */ |
| 316 | va->va_flags = 0; /* flags defined for file */ |
| 317 | va->va_rmajor = VNOVAL; /* device the special file represents */ |
| 318 | va->va_rminor = VNOVAL; |
| 319 | va->va_bytes = va->va_size; /* bytes of disk space held by file */ |
| 320 | va->va_filerev = 0; /* file modification number */ |
| 321 | va->va_vaflags = 0; /* operations flags */ |
| 322 | np->n_vattr = *va; |
| 323 | if (np->n_mtime == 0) { |
| 324 | np->n_mtime = va->va_mtime.tv_sec; |
| 325 | } |
| 326 | np->n_atime = time_second; |
| 327 | np->n_dosfid = fi->DosDirNum; |
| 328 | return; |
| 329 | } |
| 330 | |
| 331 | int |
| 332 | nwfs_attr_cachelookup(struct vnode *vp, struct vattr *va) |
| 333 | { |
| 334 | struct nwnode *np = VTONW(vp); |
| 335 | int diff; |
| 336 | |
| 337 | diff = time_second - np->n_atime; |
| 338 | if (diff > 2) { /* XXX should be configurable */ |
| 339 | return ENOENT; |
| 340 | } |
| 341 | *va = np->n_vattr; |
| 342 | return 0; |
| 343 | } |