cgdconfig.c revision 1.20 1 1.20 martin /* $NetBSD: cgdconfig.c,v 1.20 2007/11/06 10:44:23 martin Exp $ */
2 1.1 elric
3 1.1 elric /*-
4 1.5 elric * Copyright (c) 2002, 2003 The NetBSD Foundation, Inc.
5 1.1 elric * All rights reserved.
6 1.1 elric *
7 1.1 elric * This code is derived from software contributed to The NetBSD Foundation
8 1.1 elric * by Roland C. Dowdeswell.
9 1.1 elric *
10 1.1 elric * Redistribution and use in source and binary forms, with or without
11 1.1 elric * modification, are permitted provided that the following conditions
12 1.1 elric * are met:
13 1.1 elric * 1. Redistributions of source code must retain the above copyright
14 1.1 elric * notice, this list of conditions and the following disclaimer.
15 1.1 elric * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 elric * notice, this list of conditions and the following disclaimer in the
17 1.1 elric * documentation and/or other materials provided with the distribution.
18 1.1 elric * 3. All advertising materials mentioning features or use of this software
19 1.1 elric * must display the following acknowledgement:
20 1.1 elric * This product includes software developed by the NetBSD
21 1.1 elric * Foundation, Inc. and its contributors.
22 1.1 elric * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.1 elric * contributors may be used to endorse or promote products derived
24 1.1 elric * from this software without specific prior written permission.
25 1.1 elric *
26 1.1 elric * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.1 elric * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.1 elric * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.1 elric * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.1 elric * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.1 elric * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.1 elric * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.1 elric * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.1 elric * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.1 elric * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.1 elric * POSSIBILITY OF SUCH DAMAGE.
37 1.1 elric */
38 1.1 elric
39 1.1 elric #include <sys/cdefs.h>
40 1.1 elric #ifndef lint
41 1.1 elric __COPYRIGHT(
42 1.5 elric "@(#) Copyright (c) 2002, 2003\
43 1.1 elric The NetBSD Foundation, Inc. All rights reserved.");
44 1.20 martin __RCSID("$NetBSD: cgdconfig.c,v 1.20 2007/11/06 10:44:23 martin Exp $");
45 1.1 elric #endif
46 1.1 elric
47 1.5 elric #include <err.h>
48 1.1 elric #include <errno.h>
49 1.1 elric #include <fcntl.h>
50 1.1 elric #include <libgen.h>
51 1.1 elric #include <stdio.h>
52 1.1 elric #include <stdlib.h>
53 1.1 elric #include <string.h>
54 1.1 elric #include <unistd.h>
55 1.1 elric #include <util.h>
56 1.1 elric
57 1.1 elric #include <sys/ioctl.h>
58 1.3 elric #include <sys/disklabel.h>
59 1.14 elric #include <sys/mman.h>
60 1.1 elric #include <sys/param.h>
61 1.13 elric #include <sys/resource.h>
62 1.1 elric
63 1.1 elric #include <dev/cgdvar.h>
64 1.1 elric
65 1.5 elric #include <ufs/ffs/fs.h>
66 1.5 elric
67 1.1 elric #include "params.h"
68 1.1 elric #include "pkcs5_pbkdf2.h"
69 1.1 elric #include "utils.h"
70 1.1 elric
71 1.1 elric #define CGDCONFIG_DIR "/etc/cgd"
72 1.1 elric #define CGDCONFIG_CFILE CGDCONFIG_DIR "/cgd.conf"
73 1.1 elric
74 1.17 cbiere enum action {
75 1.17 cbiere ACTION_DEFAULT, /* default -> configure */
76 1.17 cbiere ACTION_CONFIGURE, /* configure, with paramsfile */
77 1.17 cbiere ACTION_UNCONFIGURE, /* unconfigure */
78 1.17 cbiere ACTION_GENERATE, /* generate a paramsfile */
79 1.17 cbiere ACTION_GENERATE_CONVERT, /* generate a ``dup'' paramsfile */
80 1.17 cbiere ACTION_CONFIGALL, /* configure all from config file */
81 1.17 cbiere ACTION_UNCONFIGALL, /* unconfigure all from config file */
82 1.17 cbiere ACTION_CONFIGSTDIN /* configure, key from stdin */
83 1.17 cbiere };
84 1.1 elric
85 1.1 elric /* if nflag is set, do not configure/unconfigure the cgd's */
86 1.1 elric
87 1.1 elric int nflag = 0;
88 1.1 elric
89 1.3 elric static int configure(int, char **, struct params *, int);
90 1.1 elric static int configure_stdin(struct params *, int argc, char **);
91 1.1 elric static int generate(struct params *, int, char **, const char *);
92 1.5 elric static int generate_convert(struct params *, int, char **, const char *);
93 1.3 elric static int unconfigure(int, char **, struct params *, int);
94 1.3 elric static int do_all(const char *, int, char **,
95 1.3 elric int (*)(int, char **, struct params *, int));
96 1.1 elric
97 1.1 elric #define CONFIG_FLAGS_FROMALL 1 /* called from configure_all() */
98 1.1 elric #define CONFIG_FLAGS_FROMMAIN 2 /* called from main() */
99 1.1 elric
100 1.2 elric static int configure_params(int, const char *, const char *,
101 1.2 elric struct params *);
102 1.13 elric static void eliminate_cores(void);
103 1.19 christos static bits_t *getkey(const char *, struct keygen *, size_t);
104 1.19 christos static bits_t *getkey_storedkey(const char *, struct keygen *, size_t);
105 1.19 christos static bits_t *getkey_randomkey(const char *, struct keygen *, size_t, int);
106 1.19 christos static bits_t *getkey_pkcs5_pbkdf2(const char *, struct keygen *, size_t, int);
107 1.17 cbiere static int opendisk_werror(const char *, char *, size_t);
108 1.3 elric static int unconfigure_fd(int);
109 1.3 elric static int verify(struct params *, int);
110 1.5 elric static int verify_disklabel(int);
111 1.5 elric static int verify_ffs(int);
112 1.9 cb static int verify_reenter(struct params *);
113 1.1 elric
114 1.3 elric static void usage(void);
115 1.1 elric
116 1.1 elric /* Verbose Framework */
117 1.17 cbiere unsigned verbose = 0;
118 1.1 elric
119 1.1 elric #define VERBOSE(x,y) if (verbose >= x) y
120 1.19 christos #define VPRINTF(x,y) if (verbose >= x) (void)printf y
121 1.1 elric
122 1.1 elric static void
123 1.1 elric usage(void)
124 1.1 elric {
125 1.1 elric
126 1.19 christos (void)fprintf(stderr, "usage: %s [-nv] [-V vmeth] cgd dev [paramsfile]\n",
127 1.1 elric getprogname());
128 1.19 christos (void)fprintf(stderr, " %s -C [-nv] [-f configfile]\n", getprogname());
129 1.19 christos (void)fprintf(stderr, " %s -U [-nv] [-f configfile]\n", getprogname());
130 1.19 christos (void)fprintf(stderr, " %s -G [-nv] [-i ivmeth] [-k kgmeth] "
131 1.5 elric "[-o outfile] paramsfile\n", getprogname());
132 1.19 christos (void)fprintf(stderr, " %s -g [-nv] [-i ivmeth] [-k kgmeth] "
133 1.5 elric "[-o outfile] alg [keylen]\n", getprogname());
134 1.19 christos (void)fprintf(stderr, " %s -s [-nv] [-i ivmeth] cgd dev alg "
135 1.1 elric "[keylen]\n", getprogname());
136 1.19 christos (void)fprintf(stderr, " %s -u [-nv] cgd\n", getprogname());
137 1.17 cbiere exit(EXIT_FAILURE);
138 1.17 cbiere }
139 1.17 cbiere
140 1.17 cbiere static int
141 1.19 christos parse_size_t(const char *s, size_t *l)
142 1.17 cbiere {
143 1.17 cbiere char *endptr;
144 1.17 cbiere long v;
145 1.17 cbiere
146 1.17 cbiere errno = 0;
147 1.17 cbiere v = strtol(s, &endptr, 10);
148 1.17 cbiere if ((v == LONG_MIN || v == LONG_MAX) && errno)
149 1.17 cbiere return -1;
150 1.17 cbiere if (v < INT_MIN || v > INT_MAX) {
151 1.17 cbiere errno = ERANGE;
152 1.17 cbiere return -1;
153 1.17 cbiere }
154 1.17 cbiere if (endptr == s) {
155 1.17 cbiere errno = EINVAL;
156 1.17 cbiere return -1;
157 1.17 cbiere }
158 1.19 christos *l = (size_t)v;
159 1.19 christos return 0;
160 1.17 cbiere }
161 1.17 cbiere
162 1.17 cbiere static void
163 1.17 cbiere set_action(enum action *action, enum action value)
164 1.17 cbiere {
165 1.17 cbiere if (*action != ACTION_DEFAULT)
166 1.17 cbiere usage();
167 1.17 cbiere *action = value;
168 1.1 elric }
169 1.1 elric
170 1.1 elric int
171 1.1 elric main(int argc, char **argv)
172 1.1 elric {
173 1.5 elric struct params *p;
174 1.5 elric struct params *tp;
175 1.5 elric struct keygen *kg;
176 1.17 cbiere enum action action = ACTION_DEFAULT;
177 1.1 elric int ch;
178 1.17 cbiere const char *cfile = NULL;
179 1.17 cbiere const char *outfile = NULL;
180 1.1 elric
181 1.15 elric setprogname(*argv);
182 1.13 elric eliminate_cores();
183 1.14 elric if (mlockall(MCL_FUTURE))
184 1.14 elric err(EXIT_FAILURE, "Can't lock memory");
185 1.5 elric p = params_new();
186 1.5 elric kg = NULL;
187 1.1 elric
188 1.5 elric while ((ch = getopt(argc, argv, "CGUV:b:f:gi:k:no:usv")) != -1)
189 1.1 elric switch (ch) {
190 1.1 elric case 'C':
191 1.17 cbiere set_action(&action, ACTION_CONFIGALL);
192 1.1 elric break;
193 1.5 elric case 'G':
194 1.17 cbiere set_action(&action, ACTION_GENERATE_CONVERT);
195 1.5 elric break;
196 1.1 elric case 'U':
197 1.17 cbiere set_action(&action, ACTION_UNCONFIGALL);
198 1.1 elric break;
199 1.3 elric case 'V':
200 1.5 elric tp = params_verify_method(string_fromcharstar(optarg));
201 1.5 elric if (!tp)
202 1.3 elric usage();
203 1.5 elric p = params_combine(p, tp);
204 1.3 elric break;
205 1.1 elric case 'b':
206 1.17 cbiere {
207 1.19 christos size_t size;
208 1.17 cbiere
209 1.19 christos if (parse_size_t(optarg, &size) == -1)
210 1.17 cbiere usage();
211 1.17 cbiere tp = params_bsize(size);
212 1.17 cbiere if (!tp)
213 1.17 cbiere usage();
214 1.17 cbiere p = params_combine(p, tp);
215 1.17 cbiere }
216 1.1 elric break;
217 1.1 elric case 'f':
218 1.17 cbiere if (cfile)
219 1.17 cbiere usage();
220 1.17 cbiere cfile = estrdup(optarg);
221 1.1 elric break;
222 1.1 elric case 'g':
223 1.17 cbiere set_action(&action, ACTION_GENERATE);
224 1.1 elric break;
225 1.1 elric case 'i':
226 1.5 elric tp = params_ivmeth(string_fromcharstar(optarg));
227 1.5 elric p = params_combine(p, tp);
228 1.1 elric break;
229 1.1 elric case 'k':
230 1.5 elric kg = keygen_method(string_fromcharstar(optarg));
231 1.5 elric if (!kg)
232 1.1 elric usage();
233 1.5 elric keygen_addlist(&p->keygen, kg);
234 1.1 elric break;
235 1.1 elric case 'n':
236 1.1 elric nflag = 1;
237 1.1 elric break;
238 1.1 elric case 'o':
239 1.17 cbiere if (outfile)
240 1.17 cbiere usage();
241 1.17 cbiere outfile = estrdup(optarg);
242 1.1 elric break;
243 1.1 elric case 's':
244 1.17 cbiere set_action(&action, ACTION_CONFIGSTDIN);
245 1.1 elric break;
246 1.1 elric
247 1.1 elric case 'u':
248 1.17 cbiere set_action(&action, ACTION_UNCONFIGURE);
249 1.1 elric break;
250 1.1 elric case 'v':
251 1.1 elric verbose++;
252 1.1 elric break;
253 1.1 elric default:
254 1.1 elric usage();
255 1.1 elric /* NOTREACHED */
256 1.1 elric }
257 1.1 elric
258 1.1 elric argc -= optind;
259 1.1 elric argv += optind;
260 1.1 elric
261 1.17 cbiere if (!outfile)
262 1.17 cbiere outfile = "";
263 1.17 cbiere if (!cfile)
264 1.17 cbiere cfile = "";
265 1.17 cbiere
266 1.1 elric /* validate the consistency of the arguments */
267 1.1 elric
268 1.1 elric switch (action) {
269 1.17 cbiere case ACTION_DEFAULT: /* ACTION_CONFIGURE is the default */
270 1.1 elric case ACTION_CONFIGURE:
271 1.5 elric return configure(argc, argv, p, CONFIG_FLAGS_FROMMAIN);
272 1.1 elric case ACTION_UNCONFIGURE:
273 1.3 elric return unconfigure(argc, argv, NULL, CONFIG_FLAGS_FROMMAIN);
274 1.1 elric case ACTION_GENERATE:
275 1.5 elric return generate(p, argc, argv, outfile);
276 1.5 elric case ACTION_GENERATE_CONVERT:
277 1.5 elric return generate_convert(p, argc, argv, outfile);
278 1.1 elric case ACTION_CONFIGALL:
279 1.1 elric return do_all(cfile, argc, argv, configure);
280 1.1 elric case ACTION_UNCONFIGALL:
281 1.1 elric return do_all(cfile, argc, argv, unconfigure);
282 1.1 elric case ACTION_CONFIGSTDIN:
283 1.5 elric return configure_stdin(p, argc, argv);
284 1.19 christos default:
285 1.19 christos errx(EXIT_FAILURE, "undefined action");
286 1.19 christos /* NOTREACHED */
287 1.1 elric }
288 1.1 elric }
289 1.1 elric
290 1.5 elric static bits_t *
291 1.19 christos getkey(const char *dev, struct keygen *kg, size_t len)
292 1.1 elric {
293 1.5 elric bits_t *ret = NULL;
294 1.5 elric bits_t *tmp;
295 1.1 elric
296 1.19 christos VPRINTF(3, ("getkey(\"%s\", %p, %zu) called\n", dev, kg, len));
297 1.5 elric for (; kg; kg=kg->next) {
298 1.5 elric switch (kg->kg_method) {
299 1.5 elric case KEYGEN_STOREDKEY:
300 1.5 elric tmp = getkey_storedkey(dev, kg, len);
301 1.5 elric break;
302 1.5 elric case KEYGEN_RANDOMKEY:
303 1.12 tv tmp = getkey_randomkey(dev, kg, len, 1);
304 1.12 tv break;
305 1.12 tv case KEYGEN_URANDOMKEY:
306 1.12 tv tmp = getkey_randomkey(dev, kg, len, 0);
307 1.5 elric break;
308 1.10 dan case KEYGEN_PKCS5_PBKDF2_SHA1:
309 1.10 dan tmp = getkey_pkcs5_pbkdf2(dev, kg, len, 0);
310 1.10 dan break;
311 1.10 dan /* provide backwards compatibility for old config files */
312 1.10 dan case KEYGEN_PKCS5_PBKDF2_OLD:
313 1.10 dan tmp = getkey_pkcs5_pbkdf2(dev, kg, len, 1);
314 1.5 elric break;
315 1.5 elric default:
316 1.5 elric warnx("unrecognised keygen method %d in getkey()",
317 1.5 elric kg->kg_method);
318 1.5 elric if (ret)
319 1.5 elric bits_free(ret);
320 1.5 elric return NULL;
321 1.5 elric }
322 1.5 elric
323 1.5 elric if (ret)
324 1.5 elric ret = bits_xor_d(tmp, ret);
325 1.5 elric else
326 1.5 elric ret = tmp;
327 1.1 elric }
328 1.5 elric
329 1.5 elric return ret;
330 1.5 elric }
331 1.5 elric
332 1.5 elric /*ARGSUSED*/
333 1.5 elric static bits_t *
334 1.19 christos getkey_storedkey(const char *target, struct keygen *kg, size_t keylen)
335 1.5 elric {
336 1.5 elric return bits_dup(kg->kg_key);
337 1.1 elric }
338 1.1 elric
339 1.5 elric /*ARGSUSED*/
340 1.5 elric static bits_t *
341 1.19 christos getkey_randomkey(const char *target, struct keygen *kg, size_t keylen, int hard)
342 1.1 elric {
343 1.12 tv return bits_getrandombits(keylen, hard);
344 1.1 elric }
345 1.1 elric
346 1.5 elric /*ARGSUSED*/
347 1.10 dan /*
348 1.10 dan * XXX take, and pass through, a compat flag that indicates whether we
349 1.10 dan * provide backwards compatibility with a previous bug. The previous
350 1.10 dan * behaviour is indicated by the keygen method pkcs5_pbkdf2, and a
351 1.10 dan * non-zero compat flag. The new default, and correct keygen method is
352 1.10 dan * called pcks5_pbkdf2/sha1. When the old method is removed, so will
353 1.10 dan * be the compat argument.
354 1.10 dan */
355 1.5 elric static bits_t *
356 1.19 christos getkey_pkcs5_pbkdf2(const char *target, struct keygen *kg, size_t keylen,
357 1.19 christos int compat)
358 1.1 elric {
359 1.5 elric bits_t *ret;
360 1.19 christos const u_int8_t *passp;
361 1.5 elric char buf[1024];
362 1.5 elric u_int8_t *tmp;
363 1.1 elric
364 1.5 elric snprintf(buf, sizeof(buf), "%s's passphrase:", target);
365 1.19 christos passp = (const u_int8_t *)(void *)getpass(buf);
366 1.5 elric if (pkcs5_pbkdf2(&tmp, BITS2BYTES(keylen), passp, strlen(passp),
367 1.5 elric bits_getbuf(kg->kg_salt), BITS2BYTES(bits_len(kg->kg_salt)),
368 1.10 dan kg->kg_iterations, compat)) {
369 1.5 elric warnx("failed to generate PKCS#5 PBKDF2 key");
370 1.5 elric return NULL;
371 1.5 elric }
372 1.5 elric
373 1.5 elric ret = bits_new(tmp, keylen);
374 1.9 cb kg->kg_key = bits_dup(ret);
375 1.5 elric free(tmp);
376 1.1 elric return ret;
377 1.1 elric }
378 1.1 elric
379 1.5 elric /*ARGSUSED*/
380 1.1 elric static int
381 1.3 elric unconfigure(int argc, char **argv, struct params *inparams, int flags)
382 1.1 elric {
383 1.1 elric int fd;
384 1.1 elric int ret;
385 1.1 elric char buf[MAXPATHLEN] = "";
386 1.1 elric
387 1.1 elric /* only complain about additional arguments, if called from main() */
388 1.1 elric if (flags == CONFIG_FLAGS_FROMMAIN && argc != 1)
389 1.1 elric usage();
390 1.1 elric
391 1.1 elric /* if called from do_all(), then ensure that 2 or 3 args exist */
392 1.1 elric if (flags == CONFIG_FLAGS_FROMALL && (argc < 2 || argc > 3))
393 1.1 elric return -1;
394 1.1 elric
395 1.1 elric fd = opendisk(*argv, O_RDWR, buf, sizeof(buf), 1);
396 1.1 elric if (fd == -1) {
397 1.17 cbiere int saved_errno = errno;
398 1.17 cbiere
399 1.5 elric warn("can't open cgd \"%s\", \"%s\"", *argv, buf);
400 1.1 elric
401 1.1 elric /* this isn't fatal with nflag != 0 */
402 1.1 elric if (!nflag)
403 1.17 cbiere return saved_errno;
404 1.1 elric }
405 1.1 elric
406 1.1 elric VPRINTF(1, ("%s (%s): clearing\n", *argv, buf));
407 1.1 elric
408 1.1 elric if (nflag)
409 1.1 elric return 0;
410 1.1 elric
411 1.3 elric ret = unconfigure_fd(fd);
412 1.19 christos (void)close(fd);
413 1.3 elric return ret;
414 1.3 elric }
415 1.3 elric
416 1.3 elric static int
417 1.3 elric unconfigure_fd(int fd)
418 1.3 elric {
419 1.3 elric struct cgd_ioctl ci;
420 1.3 elric
421 1.17 cbiere if (ioctl(fd, CGDIOCCLR, &ci) == -1) {
422 1.17 cbiere warn("ioctl");
423 1.3 elric return -1;
424 1.1 elric }
425 1.1 elric
426 1.1 elric return 0;
427 1.1 elric }
428 1.1 elric
429 1.5 elric /*ARGSUSED*/
430 1.1 elric static int
431 1.3 elric configure(int argc, char **argv, struct params *inparams, int flags)
432 1.1 elric {
433 1.5 elric struct params *p;
434 1.5 elric int fd;
435 1.5 elric int ret;
436 1.5 elric char cgdname[PATH_MAX];
437 1.1 elric
438 1.17 cbiere if (argc == 2) {
439 1.17 cbiere char *pfile;
440 1.17 cbiere
441 1.17 cbiere if (asprintf(&pfile, "%s/%s",
442 1.17 cbiere CGDCONFIG_DIR, basename(argv[1])) == -1)
443 1.17 cbiere return -1;
444 1.17 cbiere
445 1.17 cbiere p = params_cget(pfile);
446 1.17 cbiere free(pfile);
447 1.17 cbiere } else if (argc == 3) {
448 1.17 cbiere p = params_cget(argv[2]);
449 1.17 cbiere } else {
450 1.1 elric /* print usage and exit, only if called from main() */
451 1.5 elric if (flags == CONFIG_FLAGS_FROMMAIN) {
452 1.5 elric warnx("wrong number of args");
453 1.1 elric usage();
454 1.5 elric }
455 1.1 elric return -1;
456 1.1 elric }
457 1.1 elric
458 1.5 elric if (!p)
459 1.5 elric return -1;
460 1.2 elric
461 1.3 elric /*
462 1.5 elric * over-ride with command line specifications and fill in default
463 1.5 elric * values.
464 1.3 elric */
465 1.3 elric
466 1.5 elric p = params_combine(p, inparams);
467 1.5 elric ret = params_filldefaults(p);
468 1.5 elric if (ret) {
469 1.5 elric params_free(p);
470 1.5 elric return ret;
471 1.5 elric }
472 1.5 elric
473 1.5 elric if (!params_verify(p)) {
474 1.5 elric warnx("params invalid");
475 1.5 elric return -1;
476 1.5 elric }
477 1.3 elric
478 1.3 elric /*
479 1.3 elric * loop over configuring the disk and checking to see if it
480 1.3 elric * verifies properly. We open and close the disk device each
481 1.3 elric * time, because if the user passes us the block device we
482 1.3 elric * need to flush the buffer cache.
483 1.3 elric */
484 1.3 elric
485 1.3 elric for (;;) {
486 1.3 elric fd = opendisk_werror(argv[0], cgdname, sizeof(cgdname));
487 1.3 elric if (fd == -1)
488 1.3 elric return -1;
489 1.3 elric
490 1.5 elric if (p->key)
491 1.5 elric bits_free(p->key);
492 1.5 elric
493 1.5 elric p->key = getkey(argv[1], p->keygen, p->keylen);
494 1.5 elric if (!p->key)
495 1.3 elric goto bail_err;
496 1.3 elric
497 1.5 elric ret = configure_params(fd, cgdname, argv[1], p);
498 1.3 elric if (ret)
499 1.3 elric goto bail_err;
500 1.3 elric
501 1.5 elric ret = verify(p, fd);
502 1.3 elric if (ret == -1)
503 1.3 elric goto bail_err;
504 1.3 elric if (!ret)
505 1.3 elric break;
506 1.2 elric
507 1.17 cbiere warnx("verification failed, please reenter passphrase");
508 1.1 elric
509 1.19 christos (void)unconfigure_fd(fd);
510 1.19 christos (void)close(fd);
511 1.3 elric }
512 1.2 elric
513 1.5 elric params_free(p);
514 1.19 christos (void)close(fd);
515 1.3 elric return 0;
516 1.3 elric bail_err:
517 1.5 elric params_free(p);
518 1.19 christos (void)close(fd);
519 1.3 elric return -1;
520 1.1 elric }
521 1.1 elric
522 1.1 elric static int
523 1.1 elric configure_stdin(struct params *p, int argc, char **argv)
524 1.1 elric {
525 1.2 elric int fd;
526 1.1 elric int ret;
527 1.2 elric char cgdname[PATH_MAX];
528 1.1 elric
529 1.1 elric if (argc < 3 || argc > 4)
530 1.1 elric usage();
531 1.1 elric
532 1.5 elric p->algorithm = string_fromcharstar(argv[2]);
533 1.17 cbiere if (argc > 3) {
534 1.19 christos size_t keylen;
535 1.17 cbiere
536 1.19 christos if (parse_size_t(argv[3], &keylen) == -1) {
537 1.17 cbiere warn("failed to parse key length");
538 1.17 cbiere return -1;
539 1.17 cbiere }
540 1.17 cbiere p->keylen = keylen;
541 1.17 cbiere }
542 1.1 elric
543 1.1 elric ret = params_filldefaults(p);
544 1.1 elric if (ret)
545 1.1 elric return ret;
546 1.1 elric
547 1.2 elric fd = opendisk_werror(argv[0], cgdname, sizeof(cgdname));
548 1.2 elric if (fd == -1)
549 1.2 elric return -1;
550 1.2 elric
551 1.5 elric p->key = bits_fget(stdin, p->keylen);
552 1.5 elric if (!p->key) {
553 1.5 elric warnx("failed to read key from stdin");
554 1.1 elric return -1;
555 1.5 elric }
556 1.1 elric
557 1.2 elric return configure_params(fd, cgdname, argv[1], p);
558 1.1 elric }
559 1.1 elric
560 1.1 elric static int
561 1.17 cbiere opendisk_werror(const char *cgd, char *buf, size_t buflen)
562 1.2 elric {
563 1.2 elric int fd;
564 1.2 elric
565 1.18 cbiere VPRINTF(3, ("opendisk_werror(%s, %s, %zu) called.\n", cgd, buf, buflen));
566 1.5 elric
567 1.2 elric /* sanity */
568 1.2 elric if (!cgd || !buf)
569 1.2 elric return -1;
570 1.2 elric
571 1.2 elric if (nflag) {
572 1.17 cbiere if (strlcpy(buf, cgd, buflen) >= buflen)
573 1.17 cbiere return -1;
574 1.2 elric return 0;
575 1.2 elric }
576 1.2 elric
577 1.3 elric fd = opendisk(cgd, O_RDWR, buf, buflen, 0);
578 1.2 elric if (fd == -1)
579 1.5 elric warnx("can't open cgd \"%s\", \"%s\"", cgd, buf);
580 1.5 elric
581 1.2 elric return fd;
582 1.2 elric }
583 1.2 elric
584 1.2 elric static int
585 1.2 elric configure_params(int fd, const char *cgd, const char *dev, struct params *p)
586 1.1 elric {
587 1.1 elric struct cgd_ioctl ci;
588 1.1 elric
589 1.1 elric /* sanity */
590 1.1 elric if (!cgd || !dev)
591 1.1 elric return -1;
592 1.1 elric
593 1.19 christos (void)memset(&ci, 0x0, sizeof(ci));
594 1.16 christos ci.ci_disk = dev;
595 1.16 christos ci.ci_alg = string_tocharstar(p->algorithm);
596 1.16 christos ci.ci_ivmethod = string_tocharstar(p->ivmeth);
597 1.16 christos ci.ci_key = bits_getbuf(p->key);
598 1.1 elric ci.ci_keylen = p->keylen;
599 1.1 elric ci.ci_blocksize = p->bsize;
600 1.1 elric
601 1.20 martin VPRINTF(1, (" with alg %s keylen %zu blocksize %zu ivmethod %s\n",
602 1.5 elric string_tocharstar(p->algorithm), p->keylen, p->bsize,
603 1.5 elric string_tocharstar(p->ivmeth)));
604 1.5 elric VPRINTF(2, ("key: "));
605 1.5 elric VERBOSE(2, bits_fprint(stdout, p->key));
606 1.5 elric VPRINTF(2, ("\n"));
607 1.1 elric
608 1.1 elric if (nflag)
609 1.1 elric return 0;
610 1.1 elric
611 1.17 cbiere if (ioctl(fd, CGDIOCSET, &ci) == -1) {
612 1.17 cbiere int saved_errno = errno;
613 1.17 cbiere warn("ioctl");
614 1.17 cbiere return saved_errno;
615 1.1 elric }
616 1.1 elric
617 1.1 elric return 0;
618 1.1 elric }
619 1.1 elric
620 1.3 elric /*
621 1.3 elric * verify returns 0 for success, -1 for unrecoverable error, or 1 for retry.
622 1.3 elric */
623 1.3 elric
624 1.3 elric #define SCANSIZE 8192
625 1.3 elric
626 1.3 elric static int
627 1.3 elric verify(struct params *p, int fd)
628 1.3 elric {
629 1.3 elric
630 1.3 elric switch (p->verify_method) {
631 1.3 elric case VERIFY_NONE:
632 1.3 elric return 0;
633 1.3 elric case VERIFY_DISKLABEL:
634 1.5 elric return verify_disklabel(fd);
635 1.5 elric case VERIFY_FFS:
636 1.5 elric return verify_ffs(fd);
637 1.9 cb case VERIFY_REENTER:
638 1.9 cb return verify_reenter(p);
639 1.3 elric default:
640 1.5 elric warnx("unimplemented verification method");
641 1.3 elric return -1;
642 1.3 elric }
643 1.5 elric }
644 1.5 elric
645 1.5 elric static int
646 1.5 elric verify_disklabel(int fd)
647 1.5 elric {
648 1.5 elric struct disklabel l;
649 1.17 cbiere ssize_t ret;
650 1.5 elric char buf[SCANSIZE];
651 1.3 elric
652 1.3 elric /*
653 1.3 elric * we simply scan the first few blocks for a disklabel, ignoring
654 1.3 elric * any MBR/filecore sorts of logic. MSDOS and RiscOS can't read
655 1.3 elric * a cgd, anyway, so it is unlikely that there will be non-native
656 1.3 elric * partition information.
657 1.3 elric */
658 1.3 elric
659 1.3 elric ret = pread(fd, buf, 8192, 0);
660 1.17 cbiere if (ret < 0) {
661 1.5 elric warn("can't read disklabel area");
662 1.3 elric return -1;
663 1.3 elric }
664 1.3 elric
665 1.3 elric /* now scan for the disklabel */
666 1.3 elric
667 1.17 cbiere return disklabel_scan(&l, buf, (size_t)ret);
668 1.3 elric }
669 1.3 elric
670 1.7 fvdl static off_t sblock_try[] = SBLOCKSEARCH;
671 1.7 fvdl
672 1.1 elric static int
673 1.5 elric verify_ffs(int fd)
674 1.5 elric {
675 1.19 christos size_t i;
676 1.5 elric
677 1.7 fvdl for (i = 0; sblock_try[i] != -1; i++) {
678 1.19 christos union {
679 1.19 christos char buf[SBLOCKSIZE];
680 1.19 christos struct fs fs;
681 1.19 christos } u;
682 1.17 cbiere ssize_t ret;
683 1.17 cbiere
684 1.19 christos ret = pread(fd, &u, sizeof(u), sblock_try[i]);
685 1.17 cbiere if (ret < 0) {
686 1.7 fvdl warn("pread");
687 1.17 cbiere break;
688 1.19 christos } else if ((size_t)ret < sizeof(u)) {
689 1.17 cbiere warnx("pread: incomplete block");
690 1.17 cbiere break;
691 1.7 fvdl }
692 1.19 christos switch (u.fs.fs_magic) {
693 1.7 fvdl case FS_UFS1_MAGIC:
694 1.7 fvdl case FS_UFS2_MAGIC:
695 1.7 fvdl case FS_UFS1_MAGIC_SWAPPED:
696 1.7 fvdl case FS_UFS2_MAGIC_SWAPPED:
697 1.7 fvdl return 0;
698 1.7 fvdl default:
699 1.7 fvdl continue;
700 1.7 fvdl }
701 1.5 elric }
702 1.17 cbiere
703 1.17 cbiere return 1; /* failure */
704 1.9 cb }
705 1.9 cb
706 1.9 cb static int
707 1.9 cb verify_reenter(struct params *p)
708 1.9 cb {
709 1.9 cb struct keygen *kg;
710 1.9 cb bits_t *orig_key, *key;
711 1.9 cb int ret;
712 1.9 cb
713 1.9 cb ret = 0;
714 1.9 cb for (kg = p->keygen; kg && !ret; kg = kg->next) {
715 1.10 dan if ((kg->kg_method != KEYGEN_PKCS5_PBKDF2_SHA1) &&
716 1.10 dan (kg->kg_method != KEYGEN_PKCS5_PBKDF2_OLD ))
717 1.9 cb continue;
718 1.9 cb
719 1.9 cb orig_key = kg->kg_key;
720 1.9 cb kg->kg_key = NULL;
721 1.9 cb
722 1.10 dan /* add a compat flag till the _OLD method goes away */
723 1.9 cb key = getkey_pkcs5_pbkdf2("re-enter device", kg,
724 1.10 dan bits_len(orig_key), kg->kg_method == KEYGEN_PKCS5_PBKDF2_OLD);
725 1.9 cb ret = !bits_match(key, orig_key);
726 1.9 cb
727 1.9 cb bits_free(key);
728 1.9 cb bits_free(kg->kg_key);
729 1.9 cb kg->kg_key = orig_key;
730 1.9 cb }
731 1.9 cb
732 1.9 cb return ret;
733 1.5 elric }
734 1.5 elric
735 1.5 elric static int
736 1.1 elric generate(struct params *p, int argc, char **argv, const char *outfile)
737 1.1 elric {
738 1.1 elric int ret;
739 1.1 elric
740 1.1 elric if (argc < 1 || argc > 2)
741 1.1 elric usage();
742 1.1 elric
743 1.5 elric p->algorithm = string_fromcharstar(argv[0]);
744 1.17 cbiere if (argc > 1) {
745 1.19 christos size_t keylen;
746 1.17 cbiere
747 1.19 christos if (parse_size_t(argv[1], &keylen) == -1) {
748 1.17 cbiere warn("Failed to parse key length");
749 1.17 cbiere return -1;
750 1.17 cbiere }
751 1.17 cbiere p->keylen = keylen;
752 1.17 cbiere }
753 1.5 elric
754 1.5 elric ret = params_filldefaults(p);
755 1.1 elric if (ret)
756 1.1 elric return ret;
757 1.5 elric
758 1.5 elric if (!p->keygen) {
759 1.10 dan p->keygen = keygen_generate(KEYGEN_PKCS5_PBKDF2_SHA1);
760 1.5 elric if (!p->keygen)
761 1.5 elric return -1;
762 1.5 elric }
763 1.5 elric
764 1.5 elric if (keygen_filldefaults(p->keygen, p->keylen)) {
765 1.5 elric warnx("Failed to generate defaults for keygen");
766 1.5 elric return -1;
767 1.5 elric }
768 1.5 elric
769 1.5 elric if (!params_verify(p)) {
770 1.5 elric warnx("invalid parameters generated");
771 1.5 elric return -1;
772 1.5 elric }
773 1.5 elric
774 1.5 elric return params_cput(p, outfile);
775 1.5 elric }
776 1.5 elric
777 1.5 elric static int
778 1.5 elric generate_convert(struct params *p, int argc, char **argv, const char *outfile)
779 1.5 elric {
780 1.5 elric struct params *oldp;
781 1.5 elric struct keygen *kg;
782 1.5 elric
783 1.5 elric if (argc != 1)
784 1.5 elric usage();
785 1.5 elric
786 1.5 elric oldp = params_cget(*argv);
787 1.5 elric if (!oldp)
788 1.5 elric return -1;
789 1.5 elric
790 1.5 elric /* for sanity, we ensure that none of the keygens are randomkey */
791 1.5 elric for (kg=p->keygen; kg; kg=kg->next)
792 1.5 elric if (kg->kg_method == KEYGEN_RANDOMKEY)
793 1.5 elric goto bail;
794 1.5 elric for (kg=oldp->keygen; kg; kg=kg->next)
795 1.5 elric if (kg->kg_method == KEYGEN_RANDOMKEY)
796 1.5 elric goto bail;
797 1.5 elric
798 1.5 elric if (!params_verify(oldp)) {
799 1.5 elric warnx("invalid old parameters file \"%s\"", *argv);
800 1.5 elric return -1;
801 1.1 elric }
802 1.1 elric
803 1.5 elric oldp->key = getkey("old file", oldp->keygen, oldp->keylen);
804 1.5 elric
805 1.5 elric /* we copy across the non-keygen info, here. */
806 1.5 elric
807 1.5 elric string_free(p->algorithm);
808 1.5 elric string_free(p->ivmeth);
809 1.5 elric
810 1.5 elric p->algorithm = string_dup(oldp->algorithm);
811 1.5 elric p->ivmeth = string_dup(oldp->ivmeth);
812 1.5 elric p->keylen = oldp->keylen;
813 1.5 elric p->bsize = oldp->bsize;
814 1.5 elric if (p->verify_method == VERIFY_UNKNOWN)
815 1.5 elric p->verify_method = oldp->verify_method;
816 1.5 elric
817 1.5 elric params_free(oldp);
818 1.1 elric
819 1.5 elric if (!p->keygen) {
820 1.10 dan p->keygen = keygen_generate(KEYGEN_PKCS5_PBKDF2_SHA1);
821 1.5 elric if (!p->keygen)
822 1.1 elric return -1;
823 1.5 elric }
824 1.19 christos (void)params_filldefaults(p);
825 1.19 christos (void)keygen_filldefaults(p->keygen, p->keylen);
826 1.5 elric p->key = getkey("new file", p->keygen, p->keylen);
827 1.5 elric
828 1.5 elric kg = keygen_generate(KEYGEN_STOREDKEY);
829 1.5 elric kg->kg_key = bits_xor(p->key, oldp->key);
830 1.5 elric keygen_addlist(&p->keygen, kg);
831 1.5 elric
832 1.5 elric if (!params_verify(p)) {
833 1.5 elric warnx("can't generate new parameters file");
834 1.5 elric return -1;
835 1.1 elric }
836 1.1 elric
837 1.5 elric return params_cput(p, outfile);
838 1.5 elric bail:
839 1.5 elric params_free(oldp);
840 1.5 elric return -1;
841 1.1 elric }
842 1.1 elric
843 1.1 elric static int
844 1.19 christos /*ARGSUSED*/
845 1.1 elric do_all(const char *cfile, int argc, char **argv,
846 1.3 elric int (*conf)(int, char **, struct params *, int))
847 1.1 elric {
848 1.1 elric FILE *f;
849 1.1 elric size_t len;
850 1.1 elric size_t lineno;
851 1.1 elric int my_argc;
852 1.1 elric int ret;
853 1.1 elric const char *fn;
854 1.1 elric char *line;
855 1.1 elric char **my_argv;
856 1.1 elric
857 1.1 elric if (argc > 0)
858 1.1 elric usage();
859 1.1 elric
860 1.1 elric if (!cfile[0])
861 1.1 elric fn = CGDCONFIG_CFILE;
862 1.1 elric else
863 1.1 elric fn = cfile;
864 1.1 elric
865 1.1 elric f = fopen(fn, "r");
866 1.1 elric if (!f) {
867 1.5 elric warn("could not open config file \"%s\"", fn);
868 1.1 elric return -1;
869 1.1 elric }
870 1.1 elric
871 1.5 elric ret = chdir(CGDCONFIG_DIR);
872 1.5 elric if (ret == -1)
873 1.5 elric warn("could not chdir to %s", CGDCONFIG_DIR);
874 1.5 elric
875 1.1 elric ret = 0;
876 1.1 elric lineno = 0;
877 1.1 elric for (;;) {
878 1.1 elric line = fparseln(f, &len, &lineno, "\\\\#", FPARSELN_UNESCALL);
879 1.1 elric if (!line)
880 1.1 elric break;
881 1.1 elric if (!*line)
882 1.1 elric continue;
883 1.1 elric
884 1.1 elric my_argv = words(line, &my_argc);
885 1.3 elric ret = conf(my_argc, my_argv, NULL, CONFIG_FLAGS_FROMALL);
886 1.1 elric if (ret) {
887 1.5 elric warnx("action failed on \"%s\" line %lu", fn,
888 1.1 elric (u_long)lineno);
889 1.1 elric break;
890 1.1 elric }
891 1.1 elric words_free(my_argv, my_argc);
892 1.1 elric }
893 1.1 elric return ret;
894 1.1 elric }
895 1.13 elric
896 1.13 elric static void
897 1.13 elric eliminate_cores(void)
898 1.13 elric {
899 1.13 elric struct rlimit rlp;
900 1.13 elric
901 1.13 elric rlp.rlim_cur = 0;
902 1.13 elric rlp.rlim_max = 0;
903 1.17 cbiere if (setrlimit(RLIMIT_CORE, &rlp) == -1)
904 1.13 elric err(EXIT_FAILURE, "Can't disable cores");
905 1.13 elric }
906