freebsd-dev/sys/pci/bt848_i2c.c

415 lines
9.9 KiB
C

/*-
* Copyright (c) 1998 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.
*
* $Id: bt848_i2c.c,v 1.3 1999/05/08 21:59:38 dfr Exp $
*
*/
/*
* I2C support for the bti2c chipset.
*
* From brooktree848.c <fsmp@freefall.org>
*/
#include "pci.h"
#include "bktr.h"
#include "smbus.h"
#if (NBKTR > 0 && NPCI > 0 && NSMBUS > 0)
#include <sys/param.h>
#include <sys/kernel.h>
#include <sys/systm.h>
#include <sys/module.h>
#include <sys/bus.h>
#include <sys/conf.h>
#include <sys/buf.h>
#include <sys/uio.h>
#include <sys/malloc.h>
#include <machine/clock.h>
#include <pci/pcivar.h>
#include <pci/pcireg.h>
#include <machine/ioctl_meteor.h>
#include <machine/ioctl_bt848.h> /* extensions to ioctl_meteor.h */
#include <pci/brktree_reg.h>
#include <pci/bt848_i2c.h>
#include <dev/iicbus/iiconf.h>
#include <dev/iicbus/iicbus.h>
#include <dev/smbus/smbconf.h>
#include "iicbb_if.h"
#include "smbus_if.h"
#define I2C_DELAY 40
#define BTI2C_DEBUG(x) if (bti2c_debug) (x)
static int bti2c_debug = 0;
struct bti2c_softc {
bt848_ptr_t base;
int iic_owned; /* 1 if we own the iicbus */
int smb_owned; /* 1 if we own the smbbus */
device_t smbus;
device_t iicbus;
};
struct bt_data {
bt848_ptr_t base;
};
struct bt_data btdata[NBKTR];
static int bti2c_probe(device_t);
static int bti2c_attach(device_t);
static void bti2c_print_child(device_t, device_t);
static int bti2c_iic_callback(device_t, int, caddr_t *);
static void bti2c_iic_setlines(device_t, int, int);
static int bti2c_iic_getdataline(device_t);
static int bti2c_iic_reset(device_t, u_char, u_char, u_char *);
static int bti2c_smb_callback(device_t, int, caddr_t *);
static int bti2c_smb_writeb(device_t dev, u_char slave, char cmd, char byte);
static int bti2c_smb_writew(device_t dev, u_char slave, char cmd, short word);
static int bti2c_smb_readb(device_t dev, u_char slave, char cmd, char *byte);
static devclass_t bti2c_devclass;
static device_method_t bti2c_methods[] = {
/* device interface */
DEVMETHOD(device_probe, bti2c_probe),
DEVMETHOD(device_attach, bti2c_attach),
/* bus interface */
DEVMETHOD(bus_print_child, bti2c_print_child),
/* iicbb interface */
DEVMETHOD(iicbb_callback, bti2c_iic_callback),
DEVMETHOD(iicbb_setlines, bti2c_iic_setlines),
DEVMETHOD(iicbb_getdataline, bti2c_iic_getdataline),
DEVMETHOD(iicbb_reset, bti2c_iic_reset),
/* smbus interface */
DEVMETHOD(smbus_callback, bti2c_smb_callback),
DEVMETHOD(smbus_writeb, bti2c_smb_writeb),
DEVMETHOD(smbus_writew, bti2c_smb_writew),
DEVMETHOD(smbus_readb, bti2c_smb_readb),
{ 0, 0 }
};
static driver_t bti2c_driver = {
"bti2c",
bti2c_methods,
sizeof(struct bti2c_softc),
};
/*
* Call this to pass the base address of the bktr device to the
* bti2c_i2c layer and initialize all the I2C bus architecture
*/
int
bt848_i2c_attach(int unit, bt848_ptr_t base, struct bktr_i2c_softc *i2c_sc)
{
device_t interface;
device_t bitbang;
btdata[unit].base = base;
/* XXX add the I2C interface to the root_bus until pcibus is ready */
interface = device_add_child(root_bus, "bti2c", unit, NULL);
/* add bit-banging generic code onto bti2c interface */
bitbang = device_add_child(interface, "iicbb", -1, NULL);
/* probe and attach the interface, we need it NOW
* bit-banging code is also probed and attached */
device_probe_and_attach(interface);
device_probe_and_attach(bitbang);
/* smb and i2c interfaces are available for the bt848 chip
* connect bit-banging generic code to an iicbus */
if ((i2c_sc->iicbus = iicbus_alloc_bus(bitbang)))
device_probe_and_attach(i2c_sc->iicbus);
/* hardware i2c is actually smb over the bti2c interface */
if ((i2c_sc->smbus = smbus_alloc_bus(interface)))
device_probe_and_attach(i2c_sc->smbus);
return (0);
};
/*
* Not a real probe, we know the device exists since the device has
* been added after the successfull pci probe.
*/
static int
bti2c_probe(device_t dev)
{
device_set_desc(dev, "bt848 Hard/Soft I2C controller");
return (0);
}
static int
bti2c_attach(device_t dev)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
/* XXX should use ivars with pcibus or pcibus methods to access
* onboard memory */
sc->base = btdata[device_get_unit(dev)].base;
return (0);
}
static void
bti2c_print_child(device_t bus, device_t dev)
{
printf(" on %s%d", device_get_name(bus), device_get_unit(bus));
return;
}
static int
bti2c_smb_callback(device_t dev, int index, caddr_t *data)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
int error = 0;
int how;
/* test each time if we already have/haven't the iicbus
* to avoid deadlocks
*/
switch (index) {
case SMB_REQUEST_BUS:
if (!sc->iic_owned) {
/* request the iicbus */
how = *(int *)data;
error = iicbus_request_bus(sc->iicbus, dev, how);
if (!error)
sc->iic_owned = 1;
}
break;
case SMB_RELEASE_BUS:
if (sc->iic_owned) {
/* release the iicbus */
error = iicbus_release_bus(sc->iicbus, dev);
if (!error)
sc->iic_owned = 0;
}
break;
default:
error = EINVAL;
}
return (error);
}
static int
bti2c_iic_callback(device_t dev, int index, caddr_t *data)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
int error = 0;
int how;
/* test each time if we already have/haven't the smbus
* to avoid deadlocks
*/
switch (index) {
case IIC_REQUEST_BUS:
if (!sc->smb_owned) {
/* request the smbus */
how = *(int *)data;
error = smbus_request_bus(sc->smbus, dev, how);
if (!error)
sc->smb_owned = 1;
}
break;
case IIC_RELEASE_BUS:
if (sc->smb_owned) {
/* release the smbus */
error = smbus_release_bus(sc->smbus, dev);
if (!error)
sc->smb_owned = 0;
}
break;
default:
error = EINVAL;
}
return (error);
}
static int
bti2c_iic_reset(device_t dev, u_char speed, u_char addr, u_char * oldaddr)
{
if (oldaddr)
*oldaddr = 0; /* XXX */
return (IIC_ENOADDR);
}
static void
bti2c_iic_setlines(device_t dev, int ctrl, int data)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
bt848_ptr_t bti2c;
bti2c = sc->base;
bti2c->i2c_data_ctl = (ctrl << 1) | data;
DELAY(I2C_DELAY);
return;
}
static int
bti2c_iic_getdataline(device_t dev)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
bt848_ptr_t bti2c;
bti2c = sc->base;
return (bti2c->i2c_data_ctl & 0x1);
}
static int
bti2c_write(bt848_ptr_t bti2c, u_long data)
{
u_long x;
/* clear status bits */
bti2c->int_stat = (BT848_INT_RACK | BT848_INT_I2CDONE);
BTI2C_DEBUG(printf("w%lx", data));
/* write the address and data */
bti2c->i2c_data_ctl = data;
/* wait for completion */
for ( x = 0x7fffffff; x; --x ) { /* safety valve */
if ( bti2c->int_stat & BT848_INT_I2CDONE )
break;
}
/* check for ACK */
if ( !x || !(bti2c->int_stat & BT848_INT_RACK) ) {
BTI2C_DEBUG(printf("%c%c", (!x)?'+':'-',
(!(bti2c->int_stat & BT848_INT_RACK))?'+':'-'));
return (SMB_ENOACK);
}
BTI2C_DEBUG(printf("+"));
/* return OK */
return( 0 );
}
static int
bti2c_smb_writeb(device_t dev, u_char slave, char cmd, char byte)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
u_long data;
data = ((slave & 0xff) << 24) | ((byte & 0xff) << 16) | (u_char)cmd;
return (bti2c_write(sc->base, data));
}
/*
* byte1 becomes low byte of word
* byte2 becomes high byte of word
*/
static int
bti2c_smb_writew(device_t dev, u_char slave, char cmd, short word)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
u_long data;
char low, high;
low = (char)(word & 0xff);
high = (char)((word & 0xff00) >> 8);
data = ((slave & 0xff) << 24) | ((low & 0xff) << 16) |
((high & 0xff) << 8) | BT848_DATA_CTL_I2CW3B | (u_char)cmd;
return (bti2c_write(sc->base, data));
}
/*
* The Bt878 and Bt879 differed on the treatment of i2c commands
*/
static int
bti2c_smb_readb(device_t dev, u_char slave, char cmd, char *byte)
{
struct bti2c_softc *sc = (struct bti2c_softc *)device_get_softc(dev);
bt848_ptr_t bti2c;
u_long x;
bti2c = sc->base;
/* clear status bits */
bti2c->int_stat = (BT848_INT_RACK | BT848_INT_I2CDONE);
bti2c->i2c_data_ctl = ((slave & 0xff) << 24) | (u_char)cmd;
BTI2C_DEBUG(printf("r%lx/", (u_long)(((slave & 0xff) << 24) | (u_char)cmd)));
/* wait for completion */
for ( x = 0x7fffffff; x; --x ) { /* safety valve */
if ( bti2c->int_stat & BT848_INT_I2CDONE )
break;
}
/* check for ACK */
if ( !x || !(bti2c->int_stat & BT848_INT_RACK) ) {
BTI2C_DEBUG(printf("r%c%c", (!x)?'+':'-',
(!(bti2c->int_stat & BT848_INT_RACK))?'+':'-'));
return (SMB_ENOACK);
}
*byte = (char)((bti2c->i2c_data_ctl >> 8) & 0xff);
BTI2C_DEBUG(printf("r%x+", *byte));
return (0);
}
DRIVER_MODULE(bti2c, root, bti2c_driver, bti2c_devclass, 0, 0);
#endif