/*      $NetBSD: OsdHardware.c,v 1.15 2024/06/23 15:21:52 andvar Exp $  */

/*
* Copyright 2001 Wasabi Systems, Inc.
* All rights reserved.
*
* Written by Jason R. Thorpe for Wasabi Systems, Inc.
*
* 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.
* 3. All advertising materials mentioning features or use of this software
*    must display the following acknowledgement:
*      This product includes software developed for the NetBSD Project by
*      Wasabi Systems, Inc.
* 4. The name of Wasabi Systems, Inc. may not be used to endorse
*    or promote products derived from this software without specific prior
*    written permission.
*
* THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``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 WASABI SYSTEMS, INC
* 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.
*/

/*
* OS Services Layer
*
* 6.7: Address Space Access: Port Input/Output
* 6.8: Address Space Access: Memory and Memory Mapped I/O
* 6.9: Address Space Access: PCI Configuration Space
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: OsdHardware.c,v 1.15 2024/06/23 15:21:52 andvar Exp $");

#include "pci.h"

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

#include <dev/acpi/acpica.h>
#include <dev/acpi/acpivar.h>
#include <dev/acpi/acpi_pci.h>

#include <machine/acpi_machdep.h>

/*
* ACPICA doesn't provide much in the way of letting us know which
* hardware resources it wants to use.  We therefore have to resort
* to calling machine-dependent code to do the access for us.
*/

/*
* AcpiOsReadPort:
*
*      Read a value from an input port.
*/
ACPI_STATUS
AcpiOsReadPort(ACPI_IO_ADDRESS Address, UINT32 *Value, UINT32 Width)
{

       switch (Width) {
       case 8:
               *Value = acpi_md_OsIn8(Address);
               break;

       case 16:
               *Value = acpi_md_OsIn16(Address);
               break;

       case 32:
               *Value = acpi_md_OsIn32(Address);
               break;

       default:
               return AE_BAD_PARAMETER;
       }

       return AE_OK;
}

/*
* AcpiOsWritePort:
*
*      Write a value to an output port.
*/
ACPI_STATUS
AcpiOsWritePort(ACPI_IO_ADDRESS Address, UINT32 Value, UINT32 Width)
{

       switch (Width) {
       case 8:
               acpi_md_OsOut8(Address, Value);
               break;

       case 16:
               acpi_md_OsOut16(Address, Value);
               break;

       case 32:
               acpi_md_OsOut32(Address, Value);
               break;

       default:
               return AE_BAD_PARAMETER;
       }

       return AE_OK;
}

/*
* AcpiOsReadMemory:
*
*      Read a value from a memory location.
*/
ACPI_STATUS
AcpiOsReadMemory(ACPI_PHYSICAL_ADDRESS Address, UINT64 *Value, UINT32 Width)
{
       void *LogicalAddress;
       ACPI_STATUS rv = AE_OK;

       LogicalAddress = AcpiOsMapMemory(Address, Width / 8);
       if (LogicalAddress == NULL)
               return AE_NOT_EXIST;

       switch (Width) {
       case 8:
               *Value = *(volatile uint8_t *) LogicalAddress;
               break;

       case 16:
               *Value = *(volatile uint16_t *) LogicalAddress;
               break;

       case 32:
               *Value = *(volatile uint32_t *) LogicalAddress;
               break;

       case 64:
               *Value = *(volatile uint64_t *) LogicalAddress;
               break;

       default:
               rv = AE_BAD_PARAMETER;
       }

       AcpiOsUnmapMemory(LogicalAddress, Width / 8);

       return rv;
}

/*
* AcpiOsWriteMemory:
*
*      Write a value to a memory location.
*/
ACPI_STATUS
AcpiOsWriteMemory(ACPI_PHYSICAL_ADDRESS Address, UINT64 Value, UINT32 Width)
{
       void *LogicalAddress;
       ACPI_STATUS rv = AE_OK;

       LogicalAddress = AcpiOsMapMemory(Address, Width / 8);
       if (LogicalAddress == NULL)
               return AE_NOT_FOUND;

       switch (Width) {
       case 8:
               *(volatile uint8_t *) LogicalAddress = Value;
               break;

       case 16:
               *(volatile uint16_t *) LogicalAddress = Value;
               break;

       case 32:
               *(volatile uint32_t *) LogicalAddress = Value;
               break;

       case 64:
               *(volatile uint64_t *) LogicalAddress = Value;
               break;

       default:
               rv = AE_BAD_PARAMETER;
       }

       AcpiOsUnmapMemory(LogicalAddress, Width / 8);

       return rv;
}

/*
* AcpiOsReadPciConfiguration:
*
*      Read a value from a PCI configuration register.
*/
ACPI_STATUS
AcpiOsReadPciConfiguration(ACPI_PCI_ID *PciId, UINT32 Register, UINT64 *Value,
   UINT32 Width)
{
#if NPCI > 0
       pci_chipset_tag_t pc;
       pcitag_t tag;
       pcireg_t tmp;

       if (PciId->Bus >= 256 || PciId->Device >= 32 || PciId->Function >= 8)
               return AE_BAD_PARAMETER;

       pc = acpi_pcidev_get_tag(PciId->Segment, PciId->Bus, PciId->Device, PciId->Function);

       tag = pci_make_tag(pc, PciId->Bus, PciId->Device, PciId->Function);
       tmp = pci_conf_read(pc, tag, Register & ~3);

       switch (Width) {
       case 8:
               *Value = (tmp >> ((Register & 3) * 8)) & 0xff;
               break;

       case 16:
               *Value = (tmp >> ((Register & 3) * 8)) & 0xffff;
               break;

       case 32:
               *Value = tmp;
               break;

       default:
               return AE_BAD_PARAMETER;
       }

       return AE_OK;
#else
       return AE_BAD_PARAMETER;
#endif
}

/*
* AcpiOsWritePciConfiguration:
*
*      Write a value to a PCI configuration register.
*/
ACPI_STATUS
AcpiOsWritePciConfiguration(ACPI_PCI_ID *PciId, UINT32 Register,
   ACPI_INTEGER Value, UINT32 Width)
{
#if NPCI > 0
       pci_chipset_tag_t pc;
       pcitag_t tag;
       pcireg_t tmp;

       pc = acpi_pcidev_get_tag(PciId->Segment, PciId->Bus, PciId->Device, PciId->Function);
       tag = pci_make_tag(pc, PciId->Bus, PciId->Device, PciId->Function);

       switch (Width) {
       case 8:
               tmp = pci_conf_read(pc, tag, Register & ~3);
               tmp &= ~(0xffu << ((Register & 3) * 8));
               tmp |= (Value << ((Register & 3) * 8));
               break;

       case 16:
               tmp = pci_conf_read(pc, tag, Register & ~3);
               tmp &= ~(0xffffu << ((Register & 3) * 8));
               tmp |= (Value << ((Register & 3) * 8));
               break;

       case 32:
               tmp = Value;
               break;

       default:
               return AE_BAD_PARAMETER;
       }

       pci_conf_write(pc, tag, Register & ~3, tmp);

       return AE_OK;
#else
       return AE_BAD_PARAMETER;
#endif
}

You are viewing proxied material from ftp.icm.edu.pl. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.