Merge branch 'i2c-for-linus' of git://jdelvare.pck.nerim.net/jdelvare-2.6
[linux-2.6] / drivers / i2c / busses / i2c-ali1535.c
1 /*
2     i2c-ali1535.c - Part of lm_sensors, Linux kernel modules for hardware
3                     monitoring
4     Copyright (c) 2000  Frodo Looijaard <frodol@dds.nl>, 
5                         Philip Edelbrock <phil@netroedge.com>, 
6                         Mark D. Studebaker <mdsxyz123@yahoo.com>,
7                         Dan Eaton <dan.eaton@rocketlogix.com> and 
8                         Stephen Rousset<stephen.rousset@rocketlogix.com> 
9
10     This program is free software; you can redistribute it and/or modify
11     it under the terms of the GNU General Public License as published by
12     the Free Software Foundation; either version 2 of the License, or
13     (at your option) any later version.
14
15     This program is distributed in the hope that it will be useful,
16     but WITHOUT ANY WARRANTY; without even the implied warranty of
17     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18     GNU General Public License for more details.
19
20     You should have received a copy of the GNU General Public License
21     along with this program; if not, write to the Free Software
22     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 */
24
25 /*
26     This is the driver for the SMB Host controller on
27     Acer Labs Inc. (ALI) M1535 South Bridge.
28
29     The M1535 is a South bridge for portable systems.
30     It is very similar to the M15x3 South bridges also produced
31     by Acer Labs Inc.  Some of the registers within the part
32     have moved and some have been redefined slightly. Additionally,
33     the sequencing of the SMBus transactions has been modified
34     to be more consistent with the sequencing recommended by
35     the manufacturer and observed through testing.  These
36     changes are reflected in this driver and can be identified
37     by comparing this driver to the i2c-ali15x3 driver.
38     For an overview of these chips see http://www.acerlabs.com
39
40     The SMB controller is part of the 7101 device, which is an
41     ACPI-compliant Power Management Unit (PMU).
42
43     The whole 7101 device has to be enabled for the SMB to work.
44     You can't just enable the SMB alone.
45     The SMB and the ACPI have separate I/O spaces.
46     We make sure that the SMB is enabled. We leave the ACPI alone.
47
48     This driver controls the SMB Host only.
49
50     This driver does not use interrupts.
51 */
52
53
54 /* Note: we assume there can only be one ALI1535, with one SMBus interface */
55
56 #include <linux/module.h>
57 #include <linux/pci.h>
58 #include <linux/kernel.h>
59 #include <linux/stddef.h>
60 #include <linux/delay.h>
61 #include <linux/ioport.h>
62 #include <linux/i2c.h>
63 #include <linux/init.h>
64 #include <asm/io.h>
65
66
67 /* ALI1535 SMBus address offsets */
68 #define SMBHSTSTS       (0 + ali1535_smba)
69 #define SMBHSTTYP       (1 + ali1535_smba)
70 #define SMBHSTPORT      (2 + ali1535_smba)
71 #define SMBHSTCMD       (7 + ali1535_smba)
72 #define SMBHSTADD       (3 + ali1535_smba)
73 #define SMBHSTDAT0      (4 + ali1535_smba)
74 #define SMBHSTDAT1      (5 + ali1535_smba)
75 #define SMBBLKDAT       (6 + ali1535_smba)
76
77 /* PCI Address Constants */
78 #define SMBCOM          0x004
79 #define SMBREV          0x008
80 #define SMBCFG          0x0D1
81 #define SMBBA           0x0E2
82 #define SMBHSTCFG       0x0F0
83 #define SMBCLK          0x0F2
84
85 /* Other settings */
86 #define MAX_TIMEOUT             500     /* times 1/100 sec */
87 #define ALI1535_SMB_IOSIZE      32
88
89 #define ALI1535_SMB_DEFAULTBASE 0x8040
90
91 /* ALI1535 address lock bits */
92 #define ALI1535_LOCK            0x06    /* dwe */
93
94 /* ALI1535 command constants */
95 #define ALI1535_QUICK           0x00
96 #define ALI1535_BYTE            0x10
97 #define ALI1535_BYTE_DATA       0x20
98 #define ALI1535_WORD_DATA       0x30
99 #define ALI1535_BLOCK_DATA      0x40
100 #define ALI1535_I2C_READ        0x60
101
102 #define ALI1535_DEV10B_EN       0x80    /* Enable 10-bit addressing in  */
103                                         /*  I2C read                    */
104 #define ALI1535_T_OUT           0x08    /* Time-out Command (write)     */
105 #define ALI1535_A_HIGH_BIT9     0x08    /* Bit 9 of 10-bit address in   */
106                                         /* Alert-Response-Address       */
107                                         /* (read)                       */
108 #define ALI1535_KILL            0x04    /* Kill Command (write)         */
109 #define ALI1535_A_HIGH_BIT8     0x04    /* Bit 8 of 10-bit address in   */
110                                         /*  Alert-Response-Address      */
111                                         /*  (read)                      */
112
113 #define ALI1535_D_HI_MASK       0x03    /* Mask for isolating bits 9-8  */
114                                         /*  of 10-bit address in I2C    */
115                                         /*  Read Command                */
116
117 /* ALI1535 status register bits */
118 #define ALI1535_STS_IDLE        0x04
119 #define ALI1535_STS_BUSY        0x08    /* host busy */
120 #define ALI1535_STS_DONE        0x10    /* transaction complete */
121 #define ALI1535_STS_DEV         0x20    /* device error */
122 #define ALI1535_STS_BUSERR      0x40    /* bus error    */
123 #define ALI1535_STS_FAIL        0x80    /* failed bus transaction */
124 #define ALI1535_STS_ERR         0xE0    /* all the bad error bits */
125
126 #define ALI1535_BLOCK_CLR       0x04    /* reset block data index */
127
128 /* ALI1535 device address register bits */
129 #define ALI1535_RD_ADDR         0x01    /* Read/Write Bit in Device     */
130                                         /*  Address field               */
131                                         /*  -> Write = 0                */
132                                         /*  -> Read  = 1                */
133 #define ALI1535_SMBIO_EN        0x04    /* SMB I/O Space enable         */
134
135 static struct pci_driver ali1535_driver;
136 static unsigned short ali1535_smba;
137
138 /* Detect whether a ALI1535 can be found, and initialize it, where necessary.
139    Note the differences between kernels with the old PCI BIOS interface and
140    newer kernels with the real PCI interface. In compat.h some things are
141    defined to make the transition easier. */
142 static int ali1535_setup(struct pci_dev *dev)
143 {
144         int retval = -ENODEV;
145         unsigned char temp;
146
147         /* Check the following things:
148                 - SMB I/O address is initialized
149                 - Device is enabled
150                 - We can use the addresses
151         */
152
153         /* Determine the address of the SMBus area */
154         pci_read_config_word(dev, SMBBA, &ali1535_smba);
155         ali1535_smba &= (0xffff & ~(ALI1535_SMB_IOSIZE - 1));
156         if (ali1535_smba == 0) {
157                 dev_warn(&dev->dev,
158                         "ALI1535_smb region uninitialized - upgrade BIOS?\n");
159                 goto exit;
160         }
161
162         if (!request_region(ali1535_smba, ALI1535_SMB_IOSIZE,
163                             ali1535_driver.name)) {
164                 dev_err(&dev->dev, "ALI1535_smb region 0x%x already in use!\n",
165                         ali1535_smba);
166                 goto exit;
167         }
168
169         /* check if whole device is enabled */
170         pci_read_config_byte(dev, SMBCFG, &temp);
171         if ((temp & ALI1535_SMBIO_EN) == 0) {
172                 dev_err(&dev->dev, "SMB device not enabled - upgrade BIOS?\n");
173                 goto exit_free;
174         }
175
176         /* Is SMB Host controller enabled? */
177         pci_read_config_byte(dev, SMBHSTCFG, &temp);
178         if ((temp & 1) == 0) {
179                 dev_err(&dev->dev, "SMBus controller not enabled - upgrade BIOS?\n");
180                 goto exit_free;
181         }
182
183         /* set SMB clock to 74KHz as recommended in data sheet */
184         pci_write_config_byte(dev, SMBCLK, 0x20);
185
186         /*
187           The interrupt routing for SMB is set up in register 0x77 in the
188           1533 ISA Bridge device, NOT in the 7101 device.
189           Don't bother with finding the 1533 device and reading the register.
190         if ((....... & 0x0F) == 1)
191                 dev_dbg(&dev->dev, "ALI1535 using Interrupt 9 for SMBus.\n");
192         */
193         pci_read_config_byte(dev, SMBREV, &temp);
194         dev_dbg(&dev->dev, "SMBREV = 0x%X\n", temp);
195         dev_dbg(&dev->dev, "ALI1535_smba = 0x%X\n", ali1535_smba);
196
197         retval = 0;
198 exit:
199         return retval;
200
201 exit_free:
202         release_region(ali1535_smba, ALI1535_SMB_IOSIZE);
203         return retval;
204 }
205
206 static int ali1535_transaction(struct i2c_adapter *adap)
207 {
208         int temp;
209         int result = 0;
210         int timeout = 0;
211
212         dev_dbg(&adap->dev, "Transaction (pre): STS=%02x, TYP=%02x, "
213                 "CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
214                 inb_p(SMBHSTSTS), inb_p(SMBHSTTYP), inb_p(SMBHSTCMD),
215                 inb_p(SMBHSTADD), inb_p(SMBHSTDAT0), inb_p(SMBHSTDAT1));
216
217         /* get status */
218         temp = inb_p(SMBHSTSTS);
219
220         /* Make sure the SMBus host is ready to start transmitting */
221         /* Check the busy bit first */
222         if (temp & ALI1535_STS_BUSY) {
223                 /* If the host controller is still busy, it may have timed out
224                  * in the previous transaction, resulting in a "SMBus Timeout"
225                  * printk.  I've tried the following to reset a stuck busy bit.
226                  *   1. Reset the controller with an KILL command. (this
227                  *      doesn't seem to clear the controller if an external
228                  *      device is hung)
229                  *   2. Reset the controller and the other SMBus devices with a
230                  *      T_OUT command. (this clears the host busy bit if an
231                  *      external device is hung, but it comes back upon a new
232                  *      access to a device)
233                  *   3. Disable and reenable the controller in SMBHSTCFG. Worst
234                  *      case, nothing seems to work except power reset.
235                  */
236
237                 /* Try resetting entire SMB bus, including other devices - This
238                  * may not work either - it clears the BUSY bit but then the
239                  * BUSY bit may come back on when you try and use the chip
240                  * again.  If that's the case you are stuck.
241                  */
242                 dev_info(&adap->dev,
243                         "Resetting entire SMB Bus to clear busy condition (%02x)\n",
244                         temp);
245                 outb_p(ALI1535_T_OUT, SMBHSTTYP);
246                 temp = inb_p(SMBHSTSTS);
247         }
248
249         /* now check the error bits and the busy bit */
250         if (temp & (ALI1535_STS_ERR | ALI1535_STS_BUSY)) {
251                 /* do a clear-on-write */
252                 outb_p(0xFF, SMBHSTSTS);
253                 if ((temp = inb_p(SMBHSTSTS)) &
254                     (ALI1535_STS_ERR | ALI1535_STS_BUSY)) {
255                         /* This is probably going to be correctable only by a
256                          * power reset as one of the bits now appears to be
257                          * stuck */
258                         /* This may be a bus or device with electrical problems. */
259                         dev_err(&adap->dev,
260                                 "SMBus reset failed! (0x%02x) - controller or "
261                                 "device on bus is probably hung\n", temp);
262                         return -1;
263                 }
264         } else {
265                 /* check and clear done bit */
266                 if (temp & ALI1535_STS_DONE) {
267                         outb_p(temp, SMBHSTSTS);
268                 }
269         }
270
271         /* start the transaction by writing anything to the start register */
272         outb_p(0xFF, SMBHSTPORT);
273
274         /* We will always wait for a fraction of a second! */
275         timeout = 0;
276         do {
277                 msleep(1);
278                 temp = inb_p(SMBHSTSTS);
279         } while (((temp & ALI1535_STS_BUSY) && !(temp & ALI1535_STS_IDLE))
280                  && (timeout++ < MAX_TIMEOUT));
281
282         /* If the SMBus is still busy, we give up */
283         if (timeout >= MAX_TIMEOUT) {
284                 result = -1;
285                 dev_err(&adap->dev, "SMBus Timeout!\n");
286         }
287
288         if (temp & ALI1535_STS_FAIL) {
289                 result = -1;
290                 dev_dbg(&adap->dev, "Error: Failed bus transaction\n");
291         }
292
293         /* Unfortunately the ALI SMB controller maps "no response" and "bus
294          * collision" into a single bit. No reponse is the usual case so don't
295          * do a printk.  This means that bus collisions go unreported.
296          */
297         if (temp & ALI1535_STS_BUSERR) {
298                 result = -1;
299                 dev_dbg(&adap->dev,
300                         "Error: no response or bus collision ADD=%02x\n",
301                         inb_p(SMBHSTADD));
302         }
303
304         /* haven't ever seen this */
305         if (temp & ALI1535_STS_DEV) {
306                 result = -1;
307                 dev_err(&adap->dev, "Error: device error\n");
308         }
309
310         /* check to see if the "command complete" indication is set */
311         if (!(temp & ALI1535_STS_DONE)) {
312                 result = -1;
313                 dev_err(&adap->dev, "Error: command never completed\n");
314         }
315
316         dev_dbg(&adap->dev, "Transaction (post): STS=%02x, TYP=%02x, "
317                 "CMD=%02x, ADD=%02x, DAT0=%02x, DAT1=%02x\n",
318                 inb_p(SMBHSTSTS), inb_p(SMBHSTTYP), inb_p(SMBHSTCMD),
319                 inb_p(SMBHSTADD), inb_p(SMBHSTDAT0), inb_p(SMBHSTDAT1));
320
321         /* take consequent actions for error conditions */
322         if (!(temp & ALI1535_STS_DONE)) {
323                 /* issue "kill" to reset host controller */
324                 outb_p(ALI1535_KILL,SMBHSTTYP);
325                 outb_p(0xFF,SMBHSTSTS);
326         } else if (temp & ALI1535_STS_ERR) {
327                 /* issue "timeout" to reset all devices on bus */
328                 outb_p(ALI1535_T_OUT,SMBHSTTYP);
329                 outb_p(0xFF,SMBHSTSTS);
330         }
331
332         return result;
333 }
334
335 /* Return -1 on error. */
336 static s32 ali1535_access(struct i2c_adapter *adap, u16 addr,
337                           unsigned short flags, char read_write, u8 command,
338                           int size, union i2c_smbus_data *data)
339 {
340         int i, len;
341         int temp;
342         int timeout;
343         s32 result = 0;
344
345         /* make sure SMBus is idle */
346         temp = inb_p(SMBHSTSTS);
347         for (timeout = 0;
348              (timeout < MAX_TIMEOUT) && !(temp & ALI1535_STS_IDLE);
349              timeout++) {
350                 msleep(1);
351                 temp = inb_p(SMBHSTSTS);
352         }
353         if (timeout >= MAX_TIMEOUT)
354                 dev_warn(&adap->dev, "Idle wait Timeout! STS=0x%02x\n", temp);
355
356         /* clear status register (clear-on-write) */
357         outb_p(0xFF, SMBHSTSTS);
358
359         switch (size) {
360         case I2C_SMBUS_PROC_CALL:
361                 dev_err(&adap->dev, "I2C_SMBUS_PROC_CALL not supported!\n");
362                 result = -1;
363                 goto EXIT;
364         case I2C_SMBUS_QUICK:
365                 outb_p(((addr & 0x7f) << 1) | (read_write & 0x01),
366                        SMBHSTADD);
367                 size = ALI1535_QUICK;
368                 outb_p(size, SMBHSTTYP);        /* output command */
369                 break;
370         case I2C_SMBUS_BYTE:
371                 outb_p(((addr & 0x7f) << 1) | (read_write & 0x01),
372                        SMBHSTADD);
373                 size = ALI1535_BYTE;
374                 outb_p(size, SMBHSTTYP);        /* output command */
375                 if (read_write == I2C_SMBUS_WRITE)
376                         outb_p(command, SMBHSTCMD);
377                 break;
378         case I2C_SMBUS_BYTE_DATA:
379                 outb_p(((addr & 0x7f) << 1) | (read_write & 0x01),
380                        SMBHSTADD);
381                 size = ALI1535_BYTE_DATA;
382                 outb_p(size, SMBHSTTYP);        /* output command */
383                 outb_p(command, SMBHSTCMD);
384                 if (read_write == I2C_SMBUS_WRITE)
385                         outb_p(data->byte, SMBHSTDAT0);
386                 break;
387         case I2C_SMBUS_WORD_DATA:
388                 outb_p(((addr & 0x7f) << 1) | (read_write & 0x01),
389                        SMBHSTADD);
390                 size = ALI1535_WORD_DATA;
391                 outb_p(size, SMBHSTTYP);        /* output command */
392                 outb_p(command, SMBHSTCMD);
393                 if (read_write == I2C_SMBUS_WRITE) {
394                         outb_p(data->word & 0xff, SMBHSTDAT0);
395                         outb_p((data->word & 0xff00) >> 8, SMBHSTDAT1);
396                 }
397                 break;
398         case I2C_SMBUS_BLOCK_DATA:
399                 outb_p(((addr & 0x7f) << 1) | (read_write & 0x01),
400                        SMBHSTADD);
401                 size = ALI1535_BLOCK_DATA;
402                 outb_p(size, SMBHSTTYP);        /* output command */
403                 outb_p(command, SMBHSTCMD);
404                 if (read_write == I2C_SMBUS_WRITE) {
405                         len = data->block[0];
406                         if (len < 0) {
407                                 len = 0;
408                                 data->block[0] = len;
409                         }
410                         if (len > 32) {
411                                 len = 32;
412                                 data->block[0] = len;
413                         }
414                         outb_p(len, SMBHSTDAT0);
415                         /* Reset SMBBLKDAT */
416                         outb_p(inb_p(SMBHSTTYP) | ALI1535_BLOCK_CLR, SMBHSTTYP);
417                         for (i = 1; i <= len; i++)
418                                 outb_p(data->block[i], SMBBLKDAT);
419                 }
420                 break;
421         }
422
423         if (ali1535_transaction(adap)) {
424                 /* Error in transaction */
425                 result = -1;
426                 goto EXIT;
427         }
428
429         if ((read_write == I2C_SMBUS_WRITE) || (size == ALI1535_QUICK)) {
430                 result = 0;
431                 goto EXIT;
432         }
433
434         switch (size) {
435         case ALI1535_BYTE:      /* Result put in SMBHSTDAT0 */
436                 data->byte = inb_p(SMBHSTDAT0);
437                 break;
438         case ALI1535_BYTE_DATA:
439                 data->byte = inb_p(SMBHSTDAT0);
440                 break;
441         case ALI1535_WORD_DATA:
442                 data->word = inb_p(SMBHSTDAT0) + (inb_p(SMBHSTDAT1) << 8);
443                 break;
444         case ALI1535_BLOCK_DATA:
445                 len = inb_p(SMBHSTDAT0);
446                 if (len > 32)
447                         len = 32;
448                 data->block[0] = len;
449                 /* Reset SMBBLKDAT */
450                 outb_p(inb_p(SMBHSTTYP) | ALI1535_BLOCK_CLR, SMBHSTTYP);
451                 for (i = 1; i <= data->block[0]; i++) {
452                         data->block[i] = inb_p(SMBBLKDAT);
453                         dev_dbg(&adap->dev, "Blk: len=%d, i=%d, data=%02x\n",
454                                 len, i, data->block[i]);
455                 }
456                 break;
457         }
458 EXIT:
459         return result;
460 }
461
462
463 static u32 ali1535_func(struct i2c_adapter *adapter)
464 {
465         return I2C_FUNC_SMBUS_QUICK | I2C_FUNC_SMBUS_BYTE |
466             I2C_FUNC_SMBUS_BYTE_DATA | I2C_FUNC_SMBUS_WORD_DATA |
467             I2C_FUNC_SMBUS_BLOCK_DATA;
468 }
469
470 static const struct i2c_algorithm smbus_algorithm = {
471         .smbus_xfer     = ali1535_access,
472         .functionality  = ali1535_func,
473 };
474
475 static struct i2c_adapter ali1535_adapter = {
476         .owner          = THIS_MODULE,
477         .id             = I2C_HW_SMBUS_ALI1535,
478         .class          = I2C_CLASS_HWMON,
479         .algo           = &smbus_algorithm,
480 };
481
482 static struct pci_device_id ali1535_ids[] = {
483         { PCI_DEVICE(PCI_VENDOR_ID_AL, PCI_DEVICE_ID_AL_M7101) },
484         { },
485 };
486
487 MODULE_DEVICE_TABLE (pci, ali1535_ids);
488
489 static int __devinit ali1535_probe(struct pci_dev *dev, const struct pci_device_id *id)
490 {
491         if (ali1535_setup(dev)) {
492                 dev_warn(&dev->dev,
493                         "ALI1535 not detected, module not inserted.\n");
494                 return -ENODEV;
495         }
496
497         /* set up the sysfs linkage to our parent device */
498         ali1535_adapter.dev.parent = &dev->dev;
499
500         snprintf(ali1535_adapter.name, sizeof(ali1535_adapter.name),
501                 "SMBus ALI1535 adapter at %04x", ali1535_smba);
502         return i2c_add_adapter(&ali1535_adapter);
503 }
504
505 static void __devexit ali1535_remove(struct pci_dev *dev)
506 {
507         i2c_del_adapter(&ali1535_adapter);
508         release_region(ali1535_smba, ALI1535_SMB_IOSIZE);
509 }
510
511 static struct pci_driver ali1535_driver = {
512         .name           = "ali1535_smbus",
513         .id_table       = ali1535_ids,
514         .probe          = ali1535_probe,
515         .remove         = __devexit_p(ali1535_remove),
516 };
517
518 static int __init i2c_ali1535_init(void)
519 {
520         return pci_register_driver(&ali1535_driver);
521 }
522
523 static void __exit i2c_ali1535_exit(void)
524 {
525         pci_unregister_driver(&ali1535_driver);
526 }
527
528 MODULE_AUTHOR("Frodo Looijaard <frodol@dds.nl>, "
529               "Philip Edelbrock <phil@netroedge.com>, "
530               "Mark D. Studebaker <mdsxyz123@yahoo.com> "
531               "and Dan Eaton <dan.eaton@rocketlogix.com>");
532 MODULE_DESCRIPTION("ALI1535 SMBus driver");
533 MODULE_LICENSE("GPL");
534
535 module_init(i2c_ali1535_init);
536 module_exit(i2c_ali1535_exit);