df6b3a822811939971cf44c2c903023861f1e09c
[oweals/busybox.git] / 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-2002 by Erik Andersen <andersee@debian.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 <andersee@debian.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 #if defined CONFIG_FEATURE_USE_DEVPS_PATCH
57 #       include <linux/devmtab.h> /* For Erik's nifty devmtab device driver */
58 #endif
59
60 enum {
61         MS_MGC_VAL = 0xc0ed0000, /* Magic number indicatng "new" flags */
62         MS_RDONLY = 1,      /* Mount read-only */
63         MS_NOSUID = 2,      /* Ignore suid and sgid bits */
64         MS_NODEV = 4,      /* Disallow access to device special files */
65         MS_NOEXEC = 8,      /* Disallow program execution */
66         MS_SYNCHRONOUS = 16,      /* Writes are synced at once */
67         MS_REMOUNT = 32,      /* Alter flags of a mounted FS */
68         MS_MANDLOCK = 64,      /* Allow mandatory locks on an FS */
69         S_QUOTA = 128,     /* Quota initialized for file/directory/symlink */
70         S_APPEND = 256,     /* Append-only file */
71         S_IMMUTABLE = 512,     /* Immutable file */
72         MS_NOATIME = 1024,    /* Do not update access times. */
73         MS_NODIRATIME = 2048,    /* Do not update directory access times */
74         MS_BIND = 4096,    /* Use the new linux 2.4.x "mount --bind" feature */
75 };
76
77
78 #if defined CONFIG_FEATURE_MOUNT_LOOP
79 #include <fcntl.h>
80 #include <sys/ioctl.h>
81 static int use_loop = FALSE;
82 #endif
83
84 extern int mount (__const char *__special_file, __const char *__dir,
85                         __const char *__fstype, unsigned long int __rwflag,
86                         __const void *__data);
87 extern int umount (__const char *__special_file);
88 extern int umount2 (__const char *__special_file, int __flags);
89
90 extern int sysfs( int option, unsigned int fs_index, char * buf);
91
92 extern const char mtab_file[];  /* Defined in utility.c */
93
94 struct mount_options {
95         const char *name;
96         unsigned long and;
97         unsigned long or;
98 };
99
100 static const struct mount_options mount_options[] = {
101         {"async", ~MS_SYNCHRONOUS, 0},
102         {"atime", ~0, ~MS_NOATIME},
103         {"defaults", ~0, 0},
104         {"noauto", ~0, 0},
105         {"dev", ~MS_NODEV, 0},
106         {"diratime", ~0, ~MS_NODIRATIME},
107         {"exec", ~MS_NOEXEC, 0},
108         {"noatime", ~0, MS_NOATIME},
109         {"nodev", ~0, MS_NODEV},
110         {"nodiratime", ~0, MS_NODIRATIME},
111         {"noexec", ~0, MS_NOEXEC},
112         {"nosuid", ~0, MS_NOSUID},
113         {"remount", ~0, MS_REMOUNT},
114         {"ro", ~0, MS_RDONLY},
115         {"rw", ~MS_RDONLY, 0},
116         {"suid", ~MS_NOSUID, 0},
117         {"sync", ~0, MS_SYNCHRONOUS},
118         {"bind", ~0, MS_BIND},
119         {0, 0, 0}
120 };
121
122 static int
123 do_mount(char *specialfile, char *dir, char *filesystemtype,
124                  long flags, void *string_flags, int useMtab, int fakeIt,
125                  char *mtab_opts, int mount_all)
126 {
127         int status = 0;
128 #if defined CONFIG_FEATURE_MOUNT_LOOP
129         char *lofile = NULL;
130 #endif
131
132         if (! fakeIt)
133         {
134 #if defined CONFIG_FEATURE_MOUNT_LOOP
135                 if (use_loop==TRUE) {
136                         int loro = flags & MS_RDONLY;
137                         
138                         lofile = specialfile;
139
140                         specialfile = find_unused_loop_device();
141                         if (specialfile == NULL) {
142                                 error_msg_and_die("Could not find a spare loop device");
143                         }
144                         if (set_loop(specialfile, lofile, 0, &loro)) {
145                                 error_msg_and_die("Could not setup loop device");
146                         }
147                         if (!(flags & MS_RDONLY) && loro) {     /* loop is ro, but wanted rw */
148                                 error_msg("WARNING: loop device is read-only");
149                                 flags |= MS_RDONLY;
150                         }
151                 }
152 #endif
153                 status = mount(specialfile, dir, filesystemtype, flags, string_flags);
154                 if (status < 0 && errno == EROFS) {
155                         error_msg("%s is write-protected, mounting read-only", specialfile);
156                         status = mount(specialfile, dir, filesystemtype, flags |= MS_RDONLY, string_flags);
157                 }
158                 /* Don't whine about already mounted filesystems when mounting all. */
159                 if (status < 0 && errno == EBUSY && mount_all)
160                         return TRUE;
161         }
162
163
164         /* If the mount was sucessful, do anything needed, then return TRUE */
165         if (status == 0 || fakeIt==TRUE) {
166
167 #if defined CONFIG_FEATURE_MTAB_SUPPORT
168                 if (useMtab) {
169                         erase_mtab(specialfile);        // Clean any stale entries
170                         write_mtab(specialfile, dir, filesystemtype, flags, mtab_opts);
171                 }
172 #endif
173                 return (TRUE);
174         }
175
176         /* Bummer.  mount failed.  Clean up */
177 #if defined CONFIG_FEATURE_MOUNT_LOOP
178         if (lofile != NULL) {
179                 del_loop(specialfile);
180         }
181 #endif
182
183         if (errno == EPERM) {
184                 error_msg_and_die("permission denied. Are you root?");
185         }
186
187         return (FALSE);
188 }
189
190
191 static void paste_str(char **s1, const char *s2)
192 {
193         *s1 = xrealloc(*s1, strlen(*s1)+strlen(s2)+1);
194         strcat(*s1, s2);
195 }
196
197 /* Seperate standard mount options from the nonstandard string options */
198 static void
199 parse_mount_options(char *options, int *flags, char **strflags)
200 {
201         while (options) {
202                 int gotone = FALSE;
203                 char *comma = strchr(options, ',');
204                 const struct mount_options *f = mount_options;
205
206                 if (comma)
207                         *comma = '\0';
208
209                 while (f->name != 0) {
210                         if (strcasecmp(f->name, options) == 0) {
211
212                                 *flags &= f->and;
213                                 *flags |= f->or;
214                                 gotone = TRUE;
215                                 break;
216                         }
217                         f++;
218                 }
219 #if defined CONFIG_FEATURE_MOUNT_LOOP
220                 if (!strcasecmp("loop", options)) { /* loop device support */
221                         use_loop = TRUE;
222                         gotone = TRUE;
223                 }
224 #endif
225                 if (! gotone) {
226                         if (**strflags) /* have previous parsed options */
227                                 paste_str(strflags, ",");
228                         paste_str(strflags, options);
229                 }
230                 if (comma) {
231                         *comma = ',';
232                         options = ++comma;
233                 } else {
234                         break;
235                 }
236         }
237 }
238
239 static int
240 mount_one(char *blockDevice, char *directory, char *filesystemType,
241                   unsigned long flags, char *string_flags, int useMtab, int fakeIt,
242                   char *mtab_opts, int whineOnErrors, int mount_all)
243 {
244         int status = 0;
245
246 #if defined CONFIG_FEATURE_USE_DEVPS_PATCH
247         if (strcmp(filesystemType, "auto") == 0) {
248                 static const char *noauto_array[] = { "tmpfs", "shm", "proc", "ramfs", "devpts", "devfs", "usbdevfs", 0 };
249                 const char **noauto_fstype;
250                 const int num_of_filesystems = sysfs(3, 0, 0);
251                 char buf[255];
252                 int i=0;
253
254                 filesystemType=buf;
255
256                 while(i < num_of_filesystems) {
257                         sysfs(2, i++, filesystemType);
258                         for (noauto_fstype = noauto_array; *noauto_fstype; noauto_fstype++) {
259                                 if (!strcmp(filesystemType, *noauto_fstype)) {
260                                         break;
261                                 }
262                         }
263                         if (!*noauto_fstype) {
264                                 status = do_mount(blockDevice, directory, filesystemType,
265                                         flags | MS_MGC_VAL, string_flags,
266                                         useMtab, fakeIt, mtab_opts, mount_all);
267                                 if (status)
268                                         break;
269                         }
270                 }
271         } 
272 #else
273         if (strcmp(filesystemType, "auto") == 0) {
274                 char buf[255];
275                 FILE *f;
276                 int read_proc = 0;
277                 
278                 f = fopen ( "/etc/filesystems", "r" );
279                 
280                 if ( f ) {
281                         while ( fgets ( buf, sizeof( buf ), f )) {
282                                 if ( *buf == '*' )
283                                         read_proc = 1;
284                                 else if ( *buf == '#' )
285                                         continue;
286                                 else {
287                                         filesystemType = buf;
288                                 
289                                         // Add NULL termination to each line
290                                         while (*filesystemType && !isspace ( *filesystemType ))
291                                                 filesystemType++;
292                                         *filesystemType = '\0';
293
294                                         filesystemType = buf;
295                                         
296                                         if ( xstrlen ( filesystemType )) {
297                                                 status = do_mount(blockDevice, directory, filesystemType,
298                                                                                   flags | MS_MGC_VAL, string_flags,
299                                                                                   useMtab, fakeIt, mtab_opts, mount_all);
300                                                 if (status)
301                                                         break;
302                                         }
303                                         
304                                 }
305                         }               
306                         fclose ( f );
307                 }
308
309                 if (( !f || read_proc ) && !status ) {
310                         f = xfopen("/proc/filesystems", "r");
311
312                         while (fgets(buf, sizeof(buf), f) != NULL) {
313                                 filesystemType = buf;
314                                 if (*filesystemType == '\t') {  // Not a nodev filesystem
315         
316                                         // Add NULL termination to each line
317                                         while (*filesystemType && *filesystemType != '\n')
318                                                 filesystemType++;
319                                         *filesystemType = '\0';
320
321                                         filesystemType = buf;
322                                         filesystemType++;       // hop past tab
323
324                                         status = do_mount(blockDevice, directory, filesystemType,
325                                                                           flags | MS_MGC_VAL, string_flags,
326                                                                           useMtab, fakeIt, mtab_opts, mount_all);
327                                         if (status)
328                                                 break;
329                                 }
330                         }
331                 }
332                 fclose(f);
333         }
334 #endif
335         else {
336                 status = do_mount(blockDevice, directory, filesystemType,
337                                 flags | MS_MGC_VAL, string_flags, useMtab,
338                                 fakeIt, mtab_opts, mount_all);
339         }
340
341         if (! status) {
342                 if (whineOnErrors) {
343                         perror_msg("Mounting %s on %s failed", blockDevice, directory);
344                 }
345                 return (FALSE);
346         }
347         return (TRUE);
348 }
349
350 static void show_mounts(char *onlytype)
351 {
352 #if defined CONFIG_FEATURE_USE_DEVPS_PATCH
353         int fd, i, numfilesystems;
354         char device[] = "/dev/mtab";
355         struct k_mntent *mntentlist;
356
357         /* open device */ 
358         fd = open(device, O_RDONLY);
359         if (fd < 0)
360                 perror_msg_and_die("open failed for `%s'", device);
361
362         /* How many mounted filesystems?  We need to know to 
363          * allocate enough space for later... */
364         numfilesystems = ioctl (fd, DEVMTAB_COUNT_MOUNTS);
365         if (numfilesystems<0)
366                 perror_msg_and_die( "\nDEVMTAB_COUNT_MOUNTS");
367         mntentlist = (struct k_mntent *) xcalloc ( numfilesystems, sizeof(struct k_mntent));
368                 
369         /* Grab the list of mounted filesystems */
370         if (ioctl (fd, DEVMTAB_GET_MOUNTS, mntentlist)<0)
371                 perror_msg_and_die( "\nDEVMTAB_GET_MOUNTS");
372
373         for( i = 0 ; i < numfilesystems ; i++) {
374                 if ( !onlytype || ( strcmp ( mntentlist[i].mnt_type, onlytype ) == 0 )) {
375                         printf( "%s %s %s %s %d %d\n", mntentlist[i].mnt_fsname,
376                                         mntentlist[i].mnt_dir, mntentlist[i].mnt_type, 
377                                         mntentlist[i].mnt_opts, mntentlist[i].mnt_freq, 
378                                         mntentlist[i].mnt_passno);
379                 }
380         }
381 #ifdef CONFIG_FEATURE_CLEAN_UP
382         /* Don't bother to close files or free memory.  Exit 
383          * does that automagically, so we can save a few bytes */
384         free( mntentlist);
385         close(fd);
386 #endif
387         exit(EXIT_SUCCESS);
388 #else
389         FILE *mountTable = setmntent(mtab_file, "r");
390
391         if (mountTable) {
392                 struct mntent *m;
393
394                 while ((m = getmntent(mountTable)) != 0) {
395                         char *blockDevice = m->mnt_fsname;
396                         if (strcmp(blockDevice, "/dev/root") == 0) {
397                                 blockDevice = find_real_root_device_name(blockDevice);
398                         }
399                         if ( !onlytype || ( strcmp ( m-> mnt_type, onlytype ) == 0 )) {
400                                 printf("%s on %s type %s (%s)\n", blockDevice, m->mnt_dir,
401                                            m->mnt_type, m->mnt_opts);
402                         }
403 #ifdef CONFIG_FEATURE_CLEAN_UP
404                         if(blockDevice != m->mnt_fsname)
405                                 free(blockDevice);
406 #endif
407                 }
408                 endmntent(mountTable);
409         } else {
410                 perror_msg_and_die("%s", mtab_file);
411         }
412         exit(EXIT_SUCCESS);
413 #endif
414 }
415
416 extern int mount_main(int argc, char **argv)
417 {
418         struct stat statbuf;
419         char *string_flags = xstrdup("");
420         char *extra_opts;
421         int flags = 0;
422         char *filesystemType = "auto";
423         int got_filesystemType = 0;
424         char *device = xmalloc(PATH_MAX);
425         char *directory = xmalloc(PATH_MAX);
426         struct mntent *m = NULL;
427         int all = FALSE;
428         int fakeIt = FALSE;
429         int useMtab = TRUE;
430         int rc = EXIT_FAILURE;
431         FILE *f = 0;
432         int opt;
433
434         /* Parse options */
435         while ((opt = getopt(argc, argv, "o:rt:wafnv")) > 0) {
436                 switch (opt) {
437                 case 'o':
438                         parse_mount_options(optarg, &flags, &string_flags);
439                         break;
440                 case 'r':
441                         flags |= MS_RDONLY;
442                         break;
443                 case 't':
444                         filesystemType = optarg;
445                         got_filesystemType = 1;
446                         break;
447                 case 'w':
448                         flags &= ~MS_RDONLY;
449                         break;
450                 case 'a':
451                         all = TRUE;
452                         break;
453                 case 'f':
454                         fakeIt = TRUE;
455                         break;
456 #ifdef CONFIG_FEATURE_MTAB_SUPPORT
457                 case 'n':
458                         useMtab = FALSE;
459                         break;
460 #endif
461                 case 'v':
462                         break; /* ignore -v */
463                 }
464         }
465
466         if (!all && optind == argc)
467                 show_mounts(got_filesystemType ? filesystemType : 0);
468
469         if (optind < argc) {
470                 /* if device is a filename get its real path */
471                 if (stat(argv[optind], &statbuf) == 0) {
472                         char *tmp = simplify_path(argv[optind]);
473                         safe_strncpy(device, tmp, PATH_MAX);
474                 } else {
475                         safe_strncpy(device, argv[optind], PATH_MAX);
476                 }
477         }
478
479         if (optind + 1 < argc)
480                 directory = simplify_path(argv[optind + 1]);
481
482         if (all || optind + 1 == argc) {
483                 f = setmntent("/etc/fstab", "r");
484
485                 if (f == NULL)
486                         perror_msg_and_die( "\nCannot read /etc/fstab");
487
488                 while ((m = getmntent(f)) != NULL) {
489                         if (! all && optind + 1 == argc && (
490                                 (strcmp(device, m->mnt_fsname) != 0) &&
491                                 (strcmp(device, m->mnt_dir) != 0) ) ) {
492                                 continue;
493                         }
494                         
495                         if (all && (                                                    // If we're mounting 'all'
496                                 (strstr(m->mnt_opts, "noauto")) ||      // and the file system isn't noauto,
497                                 (strstr(m->mnt_type, "swap")) ||        // and isn't swap or nfs, then mount it
498                                 (strstr(m->mnt_type, "nfs")) ) ) {
499                                 continue;
500                         }
501                         
502                         if (all || flags == 0) {        // Allow single mount to override fstab flags
503                                 flags = 0;
504                                 string_flags[0] = 0;
505                                 parse_mount_options(m->mnt_opts, &flags, &string_flags);
506                         }
507                         
508                         strcpy(device, m->mnt_fsname);
509                         strcpy(directory, m->mnt_dir);
510                         filesystemType = xstrdup(m->mnt_type);
511 singlemount:                    
512                         extra_opts = string_flags;
513                         rc = EXIT_SUCCESS;
514 #ifdef CONFIG_NFSMOUNT
515                         if (strchr(device, ':') != NULL) {
516                                 filesystemType = "nfs";
517                                 if (nfsmount (device, directory, &flags, &extra_opts,
518                                                         &string_flags, 1)) {
519                                         perror_msg("nfsmount failed");
520                                         rc = EXIT_FAILURE;
521                                 }
522                         }
523 #endif
524                         if (!mount_one(device, directory, filesystemType, flags,
525                                         string_flags, useMtab, fakeIt, extra_opts, TRUE, all))
526                                 rc = EXIT_FAILURE;
527                                 
528                         if (! all)
529                                 break;
530                 }
531                 if (f)
532                         endmntent(f);
533                         
534                 if (! all && f && m == NULL)
535                         fprintf(stderr, "Can't find %s in /etc/fstab\n", device);
536         
537                 return rc;
538         }
539         
540         goto singlemount;
541 }