mount_lfs.c revision 1.37 1 /* $NetBSD: mount_lfs.c,v 1.37 2013/10/19 23:14:27 christos Exp $ */
2
3 /*-
4 * Copyright (c) 1993, 1994
5 * The Regents of the University of California. 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. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #ifndef lint
34 __COPYRIGHT("@(#) Copyright (c) 1993, 1994\
35 The Regents of the University of California. All rights reserved.");
36 #endif /* not lint */
37
38 #ifndef lint
39 #if 0
40 static char sccsid[] = "@(#)mount_lfs.c 8.4 (Berkeley) 4/26/95";
41 #else
42 __RCSID("$NetBSD: mount_lfs.c,v 1.37 2013/10/19 23:14:27 christos Exp $");
43 #endif
44 #endif /* not lint */
45
46 #include <sys/param.h>
47 #include <sys/mount.h>
48
49 #include <ufs/ufs/ufsmount.h>
50
51 #include <err.h>
52 #include <errno.h>
53 #include <stdio.h>
54 #include <stdlib.h>
55 #include <string.h>
56 #include <unistd.h>
57 #include <paths.h>
58
59 #include <signal.h>
60
61 #include <mntopts.h>
62 #include "pathnames.h"
63 #include "mountprog.h"
64 #include "mount_lfs.h"
65
66 static const struct mntopt mopts[] = {
67 MOPT_STDOPTS,
68 MOPT_UPDATE,
69 MOPT_GETARGS,
70 MOPT_NOATIME,
71 MOPT_NULL,
72 };
73
74 __dead static void usage(void);
75
76 #ifdef WANT_CLEANER
77 __dead static void invoke_cleaner(char *);
78 static void kill_daemon(char *);
79 static void kill_cleaner(char *);
80 #endif /* WANT_CLEANER */
81
82 static int short_rds, cleaner_debug, cleaner_bytes, fs_idle, noclean;
83 static const char *nsegs;
84
85 #ifndef MOUNT_NOMAIN
86 int
87 main(int argc, char **argv)
88 {
89
90 setprogname(argv[0]);
91 return mount_lfs(argc, argv);
92 }
93 #endif
94
95 void
96 mount_lfs_parseargs(int argc, char *argv[],
97 struct ufs_args *args, int *mntflags,
98 char *canon_dev, char *canon_dir)
99 {
100 int ch;
101 mntoptparse_t mp;
102
103 memset(args, 0, sizeof(*args));
104 nsegs = "4";
105 *mntflags = noclean = 0;
106 cleaner_bytes = 1;
107 while ((ch = getopt(argc, argv, "bdiN:no:s")) != -1)
108 switch (ch) {
109 case 'b':
110 cleaner_bytes = !cleaner_bytes;
111 break;
112 case 'd':
113 cleaner_debug = 1;
114 break;
115 case 'i':
116 fs_idle = 1;
117 break;
118 case 'n':
119 noclean = 1;
120 break;
121 case 'N':
122 nsegs = optarg;
123 break;
124 case 'o':
125 mp = getmntopts(optarg, mopts, mntflags, 0);
126 if (mp == NULL)
127 err(1, "getmntopts");
128 freemntopts(mp);
129 break;
130 case 's':
131 short_rds = 1;
132 break;
133 case '?':
134 default:
135 usage();
136 }
137 argc -= optind;
138 argv += optind;
139
140 if (argc != 2)
141 usage();
142
143 pathadj(argv[0], canon_dev);
144 args->fspec = canon_dev;
145
146 pathadj(argv[1], canon_dir);
147 }
148
149 int
150 mount_lfs(int argc, char *argv[])
151 {
152 struct ufs_args args;
153 int mntflags;
154 int mntsize, oldflags, i;
155 char fs_name[MAXPATHLEN], canon_dev[MAXPATHLEN];
156 struct statvfs *mntbuf;
157 const char *errcause;
158
159 mount_lfs_parseargs(argc, argv, &args, &mntflags, canon_dev, fs_name);
160
161 /*
162 * Record the previous status of this filesystem (if any) before
163 * performing the mount, so we can know whether to start or
164 * kill the cleaner process below.
165 */
166 oldflags = MNT_RDONLY; /* If not mounted, pretend r/o */
167 if (mntflags & MNT_UPDATE) {
168 if ((mntsize = getmntinfo(&mntbuf, MNT_NOWAIT)) == 0)
169 err(1, "getmntinfo");
170 for (i = 0; i < mntsize; i++) {
171 if (strcmp(mntbuf[i].f_mntfromname, args.fspec) == 0) {
172 oldflags = mntbuf[i].f_flag;
173 break;
174 }
175 }
176 }
177
178 if (mount(MOUNT_LFS, fs_name, mntflags, &args, sizeof args) == -1) {
179 switch (errno) {
180 case EMFILE:
181 errcause = "mount table full";
182 break;
183 case EINVAL:
184 if (mntflags & MNT_UPDATE)
185 errcause =
186 "specified device does not match mounted device";
187 else
188 errcause = "incorrect super block";
189 break;
190 default:
191 errcause = strerror(errno);
192 break;
193 }
194 errx(1, "%s on %s: %s", args.fspec, fs_name, errcause);
195 }
196
197 #ifdef WANT_CLEANER
198 /* Not mounting fresh or upgrading to r/w; don't start the cleaner */
199 if (!(oldflags & MNT_RDONLY) || (mntflags & MNT_RDONLY)
200 || (mntflags & MNT_GETARGS))
201 noclean = 1;
202 if (!noclean)
203 invoke_cleaner(fs_name);
204 /* NOTREACHED */
205
206 /* Downgrade to r/o; kill the cleaner */
207 if ((mntflags & MNT_RDONLY) && !(oldflags & MNT_RDONLY))
208 kill_cleaner(fs_name);
209 #else
210 __USE(oldflags);
211 #endif /* WANT_CLEANER */
212
213 exit(0);
214 }
215
216 #ifdef WANT_CLEANER
217 static void
218 kill_daemon(char *pidname)
219 {
220 FILE *fp;
221 char s[80];
222 pid_t pid;
223
224 fp = fopen(pidname, "r");
225 if (fp) {
226 fgets(s, 80, fp);
227 pid = atoi(s);
228 if (pid)
229 kill(pid, SIGINT);
230 fclose(fp);
231 }
232 }
233
234 static void
235 kill_cleaner(char *name)
236 {
237 char *pidname;
238 char *cp;
239 int off;
240
241 /* Parent first */
242 asprintf(&pidname, "%slfs_cleanerd:m:%s.pid", _PATH_VARRUN, name);
243 if (!pidname)
244 err(1, "malloc");
245 off = strlen(_PATH_VARRUN);
246 while((cp = strchr(pidname + off, '/')) != NULL)
247 *cp = '|';
248 kill_daemon(pidname);
249 free(pidname);
250
251 /* Then child */
252 asprintf(&pidname, "%slfs_cleanerd:s:%s.pid", _PATH_VARRUN, name);
253 if (!pidname)
254 err(1, "malloc");
255 off = strlen(_PATH_VARRUN);
256 while((cp = strchr(pidname + off, '/')) != NULL)
257 *cp = '|';
258 kill_daemon(pidname);
259 free(pidname);
260 }
261
262 static void
263 invoke_cleaner(char *name)
264 {
265 const char *args[7], **ap = args;
266
267 /* Build the argument list. */
268 *ap++ = _PATH_LFS_CLEANERD;
269 if (cleaner_bytes)
270 *ap++ = "-b";
271 if (nsegs) {
272 *ap++ = "-n";
273 *ap++ = nsegs;
274 }
275 if (short_rds)
276 *ap++ = "-s";
277 if (cleaner_debug)
278 *ap++ = "-d";
279 if (fs_idle)
280 *ap++ = "-f";
281 *ap++ = name;
282 *ap = NULL;
283
284 execv(args[0], __UNCONST(args));
285 err(1, "exec %s", _PATH_LFS_CLEANERD);
286 }
287 #endif /* WANT_CLEANER */
288
289 static void
290 usage(void)
291 {
292 (void)fprintf(stderr,
293 "usage: %s [-bdins] [-N nsegs] [-o options] special node\n",
294 getprogname());
295 exit(1);
296 }
297