/*      $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 */