/*	$NetBSD: ar_conf.c,v 1.3 2015/06/09 22:50:50 matt Exp $	*/
/*-
 * Copyright (c) 2011 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Matt Thomas of 3am Software Foundry.
 *
 * 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: ar_conf.c,v 1.3 2015/06/09 22:50:50 matt Exp $");

#include <sys/param.h>
#include <sys/cpu.h>

#include "opt_wisoc.h"

#include <mips/cpuregs.h>
#include <mips/locore.h>

#include <mips/atheros/include/platform.h>
#include <mips/atheros/include/ar9344reg.h>

struct atheros_chip {
	const struct atheros_platformsw *ac_platformsw;
	const struct atheros_boardsw *ac_boardsw;
	uint8_t ac_chipid;
	uint8_t ac_chipmask;
	uint8_t ac_cid;
	uint8_t ac_pid;
	const char ac_name[8];
};

static const struct atheros_chip chips[] = {
#ifdef WISOC_AR5312
	{
		.ac_platformsw =	&ar5312_platformsw,
		.ac_boardsw =		&ar5312_boardsw,
		.ac_chipid =		ARCHIP_AR5312,
		.ac_chipmask =		0xff,
		.ac_cid =		MIPS_PRID_CID_MTI,
		.ac_pid =		MIPS_4Kc,
		.ac_name =		"AR5312"
	},
#endif
#ifdef WISOC_AR5315
	{
		.ac_platformsw =	&ar5315_platformsw,
		.ac_boardsw =		&ar5315_boardsw,
		.ac_chipid =		ARCHIP_AR5315,
		.ac_chipmask =		0xf0,
		.ac_cid =		MIPS_PRID_CID_MTI,
		.ac_pid =		MIPS_4Kc,
		.ac_name =		"AR5315"
	},
#endif
#ifdef WISOC_AR7100
	{
		.ac_platformsw =	&ar7100_platformsw,
		.ac_chipid =		ARCHIP_AR7130,
		.ac_chipmask =		0xf3,
		.ac_cid =		MIPS_PRID_CID_MTI,
		.ac_pid =		MIPS_24K,
		.ac_name =		"AR7130"
	}, {
		.ac_platformsw =	&ar7100_platformsw,
		.ac_chipid =		ARCHIP_AR7141,
		.ac_chipmask =		0xf3,
		.ac_cid =		MIPS_PRID_CID_MTI,
		.ac_pid =		MIPS_24K,
		.ac_name =		"AR7141"
	}, {
		.ac_platformsw =	&ar7100_platformsw,
		.ac_chipid =		ARCHIP_AR7161,
		.ac_chipmask =		0xf3,
		.ac_cid =		MIPS_PRID_CID_MTI,
		.ac_pid =		MIPS_24K,
		.ac_name =		"AR7161"
	},
#endif
#ifdef WISOC_AR9344
	{
		.ac_platformsw =	&ar9344_platformsw,
		.ac_chipid =		0x20,	/* 7240? */
		.ac_chipmask =		0xff,
		.ac_cid =		MIPS_PRID_CID_MTI,
		.ac_pid =		MIPS_74K,
		.ac_name =		"AR7240"
	}, {
		.ac_platformsw =	&ar9344_platformsw,
		.ac_chipid =		ARCHIP_AR9344,
		.ac_chipmask =		0xff,
		.ac_cid =		MIPS_PRID_CID_MTI,
		.ac_pid =		MIPS_74K,
		.ac_name =		"AR9344"
	},
#endif
};

__CTASSERT(__arraycount(chips) > 0);

const struct atheros_platformsw *platformsw;

static const struct atheros_chip *my_chip;

static struct arfreqs chip_freqs;

const char *
atheros_get_cpuname(void)
{
	return my_chip->ac_name;
}

u_int
atheros_get_chipid(void)
{
	return my_chip->ac_chipid;
}

uint32_t
atheros_get_uart_freq(void)
{
	if (chip_freqs.freq_uart)
		return chip_freqs.freq_uart;

	return chip_freqs.freq_bus;
}

uint32_t
atheros_get_bus_freq(void)
{
	return chip_freqs.freq_bus;
}

uint32_t
atheros_get_cpu_freq(void)
{
	return chip_freqs.freq_cpu;
}

uint32_t
atheros_get_mem_freq(void)
{
	return chip_freqs.freq_mem;
}

void
atheros_set_platformsw(void)
{
	const u_int cid = MIPS_PRID_CID(mips_options.mips_cpu_id);
	const u_int pid = MIPS_PRID_IMPL(mips_options.mips_cpu_id);

	for (const struct atheros_chip *ac = chips;
	    ac < chips + __arraycount(chips);
	    ac++) {
		const struct atheros_platformsw * const apsw = ac->ac_platformsw;
                if (cid != ac->ac_cid || pid != ac->ac_pid)
			continue;

		const uint32_t revision_id = *(volatile uint32_t *)
		    MIPS_PHYS_TO_KSEG1(apsw->apsw_revision_id_addr);
		const uint32_t chipid = AR9344_REVISION_CHIPID(revision_id);

		if ((chipid & ac->ac_chipmask) == ac->ac_chipid) {
			platformsw = apsw;
			my_chip = ac;
			atheros_early_consinit();
			printf("Early console started!\n");
			(*apsw->apsw_get_freqs)(&chip_freqs);
			printf("freqs: cpu=%u bus=%u mem=%u ref=%u pll=%u\n",
			     chip_freqs.freq_cpu,
			     chip_freqs.freq_bus,
			     chip_freqs.freq_mem,
			     chip_freqs.freq_ref,
			     chip_freqs.freq_pll);
			return;
		}
	}
	panic("%s: unrecognized platform", __func__);
}

#include "ath_arbus.h"
#if NATH_ARBUS > 0
#include <ah_soc.h>

const struct ar531x_boarddata *
atheros_get_board_info(void)
{
	const struct atheros_boardsw * const boardsw = my_chip->ac_boardsw;
	if (boardsw == NULL)
		return NULL;
	return (*boardsw->absw_get_board_info)();
}

/*
 * Locate board and radio configuration data in flash.
 */
int
atheros_get_board_config(struct ar531x_config *config)
{
	const struct atheros_boardsw * const boardsw = my_chip->ac_boardsw;
	if (boardsw == NULL)
		return ENOENT;

	config->board = (*boardsw->absw_get_board_info)();
	if (config->board == NULL)
		return ENOENT;

	config->radio = (*boardsw->absw_get_radio_info)();
	if (config->radio == NULL)
		return ENOENT;		/* XXX distinct code */

	return 0;
}
#endif /* NATH_ARBUS > 0 */