1 /*
2  * Copyright (c) 2007 The DragonFly Project.  All rights reserved.
3  *
4  * This code is derived from software contributed to The DragonFly Project
5  * by Matthew Dillon <dillon@backplane.com>
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  *
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in
15  *    the documentation and/or other materials provided with the
16  *    distribution.
17  * 3. Neither the name of The DragonFly Project nor the names of its
18  *    contributors may be used to endorse or promote products derived
19  *    from this software without specific, prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
25  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34 
35 #include <sys/types.h>
36 #include <sys/diskslice.h>
37 #include <sys/diskmbr.h>
38 #include <sys/stat.h>
39 #include <sys/time.h>
40 #include <sys/syslimits.h>
41 #include <vfs/hammer/hammer_mount.h>
42 #include <vfs/hammer/hammer_disk.h>
43 
44 #include <stdio.h>
45 #include <stdlib.h>
46 #include <stdarg.h>
47 #include <stddef.h>
48 #include <unistd.h>
49 #include <string.h>
50 #include <errno.h>
51 #include <fcntl.h>
52 #include <uuid.h>
53 #include <err.h>
54 #include <assert.h>
55 #include <ctype.h>
56 #include <mntopts.h>
57 
58 typedef const char **ary_ptr_t;
59 
60 static void extract_volumes(ary_ptr_t *aryp, int *countp, char **av, int ac);
61 
62 #define MOPT_UPDATE         { "update",     0, MNT_UPDATE, 0 }
63 
64 #define MOPT_HAMMEROPTS		\
65 	{ "history", 1, HMNT_NOHISTORY, 1 },	\
66 	{ "master=", 0, HMNT_MASTERID, 1 },	\
67 	{ "mirror", 1, HMNT_MASTERID, 1 }
68 
69 static struct mntopt mopts[] = { MOPT_STDOPTS, MOPT_HAMMEROPTS,
70 				 MOPT_UPDATE, MOPT_NULL };
71 
72 static void usage(void);
73 
74 int
75 main(int ac, char **av)
76 {
77 	struct hammer_mount_info info;
78 	struct vfsconf vfc;
79 	struct hammer_volume_ondisk *od;
80 	int mount_flags = 0;
81 	int error;
82 	int ch;
83 	int init_flags = 0;
84 	int ax;
85 	int fd;
86 	int pr;
87 	int fdevs_size;
88 	char *mountpt;
89 	char *ptr;
90 	char *fdevs;
91 
92 
93 	bzero(&info, sizeof(info));
94 	info.asof = 0;
95 	mount_flags = 0;
96 	info.hflags = 0;
97 
98 	while ((ch = getopt(ac, av, "o:T:u")) != -1) {
99 		switch(ch) {
100 		case 'T':
101 			info.asof = strtoull(optarg, NULL, 0);
102 			break;
103 		case 'o':
104 			getmntopts(optarg, mopts, &mount_flags, &info.hflags);
105 
106 
107 			/*
108 			 * Handle extended flags with parameters.
109 			 */
110 			if (info.hflags & HMNT_MASTERID) {
111 				ptr = strstr(optarg, "master=");
112 				if (ptr) {
113 					info.master_id = strtol(ptr + 7, NULL, 0);
114 					if (info.master_id == 0) {
115 						fprintf(stderr,
116 	"hammer_mount: Warning: a master id of 0 is the default, explicit\n"
117 	"settings should probably use 1-15\n");
118 					}
119 				}
120 				ptr = strstr(optarg, "nomirror");
121 				if (ptr)
122 					info.master_id = -1;
123 			}
124 			break;
125 		case 'u':
126 			init_flags |= MNT_UPDATE;
127 			break;
128 		default:
129 			usage();
130 			/* not reached */
131 		}
132 	}
133 	ac -= optind;
134 	av += optind;
135 	mount_flags |= init_flags;
136 
137 	/*
138 	 * Only the mount point need be specified in update mode.
139 	 */
140 	if (init_flags & MNT_UPDATE) {
141 		if (ac != 1) {
142 			usage();
143 			/* not reached */
144 		}
145 		mountpt = av[0];
146 		if (mount(vfc.vfc_name, mountpt, mount_flags, &info))
147 			err(1, "mountpoint %s", mountpt);
148 		exit(0);
149 	}
150 
151 	if (ac < 2) {
152 		usage();
153 		/* not reached */
154 	}
155 
156 	/*
157 	 * Mount arguments: vol [vol...] mountpt
158 	 */
159 	extract_volumes(&info.volumes, &info.nvolumes, av, ac - 1);
160 	mountpt = av[ac - 1];
161 
162 	/*
163 	 * Load the hammer module if necessary (this bit stolen from
164 	 * mount_null).
165 	 */
166 	error = getvfsbyname("hammer", &vfc);
167 	if (error && vfsisloadable("hammer")) {
168 		if (vfsload("hammer") != 0)
169 			err(1, "vfsload(hammer)");
170 		endvfsent();
171 		error = getvfsbyname("hammer", &vfc);
172 	}
173 	if (error)
174 		errx(1, "hammer filesystem is not available");
175 
176 	if (mount(vfc.vfc_name, mountpt, mount_flags, &info)) {
177 		/* Build fdevs in case of error to report failed devices */
178 		fdevs_size = ac * PATH_MAX;
179 		fdevs = malloc(fdevs_size);
180 		for (ax = 0; ax < ac - 1; ax++) {
181 			fd = open(info.volumes[ax], O_RDONLY);
182 			if (fd < 0 ) {
183 				printf ("%s: open failed\n", info.volumes[ax]);
184 				strlcat(fdevs, info.volumes[ax], fdevs_size);
185 				if (ax < ac - 2)
186 					strlcat(fdevs, " ", fdevs_size);
187 				continue;
188 			}
189 
190 			od = malloc(HAMMER_BUFSIZE);
191 			if (od == NULL) {
192 				close (fd);
193 				perror("malloc");
194 				continue;
195 			}
196 
197 			bzero(od, HAMMER_BUFSIZE);
198 			pr = pread(fd, od, HAMMER_BUFSIZE, 0);
199 			if (pr != HAMMER_BUFSIZE ||
200 				od->vol_signature != HAMMER_FSBUF_VOLUME) {
201 					printf("%s: Not a valid HAMMER filesystem\n", info.volumes[ax]);
202 					strlcat(fdevs, info.volumes[ax], fdevs_size);
203 					if (ax < ac - 2)
204 						strlcat(fdevs, " ", fdevs_size);
205 			}
206 			close(fd);
207 		}
208 		err(1,"mount %s on %s", fdevs, mountpt);
209 	}
210 	exit (0);
211 }
212 
213 /*
214  * Extract a volume list
215  */
216 static void
217 extract_volumes(ary_ptr_t *aryp, int *countp, char **av, int ac)
218 {
219 	int idx = 0;
220 	int arymax = 32;
221 	const char **ary = malloc(sizeof(char *) * 32);
222 	char *ptr;
223 	char *next;
224 
225 	while (ac) {
226 		if (idx == arymax) {
227 			arymax += 32;
228 			ary = realloc(ary, sizeof(char *) * arymax);
229 		}
230 		if (strchr(*av, ':') == NULL) {
231 			ary[idx++] = *av;
232 		} else {
233 			next = strdup(*av);
234 			while ((ptr = next) != NULL) {
235 				if (idx == arymax) {
236 					arymax += 32;
237 					ary = realloc(ary, sizeof(char *) *
238 						      arymax);
239 				}
240 				if ((next = strchr(ptr, ':')) != NULL)
241 					*next++ = 0;
242 				ary[idx++] = ptr;
243 			}
244 		}
245 		--ac;
246 		++av;
247 
248 	}
249 	*aryp = ary;
250 	*countp = idx;
251 }
252 
253 static
254 void
255 usage(void)
256 {
257 	fprintf(stderr, "usage: mount_hammer [-o options] [-T transaction-id] "
258 			"special ... node\n");
259 	fprintf(stderr, "       mount_hammer [-o options] [-T transaction-id] "
260 			"special[:special]* node\n");
261 	fprintf(stderr, "       mount_hammer -u [-o options] node\n");
262 	exit(1);
263 }
264