1 /* ------------------------------------------------------------------------- */ 2 /* i2c-iop3xx.c i2c driver algorithms for Intel XScale IOP3xx & IXP46x */ 3 /* ------------------------------------------------------------------------- */ 4 /* Copyright (C) 2003 Peter Milne, D-TACQ Solutions Ltd 5 * <Peter dot Milne at D hyphen TACQ dot com> 6 * 7 * With acknowledgements to i2c-algo-ibm_ocp.c by 8 * Ian DaSilva, MontaVista Software, Inc. idasilva@mvista.com 9 * 10 * And i2c-algo-pcf.c, which was created by Simon G. Vogl and Hans Berglund: 11 * 12 * Copyright (C) 1995-1997 Simon G. Vogl, 1998-2000 Hans Berglund 13 * 14 * And which acknowledged Kyösti Mälkki <kmalkki@cc.hut.fi>, 15 * Frodo Looijaard <frodol@dds.nl>, Martin Bailey<mbailey@littlefeet-inc.com> 16 * 17 * Major cleanup by Deepak Saxena <dsaxena@plexity.net>, 01/2005: 18 * 19 * - Use driver model to pass per-chip info instead of hardcoding and #ifdefs 20 * - Use ioremap/__raw_readl/__raw_writel instead of direct dereference 21 * - Make it work with IXP46x chips 22 * - Cleanup function names, coding style, etc 23 * 24 * - writing to slave address causes latchup on iop331. 25 * fix: driver refuses to address self. 26 * 27 * This program is free software; you can redistribute it and/or modify 28 * it under the terms of the GNU General Public License as published by 29 * the Free Software Foundation, version 2. 30 */ 31 32 #include <linux/interrupt.h> 33 #include <linux/kernel.h> 34 #include <linux/module.h> 35 #include <linux/delay.h> 36 #include <linux/slab.h> 37 #include <linux/errno.h> 38 #include <linux/platform_device.h> 39 #include <linux/i2c.h> 40 #include <linux/io.h> 41 #include <linux/gpio.h> 42 43 #include "i2c-iop3xx.h" 44 45 /* global unit counter */ 46 static int i2c_id; 47 48 static inline unsigned char 49 iic_cook_addr(struct i2c_msg *msg) 50 { 51 unsigned char addr; 52 53 addr = (msg->addr << 1); 54 55 if (msg->flags & I2C_M_RD) 56 addr |= 1; 57 58 return addr; 59 } 60 61 static void 62 iop3xx_i2c_reset(struct i2c_algo_iop3xx_data *iop3xx_adap) 63 { 64 /* Follows devman 9.3 */ 65 __raw_writel(IOP3XX_ICR_UNIT_RESET, iop3xx_adap->ioaddr + CR_OFFSET); 66 __raw_writel(IOP3XX_ISR_CLEARBITS, iop3xx_adap->ioaddr + SR_OFFSET); 67 __raw_writel(0, iop3xx_adap->ioaddr + CR_OFFSET); 68 } 69 70 static void 71 iop3xx_i2c_enable(struct i2c_algo_iop3xx_data *iop3xx_adap) 72 { 73 u32 cr = IOP3XX_ICR_GCD | IOP3XX_ICR_SCLEN | IOP3XX_ICR_UE; 74 75 /* 76 * Every time unit enable is asserted, GPOD needs to be cleared 77 * on IOP3XX to avoid data corruption on the bus. 78 */ 79 #if defined(CONFIG_ARCH_IOP32X) || defined(CONFIG_ARCH_IOP33X) 80 if (iop3xx_adap->id == 0) { 81 gpio_set_value(7, 0); 82 gpio_set_value(6, 0); 83 } else { 84 gpio_set_value(5, 0); 85 gpio_set_value(4, 0); 86 } 87 #endif 88 /* NB SR bits not same position as CR IE bits :-( */ 89 iop3xx_adap->SR_enabled = 90 IOP3XX_ISR_ALD | IOP3XX_ISR_BERRD | 91 IOP3XX_ISR_RXFULL | IOP3XX_ISR_TXEMPTY; 92 93 cr |= IOP3XX_ICR_ALD_IE | IOP3XX_ICR_BERR_IE | 94 IOP3XX_ICR_RXFULL_IE | IOP3XX_ICR_TXEMPTY_IE; 95 96 __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET); 97 } 98 99 static void 100 iop3xx_i2c_transaction_cleanup(struct i2c_algo_iop3xx_data *iop3xx_adap) 101 { 102 unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET); 103 104 cr &= ~(IOP3XX_ICR_MSTART | IOP3XX_ICR_TBYTE | 105 IOP3XX_ICR_MSTOP | IOP3XX_ICR_SCLEN); 106 107 __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET); 108 } 109 110 /* 111 * NB: the handler has to clear the source of the interrupt! 112 * Then it passes the SR flags of interest to BH via adap data 113 */ 114 static irqreturn_t 115 iop3xx_i2c_irq_handler(int this_irq, void *dev_id) 116 { 117 struct i2c_algo_iop3xx_data *iop3xx_adap = dev_id; 118 u32 sr = __raw_readl(iop3xx_adap->ioaddr + SR_OFFSET); 119 120 if ((sr &= iop3xx_adap->SR_enabled)) { 121 __raw_writel(sr, iop3xx_adap->ioaddr + SR_OFFSET); 122 iop3xx_adap->SR_received |= sr; 123 wake_up_interruptible(&iop3xx_adap->waitq); 124 } 125 return IRQ_HANDLED; 126 } 127 128 /* check all error conditions, clear them , report most important */ 129 static int 130 iop3xx_i2c_error(u32 sr) 131 { 132 int rc = 0; 133 134 if ((sr & IOP3XX_ISR_BERRD)) { 135 if ( !rc ) rc = -I2C_ERR_BERR; 136 } 137 if ((sr & IOP3XX_ISR_ALD)) { 138 if ( !rc ) rc = -I2C_ERR_ALD; 139 } 140 return rc; 141 } 142 143 static inline u32 144 iop3xx_i2c_get_srstat(struct i2c_algo_iop3xx_data *iop3xx_adap) 145 { 146 unsigned long flags; 147 u32 sr; 148 149 spin_lock_irqsave(&iop3xx_adap->lock, flags); 150 sr = iop3xx_adap->SR_received; 151 iop3xx_adap->SR_received = 0; 152 spin_unlock_irqrestore(&iop3xx_adap->lock, flags); 153 154 return sr; 155 } 156 157 /* 158 * sleep until interrupted, then recover and analyse the SR 159 * saved by handler 160 */ 161 typedef int (* compare_func)(unsigned test, unsigned mask); 162 /* returns 1 on correct comparison */ 163 164 static int 165 iop3xx_i2c_wait_event(struct i2c_algo_iop3xx_data *iop3xx_adap, 166 unsigned flags, unsigned* status, 167 compare_func compare) 168 { 169 unsigned sr = 0; 170 int interrupted; 171 int done; 172 int rc = 0; 173 174 do { 175 interrupted = wait_event_interruptible_timeout ( 176 iop3xx_adap->waitq, 177 (done = compare( sr = iop3xx_i2c_get_srstat(iop3xx_adap) ,flags )), 178 1 * HZ 179 ); 180 if ((rc = iop3xx_i2c_error(sr)) < 0) { 181 *status = sr; 182 return rc; 183 } else if (!interrupted) { 184 *status = sr; 185 return -ETIMEDOUT; 186 } 187 } while(!done); 188 189 *status = sr; 190 191 return 0; 192 } 193 194 /* 195 * Concrete compare_funcs 196 */ 197 static int 198 all_bits_clear(unsigned test, unsigned mask) 199 { 200 return (test & mask) == 0; 201 } 202 203 static int 204 any_bits_set(unsigned test, unsigned mask) 205 { 206 return (test & mask) != 0; 207 } 208 209 static int 210 iop3xx_i2c_wait_tx_done(struct i2c_algo_iop3xx_data *iop3xx_adap, int *status) 211 { 212 return iop3xx_i2c_wait_event( 213 iop3xx_adap, 214 IOP3XX_ISR_TXEMPTY | IOP3XX_ISR_ALD | IOP3XX_ISR_BERRD, 215 status, any_bits_set); 216 } 217 218 static int 219 iop3xx_i2c_wait_rx_done(struct i2c_algo_iop3xx_data *iop3xx_adap, int *status) 220 { 221 return iop3xx_i2c_wait_event( 222 iop3xx_adap, 223 IOP3XX_ISR_RXFULL | IOP3XX_ISR_ALD | IOP3XX_ISR_BERRD, 224 status, any_bits_set); 225 } 226 227 static int 228 iop3xx_i2c_wait_idle(struct i2c_algo_iop3xx_data *iop3xx_adap, int *status) 229 { 230 return iop3xx_i2c_wait_event( 231 iop3xx_adap, IOP3XX_ISR_UNITBUSY, status, all_bits_clear); 232 } 233 234 static int 235 iop3xx_i2c_send_target_addr(struct i2c_algo_iop3xx_data *iop3xx_adap, 236 struct i2c_msg* msg) 237 { 238 unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET); 239 int status; 240 int rc; 241 242 /* avoid writing to my slave address (hangs on 80331), 243 * forbidden in Intel developer manual 244 */ 245 if (msg->addr == MYSAR) { 246 return -EBUSY; 247 } 248 249 __raw_writel(iic_cook_addr(msg), iop3xx_adap->ioaddr + DBR_OFFSET); 250 251 cr &= ~(IOP3XX_ICR_MSTOP | IOP3XX_ICR_NACK); 252 cr |= IOP3XX_ICR_MSTART | IOP3XX_ICR_TBYTE; 253 254 __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET); 255 rc = iop3xx_i2c_wait_tx_done(iop3xx_adap, &status); 256 257 return rc; 258 } 259 260 static int 261 iop3xx_i2c_write_byte(struct i2c_algo_iop3xx_data *iop3xx_adap, char byte, 262 int stop) 263 { 264 unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET); 265 int status; 266 int rc = 0; 267 268 __raw_writel(byte, iop3xx_adap->ioaddr + DBR_OFFSET); 269 cr &= ~IOP3XX_ICR_MSTART; 270 if (stop) { 271 cr |= IOP3XX_ICR_MSTOP; 272 } else { 273 cr &= ~IOP3XX_ICR_MSTOP; 274 } 275 cr |= IOP3XX_ICR_TBYTE; 276 __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET); 277 rc = iop3xx_i2c_wait_tx_done(iop3xx_adap, &status); 278 279 return rc; 280 } 281 282 static int 283 iop3xx_i2c_read_byte(struct i2c_algo_iop3xx_data *iop3xx_adap, char* byte, 284 int stop) 285 { 286 unsigned long cr = __raw_readl(iop3xx_adap->ioaddr + CR_OFFSET); 287 int status; 288 int rc = 0; 289 290 cr &= ~IOP3XX_ICR_MSTART; 291 292 if (stop) { 293 cr |= IOP3XX_ICR_MSTOP | IOP3XX_ICR_NACK; 294 } else { 295 cr &= ~(IOP3XX_ICR_MSTOP | IOP3XX_ICR_NACK); 296 } 297 cr |= IOP3XX_ICR_TBYTE; 298 __raw_writel(cr, iop3xx_adap->ioaddr + CR_OFFSET); 299 300 rc = iop3xx_i2c_wait_rx_done(iop3xx_adap, &status); 301 302 *byte = __raw_readl(iop3xx_adap->ioaddr + DBR_OFFSET); 303 304 return rc; 305 } 306 307 static int 308 iop3xx_i2c_writebytes(struct i2c_adapter *i2c_adap, const char *buf, int count) 309 { 310 struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data; 311 int ii; 312 int rc = 0; 313 314 for (ii = 0; rc == 0 && ii != count; ++ii) 315 rc = iop3xx_i2c_write_byte(iop3xx_adap, buf[ii], ii==count-1); 316 return rc; 317 } 318 319 static int 320 iop3xx_i2c_readbytes(struct i2c_adapter *i2c_adap, char *buf, int count) 321 { 322 struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data; 323 int ii; 324 int rc = 0; 325 326 for (ii = 0; rc == 0 && ii != count; ++ii) 327 rc = iop3xx_i2c_read_byte(iop3xx_adap, &buf[ii], ii==count-1); 328 329 return rc; 330 } 331 332 /* 333 * Description: This function implements combined transactions. Combined 334 * transactions consist of combinations of reading and writing blocks of data. 335 * FROM THE SAME ADDRESS 336 * Each transfer (i.e. a read or a write) is separated by a repeated start 337 * condition. 338 */ 339 static int 340 iop3xx_i2c_handle_msg(struct i2c_adapter *i2c_adap, struct i2c_msg* pmsg) 341 { 342 struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data; 343 int rc; 344 345 rc = iop3xx_i2c_send_target_addr(iop3xx_adap, pmsg); 346 if (rc < 0) { 347 return rc; 348 } 349 350 if ((pmsg->flags&I2C_M_RD)) { 351 return iop3xx_i2c_readbytes(i2c_adap, pmsg->buf, pmsg->len); 352 } else { 353 return iop3xx_i2c_writebytes(i2c_adap, pmsg->buf, pmsg->len); 354 } 355 } 356 357 /* 358 * master_xfer() - main read/write entry 359 */ 360 static int 361 iop3xx_i2c_master_xfer(struct i2c_adapter *i2c_adap, struct i2c_msg *msgs, 362 int num) 363 { 364 struct i2c_algo_iop3xx_data *iop3xx_adap = i2c_adap->algo_data; 365 int im = 0; 366 int ret = 0; 367 int status; 368 369 iop3xx_i2c_wait_idle(iop3xx_adap, &status); 370 iop3xx_i2c_reset(iop3xx_adap); 371 iop3xx_i2c_enable(iop3xx_adap); 372 373 for (im = 0; ret == 0 && im != num; im++) { 374 ret = iop3xx_i2c_handle_msg(i2c_adap, &msgs[im]); 375 } 376 377 iop3xx_i2c_transaction_cleanup(iop3xx_adap); 378 379 if(ret) 380 return ret; 381 382 return im; 383 } 384 385 static u32 386 iop3xx_i2c_func(struct i2c_adapter *adap) 387 { 388 return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL; 389 } 390 391 static const struct i2c_algorithm iop3xx_i2c_algo = { 392 .master_xfer = iop3xx_i2c_master_xfer, 393 .functionality = iop3xx_i2c_func, 394 }; 395 396 static int 397 iop3xx_i2c_remove(struct platform_device *pdev) 398 { 399 struct i2c_adapter *padapter = platform_get_drvdata(pdev); 400 struct i2c_algo_iop3xx_data *adapter_data = 401 (struct i2c_algo_iop3xx_data *)padapter->algo_data; 402 struct resource *res = platform_get_resource(pdev, IORESOURCE_MEM, 0); 403 unsigned long cr = __raw_readl(adapter_data->ioaddr + CR_OFFSET); 404 405 /* 406 * Disable the actual HW unit 407 */ 408 cr &= ~(IOP3XX_ICR_ALD_IE | IOP3XX_ICR_BERR_IE | 409 IOP3XX_ICR_RXFULL_IE | IOP3XX_ICR_TXEMPTY_IE); 410 __raw_writel(cr, adapter_data->ioaddr + CR_OFFSET); 411 412 iounmap(adapter_data->ioaddr); 413 release_mem_region(res->start, IOP3XX_I2C_IO_SIZE); 414 kfree(adapter_data); 415 kfree(padapter); 416 417 return 0; 418 } 419 420 static int 421 iop3xx_i2c_probe(struct platform_device *pdev) 422 { 423 struct resource *res; 424 int ret, irq; 425 struct i2c_adapter *new_adapter; 426 struct i2c_algo_iop3xx_data *adapter_data; 427 428 new_adapter = kzalloc(sizeof(struct i2c_adapter), GFP_KERNEL); 429 if (!new_adapter) { 430 ret = -ENOMEM; 431 goto out; 432 } 433 434 adapter_data = kzalloc(sizeof(struct i2c_algo_iop3xx_data), GFP_KERNEL); 435 if (!adapter_data) { 436 ret = -ENOMEM; 437 goto free_adapter; 438 } 439 440 res = platform_get_resource(pdev, IORESOURCE_MEM, 0); 441 if (!res) { 442 ret = -ENODEV; 443 goto free_both; 444 } 445 446 if (!request_mem_region(res->start, IOP3XX_I2C_IO_SIZE, pdev->name)) { 447 ret = -EBUSY; 448 goto free_both; 449 } 450 451 /* set the adapter enumeration # */ 452 adapter_data->id = i2c_id++; 453 454 adapter_data->ioaddr = ioremap(res->start, IOP3XX_I2C_IO_SIZE); 455 if (!adapter_data->ioaddr) { 456 ret = -ENOMEM; 457 goto release_region; 458 } 459 460 irq = platform_get_irq(pdev, 0); 461 if (irq < 0) { 462 ret = -ENXIO; 463 goto unmap; 464 } 465 ret = request_irq(irq, iop3xx_i2c_irq_handler, 0, 466 pdev->name, adapter_data); 467 468 if (ret) { 469 ret = -EIO; 470 goto unmap; 471 } 472 473 memcpy(new_adapter->name, pdev->name, strlen(pdev->name)); 474 new_adapter->owner = THIS_MODULE; 475 new_adapter->class = I2C_CLASS_HWMON | I2C_CLASS_SPD; 476 new_adapter->dev.parent = &pdev->dev; 477 new_adapter->nr = pdev->id; 478 479 /* 480 * Default values...should these come in from board code? 481 */ 482 new_adapter->timeout = HZ; 483 new_adapter->algo = &iop3xx_i2c_algo; 484 485 init_waitqueue_head(&adapter_data->waitq); 486 spin_lock_init(&adapter_data->lock); 487 488 iop3xx_i2c_reset(adapter_data); 489 iop3xx_i2c_enable(adapter_data); 490 491 platform_set_drvdata(pdev, new_adapter); 492 new_adapter->algo_data = adapter_data; 493 494 i2c_add_numbered_adapter(new_adapter); 495 496 return 0; 497 498 unmap: 499 iounmap(adapter_data->ioaddr); 500 501 release_region: 502 release_mem_region(res->start, IOP3XX_I2C_IO_SIZE); 503 504 free_both: 505 kfree(adapter_data); 506 507 free_adapter: 508 kfree(new_adapter); 509 510 out: 511 return ret; 512 } 513 514 515 static struct platform_driver iop3xx_i2c_driver = { 516 .probe = iop3xx_i2c_probe, 517 .remove = iop3xx_i2c_remove, 518 .driver = { 519 .name = "IOP3xx-I2C", 520 }, 521 }; 522 523 module_platform_driver(iop3xx_i2c_driver); 524 525 MODULE_AUTHOR("D-TACQ Solutions Ltd <www.d-tacq.com>"); 526 MODULE_DESCRIPTION("IOP3xx iic algorithm and driver"); 527 MODULE_LICENSE("GPL"); 528 MODULE_ALIAS("platform:IOP3xx-I2C"); 529