Home | History | Annotate | Line # | Download | only in sysinst
main.c revision 1.26
      1 /*	$NetBSD: main.c,v 1.26 2020/08/19 02:19:07 msaitoh Exp $	*/
      2 
      3 /*
      4  * Copyright 1997 Piermont Information Systems Inc.
      5  * All rights reserved.
      6  *
      7  * Written by Philip A. Nelson for Piermont Information Systems Inc.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer in the
     16  *    documentation and/or other materials provided with the distribution.
     17  * 3. The name of Piermont Information Systems Inc. may not be used to endorse
     18  *    or promote products derived from this software without specific prior
     19  *    written permission.
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
     22  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
     25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
     31  * THE POSSIBILITY OF SUCH DAMAGE.
     32  *
     33  */
     34 
     35 /* main sysinst program. */
     36 
     37 #include <sys/types.h>
     38 #include <sys/stat.h>
     39 #include <sys/syslimits.h>
     40 #include <sys/uio.h>
     41 #include <stdio.h>
     42 #include <signal.h>
     43 #include <curses.h>
     44 #include <unistd.h>
     45 #include <fcntl.h>
     46 #include <dirent.h>
     47 #include <locale.h>
     48 
     49 #include "defs.h"
     50 #include "md.h"
     51 #include "msg_defs.h"
     52 #include "menu_defs.h"
     53 #include "txtwalk.h"
     54 
     55 int debug;
     56 char machine[SSTRSIZE];
     57 int ignorerror;
     58 int ttysig_ignore;
     59 pid_t ttysig_forward;
     60 uint sizemult;
     61 int partman_go;
     62 FILE *logfp;
     63 FILE *script;
     64 daddr_t root_limit;
     65 struct pm_head_t pm_head;
     66 struct pm_devs *pm;
     67 struct pm_devs *pm_new;
     68 char xfer_dir[STRSIZE];
     69 int  clean_xfer_dir;
     70 char ext_dir_bin[STRSIZE];
     71 char ext_dir_src[STRSIZE];
     72 char ext_dir_pkgsrc[STRSIZE];
     73 char set_dir_bin[STRSIZE];
     74 char set_dir_src[STRSIZE];
     75 char pkg_dir[STRSIZE];
     76 char pkgsrc_dir[STRSIZE];
     77 const char *ushell;
     78 struct ftpinfo ftp, pkg, pkgsrc;
     79 int (*fetch_fn)(const char *);
     80 char nfs_host[STRSIZE];
     81 char nfs_dir[STRSIZE];
     82 char cdrom_dev[SSTRSIZE];
     83 char fd_dev[SSTRSIZE];
     84 const char *fd_type;
     85 char localfs_dev[SSTRSIZE];
     86 char localfs_fs[SSTRSIZE];
     87 char localfs_dir[STRSIZE];
     88 char targetroot_mnt[SSTRSIZE];
     89 int  mnt2_mounted;
     90 char dist_postfix[SSTRSIZE];
     91 char dist_tgz_postfix[SSTRSIZE];
     92 WINDOW *mainwin;
     93 
     94 static void select_language(void);
     95 __dead static void usage(void);
     96 __dead static void miscsighandler(int);
     97 static void ttysighandler(int);
     98 static void cleanup(void);
     99 static void process_f_flag(char *);
    100 
    101 static int exit_cleanly = 0;	/* Did we finish nicely? */
    102 FILE *logfp;			/* log file */
    103 FILE *script;			/* script file */
    104 
    105 const char *multname;
    106 const char *err_outofmem;
    107 
    108 #ifdef DEBUG
    109 extern int log_flip(void);
    110 #endif
    111 
    112 /* Definion for colors */
    113 
    114 struct {
    115 	unsigned int bg;
    116 	unsigned int fg;
    117 } clr_arg;
    118 
    119 /* String defaults and stuff for processing the -f file argument. */
    120 
    121 struct f_arg {
    122 	const char *name;
    123 	const char *dflt;
    124 	char *var;
    125 	int size;
    126 };
    127 
    128 static const struct f_arg fflagopts[] = {
    129 	{"release", REL, NULL, 0},
    130 	{"machine", MACH, machine, sizeof machine},
    131 	{"xfer dir", "/usr/INSTALL", xfer_dir, sizeof xfer_dir},
    132 	{"ext dir", "", ext_dir_bin, sizeof ext_dir_bin},
    133 	{"ext src dir", "", ext_dir_src, sizeof ext_dir_src},
    134 	{"ftp host", SYSINST_FTP_HOST, ftp.xfer_host[XFER_FTP], sizeof ftp.xfer_host[XFER_FTP]},
    135 	{"http host", SYSINST_HTTP_HOST, ftp.xfer_host[XFER_HTTP], sizeof ftp.xfer_host[XFER_HTTP]},
    136 	{"ftp dir", SYSINST_FTP_DIR, ftp.dir, sizeof ftp.dir},
    137 	{"ftp prefix", "/" ARCH_SUBDIR "/binary/sets", set_dir_bin, sizeof set_dir_bin},
    138 	{"ftp src prefix", "/source/sets", set_dir_src, sizeof set_dir_src},
    139 	{"ftp user", "ftp", ftp.user, sizeof ftp.user},
    140 	{"ftp pass", "", ftp.pass, sizeof ftp.pass},
    141 	{"ftp proxy", "", ftp.proxy, sizeof ftp.proxy},
    142 	{"nfs host", "", nfs_host, sizeof nfs_host},
    143 	{"nfs dir", "/bsd/release", nfs_dir, sizeof nfs_dir},
    144 	{"cd dev", 0, cdrom_dev, sizeof cdrom_dev}, /* default filled in init */
    145 	{"fd dev", "/dev/fd0a", fd_dev, sizeof fd_dev},
    146 	{"local dev", "", localfs_dev, sizeof localfs_dev},
    147 	{"local fs", "ffs", localfs_fs, sizeof localfs_fs},
    148 	{"local dir", "release", localfs_dir, sizeof localfs_dir},
    149 	{"targetroot mount", "/targetroot", targetroot_mnt, sizeof targetroot_mnt},
    150 	{"dist postfix", "." SETS_TAR_SUFF, dist_postfix, sizeof dist_postfix},
    151 	{"dist tgz postfix", ".tgz", dist_tgz_postfix, sizeof dist_tgz_postfix},
    152 	{"pkg host", SYSINST_PKG_HOST, pkg.xfer_host[XFER_FTP], sizeof pkg.xfer_host[XFER_FTP]},
    153 	{"pkg http host", SYSINST_PKG_HTTP_HOST, pkg.xfer_host[XFER_HTTP], sizeof pkg.xfer_host[XFER_HTTP]},
    154 	{"pkg dir", SYSINST_PKG_DIR, pkg.dir, sizeof pkg.dir},
    155 	{"pkg prefix", "/" PKG_ARCH_SUBDIR "/" PKG_SUBDIR "/All", pkg_dir, sizeof pkg_dir},
    156 	{"pkg user", "ftp", pkg.user, sizeof pkg.user},
    157 	{"pkg pass", "", pkg.pass, sizeof pkg.pass},
    158 	{"pkg proxy", "", pkg.proxy, sizeof pkg.proxy},
    159 	{"pkgsrc host", SYSINST_PKGSRC_HOST, pkgsrc.xfer_host[XFER_FTP], sizeof pkgsrc.xfer_host[XFER_FTP]},
    160 	{"pkgsrc http host", SYSINST_PKGSRC_HTTP_HOST, pkgsrc.xfer_host[XFER_HTTP], sizeof pkgsrc.xfer_host[XFER_HTTP]},
    161 	{"pkgsrc dir", "", pkgsrc.dir, sizeof pkgsrc.dir},
    162 	{"pkgsrc prefix", "pub/pkgsrc/stable", pkgsrc_dir, sizeof pkgsrc_dir},
    163 	{"pkgsrc user", "ftp", pkgsrc.user, sizeof pkgsrc.user},
    164 	{"pkgsrc pass", "", pkgsrc.pass, sizeof pkgsrc.pass},
    165 	{"pkgsrc proxy", "", pkgsrc.proxy, sizeof pkgsrc.proxy},
    166 
    167 	{NULL, NULL, NULL, 0}
    168 };
    169 
    170 static void
    171 init(void)
    172 {
    173 	const struct f_arg *arg;
    174 
    175 	sizemult = 1;
    176 	clean_xfer_dir = 0;
    177 	mnt2_mounted = 0;
    178 	fd_type = "msdos";
    179 
    180 	pm_head = (struct pm_head_t) SLIST_HEAD_INITIALIZER(pm_head);
    181 	SLIST_INIT(&pm_head);
    182 	pm_new = malloc(sizeof (struct pm_devs));
    183 	memset(pm_new, 0, sizeof *pm_new);
    184 
    185 	for (arg = fflagopts; arg->name != NULL; arg++) {
    186 		if (arg->var == NULL)
    187 			continue;
    188 		if (arg->var == cdrom_dev)
    189 			get_default_cdrom(arg->var, arg->size);
    190 		else
    191 			strlcpy(arg->var, arg->dflt, arg->size);
    192 	}
    193 	pkg.xfer = pkgsrc.xfer = XFER_HTTP;
    194 
    195 	clr_arg.bg=COLOR_BLUE;
    196 	clr_arg.fg=COLOR_WHITE;
    197 }
    198 
    199 static void
    200 init_lang(void)
    201 {
    202 	sizemult = 1;
    203 	err_outofmem = msg_string(MSG_out_of_memory);
    204 	multname = msg_string(MSG_secname);
    205 }
    206 
    207 int
    208 main(int argc, char **argv)
    209 {
    210 	int ch;
    211 
    212 	init();
    213 
    214 #ifdef DEBUG
    215 	log_flip();
    216 #endif
    217 
    218 	/* Check for TERM ... */
    219 	if (!getenv("TERM")) {
    220 		(void)fprintf(stderr,
    221 			 "sysinst: environment variable TERM not set.\n");
    222 		exit(4);
    223 	}
    224 
    225 	/* argv processing */
    226 	while ((ch = getopt(argc, argv, "Dr:f:C:"
    227 #ifndef NO_PARTMAN
    228 	    "p"
    229 #endif
    230 	    )) != -1)
    231 		switch(ch) {
    232 		case 'D':	/* set to get past certain errors in testing */
    233 			debug = 1;
    234 			break;
    235 		case 'r':
    236 			/* Release name - ignore for compatibility with older versions */
    237 			break;
    238 		case 'f':
    239 			/* Definition file to read. */
    240 			process_f_flag(optarg);
    241 			break;
    242 		case 'C':
    243 			/* Define colors */
    244 			sscanf(optarg, "%u:%u", &clr_arg.bg, &clr_arg.fg);
    245 			break;
    246 #ifndef NO_PARTMAN
    247 		case 'p':
    248 			/* Partition tool */
    249 			partman_go = 1;
    250 			break;
    251 #endif
    252 		case '?':
    253 		default:
    254 			usage();
    255 		}
    256 
    257 	md_init();
    258 
    259 	/* Initialize the partitioning subsystem */
    260 	partitions_init();
    261 
    262 	/* initialize message window */
    263 	if (menu_init()) {
    264 		__menu_initerror();
    265 		exit(4);
    266 	}
    267 
    268 	/*
    269 	 * Put 'messages' in a window that has a one-character border
    270 	 * on the real screen.
    271 	 */
    272 	mainwin = newwin(getmaxy(stdscr) - 2, getmaxx(stdscr) - 2, 1, 1);
    273 	if (mainwin == NULL) {
    274 		(void)fprintf(stderr,
    275 			 "sysinst: screen too small\n");
    276 		exit(1);
    277 	}
    278 	if (has_colors()) {
    279 		start_color();
    280 		do_coloring(clr_arg.fg,clr_arg.bg);
    281 	} else {
    282 		remove_color_options();
    283 	}
    284 	msg_window(mainwin);
    285 
    286 	/* Watch for signals and clean up */
    287 	(void)atexit(cleanup);
    288 	(void)signal(SIGINT, ttysighandler);
    289 	(void)signal(SIGQUIT, ttysighandler);
    290 	(void)signal(SIGHUP, miscsighandler);
    291 
    292 	/* redraw screen */
    293 	touchwin(stdscr);
    294 	refresh();
    295 
    296 	/* Ensure we have mountpoint for target filesystems */
    297 	mkdir(targetroot_mnt, S_IRWXU| S_IRGRP|S_IXGRP | S_IROTH|S_IXOTH);
    298 
    299 	select_language();
    300 	get_kb_encoding();
    301 	init_lang();
    302 
    303 	/* Menu processing */
    304 	if (partman_go)
    305 		partman();
    306 	else
    307 		process_menu(MENU_netbsd, NULL);
    308 
    309 #ifndef NO_PARTMAN
    310 	/* clean up internal storage */
    311 	pm_destroy_all();
    312 #endif
    313 
    314 	partitions_cleanup();
    315 
    316 	exit_cleanly = 1;
    317 	return 0;
    318 }
    319 
    320 static int
    321 set_language(menudesc *m, void *arg)
    322 {
    323 	char **fnames = arg;
    324 
    325 	msg_file(fnames[m->cursel]);
    326 	return 1;
    327 }
    328 
    329 static void
    330 select_language(void)
    331 {
    332 	DIR *dir;
    333 	struct dirent *dirent;
    334 	char **lang_msg, **fnames;
    335 	char prefix[PATH_MAX], fname[PATH_MAX];
    336 	int max_lang = 16, num_lang = 0;
    337 	const char *cp;
    338 	menu_ent *opt = 0;
    339 	int lang_menu = -1;
    340 	int lang;
    341 
    342 #ifdef CATALOG_DIR
    343 	strcpy(prefix, CATALOG_DIR "/");
    344 	dir = opendir(CATALOG_DIR);
    345 	if (!dir) {
    346 		strcpy(prefix, "./");
    347 		dir = opendir(".");
    348 	}
    349 #else
    350 	dir = opendir(".");
    351 	strcpy(prefix, "./");
    352 #endif
    353 	if (!dir)
    354 		return;
    355 
    356 	lang_msg = malloc(max_lang * sizeof *lang_msg);
    357 	fnames = malloc(max_lang * sizeof *fnames);
    358 	if (!lang_msg || !fnames)
    359 		goto done;
    360 
    361 	lang_msg[0] = strdup(msg_string(MSG_sysinst_message_language));
    362 	fnames[0] = 0;
    363 	num_lang = 1;
    364 
    365 	while ((dirent = readdir(dir)) != 0) {
    366 		if (memcmp(dirent->d_name, "sysinstmsgs.", 12))
    367 			continue;
    368 		strcpy(fname, prefix);
    369 		strcat(fname, dirent->d_name);
    370 		if (msg_file(fname))
    371 			continue;
    372 		cp = msg_string(MSG_sysinst_message_language);
    373 		if (!strcmp(cp, lang_msg[0]))
    374 			continue;
    375 		if (num_lang == max_lang) {
    376 			char **new;
    377 			max_lang *= 2;
    378 			new = realloc(lang_msg, max_lang * sizeof *lang_msg);
    379 			if (!new)
    380 				break;
    381 			lang_msg = new;
    382 			new = realloc(fnames, max_lang * sizeof *fnames);
    383 			if (!new)
    384 				break;
    385 			fnames = new;
    386 		}
    387 		fnames[num_lang] = strdup(fname);
    388 		lang_msg[num_lang++] = strdup(cp);
    389 	}
    390 	msg_file(0);
    391 	closedir(dir);
    392 	dir = 0;
    393 
    394 	if (num_lang == 1)
    395 		goto done;
    396 
    397 	opt = calloc(num_lang, sizeof *opt);
    398 	if (!opt)
    399 		goto done;
    400 
    401 	for (lang = 0; lang < num_lang; lang++) {
    402 		opt[lang].opt_name = lang_msg[lang];
    403 		opt[lang].opt_action = set_language;
    404 	}
    405 
    406 	lang_menu = new_menu(NULL, opt, num_lang, -1, 12, 0, 0, MC_NOEXITOPT,
    407 		NULL, NULL, NULL, NULL, NULL);
    408 
    409 	if (lang_menu != -1) {
    410 		msg_display(MSG_hello);
    411 		process_menu(lang_menu, fnames);
    412 	}
    413 
    414     done:
    415 	if (dir)
    416 		closedir(dir);
    417 	if (lang_menu != -1)
    418 		free_menu(lang_menu);
    419 	free(opt);
    420 	while (num_lang) {
    421 		free(lang_msg[--num_lang]);
    422 		free(fnames[num_lang]);
    423 	}
    424 	free(lang_msg);
    425 	free(fnames);
    426 
    427 	/* set locale according to selected language */
    428 	cp = msg_string(MSG_sysinst_message_locale);
    429 	if (cp) {
    430 		setlocale(LC_CTYPE, cp);
    431 		setenv("LC_CTYPE", cp, 1);
    432 	}
    433 }
    434 
    435 #ifndef md_may_remove_boot_medium
    436 #define md_may_remove_boot_medium()	(boot_media_still_needed()<=0)
    437 #endif
    438 
    439 /* toplevel menu handler ... */
    440 void
    441 toplevel(void)
    442 {
    443 	/*
    444 	 * Undo any stateful side-effects of previous menu choices.
    445 	 * XXX must be idempotent, since we get run each time the main
    446 	 *     menu is displayed.
    447 	 */
    448 	char *home = getenv("HOME");
    449 	if (home != NULL)
    450 		if (chdir(home) != 0)
    451 			(void)chdir("/");
    452 	unwind_mounts();
    453 	clear_swap();
    454 
    455 	/* Display banner message in (english, francais, deutsch..) */
    456 	msg_display(MSG_hello);
    457 	msg_display_add(MSG_md_hello);
    458 	if (md_may_remove_boot_medium())
    459 		msg_display_add(MSG_md_may_remove_boot_medium);
    460 	msg_display_add(MSG_thanks);
    461 }
    462 
    463 
    464 /* The usage ... */
    465 
    466 static void
    467 usage(void)
    468 {
    469 
    470 	(void)fprintf(stderr, "usage: sysinst [-D] [-f definition_file] "
    471 	    "[-r release] [-C bg:fg]"
    472 #ifndef NO_PARTMAN
    473 	    " [-p]"
    474 #endif
    475 	    "\n"
    476 	    "where:\n"
    477 	    "\t-D\n\t\trun in debug mode\n"
    478 	    "\t-f definition_file\n\t\toverride built-in defaults from file\n"
    479 	    "\t-r release\n\t\toverride release name\n"
    480 	    "\t-C bg:fg\n\t\tuse different color scheme\n"
    481 #ifndef NO_PARTMAN
    482 	    "\t-p\n\t\tonly run the partition editor, no installation\n"
    483 #endif
    484 	    );
    485 
    486 	exit(1);
    487 }
    488 
    489 /* ARGSUSED */
    490 static void
    491 miscsighandler(int signo)
    492 {
    493 
    494 	/*
    495 	 * we need to cleanup(), but it was already scheduled with atexit(),
    496 	 * so it'll be invoked on exit().
    497 	 */
    498 	exit(1);
    499 }
    500 
    501 static void
    502 ttysighandler(int signo)
    503 {
    504 
    505 	/*
    506 	 * if we want to ignore a TTY signal (SIGINT or SIGQUIT), then we
    507 	 * just return.  If we want to forward a TTY signal, we forward it
    508 	 * to the specified process group.
    509 	 *
    510 	 * This functionality is used when setting up and displaying child
    511 	 * output so that the child gets the signal and presumably dies,
    512 	 * but sysinst continues.  We use this rather than actually ignoring
    513 	 * the signals, because that will be passed on to a child
    514 	 * through fork/exec, whereas special handlers get reset on exec..
    515 	 */
    516 	if (ttysig_ignore)
    517 		return;
    518 	if (ttysig_forward) {
    519 		killpg(ttysig_forward, signo);
    520 		return;
    521 	}
    522 
    523 	/*
    524 	 * we need to cleanup(), but it was already scheduled with atexit(),
    525 	 * so it'll be invoked on exit().
    526 	 */
    527 	exit(1);
    528 }
    529 
    530 static void
    531 cleanup(void)
    532 {
    533 	time_t tloc;
    534 
    535 	(void)time(&tloc);
    536 
    537 #if 0
    538 	restore_etc();
    539 #endif
    540 	/* Ensure we aren't inside the target tree */
    541 	chdir(getenv("HOME"));
    542 	unwind_mounts();
    543 	umount_mnt2();
    544 	clear_swap();
    545 
    546 	endwin();
    547 
    548 	if (logfp) {
    549 		fprintf(logfp, "Log ended at: %s\n", safectime(&tloc));
    550 		fflush(logfp);
    551 		fclose(logfp);
    552 		logfp = NULL;
    553 	}
    554 	if (script) {
    555 		fprintf(script, "# Script ended at: %s\n", safectime(&tloc));
    556 		fflush(script);
    557 		fclose(script);
    558 		script = NULL;
    559 	}
    560 
    561 	if (!exit_cleanly)
    562 		fprintf(stderr, "\n\nsysinst terminated.\n");
    563 }
    564 
    565 
    566 /* process function ... */
    567 
    568 void
    569 process_f_flag(char *f_name)
    570 {
    571 	char buffer[STRSIZE];
    572 	int len;
    573 	const struct f_arg *arg;
    574 	FILE *fp;
    575 	char *cp, *cp1, *err;
    576 
    577 	/* open the file */
    578 	fp = fopen(f_name, "r");
    579 	if (fp == NULL) {
    580 		const char *args[] = { f_name };
    581 		err = str_arg_subst(msg_string(MSG_config_open_error),
    582 		    __arraycount(args), args);
    583 		fprintf(stderr, "%s\n", err);
    584 		free(err);
    585 		exit(1);
    586 	}
    587 
    588 	while (fgets(buffer, sizeof buffer, fp) != NULL) {
    589 		cp = buffer + strspn(buffer, " \t");
    590 		if (strchr("#\r\n", *cp) != NULL)
    591 			continue;
    592 		for (arg = fflagopts; arg->name != NULL; arg++) {
    593 			len = strlen(arg->name);
    594 			if (memcmp(cp, arg->name, len) != 0)
    595 				continue;
    596 			if (arg->var == NULL || arg->size == 0)
    597 				continue;
    598 			cp1 = cp + len;
    599 			cp1 += strspn(cp1, " \t");
    600 			if (*cp1++ != '=')
    601 				continue;
    602 			cp1 += strspn(cp1, " \t");
    603 			len = strcspn(cp1, " \n\r\t");
    604 			cp1[len] = 0;
    605 			strlcpy(arg->var, cp1, arg->size);
    606 			break;
    607 		}
    608 	}
    609 
    610 	fclose(fp);
    611 }
    612