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