1 /* $NetBSD: ultrix_fs.c,v 1.43 2007/11/27 09:47:16 dogcow Exp $ */ 2 3 /* 4 * Copyright (c) 1995, 1997 Jonathan Stone 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Jonathan Stone for 18 * the NetBSD Project. 19 * 4. The name of the author may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND 23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE 26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 * SUCH DAMAGE. 33 */ 34 35 #include <sys/cdefs.h> 36 __KERNEL_RCSID(0, "$NetBSD: ultrix_fs.c,v 1.43 2007/11/27 09:47:16 dogcow Exp $"); 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 #include <sys/malloc.h> 41 #include <sys/exec.h> 42 #include <sys/namei.h> 43 #include <sys/mount.h> 44 #include <sys/proc.h> 45 #include <sys/vnode.h> 46 #include <sys/vnode_if.h> 47 #include <net/if.h> 48 #include <netinet/in.h> 49 50 #include <nfs/rpcv2.h> 51 #include <nfs/nfsproto.h> 52 #include <nfs/nfs.h> 53 #include <nfs/nfsmount.h> 54 55 #include <ufs/ufs/quota.h> 56 #include <ufs/ufs/ufsmount.h> 57 58 #include <sys/syscallargs.h> 59 #include <compat/ultrix/ultrix_syscallargs.h> 60 #include <compat/common/compat_util.h> 61 #include <compat/sys/mount.h> 62 63 #define ULTRIX_MAXPATHLEN 1024 64 65 /** 66 ** Ultrix filesystem operations: mount(), getmnt(). 67 ** These are included purely so one can place an (ECOFF or ELF) 68 ** NetBSD/pmax kernel in an Ultrix root filesystem, boot it, 69 ** and over-write the Ultrix root parition with NetBSD binaries. 70 **/ 71 72 /* 73 * Ultrix file system data structure, as modified by 74 * Ultrix getmntent(). This structure is padded to 2560 bytes, for 75 * compatibility with the size the Ultrix kernel and user apps expect. 76 */ 77 struct ultrix_fs_data { 78 u_int32_t ufsd_flags; /* how mounted */ 79 u_int32_t ufsd_mtsize; /* max transfer size in bytes */ 80 u_int32_t ufsd_otsize; /* optimal transfer size in bytes */ 81 u_int32_t ufsd_bsize; /* fs block size (bytes) for vm code */ 82 u_int32_t ufsd_fstype; /* see ../h/fs_types.h */ 83 u_int32_t ufsd_gtot; /* total number of gnodes */ 84 u_int32_t ufsd_gfree; /* # of free gnodes */ 85 u_int32_t ufsd_btot; /* total number of 1K blocks */ 86 u_int32_t ufsd_bfree; /* # of free 1K blocks */ 87 u_int32_t ufsd_bfreen; /* user consumable 1K blocks */ 88 u_int32_t ufsd_pgthresh; /* min size in bytes before paging*/ 89 int32_t ufsd_uid; /* uid that mounted me */ 90 int16_t ufsd_dev; /* major/minor of fs */ 91 int16_t ufsd_exroot; /* root mapping from exports */ 92 char ufsd_devname[ULTRIX_MAXPATHLEN + 4]; /* name of dev */ 93 char ufsd_path[ULTRIX_MAXPATHLEN + 4]; /* name of mnt point */ 94 u_int32_t ufsd_nupdate; /* number of writes */ 95 u_int32_t ufsd_pad[112]; /* pad to 2560 bytes. */ 96 }; 97 98 /* 99 * Get statistics on mounted filesystems. 100 */ 101 #if 0 102 struct ultrix_getmnt_args { 103 int32_t *start; 104 struct ultrix_fs_data *buf; 105 int32_t bufsize; 106 int32_t mode; 107 char *path; 108 }; 109 110 #endif 111 /* 112 * Ultrix getmnt() flags. 113 * The operation getmnt() should perform is incoded in the flag 114 * argument. There are two independent attributes. 115 * 116 * ULTRIX_NOSTAT_xxx will never hang, but it may not return 117 * up-to-date statistics. (For NFS clients, it returns whatever is 118 * in the cache.) ULTRIX_STAT_xxx returns up-to-date info but may 119 * hang (e.g., on dead NFS servers). 120 * 121 * ULTRIX_xxSTAT_ONE returns statistics on just one filesystem, determined 122 * by the parth argument. ULTRIX_xxSTAT_MANY ignores the path argument and 123 * returns info on as many filesystems fit in the structure. 124 * the start argument, which should be zero on the first call, 125 * can be used to iterate over all filesystems. 126 * 127 */ 128 #define ULTRIX_NOSTAT_MANY 1 129 #define ULTRIX_STAT_MANY 2 130 #define ULTRIX_STAT_ONE 3 131 #define ULTRIX_NOSTAT_ONE 4 132 133 /* 134 * Ultrix gnode-layer filesystem codes. 135 */ 136 #define ULTRIX_FSTYPE_UNKNOWN 0x0 137 #define ULTRIX_FSTYPE_ULTRIX 0x1 /* Ultrix UFS: basically 4.2bsd FFS */ 138 #define ULTRIX_FSTYPE_NFS 0x5 /* NFS v2 */ 139 140 /* 141 * Ultrix mount(2) options 142 */ 143 #define ULTRIX_NM_RONLY 0x0001 /* mount read-only */ 144 #define ULTRIX_NM_SOFT 0x0002 /* soft mount (hard is default) */ 145 #define ULTRIX_NM_WSIZE 0x0004 /* set write size */ 146 #define ULTRIX_NM_RSIZE 0x0008 /* set read size */ 147 #define ULTRIX_NM_TIMEO 0x0010 /* set initial timeout */ 148 #define ULTRIX_NM_RETRANS 0x0020 /* set number of request retrys */ 149 #define ULTRIX_NM_HOSTNAME 0x0040 /* set hostname for error printf */ 150 #define ULTRIX_NM_PGTHRESH 0x0080 /* set page threshold for exec */ 151 #define ULTRIX_NM_INT 0x0100 /* allow hard mount keyboard interrupts */ 152 #define ULTRIX_NM_NOAC 0x0200 /* don't cache attributes */ 153 154 155 static void 156 make_ultrix_mntent(struct statvfs *, struct ultrix_fs_data *); 157 158 /* 159 * Construct an Ultrix getmnt() ultrix_fs_data from the native NetBSD 160 * struct statfs. 161 */ 162 static void 163 make_ultrix_mntent(struct statvfs *sp, struct ultrix_fs_data *tem) 164 { 165 166 memset(tem, 0, sizeof (*tem)); 167 168 tem->ufsd_flags = sp->f_flag; /* XXX translate */ 169 tem->ufsd_mtsize = sp->f_bsize; /* XXX max transfer size */ 170 tem->ufsd_otsize = sp->f_iosize; 171 tem->ufsd_bsize = sp->f_bsize; 172 /* 173 * Translate file system type. NetBSD/1.1 has f_type zero, 174 * and uses an fstype string instead. 175 * For now, map types not in Ultrix (kernfs, null, procfs...) 176 * to UFS, since Ultrix mout will try and call mount_unknown 177 * for ULTRIX_FSTYPE_UNKNOWN, but lacks a mount_unknown binary. 178 */ 179 tem->ufsd_fstype = ULTRIX_FSTYPE_NFS; 180 if (strcmp(sp->f_fstypename, "ffs") == 0) 181 tem->ufsd_fstype = ULTRIX_FSTYPE_ULTRIX; 182 183 tem->ufsd_gtot = sp->f_files; /* total "gnodes" */ 184 tem->ufsd_gfree = sp->f_ffree; /* free "gnodes" */ 185 tem->ufsd_btot = sp->f_blocks; /* total 1k blocks */ 186 #ifdef needsmorethought /* XXX */ 187 /* tem->ufsd_bfree = sp->f_bfree; */ /* free 1k blocks */ 188 /* tem->ufsd_bfree = sp->f_bavail; */ /* free 1k blocks */ 189 #endif 190 191 tem->ufsd_bfreen = sp->f_bavail; /* blocks available to users */ 192 tem->ufsd_pgthresh = 0; /* not relevant */ 193 tem->ufsd_uid = 0; /* XXX kept where ?*/ 194 tem->ufsd_dev = 0; /* ?? */ 195 tem->ufsd_exroot = 0; /* ?? */ 196 strncpy(tem->ufsd_path, sp->f_mntonname, ULTRIX_MAXPATHLEN); 197 strncpy(tem->ufsd_devname, sp->f_mntfromname, ULTRIX_MAXPATHLEN); 198 #if 0 199 /* In NetBSD-1.1, filesystem type is unused and always 0 */ 200 printf("mntent: %s type %d\n", tem->ufsd_devname, tem->ufsd_fstype); 201 printf("mntent: %s tot %d free %d user%d\n", 202 tem->ufsd_devname, sp->f_blocks, sp->f_bfree, sp->f_bavail); 203 #endif 204 } 205 206 int 207 ultrix_sys_getmnt(struct lwp *l, void *v, register_t *retval) 208 { 209 struct ultrix_sys_getmnt_args *uap = v; 210 struct mount *mp, *nmp; 211 struct statvfs *sp; 212 struct ultrix_fs_data *sfsp; 213 char *path; 214 int mntflags; 215 int skip; 216 int start; 217 long count, maxcount; 218 int error = 0; 219 220 nmp = NULL; /* XXX keep gcc quiet */ 221 path = NULL; 222 error = 0; 223 maxcount = SCARG(uap, bufsize) / sizeof(struct ultrix_fs_data); 224 sfsp = SCARG(uap, buf); 225 226 if (SCARG(uap, mode) == ULTRIX_STAT_ONE || 227 SCARG(uap, mode) == ULTRIX_STAT_MANY) 228 mntflags = MNT_WAIT; 229 else 230 mntflags = MNT_NOWAIT; 231 232 if (SCARG(uap, mode) == ULTRIX_STAT_ONE || SCARG(uap, mode) == ULTRIX_NOSTAT_ONE) { 233 /* 234 * Only get info on mountpoints that matches the path 235 * provided. 236 */ 237 MALLOC(path, char *, MAXPATHLEN, M_TEMP, M_WAITOK); 238 if ((error = copyinstr(SCARG(uap, path), path, 239 MAXPATHLEN, NULL)) != 0) 240 goto bad; 241 maxcount = 1; 242 } else { 243 /* 244 * Get info on any mountpoints, somewhat like readdir(). 245 * Find out how many mount list entries to skip, and skip 246 * them. 247 */ 248 if ((error = copyin((void *)SCARG(uap, start), &start, 249 sizeof(*SCARG(uap, start)))) != 0) 250 goto bad; 251 mutex_enter(&mountlist_lock); 252 for (skip = start, mp = mountlist.cqh_first; 253 mp != (void*)&mountlist && skip-- > 0; mp = nmp) 254 nmp = mp->mnt_list.cqe_next; 255 mutex_exit(&mountlist_lock); 256 } 257 258 mutex_enter(&mountlist_lock); 259 for (count = 0, mp = mountlist.cqh_first; 260 mp != (void*)&mountlist && count < maxcount; mp = nmp) { 261 if (vfs_busy(mp, LK_NOWAIT, &mountlist_lock)) { 262 nmp = mp->mnt_list.cqe_next; 263 continue; 264 } 265 if (sfsp != NULL) { 266 struct ultrix_fs_data tem; 267 sp = &mp->mnt_stat; 268 269 /* 270 * If requested, refresh the fsstat cache. 271 */ 272 if (mntflags != MNT_WAIT && 273 (error = VFS_STATVFS(mp, sp)) != 0) 274 continue; 275 276 /* 277 * XXX what does this do? -- cgd 278 */ 279 sp->f_flag = mp->mnt_flag & MNT_VISFLAGMASK; 280 if (path == NULL || 281 strcmp(path, sp->f_mntonname) == 0) { 282 make_ultrix_mntent(sp, &tem); 283 if ((error = copyout((void *)&tem, sfsp, 284 sizeof(tem))) != 0) 285 goto bad; 286 sfsp++; 287 count++; 288 } 289 } 290 mutex_enter(&mountlist_lock); 291 nmp = mp->mnt_list.cqe_next; 292 vfs_unbusy(mp); 293 } 294 mutex_exit(&mountlist_lock); 295 296 if (sfsp != NULL && count > maxcount) 297 *retval = maxcount; 298 else 299 *retval = count; 300 301 bad: 302 if (path) 303 FREE(path, M_TEMP); 304 return (error); 305 } 306 307 308 309 /* Old-style inet sockaddr (no len field) as passed to Ultrix mount(2) */ 310 struct osockaddr_in { 311 short sin_family; 312 u_short sin_port; 313 struct in_addr sin_addr; 314 char sin_zero[8]; 315 }; 316 317 318 /* 319 * fstype-dependent structure passed to Ultrix mount(2) when 320 * mounting NFS filesystems 321 */ 322 struct ultrix_nfs_args { 323 struct osockaddr_in *addr; /* file server address */ 324 void *fh; /* file handle to be mounted */ 325 int flags; /* flags */ 326 int wsize; /* write size in bytes */ 327 int rsize; /* read size in bytes */ 328 int timeo; /* initial timeout in .1 secs */ 329 int retrans; /* times to retry send */ 330 char *hostname; /* server's hostname */ 331 char *optstr; /* string of nfs mount options*/ 332 int gfs_flags; /* gnode flags (ugh) */ 333 int pg_thresh; /* paging threshold ? */ 334 }; 335 336 337 /* 338 * fstype-dependent structure passed to Ultrix mount(2) when 339 * mounting local (4.2bsd FFS) filesystems 340 */ 341 struct ultrix_ufs_args { 342 u_long ufs_flags; /* mount flags?*/ 343 u_long ufs_pgthresh; /* minimum file size to page */ 344 }; 345 346 int 347 ultrix_sys_mount(struct lwp *l, void *v, register_t *retval) 348 { 349 struct ultrix_sys_mount_args *uap = v; 350 int error; 351 int otype = SCARG(uap, type); 352 char fsname[MFSNAMELEN]; 353 register_t dummy; 354 int nflags; 355 356 nflags = 0; 357 358 /* 359 * Translate Ultrix integer mount codes for UFS and NFS to 360 * NetBSD fstype strings. Other Ultrix filesystem types 361 * (msdos, DEC ods-2) are not supported. 362 */ 363 364 /* Translate the Ultrix mount-readonly option parameter */ 365 if (SCARG(uap, rdonly)) 366 nflags |= MNT_RDONLY; 367 368 369 #ifdef later 370 parse ultrix mount option string and set NetBSD flags 371 #endif 372 373 if (otype == ULTRIX_FSTYPE_NFS) { 374 struct ultrix_nfs_args una; 375 struct nfs_args na; 376 377 if ((error = copyin(SCARG(uap, data), &una, sizeof una)) !=0) { 378 return (error); 379 } 380 #if 0 381 /* 382 * This is the only syscall boundary the 383 * address of the server passes, so do backwards 384 * compatibility on 4.3style sockaddrs here. 385 */ 386 if ((error = copyin(una.addr, &osa, sizeof osa)) != 0) { 387 printf("ultrix_mount: nfs copyin osa\n"); 388 return (error); 389 } 390 sap->sin_family = (u_char)osa.sin_family; 391 sap->sin_len = sizeof(*sap); 392 /* XXXX teach nfs how to do the above */ 393 #endif 394 na.version = NFS_ARGSVERSION; 395 na.addr = (void *)una.addr; 396 na.addrlen = sizeof (struct sockaddr_in); 397 na.sotype = SOCK_DGRAM; 398 na.proto = IPPROTO_UDP; 399 na.fh = una.fh; 400 na.fhsize = NFSX_V2FH; 401 na.flags = /*una.flags;*/ NFSMNT_NOCONN | NFSMNT_RESVPORT; 402 na.wsize = una.wsize; 403 na.rsize = una.rsize; 404 na.timeo = una.timeo; 405 na.retrans = una.retrans; 406 na.hostname = una.hostname; 407 return do_sys_mount(l, vfs_getopsbyname("nfs"), NULL, 408 SCARG(uap, special), nflags, &na, UIO_SYSSPACE, 409 sizeof na, &dummy); 410 } 411 412 /* 413 * Translate fstype-dependent mount options from 414 * Ultrix format to native. 415 */ 416 if (otype == ULTRIX_FSTYPE_ULTRIX) { 417 /* attempt to mount a native, rather than 4.2bsd, ffs */ 418 struct ufs_args ua; 419 420 memset(&ua, 0, sizeof(ua)); 421 ua.fspec = SCARG(uap, special); 422 423 /* 424 * Ultrix mount has no MNT_UPDATE flag. 425 * Attempt to see if this is the root we're mounting, 426 * and if so, set MNT_UPDATE so we can mount / read-write. 427 */ 428 fsname[0] = 0; 429 if ((error = copyinstr(SCARG(uap, dir), fsname, 430 sizeof fsname, NULL)) != 0) 431 return(error); 432 if (strcmp(fsname, "/") == 0) { 433 nflags |= MNT_UPDATE; 434 printf("COMPAT_ULTRIX: mount with MNT_UPDATE on %s\n", 435 fsname); 436 } 437 return do_sys_mount(l, vfs_getopsbyname("ffs"), NULL, 438 SCARG(uap, dir), nflags, &ua, UIO_SYSSPACE, sizeof ua, 439 &dummy); 440 } 441 442 return (EINVAL); 443 } 444