/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include <sys/types.h>
#include <sys/cmn_err.h>
#include <sys/errno.h>
#include <sys/systm.h>
#include <sys/sunddi.h>
#include <sys/pci_cfgspace.h>
#include <sys/pci.h>
#include <sys/pcie.h>
#include <vm/seg_kmem.h>
#include <sys/mman.h>
#include <sys/cpu_module.h>
#include "nb5000.h"

static ddi_acc_handle_t dev_16_hdl[NB_PCI_NFUNC];
static ddi_acc_handle_t dev_17_hdl[NB_PCI_NFUNC];
static ddi_acc_handle_t dev_21_hdl;
static ddi_acc_handle_t dev_22_hdl;
static ddi_acc_handle_t dev_pci_hdl[NB_PCI_DEV];

void
nb_pci_cfg_setup(dev_info_t *dip)
{
        pci_regspec_t reg;
        int i;

        reg.pci_phys_hi = 16 << PCI_REG_DEV_SHIFT; /* Bus=0, Dev=16, Func=0 */
        reg.pci_phys_mid = 0;
        reg.pci_phys_low = 0;
        reg.pci_size_hi = 0;
        reg.pci_size_low = PCIE_CONF_HDR_SIZE; /* overriden in pciex */

        for (i = 0; i < NB_PCI_NFUNC; i++) {
                if (ddi_prop_update_int_array(DDI_MAJOR_T_UNKNOWN, dip, "reg",
                    (int *)&reg, sizeof (reg)/sizeof (int)) != DDI_PROP_SUCCESS)
                cmn_err(CE_WARN,
                    "nb_pci_cfg_setup: cannot create reg property");

                if (pci_config_setup(dip, &dev_16_hdl[i]) != DDI_SUCCESS)
                        cmn_err(CE_WARN,
                            "intel_nb5000: pci_config_setup failed");
                reg.pci_phys_hi += 1 << PCI_REG_FUNC_SHIFT;
        }
        reg.pci_phys_hi = 17 << PCI_REG_DEV_SHIFT; /* Bus=0, Dev=17, Func=0 */
        for (i = 0; i < NB_PCI_NFUNC; i++) {
                if (ddi_prop_update_int_array(DDI_MAJOR_T_UNKNOWN, dip, "reg",
                    (int *)&reg, sizeof (reg)/sizeof (int)) != DDI_PROP_SUCCESS)
                cmn_err(CE_WARN,
                    "nb_pci_cfg_setup: cannot create reg property");

                if (pci_config_setup(dip, &dev_17_hdl[i]) != DDI_SUCCESS)
                        cmn_err(CE_WARN,
                            "intel_nb5000: pci_config_setup failed");
                reg.pci_phys_hi += 1 << PCI_REG_FUNC_SHIFT;
        }
        reg.pci_phys_hi = 21 << PCI_REG_DEV_SHIFT; /* Bus=0, Dev=21, Func=0 */
        if (ddi_prop_update_int_array(DDI_MAJOR_T_UNKNOWN, dip, "reg",
            (int *)&reg, sizeof (reg)/sizeof (int)) != DDI_PROP_SUCCESS)
                cmn_err(CE_WARN,
                    "nb_pci_cfg_setup: cannot create reg property");
        if (pci_config_setup(dip, &dev_21_hdl) != DDI_SUCCESS)
                cmn_err(CE_WARN, "intel_nb5000: pci_config_setup failed");
        reg.pci_phys_hi = 22 << PCI_REG_DEV_SHIFT; /* Bus=0, Dev=22, Func=0 */
        if (ddi_prop_update_int_array(DDI_MAJOR_T_UNKNOWN, dip, "reg",
            (int *)&reg, sizeof (reg)/sizeof (int)) != DDI_PROP_SUCCESS)
                cmn_err(CE_WARN,
                    "nb_pci_cfg_setup: cannot create reg property");
        if (pci_config_setup(dip, &dev_22_hdl) != DDI_SUCCESS)
                cmn_err(CE_WARN, "intel_nb5000: pci_config_setup failed");
        reg.pci_phys_hi = 0;            /* Bus=0, Dev=0, Func=0 */
        for (i = 0; i < NB_PCI_DEV; i++) {
                if (ddi_prop_update_int_array(DDI_MAJOR_T_UNKNOWN, dip, "reg",
                    (int *)&reg, sizeof (reg)/sizeof (int)) != DDI_PROP_SUCCESS)
                cmn_err(CE_WARN,
                    "nb_pci_cfg_setup: cannot create reg property");

                if (pci_config_setup(dip, &dev_pci_hdl[i]) != DDI_SUCCESS)
                        cmn_err(CE_WARN,
                            "intel_nb5000: pci_config_setup failed");
                reg.pci_phys_hi += 1 << PCI_REG_DEV_SHIFT;
        }
        ddi_prop_remove_all(dip);
}

void
nb_pci_cfg_free()
{
        int i;

        for (i = 0; i < NB_PCI_NFUNC; i++) {
                pci_config_teardown(&dev_16_hdl[i]);
        }
        for (i = 0; i < NB_PCI_NFUNC; i++) {
                pci_config_teardown(&dev_17_hdl[i]);
        }
        pci_config_teardown(&dev_21_hdl);
        pci_config_teardown(&dev_22_hdl);
        for (i = 0; i < NB_PCI_DEV; i++)
                pci_config_teardown(&dev_pci_hdl[i]);
}

static ddi_acc_handle_t
nb_get_hdl(int bus, int dev, int func)
{
        ddi_acc_handle_t hdl;

        if (bus == 0 && dev == 16 && func < NB_PCI_NFUNC) {
                hdl = dev_16_hdl[func];
        } else if (bus == 0 && dev == 17 && func < NB_PCI_NFUNC) {
                hdl = dev_17_hdl[func];
        } else if (bus == 0 && dev < NB_PCI_DEV && func == 0) {
                hdl = dev_pci_hdl[dev];
        } else if (bus == 0 && dev == 21 && func == 0) {
                hdl = dev_21_hdl;
        } else if (bus == 0 && dev == 22 && func == 0) {
                hdl = dev_22_hdl;
        } else {
                hdl = 0;
        }
        return (hdl);
}

uint8_t
nb_pci_getb(int bus, int dev, int func, int reg, int *interpose)
{
        ddi_acc_handle_t hdl;

        hdl = nb_get_hdl(bus, dev, func);
        return (cmi_pci_getb(bus, dev, func, reg, interpose, hdl));
}

uint16_t
nb_pci_getw(int bus, int dev, int func, int reg, int *interpose)
{
        ddi_acc_handle_t hdl;

        hdl = nb_get_hdl(bus, dev, func);
        return (cmi_pci_getw(bus, dev, func, reg, interpose, hdl));
}

uint32_t
nb_pci_getl(int bus, int dev, int func, int reg, int *interpose)
{
        ddi_acc_handle_t hdl;

        hdl = nb_get_hdl(bus, dev, func);
        return (cmi_pci_getl(bus, dev, func, reg, interpose, hdl));
}

void
nb_pci_putb(int bus, int dev, int func, int reg, uint8_t val)
{
        ddi_acc_handle_t hdl;

        hdl = nb_get_hdl(bus, dev, func);
        cmi_pci_putb(bus, dev, func, reg, hdl, val);
}

void
nb_pci_putw(int bus, int dev, int func, int reg, uint16_t val)
{
        ddi_acc_handle_t hdl;

        hdl = nb_get_hdl(bus, dev, func);
        cmi_pci_putw(bus, dev, func, reg, hdl, val);
}

void
nb_pci_putl(int bus, int dev, int func, int reg, uint32_t val)
{
        ddi_acc_handle_t hdl;

        hdl = nb_get_hdl(bus, dev, func);
        cmi_pci_putl(bus, dev, func, reg, hdl, val);
}