Linux-libre 5.4.47-gnu
[librecmc/linux-libre.git] / drivers / media / common / saa7146 / saa7146_i2c.c
1 // SPDX-License-Identifier: GPL-2.0
2 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
3
4 #include <media/drv-intf/saa7146_vv.h>
5
6 static u32 saa7146_i2c_func(struct i2c_adapter *adapter)
7 {
8         /* DEB_I2C("'%s'\n", adapter->name); */
9
10         return    I2C_FUNC_I2C
11                 | I2C_FUNC_SMBUS_QUICK
12                 | I2C_FUNC_SMBUS_READ_BYTE      | I2C_FUNC_SMBUS_WRITE_BYTE
13                 | I2C_FUNC_SMBUS_READ_BYTE_DATA | I2C_FUNC_SMBUS_WRITE_BYTE_DATA;
14 }
15
16 /* this function returns the status-register of our i2c-device */
17 static inline u32 saa7146_i2c_status(struct saa7146_dev *dev)
18 {
19         u32 iicsta = saa7146_read(dev, I2C_STATUS);
20         /* DEB_I2C("status: 0x%08x\n", iicsta); */
21         return iicsta;
22 }
23
24 /* this function runs through the i2c-messages and prepares the data to be
25    sent through the saa7146. have a look at the specifications p. 122 ff
26    to understand this. it returns the number of u32s to send, or -1
27    in case of an error. */
28 static int saa7146_i2c_msg_prepare(const struct i2c_msg *m, int num, __le32 *op)
29 {
30         int h1, h2;
31         int i, j, addr;
32         int mem = 0, op_count = 0;
33
34         /* first determine size of needed memory */
35         for(i = 0; i < num; i++) {
36                 mem += m[i].len + 1;
37         }
38
39         /* worst case: we need one u32 for three bytes to be send
40            plus one extra byte to address the device */
41         mem = 1 + ((mem-1) / 3);
42
43         /* we assume that op points to a memory of at least
44          * SAA7146_I2C_MEM bytes size. if we exceed this limit...
45          */
46         if ((4 * mem) > SAA7146_I2C_MEM) {
47                 /* DEB_I2C("cannot prepare i2c-message\n"); */
48                 return -ENOMEM;
49         }
50
51         /* be careful: clear out the i2c-mem first */
52         memset(op,0,sizeof(__le32)*mem);
53
54         /* loop through all messages */
55         for(i = 0; i < num; i++) {
56
57                 addr = i2c_8bit_addr_from_msg(&m[i]);
58                 h1 = op_count/3; h2 = op_count%3;
59                 op[h1] |= cpu_to_le32(      (u8)addr << ((3-h2)*8));
60                 op[h1] |= cpu_to_le32(SAA7146_I2C_START << ((3-h2)*2));
61                 op_count++;
62
63                 /* loop through all bytes of message i */
64                 for(j = 0; j < m[i].len; j++) {
65                         /* insert the data bytes */
66                         h1 = op_count/3; h2 = op_count%3;
67                         op[h1] |= cpu_to_le32( (u32)((u8)m[i].buf[j]) << ((3-h2)*8));
68                         op[h1] |= cpu_to_le32(       SAA7146_I2C_CONT << ((3-h2)*2));
69                         op_count++;
70                 }
71
72         }
73
74         /* have a look at the last byte inserted:
75           if it was: ...CONT change it to ...STOP */
76         h1 = (op_count-1)/3; h2 = (op_count-1)%3;
77         if ( SAA7146_I2C_CONT == (0x3 & (le32_to_cpu(op[h1]) >> ((3-h2)*2))) ) {
78                 op[h1] &= ~cpu_to_le32(0x2 << ((3-h2)*2));
79                 op[h1] |= cpu_to_le32(SAA7146_I2C_STOP << ((3-h2)*2));
80         }
81
82         /* return the number of u32s to send */
83         return mem;
84 }
85
86 /* this functions loops through all i2c-messages. normally, it should determine
87    which bytes were read through the adapter and write them back to the corresponding
88    i2c-message. but instead, we simply write back all bytes.
89    fixme: this could be improved. */
90 static int saa7146_i2c_msg_cleanup(const struct i2c_msg *m, int num, __le32 *op)
91 {
92         int i, j;
93         int op_count = 0;
94
95         /* loop through all messages */
96         for(i = 0; i < num; i++) {
97
98                 op_count++;
99
100                 /* loop through all bytes of message i */
101                 for(j = 0; j < m[i].len; j++) {
102                         /* write back all bytes that could have been read */
103                         m[i].buf[j] = (le32_to_cpu(op[op_count/3]) >> ((3-(op_count%3))*8));
104                         op_count++;
105                 }
106         }
107
108         return 0;
109 }
110
111 /* this functions resets the i2c-device and returns 0 if everything was fine, otherwise -1 */
112 static int saa7146_i2c_reset(struct saa7146_dev *dev)
113 {
114         /* get current status */
115         u32 status = saa7146_i2c_status(dev);
116
117         /* clear registers for sure */
118         saa7146_write(dev, I2C_STATUS, dev->i2c_bitrate);
119         saa7146_write(dev, I2C_TRANSFER, 0);
120
121         /* check if any operation is still in progress */
122         if ( 0 != ( status & SAA7146_I2C_BUSY) ) {
123
124                 /* yes, kill ongoing operation */
125                 DEB_I2C("busy_state detected\n");
126
127                 /* set "ABORT-OPERATION"-bit (bit 7)*/
128                 saa7146_write(dev, I2C_STATUS, (dev->i2c_bitrate | MASK_07));
129                 saa7146_write(dev, MC2, (MASK_00 | MASK_16));
130                 msleep(SAA7146_I2C_DELAY);
131
132                 /* clear all error-bits pending; this is needed because p.123, note 1 */
133                 saa7146_write(dev, I2C_STATUS, dev->i2c_bitrate);
134                 saa7146_write(dev, MC2, (MASK_00 | MASK_16));
135                 msleep(SAA7146_I2C_DELAY);
136         }
137
138         /* check if any error is (still) present. (this can be necessary because p.123, note 1) */
139         status = saa7146_i2c_status(dev);
140
141         if ( dev->i2c_bitrate != status ) {
142
143                 DEB_I2C("error_state detected. status:0x%08x\n", status);
144
145                 /* Repeat the abort operation. This seems to be necessary
146                    after serious protocol errors caused by e.g. the SAA7740 */
147                 saa7146_write(dev, I2C_STATUS, (dev->i2c_bitrate | MASK_07));
148                 saa7146_write(dev, MC2, (MASK_00 | MASK_16));
149                 msleep(SAA7146_I2C_DELAY);
150
151                 /* clear all error-bits pending */
152                 saa7146_write(dev, I2C_STATUS, dev->i2c_bitrate);
153                 saa7146_write(dev, MC2, (MASK_00 | MASK_16));
154                 msleep(SAA7146_I2C_DELAY);
155
156                 /* the data sheet says it might be necessary to clear the status
157                    twice after an abort */
158                 saa7146_write(dev, I2C_STATUS, dev->i2c_bitrate);
159                 saa7146_write(dev, MC2, (MASK_00 | MASK_16));
160                 msleep(SAA7146_I2C_DELAY);
161         }
162
163         /* if any error is still present, a fatal error has occurred ... */
164         status = saa7146_i2c_status(dev);
165         if ( dev->i2c_bitrate != status ) {
166                 DEB_I2C("fatal error. status:0x%08x\n", status);
167                 return -1;
168         }
169
170         return 0;
171 }
172
173 /* this functions writes out the data-byte 'dword' to the i2c-device.
174    it returns 0 if ok, -1 if the transfer failed, -2 if the transfer
175    failed badly (e.g. address error) */
176 static int saa7146_i2c_writeout(struct saa7146_dev *dev, __le32 *dword, int short_delay)
177 {
178         u32 status = 0, mc2 = 0;
179         int trial = 0;
180         unsigned long timeout;
181
182         /* write out i2c-command */
183         DEB_I2C("before: 0x%08x (status: 0x%08x), %d\n",
184                 *dword, saa7146_read(dev, I2C_STATUS), dev->i2c_op);
185
186         if( 0 != (SAA7146_USE_I2C_IRQ & dev->ext->flags)) {
187
188                 saa7146_write(dev, I2C_STATUS,   dev->i2c_bitrate);
189                 saa7146_write(dev, I2C_TRANSFER, le32_to_cpu(*dword));
190
191                 dev->i2c_op = 1;
192                 SAA7146_ISR_CLEAR(dev, MASK_16|MASK_17);
193                 SAA7146_IER_ENABLE(dev, MASK_16|MASK_17);
194                 saa7146_write(dev, MC2, (MASK_00 | MASK_16));
195
196                 timeout = HZ/100 + 1; /* 10ms */
197                 timeout = wait_event_interruptible_timeout(dev->i2c_wq, dev->i2c_op == 0, timeout);
198                 if (timeout == -ERESTARTSYS || dev->i2c_op) {
199                         SAA7146_IER_DISABLE(dev, MASK_16|MASK_17);
200                         SAA7146_ISR_CLEAR(dev, MASK_16|MASK_17);
201                         if (timeout == -ERESTARTSYS)
202                                 /* a signal arrived */
203                                 return -ERESTARTSYS;
204
205                         pr_warn("%s %s [irq]: timed out waiting for end of xfer\n",
206                                 dev->name, __func__);
207                         return -EIO;
208                 }
209                 status = saa7146_read(dev, I2C_STATUS);
210         } else {
211                 saa7146_write(dev, I2C_STATUS,   dev->i2c_bitrate);
212                 saa7146_write(dev, I2C_TRANSFER, le32_to_cpu(*dword));
213                 saa7146_write(dev, MC2, (MASK_00 | MASK_16));
214
215                 /* do not poll for i2c-status before upload is complete */
216                 timeout = jiffies + HZ/100 + 1; /* 10ms */
217                 while(1) {
218                         mc2 = (saa7146_read(dev, MC2) & 0x1);
219                         if( 0 != mc2 ) {
220                                 break;
221                         }
222                         if (time_after(jiffies,timeout)) {
223                                 pr_warn("%s %s: timed out waiting for MC2\n",
224                                         dev->name, __func__);
225                                 return -EIO;
226                         }
227                 }
228                 /* wait until we get a transfer done or error */
229                 timeout = jiffies + HZ/100 + 1; /* 10ms */
230                 /* first read usually delivers bogus results... */
231                 saa7146_i2c_status(dev);
232                 while(1) {
233                         status = saa7146_i2c_status(dev);
234                         if ((status & 0x3) != 1)
235                                 break;
236                         if (time_after(jiffies,timeout)) {
237                                 /* this is normal when probing the bus
238                                  * (no answer from nonexisistant device...)
239                                  */
240                                 pr_warn("%s %s [poll]: timed out waiting for end of xfer\n",
241                                         dev->name, __func__);
242                                 return -EIO;
243                         }
244                         if (++trial < 50 && short_delay)
245                                 udelay(10);
246                         else
247                                 msleep(1);
248                 }
249         }
250
251         /* give a detailed status report */
252         if ( 0 != (status & (SAA7146_I2C_SPERR | SAA7146_I2C_APERR |
253                              SAA7146_I2C_DTERR | SAA7146_I2C_DRERR |
254                              SAA7146_I2C_AL    | SAA7146_I2C_ERR   |
255                              SAA7146_I2C_BUSY)) ) {
256
257                 if ( 0 == (status & SAA7146_I2C_ERR) ||
258                      0 == (status & SAA7146_I2C_BUSY) ) {
259                         /* it may take some time until ERR goes high - ignore */
260                         DEB_I2C("unexpected i2c status %04x\n", status);
261                 }
262                 if( 0 != (status & SAA7146_I2C_SPERR) ) {
263                         DEB_I2C("error due to invalid start/stop condition\n");
264                 }
265                 if( 0 != (status & SAA7146_I2C_DTERR) ) {
266                         DEB_I2C("error in data transmission\n");
267                 }
268                 if( 0 != (status & SAA7146_I2C_DRERR) ) {
269                         DEB_I2C("error when receiving data\n");
270                 }
271                 if( 0 != (status & SAA7146_I2C_AL) ) {
272                         DEB_I2C("error because arbitration lost\n");
273                 }
274
275                 /* we handle address-errors here */
276                 if( 0 != (status & SAA7146_I2C_APERR) ) {
277                         DEB_I2C("error in address phase\n");
278                         return -EREMOTEIO;
279                 }
280
281                 return -EIO;
282         }
283
284         /* read back data, just in case we were reading ... */
285         *dword = cpu_to_le32(saa7146_read(dev, I2C_TRANSFER));
286
287         DEB_I2C("after: 0x%08x\n", *dword);
288         return 0;
289 }
290
291 static int saa7146_i2c_transfer(struct saa7146_dev *dev, const struct i2c_msg *msgs, int num, int retries)
292 {
293         int i = 0, count = 0;
294         __le32 *buffer = dev->d_i2c.cpu_addr;
295         int err = 0;
296         int short_delay = 0;
297
298         if (mutex_lock_interruptible(&dev->i2c_lock))
299                 return -ERESTARTSYS;
300
301         for(i=0;i<num;i++) {
302                 DEB_I2C("msg:%d/%d\n", i+1, num);
303         }
304
305         /* prepare the message(s), get number of u32s to transfer */
306         count = saa7146_i2c_msg_prepare(msgs, num, buffer);
307         if ( 0 > count ) {
308                 err = -EIO;
309                 goto out;
310         }
311
312         if ( count > 3 || 0 != (SAA7146_I2C_SHORT_DELAY & dev->ext->flags) )
313                 short_delay = 1;
314
315         do {
316                 /* reset the i2c-device if necessary */
317                 err = saa7146_i2c_reset(dev);
318                 if ( 0 > err ) {
319                         DEB_I2C("could not reset i2c-device\n");
320                         goto out;
321                 }
322
323                 /* write out the u32s one after another */
324                 for(i = 0; i < count; i++) {
325                         err = saa7146_i2c_writeout(dev, &buffer[i], short_delay);
326                         if ( 0 != err) {
327                                 /* this one is unsatisfying: some i2c slaves on some
328                                    dvb cards don't acknowledge correctly, so the saa7146
329                                    thinks that an address error occurred. in that case, the
330                                    transaction should be retrying, even if an address error
331                                    occurred. analog saa7146 based cards extensively rely on
332                                    i2c address probing, however, and address errors indicate that a
333                                    device is really *not* there. retrying in that case
334                                    increases the time the device needs to probe greatly, so
335                                    it should be avoided. So we bail out in irq mode after an
336                                    address error and trust the saa7146 address error detection. */
337                                 if (-EREMOTEIO == err && 0 != (SAA7146_USE_I2C_IRQ & dev->ext->flags))
338                                         goto out;
339                                 DEB_I2C("error while sending message(s). starting again\n");
340                                 break;
341                         }
342                 }
343                 if( 0 == err ) {
344                         err = num;
345                         break;
346                 }
347
348                 /* delay a bit before retrying */
349                 msleep(10);
350
351         } while (err != num && retries--);
352
353         /* quit if any error occurred */
354         if (err != num)
355                 goto out;
356
357         /* if any things had to be read, get the results */
358         if ( 0 != saa7146_i2c_msg_cleanup(msgs, num, buffer)) {
359                 DEB_I2C("could not cleanup i2c-message\n");
360                 err = -EIO;
361                 goto out;
362         }
363
364         /* return the number of delivered messages */
365         DEB_I2C("transmission successful. (msg:%d)\n", err);
366 out:
367         /* another bug in revision 0: the i2c-registers get uploaded randomly by other
368            uploads, so we better clear them out before continuing */
369         if( 0 == dev->revision ) {
370                 __le32 zero = 0;
371                 saa7146_i2c_reset(dev);
372                 if( 0 != saa7146_i2c_writeout(dev, &zero, short_delay)) {
373                         pr_info("revision 0 error. this should never happen\n");
374                 }
375         }
376
377         mutex_unlock(&dev->i2c_lock);
378         return err;
379 }
380
381 /* utility functions */
382 static int saa7146_i2c_xfer(struct i2c_adapter* adapter, struct i2c_msg *msg, int num)
383 {
384         struct v4l2_device *v4l2_dev = i2c_get_adapdata(adapter);
385         struct saa7146_dev *dev = to_saa7146_dev(v4l2_dev);
386
387         /* use helper function to transfer data */
388         return saa7146_i2c_transfer(dev, msg, num, adapter->retries);
389 }
390
391
392 /*****************************************************************************/
393 /* i2c-adapter helper functions                                              */
394
395 /* exported algorithm data */
396 static const struct i2c_algorithm saa7146_algo = {
397         .master_xfer    = saa7146_i2c_xfer,
398         .functionality  = saa7146_i2c_func,
399 };
400
401 int saa7146_i2c_adapter_prepare(struct saa7146_dev *dev, struct i2c_adapter *i2c_adapter, u32 bitrate)
402 {
403         DEB_EE("bitrate: 0x%08x\n", bitrate);
404
405         /* enable i2c-port pins */
406         saa7146_write(dev, MC1, (MASK_08 | MASK_24));
407
408         dev->i2c_bitrate = bitrate;
409         saa7146_i2c_reset(dev);
410
411         if (i2c_adapter) {
412                 i2c_set_adapdata(i2c_adapter, &dev->v4l2_dev);
413                 i2c_adapter->dev.parent    = &dev->pci->dev;
414                 i2c_adapter->algo          = &saa7146_algo;
415                 i2c_adapter->algo_data     = NULL;
416                 i2c_adapter->timeout = SAA7146_I2C_TIMEOUT;
417                 i2c_adapter->retries = SAA7146_I2C_RETRIES;
418         }
419
420         return 0;
421 }