ultrix_fs.c revision 1.22 1 /* $NetBSD: ultrix_fs.c,v 1.22 2002/03/16 20:43:58 christos 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.22 2002/03/16 20:43:58 christos 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 <net/if.h>
46 #include <netinet/in.h>
47
48 #include <nfs/rpcv2.h>
49 #include <nfs/nfsproto.h>
50 #include <nfs/nfs.h>
51 #include <nfs/nfsmount.h>
52
53 #include <ufs/ufs/quota.h>
54 #include <ufs/ufs/ufsmount.h>
55
56 #include <sys/syscallargs.h>
57 #include <compat/ultrix/ultrix_syscallargs.h>
58 #include <compat/common/compat_util.h>
59
60 #define ULTRIX_MAXPATHLEN 1024
61
62 /**
63 ** Ultrix filesystem operations: mount(), getmnt().
64 ** These are included purely so one can place an (ECOFF or ELF)
65 ** NetBSD/pmax kernel in an Ultrix root filesystem, boot it,
66 ** and over-write the Ultrix root parition with NetBSD binaries.
67 **/
68
69 /*
70 * Ultrix file system data structure, as modified by
71 * Ultrix getmntent(). This structure is padded to 2560 bytes, for
72 * compatiblity with the size the Ultrix kernel and user apps expect.
73 */
74 struct ultrix_fs_data {
75 u_int32_t ufsd_flags; /* how mounted */
76 u_int32_t ufsd_mtsize; /* max transfer size in bytes */
77 u_int32_t ufsd_otsize; /* optimal transfer size in bytes */
78 u_int32_t ufsd_bsize; /* fs block size (bytes) for vm code */
79 u_int32_t ufsd_fstype; /* see ../h/fs_types.h */
80 u_int32_t ufsd_gtot; /* total number of gnodes */
81 u_int32_t ufsd_gfree; /* # of free gnodes */
82 u_int32_t ufsd_btot; /* total number of 1K blocks */
83 u_int32_t ufsd_bfree; /* # of free 1K blocks */
84 u_int32_t ufsd_bfreen; /* user consumable 1K blocks */
85 u_int32_t ufsd_pgthresh; /* min size in bytes before paging*/
86 int32_t ufsd_uid; /* uid that mounted me */
87 int16_t ufsd_dev; /* major/minor of fs */
88 int16_t ufsd_exroot; /* root mapping from exports */
89 char ufsd_devname[ULTRIX_MAXPATHLEN + 4]; /* name of dev */
90 char ufsd_path[ULTRIX_MAXPATHLEN + 4]; /* name of mnt point */
91 u_int32_t ufsd_nupdate; /* number of writes */
92 u_int32_t ufsd_pad[112]; /* pad to 2560 bytes. */
93 };
94
95 /*
96 * Get statistics on mounted filesystems.
97 */
98 #if 0
99 struct ultrix_getmnt_args {
100 int32_t *start;
101 struct ultrix_fs_data *buf;
102 int32_t bufsize;
103 int32_t mode;
104 char *path;
105 };
106
107 #endif
108 /*
109 * Ultrix getmnt() flags.
110 * The operation getmnt() should perform is incoded in the flag
111 * argument. There are two independent attributes.
112 *
113 * ULTRIX_NOSTAT_xxx will never hang, but it may not return
114 * up-to-date statistics. (For NFS clients, it returns whatever is
115 * in the cache.) ULTRIX_STAT_xxx returns up-to-date info but may
116 * hang (e.g., on dead NFS servers).
117 *
118 * ULTRIX_xxSTAT_ONE returns statistics on just one filesystem, determined
119 * by the parth argument. ULTRIX_xxSTAT_MANY ignores the path argument and
120 * returns info on as many filesystems fit in the structure.
121 * the start argument, which should be zero on the first call,
122 * can be used to iterate over all filesystems.
123 *
124 */
125 #define ULTRIX_NOSTAT_MANY 1
126 #define ULTRIX_STAT_MANY 2
127 #define ULTRIX_STAT_ONE 3
128 #define ULTRIX_NOSTAT_ONE 4
129
130 /*
131 * Ultrix gnode-layer filesystem codes.
132 */
133 #define ULTRIX_FSTYPE_UNKNOWN 0x0
134 #define ULTRIX_FSTYPE_ULTRIX 0x1 /* Ultrix UFS: basically 4.2bsd FFS */
135 #define ULTRIX_FSTYPE_NFS 0x5 /* NFS v2 */
136
137 /*
138 * Ultrix mount(2) options
139 */
140 #define ULTRIX_NM_RONLY 0x0001 /* mount read-only */
141 #define ULTRIX_NM_SOFT 0x0002 /* soft mount (hard is default) */
142 #define ULTRIX_NM_WSIZE 0x0004 /* set write size */
143 #define ULTRIX_NM_RSIZE 0x0008 /* set read size */
144 #define ULTRIX_NM_TIMEO 0x0010 /* set initial timeout */
145 #define ULTRIX_NM_RETRANS 0x0020 /* set number of request retrys */
146 #define ULTRIX_NM_HOSTNAME 0x0040 /* set hostname for error printf */
147 #define ULTRIX_NM_PGTHRESH 0x0080 /* set page threshold for exec */
148 #define ULTRIX_NM_INT 0x0100 /* allow hard mount keyboard interrupts */
149 #define ULTRIX_NM_NOAC 0x0200 /* don't cache attributes */
150
151
152 static void
153 make_ultrix_mntent __P(( struct statfs *sp, struct ultrix_fs_data *tem));
154
155 /*
156 * Construct an Ultrix getmnt() ultrix_fs_data from the native NetBSD
157 * struct statfs.
158 */
159 static void
160 make_ultrix_mntent(sp, tem)
161 struct statfs *sp;
162 struct ultrix_fs_data *tem;
163 {
164
165 memset(tem, 0, sizeof (*tem));
166
167 tem->ufsd_flags = sp->f_flags; /* XXX translate */
168 tem->ufsd_mtsize = sp->f_bsize; /* XXX max transfer size */
169 tem->ufsd_otsize = sp->f_iosize;
170 tem->ufsd_bsize = sp->f_bsize;
171 /*
172 * Translate file system type. NetBSD/1.1 has f_type zero,
173 * and uses an fstype string instead.
174 * For now, map types not in Ultrix (kernfs, null, procfs...)
175 * to UFS, since Ultrix mout will try and call mount_unknown
176 * for ULTRIX_FSTYPE_UNKNOWN, but lacks a mount_unknown binary.
177 */
178 tem->ufsd_fstype = ULTRIX_FSTYPE_NFS;
179 if (strcmp(sp->f_fstypename, "ffs") == 0)
180 tem->ufsd_fstype = ULTRIX_FSTYPE_ULTRIX;
181
182 tem->ufsd_gtot = sp->f_files; /* total "gnodes" */
183 tem->ufsd_gfree = sp->f_ffree; /* free "gnodes" */
184 tem->ufsd_btot = sp->f_blocks; /* total 1k blocks */
185 #ifdef needsmorethought /* XXX */
186 /* tem->ufsd_bfree = sp->f_bfree; */ /* free 1k blocks */
187 /* tem->ufsd_bfree = sp->f_bavail; */ /* free 1k blocks */
188 #endif
189
190 tem->ufsd_bfreen = sp->f_bavail; /* blocks available to users */
191 tem->ufsd_pgthresh = 0; /* not relevant */
192 tem->ufsd_uid = 0; /* XXX kept where ?*/
193 tem->ufsd_dev = 0; /* ?? */
194 tem->ufsd_exroot = 0; /* ?? */
195 strncpy(tem->ufsd_path, sp->f_mntonname, ULTRIX_MAXPATHLEN);
196 strncpy(tem->ufsd_devname, sp->f_mntfromname, ULTRIX_MAXPATHLEN);
197 #if 0
198 /* In NetBSD-1.1, filesystem type is unused and always 0 */
199 printf("mntent: %s type %d\n", tem->ufsd_devname, tem->ufsd_fstype);
200 printf("mntent: %s tot %d free %d user%d\n",
201 tem->ufsd_devname, sp->f_blocks, sp->f_bfree, sp->f_bavail);
202 #endif
203 }
204
205 int
206 ultrix_sys_getmnt(p, v, retval)
207 struct proc *p;
208 void *v;
209 int *retval;
210 {
211 struct ultrix_sys_getmnt_args *uap = v;
212 struct mount *mp, *nmp;
213 struct statfs *sp;
214 struct ultrix_fs_data *sfsp;
215 char *path;
216 int mntflags;
217 int skip;
218 int start;
219 long count, maxcount;
220 int error = 0;
221
222 nmp = NULL; /* XXX keep gcc quiet */
223 path = NULL;
224 error = 0;
225 maxcount = SCARG(uap, bufsize) / sizeof(struct ultrix_fs_data);
226 sfsp = SCARG(uap, buf);
227
228 if (SCARG(uap, mode) == ULTRIX_STAT_ONE ||
229 SCARG(uap, mode) == ULTRIX_STAT_MANY)
230 mntflags = MNT_WAIT;
231 else
232 mntflags = MNT_NOWAIT;
233
234 if (SCARG(uap, mode) == ULTRIX_STAT_ONE || SCARG(uap, mode) == ULTRIX_NOSTAT_ONE) {
235 /*
236 * Only get info on mountpoints that matches the path
237 * provided.
238 */
239 MALLOC(path, char *, MAXPATHLEN, M_TEMP, M_WAITOK);
240 if ((error = copyinstr(SCARG(uap, path), path,
241 MAXPATHLEN, NULL)) != 0)
242 goto bad;
243 maxcount = 1;
244 } else {
245 /*
246 * Get info on any mountpoints, somewhat like readdir().
247 * Find out how many mount list entries to skip, and skip
248 * them.
249 */
250 if ((error = copyin((caddr_t)SCARG(uap, start), &start,
251 sizeof(*SCARG(uap, start)))) != 0)
252 goto bad;
253 simple_lock(&mountlist_slock);
254 for (skip = start, mp = mountlist.cqh_first;
255 mp != (void*)&mountlist && skip-- > 0; mp = nmp)
256 nmp = mp->mnt_list.cqe_next;
257 simple_unlock(&mountlist_slock);
258 }
259
260 simple_lock(&mountlist_slock);
261 for (count = 0, mp = mountlist.cqh_first;
262 mp != (void*)&mountlist && count < maxcount; mp = nmp) {
263 if (vfs_busy(mp, LK_NOWAIT, &mountlist_slock)) {
264 nmp = mp->mnt_list.cqe_next;
265 continue;
266 }
267 if (sfsp != NULL) {
268 struct ultrix_fs_data tem;
269 sp = &mp->mnt_stat;
270
271 /*
272 * If requested, refresh the fsstat cache.
273 */
274 if (mntflags != MNT_WAIT &&
275 (error = VFS_STATFS(mp, sp, p)) != 0)
276 continue;
277
278 /*
279 * XXX what does this do? -- cgd
280 */
281 sp->f_flags = mp->mnt_flag & MNT_VISFLAGMASK;
282 if (path == NULL ||
283 strcmp(path, sp->f_mntonname) == 0) {
284 make_ultrix_mntent(sp, &tem);
285 if ((error = copyout((caddr_t)&tem, sfsp,
286 sizeof(tem))) != 0)
287 goto bad;
288 sfsp++;
289 count++;
290 }
291 }
292 simple_lock(&mountlist_slock);
293 nmp = mp->mnt_list.cqe_next;
294 vfs_unbusy(mp);
295 }
296 simple_unlock(&mountlist_slock);
297
298 if (sfsp != NULL && count > maxcount)
299 *retval = maxcount;
300 else
301 *retval = count;
302
303 bad:
304 if (path)
305 FREE(path, M_TEMP);
306 return (error);
307 }
308
309
310
311 /* Old-style inet sockaddr (no len field) as passed to Ultrix mount(2) */
312 struct osockaddr_in {
313 short sin_family;
314 u_short sin_port;
315 struct in_addr sin_addr;
316 char sin_zero[8];
317 };
318
319
320 /*
321 * fstype-dependent structure passed to Ultrix mount(2) when
322 * mounting NFS filesystems
323 */
324 struct ultrix_nfs_args {
325 struct osockaddr_in *addr; /* file server address */
326 void *fh; /* file handle to be mounted */
327 int flags; /* flags */
328 int wsize; /* write size in bytes */
329 int rsize; /* read size in bytes */
330 int timeo; /* initial timeout in .1 secs */
331 int retrans; /* times to retry send */
332 char *hostname; /* server's hostname */
333 char *optstr; /* string of nfs mount options*/
334 int gfs_flags; /* gnode flags (ugh) */
335 int pg_thresh; /* paging threshold ? */
336 };
337
338
339 /*
340 * fstype-dependent structure passed to Ultrix mount(2) when
341 * mounting local (4.2bsd FFS) filesystems
342 */
343 struct ultrix_ufs_args {
344 u_long ufs_flags; /* mount flags?*/
345 u_long ufs_pgthresh; /* minimum file size to page */
346 };
347
348 int
349 ultrix_sys_mount(p, v, retval)
350 struct proc *p;
351 void *v;
352 int *retval;
353 {
354 struct ultrix_sys_mount_args *uap = v;
355
356 int error;
357 int otype = SCARG(uap, type);
358 char fsname[MFSNAMELEN];
359 char * fstype;
360 struct sys_mount_args nuap;
361 char *native_fstype;
362
363 caddr_t usp = stackgap_init(p, 0);
364
365 memset(&nuap, 0, sizeof(nuap));
366 SCARG(&nuap, flags) = 0;
367
368 /*
369 * Translate Ultrix integer mount codes for UFS and NFS to
370 * NetBSD fstype strings. Other Ultrix filesystem types
371 * (msdos, DEC ods-2) are not supported.
372 * Copy resulting string out to userspace (on stack)
373 * so we can pass it to the native mount syscall.
374 */
375 if (otype == ULTRIX_FSTYPE_ULTRIX)
376 fstype = "ufs";
377 else if (otype == ULTRIX_FSTYPE_NFS)
378 fstype = "nfs";
379 else
380 return (EINVAL);
381
382 /* Translate the Ultrix mount-readonly option parameter */
383 if (SCARG(uap, rdonly))
384 SCARG(&nuap, flags) |= MNT_RDONLY;
385
386 /* Copy string-ified version of mount type back out to user space */
387 native_fstype = (char *)usp;
388 SCARG(&nuap, type) = native_fstype;
389 if ((error = copyout(fstype, native_fstype,
390 strlen(fstype)+1)) != 0) {
391 return (error);
392 }
393 usp += strlen(fstype)+1;
394
395 #ifdef later
396 parse ultrix mount option string and set NetBSD flags
397 #endif
398 SCARG(&nuap, path) = SCARG(uap, dir);
399
400 /*
401 * Translate fstype-dependent mount options from
402 * Ultrix format to native.
403 */
404 if (otype == ULTRIX_FSTYPE_ULTRIX) {
405 /* attempt to mount a native, rather than 4.2bsd, ffs */
406 struct ufs_args ua;
407
408 ua.fspec = SCARG(uap, special);
409 memset(&ua.export, 0, sizeof(ua.export));
410 SCARG(&nuap, data) = usp;
411
412 if ((error = copyout(&ua, SCARG(&nuap, data),
413 sizeof ua)) !=0) {
414 return(error);
415 }
416 /*
417 * Ultrix mount has no MNT_UPDATE flag.
418 * Attempt to see if this is the root we're mounting,
419 * and if so, set MNT_UPDATE so we can mount / read-write.
420 */
421 fsname[0] = 0;
422 if ((error = copyinstr((caddr_t)SCARG(&nuap, path), fsname,
423 sizeof fsname, NULL)) != 0)
424 return(error);
425 if (strcmp(fsname, "/") == 0) {
426 SCARG(&nuap, flags) |= MNT_UPDATE;
427 printf("COMPAT_ULTRIX: mount with MNT_UPDATE on %s\n",
428 fsname);
429 }
430 } else if (otype == ULTRIX_FSTYPE_NFS) {
431 struct ultrix_nfs_args una;
432 struct nfs_args na;
433 struct osockaddr_in osa;
434 struct sockaddr_in *sap = (struct sockaddr_in *)& osa;
435
436 memset(&osa, 0, sizeof(osa));
437 memset(&una, 0, sizeof(una));
438 if ((error = copyin(SCARG(uap, data), &una, sizeof una)) !=0) {
439 return (error);
440 }
441 /*
442 * This is the only syscall boundary the
443 * address of the server passes, so do backwards
444 * compatibility on 4.3style sockaddrs here.
445 */
446 if ((error = copyin(una.addr, &osa, sizeof osa)) != 0) {
447 printf("ultrix_mount: nfs copyin osa\n");
448 return (error);
449 }
450 sap->sin_family = (u_char)osa.sin_family;
451 sap->sin_len = sizeof(*sap);
452 /* allocate space above caller's stack for nfs_args */
453 SCARG(&nuap, data) = usp;
454 usp += sizeof (na);
455 /* allocate space above caller's stack for server sockaddr */
456 na.version = NFS_ARGSVERSION;
457 na.addr = (struct sockaddr *)usp;
458 usp += sizeof(*sap);
459 na.addrlen = sap->sin_len;
460 na.sotype = SOCK_DGRAM;
461 na.proto = IPPROTO_UDP;
462 na.fh = una.fh;
463 na.fhsize = NFSX_V2FH;
464 na.flags = /*una.flags;*/ NFSMNT_NOCONN | NFSMNT_RESVPORT;
465 na.wsize = una.wsize;
466 na.rsize = una.rsize;
467 na.timeo = una.timeo;
468 na.retrans = una.retrans;
469 na.hostname = una.hostname;
470 if ((error = copyout(sap, na.addr, sizeof (*sap) )) != 0)
471 return (error);
472 if ((error = copyout(&na, SCARG(&nuap, data), sizeof na)) != 0)
473 return (error);
474 }
475 return (sys_mount(p, &nuap, retval));
476 }
477