bsddisklabel.c revision 1.29 1 /* $NetBSD: bsddisklabel.c,v 1.29 2019/10/25 12:24:34 martin Exp $ */
2
3 /*
4 * Copyright 1997 Piermont Information Systems Inc.
5 * All rights reserved.
6 *
7 * Based on code written by Philip A. Nelson for Piermont Information
8 * Systems Inc.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. The name of Piermont Information Systems Inc. may not be used to endorse
19 * or promote products derived from this software without specific prior
20 * written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
23 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
26 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
29 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
30 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
31 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
32 * THE POSSIBILITY OF SUCH DAMAGE.
33 */
34
35 /* bsddisklabel.c -- generate standard BSD disklabel */
36 /* Included by appropriate arch/XXXX/md.c */
37
38 #include <sys/param.h>
39 #include <sys/sysctl.h>
40 #include <sys/exec.h>
41 #include <sys/utsname.h>
42 #include <sys/types.h>
43 #include <sys/stat.h>
44 #include <machine/cpu.h>
45 #include <assert.h>
46 #include <stdio.h>
47 #include <stddef.h>
48 #include <util.h>
49 #include <dirent.h>
50 #include "defs.h"
51 #include "md.h"
52 #include "defsizes.h"
53 #include "endian.h"
54 #include "msg_defs.h"
55 #include "menu_defs.h"
56
57 static size_t fill_ptn_menu(struct partition_usage_set *pset);
58
59 /*
60 * The default partition layout.
61 */
62 static const struct part_usage_info
63 default_parts_init[] =
64 {
65 /*
66 * Pretty complex setup for boot partitions.
67 * This is copy&pasted below, please keep in sync!
68 */
69 #ifdef PART_BOOT
70 { .size = PART_BOOT/512, /* PART_BOOT is in BYTE, not MB! */
71 #ifdef PART_BOOT_MOUNT
72 .mount = PART_BOOT_MOUNT,
73 .instflags = PUIINST_MOUNT|PUIINST_BOOT,
74 #else
75 .instflags = PUIINST_BOOT,
76 #endif
77 #ifdef PART_BOOT_TYPE
78 .fs_type = PART_BOOT_TYPE,
79 #if PART_BOOT_TYPE == FS_MSDOS
80 .flags = PUIFLAG_ADD_OUTER,
81 #endif
82 #endif
83 #ifdef PART_BOOT_SUBT
84 .fs_version = PART_BOOT_SUBT,
85 #endif
86 },
87 #endif
88
89 /*
90 * Two more copies of above for _BOOT1 and _BOOT2, please
91 * keep in sync!
92 */
93 #ifdef PART_BOOT1
94 { .size = PART_BOOT1/512, /* PART_BOOT1 is in BYTE, not MB! */
95 #ifdef PART_BOOT1_MOUNT
96 .mount = PART_BOOT1_MOUNT,
97 .instflags = PUIINST_MOUNT|PUIINST_BOOT,
98 #else
99 .instflags = PUIINST_MOUNT|PUIINST_BOOT,
100 #endif
101 #ifdef PART_BOOT1_TYPE
102 .fs_type = PART_BOOT1_TYPE,
103 #if PART_BOOT1_TYPE == FS_MSDOS
104 .flags = PUIFLAG_ADD_OUTER,
105 #endif
106 #endif
107 #ifdef PART_BOOT1_SUBT
108 .fs_version = PART_BOOT1_SUBT,
109 #endif
110 },
111 #endif
112 #ifdef PART_BOOT2
113 { .size = PART_BOOT2/512, /* PART_BOOT2 is in BYTE, not MB! */
114 #ifdef PART_BOOT2_MOUNT
115 .mount = PART_BOOT2_MOUNT,
116 .instflags = PUIINST_MOUNT|PUIINST_BOOT,
117 #else
118 .instflags = PUIINST_MOUNT|PUIINST_BOOT,
119 #endif
120 #ifdef PART_BOOT2_TYPE
121 .fs_type = PART_BOOT2_TYPE,
122 #if PART_BOOT2_TYPE == FS_MSDOS
123 .flags = PUIFLAG_ADD_OUTER,
124 #endif
125 #endif
126 #ifdef PART_BOOT2_SUBT
127 .fs_version = PART_BOOT1_SUBT,
128 #endif
129 },
130 #endif
131
132 { .size = DEFROOTSIZE*(MEG/512), .mount = "/", .type = PT_root,
133 .flags = PUIFLAG_EXTEND },
134 {
135 #if DEFSWAPSIZE > 0
136 .size = DEFSWAPSIZE*(MEG/512),
137 #endif
138 .type = PT_swap, .fs_type = FS_SWAP },
139 #ifdef HAVE_TMPFS
140 { .type = PT_root, .mount = "/tmp", .fs_type = FS_TMPFS,
141 .flags = PUIFLG_JUST_MOUNTPOINT },
142 #else
143 { .type = PT_root, .mount = "/tmp", .fs_type = FS_MFS,
144 .flags = PUIFLG_JUST_MOUNTPOINT },
145 #endif
146 { .def_size = DEFUSRSIZE*(MEG/512), .mount = "/usr", .type = PT_root },
147 { .def_size = DEFVARSIZE*(MEG/512), .mount = "/var", .type = PT_root },
148 };
149
150 static const char size_separator[] =
151 "----------------------------------- - --------------------";
152 static char size_menu_title[STRSIZE];
153 static char size_menu_exit[MENUSTRSIZE];
154
155 static void
156 set_pset_exit_str(struct partition_usage_set *pset)
157 {
158 char *str, num[25];
159 const char *args[2];
160 bool overrun;
161 daddr_t free_space = pset->cur_free_space;
162
163 /* format exit string */
164 overrun = free_space < 0;
165 if (overrun)
166 free_space = -free_space;
167
168 snprintf(num, sizeof(num), "%" PRIu64, free_space / sizemult);
169 args[0] = num;
170 args[1] = multname;
171 str = str_arg_subst(
172 msg_string(overrun ? MSG_fssizesbad : MSG_fssizesok),
173 2, args);
174 strlcpy(size_menu_exit, str, sizeof(size_menu_exit));
175 free(str);
176 }
177
178 static void
179 draw_size_menu_header(menudesc *m, void *arg)
180 {
181 struct partition_usage_set *pset = arg;
182 size_t i;
183 char col1[70], desc[MENUSTRSIZE];
184 bool need_ext = false, need_existing = false;
185
186 msg_display(MSG_ptnsizes);
187
188 for (i = 0; i < pset->num; i++) {
189 if (pset->infos[i].flags & PUIFLG_IS_OUTER)
190 need_ext = true;
191 else if (pset->infos[i].cur_part_id != NO_PART)
192 need_existing = true;
193 }
194 if (need_ext && need_existing)
195 snprintf(desc, sizeof desc, "%s, %s",
196 msg_string(MSG_ptnsizes_mark_existing),
197 msg_string(MSG_ptnsizes_mark_external));
198 else if (need_existing)
199 strlcpy(desc, msg_string(MSG_ptnsizes_mark_existing),
200 sizeof desc);
201 else if (need_ext)
202 strlcpy(desc, msg_string(MSG_ptnsizes_mark_external),
203 sizeof desc);
204 if (need_ext || need_existing) {
205 msg_printf("\n");
206 msg_display_add_subst(msg_string(MSG_ptnsizes_markers),
207 1, &desc);
208 }
209 msg_printf("\n\n");
210
211 /* update menu title */
212 snprintf(col1, sizeof col1, "%s (%s)", msg_string(MSG_ptnheaders_size),
213 multname);
214 snprintf(size_menu_title, sizeof size_menu_title,
215 " %-37.37s %s\n %s", col1,
216 msg_string(MSG_ptnheaders_filesystem), size_separator);
217 }
218
219 static void
220 draw_size_menu_line(menudesc *m, int opt, void *arg)
221 {
222 struct partition_usage_set *pset = arg;
223 daddr_t size;
224 char psize[38], inc_free[16], flag, swap[40];
225 const char *mount;
226 bool free_mount = false;
227
228 if (opt < 0 || (size_t)opt >= pset->num)
229 return;
230
231 inc_free[0] = 0;
232 if ((pset->infos[opt].flags & PUIFLAG_EXTEND) &&
233 pset->cur_free_space > 0) {
234 size = pset->infos[opt].size + pset->cur_free_space;
235 snprintf(inc_free, sizeof inc_free, " (%" PRIu64 ")",
236 size / sizemult);
237 }
238 size = pset->infos[opt].size;
239 snprintf(psize, sizeof psize, "%" PRIu64 "%s",
240 size / sizemult, inc_free);
241
242 if (pset->infos[opt].type == PT_swap) {
243 snprintf(swap, sizeof swap, "<%s>",
244 msg_string(MSG_swap_display));
245 mount = swap;
246 } else if (pset->infos[opt].flags & PUIFLG_JUST_MOUNTPOINT) {
247 snprintf(swap, sizeof swap, "%s (%s)",
248 pset->infos[opt].mount,
249 getfslabelname(pset->infos[opt].fs_type,
250 pset->infos[opt].fs_version));
251 mount = swap;
252 } else if (pset->infos[opt].mount[0]) {
253 mount = pset->infos[opt].mount;
254 } else {
255 mount = NULL;
256 if (pset->infos[opt].parts->pscheme->other_partition_identifier
257 && pset->infos[opt].cur_part_id != NO_PART)
258 mount = pset->infos[opt].parts->pscheme->
259 other_partition_identifier(pset->infos[opt].parts,
260 pset->infos[opt].cur_part_id);
261 if (mount == NULL)
262 mount = getfslabelname(pset->infos[opt].fs_type,
263 pset->infos[opt].fs_version);
264 mount = str_arg_subst(msg_string(MSG_size_ptn_not_mounted),
265 1, &mount);
266 free_mount = true;
267 }
268 flag = ' ';
269 if (pset->infos[opt].flags & PUIFLAG_EXTEND)
270 flag = '+';
271 else if (pset->infos[opt].flags & PUIFLG_IS_OUTER)
272 flag = '@';
273 else if (pset->infos[opt].cur_part_id != NO_PART)
274 flag = '=';
275 wprintw(m->mw, "%-35.35s %c %s", psize, flag, mount);
276 if (free_mount)
277 free(__UNCONST(mount));
278
279 if (opt == 0)
280 set_pset_exit_str(pset);
281 }
282
283 static int
284 add_other_ptn_size(menudesc *menu, void *arg)
285 {
286 struct partition_usage_set *pset = arg;
287 struct part_usage_info *p;
288 struct menu_ent *m;
289 char new_mp[MOUNTLEN], *err;
290 const char *args;
291
292 for (;;) {
293 msg_prompt_win(partman_go?MSG_askfsmountadv:MSG_askfsmount,
294 -1, 18, 0, 0, NULL, new_mp, sizeof(new_mp));
295 if (new_mp[0] == 0)
296 return 0;
297 if (new_mp[0] != '/') {
298 /* we need absolute mount paths */
299 memmove(new_mp+1, new_mp, sizeof(new_mp)-1);
300 new_mp[0] = '/';
301 }
302
303 /* duplicates? */
304 bool duplicate = false;
305 for (size_t i = 0; i < pset->num; i++) {
306 if (strcmp(pset->infos[i].mount,
307 new_mp) == 0) {
308 args = new_mp;
309 err = str_arg_subst(
310 msg_string(MSG_mp_already_exists),
311 1, &args);
312 err_msg_win(err);
313 free(err);
314 duplicate = true;
315 break;
316 }
317 }
318 if (!duplicate)
319 break;
320 }
321
322 m = realloc(pset->menu_opts, (pset->num+4)*sizeof(*pset->menu_opts));
323 if (m == NULL)
324 return 0;
325 p = realloc(pset->infos, (pset->num+1)*sizeof(*pset->infos));
326 if (p == NULL)
327 return 0;
328
329 pset->infos = p;
330 pset->menu_opts = m;
331 menu->opts = m;
332 menu->numopts = pset->num+4;
333 m += pset->num;
334 p += pset->num;
335 memset(m, 0, sizeof(*m));
336 memset(p, 0, sizeof(*p));
337 p->parts = pset->parts;
338 p->cur_part_id = NO_PART;
339 p->type = PT_root;
340 p->fs_type = FS_BSDFFS;
341 p->fs_version = 2;
342 strncpy(p->mount, new_mp, sizeof(p->mount));
343
344 menu->cursel = pset->num;
345 pset->num++;
346 fill_ptn_menu(pset);
347
348 return -1;
349 }
350
351 static size_t
352 fill_ptn_menu(struct partition_usage_set *pset)
353 {
354 struct part_usage_info *p;
355 struct disk_part_info info;
356 menu_ent *m;
357 size_t i;
358 daddr_t free_space;
359
360 memset(pset->menu_opts, 0, (pset->num+3)*sizeof(*pset->menu_opts));
361 for (m = pset->menu_opts, p = pset->infos, i = 0; i < pset->num;
362 m++, p++, i++) {
363 m->opt_action = set_ptn_size;
364 }
365
366 m->opt_name = size_separator;
367 m->opt_flags = OPT_IGNORE|OPT_NOSHORT;
368 m++;
369
370 m->opt_name = MSG_add_another_ptn;
371 m->opt_action = add_other_ptn_size;
372 m++;
373
374 m->opt_name = MSG_askunits;
375 m->opt_menu = MENU_sizechoice;
376 m->opt_flags = OPT_SUB;
377 m++;
378
379 /* calculate free space */
380 free_space = pset->parts->free_space;
381 for (i = 0; i < pset->parts->num_part; i++) {
382 if (!pset->parts->pscheme->get_part_info(pset->parts, i,
383 &info))
384 continue;
385 if (info.flags & (PTI_SEC_CONTAINER|PTI_WHOLE_DISK|
386 PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
387 continue;
388 free_space += info.size;
389 }
390 for (i = 0; i < pset->num; i++) {
391 if (pset->infos[i].flags &
392 (PUIFLG_IS_OUTER|PUIFLG_JUST_MOUNTPOINT))
393 continue;
394 free_space -= pset->infos[i].size;
395 }
396 pset->cur_free_space = free_space;
397 set_pset_exit_str(pset);
398
399 if (pset->menu >= 0)
400 set_menu_numopts(pset->menu, m - pset->menu_opts);
401
402 return m - pset->menu_opts;
403 }
404
405 static part_id
406 find_part_at(struct disk_partitions *parts, daddr_t start)
407 {
408 size_t i;
409 struct disk_part_info info;
410
411 for (i = 0; i < parts->num_part; i++) {
412 if (!parts->pscheme->get_part_info(parts, i, &info))
413 continue;
414 if (info.start == start)
415 return i;
416 }
417
418 return NO_PART;
419 }
420
421 int
422 set_ptn_size(menudesc *m, void *arg)
423 {
424 struct partition_usage_set *pset = arg;
425 struct part_usage_info *p = &pset->infos[m->cursel];
426 char answer[16], dflt[16];
427 const char *err_msg;
428 size_t i, root = ~0U;
429 daddr_t size, old_size, new_size_val, mult;
430 int rv;
431 bool non_zero, extend;
432
433 if (pset->cur_free_space == 0 && p->size == 0 &&
434 !(p->flags & PUIFLG_JUST_MOUNTPOINT))
435 /* Don't allow 'free_parts' to go negative */
436 return 0;
437
438 if (p->cur_part_id != NO_PART) {
439 rv = 0;
440 process_menu(MENU_ptnsize_replace_existing_partition, &rv);
441 if (rv == 0)
442 return 0;
443 if (!pset->parts->pscheme->delete_partition(pset->parts,
444 p->cur_part_id, &err_msg)) {
445 if (err_msg)
446 err_msg_win(err_msg);
447 return 0;
448 }
449 p->cur_part_id = NO_PART;
450 /*
451 * All other part ids are invalid now too - update them!
452 */
453 for (i = 0; i < pset->num; i++) {
454 if (pset->infos[i].cur_part_id == NO_PART)
455 continue;
456 pset->infos[i].cur_part_id =
457 find_part_at(pset->parts, pset->infos[i].cur_start);
458 }
459 }
460
461 size = p->size;
462 old_size = size;
463 if (size == 0)
464 size = p->def_size;
465 size /= sizemult;
466 snprintf(dflt, sizeof dflt, "%" PRIu64 "%s",
467 size, p->flags & PUIFLAG_EXTEND ? "+" : "");
468
469 for (;;) {
470 msg_fmt_prompt_win(MSG_askfssize, -1, 18, 0, 0,
471 dflt, answer, sizeof answer, "%s%s", p->mount, multname);
472
473 /* cp will be checked below */
474 mult = sizemult;
475 new_size_val = parse_disk_pos(answer, &mult, pm->dlcylsize,
476 &extend);
477
478 if (strcmp(answer, dflt) == 0)
479 non_zero = p->def_size > 0;
480 else
481 non_zero = new_size_val > 0;
482
483 /* Some special cases when /usr is first given a size */
484 if (old_size == 0 && non_zero &&
485 strcmp(p->mount, "/usr") == 0) {
486 for (i = 0; i < pset->num; i++) {
487 if (strcmp(pset->infos[i].mount, "/") == 0) {
488 root = i;
489 break;
490 }
491 }
492 /* Remove space for /usr from / */
493 if (root < pset->num && pset->infos[i].cur_part_id ==
494 NO_PART) {
495 pset->infos[root].size -= p->def_size;
496 pset->cur_free_space += p->def_size;
497 }
498 /* hack to add free space to default sized /usr */
499 if (strcmp(answer, dflt) == 0) {
500 size = p->def_size;
501 pset->infos[root].flags &= ~PUIFLAG_EXTEND;
502 p->flags |= PUIFLAG_EXTEND;
503 goto adjust_free;
504 }
505 }
506 if (new_size_val < 0)
507 continue;
508 size = new_size_val;
509 break;
510 }
511
512 daddr_t align = pset->parts->pscheme->get_part_alignment(pset->parts);
513 size = NUMSEC(size, mult, align);
514 if (p->flags & PUIFLAG_EXTEND)
515 p->flags &= ~PUIFLAG_EXTEND;
516 if (extend && (p->limit == 0 || p->limit > p->size)) {
517 p->flags |= PUIFLAG_EXTEND;
518 if (size == 0)
519 size = align;
520 }
521 if (p->limit != 0 && size > p->limit)
522 size = p->limit;
523 adjust_free:
524 if ((p->flags & (PUIFLG_IS_OUTER|PUIFLG_JUST_MOUNTPOINT)) == 0)
525 pset->cur_free_space += p->size - size;
526 p->size = size;
527 set_pset_exit_str(pset);
528
529 return 0;
530 }
531
532 /*
533 * User interface to edit a "wanted" partition layout "pset" as first
534 * abstract phase (not concrete partitions).
535 * Make sure to have everything (at least theoretically) fit the
536 * available space.
537 * During editing we keep the part_usage_info and the menu_opts
538 * in pset in sync, that is: we always allocate just enough entries
539 * in pset->infos as we have usage infos in the list (pset->num),
540 * and two additional menu entries ("add a partition" and "select units").
541 * The menu exit string changes depending on content, and implies
542 * abort while the partition set is not valid (does not fit).
543 * Return true when the user wants to continue (by editing the concrete
544 * partitions), return false to abort.
545 */
546 bool
547 get_ptn_sizes(struct partition_usage_set *pset)
548 {
549 size_t num;
550
551 wclear(stdscr);
552 wrefresh(stdscr);
553
554 if (pset->menu_opts == NULL)
555 pset->menu_opts = calloc(pset->num+3, sizeof(*pset->menu_opts));
556
557 pset->menu = -1;
558 num = fill_ptn_menu(pset);
559
560 pset->menu = new_menu(size_menu_title, pset->menu_opts, num,
561 3, -1, 12, 70,
562 MC_ALWAYS_SCROLL|MC_NOBOX|MC_NOCLEAR|MC_CONTINUOUS,
563 draw_size_menu_header, draw_size_menu_line, NULL,
564 NULL, size_menu_exit);
565
566 if (pset->menu < 0) {
567 free(pset->menu_opts);
568 pset->menu_opts = NULL;
569 return false;
570 }
571
572 pset->ok = true;
573 process_menu(pset->menu, pset);
574
575 free_menu(pset->menu);
576 free(pset->menu_opts);
577 pset->menu = -1;
578 pset->menu_opts = NULL;
579
580 return pset->ok;
581 }
582
583 static int
584 set_keep_existing(menudesc *m, void *arg)
585 {
586 ((arg_rep_int*)arg)->rv = LY_KEEPEXISTING;
587 return 0;
588 }
589
590 static int
591 set_edit_part_sizes(menudesc *m, void *arg)
592 {
593 ((arg_rep_int*)arg)->rv = LY_SETSIZES;
594 return 0;
595 }
596
597 static int
598 set_use_default_sizes(menudesc *m, void *arg)
599 {
600 ((arg_rep_int*)arg)->rv = LY_USEDEFAULT;
601 return 0;
602 }
603
604 /*
605 * Check if there is a reasonable pre-existing partition for
606 * NetBSD.
607 */
608 static bool
609 check_existing_netbsd(struct disk_partitions *parts)
610 {
611 size_t nbsd_parts;
612 struct disk_part_info info;
613
614 nbsd_parts = 0;
615 for (part_id p = 0; p < parts->num_part; p++) {
616 if (!parts->pscheme->get_part_info(parts, p, &info))
617 continue;
618 if (info.flags & (PTI_PSCHEME_INTERNAL|PTI_RAW_PART))
619 continue;
620 if (info.nat_type && info.nat_type->generic_ptype == PT_root)
621 nbsd_parts++;
622 }
623
624 return nbsd_parts > 0;
625 }
626
627 /*
628 * Query a partition layout type (with available options depending on
629 * pre-existing partitions).
630 */
631 static enum layout_type
632 ask_layout(struct disk_partitions *parts, bool have_existing)
633 {
634 arg_rep_int ai;
635 const char *args[2];
636 int menu;
637 size_t num_opts;
638 menu_ent options[3], *opt;
639
640 args[0] = msg_string(parts->pscheme->name);
641 args[1] = msg_string(parts->pscheme->short_name);
642 ai.args.argv = args;
643 ai.args.argc = 2;
644 ai.rv = LY_SETSIZES;
645
646 memset(options, 0, sizeof(options));
647 num_opts = 0;
648 opt = &options[0];
649
650 if (have_existing) {
651 opt->opt_name = MSG_Keep_existing_partitions;
652 opt->opt_flags = OPT_EXIT;
653 opt->opt_action = set_keep_existing;
654 opt++;
655 num_opts++;
656 }
657 opt->opt_name = MSG_Set_Sizes;
658 opt->opt_flags = OPT_EXIT;
659 opt->opt_action = set_edit_part_sizes;
660 opt++;
661 num_opts++;
662
663 opt->opt_name = MSG_Use_Default_Parts;
664 opt->opt_flags = OPT_EXIT;
665 opt->opt_action = set_use_default_sizes;
666 opt++;
667 num_opts++;
668
669 menu = new_menu(MSG_Select_your_choice, options, num_opts,
670 -1, -10, 0, 0, MC_NOEXITOPT, NULL, NULL, NULL, NULL, NULL);
671 if (menu != -1) {
672 get_menudesc(menu)->expand_act = expand_all_option_texts;
673 process_menu(menu, &ai);
674 free_menu(menu);
675 }
676
677 return ai.rv;
678 }
679
680 static void
681 merge_part_with_wanted(struct disk_partitions *parts, part_id pno,
682 const struct disk_part_info *info, struct partition_usage_set *wanted,
683 size_t wanted_num, bool is_outer)
684 {
685 struct part_usage_info *infos;
686
687 /*
688 * does this partition match something in the wanted set?
689 */
690 for (size_t i = 0; i < wanted_num; i++) {
691 if (wanted->infos[i].type != info->nat_type->generic_ptype)
692 continue;
693 if (wanted->infos[i].type == PT_root &&
694 info->last_mounted != NULL && info->last_mounted[0] != 0 &&
695 strcmp(info->last_mounted, wanted->infos[i].mount) != 0)
696 continue;
697 if (wanted->infos[i].cur_part_id != NO_PART)
698 continue;
699 wanted->infos[i].cur_part_id = pno;
700 wanted->infos[i].parts = parts;
701 wanted->infos[i].size = info->size;
702 wanted->infos[i].cur_start = info->start;
703 wanted->infos[i].flags &= ~PUIFLAG_EXTEND;
704 if (wanted->infos[i].fs_type != FS_UNUSED &&
705 wanted->infos[i].type != PT_swap)
706 wanted->infos[i].instflags |= PUIINST_MOUNT;
707 if (is_outer)
708 wanted->infos[i].flags |= PUIFLG_IS_OUTER;
709 else
710 wanted->infos[i].flags &= ~PUIFLG_IS_OUTER;
711 return;
712 }
713
714 /*
715 * no match - if this is fromt the outer scheme, we are done.
716 * otherwise it must be inserted into the wanted set.
717 */
718 if (is_outer)
719 return;
720
721 /*
722 * create a new entry for this
723 */
724 infos = realloc(wanted->infos, sizeof(*infos)*(wanted->num+1));
725 if (infos == NULL)
726 return;
727 wanted->infos = infos;
728 infos += wanted->num;
729 wanted->num++;
730 memset(infos, 0, sizeof(*infos));
731 if (info->last_mounted != NULL && info->last_mounted[0] != 0)
732 strlcpy(infos->mount, info->last_mounted,
733 sizeof(infos->mount));
734 infos->type = info->nat_type->generic_ptype;
735 infos->cur_part_id = pno;
736 infos->parts = parts;
737 infos->size = info->size;
738 infos->cur_start = info->start;
739 infos->fs_type = info->fs_type;
740 infos->fs_version = info->fs_sub_type;
741 if (is_outer)
742 infos->flags |= PUIFLG_IS_OUTER;
743 }
744
745 static bool
746 have_x11_by_default(void)
747 {
748 static const uint8_t def_sets[] = { MD_SETS_SELECTED };
749
750 for (size_t i = 0; i < __arraycount(def_sets); i++)
751 if (def_sets[i] >= SET_X11_FIRST &&
752 def_sets[i] <= SET_X11_LAST)
753 return true;
754
755 return false;
756 }
757
758 static void
759 fill_defaults(struct partition_usage_set *wanted, struct disk_partitions *parts,
760 daddr_t ptstart, daddr_t ptsize)
761 {
762 size_t i, root = ~0U, usr = ~0U, swap = ~0U, def_usr = ~0U;
763 daddr_t free_space, dump_space, required;
764 #if defined(DEFAULT_UFS2) && !defined(HAVE_UFS2_BOOT)
765 size_t boot = ~0U;
766 #endif
767
768 memset(wanted, 0, sizeof(*wanted));
769 wanted->parts = parts;
770 wanted->num = __arraycount(default_parts_init);
771 wanted->infos = calloc(wanted->num, sizeof(*wanted->infos));
772 if (wanted->infos == NULL) {
773 err_msg_win(err_outofmem);
774 return;
775 }
776
777 memcpy(wanted->infos, default_parts_init, sizeof(default_parts_init));
778
779 #ifdef MD_PART_DEFAULTS
780 MD_PART_DEFAULTS(pm, wanted->infos, wanted->num);
781 #endif
782
783 for (i = 0; i < wanted->num; i++) {
784 wanted->infos[i].parts = parts;
785 wanted->infos[i].cur_part_id = NO_PART;
786
787 #if DEFSWAPSIZE == -1
788 if (wanted->infos[i].type == PT_swap)
789 wanted->infos[i].size = get_ramsize() * (MEG / 512);
790 #endif
791 if (wanted->infos[i].type == PT_swap && swap > wanted->num)
792 swap = i;
793 #if defined(DEFAULT_UFS2) && !defined(HAVE_UFS2_BOOT)
794 if (wanted->infos[i].instflags & PUIINST_BOOT)
795 boot = i;
796 #endif
797 if (wanted->infos[i].type == PT_root) {
798 if (strcmp(wanted->infos[i].mount, "/") == 0) {
799 root = i;
800 } else if (
801 strcmp(wanted->infos[i].mount, "/usr") == 0) {
802 if (wanted->infos[i].size > 0)
803 usr = i;
804 else
805 def_usr = i;
806 }
807 if (wanted->infos[i].fs_type == FS_UNUSED)
808 wanted->infos[i].fs_type = FS_BSDFFS;
809 if (wanted->infos[i].fs_type == FS_BSDFFS) {
810 #ifdef DEFAULT_UFS2
811 #ifndef HAVE_UFS2_BOOT
812 if (boot < wanted->num || i != root)
813 #endif
814 wanted->infos[i].fs_version = 2;
815 #endif
816 }
817 }
818 if ((wanted->infos[i].flags & PUIFLG_JUST_MOUNTPOINT) &&
819 wanted->infos[i].size == 0)
820 /* default tmpfs to 1/4 RAM */
821 wanted->infos[i].def_size =
822 get_ramsize() * (MEG/512/4);
823 }
824
825 /*
826 * Now we have the defaults as if we were installing to an
827 * empty disk. Merge the partitions in target range that are already
828 * there (match with wanted) or are there additionaly.
829 * The only thing outside of target range that we care for
830 * is a potential swap partition - we assume one is enough.
831 */
832 size_t num = wanted->num;
833 if (parts->parent) {
834 for (part_id pno = 0; pno < parts->parent->num_part; pno++) {
835 struct disk_part_info info;
836
837 if (!parts->parent->pscheme->get_part_info(
838 parts->parent, pno, &info))
839 continue;
840 if (info.nat_type->generic_ptype != PT_swap)
841 continue;
842 merge_part_with_wanted(parts->parent, pno, &info,
843 wanted, num, true);
844 break;
845 }
846 }
847 for (part_id pno = 0; pno < parts->num_part; pno++) {
848 struct disk_part_info info;
849
850 if (!parts->pscheme->get_part_info(parts, pno, &info))
851 continue;
852
853 if (info.flags & PTI_PSCHEME_INTERNAL)
854 continue;
855
856 if (info.nat_type->generic_ptype != PT_swap &&
857 (info.start < ptstart ||
858 (info.start + info.size) > (ptstart+ptsize)))
859 continue;
860
861 merge_part_with_wanted(parts, pno, &info,
862 wanted, num, false);
863 }
864
865 daddr_t align = parts->pscheme->get_part_alignment(parts);
866
867 if (root < wanted->num && wanted->infos[root].cur_part_id == NO_PART) {
868 daddr_t max_root_size = parts->disk_start + parts->disk_size;
869 if (root_limit > 0) {
870 /* Bah - bios can not read all the disk, limit root */
871 max_root_size = root_limit - parts->disk_start;
872 }
873 wanted->infos[root].limit = max_root_size;
874 }
875
876 if (have_x11_by_default()) {
877 daddr_t xsize = XNEEDMB * (MEG / 512);
878 if (usr < wanted->num) {
879 if (wanted->infos[usr].cur_part_id == NO_PART) {
880 wanted->infos[usr].size += xsize;
881 wanted->infos[usr].def_size += xsize;
882 }
883 } else if (root < wanted->num &&
884 wanted->infos[root].cur_part_id == NO_PART &&
885 (wanted->infos[root].limit == 0 ||
886 (wanted->infos[root].size + xsize) <=
887 wanted->infos[root].limit)) {
888 wanted->infos[root].size += xsize;
889 }
890 }
891 if (wanted->infos[root].limit > 0 &&
892 wanted->infos[root].size > wanted->infos[root].limit) {
893 if (usr < wanted->num) {
894 /* move space from root to usr */
895 daddr_t spill = wanted->infos[root].size -
896 wanted->infos[root].limit;
897 spill = roundup(spill, align);
898 wanted->infos[root].size =
899 wanted->infos[root].limit;
900 wanted->infos[usr].size = spill;
901 } else {
902 wanted->infos[root].size =
903 wanted->infos[root].limit;
904 }
905 }
906
907 /*
908 * Preliminary calc additional space to allocate and how much
909 * we likely will have left over. Use that to do further
910 * adjustments, so we don't present the user inherently
911 * impossible defaults.
912 */
913 free_space = parts->free_space;
914 required = 0;
915 if (root < wanted->num)
916 required += wanted->infos[root].size;
917 if (usr < wanted->num)
918 required += wanted->infos[usr].size;
919 else if (def_usr < wanted->num)
920 required += wanted->infos[def_usr].def_size;
921 free_space -= required;
922 for (i = 0; i < wanted->num; i++) {
923 if (i == root || i == usr)
924 continue; /* already accounted above */
925 if (wanted->infos[i].cur_part_id != NO_PART)
926 continue;
927 if (wanted->infos[i].size == 0)
928 continue;
929 if (wanted->infos[i].flags
930 & (PUIFLG_IS_OUTER|PUIFLG_JUST_MOUNTPOINT))
931 continue;
932 free_space -= wanted->infos[i].size;
933 }
934 if (free_space < 0 && swap < wanted->num) {
935 /* steel from swap partition */
936 daddr_t d = wanted->infos[swap].size;
937 daddr_t inc = roundup(-free_space, align);
938 if (inc > d)
939 inc = d;
940 free_space += inc;
941 wanted->infos[swap].size -= inc;
942 }
943 if (root < wanted->num) {
944 /* Add space for 2 system dumps to / (traditional) */
945 dump_space = get_ramsize() * (MEG/512);
946 dump_space = roundup(dump_space, align);
947 if (free_space > dump_space*2)
948 dump_space *= 2;
949 if (free_space > dump_space)
950 wanted->infos[root].size += dump_space;
951 }
952 }
953
954 /*
955 * We sort pset->infos to sync with pset->parts and
956 * the cur_part_id, to allow using the same index into both
957 * "array" in later phases. This may include inserting
958 * dummy entries (when we do not actually want the
959 * partition, but it is forced upon us, like RAW_PART in
960 * disklabel).
961 */
962 static void
963 sort_and_sync_parts(struct partition_usage_set *pset)
964 {
965 struct part_usage_info *infos;
966 size_t i, j, no;
967 part_id pno;
968
969 pset->cur_free_space = pset->parts->free_space;
970
971 /* count non-empty entries that are not in pset->parts */
972 no = pset->parts->num_part;
973 for (i = 0; i < pset->num; i++) {
974 if (pset->infos[i].size == 0)
975 continue;
976 if (pset->infos[i].cur_part_id != NO_PART)
977 continue;
978 no++;
979 }
980
981 /* allocate new infos */
982 infos = calloc(no, sizeof *infos);
983 if (infos == NULL)
984 return;
985
986 /* pre-initialize the first entires as dummy entries */
987 for (i = 0; i < pset->parts->num_part; i++) {
988 infos[i].cur_part_id = NO_PART;
989 infos[i].cur_flags = PTI_PSCHEME_INTERNAL;
990 }
991 /*
992 * Now copy over eveything from our old entries that points to
993 * a real partition.
994 */
995 for (i = 0; i < pset->num; i++) {
996 pno = pset->infos[i].cur_part_id;
997 if (pno == NO_PART)
998 continue;
999 if (pset->parts != pset->infos[i].parts)
1000 continue;
1001 if (pset->infos[i].flags & PUIFLG_JUST_MOUNTPOINT)
1002 continue;
1003 if ((pset->infos[i].flags & (PUIFLG_IS_OUTER|PUIFLAG_ADD_INNER))
1004 == PUIFLG_IS_OUTER)
1005 continue;
1006 if (pno >= pset->parts->num_part)
1007 continue;
1008 memcpy(infos+pno, pset->infos+i, sizeof(*infos));
1009 }
1010 /* Fill in the infos for real partitions where we had no data */
1011 for (pno = 0; pno < pset->parts->num_part; pno++) {
1012 struct disk_part_info info;
1013
1014 if (infos[pno].cur_part_id != NO_PART)
1015 continue;
1016
1017 if (!pset->parts->pscheme->get_part_info(pset->parts, pno,
1018 &info))
1019 continue;
1020
1021 infos[pno].parts = pset->parts;
1022 infos[pno].cur_part_id = pno;
1023 infos[pno].cur_flags = info.flags;
1024 infos[pno].size = info.size;
1025 infos[pno].type = info.nat_type->generic_ptype;
1026 infos[pno].cur_start = info.start;
1027 infos[pno].fs_type = info.fs_type;
1028 infos[pno].fs_version = info.fs_sub_type;
1029 }
1030 /* Add the non-partition entires after that */
1031 j = pset->num;
1032 for (i = 0; i < pset->num; i++) {
1033 if (j >= no)
1034 break;
1035 if (pset->infos[i].size == 0)
1036 continue;
1037 if (pset->infos[i].cur_part_id != NO_PART)
1038 continue;
1039 memcpy(infos+j, pset->infos+i, sizeof(*infos));
1040 j++;
1041 }
1042
1043 /* done, replace infos */
1044 free(pset->infos);
1045 pset->num = no;
1046 pset->infos = infos;
1047 }
1048
1049 static void
1050 apply_settings_to_partitions(struct pm_devs *p, struct disk_partitions *parts,
1051 struct partition_usage_set *wanted, daddr_t start, daddr_t size)
1052 {
1053 size_t i, exp_ndx = ~0U;
1054 daddr_t planned_space = 0, nsp, from, align;
1055 struct disk_part_info *infos;
1056 struct disk_part_free_space space;
1057 struct disk_partitions *ps = NULL;
1058 part_id pno, new_part_id;
1059
1060 infos = calloc(wanted->num, sizeof(*infos));
1061 if (infos == NULL) {
1062 err_msg_win(err_outofmem);
1063 return;
1064 }
1065
1066 align = wanted->parts->pscheme->get_part_alignment(wanted->parts);
1067
1068 /*
1069 * Pass one: calculate space available for expanding
1070 * the marked partition.
1071 */
1072 for (i = 0; i < wanted->num; i++) {
1073 if ((wanted->infos[i].flags & PUIFLAG_EXTEND) &&
1074 exp_ndx == ~0U)
1075 exp_ndx = i;
1076 if (wanted->infos[i].flags &
1077 (PUIFLG_JUST_MOUNTPOINT|PUIFLG_IS_OUTER))
1078 continue;
1079 nsp = wanted->infos[i].size;
1080 if (wanted->infos[i].cur_part_id != NO_PART) {
1081 ps = wanted->infos[i].flags & PUIFLG_IS_OUTER ?
1082 parts->parent : parts;
1083
1084 if (ps->pscheme->get_part_info(ps,
1085 wanted->infos[i].cur_part_id, &infos[i]))
1086 nsp -= infos[i].size;
1087 }
1088 if (nsp > 0)
1089 planned_space += roundup(nsp, align);
1090 }
1091
1092 /*
1093 * Expand the pool partition (or shrink, if we overran),
1094 */
1095 if (exp_ndx < wanted->num)
1096 wanted->infos[exp_ndx].size +=
1097 parts->free_space - planned_space;
1098
1099 /*
1100 * Now it gets tricky: we want the wanted partitions in order
1101 * as defined, but any already existing partitions should not
1102 * be moved. We allow them to change size though.
1103 * To keep it simple, we just assign in order and skip blocked
1104 * spaces. This may shuffle the order of the resulting partitions
1105 * compared to the wanted list.
1106 */
1107
1108 /* Adjust sizes of existing partitions */
1109 for (i = 0; i < wanted->num; i++) {
1110 ps = wanted->infos[i].flags & PUIFLG_IS_OUTER ?
1111 parts->parent : parts;
1112 const struct part_usage_info *want = &wanted->infos[i];
1113
1114 if (want->cur_part_id == NO_PART)
1115 continue;
1116 if (i == exp_ndx) /* the exp. part. can not exist yet */
1117 continue;
1118 daddr_t free_size = ps->pscheme->max_free_space_at(ps,
1119 infos[i].start);
1120 if (free_size < wanted->infos[i].size)
1121 continue;
1122 infos[i].size = wanted->infos[i].size;
1123 ps->pscheme->set_part_info(ps, want->cur_part_id,
1124 &infos[i], NULL);
1125 }
1126
1127 from = -1;
1128 /*
1129 * First add all outer partitions - we need to align those exactly
1130 * with the inner counterpart later.
1131 */
1132 if (parts->parent) {
1133 ps = parts->parent;
1134 daddr_t outer_align = ps->pscheme->get_part_alignment(ps);
1135
1136 for (i = 0; i < wanted->num; i++) {
1137 struct part_usage_info *want = &wanted->infos[i];
1138
1139 if (want->cur_part_id != NO_PART)
1140 continue;
1141 if (!(want->flags & PUIFLAG_ADD_OUTER))
1142 continue;
1143 if (want->size <= 0)
1144 continue;
1145
1146 size_t cnt = ps->pscheme->get_free_spaces(ps,
1147 &space, 1, want->size-2*outer_align,
1148 outer_align, from, -1);
1149
1150 if (cnt == 0) /* no free space for this partition */
1151 continue;
1152
1153 infos[i].start = space.start;
1154 infos[i].size = min(want->size, space.size);
1155 infos[i].nat_type =
1156 ps->pscheme->get_fs_part_type(
1157 want->fs_type, want->fs_version);
1158 infos[i].last_mounted = want->mount;
1159 infos[i].fs_type = want->fs_type;
1160 infos[i].fs_sub_type = want->fs_version;
1161 new_part_id = ps->pscheme->add_partition(ps,
1162 &infos[i], NULL);
1163 if (new_part_id == NO_PART)
1164 continue; /* failed to add, skip */
1165
1166 ps->pscheme->get_part_info(ps,
1167 new_part_id, &infos[i]);
1168 want->cur_part_id = new_part_id;
1169
1170 want->flags |= PUIFLAG_ADD_INNER|PUIFLG_IS_OUTER;
1171 from = rounddown(infos[i].start +
1172 infos[i].size+outer_align, outer_align);
1173 }
1174 }
1175
1176 /*
1177 * Now add new inner partitions
1178 */
1179 for (i = 0; i < wanted->num && from < wanted->parts->disk_size; i++) {
1180 struct part_usage_info *want = &wanted->infos[i];
1181
1182 if (want->cur_part_id != NO_PART)
1183 continue;
1184 if (want->flags & (PUIFLG_JUST_MOUNTPOINT|PUIFLG_IS_OUTER))
1185 continue;
1186 if (want->size <= 0)
1187 continue;
1188
1189 size_t cnt = wanted->parts->pscheme->get_free_spaces(
1190 wanted->parts, &space, 1, want->size-align, align, from,
1191 -1);
1192 if (cnt == 0)
1193 cnt = wanted->parts->pscheme->get_free_spaces(
1194 wanted->parts, &space, 1,
1195 want->size-5*align, align, from, -1);
1196
1197 if (cnt == 0)
1198 continue; /* no free space for this partition */
1199
1200 infos[i].start = space.start;
1201 infos[i].size = min(want->size, space.size);
1202 infos[i].nat_type =
1203 wanted->parts->pscheme->get_fs_part_type(want->fs_type,
1204 want->fs_version);
1205 infos[i].last_mounted = want->mount;
1206 infos[i].fs_type = want->fs_type;
1207 infos[i].fs_sub_type = want->fs_version;
1208 if (want->fs_type != FS_UNUSED && want->type != PT_swap) {
1209 want->instflags |= PUIINST_NEWFS;
1210 if (want->mount[0] != 0)
1211 want->instflags |= PUIINST_MOUNT;
1212 }
1213 new_part_id = wanted->parts->pscheme->add_partition(
1214 wanted->parts, &infos[i], NULL);
1215 if (new_part_id == NO_PART)
1216 continue; /* failed to add, skip */
1217
1218 wanted->parts->pscheme->get_part_info(
1219 wanted->parts, new_part_id, &infos[i]);
1220 from = rounddown(infos[i].start+infos[i].size+align, align);
1221 }
1222
1223
1224 /*
1225 * If there are any outer partitions that we need as inner ones
1226 * too, add them to the inner partitioning scheme.
1227 */
1228 for (i = 0; i < wanted->num; i++) {
1229 struct part_usage_info *want = &wanted->infos[i];
1230
1231 if (want->cur_part_id != NO_PART)
1232 continue;
1233 if (want->flags & PUIFLG_JUST_MOUNTPOINT)
1234 continue;
1235 if (want->size <= 0)
1236 continue;
1237
1238 if ((want->flags & (PUIFLAG_ADD_INNER|PUIFLG_IS_OUTER)) !=
1239 (PUIFLAG_ADD_INNER|PUIFLG_IS_OUTER))
1240 continue;
1241
1242 infos[i].start = want->cur_start;
1243 infos[i].size = want->size;
1244 infos[i].nat_type = wanted->parts->pscheme->get_fs_part_type(
1245 want->fs_type, want->fs_version);
1246 infos[i].last_mounted = want->mount;
1247 infos[i].fs_type = want->fs_type;
1248 infos[i].fs_sub_type = want->fs_version;
1249
1250 if (wanted->parts->pscheme->add_outer_partition
1251 != NULL)
1252 new_part_id = wanted->parts->pscheme->
1253 add_outer_partition(
1254 wanted->parts, &infos[i], NULL);
1255 else
1256 new_part_id = wanted->parts->pscheme->
1257 add_partition(
1258 wanted->parts, &infos[i], NULL);
1259
1260 if (new_part_id == NO_PART)
1261 continue; /* failed to add, skip */
1262
1263 wanted->parts->pscheme->get_part_info(
1264 wanted->parts, new_part_id, &infos[i]);
1265 }
1266
1267 /*
1268 * Note: all part_ids are invalid now, as we have added things!
1269 */
1270 for (i = 0; i < wanted->num; i++)
1271 wanted->infos[i].cur_part_id = NO_PART;
1272 for (pno = 0; pno < parts->num_part; pno++) {
1273 struct disk_part_info t;
1274
1275 if (!parts->pscheme->get_part_info(parts, pno, &t))
1276 continue;
1277
1278 for (i = 0; i < wanted->num; i++) {
1279 if (wanted->infos[i].cur_part_id != NO_PART)
1280 continue;
1281 if (wanted->infos[i].size <= 0)
1282 continue;
1283 if (t.start == infos[i].start) {
1284 wanted->infos[i].cur_part_id = pno;
1285 wanted->infos[i].cur_start = infos[i].start;
1286 wanted->infos[i].cur_flags = infos[i].flags;
1287 break;
1288 }
1289 }
1290 }
1291 free(infos);
1292
1293 /* sort, and sync part ids and wanted->infos[] indices */
1294 sort_and_sync_parts(wanted);
1295 }
1296
1297 static void
1298 replace_by_default(struct pm_devs *p, struct disk_partitions *parts,
1299 daddr_t start, daddr_t size, struct partition_usage_set *wanted)
1300 {
1301
1302 if (start == 0 && size == parts->disk_size)
1303 parts->pscheme->delete_all_partitions(parts);
1304 else if (parts->pscheme->delete_partitions_in_range != NULL)
1305 parts->pscheme->delete_partitions_in_range(parts, start, size);
1306 else
1307 assert(parts->num_part == 0);
1308
1309 fill_defaults(wanted, parts, start, size);
1310 apply_settings_to_partitions(p, parts, wanted, start, size);
1311 }
1312
1313 static bool
1314 edit_with_defaults(struct pm_devs *p, struct disk_partitions *parts,
1315 daddr_t start, daddr_t size, struct partition_usage_set *wanted)
1316 {
1317 bool ok;
1318
1319 fill_defaults(wanted, parts, start, size);
1320 ok = get_ptn_sizes(wanted);
1321 if (ok)
1322 apply_settings_to_partitions(p, parts, wanted, start, size);
1323 return ok;
1324 }
1325
1326 /*
1327 * md back-end code for menu-driven BSD disklabel editor.
1328 * returns 0 on failure, 1 on success.
1329 * fills the install target with a list for newfs/fstab.
1330 */
1331 bool
1332 make_bsd_partitions(struct install_partition_desc *install)
1333 {
1334 struct disk_partitions *parts = pm->parts;
1335 const struct disk_partitioning_scheme *pscheme;
1336 struct partition_usage_set wanted;
1337 enum layout_type layoutkind = LY_SETSIZES;
1338 bool have_existing;
1339
1340 if (pm && pm->no_part && parts == NULL)
1341 return true;
1342
1343 if (parts == NULL) {
1344 pscheme = select_part_scheme(pm, NULL, !pm->no_mbr, NULL);
1345 if (pscheme == NULL)
1346 return false;
1347 parts = pscheme->create_new_for_disk(pm->diskdev,
1348 0, pm->dlsize, pm->dlsize, true);
1349 if (parts == NULL)
1350 return false;
1351 pm->parts = parts;
1352 } else {
1353 pscheme = parts->pscheme;
1354 }
1355
1356 if (pscheme->secondary_partitions) {
1357 struct disk_partitions *p;
1358
1359 p = pscheme->secondary_partitions(parts, pm->ptstart, false);
1360 if (p) {
1361 parts = p;
1362 pscheme = parts->pscheme;
1363 }
1364 }
1365
1366 have_existing = check_existing_netbsd(parts);
1367
1368 /*
1369 * Initialize global variables that track space used on this disk.
1370 */
1371 if (pm->ptsize == 0)
1372 pm->ptsize = pm->dlsize - pm->ptstart;
1373 if (pm->dlsize == 0)
1374 pm->dlsize = pm->ptstart + pm->ptsize;
1375
1376 if (logfp) fprintf(logfp, "dlsize=%" PRId64 " ptsize=%" PRId64
1377 " ptstart=%" PRId64 "\n",
1378 pm->dlsize, pm->ptsize, pm->ptstart);
1379
1380 if (pm->current_cylsize == 0)
1381 pm->current_cylsize = pm->dlcylsize;
1382
1383 /* Ask for layout type -- standard or special */
1384 if (partman_go == 0) {
1385 char bsd_size[6], min_size[6], x_size[6];
1386
1387 humanize_number(bsd_size, sizeof(bsd_size),
1388 (uint64_t)pm->ptsize*pm->sectorsize,
1389 "", HN_AUTOSCALE, HN_B | HN_NOSPACE | HN_DECIMAL);
1390 humanize_number(min_size, sizeof(min_size),
1391 (uint64_t)(DEFROOTSIZE + DEFSWAPSIZE + DEFUSRSIZE)*MEG,
1392 "", HN_AUTOSCALE, HN_B | HN_NOSPACE | HN_DECIMAL);
1393 humanize_number(x_size, sizeof(x_size),
1394 (uint64_t)(DEFROOTSIZE + DEFSWAPSIZE + DEFUSRSIZE
1395 + XNEEDMB)*MEG,
1396 "", HN_AUTOSCALE, HN_B | HN_NOSPACE | HN_DECIMAL);
1397
1398 msg_display_subst(
1399 have_existing ? MSG_layout_prologue_existing
1400 : MSG_layout_prologue_none, 6, pm->diskdev,
1401 msg_string(parts->pscheme->name),
1402 msg_string(parts->pscheme->short_name),
1403 bsd_size, min_size, x_size);
1404 msg_display_add_subst(MSG_layout_main, 6,
1405 pm->diskdev,
1406 msg_string(parts->pscheme->name),
1407 msg_string(parts->pscheme->short_name),
1408 bsd_size, min_size, x_size);
1409 msg_display_add("\n\n");
1410 layoutkind = ask_layout(parts, have_existing);
1411 }
1412
1413 if (layoutkind == LY_USEDEFAULT) {
1414 replace_by_default(pm, parts, pm->ptstart, pm->ptsize,
1415 &wanted);
1416 } else if (layoutkind == LY_SETSIZES) {
1417 if (!edit_with_defaults(pm, parts, pm->ptstart, pm->ptsize,
1418 &wanted)) {
1419 free_usage_set(&wanted);
1420 return false;
1421 }
1422 } else {
1423 usage_set_from_parts(&wanted, parts);
1424 }
1425
1426 /*
1427 * OK, we have a partition table. Give the user the chance to
1428 * edit it and verify it's OK, or abort altogether.
1429 */
1430 for (;;) {
1431 int rv = edit_and_check_label(pm, &wanted);
1432 if (rv == 0) {
1433 msg_display(MSG_abort_part);
1434 free_usage_set(&wanted);
1435 return false;
1436 }
1437 /* update install infos */
1438 install->num = wanted.num;
1439 install->infos = wanted.infos;
1440 /* and check them */
1441 if (check_partitions(install))
1442 break;
1443 }
1444
1445 /* we moved infos from wanted to install target */
1446 wanted.infos = NULL;
1447 free_usage_set(&wanted);
1448
1449 /* Everything looks OK. */
1450 return true;
1451 }
1452
1453 #ifndef MD_NEED_BOOTBLOCK
1454 #define MD_NEED_BOOTBLOCK(A) true
1455 #endif
1456
1457 /*
1458 * check that there is at least a / somewhere.
1459 */
1460 bool
1461 check_partitions(struct install_partition_desc *install)
1462 {
1463 #ifdef HAVE_BOOTXX_xFS
1464 int rv = 1;
1465 char *bootxx;
1466 #endif
1467 #ifndef HAVE_UFS2_BOOT
1468 size_t i;
1469 #endif
1470
1471 #ifdef HAVE_BOOTXX_xFS
1472 if (MD_NEED_BOOTBLOCK(install)) {
1473 /* check if we have boot code for the root partition type */
1474 bootxx = bootxx_name(install);
1475 if (bootxx != NULL) {
1476 rv = access(bootxx, R_OK);
1477 free(bootxx);
1478 } else
1479 rv = -1;
1480 if (rv != 0) {
1481 hit_enter_to_continue(NULL, MSG_No_Bootcode);
1482 return false;
1483 }
1484 }
1485 #endif
1486 #ifndef HAVE_UFS2_BOOT
1487 if (MD_NEED_BOOTBLOCK(install)) {
1488 for (i = 0; i < install->num; i++) {
1489 if (install->infos[i].type != PT_root)
1490 continue;
1491 if (strcmp(install->infos[i].mount, "/") != 0)
1492 continue;
1493 if (install->infos[i].fs_type != FS_BSDFFS)
1494 continue;
1495 if (install->infos[i].fs_version != 2)
1496 continue;
1497 hit_enter_to_continue(NULL, MSG_cannot_ufs2_root);
1498 return false;
1499 }
1500 }
1501 #endif
1502
1503 return md_check_partitions(install);
1504 }
1505