[net-next-2.6.git] / drivers / i2c / busses / i2c-ali1563.c

/**
 *	i2c-ali1563.c - i2c driver for the ALi 1563 Southbridge
 *
 *	Copyright (C) 2004 Patrick Mochel
 *		      2005 Rudolf Marek <r.marek@assembler.cz>
 *
 *	The 1563 southbridge is deceptively similar to the 1533, with a
 *	few notable exceptions. One of those happens to be the fact they
 *	upgraded the i2c core to be 2.0 compliant, and happens to be almost
 *	identical to the i2c controller found in the Intel 801 south
 *	bridges.
 *
 *	This driver is based on a mix of the 15x3, 1535, and i801 drivers,
 *	with a little help from the ALi 1563 spec.
 *
 *	This file is released under the GPLv2
 */

#include <linux/module.h>
#include <linux/delay.h>
#include <linux/i2c.h>
#include <linux/pci.h>
#include <linux/init.h>
#include <linux/acpi.h>

#define ALI1563_MAX_TIMEOUT	500
#define	ALI1563_SMBBA		0x80
#define ALI1563_SMB_IOEN	1
#define ALI1563_SMB_HOSTEN	2
#define ALI1563_SMB_IOSIZE	16

#define SMB_HST_STS	(ali1563_smba + 0)
#define SMB_HST_CNTL1	(ali1563_smba + 1)
#define SMB_HST_CNTL2	(ali1563_smba + 2)
#define SMB_HST_CMD	(ali1563_smba + 3)
#define SMB_HST_ADD	(ali1563_smba + 4)
#define SMB_HST_DAT0	(ali1563_smba + 5)
#define SMB_HST_DAT1	(ali1563_smba + 6)
#define SMB_BLK_DAT	(ali1563_smba + 7)

#define HST_STS_BUSY	0x01
#define HST_STS_INTR	0x02
#define HST_STS_DEVERR	0x04
#define HST_STS_BUSERR	0x08
#define HST_STS_FAIL	0x10
#define HST_STS_DONE	0x80
#define HST_STS_BAD	0x1c


#define HST_CNTL1_TIMEOUT	0x80
#define HST_CNTL1_LAST		0x40

#define HST_CNTL2_KILL		0x04
#define HST_CNTL2_START		0x40
#define HST_CNTL2_QUICK		0x00
#define HST_CNTL2_BYTE		0x01
#define HST_CNTL2_BYTE_DATA	0x02
#define HST_CNTL2_WORD_DATA	0x03
#define HST_CNTL2_BLOCK		0x05


#define HST_CNTL2_SIZEMASK	0x38

static struct pci_driver ali1563_pci_driver;
static unsigned short ali1563_smba;

static int ali1563_transaction(struct i2c_adapter * a, int size)
{
	u32 data;
	int timeout;
	int status = -EIO;

	dev_dbg(&a->dev, "Transaction (pre): STS=%02x, CNTL1=%02x, "
		"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
		inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
		inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
		inb_p(SMB_HST_DAT1));

	data = inb_p(SMB_HST_STS);
	if (data & HST_STS_BAD) {
		dev_err(&a->dev, "ali1563: Trying to reset busy device\n");
		outb_p(data | HST_STS_BAD,SMB_HST_STS);
		data = inb_p(SMB_HST_STS);
		if (data & HST_STS_BAD)
			return -EBUSY;
	}
	outb_p(inb_p(SMB_HST_CNTL2) | HST_CNTL2_START, SMB_HST_CNTL2);

	timeout = ALI1563_MAX_TIMEOUT;
	do {
		msleep(1);
	} while (((data = inb_p(SMB_HST_STS)) & HST_STS_BUSY) && --timeout);

	dev_dbg(&a->dev, "Transaction (post): STS=%02x, CNTL1=%02x, "
		"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
		inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
		inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
		inb_p(SMB_HST_DAT1));

	if (timeout && !(data & HST_STS_BAD))
		return 0;

	if (!timeout) {
		dev_err(&a->dev, "Timeout - Trying to KILL transaction!\n");
		/* Issue 'kill' to host controller */
		outb_p(HST_CNTL2_KILL,SMB_HST_CNTL2);
		data = inb_p(SMB_HST_STS);
		status = -ETIMEDOUT;
 	}

	/* device error - no response, ignore the autodetection case */
	if (data & HST_STS_DEVERR) {
		if (size != HST_CNTL2_QUICK)
			dev_err(&a->dev, "Device error!\n");
		status = -ENXIO;
	}
	/* bus collision */
	if (data & HST_STS_BUSERR) {
		dev_err(&a->dev, "Bus collision!\n");
		/* Issue timeout, hoping it helps */
		outb_p(HST_CNTL1_TIMEOUT,SMB_HST_CNTL1);
	}

	if (data & HST_STS_FAIL) {
		dev_err(&a->dev, "Cleaning fail after KILL!\n");
		outb_p(0x0,SMB_HST_CNTL2);
	}

	return status;
}

static int ali1563_block_start(struct i2c_adapter * a)
{
	u32 data;
	int timeout;
	int status = -EIO;

	dev_dbg(&a->dev, "Block (pre): STS=%02x, CNTL1=%02x, "
		"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
		inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
		inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
		inb_p(SMB_HST_DAT1));

	data = inb_p(SMB_HST_STS);
	if (data & HST_STS_BAD) {
		dev_warn(&a->dev,"ali1563: Trying to reset busy device\n");
		outb_p(data | HST_STS_BAD,SMB_HST_STS);
		data = inb_p(SMB_HST_STS);
		if (data & HST_STS_BAD)
			return -EBUSY;
	}

	/* Clear byte-ready bit */
	outb_p(data | HST_STS_DONE, SMB_HST_STS);

	/* Start transaction and wait for byte-ready bit to be set */
	outb_p(inb_p(SMB_HST_CNTL2) | HST_CNTL2_START, SMB_HST_CNTL2);

	timeout = ALI1563_MAX_TIMEOUT;
	do {
		msleep(1);
	} while (!((data = inb_p(SMB_HST_STS)) & HST_STS_DONE) && --timeout);

	dev_dbg(&a->dev, "Block (post): STS=%02x, CNTL1=%02x, "
		"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
		inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
		inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
		inb_p(SMB_HST_DAT1));

	if (timeout && !(data & HST_STS_BAD))
		return 0;

	if (timeout == 0)
		status = -ETIMEDOUT;

	if (data & HST_STS_DEVERR)
		status = -ENXIO;

	dev_err(&a->dev, "SMBus Error: %s%s%s%s%s\n",
		timeout ? "" : "Timeout ",
		data & HST_STS_FAIL ? "Transaction Failed " : "",
		data & HST_STS_BUSERR ? "No response or Bus Collision " : "",
		data & HST_STS_DEVERR ? "Device Error " : "",
		!(data & HST_STS_DONE) ? "Transaction Never Finished " : "");
	return status;
}

static int ali1563_block(struct i2c_adapter * a, union i2c_smbus_data * data, u8 rw)
{
	int i, len;
	int error = 0;

	/* Do we need this? */
	outb_p(HST_CNTL1_LAST,SMB_HST_CNTL1);

	if (rw == I2C_SMBUS_WRITE) {
		len = data->block[0];
		if (len < 1)
			len = 1;
		else if (len > 32)
			len = 32;
		outb_p(len,SMB_HST_DAT0);
		outb_p(data->block[1],SMB_BLK_DAT);
	} else
		len = 32;

	outb_p(inb_p(SMB_HST_CNTL2) | HST_CNTL2_BLOCK, SMB_HST_CNTL2);

	for (i = 0; i < len; i++) {
		if (rw == I2C_SMBUS_WRITE) {
			outb_p(data->block[i + 1], SMB_BLK_DAT);
			if ((error = ali1563_block_start(a)))
				break;
		} else {
			if ((error = ali1563_block_start(a)))
				break;
			if (i == 0) {
				len = inb_p(SMB_HST_DAT0);
				if (len < 1)
					len = 1;
				else if (len > 32)
					len = 32;
			}
			data->block[i+1] = inb_p(SMB_BLK_DAT);
		}
	}
	/* Do we need this? */
	outb_p(HST_CNTL1_LAST,SMB_HST_CNTL1);
	return error;
}

static s32 ali1563_access(struct i2c_adapter * a, u16 addr,
			  unsigned short flags, char rw, u8 cmd,
			  int size, union i2c_smbus_data * data)
{
	int error = 0;
	int timeout;
	u32 reg;

	for (timeout = ALI1563_MAX_TIMEOUT; timeout; timeout--) {
		if (!(reg = inb_p(SMB_HST_STS) & HST_STS_BUSY))
			break;
	}
	if (!timeout)
		dev_warn(&a->dev,"SMBus not idle. HST_STS = %02x\n",reg);
	outb_p(0xff,SMB_HST_STS);

	/* Map the size to what the chip understands */
	switch (size) {
	case I2C_SMBUS_QUICK:
		size = HST_CNTL2_QUICK;
		break;
	case I2C_SMBUS_BYTE:
		size = HST_CNTL2_BYTE;
		break;
	case I2C_SMBUS_BYTE_DATA:
		size = HST_CNTL2_BYTE_DATA;
		break;
	case I2C_SMBUS_WORD_DATA:
		size = HST_CNTL2_WORD_DATA;
		break;
	case I2C_SMBUS_BLOCK_DATA:
		size = HST_CNTL2_BLOCK;
		break;
	default:
		dev_warn(&a->dev, "Unsupported transaction %d\n", size);
		error = -EOPNOTSUPP;
		goto Done;
	}

	outb_p(((addr & 0x7f) << 1) | (rw & 0x01), SMB_HST_ADD);
	outb_p((inb_p(SMB_HST_CNTL2) & ~HST_CNTL2_SIZEMASK) | (size << 3), SMB_HST_CNTL2);

	/* Write the command register */

	switch(size) {
	case HST_CNTL2_BYTE:
		if (rw== I2C_SMBUS_WRITE)
			/* Beware it uses DAT0 register and not CMD! */
			outb_p(cmd, SMB_HST_DAT0);
		break;
	case HST_CNTL2_BYTE_DATA:
		outb_p(cmd, SMB_HST_CMD);
		if (rw == I2C_SMBUS_WRITE)
			outb_p(data->byte, SMB_HST_DAT0);
		break;
	case HST_CNTL2_WORD_DATA:
		outb_p(cmd, SMB_HST_CMD);
		if (rw == I2C_SMBUS_WRITE) {
			outb_p(data->word & 0xff, SMB_HST_DAT0);
			outb_p((data->word & 0xff00) >> 8, SMB_HST_DAT1);
		}
		break;
	case HST_CNTL2_BLOCK:
		outb_p(cmd, SMB_HST_CMD);
		error = ali1563_block(a,data,rw);
		goto Done;
	}

	if ((error = ali1563_transaction(a, size)))
		goto Done;

	if ((rw == I2C_SMBUS_WRITE) || (size == HST_CNTL2_QUICK))
		goto Done;

	switch (size) {
	case HST_CNTL2_BYTE:	/* Result put in SMBHSTDAT0 */
		data->byte = inb_p(SMB_HST_DAT0);
		break;
	case HST_CNTL2_BYTE_DATA:
		data->byte = inb_p(SMB_HST_DAT0);
		break;
	case HST_CNTL2_WORD_DATA:
		data->word = inb_p(SMB_HST_DAT0) + (inb_p(SMB_HST_DAT1) << 8);
		break;
	}
Done:
	return error;
}

static u32 ali1563_func(struct i2c_adapter * a)
{
	return I2C_FUNC_SMBUS_QUICK | I2C_FUNC_SMBUS_BYTE |
	    I2C_FUNC_SMBUS_BYTE_DATA | I2C_FUNC_SMBUS_WORD_DATA |
	    I2C_FUNC_SMBUS_BLOCK_DATA;
}


static int __devinit ali1563_setup(struct pci_dev * dev)
{
	u16 ctrl;

	pci_read_config_word(dev,ALI1563_SMBBA,&ctrl);

	/* SMB I/O Base in high 12 bits and must be aligned with the
	 * size of the I/O space. */
	ali1563_smba = ctrl & ~(ALI1563_SMB_IOSIZE - 1);
	if (!ali1563_smba) {
		dev_warn(&dev->dev,"ali1563_smba Uninitialized\n");
		goto Err;
	}

	/* Check if device is enabled */
	if (!(ctrl & ALI1563_SMB_HOSTEN)) {
		dev_warn(&dev->dev, "Host Controller not enabled\n");
		goto Err;
	}
	if (!(ctrl & ALI1563_SMB_IOEN)) {
		dev_warn(&dev->dev, "I/O space not enabled, trying manually\n");
		pci_write_config_word(dev, ALI1563_SMBBA,
				      ctrl | ALI1563_SMB_IOEN);
		pci_read_config_word(dev, ALI1563_SMBBA, &ctrl);
		if (!(ctrl & ALI1563_SMB_IOEN)) {
			dev_err(&dev->dev, "I/O space still not enabled, "
				"giving up\n");
			goto Err;
		}
	}

	if (acpi_check_region(ali1563_smba, ALI1563_SMB_IOSIZE,
			      ali1563_pci_driver.name))
		goto Err;

	if (!request_region(ali1563_smba, ALI1563_SMB_IOSIZE,
			    ali1563_pci_driver.name)) {
		dev_err(&dev->dev, "Could not allocate I/O space at 0x%04x\n",
			ali1563_smba);
		goto Err;
	}
	dev_info(&dev->dev, "Found ALi1563 SMBus at 0x%04x\n", ali1563_smba);

	return 0;
Err:
	return -ENODEV;
}

static void ali1563_shutdown(struct pci_dev *dev)
{
	release_region(ali1563_smba,ALI1563_SMB_IOSIZE);
}

static const struct i2c_algorithm ali1563_algorithm = {
	.smbus_xfer	= ali1563_access,
	.functionality	= ali1563_func,
};

static struct i2c_adapter ali1563_adapter = {
	.owner	= THIS_MODULE,
	.class	= I2C_CLASS_HWMON | I2C_CLASS_SPD,
	.algo	= &ali1563_algorithm,
};

static int __devinit ali1563_probe(struct pci_dev * dev,
				const struct pci_device_id * id_table)
{
	int error;

	if ((error = ali1563_setup(dev)))
		goto exit;
	ali1563_adapter.dev.parent = &dev->dev;
	snprintf(ali1563_adapter.name, sizeof(ali1563_adapter.name),
		 "SMBus ALi 1563 Adapter @ %04x", ali1563_smba);
	if ((error = i2c_add_adapter(&ali1563_adapter)))
		goto exit_shutdown;
	return 0;

exit_shutdown:
	ali1563_shutdown(dev);
exit:
	dev_warn(&dev->dev, "ALi1563 SMBus probe failed (%d)\n", error);
	return error;
}

static void __devexit ali1563_remove(struct pci_dev * dev)
{
	i2c_del_adapter(&ali1563_adapter);
	ali1563_shutdown(dev);
}

static struct pci_device_id __devinitdata ali1563_id_table[] = {
	{ PCI_DEVICE(PCI_VENDOR_ID_AL, PCI_DEVICE_ID_AL_M1563) },
	{},
};

MODULE_DEVICE_TABLE (pci, ali1563_id_table);

static struct pci_driver ali1563_pci_driver = {
 	.name		= "ali1563_smbus",
	.id_table	= ali1563_id_table,
 	.probe		= ali1563_probe,
	.remove		= __devexit_p(ali1563_remove),
};

static int __init ali1563_init(void)
{
	return pci_register_driver(&ali1563_pci_driver);
}

module_init(ali1563_init);

static void __exit ali1563_exit(void)
{
	pci_unregister_driver(&ali1563_pci_driver);
}

module_exit(ali1563_exit);

MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4 LT	1	/**
	2	* i2c-ali1563.c - i2c driver for the ALi 1563 Southbridge
	3	*
	4	* Copyright (C) 2004 Patrick Mochel
7188cc66	5	* 2005 Rudolf Marek <r.marek@assembler.cz>
1da177e4 LT	6	*
	7	* The 1563 southbridge is deceptively similar to the 1533, with a
	8	* few notable exceptions. One of those happens to be the fact they
	9	* upgraded the i2c core to be 2.0 compliant, and happens to be almost
	10	* identical to the i2c controller found in the Intel 801 south
	11	* bridges.
	12	*
	13	* This driver is based on a mix of the 15x3, 1535, and i801 drivers,
	14	* with a little help from the ALi 1563 spec.
	15	*
	16	* This file is released under the GPLv2
	17	*/
	18
	19	#include <linux/module.h>
	20	#include <linux/delay.h>
	21	#include <linux/i2c.h>
	22	#include <linux/pci.h>
	23	#include <linux/init.h>
54fb4a05	24	#include <linux/acpi.h>
1da177e4 LT	25
	26	#define ALI1563_MAX_TIMEOUT 500
	27	#define ALI1563_SMBBA 0x80
	28	#define ALI1563_SMB_IOEN 1
	29	#define ALI1563_SMB_HOSTEN 2
	30	#define ALI1563_SMB_IOSIZE 16
	31
	32	#define SMB_HST_STS (ali1563_smba + 0)
	33	#define SMB_HST_CNTL1 (ali1563_smba + 1)
	34	#define SMB_HST_CNTL2 (ali1563_smba + 2)
	35	#define SMB_HST_CMD (ali1563_smba + 3)
	36	#define SMB_HST_ADD (ali1563_smba + 4)
	37	#define SMB_HST_DAT0 (ali1563_smba + 5)
	38	#define SMB_HST_DAT1 (ali1563_smba + 6)
	39	#define SMB_BLK_DAT (ali1563_smba + 7)
	40
	41	#define HST_STS_BUSY 0x01
	42	#define HST_STS_INTR 0x02
	43	#define HST_STS_DEVERR 0x04
	44	#define HST_STS_BUSERR 0x08
	45	#define HST_STS_FAIL 0x10
	46	#define HST_STS_DONE 0x80
	47	#define HST_STS_BAD 0x1c
	48
	49
	50	#define HST_CNTL1_TIMEOUT 0x80
	51	#define HST_CNTL1_LAST 0x40
	52
	53	#define HST_CNTL2_KILL 0x04
	54	#define HST_CNTL2_START 0x40
	55	#define HST_CNTL2_QUICK 0x00
	56	#define HST_CNTL2_BYTE 0x01
	57	#define HST_CNTL2_BYTE_DATA 0x02
	58	#define HST_CNTL2_WORD_DATA 0x03
	59	#define HST_CNTL2_BLOCK 0x05
	60
	61
4a4e5787	62	#define HST_CNTL2_SIZEMASK 0x38
1da177e4	63
d6072f84	64	static struct pci_driver ali1563_pci_driver;
1da177e4 LT	65	static unsigned short ali1563_smba;
1da177e4 LT	66
4a4e5787	67	static int ali1563_transaction(struct i2c_adapter * a, int size)
1da177e4 LT	68	{
	69	u32 data;
	70	int timeout;
97140342	71	int status = -EIO;
1da177e4 LT	72
	73	dev_dbg(&a->dev, "Transaction (pre): STS=%02x, CNTL1=%02x, "
	74	"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
	75	inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
	76	inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
	77	inb_p(SMB_HST_DAT1));
	78
	79	data = inb_p(SMB_HST_STS);
	80	if (data & HST_STS_BAD) {
4a4e5787	81	dev_err(&a->dev, "ali1563: Trying to reset busy device\n");
1da177e4 LT	82	outb_p(data \| HST_STS_BAD,SMB_HST_STS);
	83	data = inb_p(SMB_HST_STS);
	84	if (data & HST_STS_BAD)
	85	return -EBUSY;
	86	}
	87	outb_p(inb_p(SMB_HST_CNTL2) \| HST_CNTL2_START, SMB_HST_CNTL2);
	88
	89	timeout = ALI1563_MAX_TIMEOUT;
7d53e79f	90	do {
1da177e4	91	msleep(1);
7d53e79f	92	} while (((data = inb_p(SMB_HST_STS)) & HST_STS_BUSY) && --timeout);
1da177e4 LT	93
	94	dev_dbg(&a->dev, "Transaction (post): STS=%02x, CNTL1=%02x, "
	95	"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
	96	inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
	97	inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
	98	inb_p(SMB_HST_DAT1));
	99
	100	if (timeout && !(data & HST_STS_BAD))
	101	return 0;
1da177e4	102
4a4e5787 RM	103	if (!timeout) {
4a4e5787 RM	104	dev_err(&a->dev, "Timeout - Trying to KILL transaction!\n");
1da177e4 LT	105	/* Issue 'kill' to host controller */
1da177e4 LT	106	outb_p(HST_CNTL2_KILL,SMB_HST_CNTL2);
4a4e5787	107	data = inb_p(SMB_HST_STS);
97140342	108	status = -ETIMEDOUT;
4a4e5787 RM	109	}
	110
	111	/* device error - no response, ignore the autodetection case */
97140342 DB	112	if (data & HST_STS_DEVERR) {
	113	if (size != HST_CNTL2_QUICK)
	114	dev_err(&a->dev, "Device error!\n");
	115	status = -ENXIO;
4a4e5787	116	}
4a4e5787 RM	117	/* bus collision */
	118	if (data & HST_STS_BUSERR) {
	119	dev_err(&a->dev, "Bus collision!\n");
	120	/* Issue timeout, hoping it helps */
1da177e4	121	outb_p(HST_CNTL1_TIMEOUT,SMB_HST_CNTL1);
4a4e5787 RM	122	}
	123
	124	if (data & HST_STS_FAIL) {
	125	dev_err(&a->dev, "Cleaning fail after KILL!\n");
	126	outb_p(0x0,SMB_HST_CNTL2);
	127	}
	128
97140342	129	return status;
1da177e4 LT	130	}
	131
	132	static int ali1563_block_start(struct i2c_adapter * a)
	133	{
	134	u32 data;
	135	int timeout;
97140342	136	int status = -EIO;
1da177e4 LT	137
	138	dev_dbg(&a->dev, "Block (pre): STS=%02x, CNTL1=%02x, "
	139	"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
	140	inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
	141	inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
	142	inb_p(SMB_HST_DAT1));
	143
	144	data = inb_p(SMB_HST_STS);
	145	if (data & HST_STS_BAD) {
	146	dev_warn(&a->dev,"ali1563: Trying to reset busy device\n");
	147	outb_p(data \| HST_STS_BAD,SMB_HST_STS);
	148	data = inb_p(SMB_HST_STS);
	149	if (data & HST_STS_BAD)
	150	return -EBUSY;
	151	}
	152
	153	/* Clear byte-ready bit */
	154	outb_p(data \| HST_STS_DONE, SMB_HST_STS);
	155
	156	/* Start transaction and wait for byte-ready bit to be set */
	157	outb_p(inb_p(SMB_HST_CNTL2) \| HST_CNTL2_START, SMB_HST_CNTL2);
	158
	159	timeout = ALI1563_MAX_TIMEOUT;
7d53e79f	160	do {
1da177e4	161	msleep(1);
7d53e79f	162	} while (!((data = inb_p(SMB_HST_STS)) & HST_STS_DONE) && --timeout);
1da177e4 LT	163
	164	dev_dbg(&a->dev, "Block (post): STS=%02x, CNTL1=%02x, "
	165	"CNTL2=%02x, CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
	166	inb_p(SMB_HST_STS), inb_p(SMB_HST_CNTL1), inb_p(SMB_HST_CNTL2),
	167	inb_p(SMB_HST_CMD), inb_p(SMB_HST_ADD), inb_p(SMB_HST_DAT0),
	168	inb_p(SMB_HST_DAT1));
	169
	170	if (timeout && !(data & HST_STS_BAD))
	171	return 0;
97140342 DB	172
	173	if (timeout == 0)
	174	status = -ETIMEDOUT;
	175
	176	if (data & HST_STS_DEVERR)
	177	status = -ENXIO;
	178
4a4e5787	179	dev_err(&a->dev, "SMBus Error: %s%s%s%s%s\n",
97140342	180	timeout ? "" : "Timeout ",
1da177e4 LT	181	data & HST_STS_FAIL ? "Transaction Failed " : "",
	182	data & HST_STS_BUSERR ? "No response or Bus Collision " : "",
	183	data & HST_STS_DEVERR ? "Device Error " : "",
	184	!(data & HST_STS_DONE) ? "Transaction Never Finished " : "");
97140342	185	return status;
1da177e4 LT	186	}
	187
	188	static int ali1563_block(struct i2c_adapter * a, union i2c_smbus_data * data, u8 rw)
	189	{
	190	int i, len;
	191	int error = 0;
	192
	193	/* Do we need this? */
	194	outb_p(HST_CNTL1_LAST,SMB_HST_CNTL1);
	195
	196	if (rw == I2C_SMBUS_WRITE) {
	197	len = data->block[0];
	198	if (len < 1)
	199	len = 1;
	200	else if (len > 32)
	201	len = 32;
	202	outb_p(len,SMB_HST_DAT0);
	203	outb_p(data->block[1],SMB_BLK_DAT);
	204	} else
	205	len = 32;
	206
	207	outb_p(inb_p(SMB_HST_CNTL2) \| HST_CNTL2_BLOCK, SMB_HST_CNTL2);
	208
	209	for (i = 0; i < len; i++) {
	210	if (rw == I2C_SMBUS_WRITE) {
	211	outb_p(data->block[i + 1], SMB_BLK_DAT);
	212	if ((error = ali1563_block_start(a)))
	213	break;
	214	} else {
	215	if ((error = ali1563_block_start(a)))
	216	break;
	217	if (i == 0) {
	218	len = inb_p(SMB_HST_DAT0);
	219	if (len < 1)
	220	len = 1;
	221	else if (len > 32)
	222	len = 32;
	223	}
	224	data->block[i+1] = inb_p(SMB_BLK_DAT);
	225	}
	226	}
	227	/* Do we need this? */
	228	outb_p(HST_CNTL1_LAST,SMB_HST_CNTL1);
	229	return error;
	230	}
	231
	232	static s32 ali1563_access(struct i2c_adapter * a, u16 addr,
	233	unsigned short flags, char rw, u8 cmd,
	234	int size, union i2c_smbus_data * data)
	235	{
	236	int error = 0;
	237	int timeout;
	238	u32 reg;
	239
	240	for (timeout = ALI1563_MAX_TIMEOUT; timeout; timeout--) {
	241	if (!(reg = inb_p(SMB_HST_STS) & HST_STS_BUSY))
	242	break;
	243	}
	244	if (!timeout)
	245	dev_warn(&a->dev,"SMBus not idle. HST_STS = %02x\n",reg);
	246	outb_p(0xff,SMB_HST_STS);
	247
	248	/* Map the size to what the chip understands */
	249	switch (size) {
1da177e4 LT	250	case I2C_SMBUS_QUICK:
	251	size = HST_CNTL2_QUICK;
	252	break;
	253	case I2C_SMBUS_BYTE:
	254	size = HST_CNTL2_BYTE;
	255	break;
	256	case I2C_SMBUS_BYTE_DATA:
	257	size = HST_CNTL2_BYTE_DATA;
	258	break;
	259	case I2C_SMBUS_WORD_DATA:
	260	size = HST_CNTL2_WORD_DATA;
	261	break;
	262	case I2C_SMBUS_BLOCK_DATA:
	263	size = HST_CNTL2_BLOCK;
	264	break;
ac7fc4fb JD	265	default:
	266	dev_warn(&a->dev, "Unsupported transaction %d\n", size);
	267	error = -EOPNOTSUPP;
	268	goto Done;
1da177e4 LT	269	}
	270
	271	outb_p(((addr & 0x7f) << 1) \| (rw & 0x01), SMB_HST_ADD);
4a4e5787	272	outb_p((inb_p(SMB_HST_CNTL2) & ~HST_CNTL2_SIZEMASK) \| (size << 3), SMB_HST_CNTL2);
1da177e4 LT	273
1da177e4 LT	274	/* Write the command register */
4a4e5787	275
1da177e4 LT	276	switch(size) {
	277	case HST_CNTL2_BYTE:
	278	if (rw== I2C_SMBUS_WRITE)
4a4e5787 RM	279	/* Beware it uses DAT0 register and not CMD! */
4a4e5787 RM	280	outb_p(cmd, SMB_HST_DAT0);
1da177e4 LT	281	break;
	282	case HST_CNTL2_BYTE_DATA:
	283	outb_p(cmd, SMB_HST_CMD);
	284	if (rw == I2C_SMBUS_WRITE)
	285	outb_p(data->byte, SMB_HST_DAT0);
	286	break;
	287	case HST_CNTL2_WORD_DATA:
	288	outb_p(cmd, SMB_HST_CMD);
	289	if (rw == I2C_SMBUS_WRITE) {
	290	outb_p(data->word & 0xff, SMB_HST_DAT0);
	291	outb_p((data->word & 0xff00) >> 8, SMB_HST_DAT1);
	292	}
	293	break;
	294	case HST_CNTL2_BLOCK:
	295	outb_p(cmd, SMB_HST_CMD);
	296	error = ali1563_block(a,data,rw);
	297	goto Done;
	298	}
	299
4a4e5787	300	if ((error = ali1563_transaction(a, size)))
1da177e4 LT	301	goto Done;
	302
	303	if ((rw == I2C_SMBUS_WRITE) \|\| (size == HST_CNTL2_QUICK))
	304	goto Done;
	305
	306	switch (size) {
	307	case HST_CNTL2_BYTE: /* Result put in SMBHSTDAT0 */
	308	data->byte = inb_p(SMB_HST_DAT0);
	309	break;
	310	case HST_CNTL2_BYTE_DATA:
	311	data->byte = inb_p(SMB_HST_DAT0);
	312	break;
	313	case HST_CNTL2_WORD_DATA:
	314	data->word = inb_p(SMB_HST_DAT0) + (inb_p(SMB_HST_DAT1) << 8);
	315	break;
	316	}
	317	Done:
	318	return error;
	319	}
	320
	321	static u32 ali1563_func(struct i2c_adapter * a)
	322	{
	323	return I2C_FUNC_SMBUS_QUICK \| I2C_FUNC_SMBUS_BYTE \|
	324	I2C_FUNC_SMBUS_BYTE_DATA \| I2C_FUNC_SMBUS_WORD_DATA \|
	325	I2C_FUNC_SMBUS_BLOCK_DATA;
	326	}
	327
	328
1da177e4 LT	329	static int __devinit ali1563_setup(struct pci_dev * dev)
	330	{
	331	u16 ctrl;
	332
	333	pci_read_config_word(dev,ALI1563_SMBBA,&ctrl);
1da177e4	334
1da177e4 LT	335	/* SMB I/O Base in high 12 bits and must be aligned with the
	336	* size of the I/O space. */
	337	ali1563_smba = ctrl & ~(ALI1563_SMB_IOSIZE - 1);
	338	if (!ali1563_smba) {
	339	dev_warn(&dev->dev,"ali1563_smba Uninitialized\n");
	340	goto Err;
	341	}
849be516 JD	342
	343	/* Check if device is enabled */
	344	if (!(ctrl & ALI1563_SMB_HOSTEN)) {
	345	dev_warn(&dev->dev, "Host Controller not enabled\n");
	346	goto Err;
	347	}
	348	if (!(ctrl & ALI1563_SMB_IOEN)) {
	349	dev_warn(&dev->dev, "I/O space not enabled, trying manually\n");
	350	pci_write_config_word(dev, ALI1563_SMBBA,
	351	ctrl \| ALI1563_SMB_IOEN);
	352	pci_read_config_word(dev, ALI1563_SMBBA, &ctrl);
	353	if (!(ctrl & ALI1563_SMB_IOEN)) {
	354	dev_err(&dev->dev, "I/O space still not enabled, "
	355	"giving up\n");
	356	goto Err;
	357	}
	358	}
	359
54fb4a05 JD	360	if (acpi_check_region(ali1563_smba, ALI1563_SMB_IOSIZE,
	361	ali1563_pci_driver.name))
	362	goto Err;
	363
d6072f84 JD	364	if (!request_region(ali1563_smba, ALI1563_SMB_IOSIZE,
d6072f84 JD	365	ali1563_pci_driver.name)) {
69735698 JD	366	dev_err(&dev->dev, "Could not allocate I/O space at 0x%04x\n",
69735698 JD	367	ali1563_smba);
1da177e4 LT	368	goto Err;
1da177e4 LT	369	}
69735698	370	dev_info(&dev->dev, "Found ALi1563 SMBus at 0x%04x\n", ali1563_smba);
1da177e4 LT	371
	372	return 0;
	373	Err:
	374	return -ENODEV;
	375	}
	376
	377	static void ali1563_shutdown(struct pci_dev *dev)
	378	{
	379	release_region(ali1563_smba,ALI1563_SMB_IOSIZE);
	380	}
	381
8f9082c5	382	static const struct i2c_algorithm ali1563_algorithm = {
1da177e4 LT	383	.smbus_xfer = ali1563_access,
	384	.functionality = ali1563_func,
	385	};
	386
	387	static struct i2c_adapter ali1563_adapter = {
	388	.owner = THIS_MODULE,
3401b2ff	389	.class = I2C_CLASS_HWMON \| I2C_CLASS_SPD,
1da177e4 LT	390	.algo = &ali1563_algorithm,
	391	};
	392
	393	static int __devinit ali1563_probe(struct pci_dev * dev,
	394	const struct pci_device_id * id_table)
	395	{
	396	int error;
	397
	398	if ((error = ali1563_setup(dev)))
69735698	399	goto exit;
1da177e4	400	ali1563_adapter.dev.parent = &dev->dev;
66c7acf6 JD	401	snprintf(ali1563_adapter.name, sizeof(ali1563_adapter.name),
66c7acf6 JD	402	"SMBus ALi 1563 Adapter @ %04x", ali1563_smba);
1da177e4	403	if ((error = i2c_add_adapter(&ali1563_adapter)))
69735698 JD	404	goto exit_shutdown;
	405	return 0;
	406
	407	exit_shutdown:
	408	ali1563_shutdown(dev);
	409	exit:
	410	dev_warn(&dev->dev, "ALi1563 SMBus probe failed (%d)\n", error);
1da177e4 LT	411	return error;
	412	}
	413
	414	static void __devexit ali1563_remove(struct pci_dev * dev)
	415	{
	416	i2c_del_adapter(&ali1563_adapter);
	417	ali1563_shutdown(dev);
	418	}
	419
	420	static struct pci_device_id __devinitdata ali1563_id_table[] = {
	421	{ PCI_DEVICE(PCI_VENDOR_ID_AL, PCI_DEVICE_ID_AL_M1563) },
	422	{},
	423	};
	424
	425	MODULE_DEVICE_TABLE (pci, ali1563_id_table);
	426
	427	static struct pci_driver ali1563_pci_driver = {
d6072f84	428	.name = "ali1563_smbus",
1da177e4 LT	429	.id_table = ali1563_id_table,
	430	.probe = ali1563_probe,
	431	.remove = __devexit_p(ali1563_remove),
	432	};
	433
	434	static int __init ali1563_init(void)
	435	{
	436	return pci_register_driver(&ali1563_pci_driver);
	437	}
	438
	439	module_init(ali1563_init);
	440
	441	static void __exit ali1563_exit(void)
	442	{
	443	pci_unregister_driver(&ali1563_pci_driver);
	444	}
	445
	446	module_exit(ali1563_exit);
	447
	448	MODULE_LICENSE("GPL");