687 lines
16 KiB
C
687 lines
16 KiB
C
/*-
|
|
* Copyright (c) 1998, 1999, 2001 Nicolas Souchu
|
|
* All rights reserved.
|
|
*
|
|
* 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 AUTHOR 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 AUTHOR 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.
|
|
*
|
|
* $FreeBSD$
|
|
*
|
|
*/
|
|
|
|
/*
|
|
* Power Management support for the Acer M15x3 chipsets
|
|
*/
|
|
#include <sys/param.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/module.h>
|
|
#include <sys/bus.h>
|
|
#include <sys/uio.h>
|
|
|
|
|
|
#include <machine/bus_pio.h>
|
|
#include <machine/bus_memio.h>
|
|
#include <machine/bus.h>
|
|
#include <machine/resource.h>
|
|
#include <sys/rman.h>
|
|
|
|
#include <pci/pcivar.h>
|
|
#include <pci/pcireg.h>
|
|
|
|
#include <dev/iicbus/iiconf.h>
|
|
#include <dev/smbus/smbconf.h>
|
|
#include "smbus_if.h"
|
|
|
|
#include "alpm.h"
|
|
|
|
#define ALPM_DEBUG(x) if (alpm_debug) (x)
|
|
|
|
#ifdef DEBUG
|
|
static int alpm_debug = 1;
|
|
#else
|
|
static int alpm_debug = 0;
|
|
#endif
|
|
|
|
#define ACER_M1543_PMU_ID 0x710110b9
|
|
|
|
/* Uncomment this line to force another I/O base address for SMB */
|
|
/* #define ALPM_SMBIO_BASE_ADDR 0x3a80 */
|
|
|
|
/* I/O registers offsets - the base address is programmed via the
|
|
* SMBBA PCI configuration register
|
|
*/
|
|
#define SMBSTS 0x0 /* SMBus host/slave status register */
|
|
#define SMBCMD 0x1 /* SMBus host/slave command register */
|
|
#define SMBSTART 0x2 /* start to generate programmed cycle */
|
|
#define SMBHADDR 0x3 /* host address register */
|
|
#define SMBHDATA 0x4 /* data A register for host controller */
|
|
#define SMBHDATB 0x5 /* data B register for host controller */
|
|
#define SMBHBLOCK 0x6 /* block register for host controller */
|
|
#define SMBHCMD 0x7 /* command register for host controller */
|
|
|
|
/* SMBSTS masks */
|
|
#define TERMINATE 0x80
|
|
#define BUS_COLLI 0x40
|
|
#define DEVICE_ERR 0x20
|
|
#define SMI_I_STS 0x10
|
|
#define HST_BSY 0x08
|
|
#define IDL_STS 0x04
|
|
#define HSTSLV_STS 0x02
|
|
#define HSTSLV_BSY 0x01
|
|
|
|
/* SMBCMD masks */
|
|
#define SMB_BLK_CLR 0x80
|
|
#define T_OUT_CMD 0x08
|
|
#define ABORT_HOST 0x04
|
|
|
|
/* SMBus commands */
|
|
#define SMBQUICK 0x00
|
|
#define SMBSRBYTE 0x10 /* send/receive byte */
|
|
#define SMBWRBYTE 0x20 /* write/read byte */
|
|
#define SMBWRWORD 0x30 /* write/read word */
|
|
#define SMBWRBLOCK 0x40 /* write/read block */
|
|
|
|
/* PCI configuration registers and masks
|
|
*/
|
|
#define COM 0x4
|
|
#define COM_ENABLE_IO 0x1
|
|
|
|
#define SMBBA 0x14
|
|
|
|
#define ATPC 0x5b
|
|
#define ATPC_SMBCTRL 0x04 /* XX linux has this as 0x6 */
|
|
|
|
#define SMBHSI 0xe0
|
|
#define SMBHSI_SLAVE 0x2
|
|
#define SMBHSI_HOST 0x1
|
|
|
|
#define SMBHCBC 0xe2
|
|
#define SMBHCBC_CLOCK 0x70
|
|
|
|
#define SMBCLOCK_149K 0x0
|
|
#define SMBCLOCK_74K 0x20
|
|
#define SMBCLOCK_37K 0x40
|
|
#define SMBCLOCK_223K 0x80
|
|
#define SMBCLOCK_111K 0xa0
|
|
#define SMBCLOCK_55K 0xc0
|
|
|
|
struct alpm_data {
|
|
int base;
|
|
bus_space_tag_t smbst;
|
|
bus_space_handle_t smbsh;
|
|
};
|
|
|
|
struct alsmb_softc {
|
|
int base;
|
|
device_t smbus;
|
|
struct alpm_data *alpm;
|
|
};
|
|
|
|
#define ALPM_SMBINB(alsmb,register) \
|
|
(bus_space_read_1(alsmb->alpm->smbst, alsmb->alpm->smbsh, register))
|
|
#define ALPM_SMBOUTB(alsmb,register,value) \
|
|
(bus_space_write_1(alsmb->alpm->smbst, alsmb->alpm->smbsh, register, value))
|
|
|
|
static int alsmb_probe(device_t);
|
|
static int alsmb_attach(device_t);
|
|
static int alsmb_smb_callback(device_t, int, caddr_t *);
|
|
static int alsmb_smb_quick(device_t dev, u_char slave, int how);
|
|
static int alsmb_smb_sendb(device_t dev, u_char slave, char byte);
|
|
static int alsmb_smb_recvb(device_t dev, u_char slave, char *byte);
|
|
static int alsmb_smb_writeb(device_t dev, u_char slave, char cmd, char byte);
|
|
static int alsmb_smb_readb(device_t dev, u_char slave, char cmd, char *byte);
|
|
static int alsmb_smb_writew(device_t dev, u_char slave, char cmd, short word);
|
|
static int alsmb_smb_readw(device_t dev, u_char slave, char cmd, short *word);
|
|
static int alsmb_smb_bwrite(device_t dev, u_char slave, char cmd, u_char count, char *buf);
|
|
static int alsmb_smb_bread(device_t dev, u_char slave, char cmd, u_char count, char *byte);
|
|
|
|
static devclass_t alsmb_devclass;
|
|
|
|
static device_method_t alsmb_methods[] = {
|
|
/* device interface */
|
|
DEVMETHOD(device_probe, alsmb_probe),
|
|
DEVMETHOD(device_attach, alsmb_attach),
|
|
|
|
/* bus interface */
|
|
DEVMETHOD(bus_print_child, bus_generic_print_child),
|
|
|
|
/* smbus interface */
|
|
DEVMETHOD(smbus_callback, alsmb_smb_callback),
|
|
DEVMETHOD(smbus_quick, alsmb_smb_quick),
|
|
DEVMETHOD(smbus_sendb, alsmb_smb_sendb),
|
|
DEVMETHOD(smbus_recvb, alsmb_smb_recvb),
|
|
DEVMETHOD(smbus_writeb, alsmb_smb_writeb),
|
|
DEVMETHOD(smbus_readb, alsmb_smb_readb),
|
|
DEVMETHOD(smbus_writew, alsmb_smb_writew),
|
|
DEVMETHOD(smbus_readw, alsmb_smb_readw),
|
|
DEVMETHOD(smbus_bwrite, alsmb_smb_bwrite),
|
|
DEVMETHOD(smbus_bread, alsmb_smb_bread),
|
|
|
|
{ 0, 0 }
|
|
};
|
|
|
|
static driver_t alsmb_driver = {
|
|
"alsmb",
|
|
alsmb_methods,
|
|
sizeof(struct alsmb_softc),
|
|
};
|
|
|
|
static int alpm_pci_probe(device_t dev);
|
|
static int alpm_pci_attach(device_t dev);
|
|
|
|
static devclass_t alpm_devclass;
|
|
|
|
static device_method_t alpm_pci_methods[] = {
|
|
/* device interface */
|
|
DEVMETHOD(device_probe, alpm_pci_probe),
|
|
DEVMETHOD(device_attach, alpm_pci_attach),
|
|
|
|
{ 0, 0 }
|
|
};
|
|
|
|
static driver_t alpm_pci_driver = {
|
|
"alpm",
|
|
alpm_pci_methods,
|
|
sizeof(struct alpm_data)
|
|
};
|
|
|
|
|
|
static int
|
|
alpm_pci_probe(device_t dev)
|
|
{
|
|
if (pci_get_devid(dev) == ACER_M1543_PMU_ID) {
|
|
device_set_desc(dev,
|
|
"AcerLabs M15x3 Power Management Unit");
|
|
return 0;
|
|
} else {
|
|
return ENXIO;
|
|
}
|
|
}
|
|
|
|
static int
|
|
alpm_pci_attach(device_t dev)
|
|
{
|
|
int rid, unit;
|
|
u_int32_t l;
|
|
struct alpm_data *alpm;
|
|
struct resource *res;
|
|
device_t smbinterface;
|
|
|
|
alpm = device_get_softc(dev);
|
|
unit = device_get_unit(dev);
|
|
|
|
/* Unlock SMBIO base register access */
|
|
l = pci_read_config(dev, ATPC, 1);
|
|
pci_write_config(dev, ATPC, l & ~ATPC_SMBCTRL, 1);
|
|
|
|
/*
|
|
* XX linux sets clock to 74k, should we?
|
|
l = pci_read_config(dev, SMBHCBC, 1);
|
|
l &= 0x1f;
|
|
l |= SMBCLOCK_74K;
|
|
pci_write_config(dev, SMBHCBC, l, 1);
|
|
*/
|
|
|
|
if (bootverbose) {
|
|
l = pci_read_config(dev, SMBHSI, 1);
|
|
printf("alsmb%d: %s/%s", unit,
|
|
(l & SMBHSI_HOST) ? "host":"nohost",
|
|
(l & SMBHSI_SLAVE) ? "slave":"noslave");
|
|
|
|
l = pci_read_config(dev, SMBHCBC, 1);
|
|
switch (l & SMBHCBC_CLOCK) {
|
|
case SMBCLOCK_149K:
|
|
printf(" 149K");
|
|
break;
|
|
case SMBCLOCK_74K:
|
|
printf(" 74K");
|
|
break;
|
|
case SMBCLOCK_37K:
|
|
printf(" 37K");
|
|
break;
|
|
case SMBCLOCK_223K:
|
|
printf(" 223K");
|
|
break;
|
|
case SMBCLOCK_111K:
|
|
printf(" 111K");
|
|
break;
|
|
case SMBCLOCK_55K:
|
|
printf(" 55K");
|
|
break;
|
|
}
|
|
}
|
|
|
|
#ifdef ALPM_SMBIO_BASE_ADDR
|
|
/* XX will this even work anymore? */
|
|
/* disable I/O */
|
|
l = pci_read_config(dev, COM, 2);
|
|
pci_write_config(dev, COM, l & ~COM_ENABLE_IO, 2);
|
|
|
|
/* set the I/O base address */
|
|
pci_write_config(dev, SMBBA, ALPM_SMBIO_BASE_ADDR | 0x1, 4);
|
|
|
|
/* enable I/O */
|
|
pci_write_config(dev, COM, l | COM_ENABLE_IO, 2);
|
|
|
|
#endif
|
|
rid = SMBBA;
|
|
res = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid,
|
|
0,~0,1,RF_ACTIVE);
|
|
if (res == NULL) {
|
|
device_printf(dev,"Could not allocate Bus space\n");
|
|
return ENXIO;
|
|
}
|
|
alpm->smbst = rman_get_bustag(res);
|
|
alpm->smbsh = rman_get_bushandle(res);
|
|
|
|
if (bootverbose)
|
|
printf(" at 0x%x\n", alpm->smbsh);
|
|
|
|
smbinterface = device_add_child(dev, "alsmb", unit);
|
|
if (!smbinterface)
|
|
device_printf(dev, "could not add SMBus device\n");
|
|
else
|
|
device_probe_and_attach(smbinterface);
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* Not a real probe, we know the device exists since the device has
|
|
* been added after the successfull pci probe.
|
|
*/
|
|
static int
|
|
alsmb_probe(device_t dev)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
|
|
/* allocate a new smbus device */
|
|
sc->smbus = smbus_alloc_bus(dev);
|
|
if (!sc->smbus)
|
|
return (EINVAL);
|
|
device_set_desc(dev, "Aladdin IV/V/Pro2 SMBus controller");
|
|
|
|
return (0);
|
|
}
|
|
|
|
static int
|
|
alsmb_attach(device_t dev)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
|
|
sc->alpm = device_get_softc(device_get_parent(dev));
|
|
|
|
/* probe and attach the smbus */
|
|
device_probe_and_attach(sc->smbus);
|
|
|
|
return (0);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_callback(device_t dev, int index, caddr_t *data)
|
|
{
|
|
int error = 0;
|
|
|
|
switch (index) {
|
|
case SMB_REQUEST_BUS:
|
|
case SMB_RELEASE_BUS:
|
|
/* ok, bus allocation accepted */
|
|
break;
|
|
default:
|
|
error = EINVAL;
|
|
}
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_clear(struct alsmb_softc *sc)
|
|
{
|
|
ALPM_SMBOUTB(sc, SMBSTS, 0xff);
|
|
DELAY(10);
|
|
|
|
return (0);
|
|
}
|
|
|
|
#if 0
|
|
static int
|
|
alsmb_abort(struct alsmb_softc *sc)
|
|
{
|
|
ALPM_SMBOUTB(sc, SMBCMD, T_OUT_CMD | ABORT_HOST);
|
|
|
|
return (0);
|
|
}
|
|
#endif
|
|
|
|
static int
|
|
alsmb_idle(struct alsmb_softc *sc)
|
|
{
|
|
u_char sts;
|
|
|
|
sts = ALPM_SMBINB(sc, SMBSTS);
|
|
|
|
ALPM_DEBUG(printf("alpm: idle? STS=0x%x\n", sts));
|
|
|
|
return (sts & IDL_STS);
|
|
}
|
|
|
|
/*
|
|
* Poll the SMBus controller
|
|
*/
|
|
static int
|
|
alsmb_wait(struct alsmb_softc *sc)
|
|
{
|
|
int count = 10000;
|
|
u_char sts = 0;
|
|
int error;
|
|
|
|
/* wait for command to complete and SMBus controller is idle */
|
|
while(count--) {
|
|
DELAY(10);
|
|
sts = ALPM_SMBINB(sc, SMBSTS);
|
|
if (sts & SMI_I_STS)
|
|
break;
|
|
}
|
|
|
|
ALPM_DEBUG(printf("alpm: STS=0x%x\n", sts));
|
|
|
|
error = SMB_ENOERR;
|
|
|
|
if (!count)
|
|
error |= SMB_ETIMEOUT;
|
|
|
|
if (sts & TERMINATE)
|
|
error |= SMB_EABORT;
|
|
|
|
if (sts & BUS_COLLI)
|
|
error |= SMB_ENOACK;
|
|
|
|
if (sts & DEVICE_ERR)
|
|
error |= SMB_EBUSERR;
|
|
|
|
if (error != SMB_ENOERR)
|
|
alsmb_clear(sc);
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_quick(device_t dev, u_char slave, int how)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
int error;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (EBUSY);
|
|
|
|
switch (how) {
|
|
case SMB_QWRITE:
|
|
ALPM_DEBUG(printf("alpm: QWRITE to 0x%x", slave));
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave & ~LSB);
|
|
break;
|
|
case SMB_QREAD:
|
|
ALPM_DEBUG(printf("alpm: QREAD to 0x%x", slave));
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave | LSB);
|
|
break;
|
|
default:
|
|
panic("%s: unknown QUICK command (%x)!", __FUNCTION__,
|
|
how);
|
|
}
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBQUICK);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
error = alsmb_wait(sc);
|
|
|
|
ALPM_DEBUG(printf(", error=0x%x\n", error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_sendb(device_t dev, u_char slave, char byte)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
int error;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave & ~LSB);
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBSRBYTE);
|
|
ALPM_SMBOUTB(sc, SMBHDATA, byte);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
error = alsmb_wait(sc);
|
|
|
|
ALPM_DEBUG(printf("alpm: SENDB to 0x%x, byte=0x%x, error=0x%x\n", slave, byte, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_recvb(device_t dev, u_char slave, char *byte)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
int error;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave | LSB);
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBSRBYTE);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
if ((error = alsmb_wait(sc)) == SMB_ENOERR)
|
|
*byte = ALPM_SMBINB(sc, SMBHDATA);
|
|
|
|
ALPM_DEBUG(printf("alpm: RECVB from 0x%x, byte=0x%x, error=0x%x\n", slave, *byte, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_writeb(device_t dev, u_char slave, char cmd, char byte)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
int error;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave & ~LSB);
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBWRBYTE);
|
|
ALPM_SMBOUTB(sc, SMBHDATA, byte);
|
|
ALPM_SMBOUTB(sc, SMBHCMD, cmd);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
error = alsmb_wait(sc);
|
|
|
|
ALPM_DEBUG(printf("alpm: WRITEB to 0x%x, cmd=0x%x, byte=0x%x, error=0x%x\n", slave, cmd, byte, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_readb(device_t dev, u_char slave, char cmd, char *byte)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
int error;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave | LSB);
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBWRBYTE);
|
|
ALPM_SMBOUTB(sc, SMBHCMD, cmd);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
if ((error = alsmb_wait(sc)) == SMB_ENOERR)
|
|
*byte = ALPM_SMBINB(sc, SMBHDATA);
|
|
|
|
ALPM_DEBUG(printf("alpm: READB from 0x%x, cmd=0x%x, byte=0x%x, error=0x%x\n", slave, cmd, *byte, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_writew(device_t dev, u_char slave, char cmd, short word)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
int error;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave & ~LSB);
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBWRWORD);
|
|
ALPM_SMBOUTB(sc, SMBHDATA, word & 0x00ff);
|
|
ALPM_SMBOUTB(sc, SMBHDATB, (word & 0xff00) >> 8);
|
|
ALPM_SMBOUTB(sc, SMBHCMD, cmd);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
error = alsmb_wait(sc);
|
|
|
|
ALPM_DEBUG(printf("alpm: WRITEW to 0x%x, cmd=0x%x, word=0x%x, error=0x%x\n", slave, cmd, word, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_readw(device_t dev, u_char slave, char cmd, short *word)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
int error;
|
|
u_char high, low;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave | LSB);
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBWRWORD);
|
|
ALPM_SMBOUTB(sc, SMBHCMD, cmd);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
if ((error = alsmb_wait(sc)) == SMB_ENOERR) {
|
|
low = ALPM_SMBINB(sc, SMBHDATA);
|
|
high = ALPM_SMBINB(sc, SMBHDATB);
|
|
|
|
*word = ((high & 0xff) << 8) | (low & 0xff);
|
|
}
|
|
|
|
ALPM_DEBUG(printf("alpm: READW from 0x%x, cmd=0x%x, word=0x%x, error=0x%x\n", slave, cmd, *word, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_bwrite(device_t dev, u_char slave, char cmd, u_char count, char *buf)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
u_char remain, len, i;
|
|
int error = SMB_ENOERR;
|
|
|
|
alsmb_clear(sc);
|
|
if(!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
remain = count;
|
|
while (remain) {
|
|
len = min(remain, 32);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave & ~LSB);
|
|
|
|
/* set the cmd and reset the
|
|
* 32-byte long internal buffer */
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBWRBLOCK | SMB_BLK_CLR);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHDATA, len);
|
|
|
|
/* fill the 32-byte internal buffer */
|
|
for (i=0; i<len; i++) {
|
|
ALPM_SMBOUTB(sc, SMBHBLOCK, buf[count-remain+i]);
|
|
DELAY(2);
|
|
}
|
|
ALPM_SMBOUTB(sc, SMBHCMD, cmd);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
if ((error = alsmb_wait(sc)) != SMB_ENOERR)
|
|
goto error;
|
|
|
|
remain -= len;
|
|
}
|
|
|
|
error:
|
|
ALPM_DEBUG(printf("alpm: WRITEBLK to 0x%x, count=0x%x, cmd=0x%x, error=0x%x", slave, count, cmd, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
static int
|
|
alsmb_smb_bread(device_t dev, u_char slave, char cmd, u_char count, char *buf)
|
|
{
|
|
struct alsmb_softc *sc = (struct alsmb_softc *)device_get_softc(dev);
|
|
u_char remain, len, i;
|
|
int error = SMB_ENOERR;
|
|
|
|
alsmb_clear(sc);
|
|
if (!alsmb_idle(sc))
|
|
return (SMB_EBUSY);
|
|
|
|
remain = count;
|
|
while (remain) {
|
|
ALPM_SMBOUTB(sc, SMBHADDR, slave | LSB);
|
|
|
|
/* set the cmd and reset the
|
|
* 32-byte long internal buffer */
|
|
ALPM_SMBOUTB(sc, SMBCMD, SMBWRBLOCK | SMB_BLK_CLR);
|
|
|
|
ALPM_SMBOUTB(sc, SMBHCMD, cmd);
|
|
ALPM_SMBOUTB(sc, SMBSTART, 0xff);
|
|
|
|
if ((error = alsmb_wait(sc)) != SMB_ENOERR)
|
|
goto error;
|
|
|
|
len = ALPM_SMBINB(sc, SMBHDATA);
|
|
|
|
/* read the 32-byte internal buffer */
|
|
for (i=0; i<len; i++) {
|
|
buf[count-remain+i] = ALPM_SMBINB(sc, SMBHBLOCK);
|
|
DELAY(2);
|
|
}
|
|
|
|
remain -= len;
|
|
}
|
|
error:
|
|
ALPM_DEBUG(printf("alpm: READBLK to 0x%x, count=0x%x, cmd=0x%x, error=0x%x", slave, count, cmd, error));
|
|
|
|
return (error);
|
|
}
|
|
|
|
DRIVER_MODULE(alpm, pci, alpm_pci_driver, alpm_devclass, 0, 0);
|
|
DRIVER_MODULE(alsmb, alpm, alsmb_driver, alsmb_devclass, 0, 0);
|