xref: /original-bsd/sys/ufs/mfs/mfs_vfsops.c (revision 333da485)
1 /*
2  * Copyright (c) 1989, 1990, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * %sccs.include.redist.c%
6  *
7  *	@(#)mfs_vfsops.c	8.3 (Berkeley) 01/12/94
8  */
9 
10 #include <sys/param.h>
11 #include <sys/systm.h>
12 #include <sys/time.h>
13 #include <sys/kernel.h>
14 #include <sys/proc.h>
15 #include <sys/buf.h>
16 #include <sys/mount.h>
17 #include <sys/signalvar.h>
18 #include <sys/vnode.h>
19 #include <sys/malloc.h>
20 
21 #include <ufs/ufs/quota.h>
22 #include <ufs/ufs/inode.h>
23 #include <ufs/ufs/ufsmount.h>
24 #include <ufs/ufs/ufs_extern.h>
25 
26 #include <ufs/ffs/fs.h>
27 #include <ufs/ffs/ffs_extern.h>
28 
29 #include <ufs/mfs/mfsnode.h>
30 #include <ufs/mfs/mfs_extern.h>
31 
32 caddr_t	mfs_rootbase;	/* address of mini-root in kernel virtual memory */
33 u_long	mfs_rootsize;	/* size of mini-root in bytes */
34 
35 static	int mfs_minor;	/* used for building internal dev_t */
36 
37 extern int (**mfs_vnodeop_p)();
38 
39 /*
40  * mfs vfs operations.
41  */
42 struct vfsops mfs_vfsops = {
43 	mfs_mount,
44 	mfs_start,
45 	ffs_unmount,
46 	ffs_root,
47 	ufs_quotactl,
48 	mfs_statfs,
49 	ffs_sync,
50 	ffs_vget,
51 	ffs_fhtovp,
52 	ffs_vptofh,
53 	mfs_init,
54 };
55 
56 /*
57  * Called by main() when mfs is going to be mounted as root.
58  *
59  * Name is updated by mount(8) after booting.
60  */
61 #define ROOTNAME	"mfs_root"
62 
63 mfs_mountroot()
64 {
65 	extern struct vnode *rootvp;
66 	register struct fs *fs;
67 	register struct mount *mp;
68 	struct proc *p = curproc;	/* XXX */
69 	struct ufsmount *ump;
70 	struct mfsnode *mfsp;
71 	u_int size;
72 	int error;
73 
74 	/*
75 	 * Get vnodes for swapdev and rootdev.
76 	 */
77 	if (bdevvp(swapdev, &swapdev_vp) || bdevvp(rootdev, &rootvp))
78 		panic("mfs_mountroot: can't setup bdevvp's");
79 
80 	mp = malloc((u_long)sizeof(struct mount), M_MOUNT, M_WAITOK);
81 	bzero((char *)mp, (u_long)sizeof(struct mount));
82 	mp->mnt_op = &mfs_vfsops;
83 	mp->mnt_flag = MNT_RDONLY;
84 	mfsp = malloc(sizeof *mfsp, M_MFSNODE, M_WAITOK);
85 	rootvp->v_data = mfsp;
86 	rootvp->v_op = mfs_vnodeop_p;
87 	rootvp->v_tag = VT_MFS;
88 	mfsp->mfs_baseoff = mfs_rootbase;
89 	mfsp->mfs_size = mfs_rootsize;
90 	mfsp->mfs_vnode = rootvp;
91 	mfsp->mfs_pid = p->p_pid;
92 	mfsp->mfs_buflist = (struct buf *)0;
93 	if (error = ffs_mountfs(rootvp, mp, p)) {
94 		free(mp, M_MOUNT);
95 		free(mfsp, M_MFSNODE);
96 		return (error);
97 	}
98 	if (error = vfs_lock(mp)) {
99 		(void)ffs_unmount(mp, 0, p);
100 		free(mp, M_MOUNT);
101 		free(mfsp, M_MFSNODE);
102 		return (error);
103 	}
104 	TAILQ_INSERT_TAIL(&mountlist, mp, mnt_list);
105 	mp->mnt_flag |= MNT_ROOTFS;
106 	mp->mnt_vnodecovered = NULLVP;
107 	ump = VFSTOUFS(mp);
108 	fs = ump->um_fs;
109 	bzero(fs->fs_fsmnt, sizeof(fs->fs_fsmnt));
110 	fs->fs_fsmnt[0] = '/';
111 	bcopy((caddr_t)fs->fs_fsmnt, (caddr_t)mp->mnt_stat.f_mntonname,
112 	    MNAMELEN);
113 	(void) copystr(ROOTNAME, mp->mnt_stat.f_mntfromname, MNAMELEN - 1,
114 	    &size);
115 	bzero(mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
116 	(void)ffs_statfs(mp, &mp->mnt_stat, p);
117 	vfs_unlock(mp);
118 	inittodr((time_t)0);
119 	return (0);
120 }
121 
122 /*
123  * This is called early in boot to set the base address and size
124  * of the mini-root.
125  */
126 mfs_initminiroot(base)
127 	caddr_t base;
128 {
129 	struct fs *fs = (struct fs *)(base + SBOFF);
130 	extern int (*mountroot)();
131 
132 	/* check for valid super block */
133 	if (fs->fs_magic != FS_MAGIC || fs->fs_bsize > MAXBSIZE ||
134 	    fs->fs_bsize < sizeof(struct fs))
135 		return (0);
136 	mountroot = mfs_mountroot;
137 	mfs_rootbase = base;
138 	mfs_rootsize = fs->fs_fsize * fs->fs_size;
139 	rootdev = makedev(255, mfs_minor++);
140 	return (mfs_rootsize);
141 }
142 
143 /*
144  * VFS Operations.
145  *
146  * mount system call
147  */
148 /* ARGSUSED */
149 int
150 mfs_mount(mp, path, data, ndp, p)
151 	register struct mount *mp;
152 	char *path;
153 	caddr_t data;
154 	struct nameidata *ndp;
155 	struct proc *p;
156 {
157 	struct vnode *devvp;
158 	struct mfs_args args;
159 	struct ufsmount *ump;
160 	register struct fs *fs;
161 	register struct mfsnode *mfsp;
162 	u_int size;
163 	int flags, error;
164 
165 	if (error = copyin(data, (caddr_t)&args, sizeof (struct mfs_args)))
166 		return (error);
167 
168 	/*
169 	 * If updating, check whether changing from read-only to
170 	 * read/write; if there is no device name, that's all we do.
171 	 */
172 	if (mp->mnt_flag & MNT_UPDATE) {
173 		ump = VFSTOUFS(mp);
174 		fs = ump->um_fs;
175 		if (fs->fs_ronly == 0 && (mp->mnt_flag & MNT_RDONLY)) {
176 			flags = WRITECLOSE;
177 			if (mp->mnt_flag & MNT_FORCE)
178 				flags |= FORCECLOSE;
179 			if (vfs_busy(mp))
180 				return (EBUSY);
181 			error = ffs_flushfiles(mp, flags, p);
182 			vfs_unbusy(mp);
183 			if (error)
184 				return (error);
185 		}
186 		if (fs->fs_ronly && (mp->mnt_flag & MNT_WANTRDWR))
187 			fs->fs_ronly = 0;
188 #ifdef EXPORTMFS
189 		if (args.fspec == 0)
190 			return (vfs_export(mp, &ump->um_export, &args.export));
191 #endif
192 		return (0);
193 	}
194 	error = getnewvnode(VT_MFS, (struct mount *)0, mfs_vnodeop_p, &devvp);
195 	if (error)
196 		return (error);
197 	devvp->v_type = VBLK;
198 	if (checkalias(devvp, makedev(255, mfs_minor++), (struct mount *)0))
199 		panic("mfs_mount: dup dev");
200 	mfsp = (struct mfsnode *)malloc(sizeof *mfsp, M_MFSNODE, M_WAITOK);
201 	devvp->v_data = mfsp;
202 	mfsp->mfs_baseoff = args.base;
203 	mfsp->mfs_size = args.size;
204 	mfsp->mfs_vnode = devvp;
205 	mfsp->mfs_pid = p->p_pid;
206 	mfsp->mfs_buflist = (struct buf *)0;
207 	if (error = ffs_mountfs(devvp, mp, p)) {
208 		mfsp->mfs_buflist = (struct buf *)-1;
209 		vrele(devvp);
210 		return (error);
211 	}
212 	ump = VFSTOUFS(mp);
213 	fs = ump->um_fs;
214 	(void) copyinstr(path, fs->fs_fsmnt, sizeof(fs->fs_fsmnt) - 1, &size);
215 	bzero(fs->fs_fsmnt + size, sizeof(fs->fs_fsmnt) - size);
216 	bcopy((caddr_t)fs->fs_fsmnt, (caddr_t)mp->mnt_stat.f_mntonname,
217 		MNAMELEN);
218 	(void) copyinstr(args.fspec, mp->mnt_stat.f_mntfromname, MNAMELEN - 1,
219 		&size);
220 	bzero(mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
221 	(void) mfs_statfs(mp, &mp->mnt_stat, p);
222 	return (0);
223 }
224 
225 int	mfs_pri = PWAIT | PCATCH;		/* XXX prob. temp */
226 
227 /*
228  * Used to grab the process and keep it in the kernel to service
229  * memory filesystem I/O requests.
230  *
231  * Loop servicing I/O requests.
232  * Copy the requested data into or out of the memory filesystem
233  * address space.
234  */
235 /* ARGSUSED */
236 int
237 mfs_start(mp, flags, p)
238 	struct mount *mp;
239 	int flags;
240 	struct proc *p;
241 {
242 	register struct vnode *vp = VFSTOUFS(mp)->um_devvp;
243 	register struct mfsnode *mfsp = VTOMFS(vp);
244 	register struct buf *bp;
245 	register caddr_t base;
246 	int error = 0;
247 
248 	base = mfsp->mfs_baseoff;
249 	while (mfsp->mfs_buflist != (struct buf *)(-1)) {
250 		while (bp = mfsp->mfs_buflist) {
251 			mfsp->mfs_buflist = bp->b_actf;
252 			mfs_doio(bp, base);
253 			wakeup((caddr_t)bp);
254 		}
255 		/*
256 		 * If a non-ignored signal is received, try to unmount.
257 		 * If that fails, clear the signal (it has been "processed"),
258 		 * otherwise we will loop here, as tsleep will always return
259 		 * EINTR/ERESTART.
260 		 */
261 		if (error = tsleep((caddr_t)vp, mfs_pri, "mfsidl", 0))
262 			if (dounmount(mp, 0, p) != 0)
263 				CLRSIG(p, CURSIG(p));
264 	}
265 	return (error);
266 }
267 
268 /*
269  * Get file system statistics.
270  */
271 mfs_statfs(mp, sbp, p)
272 	struct mount *mp;
273 	struct statfs *sbp;
274 	struct proc *p;
275 {
276 	int error;
277 
278 	error = ffs_statfs(mp, sbp, p);
279 	sbp->f_type = MOUNT_MFS;
280 	return (error);
281 }
282