1615 lines
38 KiB
C
1615 lines
38 KiB
C
/* $NetBSD: util.c,v 1.180 2012/10/25 15:05:23 tsutsui Exp $ */
|
|
|
|
/*
|
|
* Copyright 1997 Piermont Information Systems Inc.
|
|
* All rights reserved.
|
|
*
|
|
* Written by Philip A. Nelson for Piermont Information Systems Inc.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. The name of Piermont Information Systems Inc. may not be used to endorse
|
|
* or promote products derived from this software without specific prior
|
|
* written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS''
|
|
* AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE
|
|
* LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
|
|
* THE POSSIBILITY OF SUCH DAMAGE.
|
|
*
|
|
*/
|
|
|
|
/* util.c -- routines that don't really fit anywhere else... */
|
|
|
|
#include <stdio.h>
|
|
#include <stdarg.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#include <sys/mount.h>
|
|
#include <sys/disklabel.h>
|
|
#include <sys/dkio.h>
|
|
#include <sys/ioctl.h>
|
|
#include <sys/types.h>
|
|
#include <sys/param.h>
|
|
#include <sys/sysctl.h>
|
|
#include <sys/stat.h>
|
|
#include <sys/statvfs.h>
|
|
#include <isofs/cd9660/iso.h>
|
|
#include <curses.h>
|
|
#include <err.h>
|
|
#include <errno.h>
|
|
#include <dirent.h>
|
|
#include <util.h>
|
|
#include "defs.h"
|
|
#include "md.h"
|
|
#include "msg_defs.h"
|
|
#include "menu_defs.h"
|
|
|
|
#ifndef MD_SETS_SELECTED
|
|
#define MD_SETS_SELECTED SET_KERNEL_1, SET_SYSTEM, SET_X11, SET_MD
|
|
#endif
|
|
#ifndef MD_SETS_SELECTED_MINIMAL
|
|
#define MD_SETS_SELECTED_MINIMAL SET_KERNEL_1, SET_CORE
|
|
#endif
|
|
#ifndef MD_SETS_SELECTED_NOX
|
|
#define MD_SETS_SELECTED_NOX SET_KERNEL_1, SET_SYSTEM, SET_MD
|
|
#endif
|
|
#ifndef MD_SETS_VALID
|
|
#define MD_SETS_VALID SET_KERNEL, SET_SYSTEM, SET_X11, SET_MD, SET_SOURCE
|
|
#endif
|
|
|
|
#define MAX_CD_DEVS 256 /* how many cd drives do we expect to attach */
|
|
#define ISO_BLKSIZE ISO_DEFAULT_BLOCK_SIZE
|
|
|
|
static const char *msg_yes, *msg_no, *msg_all, *msg_some, *msg_none;
|
|
static const char *msg_cur_distsets_row;
|
|
static int select_menu_width;
|
|
|
|
static uint8_t set_status[SET_GROUP_END];
|
|
#define SET_VALID 0x01
|
|
#define SET_SELECTED 0x02
|
|
#define SET_SKIPPED 0x04
|
|
#define SET_INSTALLED 0x08
|
|
|
|
struct tarstats {
|
|
int nselected;
|
|
int nfound;
|
|
int nnotfound;
|
|
int nerror;
|
|
int nsuccess;
|
|
int nskipped;
|
|
} tarstats;
|
|
|
|
distinfo dist_list[] = {
|
|
#ifdef SET_KERNEL_1_NAME
|
|
{SET_KERNEL_1_NAME, SET_KERNEL_1, MSG_set_kernel_1, NULL},
|
|
#endif
|
|
#ifdef SET_KERNEL_2_NAME
|
|
{SET_KERNEL_2_NAME, SET_KERNEL_2, MSG_set_kernel_2, NULL},
|
|
#endif
|
|
#ifdef SET_KERNEL_3_NAME
|
|
{SET_KERNEL_3_NAME, SET_KERNEL_3, MSG_set_kernel_3, NULL},
|
|
#endif
|
|
#ifdef SET_KERNEL_4_NAME
|
|
{SET_KERNEL_4_NAME, SET_KERNEL_4, MSG_set_kernel_4, NULL},
|
|
#endif
|
|
#ifdef SET_KERNEL_5_NAME
|
|
{SET_KERNEL_5_NAME, SET_KERNEL_5, MSG_set_kernel_5, NULL},
|
|
#endif
|
|
#ifdef SET_KERNEL_6_NAME
|
|
{SET_KERNEL_6_NAME, SET_KERNEL_6, MSG_set_kernel_6, NULL},
|
|
#endif
|
|
#ifdef SET_KERNEL_7_NAME
|
|
{SET_KERNEL_7_NAME, SET_KERNEL_7, MSG_set_kernel_7, NULL},
|
|
#endif
|
|
#ifdef SET_KERNEL_8_NAME
|
|
{SET_KERNEL_8_NAME, SET_KERNEL_8, MSG_set_kernel_8, NULL},
|
|
#endif
|
|
|
|
{"modules", SET_MODULES, MSG_set_modules, NULL},
|
|
{"base", SET_BASE, MSG_set_base, NULL},
|
|
{"etc", SET_ETC, MSG_set_system, NULL},
|
|
{"comp", SET_COMPILER, MSG_set_compiler, NULL},
|
|
{"games", SET_GAMES, MSG_set_games, NULL},
|
|
{"man", SET_MAN_PAGES, MSG_set_man_pages, NULL},
|
|
{"misc", SET_MISC, MSG_set_misc, NULL},
|
|
{"tests", SET_TESTS, MSG_set_tests, NULL},
|
|
{"text", SET_TEXT_TOOLS, MSG_set_text_tools, NULL},
|
|
|
|
{NULL, SET_GROUP, MSG_set_X11, NULL},
|
|
{"xbase", SET_X11_BASE, MSG_set_X11_base, NULL},
|
|
{"xcomp", SET_X11_PROG, MSG_set_X11_prog, NULL},
|
|
{"xetc", SET_X11_ETC, MSG_set_X11_etc, NULL},
|
|
{"xfont", SET_X11_FONTS, MSG_set_X11_fonts, NULL},
|
|
{"xserver", SET_X11_SERVERS, MSG_set_X11_servers, NULL},
|
|
{NULL, SET_GROUP_END, NULL, NULL},
|
|
|
|
#ifdef SET_MD_1_NAME
|
|
{SET_MD_1_NAME, SET_MD_1, MSG_set_md_1, NULL},
|
|
#endif
|
|
#ifdef SET_MD_2_NAME
|
|
{SET_MD_2_NAME, SET_MD_2, MSG_set_md_2, NULL},
|
|
#endif
|
|
#ifdef SET_MD_3_NAME
|
|
{SET_MD_3_NAME, SET_MD_3, MSG_set_md_3, NULL},
|
|
#endif
|
|
#ifdef SET_MD_4_NAME
|
|
{SET_MD_4_NAME, SET_MD_4, MSG_set_md_4, NULL},
|
|
#endif
|
|
|
|
{NULL, SET_GROUP, MSG_set_source, NULL},
|
|
{"syssrc", SET_SYSSRC, MSG_set_syssrc, NULL},
|
|
{"src", SET_SRC, MSG_set_src, NULL},
|
|
{"sharesrc", SET_SHARESRC, MSG_set_sharesrc, NULL},
|
|
{"gnusrc", SET_GNUSRC, MSG_set_gnusrc, NULL},
|
|
{"xsrc", SET_XSRC, MSG_set_xsrc, NULL},
|
|
{NULL, SET_GROUP_END, NULL, NULL},
|
|
|
|
{NULL, SET_LAST, NULL, NULL},
|
|
};
|
|
|
|
#define MAX_CD_INFOS 16 /* how many media can be found? */
|
|
struct cd_info {
|
|
char device_name[16];
|
|
char menu[100];
|
|
};
|
|
static struct cd_info cds[MAX_CD_INFOS];
|
|
|
|
/*
|
|
* local prototypes
|
|
*/
|
|
|
|
static int check_for(unsigned int mode, const char *pathname);
|
|
static int get_iso9660_volname(int dev, int sess, char *volname);
|
|
static int get_available_cds(void);
|
|
|
|
void
|
|
init_set_status(int flags)
|
|
{
|
|
static const uint8_t sets_valid[] = {MD_SETS_VALID};
|
|
static const uint8_t sets_selected_full[] = {MD_SETS_SELECTED};
|
|
static const uint8_t sets_selected_minimal[] = {MD_SETS_SELECTED_MINIMAL};
|
|
static const uint8_t sets_selected_nox[] = {MD_SETS_SELECTED_NOX};
|
|
static const uint8_t *sets_selected;
|
|
unsigned int nelem_selected;
|
|
unsigned int i, len;
|
|
const char *longest;
|
|
|
|
if (flags & SFLAG_MINIMAL) {
|
|
sets_selected = sets_selected_minimal;
|
|
nelem_selected = nelem(sets_selected_minimal);
|
|
} else if (flags & SFLAG_NOX) {
|
|
sets_selected = sets_selected_nox;
|
|
nelem_selected = nelem(sets_selected_nox);
|
|
} else {
|
|
sets_selected = sets_selected_full;
|
|
nelem_selected = nelem(sets_selected_full);
|
|
}
|
|
|
|
for (i = 0; i < nelem(sets_valid); i++)
|
|
set_status[sets_valid[i]] = SET_VALID;
|
|
for (i = 0; i < nelem_selected; i++)
|
|
set_status[sets_selected[i]] |= SET_SELECTED;
|
|
|
|
set_status[SET_GROUP] = SET_VALID;
|
|
|
|
/* Lookup some strings we need lots of times */
|
|
msg_yes = msg_string(MSG_Yes);
|
|
msg_no = msg_string(MSG_No);
|
|
msg_all = msg_string(MSG_All);
|
|
msg_some = msg_string(MSG_Some);
|
|
msg_none = msg_string(MSG_None);
|
|
msg_cur_distsets_row = msg_string(MSG_cur_distsets_row);
|
|
|
|
/* Find longest and use it to determine width of selection menu */
|
|
len = strlen(msg_no); longest = msg_no;
|
|
i = strlen(msg_yes); if (i > len) {len = i; longest = msg_yes; }
|
|
i = strlen(msg_all); if (i > len) {len = i; longest = msg_all; }
|
|
i = strlen(msg_some); if (i > len) {len = i; longest = msg_some; }
|
|
i = strlen(msg_none); if (i > len) {len = i; longest = msg_none; }
|
|
select_menu_width = snprintf(NULL, 0, msg_cur_distsets_row, "",longest);
|
|
|
|
/* Give the md code a chance to choose the right kernel, etc. */
|
|
md_init_set_status(flags);
|
|
}
|
|
|
|
int
|
|
dir_exists_p(const char *path)
|
|
{
|
|
|
|
return file_mode_match(path, S_IFDIR);
|
|
}
|
|
|
|
int
|
|
file_exists_p(const char *path)
|
|
{
|
|
|
|
return file_mode_match(path, S_IFREG);
|
|
}
|
|
|
|
int
|
|
file_mode_match(const char *path, unsigned int mode)
|
|
{
|
|
struct stat st;
|
|
|
|
return (stat(path, &st) == 0 && (st.st_mode & S_IFMT) == mode);
|
|
}
|
|
|
|
uint
|
|
get_ramsize(void)
|
|
{
|
|
uint64_t ramsize;
|
|
size_t len = sizeof ramsize;
|
|
int mib[2] = {CTL_HW, HW_PHYSMEM64};
|
|
|
|
sysctl(mib, 2, &ramsize, &len, NULL, 0);
|
|
|
|
/* Find out how many Megs ... round up. */
|
|
return (ramsize + MEG - 1) / MEG;
|
|
}
|
|
|
|
void
|
|
run_makedev(void)
|
|
{
|
|
char *owd;
|
|
|
|
msg_display_add("\n\n");
|
|
msg_display_add(MSG_makedev);
|
|
|
|
owd = getcwd(NULL, 0);
|
|
|
|
/* make /dev, in case the user didn't extract it. */
|
|
make_target_dir("/dev");
|
|
target_chdir_or_die("/dev");
|
|
run_program(0, "/bin/sh MAKEDEV all");
|
|
|
|
chdir(owd);
|
|
free(owd);
|
|
}
|
|
|
|
/*
|
|
* Performs in-place replacement of a set of patterns in a file that lives
|
|
* inside the installed system. The patterns must be separated by a semicolon.
|
|
* For example:
|
|
*
|
|
* replace("/etc/some-file.conf", "s/prop1=NO/prop1=YES/;s/foo/bar/");
|
|
*/
|
|
void
|
|
replace(const char *path, const char *patterns, ...)
|
|
{
|
|
char *spatterns;
|
|
va_list ap;
|
|
|
|
va_start(ap, patterns);
|
|
vasprintf(&spatterns, patterns, ap);
|
|
va_end(ap);
|
|
if (spatterns == NULL)
|
|
err(1, "vasprintf(&spatterns, \"%s\", ...)", patterns);
|
|
|
|
run_program(RUN_CHROOT, "sed -an -e '%s;H;$!d;g;w %s' %s", spatterns,
|
|
path, path);
|
|
|
|
free(spatterns);
|
|
}
|
|
|
|
static int
|
|
floppy_fetch(const char *set_name)
|
|
{
|
|
char post[4];
|
|
msg errmsg;
|
|
int menu;
|
|
int status;
|
|
const char *write_mode = ">";
|
|
|
|
strcpy(post, "aa");
|
|
|
|
errmsg = "";
|
|
menu = MENU_fdok;
|
|
for (;;) {
|
|
umount_mnt2();
|
|
msg_display(errmsg);
|
|
msg_display_add(MSG_fdmount, set_name, post);
|
|
process_menu(menu, &status);
|
|
if (status != SET_CONTINUE)
|
|
return status;
|
|
menu = MENU_fdremount;
|
|
errmsg = MSG_fdremount;
|
|
if (run_program(0, "/sbin/mount -r -t %s %s /mnt2",
|
|
fd_type, fd_dev))
|
|
continue;
|
|
mnt2_mounted = 1;
|
|
errmsg = MSG_fdnotfound;
|
|
|
|
/* Display this because it might take a while.... */
|
|
if (run_program(RUN_DISPLAY,
|
|
"sh -c '/bin/cat /mnt2/%s.%s %s %s/%s/%s%s'",
|
|
set_name, post, write_mode,
|
|
target_prefix(), xfer_dir, set_name, dist_postfix))
|
|
/* XXX: a read error will give a corrupt file! */
|
|
continue;
|
|
|
|
/* We got that file, advance to next fragment */
|
|
if (post[1] < 'z')
|
|
post[1]++;
|
|
else
|
|
post[1] = 'a', post[0]++;
|
|
write_mode = ">>";
|
|
errmsg = "";
|
|
menu = MENU_fdok;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Load files from floppy. Requires a /mnt2 directory for mounting them.
|
|
*/
|
|
int
|
|
get_via_floppy(void)
|
|
{
|
|
|
|
process_menu(MENU_floppysource, NULL);
|
|
|
|
fetch_fn = floppy_fetch;
|
|
|
|
/* Set ext_dir for absolute path. */
|
|
snprintf(ext_dir_bin, sizeof ext_dir_bin, "%s/%s", target_prefix(), xfer_dir);
|
|
snprintf(ext_dir_src, sizeof ext_dir_src, "%s/%s", target_prefix(), xfer_dir);
|
|
|
|
return SET_OK;
|
|
}
|
|
|
|
/*
|
|
* Get the volume name of a ISO9660 file system
|
|
*/
|
|
static int
|
|
get_iso9660_volname(int dev, int sess, char *volname)
|
|
{
|
|
int blkno, error, last;
|
|
char buf[ISO_BLKSIZE];
|
|
struct iso_volume_descriptor *vd = NULL;
|
|
struct iso_primary_descriptor *pd = NULL;
|
|
|
|
for (blkno = sess+16; blkno < sess+16+100; blkno++) {
|
|
error = pread(dev, buf, ISO_BLKSIZE, blkno*ISO_BLKSIZE);
|
|
if (error == -1)
|
|
return -1;
|
|
vd = (struct iso_volume_descriptor *)&buf;
|
|
if (memcmp(vd->id, ISO_STANDARD_ID, sizeof(vd->id)) != 0)
|
|
return -1;
|
|
if (isonum_711((const unsigned char *)&vd->type)
|
|
== ISO_VD_PRIMARY) {
|
|
pd = (struct iso_primary_descriptor*)buf;
|
|
strncpy(volname, pd->volume_id, sizeof pd->volume_id);
|
|
last = sizeof pd->volume_id-1;
|
|
while (last >= 0
|
|
&& (volname[last] == ' ' || volname[last] == 0))
|
|
last--;
|
|
volname[last+1] = 0;
|
|
return 0;
|
|
}
|
|
}
|
|
return -1;
|
|
}
|
|
|
|
/*
|
|
* Get a list of all available CD media (not drives!), return
|
|
* the number of entries collected.
|
|
*/
|
|
static int
|
|
get_available_cds(void)
|
|
{
|
|
char dname[16], volname[80];
|
|
struct cd_info *info = cds;
|
|
struct disklabel label;
|
|
int i, part, dev, error, sess, ready, count = 0;
|
|
|
|
for (i = 0; i < MAX_CD_DEVS; i++) {
|
|
sprintf(dname, "/dev/rcd%d%c", i, 'a'+RAW_PART);
|
|
dev = open(dname, O_RDONLY, 0);
|
|
if (dev == -1)
|
|
break;
|
|
ready = 0;
|
|
error = ioctl(dev, DIOCTUR, &ready);
|
|
if (error != 0 || ready == 0) {
|
|
close(dev);
|
|
continue;
|
|
}
|
|
error = ioctl(dev, DIOCGDINFO, &label);
|
|
close(dev);
|
|
if (error == 0) {
|
|
for (part = 0; part < label.d_npartitions; part++) {
|
|
if (label.d_partitions[part].p_fstype
|
|
== FS_UNUSED
|
|
|| label.d_partitions[part].p_size == 0)
|
|
continue;
|
|
if (label.d_partitions[part].p_fstype
|
|
== FS_ISO9660) {
|
|
sess = label.d_partitions[part]
|
|
.p_cdsession;
|
|
sprintf(dname, "/dev/rcd%d%c", i,
|
|
'a'+part);
|
|
dev = open(dname, O_RDONLY, 0);
|
|
if (dev == -1)
|
|
continue;
|
|
error = get_iso9660_volname(dev, sess,
|
|
volname);
|
|
close(dev);
|
|
if (error) continue;
|
|
sprintf(info->device_name, "cd%d%c",
|
|
i, 'a'+part);
|
|
sprintf(info->menu, "%s (%s)",
|
|
info->device_name,
|
|
volname);
|
|
} else {
|
|
/*
|
|
* All install CDs use partition
|
|
* a for the sets.
|
|
*/
|
|
if (part > 0)
|
|
continue;
|
|
sprintf(info->device_name, "cd%d%c",
|
|
i, 'a'+part);
|
|
strcpy(info->menu, info->device_name);
|
|
}
|
|
info++;
|
|
if (++count >= MAX_CD_INFOS)
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
return count;
|
|
}
|
|
|
|
static int
|
|
cd_has_sets(void)
|
|
{
|
|
/* Mount it */
|
|
if (run_program(RUN_SILENT, "/sbin/mount -rt cd9660 /dev/%s /mnt2",
|
|
cdrom_dev) != 0)
|
|
return 0;
|
|
|
|
mnt2_mounted = 1;
|
|
|
|
snprintf(ext_dir_bin, sizeof ext_dir_bin, "%s/%s", "/mnt2", set_dir_bin);
|
|
snprintf(ext_dir_src, sizeof ext_dir_src, "%s/%s", "/mnt2", set_dir_src);
|
|
return dir_exists_p(ext_dir_bin);
|
|
}
|
|
|
|
|
|
static int
|
|
set_cd_select(menudesc *m, void *arg)
|
|
{
|
|
*(int *)arg = m->cursel;
|
|
return 1;
|
|
}
|
|
|
|
/*
|
|
* Check whether we can remove the boot media.
|
|
* If it is not a local filesystem, return -1.
|
|
* If we can not decide for sure (can not tell MD content from plain ffs
|
|
* on hard disk, for example), return 0.
|
|
* If it is a CD/DVD, return 1.
|
|
*/
|
|
int
|
|
boot_media_still_needed(void)
|
|
{
|
|
struct statvfs sb;
|
|
|
|
if (statvfs("/", &sb) == 0) {
|
|
if (!(sb.f_flag & ST_LOCAL))
|
|
return -1;
|
|
if (strcmp(sb.f_fstypename, MOUNT_CD9660) == 0
|
|
|| strcmp(sb.f_fstypename, MOUNT_UDF) == 0)
|
|
return 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* Get from a CDROM distribution.
|
|
* Also used on "installation using bootable install media"
|
|
* as the default option in the "distmedium" menu.
|
|
*/
|
|
int
|
|
get_via_cdrom(void)
|
|
{
|
|
menu_ent cd_menu[MAX_CD_INFOS];
|
|
struct stat sb;
|
|
int num_cds, menu_cd, i, selected_cd = 0;
|
|
bool silent = false;
|
|
int mib[2];
|
|
char rootdev[SSTRSIZE] = "";
|
|
size_t varlen;
|
|
|
|
/* If root is not md(4) and we have set dir, skip this step. */
|
|
mib[0] = CTL_KERN;
|
|
mib[1] = KERN_ROOT_DEVICE;
|
|
varlen = sizeof(rootdev);
|
|
(void)sysctl(mib, 2, rootdev, &varlen, NULL, 0);
|
|
if (stat(set_dir_bin, &sb) == 0 && S_ISDIR(sb.st_mode) &&
|
|
strncmp("md", rootdev, 2) != 0) {
|
|
strlcpy(ext_dir_bin, set_dir_bin, sizeof ext_dir_bin);
|
|
strlcpy(ext_dir_src, set_dir_src, sizeof ext_dir_src);
|
|
return SET_OK;
|
|
}
|
|
|
|
num_cds = get_available_cds();
|
|
if (num_cds <= 0) {
|
|
silent = true;
|
|
} else if (num_cds == 1) {
|
|
/* single CD found, check for sets on it */
|
|
strcpy(cdrom_dev, cds[0].device_name);
|
|
if (cd_has_sets())
|
|
return SET_OK;
|
|
} else {
|
|
for (i = 0; i< num_cds; i++) {
|
|
cd_menu[i].opt_name = cds[i].menu;
|
|
cd_menu[i].opt_menu = OPT_NOMENU;
|
|
cd_menu[i].opt_flags = OPT_EXIT;
|
|
cd_menu[i].opt_action = set_cd_select;
|
|
}
|
|
/* create a menu offering available choices */
|
|
menu_cd = new_menu(MSG_Available_cds,
|
|
cd_menu, num_cds, -1, 4, 0, 0,
|
|
MC_SCROLL | MC_NOEXITOPT,
|
|
NULL, NULL, NULL, NULL, NULL);
|
|
if (menu_cd == -1)
|
|
return SET_RETRY;
|
|
msg_display(MSG_ask_cd);
|
|
process_menu(menu_cd, &selected_cd);
|
|
free_menu(menu_cd);
|
|
strcpy(cdrom_dev, cds[selected_cd].device_name);
|
|
if (cd_has_sets())
|
|
return SET_OK;
|
|
}
|
|
|
|
if (silent)
|
|
msg_display("");
|
|
else {
|
|
umount_mnt2();
|
|
msg_display(MSG_cd_path_not_found);
|
|
process_menu(MENU_ok, NULL);
|
|
}
|
|
|
|
/* ask for paths on the CD */
|
|
process_menu(MENU_cdromsource, NULL);
|
|
|
|
if (cd_has_sets())
|
|
return SET_OK;
|
|
|
|
return SET_RETRY;
|
|
}
|
|
|
|
|
|
/*
|
|
* Get from a pathname inside an unmounted local filesystem
|
|
* (e.g., where sets were preloaded onto a local DOS partition)
|
|
*/
|
|
int
|
|
get_via_localfs(void)
|
|
{
|
|
|
|
/* Get device, filesystem, and filepath */
|
|
process_menu (MENU_localfssource, NULL);
|
|
|
|
/* Mount it */
|
|
if (run_program(0, "/sbin/mount -rt %s /dev/%s /mnt2",
|
|
localfs_fs, localfs_dev))
|
|
return SET_RETRY;
|
|
|
|
mnt2_mounted = 1;
|
|
|
|
snprintf(ext_dir_bin, sizeof ext_dir_bin, "%s/%s/%s",
|
|
"/mnt2", localfs_dir, set_dir_bin);
|
|
snprintf(ext_dir_src, sizeof ext_dir_src, "%s/%s/%s",
|
|
"/mnt2", localfs_dir, set_dir_src);
|
|
|
|
return SET_OK;
|
|
}
|
|
|
|
/*
|
|
* Get from an already-mounted pathname.
|
|
*/
|
|
|
|
int
|
|
get_via_localdir(void)
|
|
{
|
|
|
|
/* Get filepath */
|
|
process_menu(MENU_localdirsource, NULL);
|
|
|
|
/*
|
|
* We have to have an absolute path ('cos pax runs in a
|
|
* different directory), make it so.
|
|
*/
|
|
snprintf(ext_dir_bin, sizeof ext_dir_bin, "/%s/%s", localfs_dir, set_dir_bin);
|
|
snprintf(ext_dir_src, sizeof ext_dir_src, "/%s/%s", localfs_dir, set_dir_src);
|
|
|
|
return SET_OK;
|
|
}
|
|
|
|
|
|
/*
|
|
* Support for custom distribution fetches / unpacks.
|
|
*/
|
|
|
|
unsigned int
|
|
set_X11_selected(void)
|
|
{
|
|
int i;
|
|
|
|
for (i = SET_X11_FIRST; ++i < SET_X11_LAST;)
|
|
if (set_status[i] & SET_SELECTED)
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
unsigned int
|
|
get_kernel_set(void)
|
|
{
|
|
int i;
|
|
|
|
for (i = SET_KERNEL_FIRST; ++i < SET_KERNEL_LAST;)
|
|
if (set_status[i] & SET_SELECTED)
|
|
return i;
|
|
return SET_NONE;
|
|
}
|
|
|
|
void
|
|
set_kernel_set(unsigned int kernel_set)
|
|
{
|
|
int i;
|
|
|
|
/* only one kernel set is allowed */
|
|
for (i = SET_KERNEL_FIRST; ++i < SET_KERNEL_LAST;)
|
|
set_status[i] &= ~SET_SELECTED;
|
|
set_status[kernel_set] |= SET_SELECTED;
|
|
}
|
|
|
|
static int
|
|
set_toggle(menudesc *menu, void *arg)
|
|
{
|
|
distinfo **distp = arg;
|
|
int set = distp[menu->cursel]->set;
|
|
|
|
if (set > SET_KERNEL_FIRST && set < SET_KERNEL_LAST &&
|
|
!(set_status[set] & SET_SELECTED))
|
|
set_kernel_set(set);
|
|
else
|
|
set_status[set] ^= SET_SELECTED;
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
set_all_none(menudesc *menu, void *arg, int set, int clr)
|
|
{
|
|
distinfo **distp = arg;
|
|
distinfo *dist = *distp;
|
|
int nested;
|
|
|
|
for (nested = 0; dist->set != SET_GROUP_END || nested--; dist++) {
|
|
if (dist->set == SET_GROUP) {
|
|
nested++;
|
|
continue;
|
|
}
|
|
set_status[dist->set] = (set_status[dist->set] & ~clr) | set;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
set_all(menudesc *menu, void *arg)
|
|
{
|
|
return set_all_none(menu, arg, SET_SELECTED, 0);
|
|
}
|
|
|
|
static int
|
|
set_none(menudesc *menu, void *arg)
|
|
{
|
|
return set_all_none(menu, arg, 0, SET_SELECTED);
|
|
}
|
|
|
|
static void
|
|
set_label(menudesc *menu, int opt, void *arg)
|
|
{
|
|
distinfo **distp = arg;
|
|
distinfo *dist = distp[opt];
|
|
const char *selected;
|
|
const char *desc;
|
|
int nested;
|
|
|
|
desc = dist->desc;
|
|
|
|
if (dist->set != SET_GROUP)
|
|
selected = set_status[dist->set] & SET_SELECTED ? msg_yes : msg_no;
|
|
else {
|
|
/* sub menu - display None/Some/All */
|
|
nested = 0;
|
|
selected = "unknown";
|
|
while ((++dist)->set != SET_GROUP_END || nested--) {
|
|
if (dist->set == SET_GROUP) {
|
|
nested++;
|
|
continue;
|
|
}
|
|
if (!(set_status[dist->set] & SET_VALID))
|
|
continue;
|
|
if (set_status[dist->set] & SET_SELECTED) {
|
|
if (selected == msg_none) {
|
|
selected = msg_some;
|
|
break;
|
|
}
|
|
selected = msg_all;
|
|
} else {
|
|
if (selected == msg_all) {
|
|
selected = msg_some;
|
|
break;
|
|
}
|
|
selected = msg_none;
|
|
}
|
|
}
|
|
}
|
|
|
|
wprintw(menu->mw, msg_cur_distsets_row, msg_string(desc), selected);
|
|
}
|
|
|
|
static int set_sublist(menudesc *menu, void *arg);
|
|
|
|
static int
|
|
initialise_set_menu(distinfo *dist, menu_ent *me, distinfo **de, int all_none)
|
|
{
|
|
int set;
|
|
int sets;
|
|
int nested;
|
|
|
|
for (sets = 0; ; dist++) {
|
|
set = dist->set;
|
|
if (set == SET_LAST || set == SET_GROUP_END)
|
|
break;
|
|
if (!(set_status[set] & SET_VALID))
|
|
continue;
|
|
*de = dist;
|
|
me->opt_menu = OPT_NOMENU;
|
|
me->opt_flags = 0;
|
|
me->opt_name = NULL;
|
|
if (set != SET_GROUP)
|
|
me->opt_action = set_toggle;
|
|
else {
|
|
/* Collapse sublist */
|
|
nested = 0;
|
|
while ((++dist)->set != SET_GROUP_END || nested--) {
|
|
if (dist->set == SET_GROUP)
|
|
nested++;
|
|
}
|
|
me->opt_action = set_sublist;
|
|
}
|
|
sets++;
|
|
de++;
|
|
me++;
|
|
}
|
|
|
|
if (all_none) {
|
|
me->opt_menu = OPT_NOMENU;
|
|
me->opt_flags = 0;
|
|
me->opt_name = MSG_select_all;
|
|
me->opt_action = set_all;
|
|
me++;
|
|
me->opt_menu = OPT_NOMENU;
|
|
me->opt_flags = 0;
|
|
me->opt_name = MSG_select_none;
|
|
me->opt_action = set_none;
|
|
sets += 2;
|
|
}
|
|
|
|
return sets;
|
|
}
|
|
|
|
static int
|
|
set_sublist(menudesc *menu, void *arg)
|
|
{
|
|
distinfo *de[SET_LAST];
|
|
menu_ent me[SET_LAST];
|
|
distinfo **dist = arg;
|
|
int menu_no;
|
|
int sets;
|
|
|
|
sets = initialise_set_menu(dist[menu->cursel] + 1, me, de, 1);
|
|
|
|
menu_no = new_menu(NULL, me, sets, 20, 10, 0, select_menu_width,
|
|
MC_SUBMENU | MC_SCROLL | MC_DFLTEXIT,
|
|
NULL, set_label, NULL, NULL,
|
|
MSG_install_selected_sets);
|
|
|
|
process_menu(menu_no, de);
|
|
free_menu(menu_no);
|
|
|
|
return 0;
|
|
}
|
|
|
|
void
|
|
customise_sets(void)
|
|
{
|
|
distinfo *de[SET_LAST];
|
|
menu_ent me[SET_LAST];
|
|
int sets;
|
|
int menu_no;
|
|
|
|
msg_display(MSG_cur_distsets);
|
|
msg_table_add(MSG_cur_distsets_header);
|
|
|
|
sets = initialise_set_menu(dist_list, me, de, 0);
|
|
|
|
menu_no = new_menu(NULL, me, sets, 0, 5, 0, select_menu_width,
|
|
MC_SCROLL | MC_NOBOX | MC_DFLTEXIT | MC_NOCLEAR,
|
|
NULL, set_label, NULL, NULL,
|
|
MSG_install_selected_sets);
|
|
|
|
process_menu(menu_no, de);
|
|
free_menu(menu_no);
|
|
}
|
|
|
|
/*
|
|
* Extract_file **REQUIRES** an absolute path in ext_dir. Any code
|
|
* that sets up xfer_dir for use by extract_file needs to put in the
|
|
* full path name to the directory.
|
|
*/
|
|
|
|
int
|
|
extract_file(distinfo *dist, int update)
|
|
{
|
|
char path[STRSIZE];
|
|
char *owd;
|
|
int rval;
|
|
|
|
/* If we might need to tidy up, ensure directory exists */
|
|
if (fetch_fn != NULL)
|
|
make_target_dir(xfer_dir);
|
|
|
|
(void)snprintf(path, sizeof path, "%s/%s%s",
|
|
ext_dir_for_set(dist->name), dist->name, dist_postfix);
|
|
|
|
owd = getcwd(NULL, 0);
|
|
|
|
/* Do we need to fetch the file now? */
|
|
if (fetch_fn != NULL) {
|
|
rval = fetch_fn(dist->name);
|
|
if (rval != SET_OK)
|
|
return rval;
|
|
}
|
|
|
|
/* check tarfile exists */
|
|
if (!file_exists_p(path)) {
|
|
|
|
#ifdef SUPPORT_8_3_SOURCE_FILESYSTEM
|
|
/*
|
|
* Update path to use dist->name truncated to the first eight
|
|
* characters and check again
|
|
*/
|
|
(void)snprintf(path, sizeof path, "%s/%.8s%.4s", /* 4 as includes '.' */
|
|
ext_dir_for_set(dist->name), dist->name, dist_postfix);
|
|
if (!file_exists_p(path)) {
|
|
#endif /* SUPPORT_8_3_SOURCE_FILESYSTEM */
|
|
|
|
tarstats.nnotfound++;
|
|
|
|
msg_display(MSG_notarfile, path);
|
|
process_menu(MENU_ok, NULL);
|
|
return SET_RETRY;
|
|
}
|
|
#ifdef SUPPORT_8_3_SOURCE_FILESYSTEM
|
|
}
|
|
#endif /* SUPPORT_8_3_SOURCE_FILESYSTEM */
|
|
|
|
tarstats.nfound++;
|
|
/* cd to the target root. */
|
|
if (update && (dist->set == SET_ETC || dist->set == SET_X11_ETC)) {
|
|
make_target_dir("/.sysinst");
|
|
target_chdir_or_die("/.sysinst");
|
|
} else if (dist->set == SET_PKGSRC)
|
|
target_chdir_or_die("/usr");
|
|
else
|
|
target_chdir_or_die("/");
|
|
|
|
/*
|
|
* /usr/X11R7/lib/X11/xkb/symbols/pc was a directory in 5.0
|
|
* but is a file in 5.1 and beyond, so on upgrades we need to
|
|
* delete it before extracting the xbase set.
|
|
*/
|
|
if (update && dist->set == SET_X11_BASE)
|
|
run_program(0, "rm -rf usr/X11R7/lib/X11/xkb/symbols/pc");
|
|
|
|
/* now extract set files into "./". */
|
|
rval = run_program(RUN_DISPLAY | RUN_PROGRESS,
|
|
"progress -zf %s tar --chroot -xhepf -", path);
|
|
|
|
chdir(owd);
|
|
free(owd);
|
|
|
|
/* Check rval for errors and give warning. */
|
|
if (rval != 0) {
|
|
tarstats.nerror++;
|
|
msg_display(MSG_tarerror, path);
|
|
process_menu(MENU_ok, NULL);
|
|
return SET_RETRY;
|
|
}
|
|
|
|
if (fetch_fn != NULL && clean_xfer_dir) {
|
|
run_program(0, "rm %s", path);
|
|
/* Plausibly we should unlink an empty xfer_dir as well */
|
|
}
|
|
|
|
set_status[dist->set] |= SET_INSTALLED;
|
|
tarstats.nsuccess++;
|
|
return SET_OK;
|
|
}
|
|
|
|
static void
|
|
skip_set(distinfo *dist, int skip_type)
|
|
{
|
|
int nested;
|
|
int set;
|
|
|
|
nested = 0;
|
|
while ((++dist)->set != SET_GROUP_END || nested--) {
|
|
set = dist->set;
|
|
if (set == SET_GROUP) {
|
|
nested++;
|
|
continue;
|
|
}
|
|
if (set == SET_LAST)
|
|
break;
|
|
if (set_status[set] == (SET_SELECTED | SET_VALID))
|
|
set_status[set] |= SET_SKIPPED;
|
|
tarstats.nskipped++;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Get and unpack the distribution.
|
|
* Show success_msg if installation completes.
|
|
* Otherwise show failure_msg and wait for the user to ack it before continuing.
|
|
* success_msg and failure_msg must both be 0-adic messages.
|
|
*/
|
|
int
|
|
get_and_unpack_sets(int update, msg setupdone_msg, msg success_msg, msg failure_msg)
|
|
{
|
|
distinfo *dist;
|
|
int status;
|
|
int set;
|
|
|
|
/* Ensure mountpoint for distribution files exists in current root. */
|
|
(void)mkdir("/mnt2", S_IRWXU| S_IRGRP|S_IXGRP | S_IROTH|S_IXOTH);
|
|
if (script)
|
|
(void)fprintf(script, "mkdir -m 755 /mnt2\n");
|
|
|
|
/* reset failure/success counters */
|
|
memset(&tarstats, 0, sizeof(tarstats));
|
|
|
|
/* Find out which files to "get" if we get files. */
|
|
|
|
/* Accurately count selected sets */
|
|
for (dist = dist_list; (set = dist->set) != SET_LAST; dist++) {
|
|
if ((set_status[set] & (SET_VALID | SET_SELECTED))
|
|
== (SET_VALID | SET_SELECTED))
|
|
tarstats.nselected++;
|
|
}
|
|
|
|
status = SET_RETRY;
|
|
for (dist = dist_list; ; dist++) {
|
|
set = dist->set;
|
|
if (set == SET_LAST)
|
|
break;
|
|
if (dist->name == NULL)
|
|
continue;
|
|
if (set_status[set] != (SET_VALID | SET_SELECTED))
|
|
continue;
|
|
|
|
if (status != SET_OK) {
|
|
/* This might force a redraw.... */
|
|
clearok(curscr, 1);
|
|
touchwin(stdscr);
|
|
wrefresh(stdscr);
|
|
/* Sort out the location of the set files */
|
|
do {
|
|
umount_mnt2();
|
|
msg_display(MSG_distmedium, tarstats.nselected,
|
|
tarstats.nsuccess + tarstats.nskipped,
|
|
dist->name);
|
|
fetch_fn = NULL;
|
|
process_menu(MENU_distmedium, &status);
|
|
} while (status == SET_RETRY);
|
|
|
|
if (status == SET_SKIP) {
|
|
set_status[set] |= SET_SKIPPED;
|
|
tarstats.nskipped++;
|
|
continue;
|
|
}
|
|
if (status == SET_SKIP_GROUP) {
|
|
skip_set(dist, status);
|
|
continue;
|
|
}
|
|
if (status != SET_OK) {
|
|
msg_display(failure_msg);
|
|
process_menu(MENU_ok, NULL);
|
|
return 1;
|
|
}
|
|
}
|
|
|
|
/* Try to extract this set */
|
|
status = extract_file(dist, update);
|
|
if (status == SET_RETRY)
|
|
dist--;
|
|
}
|
|
|
|
if (tarstats.nerror == 0 && tarstats.nsuccess == tarstats.nselected) {
|
|
msg_display(MSG_endtarok);
|
|
/* Give user a chance to see the success message */
|
|
sleep(1);
|
|
} else {
|
|
/* We encountered errors. Let the user know. */
|
|
msg_display(MSG_endtar,
|
|
tarstats.nselected, tarstats.nnotfound, tarstats.nskipped,
|
|
tarstats.nfound, tarstats.nsuccess, tarstats.nerror);
|
|
process_menu(MENU_ok, NULL);
|
|
msg_clear();
|
|
}
|
|
|
|
/*
|
|
* postinstall needs to be run after extracting all sets, because
|
|
* otherwise /var/db/obsolete will only have current information
|
|
* from the base, comp, and etc sets.
|
|
*/
|
|
if (update && (set_status[SET_ETC] & SET_INSTALLED)) {
|
|
int oldsendmail;
|
|
oldsendmail = run_program(RUN_DISPLAY | RUN_CHROOT |
|
|
RUN_ERROR_OK | RUN_PROGRESS,
|
|
"/usr/sbin/postinstall -s /.sysinst -d / check mailerconf");
|
|
if (oldsendmail == 1) {
|
|
msg_display(MSG_oldsendmail);
|
|
process_menu(MENU_yesno, NULL);
|
|
if (yesno) {
|
|
run_program(RUN_DISPLAY | RUN_CHROOT,
|
|
"/usr/sbin/postinstall -s /.sysinst -d / fix mailerconf");
|
|
}
|
|
}
|
|
run_program(RUN_DISPLAY | RUN_CHROOT,
|
|
"/usr/sbin/postinstall -s /.sysinst -d / fix");
|
|
}
|
|
|
|
/* Configure the system */
|
|
if (set_status[SET_BASE] & SET_INSTALLED)
|
|
run_makedev();
|
|
|
|
if (!update) {
|
|
/* Save keybard type */
|
|
save_kb_encoding();
|
|
|
|
/* Other configuration. */
|
|
mnt_net_config();
|
|
}
|
|
|
|
/* Mounted dist dir? */
|
|
umount_mnt2();
|
|
|
|
/* Install/Upgrade complete ... reboot or exit to script */
|
|
msg_display(success_msg);
|
|
process_menu(MENU_ok, NULL);
|
|
return 0;
|
|
}
|
|
|
|
void
|
|
umount_mnt2(void)
|
|
{
|
|
if (!mnt2_mounted)
|
|
return;
|
|
run_program(RUN_SILENT, "/sbin/umount /mnt2");
|
|
mnt2_mounted = 0;
|
|
}
|
|
|
|
|
|
/*
|
|
* Do a quick sanity check that the target can reboot.
|
|
* return 1 if everything OK, 0 if there is a problem.
|
|
* Uses a table of files we expect to find after a base install/upgrade.
|
|
*/
|
|
|
|
/* test flag and pathname to check for after unpacking. */
|
|
struct check_table { unsigned int mode; const char *path;} checks[] = {
|
|
{ S_IFREG, "/netbsd" },
|
|
{ S_IFDIR, "/etc" },
|
|
{ S_IFREG, "/etc/fstab" },
|
|
{ S_IFREG, "/sbin/init" },
|
|
{ S_IFREG, "/bin/sh" },
|
|
{ S_IFREG, "/etc/rc" },
|
|
{ S_IFREG, "/etc/rc.subr" },
|
|
{ S_IFREG, "/etc/rc.conf" },
|
|
{ S_IFDIR, "/dev" },
|
|
{ S_IFCHR, "/dev/console" },
|
|
/* XXX check for rootdev in target /dev? */
|
|
{ S_IFREG, "/etc/fstab" },
|
|
{ S_IFREG, "/sbin/fsck" },
|
|
{ S_IFREG, "/sbin/fsck_ffs" },
|
|
{ S_IFREG, "/sbin/mount" },
|
|
{ S_IFREG, "/sbin/mount_ffs" },
|
|
{ S_IFREG, "/sbin/mount_nfs" },
|
|
#if defined(DEBUG) || defined(DEBUG_CHECK)
|
|
{ S_IFREG, "/foo/bar" }, /* bad entry to exercise warning */
|
|
#endif
|
|
{ 0, 0 }
|
|
|
|
};
|
|
|
|
/*
|
|
* Check target for a single file.
|
|
*/
|
|
static int
|
|
check_for(unsigned int mode, const char *pathname)
|
|
{
|
|
int found;
|
|
|
|
found = (target_test(mode, pathname) == 0);
|
|
if (found == 0)
|
|
msg_display(MSG_rootmissing, pathname);
|
|
return found;
|
|
}
|
|
|
|
/*
|
|
* Check that all the files in check_table are present in the
|
|
* target root. Warn if not found.
|
|
*/
|
|
int
|
|
sanity_check(void)
|
|
{
|
|
int target_ok = 1;
|
|
struct check_table *p;
|
|
|
|
for (p = checks; p->path; p++) {
|
|
target_ok = target_ok && check_for(p->mode, p->path);
|
|
}
|
|
if (target_ok)
|
|
return 0;
|
|
|
|
/* Uh, oh. Something's missing. */
|
|
msg_display(MSG_badroot);
|
|
process_menu(MENU_ok, NULL);
|
|
return 1;
|
|
}
|
|
|
|
/*
|
|
* Some globals to pass things back from callbacks
|
|
*/
|
|
static char zoneinfo_dir[STRSIZE];
|
|
static int zonerootlen;
|
|
static char *tz_selected; /* timezonename (relative to share/zoneinfo */
|
|
const char *tz_default; /* UTC, or whatever /etc/localtime points to */
|
|
static char tz_env[STRSIZE];
|
|
static int save_cursel, save_topline;
|
|
|
|
/*
|
|
* Callback from timezone menu
|
|
*/
|
|
static int
|
|
set_tz_select(menudesc *m, void *arg)
|
|
{
|
|
time_t t;
|
|
char *new;
|
|
|
|
if (m && strcmp(tz_selected, m->opts[m->cursel].opt_name) != 0) {
|
|
/* Change the displayed timezone */
|
|
new = strdup(m->opts[m->cursel].opt_name);
|
|
if (new == NULL)
|
|
return 0;
|
|
free(tz_selected);
|
|
tz_selected = new;
|
|
snprintf(tz_env, sizeof tz_env, "%.*s%s",
|
|
zonerootlen, zoneinfo_dir, tz_selected);
|
|
setenv("TZ", tz_env, 1);
|
|
}
|
|
if (m)
|
|
/* Warp curser to 'Exit' line on menu */
|
|
m->cursel = -1;
|
|
|
|
/* Update displayed time */
|
|
t = time(NULL);
|
|
msg_display(MSG_choose_timezone,
|
|
tz_default, tz_selected, ctime(&t), localtime(&t)->tm_zone);
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
set_tz_back(menudesc *m, void *arg)
|
|
{
|
|
|
|
zoneinfo_dir[zonerootlen] = 0;
|
|
m->cursel = save_cursel;
|
|
m->topline = save_topline;
|
|
return 0;
|
|
}
|
|
|
|
static int
|
|
set_tz_dir(menudesc *m, void *arg)
|
|
{
|
|
|
|
strlcpy(zoneinfo_dir + zonerootlen, m->opts[m->cursel].opt_name,
|
|
sizeof zoneinfo_dir - zonerootlen);
|
|
save_cursel = m->cursel;
|
|
save_topline = m->topline;
|
|
m->cursel = 0;
|
|
m->topline = 0;
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* Alarm-handler to update example-display
|
|
*/
|
|
static void
|
|
/*ARGSUSED*/
|
|
timezone_sig(int sig)
|
|
{
|
|
|
|
set_tz_select(NULL, NULL);
|
|
alarm(60);
|
|
}
|
|
|
|
static int
|
|
tz_sort(const void *a, const void *b)
|
|
{
|
|
return strcmp(((const menu_ent *)a)->opt_name, ((const menu_ent *)b)->opt_name);
|
|
}
|
|
|
|
static void
|
|
tzm_set_names(menudesc *m, void *arg)
|
|
{
|
|
DIR *dir;
|
|
struct dirent *dp;
|
|
static int nfiles;
|
|
static int maxfiles = 32;
|
|
static menu_ent *tz_menu;
|
|
static char **tz_names;
|
|
void *p;
|
|
int maxfname;
|
|
char *fp;
|
|
struct stat sb;
|
|
|
|
if (tz_menu == NULL)
|
|
tz_menu = malloc(maxfiles * sizeof *tz_menu);
|
|
if (tz_names == NULL)
|
|
tz_names = malloc(maxfiles * sizeof *tz_names);
|
|
if (tz_menu == NULL || tz_names == NULL)
|
|
return; /* error - skip timezone setting */
|
|
while (nfiles > 0)
|
|
free(tz_names[--nfiles]);
|
|
|
|
dir = opendir(zoneinfo_dir);
|
|
fp = strchr(zoneinfo_dir, 0);
|
|
if (fp != zoneinfo_dir + zonerootlen) {
|
|
tz_names[0] = 0;
|
|
tz_menu[0].opt_name = msg_string(MSG_tz_back);
|
|
tz_menu[0].opt_menu = OPT_NOMENU;
|
|
tz_menu[0].opt_flags = 0;
|
|
tz_menu[0].opt_action = set_tz_back;
|
|
nfiles = 1;
|
|
}
|
|
maxfname = zoneinfo_dir + sizeof zoneinfo_dir - fp - 1;
|
|
if (dir != NULL) {
|
|
while ((dp = readdir(dir)) != NULL) {
|
|
if (dp->d_namlen > maxfname || dp->d_name[0] == '.')
|
|
continue;
|
|
strlcpy(fp, dp->d_name, maxfname);
|
|
if (stat(zoneinfo_dir, &sb) == -1)
|
|
continue;
|
|
if (nfiles >= maxfiles) {
|
|
p = realloc(tz_menu, 2 * maxfiles * sizeof *tz_menu);
|
|
if (p == NULL)
|
|
break;
|
|
tz_menu = p;
|
|
p = realloc(tz_names, 2 * maxfiles * sizeof *tz_names);
|
|
if (p == NULL)
|
|
break;
|
|
tz_names = p;
|
|
maxfiles *= 2;
|
|
}
|
|
if (S_ISREG(sb.st_mode))
|
|
tz_menu[nfiles].opt_action = set_tz_select;
|
|
else if (S_ISDIR(sb.st_mode)) {
|
|
tz_menu[nfiles].opt_action = set_tz_dir;
|
|
strlcat(fp, "/",
|
|
sizeof(zoneinfo_dir) - (fp - zoneinfo_dir));
|
|
} else
|
|
continue;
|
|
tz_names[nfiles] = strdup(zoneinfo_dir + zonerootlen);
|
|
tz_menu[nfiles].opt_name = tz_names[nfiles];
|
|
tz_menu[nfiles].opt_menu = OPT_NOMENU;
|
|
tz_menu[nfiles].opt_flags = 0;
|
|
nfiles++;
|
|
}
|
|
closedir(dir);
|
|
}
|
|
*fp = 0;
|
|
|
|
m->opts = tz_menu;
|
|
m->numopts = nfiles;
|
|
qsort(tz_menu, nfiles, sizeof *tz_menu, tz_sort);
|
|
}
|
|
|
|
void
|
|
get_tz_default(void)
|
|
{
|
|
char localtime_link[STRSIZE];
|
|
static char localtime_target[STRSIZE];
|
|
int rc;
|
|
|
|
strlcpy(localtime_link, target_expand("/etc/localtime"),
|
|
sizeof localtime_link);
|
|
|
|
/* Add sanity check that /mnt/usr/share/zoneinfo contains
|
|
* something useful
|
|
*/
|
|
|
|
rc = readlink(localtime_link, localtime_target,
|
|
sizeof(localtime_target) - 1);
|
|
if (rc < 0) {
|
|
/* error, default to UTC */
|
|
tz_default = "UTC";
|
|
} else {
|
|
localtime_target[rc] = '\0';
|
|
tz_default = strchr(strstr(localtime_target, "zoneinfo"), '/') + 1;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Choose from the files in usr/share/zoneinfo and set etc/localtime
|
|
*/
|
|
int
|
|
set_timezone(void)
|
|
{
|
|
char localtime_link[STRSIZE];
|
|
char localtime_target[STRSIZE];
|
|
time_t t;
|
|
int menu_no;
|
|
|
|
strlcpy(zoneinfo_dir, target_expand("/usr/share/zoneinfo/"),
|
|
sizeof zoneinfo_dir - 1);
|
|
zonerootlen = strlen(zoneinfo_dir);
|
|
|
|
get_tz_default();
|
|
|
|
tz_selected = strdup(tz_default);
|
|
snprintf(tz_env, sizeof(tz_env), "%s%s", zoneinfo_dir, tz_selected);
|
|
setenv("TZ", tz_env, 1);
|
|
t = time(NULL);
|
|
msg_display(MSG_choose_timezone,
|
|
tz_default, tz_selected, ctime(&t), localtime(&t)->tm_zone);
|
|
|
|
signal(SIGALRM, timezone_sig);
|
|
alarm(60);
|
|
|
|
menu_no = new_menu(NULL, NULL, 14, 23, 9,
|
|
12, 32, MC_ALWAYS_SCROLL | MC_NOSHORTCUT,
|
|
tzm_set_names, NULL, NULL,
|
|
"\nPlease consult the install documents.", NULL);
|
|
if (menu_no < 0)
|
|
goto done; /* error - skip timezone setting */
|
|
|
|
process_menu(menu_no, NULL);
|
|
|
|
free_menu(menu_no);
|
|
|
|
signal(SIGALRM, SIG_IGN);
|
|
|
|
snprintf(localtime_target, sizeof(localtime_target),
|
|
"/usr/share/zoneinfo/%s", tz_selected);
|
|
strlcpy(localtime_link, target_expand("/etc/localtime"),
|
|
sizeof localtime_link);
|
|
unlink(localtime_link);
|
|
symlink(localtime_target, localtime_link);
|
|
|
|
done:
|
|
return 1;
|
|
}
|
|
|
|
void
|
|
scripting_vfprintf(FILE *f, const char *fmt, va_list ap)
|
|
{
|
|
|
|
if (f)
|
|
(void)vfprintf(f, fmt, ap);
|
|
if (script)
|
|
(void)vfprintf(script, fmt, ap);
|
|
}
|
|
|
|
void
|
|
scripting_fprintf(FILE *f, const char *fmt, ...)
|
|
{
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
scripting_vfprintf(f, fmt, ap);
|
|
va_end(ap);
|
|
}
|
|
|
|
void
|
|
add_rc_conf(const char *fmt, ...)
|
|
{
|
|
FILE *f;
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
f = target_fopen("/etc/rc.conf", "a");
|
|
if (f != 0) {
|
|
scripting_fprintf(NULL, "cat <<EOF >>%s/etc/rc.conf\n",
|
|
target_prefix());
|
|
scripting_vfprintf(f, fmt, ap);
|
|
fclose(f);
|
|
scripting_fprintf(NULL, "EOF\n");
|
|
}
|
|
va_end(ap);
|
|
}
|
|
|
|
int
|
|
del_rc_conf(const char *value)
|
|
{
|
|
FILE *fp, *nfp;
|
|
char buf[4096]; /* Ridiculously high, but should be enough in any way */
|
|
char *rcconf, *tempname = NULL, *bakname = NULL;
|
|
char *cp;
|
|
int done = 0;
|
|
int fd;
|
|
int retval = 0;
|
|
|
|
/* The paths might seem strange, but using /tmp would require copy instead
|
|
* of rename operations. */
|
|
if (asprintf(&rcconf, "%s", target_expand("/etc/rc.conf")) < 0
|
|
|| asprintf(&tempname, "%s", target_expand("/etc/rc.conf.tmp.XXXXXX")) < 0
|
|
|| asprintf(&bakname, "%s", target_expand("/etc/rc.conf.bak.XXXXXX")) < 0) {
|
|
if (rcconf)
|
|
free(rcconf);
|
|
if (tempname)
|
|
free(tempname);
|
|
msg_display(MSG_rcconf_delete_failed, value);
|
|
process_menu(MENU_ok, NULL);
|
|
return -1;
|
|
}
|
|
|
|
if ((fd = mkstemp(bakname)) < 0) {
|
|
msg_display(MSG_rcconf_delete_failed, value);
|
|
process_menu(MENU_ok, NULL);
|
|
return -1;
|
|
}
|
|
close(fd);
|
|
|
|
if (!(fp = fopen(rcconf, "r+")) || (fd = mkstemp(tempname)) < 0) {
|
|
if (fp)
|
|
fclose(fp);
|
|
msg_display(MSG_rcconf_delete_failed, value);
|
|
process_menu(MENU_ok, NULL);
|
|
return -1;
|
|
}
|
|
|
|
nfp = fdopen(fd, "w");
|
|
if (!nfp) {
|
|
fclose(fp);
|
|
close(fd);
|
|
msg_display(MSG_rcconf_delete_failed, value);
|
|
process_menu(MENU_ok, NULL);
|
|
return -1;
|
|
}
|
|
|
|
while (fgets(buf, sizeof buf, fp) != NULL) {
|
|
|
|
cp = buf + strspn(buf, " \t"); /* Skip initial spaces */
|
|
if (strncmp(cp, value, strlen(value)) == 0) {
|
|
cp += strlen(value);
|
|
if (*cp != '=')
|
|
scripting_fprintf(nfp, "%s", buf);
|
|
else
|
|
done = 1;
|
|
} else {
|
|
scripting_fprintf(nfp, "%s", buf);
|
|
}
|
|
}
|
|
fclose(fp);
|
|
fclose(nfp);
|
|
|
|
if (done) {
|
|
if (rename(rcconf, bakname)) {
|
|
msg_display(MSG_rcconf_backup_failed);
|
|
process_menu(MENU_noyes, NULL);
|
|
if (!yesno) {
|
|
retval = -1;
|
|
goto done;
|
|
}
|
|
}
|
|
|
|
if (rename(tempname, rcconf)) {
|
|
if (rename(bakname, rcconf)) {
|
|
msg_display(MSG_rcconf_restore_failed);
|
|
process_menu(MENU_ok, NULL);
|
|
} else {
|
|
msg_display(MSG_rcconf_delete_failed, value);
|
|
process_menu(MENU_ok, NULL);
|
|
}
|
|
} else {
|
|
(void)unlink(bakname);
|
|
}
|
|
}
|
|
|
|
done:
|
|
(void)unlink(tempname);
|
|
free(rcconf);
|
|
free(tempname);
|
|
free(bakname);
|
|
return retval;
|
|
}
|
|
|
|
void
|
|
add_sysctl_conf(const char *fmt, ...)
|
|
{
|
|
FILE *f;
|
|
va_list ap;
|
|
|
|
va_start(ap, fmt);
|
|
f = target_fopen("/etc/sysctl.conf", "a");
|
|
if (f != 0) {
|
|
scripting_fprintf(NULL, "cat <<EOF >>%s/etc/sysctl.conf\n",
|
|
target_prefix());
|
|
scripting_vfprintf(f, fmt, ap);
|
|
fclose(f);
|
|
scripting_fprintf(NULL, "EOF\n");
|
|
}
|
|
va_end(ap);
|
|
}
|
|
|
|
void
|
|
enable_rc_conf(void)
|
|
{
|
|
|
|
replace("/etc/rc.conf", "s/^rc_configured=NO/rc_configured=YES/");
|
|
}
|
|
|
|
int
|
|
check_lfs_progs(void)
|
|
{
|
|
|
|
#ifndef NO_LFS
|
|
return (access("/sbin/fsck_lfs", X_OK) == 0 &&
|
|
access("/sbin/mount_lfs", X_OK) == 0 &&
|
|
access("/sbin/newfs_lfs", X_OK) == 0);
|
|
#else
|
|
return 0;
|
|
#endif
|
|
}
|
|
|
|
int
|
|
set_is_source(const char *set_name) {
|
|
int len = strlen(set_name);
|
|
return len >= 3 && memcmp(set_name + len - 3, "src", 3) == 0;
|
|
}
|
|
|
|
const char *
|
|
set_dir_for_set(const char *set_name) {
|
|
if (strcmp(set_name, "pkgsrc") == 0)
|
|
return pkgsrc_dir;
|
|
return set_is_source(set_name) ? set_dir_src : set_dir_bin;
|
|
}
|
|
|
|
const char *
|
|
ext_dir_for_set(const char *set_name) {
|
|
if (strcmp(set_name, "pkgsrc") == 0)
|
|
return ext_dir_pkgsrc;
|
|
return set_is_source(set_name) ? ext_dir_src : ext_dir_bin;
|
|
}
|
|
|