GNU Linux-libre 6.7.9-gnu
[releases.git] / drivers / media / pci / netup_unidvb / netup_unidvb_i2c.c
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * netup_unidvb_i2c.c
4  *
5  * Internal I2C bus driver for NetUP Universal Dual DVB-CI
6  *
7  * Copyright (C) 2014 NetUP Inc.
8  * Copyright (C) 2014 Sergey Kozlov <serjk@netup.ru>
9  * Copyright (C) 2014 Abylay Ospan <aospan@netup.ru>
10  */
11
12 #include <linux/module.h>
13 #include <linux/moduleparam.h>
14 #include <linux/init.h>
15 #include <linux/delay.h>
16 #include "netup_unidvb.h"
17
18 #define NETUP_I2C_BUS0_ADDR             0x4800
19 #define NETUP_I2C_BUS1_ADDR             0x4840
20 #define NETUP_I2C_TIMEOUT               1000
21
22 /* twi_ctrl0_stat reg bits */
23 #define TWI_IRQEN_COMPL 0x1
24 #define TWI_IRQEN_ANACK 0x2
25 #define TWI_IRQEN_DNACK 0x4
26 #define TWI_IRQ_COMPL   (TWI_IRQEN_COMPL << 8)
27 #define TWI_IRQ_ANACK   (TWI_IRQEN_ANACK << 8)
28 #define TWI_IRQ_DNACK   (TWI_IRQEN_DNACK << 8)
29 #define TWI_IRQ_TX      0x800
30 #define TWI_IRQ_RX      0x1000
31 #define TWI_IRQEN       (TWI_IRQEN_COMPL | TWI_IRQEN_ANACK | TWI_IRQEN_DNACK)
32 /* twi_addr_ctrl1 reg bits*/
33 #define TWI_TRANSFER    0x100
34 #define TWI_NOSTOP      0x200
35 #define TWI_SOFT_RESET  0x2000
36 /* twi_clkdiv reg value */
37 #define TWI_CLKDIV      156
38 /* fifo_stat_ctrl reg bits */
39 #define FIFO_IRQEN      0x8000
40 #define FIFO_RESET      0x4000
41 /* FIFO size */
42 #define FIFO_SIZE       16
43
44 struct netup_i2c_fifo_regs {
45         union {
46                 __u8    data8;
47                 __le16  data16;
48                 __le32  data32;
49         };
50         __u8            padding[4];
51         __le16          stat_ctrl;
52 } __packed __aligned(1);
53
54 struct netup_i2c_regs {
55         __le16                          clkdiv;
56         __le16                          twi_ctrl0_stat;
57         __le16                          twi_addr_ctrl1;
58         __le16                          length;
59         __u8                            padding1[8];
60         struct netup_i2c_fifo_regs      tx_fifo;
61         __u8                            padding2[6];
62         struct netup_i2c_fifo_regs      rx_fifo;
63 } __packed __aligned(1);
64
65 irqreturn_t netup_i2c_interrupt(struct netup_i2c *i2c)
66 {
67         u16 reg, tmp;
68         unsigned long flags;
69         irqreturn_t iret = IRQ_HANDLED;
70
71         spin_lock_irqsave(&i2c->lock, flags);
72         reg = readw(&i2c->regs->twi_ctrl0_stat);
73         writew(reg & ~TWI_IRQEN, &i2c->regs->twi_ctrl0_stat);
74         dev_dbg(i2c->adap.dev.parent,
75                 "%s(): twi_ctrl0_state 0x%x\n", __func__, reg);
76         if ((reg & TWI_IRQEN_COMPL) != 0 && (reg & TWI_IRQ_COMPL)) {
77                 dev_dbg(i2c->adap.dev.parent,
78                         "%s(): TWI_IRQEN_COMPL\n", __func__);
79                 i2c->state = STATE_DONE;
80                 goto irq_ok;
81         }
82         if ((reg & TWI_IRQEN_ANACK) != 0 && (reg & TWI_IRQ_ANACK)) {
83                 dev_dbg(i2c->adap.dev.parent,
84                         "%s(): TWI_IRQEN_ANACK\n", __func__);
85                 i2c->state = STATE_ERROR;
86                 goto irq_ok;
87         }
88         if ((reg & TWI_IRQEN_DNACK) != 0 && (reg & TWI_IRQ_DNACK)) {
89                 dev_dbg(i2c->adap.dev.parent,
90                         "%s(): TWI_IRQEN_DNACK\n", __func__);
91                 i2c->state = STATE_ERROR;
92                 goto irq_ok;
93         }
94         if ((reg & TWI_IRQ_RX) != 0) {
95                 tmp = readw(&i2c->regs->rx_fifo.stat_ctrl);
96                 writew(tmp & ~FIFO_IRQEN, &i2c->regs->rx_fifo.stat_ctrl);
97                 i2c->state = STATE_WANT_READ;
98                 dev_dbg(i2c->adap.dev.parent,
99                         "%s(): want read\n", __func__);
100                 goto irq_ok;
101         }
102         if ((reg & TWI_IRQ_TX) != 0) {
103                 tmp = readw(&i2c->regs->tx_fifo.stat_ctrl);
104                 writew(tmp & ~FIFO_IRQEN, &i2c->regs->tx_fifo.stat_ctrl);
105                 i2c->state = STATE_WANT_WRITE;
106                 dev_dbg(i2c->adap.dev.parent,
107                         "%s(): want write\n", __func__);
108                 goto irq_ok;
109         }
110         dev_warn(&i2c->adap.dev, "%s(): not mine interrupt\n", __func__);
111         iret = IRQ_NONE;
112 irq_ok:
113         spin_unlock_irqrestore(&i2c->lock, flags);
114         if (iret == IRQ_HANDLED)
115                 wake_up(&i2c->wq);
116         return iret;
117 }
118
119 static void netup_i2c_reset(struct netup_i2c *i2c)
120 {
121         dev_dbg(i2c->adap.dev.parent, "%s()\n", __func__);
122         i2c->state = STATE_DONE;
123         writew(TWI_SOFT_RESET, &i2c->regs->twi_addr_ctrl1);
124         writew(TWI_CLKDIV, &i2c->regs->clkdiv);
125         writew(FIFO_RESET, &i2c->regs->tx_fifo.stat_ctrl);
126         writew(FIFO_RESET, &i2c->regs->rx_fifo.stat_ctrl);
127         writew(0x800, &i2c->regs->tx_fifo.stat_ctrl);
128         writew(0x800, &i2c->regs->rx_fifo.stat_ctrl);
129 }
130
131 static void netup_i2c_fifo_tx(struct netup_i2c *i2c)
132 {
133         u8 data;
134         u32 fifo_space = FIFO_SIZE -
135                 (readw(&i2c->regs->tx_fifo.stat_ctrl) & 0x3f);
136         u32 msg_length = i2c->msg->len - i2c->xmit_size;
137
138         msg_length = (msg_length < fifo_space ? msg_length : fifo_space);
139         while (msg_length--) {
140                 data = i2c->msg->buf[i2c->xmit_size++];
141                 writeb(data, &i2c->regs->tx_fifo.data8);
142                 dev_dbg(i2c->adap.dev.parent,
143                         "%s(): write 0x%02x\n", __func__, data);
144         }
145         if (i2c->xmit_size < i2c->msg->len) {
146                 dev_dbg(i2c->adap.dev.parent,
147                         "%s(): TX IRQ enabled\n", __func__);
148                 writew(readw(&i2c->regs->tx_fifo.stat_ctrl) | FIFO_IRQEN,
149                         &i2c->regs->tx_fifo.stat_ctrl);
150         }
151 }
152
153 static void netup_i2c_fifo_rx(struct netup_i2c *i2c)
154 {
155         u8 data;
156         u32 fifo_size = readw(&i2c->regs->rx_fifo.stat_ctrl) & 0x3f;
157
158         dev_dbg(i2c->adap.dev.parent,
159                 "%s(): RX fifo size %d\n", __func__, fifo_size);
160         while (fifo_size--) {
161                 data = readb(&i2c->regs->rx_fifo.data8);
162                 if ((i2c->msg->flags & I2C_M_RD) != 0 &&
163                                         i2c->xmit_size < i2c->msg->len) {
164                         i2c->msg->buf[i2c->xmit_size++] = data;
165                         dev_dbg(i2c->adap.dev.parent,
166                                 "%s(): read 0x%02x\n", __func__, data);
167                 }
168         }
169         if (i2c->xmit_size < i2c->msg->len) {
170                 dev_dbg(i2c->adap.dev.parent,
171                         "%s(): RX IRQ enabled\n", __func__);
172                 writew(readw(&i2c->regs->rx_fifo.stat_ctrl) | FIFO_IRQEN,
173                         &i2c->regs->rx_fifo.stat_ctrl);
174         }
175 }
176
177 static void netup_i2c_start_xfer(struct netup_i2c *i2c)
178 {
179         u16 rdflag = ((i2c->msg->flags & I2C_M_RD) ? 1 : 0);
180         u16 reg = readw(&i2c->regs->twi_ctrl0_stat);
181
182         writew(TWI_IRQEN | reg, &i2c->regs->twi_ctrl0_stat);
183         writew(i2c->msg->len, &i2c->regs->length);
184         writew(TWI_TRANSFER | (i2c->msg->addr << 1) | rdflag,
185                 &i2c->regs->twi_addr_ctrl1);
186         dev_dbg(i2c->adap.dev.parent,
187                 "%s(): length %d twi_addr_ctrl1 0x%x twi_ctrl0_stat 0x%x\n",
188                 __func__, readw(&i2c->regs->length),
189                 readw(&i2c->regs->twi_addr_ctrl1),
190                 readw(&i2c->regs->twi_ctrl0_stat));
191         i2c->state = STATE_WAIT;
192         i2c->xmit_size = 0;
193         if (!rdflag)
194                 netup_i2c_fifo_tx(i2c);
195         else
196                 writew(FIFO_IRQEN | readw(&i2c->regs->rx_fifo.stat_ctrl),
197                         &i2c->regs->rx_fifo.stat_ctrl);
198 }
199
200 static int netup_i2c_xfer(struct i2c_adapter *adap,
201                           struct i2c_msg *msgs, int num)
202 {
203         unsigned long flags;
204         int i, trans_done, res = num;
205         struct netup_i2c *i2c = i2c_get_adapdata(adap);
206         u16 reg;
207
208         spin_lock_irqsave(&i2c->lock, flags);
209         if (i2c->state != STATE_DONE) {
210                 dev_dbg(i2c->adap.dev.parent,
211                         "%s(): i2c->state == %d, resetting I2C\n",
212                         __func__, i2c->state);
213                 netup_i2c_reset(i2c);
214         }
215         dev_dbg(i2c->adap.dev.parent, "%s() num %d\n", __func__, num);
216         for (i = 0; i < num; i++) {
217                 i2c->msg = &msgs[i];
218                 netup_i2c_start_xfer(i2c);
219                 trans_done = 0;
220                 while (!trans_done) {
221                         spin_unlock_irqrestore(&i2c->lock, flags);
222                         if (wait_event_timeout(i2c->wq,
223                                         i2c->state != STATE_WAIT,
224                                         msecs_to_jiffies(NETUP_I2C_TIMEOUT))) {
225                                 spin_lock_irqsave(&i2c->lock, flags);
226                                 switch (i2c->state) {
227                                 case STATE_WANT_READ:
228                                         netup_i2c_fifo_rx(i2c);
229                                         break;
230                                 case STATE_WANT_WRITE:
231                                         netup_i2c_fifo_tx(i2c);
232                                         break;
233                                 case STATE_DONE:
234                                         if ((i2c->msg->flags & I2C_M_RD) != 0 &&
235                                                 i2c->xmit_size != i2c->msg->len)
236                                                 netup_i2c_fifo_rx(i2c);
237                                         dev_dbg(i2c->adap.dev.parent,
238                                                 "%s(): msg %d OK\n",
239                                                 __func__, i);
240                                         trans_done = 1;
241                                         break;
242                                 case STATE_ERROR:
243                                         res = -EIO;
244                                         dev_dbg(i2c->adap.dev.parent,
245                                                 "%s(): error state\n",
246                                                 __func__);
247                                         goto done;
248                                 default:
249                                         dev_dbg(i2c->adap.dev.parent,
250                                                 "%s(): invalid state %d\n",
251                                                 __func__, i2c->state);
252                                         res = -EINVAL;
253                                         goto done;
254                                 }
255                                 if (!trans_done) {
256                                         i2c->state = STATE_WAIT;
257                                         reg = readw(
258                                                 &i2c->regs->twi_ctrl0_stat);
259                                         writew(TWI_IRQEN | reg,
260                                                 &i2c->regs->twi_ctrl0_stat);
261                                 }
262                                 spin_unlock_irqrestore(&i2c->lock, flags);
263                         } else {
264                                 spin_lock_irqsave(&i2c->lock, flags);
265                                 dev_dbg(i2c->adap.dev.parent,
266                                         "%s(): wait timeout\n", __func__);
267                                 res = -ETIMEDOUT;
268                                 goto done;
269                         }
270                         spin_lock_irqsave(&i2c->lock, flags);
271                 }
272         }
273 done:
274         spin_unlock_irqrestore(&i2c->lock, flags);
275         dev_dbg(i2c->adap.dev.parent, "%s(): result %d\n", __func__, res);
276         return res;
277 }
278
279 static u32 netup_i2c_func(struct i2c_adapter *adap)
280 {
281         return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL;
282 }
283
284 static const struct i2c_algorithm netup_i2c_algorithm = {
285         .master_xfer    = netup_i2c_xfer,
286         .functionality  = netup_i2c_func,
287 };
288
289 static const struct i2c_adapter netup_i2c_adapter = {
290         .owner          = THIS_MODULE,
291         .name           = NETUP_UNIDVB_NAME,
292         .class          = I2C_CLASS_HWMON | I2C_CLASS_SPD,
293         .algo           = &netup_i2c_algorithm,
294 };
295
296 static int netup_i2c_init(struct netup_unidvb_dev *ndev, int bus_num)
297 {
298         int ret;
299         struct netup_i2c *i2c;
300
301         if (bus_num < 0 || bus_num > 1) {
302                 dev_err(&ndev->pci_dev->dev,
303                         "%s(): invalid bus_num %d\n", __func__, bus_num);
304                 return -EINVAL;
305         }
306         i2c = &ndev->i2c[bus_num];
307         spin_lock_init(&i2c->lock);
308         init_waitqueue_head(&i2c->wq);
309         i2c->regs = (struct netup_i2c_regs __iomem *)(ndev->bmmio0 +
310                 (bus_num == 0 ? NETUP_I2C_BUS0_ADDR : NETUP_I2C_BUS1_ADDR));
311         netup_i2c_reset(i2c);
312         i2c->adap = netup_i2c_adapter;
313         i2c->adap.dev.parent = &ndev->pci_dev->dev;
314         i2c_set_adapdata(&i2c->adap, i2c);
315         ret = i2c_add_adapter(&i2c->adap);
316         if (ret)
317                 return ret;
318         dev_info(&ndev->pci_dev->dev,
319                 "%s(): registered I2C bus %d at 0x%x\n",
320                 __func__,
321                 bus_num, (bus_num == 0 ?
322                         NETUP_I2C_BUS0_ADDR :
323                         NETUP_I2C_BUS1_ADDR));
324         return 0;
325 }
326
327 static void netup_i2c_remove(struct netup_unidvb_dev *ndev, int bus_num)
328 {
329         struct netup_i2c *i2c;
330
331         if (bus_num < 0 || bus_num > 1) {
332                 dev_err(&ndev->pci_dev->dev,
333                         "%s(): invalid bus number %d\n", __func__, bus_num);
334                 return;
335         }
336         i2c = &ndev->i2c[bus_num];
337         netup_i2c_reset(i2c);
338         /* remove adapter */
339         i2c_del_adapter(&i2c->adap);
340         dev_info(&ndev->pci_dev->dev,
341                 "netup_i2c_remove: unregistered I2C bus %d\n", bus_num);
342 }
343
344 int netup_i2c_register(struct netup_unidvb_dev *ndev)
345 {
346         int ret;
347
348         ret = netup_i2c_init(ndev, 0);
349         if (ret)
350                 return ret;
351         ret = netup_i2c_init(ndev, 1);
352         if (ret) {
353                 netup_i2c_remove(ndev, 0);
354                 return ret;
355         }
356         return 0;
357 }
358
359 void netup_i2c_unregister(struct netup_unidvb_dev *ndev)
360 {
361         netup_i2c_remove(ndev, 0);
362         netup_i2c_remove(ndev, 1);
363 }
364