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

/*
 * Copyright 2023 Oxide Computer Company
 */

#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 "intel_nhm.h"

static ddi_acc_handle_t dev_pci_hdl[MAX_CPU_NODES][CPU_PCI_DEVS][CPU_PCI_FUNCS];

void
nhm_pci_cfg_setup(dev_info_t *dip)
{
        pci_regspec_t reg;
        int i, j, k;

        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 < MAX_CPU_NODES; i++) {
                for (j = 0; j < CPU_PCI_DEVS; j++) {
                        for (k = 0; k < CPU_PCI_FUNCS; k++) {
                                reg.pci_phys_hi = PCI_REG_MAKE_BDFR(
                                    SOCKET_BUS(i), j, k, 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, "nhm_pci_cfg_setup: "
                                            "cannot create reg property");

                                if (pci_config_setup(dip,
                                    &dev_pci_hdl[i][j][k]) != DDI_SUCCESS)
                                        cmn_err(CE_WARN, "intel_nhm: "
                                            "pci_config_setup failed");
                        }
                }
        }
        ddi_prop_remove_all(dip);
}

void
nhm_pci_cfg_free()
{
        int i, j, k;

        for (i = 0; i < MAX_CPU_NODES; i++) {
                for (j = 0; j < CPU_PCI_DEVS; j++) {
                        for (k = 0; k < CPU_PCI_FUNCS; k++) {
                                pci_config_teardown(&dev_pci_hdl[i][j][k]);
                        }
                }
        }
}

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

        if (bus >= SOCKET_BUS(MAX_CPU_NODES) && bus <= SOCKET_BUS(0) &&
            dev < CPU_PCI_DEVS && func < CPU_PCI_FUNCS) {
                slot = SOCKET_BUS(0) - bus;
                ASSERT(slot >= 0 && slot < MAX_CPU_NODES);
                hdl = dev_pci_hdl[slot][dev][func];
        } else {
                hdl = 0;
        }
        return (hdl);
}

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

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

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

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

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

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

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

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

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

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

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

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