Fix tar -j support
[oweals/busybox.git] / util-linux / mount.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini mount implementation for busybox
4  *
5  * Copyright (C) 1995, 1996 by Bruce Perens <bruce@pixar.com>.
6  * Copyright (C) 1999-2003 by Erik Andersen <andersen@codepoet.org>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16  * General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21  *
22  * 3/21/1999    Charles P. Wright <cpwright@cpwright.com>
23  *              searches through fstab when -a is passed
24  *              will try mounting stuff with all fses when passed -t auto
25  *
26  * 1999-04-17   Dave Cinege...Rewrote -t auto. Fixed ro mtab.
27  *
28  * 1999-10-07   Erik Andersen <andersen@codepoet.org>.
29  *              Rewrite of a lot of code. Removed mtab usage (I plan on
30  *              putting it back as a compile-time option some time), 
31  *              major adjustments to option parsing, and some serious 
32  *              dieting all around.
33  *
34  * 1999-11-06   mtab suppport is back - andersee
35  *
36  * 2000-01-12   Ben Collins <bcollins@debian.org>, Borrowed utils-linux's
37  *              mount to add loop support.
38  *
39  * 2000-04-30   Dave Cinege <dcinege@psychosis.com>
40  *              Rewrote fstab while loop and lower mount section. Can now do
41  *              single mounts from fstab. Can override fstab options for single
42  *              mount. Common mount_one call for single mounts and 'all'. Fixed
43  *              mtab updating and stale entries. Removed 'remount' default. 
44  *      
45  */
46
47 #include <limits.h>
48 #include <stdlib.h>
49 #include <unistd.h>
50 #include <errno.h>
51 #include <string.h>
52 #include <stdio.h>
53 #include <mntent.h>
54 #include <ctype.h>
55 #include "busybox.h"
56
57 #ifdef CONFIG_NFSMOUNT
58 #if defined(__UCLIBC__) && ! defined(__UCLIBC_HAS_RPC__)
59 #error "You need to build uClibc with UCLIBC_HAS_RPC for busybox mount with NFS support to compile."
60 #endif
61 #endif
62
63 enum {
64         MS_MGC_VAL = 0xc0ed0000,        /* Magic number indicatng "new" flags */
65         MS_RDONLY = 1,          /* Mount read-only */
66         MS_NOSUID = 2,          /* Ignore suid and sgid bits */
67         MS_NODEV = 4,           /* Disallow access to device special files */
68         MS_NOEXEC = 8,          /* Disallow program execution */
69         MS_SYNCHRONOUS = 16,    /* Writes are synced at once */
70         MS_REMOUNT = 32,        /* Alter flags of a mounted FS */
71         MS_MANDLOCK = 64,       /* Allow mandatory locks on an FS */
72         S_QUOTA = 128,          /* Quota initialized for file/directory/symlink */
73         S_APPEND = 256,         /* Append-only file */
74         S_IMMUTABLE = 512,      /* Immutable file */
75         MS_NOATIME = 1024,      /* Do not update access times. */
76         MS_NODIRATIME = 2048,   /* Do not update directory access times */
77         MS_BIND = 4096,         /* Use the new linux 2.4.x "mount --bind" feature */
78 };
79
80
81 #if defined CONFIG_FEATURE_MOUNT_LOOP
82 #include <fcntl.h>
83 #include <sys/ioctl.h>
84 static int use_loop = FALSE;
85 #endif
86
87 extern int mount(__const char *__special_file, __const char *__dir,
88                                  __const char *__fstype, unsigned long int __rwflag,
89                                  __const void *__data);
90 extern int umount(__const char *__special_file);
91 extern int umount2(__const char *__special_file, int __flags);
92
93 extern int sysfs(int option, unsigned int fs_index, char *buf);
94
95 struct mount_options {
96         const char *name;
97         unsigned long and;
98         unsigned long or;
99 };
100
101 static const struct mount_options mount_options[] = {
102         {"async", ~MS_SYNCHRONOUS, 0},
103         {"atime", ~0, ~MS_NOATIME},
104         {"defaults", ~0, 0},
105         {"noauto", ~0, 0},
106         {"dev", ~MS_NODEV, 0},
107         {"diratime", ~0, ~MS_NODIRATIME},
108         {"exec", ~MS_NOEXEC, 0},
109         {"noatime", ~0, MS_NOATIME},
110         {"nodev", ~0, MS_NODEV},
111         {"nodiratime", ~0, MS_NODIRATIME},
112         {"noexec", ~0, MS_NOEXEC},
113         {"nosuid", ~0, MS_NOSUID},
114         {"remount", ~0, MS_REMOUNT},
115         {"ro", ~0, MS_RDONLY},
116         {"rw", ~MS_RDONLY, 0},
117         {"suid", ~MS_NOSUID, 0},
118         {"sync", ~0, MS_SYNCHRONOUS},
119         {"bind", ~0, MS_BIND},
120         {0, 0, 0}
121 };
122
123 static int
124 do_mount(char *specialfile, char *dir, char *filesystemtype, long flags,
125                  void *string_flags, int useMtab, int fakeIt, char *mtab_opts,
126                  int mount_all)
127 {
128         int status = 0;
129
130 #if defined CONFIG_FEATURE_MOUNT_LOOP
131         char *lofile = NULL;
132 #endif
133
134         if (!fakeIt) {
135 #if defined CONFIG_FEATURE_MOUNT_LOOP
136                 if (use_loop == TRUE) {
137                         int loro = flags & MS_RDONLY;
138
139                         lofile = specialfile;
140
141                         specialfile = find_unused_loop_device();
142                         if (specialfile == NULL) {
143                                 bb_error_msg_and_die("Could not find a spare loop device");
144                         }
145                         if (set_loop(specialfile, lofile, 0, &loro)) {
146                                 bb_error_msg_and_die("Could not setup loop device");
147                         }
148                         if (!(flags & MS_RDONLY) && loro) {     /* loop is ro, but wanted rw */
149                                 bb_error_msg("WARNING: loop device is read-only");
150                                 flags |= MS_RDONLY;
151                         }
152                 }
153 #endif
154                 status = mount(specialfile, dir, filesystemtype, flags, string_flags);
155                 if (status < 0 && errno == EROFS) {
156                         bb_error_msg("%s is write-protected, mounting read-only",
157                                           specialfile);
158                         status = mount(specialfile, dir, filesystemtype, flags |=
159                                                    MS_RDONLY, string_flags);
160                 }
161                 /* Don't whine about already mounted filesystems when mounting all. */
162                 if (status < 0 && errno == EBUSY && mount_all) {
163                         return TRUE;
164                 }
165         }
166
167
168         /* If the mount was sucessful, do anything needed, then return TRUE */
169         if (status == 0 || fakeIt == TRUE) {
170
171 #if defined CONFIG_FEATURE_MTAB_SUPPORT
172                 if (useMtab) {
173                         erase_mtab(specialfile);        /* Clean any stale entries */
174                         write_mtab(specialfile, dir, filesystemtype, flags, mtab_opts);
175                 }
176 #endif
177                 return (TRUE);
178         }
179
180         /* Bummer.  mount failed.  Clean up */
181 #if defined CONFIG_FEATURE_MOUNT_LOOP
182         if (lofile != NULL) {
183                 del_loop(specialfile);
184         }
185 #endif
186
187         if (errno == EPERM) {
188                 bb_error_msg_and_die(bb_msg_perm_denied_are_you_root);
189         }
190
191         return (FALSE);
192 }
193
194
195 static void paste_str(char **s1, const char *s2)
196 {
197         *s1 = xrealloc(*s1, strlen(*s1) + strlen(s2) + 1);
198         strcat(*s1, s2);
199 }
200
201 /* Seperate standard mount options from the nonstandard string options */
202 static void parse_mount_options(char *options, int *flags, char **strflags)
203 {
204         while (options) {
205                 int gotone = FALSE;
206                 char *comma = strchr(options, ',');
207                 const struct mount_options *f = mount_options;
208
209                 if (comma) {
210                         *comma = '\0';
211                 }
212
213                 while (f->name != 0) {
214                         if (strcasecmp(f->name, options) == 0) {
215
216                                 *flags &= f->and;
217                                 *flags |= f->or;
218                                 gotone = TRUE;
219                                 break;
220                         }
221                         f++;
222                 }
223 #if defined CONFIG_FEATURE_MOUNT_LOOP
224                 if (!strcasecmp("loop", options)) {     /* loop device support */
225                         use_loop = TRUE;
226                         gotone = TRUE;
227                 }
228 #endif
229                 if (!gotone) {
230                         if (**strflags) {
231                                 /* have previous parsed options */
232                                 paste_str(strflags, ",");
233                         }
234                         paste_str(strflags, options);
235                 }
236                 if (comma) {
237                         *comma = ',';
238                         options = ++comma;
239                 } else {
240                         break;
241                 }
242         }
243 }
244
245 static int mount_one(char *blockDevice, char *directory, char *filesystemType,
246                                          unsigned long flags, char *string_flags, int useMtab,
247                                          int fakeIt, char *mtab_opts, int whineOnErrors,
248                                          int mount_all)
249 {
250         int status = 0;
251         if (strcmp(filesystemType, "auto") == 0) {
252                 char buf[255];
253                 FILE *f;
254                 int read_proc = 0;
255
256                 f = fopen("/etc/filesystems", "r");
257
258                 if (f) {
259                         while (fgets(buf, sizeof(buf), f)) {
260                                 if (*buf == '*') {
261                                         read_proc = 1;
262                                 } else if (*buf == '#') {
263                                         continue;
264                                 } else {
265                                         filesystemType = buf;
266
267                                         /* Add NULL termination to each line */
268                                         while (*filesystemType && !isspace(*filesystemType)) {
269                                                 filesystemType++;
270                                         }
271                                         *filesystemType = '\0';
272
273                                         filesystemType = buf;
274
275                                         if (bb_strlen(filesystemType)) {
276                                                 status =
277                                                         do_mount(blockDevice, directory, filesystemType,
278                                                                          flags | MS_MGC_VAL, string_flags,
279                                                                          useMtab, fakeIt, mtab_opts, mount_all);
280                                                 if (status) {
281                                                         break;
282                                                 }
283                                         }
284
285                                 }
286                         }
287                         fclose(f);
288                 }
289
290                 if ((!f || read_proc) && !status) {
291                         f = bb_xfopen("/proc/filesystems", "r");
292
293                         while (fgets(buf, sizeof(buf), f) != NULL) {
294                                 filesystemType = buf;
295                                 if (*filesystemType == '\t') {  /* Not a nodev filesystem */
296
297                                         /* Add NULL termination to each line */
298                                         while (*filesystemType && *filesystemType != '\n') {
299                                                 filesystemType++;
300                                         }
301                                         *filesystemType = '\0';
302
303                                         filesystemType = buf;
304                                         filesystemType++;       /* hop past tab */
305
306                                         status =
307                                                 do_mount(blockDevice, directory, filesystemType,
308                                                                  flags | MS_MGC_VAL, string_flags, useMtab,
309                                                                  fakeIt, mtab_opts, mount_all);
310                                         if (status) {
311                                                 break;
312                                         }
313                                 }
314                         }
315                 }
316                 fclose(f);
317         } else {
318                 status =
319                         do_mount(blockDevice, directory, filesystemType,
320                                          flags | MS_MGC_VAL, string_flags, useMtab, fakeIt,
321                                          mtab_opts, mount_all);
322         }
323
324         if (!status) {
325                 if (whineOnErrors) {
326                         bb_perror_msg("Mounting %s on %s failed", blockDevice, directory);
327                 }
328                 return (FALSE);
329         }
330         return (TRUE);
331 }
332
333 static void show_mounts(char *onlytype)
334 {
335         FILE *mountTable = setmntent(bb_path_mtab_file, "r");
336
337         if (mountTable) {
338                 struct mntent *m;
339
340                 while ((m = getmntent(mountTable)) != 0) {
341                         char *blockDevice = m->mnt_fsname;
342
343                         if (strcmp(blockDevice, "rootfs") == 0) {
344                                 continue;
345                         } else if (strcmp(blockDevice, "/dev/root") == 0) {
346                                 blockDevice = find_real_root_device_name(blockDevice);
347                         }
348                         if (!onlytype || (strcmp(m->mnt_type, onlytype) == 0)) {
349                                 printf("%s on %s type %s (%s)\n", blockDevice, m->mnt_dir,
350                                            m->mnt_type, m->mnt_opts);
351                         }
352 #ifdef CONFIG_FEATURE_CLEAN_UP
353                         if (blockDevice != m->mnt_fsname) {
354                                 free(blockDevice);
355                         }
356 #endif
357                 }
358                 endmntent(mountTable);
359         } else {
360                 bb_perror_msg_and_die(bb_path_mtab_file);
361         }
362         exit(EXIT_SUCCESS);
363 }
364
365 extern int mount_main(int argc, char **argv)
366 {
367         struct stat statbuf;
368         char *string_flags = bb_xstrdup("");
369         char *extra_opts;
370         int flags = 0;
371         char *filesystemType = "auto";
372         int got_filesystemType = 0;
373         char *device = xmalloc(PATH_MAX);
374         char *directory = xmalloc(PATH_MAX);
375         struct mntent *m = NULL;
376         int all = FALSE;
377         int fakeIt = FALSE;
378         int useMtab = TRUE;
379         int rc = EXIT_FAILURE;
380         FILE *f = 0;
381         int opt;
382
383         /* Parse options */
384         while ((opt = getopt(argc, argv, "o:rt:wafnv")) > 0) {
385                 switch (opt) {
386                 case 'o':
387                         parse_mount_options(optarg, &flags, &string_flags);
388                         break;
389                 case 'r':
390                         flags |= MS_RDONLY;
391                         break;
392                 case 't':
393                         filesystemType = optarg;
394                         got_filesystemType = 1;
395                         break;
396                 case 'w':
397                         flags &= ~MS_RDONLY;
398                         break;
399                 case 'a':
400                         all = TRUE;
401                         break;
402                 case 'f':
403                         fakeIt = TRUE;
404                         break;
405 #ifdef CONFIG_FEATURE_MTAB_SUPPORT
406                 case 'n':
407                         useMtab = FALSE;
408                         break;
409 #endif
410                 case 'v':
411                         break;          /* ignore -v */
412                 }
413         }
414
415         if (!all && (optind == argc)) {
416                 show_mounts(got_filesystemType ? filesystemType : NULL);
417         }
418
419         if (optind < argc) {
420                 /* if device is a filename get its real path */
421                 if (stat(argv[optind], &statbuf) == 0) {
422                         char *tmp = bb_simplify_path(argv[optind]);
423
424                         safe_strncpy(device, tmp, PATH_MAX);
425                 } else {
426                         safe_strncpy(device, argv[optind], PATH_MAX);
427                 }
428         }
429
430         if (optind + 1 < argc)
431                 directory = bb_simplify_path(argv[optind + 1]);
432
433         if (all || optind + 1 == argc) {
434                 f = setmntent("/etc/fstab", "r");
435
436                 if (f == NULL)
437                         bb_perror_msg_and_die("\nCannot read /etc/fstab");
438
439                 while ((m = getmntent(f)) != NULL) {
440                         if (!all && (optind + 1 == argc)
441                                 && ((strcmp(device, m->mnt_fsname) != 0)
442                                         && (strcmp(device, m->mnt_dir) != 0))) {
443                                 continue;
444                         }
445
446                         if (all && (    /* If we're mounting 'all' */
447                                                    (strstr(m->mnt_opts, "noauto")) ||   /* and the file system isn't noauto, */
448                                                    (strstr(m->mnt_type, "swap")))) /* and isn't swap, then mount it */
449                         {
450                                 continue;
451                         }
452
453                         if (all || flags == 0) {        /* Allow single mount to override fstab flags */
454                                 flags = 0;
455                                 string_flags[0] = 0;
456                                 parse_mount_options(m->mnt_opts, &flags, &string_flags);
457                         }
458
459                         strcpy(device, m->mnt_fsname);
460                         strcpy(directory, m->mnt_dir);
461                         filesystemType = bb_xstrdup(m->mnt_type);
462                   singlemount:
463                         extra_opts = string_flags;
464                         rc = EXIT_SUCCESS;
465 #ifdef CONFIG_NFSMOUNT
466                         if (strchr(device, ':') != NULL) {
467                                 filesystemType = "nfs";
468                                 if (nfsmount
469                                         (device, directory, &flags, &extra_opts, &string_flags,
470                                          1)) {
471                                         bb_perror_msg("nfsmount failed");
472                                         rc = EXIT_FAILURE;
473                                 }
474                         }
475 #endif
476                         if (!mount_one
477                                 (device, directory, filesystemType, flags, string_flags,
478                                  useMtab, fakeIt, extra_opts, TRUE, all)) {
479                                 rc = EXIT_FAILURE;
480                         }
481                         if (!all) {
482                                 break;
483                         }
484                 }
485                 if (f) {
486                         endmntent(f);
487                 }
488                 if (!all && f && m == NULL) {
489                         fprintf(stderr, "Can't find %s in /etc/fstab\n", device);
490                 }
491                 return rc;
492         }
493
494         goto singlemount;
495 }