config root man

/*
 * The new sysinstall program.
 *
 * This is probably the last attempt in the `sysinstall' line, the next
 * generation being slated to essentially a complete rewrite.
 *
 * $FreeBSD: release/9.1.0/usr.sbin/sysinstall/cdrom.c 215296 2010-11-14 13:25:01Z brucec $
 *
 * Copyright (c) 1995
 *	Jordan Hubbard.  All rights reserved.
 * Copyright (c) 1995
 * 	Gary J Palmer. All rights reserved.
 *
 * 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,
 *    verbatim and that no modifications are made prior to this
 *    point in the file.
 * 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.
 *
 * THIS SOFTWARE IS PROVIDED BY JORDAN HUBBARD ``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 JORDAN HUBBARD OR HIS PETS 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, LIFE 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.
 *
 */

/* These routines deal with getting things off of CDROM media */

#include "sysinstall.h"
#include <sys/stat.h>
#include <sys/errno.h>
#include <sys/param.h>
#include <sys/wait.h>
#include <sys/cdio.h>
#include <unistd.h>
#include <grp.h>
#include <fcntl.h>
#include <libutil.h>

#define CD9660
#include <sys/mount.h>
#include <isofs/cd9660/cd9660_mount.h>
#undef CD9660

static Boolean cdromMounted;
static Boolean previouslyMounted; /* Was the disc already mounted? */
static char mountpoint[MAXPATHLEN] = "/dist";
int CDROMInitQuiet;

static void mediaEjectCDROM(Device *dev);

static properties
read_props(char *name)
{
	int fd;
	properties n;

	fd = open(name, O_RDONLY);
	if (fd == -1)
	    return NULL;
	n = properties_read(fd);
	close(fd);
	return n;
}

Boolean
mediaInitCDROM(Device *dev)
{
    struct iso_args	args;
    properties cd_attr = NULL;
    char *cp = NULL;
    Boolean readInfo = TRUE;
    static Boolean bogusCDOK = FALSE;
    int err;

    if (cdromMounted)
	return TRUE;

    Mkdir(mountpoint);
    bzero(&args, sizeof(args));
    args.fspec = dev->devname;
    args.flags = 0;
    err = mount("cd9660", mountpoint, MNT_RDONLY, (caddr_t) &args);
    /* If disc inserted too recently first access generates EIO, try again */
    if (err == -1 && errno == EIO)
        err = mount("cd9660", mountpoint, MNT_RDONLY, (caddr_t) &args);
    if (err == -1) {
	if (errno == EINVAL) {
	    msgConfirm("The disc in your drive looks more like an Audio disc than a FreeBSD release.");
	    return FALSE;
	}
	if (errno == EBUSY) {
	    /* Perhaps the CDROM drive is already mounted as /cdrom */
	    if (file_readable("/cdrom/cdrom.inf")) {
		previouslyMounted = TRUE;
		strlcpy(mountpoint, "/cdrom", 7);
		errno = 0;
	    }
	}
	if (errno) {
	    if (!CDROMInitQuiet)
		msgConfirm("Error mounting %s on %s: %s (%u)", dev->devname,
		    mountpoint, strerror(errno), errno);
	    return FALSE;
	}
    }
    cdromMounted = TRUE;

    if (!file_readable(string_concat(mountpoint, "/cdrom.inf")) && !bogusCDOK) {
	if (msgYesNo("Warning: The disc currently in the drive is either not a FreeBSD\n"
		     "disc or it is an older (pre 2.1.5) FreeBSD CD which does not\n"
		     "have a version number on it.  Do you wish to use this disc anyway?") != 0) {
	    if (!previouslyMounted)
		unmount(mountpoint, MNT_FORCE);
	    cdromMounted = FALSE;
	    return FALSE;
	}
	else {
	    readInfo = FALSE;
	    bogusCDOK = TRUE;
	}
    }

    if (readInfo) {
	if (!(cd_attr = read_props(string_concat(mountpoint, "/cdrom.inf")))
	    || !(cp = property_find(cd_attr, "CD_VERSION"))) {
	    msgConfirm("Unable to find a %s/cdrom.inf file.\n"
		       "Either this is not a FreeBSD disc, there is a problem with\n"
		       "the CDROM driver or something is wrong with your hardware.\n"
		       "Please fix this problem (check the console logs on VTY2) and\n"
		       "try again.", mountpoint);
	}
	else {
	    if (variable_cmp(VAR_RELNAME, cp) &&
		variable_cmp(VAR_RELNAME, "any") &&
		strcmp(cp, "any") &&
		!bogusCDOK) {
		msgConfirm("Warning: The version of the FreeBSD disc currently in the drive\n"
			   "(%s) does not match the version of the boot floppy\n"
			   "(%s).\n\n"
			   "If this is intentional, to avoid this message in the future\n"
			   "please visit the Options editor to set the boot floppy version\n"
			   "string to match that of the disc before selecting it as your\n"
			   "installation media.", cp, variable_get(VAR_RELNAME));

		if (msgYesNo("Would you like to try and use this disc anyway?") != 0) {
	            if (!previouslyMounted)
		        unmount(mountpoint, MNT_FORCE);
		    cdromMounted = FALSE;
		    properties_free(cd_attr);
		    return FALSE;
		}
		else
		    bogusCDOK = TRUE;
	    }
	    if ((cp = property_find(cd_attr, "CD_MACHINE_ARCH")) != NULL) {
		if (strcmp(cp, "any") &&
#if defined(PC98)
		  strcmp(cp, "pc98")) {
#elif defined(__sparc64__)
		  strcmp(cp, "sparc64")) {
#else
		  strcmp(cp, "x86")) {
#endif
		    msgConfirm("Fatal: The FreeBSD install CD/DVD currently in the drive\n"
			   "is for the %s architecture, not the machine you're using.\n\n"

			   "Please use the correct installation CD/DVD for your machine type.", cp);

	            if (!previouslyMounted)
		        unmount(mountpoint, MNT_FORCE);
		    cdromMounted = FALSE;
		    properties_free(cd_attr);
		    return FALSE;
		}
	    }
	    if ((cp = property_find(cd_attr, "CD_VOLUME")) != NULL) {
		dev->volume = atoi(cp);
		/* XXX - Sanity check the volume here? */
		msgDebug("CD Volume %d initialized!\n", dev->volume);
	    } else {
		dev->volume = 0;
	    }
	}
    }
    if (cd_attr)
	properties_free(cd_attr);
    return TRUE;
}

FILE *
mediaGetCDROM(Device *dev, char *file, Boolean probe)
{
    return mediaGenericGet(mountpoint, file);
}

void
mediaShutdownCDROM(Device *dev)
{
    if (!cdromMounted)
	return;

    if (previouslyMounted) {
	cdromMounted = FALSE;
	return;
    }

    if (unmount(mountpoint, MNT_FORCE) != 0)
	msgConfirm("Could not unmount the CDROM/DVD from %s: %s", mountpoint, strerror(errno));
    else
	cdromMounted = FALSE;

    mediaEjectCDROM(dev);
}

static void
mediaEjectCDROM(Device *dev)
{
	int fd = -1;

	msgDebug("Ejecting CDROM/DVD at %s", dev->devname);

	fd = open(dev->devname, O_RDONLY);
	
	if (fd < 0)
		msgDebug("Could not eject the CDROM/DVD from %s: %s", dev->devname, strerror(errno));
	else {
		ioctl(fd, CDIOCALLOW);
		ioctl(fd, CDIOCEJECT);
		close(fd);
	}
}