/*	$NetBSD: autoconf.c,v 1.22 2018/08/27 09:52:16 jmcneill Exp $	*/

/*-
 * Copyright (c) 2001 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Matt Thomas <matt@3am-software.com>.
 *
 * 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.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``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 THE FOUNDATION OR CONTRIBUTORS
 * 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.
 */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: autoconf.c,v 1.22 2018/08/27 09:52:16 jmcneill Exp $");

#include "opt_md.h"

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/reboot.h>
#include <sys/disklabel.h>
#include <sys/device.h>
#include <sys/conf.h>
#include <sys/kernel.h>
#include <sys/kmem.h>

#include <machine/autoconf.h>
#include <machine/intr.h>
#include <machine/bootconfig.h>

void	(*evbarm_device_register)(device_t, void *);
void	(*evbarm_device_register_post_config)(device_t, void *);
void	(*evbarm_cpu_rootconf)(void);

extern struct cfdata cfdata[];

#ifndef MEMORY_DISK_IS_ROOT
static int get_device(char *name, device_t *, int *);
static void set_root_device(void);
#endif

#ifndef MEMORY_DISK_IS_ROOT
/* Decode a device name to a major and minor number */

static int
get_device(char *name, device_t *dvp, int *partp)
{
	int unit, part;
	char devname[16], *cp;
	device_t dv;

	if (strncmp(name, "/dev/", 5) == 0)
		name += 5;

	if (devsw_name2blk(name, devname, sizeof(devname)) == -1)
		return 0;

	name += strlen(devname);
	unit = part = 0;

	cp = name;
	while (*cp >= '0' && *cp <= '9')
		unit = (unit * 10) + (*cp++ - '0');
	if (cp == name)
		return 0;

	if (*cp >= 'a' && *cp < ('a' + MAXPARTITIONS))
		part = *cp - 'a';
	else if (*cp != '\0' && *cp != ' ')
		return 0;
	if ((dv = device_find_by_driver_unit(devname, unit)) != NULL) {
		*dvp = dv;
		*partp = part;
		return 1;
	}

	return 0;
}

/* Set the rootdev variable from the root specifier in the boot args */

static char *bootspec_buf = NULL;
static size_t bootspec_buflen = 0;

static void
set_root_device(void)
{
	char *ptr, *end, *buf;
	size_t len;

	if (boot_args == NULL)
		return;

	if (!get_bootconf_option(boot_args, "root", BOOTOPT_TYPE_STRING, &ptr))
		return;

	if (get_device(ptr, &booted_device, &booted_partition))
		return;

	/* NUL-terminate string, get_bootconf_option doesn't */
	for (end=ptr; *end != '\0'; ++end) {
		if (*end == ' ' || *end == '\t') {
			break;
		}
	}

	if (end == ptr)
		return;

	len = end - ptr;

	buf = kmem_alloc(len + 1, KM_SLEEP);
	memcpy(buf, ptr, len);
	buf[len] = '\0';

	if (bootspec_buf != NULL)
		kmem_free(bootspec_buf, bootspec_buflen + 1);

	bootspec_buf = buf;
	bootspec_buflen = len;

	bootspec = bootspec_buf;
}
#endif

/*
 * Set up the root device from the boot args
 */
void
cpu_rootconf(void)
{
#ifndef MEMORY_DISK_IS_ROOT
	if (evbarm_cpu_rootconf)
		(*evbarm_cpu_rootconf)();
	set_root_device();
#endif
	aprint_normal("boot device: %s\n",
	    booted_device != NULL ? device_xname(booted_device) : "<unknown>");
	rootconf();
}


/*
 * void cpu_configure()
 *
 * Configure all the root devices
 * The root devices are expected to configure their own children
 */
void
cpu_configure(void)
{
	struct mainbus_attach_args maa;
	struct cfdata *cf;

	(void) splhigh();

	for (cf = &cfdata[0]; cf->cf_name; cf++) {
		if (cf->cf_pspec == NULL) {
			maa.ma_name = cf->cf_name;
			if (config_rootfound(cf->cf_name, &maa) != NULL)
				break;
		}
	}

	/* Time to start taking interrupts so lets open the flood gates .... */
	spl0();
}

void
device_register(device_t dev, void *aux)
{
	if (evbarm_device_register != NULL)
		(*evbarm_device_register)(dev, aux);
}


void
device_register_post_config(device_t dev, void *aux)
{
	if (evbarm_device_register_post_config != NULL)
		(*evbarm_device_register_post_config)(dev, aux);
}