drivers/media/pci/saa7134/saa7134-i2c.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  *
   4  * device driver for philips saa7134 based TV cards
   5  * i2c interface support
   6  *
   7  * (c) 2001,02 Gerd Knorr <kraxel@bytesex.org> [SuSE Labs]
   8  */
   9
  10 #include "saa7134.h"
  11 #include "saa7134-reg.h"
  12
  13 #include <linux/init.h>
  14 #include <linux/list.h>
  15 #include <linux/module.h>
  16 #include <linux/kernel.h>
  17 #include <linux/delay.h>
  18
  19 #include <media/v4l2-common.h>
  20
  21 /* ----------------------------------------------------------- */
  22
  23 static unsigned int i2c_debug;
  24 module_param(i2c_debug, int, 0644);
  25 MODULE_PARM_DESC(i2c_debug,"enable debug messages [i2c]");
  26
  27 static unsigned int i2c_scan;
  28 module_param(i2c_scan, int, 0444);
  29 MODULE_PARM_DESC(i2c_scan,"scan i2c bus at insmod time");
  30
  31 #define i2c_dbg(level, fmt, arg...) do { \
  32         if (i2c_debug == level) \
  33                 printk(KERN_DEBUG pr_fmt("i2c: " fmt), ## arg); \
  34         } while (0)
  35
  36 #define i2c_cont(level, fmt, arg...) do { \
  37         if (i2c_debug == level) \
  38                 pr_cont(fmt, ## arg); \
  39         } while (0)
  40
  41 #define I2C_WAIT_DELAY  32
  42 #define I2C_WAIT_RETRY  16
  43
  44 /* ----------------------------------------------------------- */
  45
  46 static char *str_i2c_status[] = {
  47         "IDLE", "DONE_STOP", "BUSY", "TO_SCL", "TO_ARB", "DONE_WRITE",
  48         "DONE_READ", "DONE_WRITE_TO", "DONE_READ_TO", "NO_DEVICE",
  49         "NO_ACKN", "BUS_ERR", "ARB_LOST", "SEQ_ERR", "ST_ERR", "SW_ERR"
  50 };
  51
  52 enum i2c_status {
  53         IDLE          = 0,  // no I2C command pending
  54         DONE_STOP     = 1,  // I2C command done and STOP executed
  55         BUSY          = 2,  // executing I2C command
  56         TO_SCL        = 3,  // executing I2C command, time out on clock stretching
  57         TO_ARB        = 4,  // time out on arbitration trial, still trying
  58         DONE_WRITE    = 5,  // I2C command done and awaiting next write command
  59         DONE_READ     = 6,  // I2C command done and awaiting next read command
  60         DONE_WRITE_TO = 7,  // see 5, and time out on status echo
  61         DONE_READ_TO  = 8,  // see 6, and time out on status echo
  62         NO_DEVICE     = 9,  // no acknowledge on device slave address
  63         NO_ACKN       = 10, // no acknowledge after data byte transfer
  64         BUS_ERR       = 11, // bus error
  65         ARB_LOST      = 12, // arbitration lost during transfer
  66         SEQ_ERR       = 13, // erroneous programming sequence
  67         ST_ERR        = 14, // wrong status echoing
  68         SW_ERR        = 15  // software error
  69 };
  70
  71 static char *str_i2c_attr[] = {
  72         "NOP", "STOP", "CONTINUE", "START"
  73 };
  74
  75 enum i2c_attr {
  76         NOP           = 0,  // no operation on I2C bus
  77         STOP          = 1,  // stop condition, no associated byte transfer
  78         CONTINUE      = 2,  // continue with byte transfer
  79         START         = 3   // start condition with byte transfer
  80 };
  81
  82 static inline enum i2c_status i2c_get_status(struct saa7134_dev *dev)
  83 {
  84         enum i2c_status status;
  85
  86         status = saa_readb(SAA7134_I2C_ATTR_STATUS) & 0x0f;
  87         i2c_dbg(2, "i2c stat <= %s\n", str_i2c_status[status]);
  88         return status;
  89 }
  90
  91 static inline void i2c_set_status(struct saa7134_dev *dev,
  92                                   enum i2c_status status)
  93 {
  94         i2c_dbg(2, "i2c stat => %s\n", str_i2c_status[status]);
  95         saa_andorb(SAA7134_I2C_ATTR_STATUS,0x0f,status);
  96 }
  97
  98 static inline void i2c_set_attr(struct saa7134_dev *dev, enum i2c_attr attr)
  99 {
 100         i2c_dbg(2, "i2c attr => %s\n", str_i2c_attr[attr]);
 101         saa_andorb(SAA7134_I2C_ATTR_STATUS,0xc0,attr << 6);
 102 }
 103
 104 static inline int i2c_is_error(enum i2c_status status)
 105 {
 106         switch (status) {
 107         case NO_DEVICE:
 108         case NO_ACKN:
 109         case BUS_ERR:
 110         case ARB_LOST:
 111         case SEQ_ERR:
 112         case ST_ERR:
 113                 return true;
 114         default:
 115                 return false;
 116         }
 117 }
 118
 119 static inline int i2c_is_idle(enum i2c_status status)
 120 {
 121         switch (status) {
 122         case IDLE:
 123         case DONE_STOP:
 124                 return true;
 125         default:
 126                 return false;
 127         }
 128 }
 129
 130 static inline int i2c_is_busy(enum i2c_status status)
 131 {
 132         switch (status) {
 133         case BUSY:
 134         case TO_SCL:
 135         case TO_ARB:
 136                 return true;
 137         default:
 138                 return false;
 139         }
 140 }
 141
 142 static int i2c_is_busy_wait(struct saa7134_dev *dev)
 143 {
 144         enum i2c_status status;
 145         int count;
 146
 147         for (count = 0; count < I2C_WAIT_RETRY; count++) {
 148                 status = i2c_get_status(dev);
 149                 if (!i2c_is_busy(status))
 150                         break;
 151                 saa_wait(I2C_WAIT_DELAY);
 152         }
 153         if (I2C_WAIT_RETRY == count)
 154                 return false;
 155         return true;
 156 }
 157
 158 static int i2c_reset(struct saa7134_dev *dev)
 159 {
 160         enum i2c_status status;
 161         int count;
 162
 163         i2c_dbg(2, "i2c reset\n");
 164         status = i2c_get_status(dev);
 165         if (!i2c_is_error(status))
 166                 return true;
 167         i2c_set_status(dev,status);
 168
 169         for (count = 0; count < I2C_WAIT_RETRY; count++) {
 170                 status = i2c_get_status(dev);
 171                 if (!i2c_is_error(status))
 172                         break;
 173                 udelay(I2C_WAIT_DELAY);
 174         }
 175         if (I2C_WAIT_RETRY == count)
 176                 return false;
 177
 178         if (!i2c_is_idle(status))
 179                 return false;
 180
 181         i2c_set_attr(dev,NOP);
 182         return true;
 183 }
 184
 185 static inline int i2c_send_byte(struct saa7134_dev *dev,
 186                                 enum i2c_attr attr,
 187                                 unsigned char data)
 188 {
 189         enum i2c_status status;
 190         __u32 dword;
 191
 192         /* have to write both attr + data in one 32bit word */
 193         dword  = saa_readl(SAA7134_I2C_ATTR_STATUS >> 2);
 194         dword &= 0x0f;
 195         dword |= (attr << 6);
 196         dword |= ((__u32)data << 8);
 197         dword |= 0x00 << 16;  /* 100 kHz */
 198 //      dword |= 0x40 << 16;  /* 400 kHz */
 199         dword |= 0xf0 << 24;
 200         saa_writel(SAA7134_I2C_ATTR_STATUS >> 2, dword);
 201         i2c_dbg(2, "i2c data => 0x%x\n", data);
 202
 203         if (!i2c_is_busy_wait(dev))
 204                 return -EIO;
 205         status = i2c_get_status(dev);
 206         if (i2c_is_error(status))
 207                 return -EIO;
 208         return 0;
 209 }
 210
 211 static inline int i2c_recv_byte(struct saa7134_dev *dev)
 212 {
 213         enum i2c_status status;
 214         unsigned char data;
 215
 216         i2c_set_attr(dev,CONTINUE);
 217         if (!i2c_is_busy_wait(dev))
 218                 return -EIO;
 219         status = i2c_get_status(dev);
 220         if (i2c_is_error(status))
 221                 return -EIO;
 222         data = saa_readb(SAA7134_I2C_DATA);
 223         i2c_dbg(2, "i2c data <= 0x%x\n", data);
 224         return data;
 225 }
 226
 227 static int saa7134_i2c_xfer(struct i2c_adapter *i2c_adap,
 228                             struct i2c_msg *msgs, int num)
 229 {
 230         struct saa7134_dev *dev = i2c_adap->algo_data;
 231         enum i2c_status status;
 232         unsigned char data;
 233         int addr,rc,i,byte;
 234
 235         status = i2c_get_status(dev);
 236         if (!i2c_is_idle(status))
 237                 if (!i2c_reset(dev))
 238                         return -EIO;
 239
 240         i2c_dbg(2, "start xfer\n");
 241         i2c_dbg(1, "i2c xfer:");
 242         for (i = 0; i < num; i++) {
 243                 if (!(msgs[i].flags & I2C_M_NOSTART) || 0 == i) {
 244                         /* send address */
 245                         i2c_dbg(2, "send address\n");
 246                         addr  = msgs[i].addr << 1;
 247                         if (msgs[i].flags & I2C_M_RD)
 248                                 addr |= 1;
 249                         if (i > 0 && msgs[i].flags &
 250                             I2C_M_RD && msgs[i].addr != 0x40 &&
 251                             msgs[i].addr != 0x41 &&
 252                             msgs[i].addr != 0x19) {
 253                                 /* workaround for a saa7134 i2c bug
 254                                  * needed to talk to the mt352 demux
 255                                  * thanks to pinnacle for the hint */
 256                                 int quirk = 0xfe;
 257                                 i2c_cont(1, " [%02x quirk]", quirk);
 258                                 i2c_send_byte(dev,START,quirk);
 259                                 i2c_recv_byte(dev);
 260                         }
 261                         i2c_cont(1, " < %02x", addr);
 262                         rc = i2c_send_byte(dev,START,addr);
 263                         if (rc < 0)
 264                                  goto err;
 265                 }
 266                 if (msgs[i].flags & I2C_M_RD) {
 267                         /* read bytes */
 268                         i2c_dbg(2, "read bytes\n");
 269                         for (byte = 0; byte < msgs[i].len; byte++) {
 270                                 i2c_cont(1, " =");
 271                                 rc = i2c_recv_byte(dev);
 272                                 if (rc < 0)
 273                                         goto err;
 274                                 i2c_cont(1, "%02x", rc);
 275                                 msgs[i].buf[byte] = rc;
 276                         }
 277                         /* discard mysterious extra byte when reading
 278                            from Samsung S5H1411.  i2c bus gets error
 279                            if we do not. */
 280                         if (0x19 == msgs[i].addr) {
 281                                 i2c_cont(1, " ?");
 282                                 rc = i2c_recv_byte(dev);
 283                                 if (rc < 0)
 284                                         goto err;
 285                                 i2c_cont(1, "%02x", rc);
 286                         }
 287                 } else {
 288                         /* write bytes */
 289                         i2c_dbg(2, "write bytes\n");
 290                         for (byte = 0; byte < msgs[i].len; byte++) {
 291                                 data = msgs[i].buf[byte];
 292                                 i2c_cont(1, " %02x", data);
 293                                 rc = i2c_send_byte(dev,CONTINUE,data);
 294                                 if (rc < 0)
 295                                         goto err;
 296                         }
 297                 }
 298         }
 299         i2c_dbg(2, "xfer done\n");
 300         i2c_cont(1, " >");
 301         i2c_set_attr(dev,STOP);
 302         rc = -EIO;
 303         if (!i2c_is_busy_wait(dev))
 304                 goto err;
 305         status = i2c_get_status(dev);
 306         if (i2c_is_error(status))
 307                 goto err;
 308         /* ensure that the bus is idle for at least one bit slot */
 309         msleep(1);
 310
 311         i2c_cont(1, "\n");
 312         return num;
 313  err:
 314         if (1 == i2c_debug) {
 315                 status = i2c_get_status(dev);
 316                 i2c_cont(1, " ERROR: %s\n", str_i2c_status[status]);
 317         }
 318         return rc;
 319 }
 320
 321 /* ----------------------------------------------------------- */
 322
 323 static u32 functionality(struct i2c_adapter *adap)
 324 {
 325         return I2C_FUNC_SMBUS_EMUL;
 326 }
 327
 328 static const struct i2c_algorithm saa7134_algo = {
 329         .master_xfer   = saa7134_i2c_xfer,
 330         .functionality = functionality,
 331 };
 332
 333 static const struct i2c_adapter saa7134_adap_template = {
 334         .owner         = THIS_MODULE,
 335         .name          = "saa7134",
 336         .algo          = &saa7134_algo,
 337 };
 338
 339 static const struct i2c_client saa7134_client_template = {
 340         .name   = "saa7134 internal",
 341 };
 342
 343 /* ----------------------------------------------------------- */
 344
 345 /*
 346  * On Medion 7134 reading the SAA7134 chip config EEPROM needs DVB-T
 347  * demod i2c gate closed due to an address clash between this EEPROM
 348  * and the demod one.
 349  */
 350 static void saa7134_i2c_eeprom_md7134_gate(struct saa7134_dev *dev)
 351 {
 352         u8 subaddr = 0x7, dmdregval;
 353         u8 data[2];
 354         int ret;
 355         struct i2c_msg i2cgatemsg_r[] = { {.addr = 0x08, .flags = 0,
 356                                            .buf = &subaddr, .len = 1},
 357                                           {.addr = 0x08,
 358                                            .flags = I2C_M_RD,
 359                                            .buf = &dmdregval, .len = 1}
 360                                         };
 361         struct i2c_msg i2cgatemsg_w[] = { {.addr = 0x08, .flags = 0,
 362                                            .buf = data, .len = 2} };
 363
 364         ret = i2c_transfer(&dev->i2c_adap, i2cgatemsg_r, 2);
 365         if ((ret == 2) && (dmdregval & 0x2)) {
 366                 pr_debug("%s: DVB-T demod i2c gate was left open\n",
 367                          dev->name);
 368
 369                 data[0] = subaddr;
 370                 data[1] = (dmdregval & ~0x2);
 371                 if (i2c_transfer(&dev->i2c_adap, i2cgatemsg_w, 1) != 1)
 372                         pr_err("%s: EEPROM i2c gate close failure\n",
 373                                dev->name);
 374         }
 375 }
 376
 377 static int
 378 saa7134_i2c_eeprom(struct saa7134_dev *dev, unsigned char *eedata, int len)
 379 {
 380         unsigned char buf;
 381         int i,err;
 382
 383         if (dev->board == SAA7134_BOARD_MD7134)
 384                 saa7134_i2c_eeprom_md7134_gate(dev);
 385
 386         dev->i2c_client.addr = 0xa0 >> 1;
 387         buf = 0;
 388         if (1 != (err = i2c_master_send(&dev->i2c_client,&buf,1))) {
 389                 pr_info("%s: Huh, no eeprom present (err=%d)?\n",
 390                        dev->name,err);
 391                 return -1;
 392         }
 393         if (len != (err = i2c_master_recv(&dev->i2c_client,eedata,len))) {
 394                 pr_warn("%s: i2c eeprom read error (err=%d)\n",
 395                        dev->name,err);
 396                 return -1;
 397         }
 398
 399         for (i = 0; i < len; i += 16) {
 400                 int size = (len - i) > 16 ? 16 : len - i;
 401
 402                 pr_info("i2c eeprom %02x: %*ph\n", i, size, &eedata[i]);
 403         }
 404
 405         return 0;
 406 }
 407
 408 static char *i2c_devs[128] = {
 409         [ 0x20      ] = "mpeg encoder (saa6752hs)",
 410         [ 0xa0 >> 1 ] = "eeprom",
 411         [ 0xc0 >> 1 ] = "tuner (analog)",
 412         [ 0x86 >> 1 ] = "tda9887",
 413         [ 0x5a >> 1 ] = "remote control",
 414 };
 415
 416 static void do_i2c_scan(struct i2c_client *c)
 417 {
 418         unsigned char buf;
 419         int i,rc;
 420
 421         for (i = 0; i < ARRAY_SIZE(i2c_devs); i++) {
 422                 c->addr = i;
 423                 rc = i2c_master_recv(c,&buf,0);
 424                 if (rc < 0)
 425                         continue;
 426                 pr_info("i2c scan: found device @ 0x%x  [%s]\n",
 427                          i << 1, i2c_devs[i] ? i2c_devs[i] : "???");
 428         }
 429 }
 430
 431 int saa7134_i2c_register(struct saa7134_dev *dev)
 432 {
 433         dev->i2c_adap = saa7134_adap_template;
 434         dev->i2c_adap.dev.parent = &dev->pci->dev;
 435         strscpy(dev->i2c_adap.name, dev->name, sizeof(dev->i2c_adap.name));
 436         dev->i2c_adap.algo_data = dev;
 437         i2c_set_adapdata(&dev->i2c_adap, &dev->v4l2_dev);
 438         i2c_add_adapter(&dev->i2c_adap);
 439
 440         dev->i2c_client = saa7134_client_template;
 441         dev->i2c_client.adapter = &dev->i2c_adap;
 442
 443         saa7134_i2c_eeprom(dev,dev->eedata,sizeof(dev->eedata));
 444         if (i2c_scan)
 445                 do_i2c_scan(&dev->i2c_client);
 446
 447         /* Instantiate the IR receiver device, if present */
 448         saa7134_probe_i2c_ir(dev);
 449         return 0;
 450 }
 451
 452 int saa7134_i2c_unregister(struct saa7134_dev *dev)
 453 {
 454         i2c_del_adapter(&dev->i2c_adap);
 455         return 0;
 456 }