1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * Wondermedia I2C Master Mode Driver
4 *
5 * Copyright (C) 2012 Tony Prisk <linux@prisktech.co.nz>
6 *
7 * Derived from GPLv2+ licensed source:
8 * - Copyright (C) 2008 WonderMedia Technologies, Inc.
9 */
10
11#include <linux/clk.h>
12#include <linux/delay.h>
13#include <linux/err.h>
14#include <linux/i2c.h>
15#include <linux/interrupt.h>
16#include <linux/io.h>
17#include <linux/module.h>
18#include <linux/of.h>
19#include <linux/of_address.h>
20#include <linux/of_irq.h>
21#include <linux/platform_device.h>
22
23#define REG_CR 0x00
24#define REG_TCR 0x02
25#define REG_CSR 0x04
26#define REG_ISR 0x06
27#define REG_IMR 0x08
28#define REG_CDR 0x0A
29#define REG_TR 0x0C
30#define REG_MCR 0x0E
31#define REG_SLAVE_CR 0x10
32#define REG_SLAVE_SR 0x12
33#define REG_SLAVE_ISR 0x14
34#define REG_SLAVE_IMR 0x16
35#define REG_SLAVE_DR 0x18
36#define REG_SLAVE_TR 0x1A
37
38/* REG_CR Bit fields */
39#define CR_TX_NEXT_ACK 0x0000
40#define CR_ENABLE 0x0001
41#define CR_TX_NEXT_NO_ACK 0x0002
42#define CR_TX_END 0x0004
43#define CR_CPU_RDY 0x0008
44#define SLAV_MODE_SEL 0x8000
45
46/* REG_TCR Bit fields */
47#define TCR_STANDARD_MODE 0x0000
48#define TCR_MASTER_WRITE 0x0000
49#define TCR_HS_MODE 0x2000
50#define TCR_MASTER_READ 0x4000
51#define TCR_FAST_MODE 0x8000
52#define TCR_SLAVE_ADDR_MASK 0x007F
53
54/* REG_ISR Bit fields */
55#define ISR_NACK_ADDR 0x0001
56#define ISR_BYTE_END 0x0002
57#define ISR_SCL_TIMEOUT 0x0004
58#define ISR_WRITE_ALL 0x0007
59
60/* REG_IMR Bit fields */
61#define IMR_ENABLE_ALL 0x0007
62
63/* REG_CSR Bit fields */
64#define CSR_RCV_NOT_ACK 0x0001
65#define CSR_RCV_ACK_MASK 0x0001
66#define CSR_READY_MASK 0x0002
67
68/* REG_TR */
69#define SCL_TIMEOUT(x) (((x) & 0xFF) << 8)
70#define TR_STD 0x0064
71#define TR_HS 0x0019
72
73/* REG_MCR */
74#define MCR_APB_96M 7
75#define MCR_APB_166M 12
76
77#define I2C_MODE_STANDARD 0
78#define I2C_MODE_FAST 1
79
80#define WMT_I2C_TIMEOUT (msecs_to_jiffies(1000))
81
82struct wmt_i2c_dev {
83 struct i2c_adapter adapter;
84 struct completion complete;
85 struct device *dev;
86 void __iomem *base;
87 struct clk *clk;
88 int mode;
89 int irq;
90 u16 cmd_status;
91};
92
93static int wmt_i2c_wait_bus_not_busy(struct wmt_i2c_dev *i2c_dev)
94{
95 unsigned long timeout;
96
97 timeout = jiffies + WMT_I2C_TIMEOUT;
98 while (!(readw(addr: i2c_dev->base + REG_CSR) & CSR_READY_MASK)) {
99 if (time_after(jiffies, timeout)) {
100 dev_warn(i2c_dev->dev, "timeout waiting for bus ready\n");
101 return -EBUSY;
102 }
103 msleep(msecs: 20);
104 }
105
106 return 0;
107}
108
109static int wmt_check_status(struct wmt_i2c_dev *i2c_dev)
110{
111 int ret = 0;
112
113 if (i2c_dev->cmd_status & ISR_NACK_ADDR)
114 ret = -EIO;
115
116 if (i2c_dev->cmd_status & ISR_SCL_TIMEOUT)
117 ret = -ETIMEDOUT;
118
119 return ret;
120}
121
122static int wmt_i2c_write(struct i2c_adapter *adap, struct i2c_msg *pmsg,
123 int last)
124{
125 struct wmt_i2c_dev *i2c_dev = i2c_get_adapdata(adap);
126 u16 val, tcr_val;
127 int ret;
128 unsigned long wait_result;
129 int xfer_len = 0;
130
131 if (!(pmsg->flags & I2C_M_NOSTART)) {
132 ret = wmt_i2c_wait_bus_not_busy(i2c_dev);
133 if (ret < 0)
134 return ret;
135 }
136
137 if (pmsg->len == 0) {
138 /*
139 * We still need to run through the while (..) once, so
140 * start at -1 and break out early from the loop
141 */
142 xfer_len = -1;
143 writew(val: 0, addr: i2c_dev->base + REG_CDR);
144 } else {
145 writew(val: pmsg->buf[0] & 0xFF, addr: i2c_dev->base + REG_CDR);
146 }
147
148 if (!(pmsg->flags & I2C_M_NOSTART)) {
149 val = readw(addr: i2c_dev->base + REG_CR);
150 val &= ~CR_TX_END;
151 writew(val, addr: i2c_dev->base + REG_CR);
152
153 val = readw(addr: i2c_dev->base + REG_CR);
154 val |= CR_CPU_RDY;
155 writew(val, addr: i2c_dev->base + REG_CR);
156 }
157
158 reinit_completion(x: &i2c_dev->complete);
159
160 if (i2c_dev->mode == I2C_MODE_STANDARD)
161 tcr_val = TCR_STANDARD_MODE;
162 else
163 tcr_val = TCR_FAST_MODE;
164
165 tcr_val |= (TCR_MASTER_WRITE | (pmsg->addr & TCR_SLAVE_ADDR_MASK));
166
167 writew(val: tcr_val, addr: i2c_dev->base + REG_TCR);
168
169 if (pmsg->flags & I2C_M_NOSTART) {
170 val = readw(addr: i2c_dev->base + REG_CR);
171 val |= CR_CPU_RDY;
172 writew(val, addr: i2c_dev->base + REG_CR);
173 }
174
175 while (xfer_len < pmsg->len) {
176 wait_result = wait_for_completion_timeout(x: &i2c_dev->complete,
177 timeout: msecs_to_jiffies(m: 500));
178
179 if (wait_result == 0)
180 return -ETIMEDOUT;
181
182 ret = wmt_check_status(i2c_dev);
183 if (ret)
184 return ret;
185
186 xfer_len++;
187
188 val = readw(addr: i2c_dev->base + REG_CSR);
189 if ((val & CSR_RCV_ACK_MASK) == CSR_RCV_NOT_ACK) {
190 dev_dbg(i2c_dev->dev, "write RCV NACK error\n");
191 return -EIO;
192 }
193
194 if (pmsg->len == 0) {
195 val = CR_TX_END | CR_CPU_RDY | CR_ENABLE;
196 writew(val, addr: i2c_dev->base + REG_CR);
197 break;
198 }
199
200 if (xfer_len == pmsg->len) {
201 if (last != 1)
202 writew(CR_ENABLE, addr: i2c_dev->base + REG_CR);
203 } else {
204 writew(val: pmsg->buf[xfer_len] & 0xFF, addr: i2c_dev->base +
205 REG_CDR);
206 writew(CR_CPU_RDY | CR_ENABLE, addr: i2c_dev->base + REG_CR);
207 }
208 }
209
210 return 0;
211}
212
213static int wmt_i2c_read(struct i2c_adapter *adap, struct i2c_msg *pmsg,
214 int last)
215{
216 struct wmt_i2c_dev *i2c_dev = i2c_get_adapdata(adap);
217 u16 val, tcr_val;
218 int ret;
219 unsigned long wait_result;
220 u32 xfer_len = 0;
221
222 if (!(pmsg->flags & I2C_M_NOSTART)) {
223 ret = wmt_i2c_wait_bus_not_busy(i2c_dev);
224 if (ret < 0)
225 return ret;
226 }
227
228 val = readw(addr: i2c_dev->base + REG_CR);
229 val &= ~CR_TX_END;
230 writew(val, addr: i2c_dev->base + REG_CR);
231
232 val = readw(addr: i2c_dev->base + REG_CR);
233 val &= ~CR_TX_NEXT_NO_ACK;
234 writew(val, addr: i2c_dev->base + REG_CR);
235
236 if (!(pmsg->flags & I2C_M_NOSTART)) {
237 val = readw(addr: i2c_dev->base + REG_CR);
238 val |= CR_CPU_RDY;
239 writew(val, addr: i2c_dev->base + REG_CR);
240 }
241
242 if (pmsg->len == 1) {
243 val = readw(addr: i2c_dev->base + REG_CR);
244 val |= CR_TX_NEXT_NO_ACK;
245 writew(val, addr: i2c_dev->base + REG_CR);
246 }
247
248 reinit_completion(x: &i2c_dev->complete);
249
250 if (i2c_dev->mode == I2C_MODE_STANDARD)
251 tcr_val = TCR_STANDARD_MODE;
252 else
253 tcr_val = TCR_FAST_MODE;
254
255 tcr_val |= TCR_MASTER_READ | (pmsg->addr & TCR_SLAVE_ADDR_MASK);
256
257 writew(val: tcr_val, addr: i2c_dev->base + REG_TCR);
258
259 if (pmsg->flags & I2C_M_NOSTART) {
260 val = readw(addr: i2c_dev->base + REG_CR);
261 val |= CR_CPU_RDY;
262 writew(val, addr: i2c_dev->base + REG_CR);
263 }
264
265 while (xfer_len < pmsg->len) {
266 wait_result = wait_for_completion_timeout(x: &i2c_dev->complete,
267 timeout: msecs_to_jiffies(m: 500));
268
269 if (!wait_result)
270 return -ETIMEDOUT;
271
272 ret = wmt_check_status(i2c_dev);
273 if (ret)
274 return ret;
275
276 pmsg->buf[xfer_len] = readw(addr: i2c_dev->base + REG_CDR) >> 8;
277 xfer_len++;
278
279 if (xfer_len == pmsg->len - 1) {
280 val = readw(addr: i2c_dev->base + REG_CR);
281 val |= (CR_TX_NEXT_NO_ACK | CR_CPU_RDY);
282 writew(val, addr: i2c_dev->base + REG_CR);
283 } else {
284 val = readw(addr: i2c_dev->base + REG_CR);
285 val |= CR_CPU_RDY;
286 writew(val, addr: i2c_dev->base + REG_CR);
287 }
288 }
289
290 return 0;
291}
292
293static int wmt_i2c_xfer(struct i2c_adapter *adap,
294 struct i2c_msg msgs[],
295 int num)
296{
297 struct i2c_msg *pmsg;
298 int i, is_last;
299 int ret = 0;
300
301 for (i = 0; ret >= 0 && i < num; i++) {
302 is_last = ((i + 1) == num);
303
304 pmsg = &msgs[i];
305 if (pmsg->flags & I2C_M_RD)
306 ret = wmt_i2c_read(adap, pmsg, last: is_last);
307 else
308 ret = wmt_i2c_write(adap, pmsg, last: is_last);
309 }
310
311 return (ret < 0) ? ret : i;
312}
313
314static u32 wmt_i2c_func(struct i2c_adapter *adap)
315{
316 return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL | I2C_FUNC_NOSTART;
317}
318
319static const struct i2c_algorithm wmt_i2c_algo = {
320 .master_xfer = wmt_i2c_xfer,
321 .functionality = wmt_i2c_func,
322};
323
324static irqreturn_t wmt_i2c_isr(int irq, void *data)
325{
326 struct wmt_i2c_dev *i2c_dev = data;
327
328 /* save the status and write-clear it */
329 i2c_dev->cmd_status = readw(addr: i2c_dev->base + REG_ISR);
330 writew(val: i2c_dev->cmd_status, addr: i2c_dev->base + REG_ISR);
331
332 complete(&i2c_dev->complete);
333
334 return IRQ_HANDLED;
335}
336
337static int wmt_i2c_reset_hardware(struct wmt_i2c_dev *i2c_dev)
338{
339 int err;
340
341 err = clk_prepare_enable(clk: i2c_dev->clk);
342 if (err) {
343 dev_err(i2c_dev->dev, "failed to enable clock\n");
344 return err;
345 }
346
347 err = clk_set_rate(clk: i2c_dev->clk, rate: 20000000);
348 if (err) {
349 dev_err(i2c_dev->dev, "failed to set clock = 20Mhz\n");
350 clk_disable_unprepare(clk: i2c_dev->clk);
351 return err;
352 }
353
354 writew(val: 0, addr: i2c_dev->base + REG_CR);
355 writew(MCR_APB_166M, addr: i2c_dev->base + REG_MCR);
356 writew(ISR_WRITE_ALL, addr: i2c_dev->base + REG_ISR);
357 writew(IMR_ENABLE_ALL, addr: i2c_dev->base + REG_IMR);
358 writew(CR_ENABLE, addr: i2c_dev->base + REG_CR);
359 readw(addr: i2c_dev->base + REG_CSR); /* read clear */
360 writew(ISR_WRITE_ALL, addr: i2c_dev->base + REG_ISR);
361
362 if (i2c_dev->mode == I2C_MODE_STANDARD)
363 writew(SCL_TIMEOUT(128) | TR_STD, addr: i2c_dev->base + REG_TR);
364 else
365 writew(SCL_TIMEOUT(128) | TR_HS, addr: i2c_dev->base + REG_TR);
366
367 return 0;
368}
369
370static int wmt_i2c_probe(struct platform_device *pdev)
371{
372 struct device_node *np = pdev->dev.of_node;
373 struct wmt_i2c_dev *i2c_dev;
374 struct i2c_adapter *adap;
375 int err;
376 u32 clk_rate;
377
378 i2c_dev = devm_kzalloc(dev: &pdev->dev, size: sizeof(*i2c_dev), GFP_KERNEL);
379 if (!i2c_dev)
380 return -ENOMEM;
381
382 i2c_dev->base = devm_platform_get_and_ioremap_resource(pdev, index: 0, NULL);
383 if (IS_ERR(ptr: i2c_dev->base))
384 return PTR_ERR(ptr: i2c_dev->base);
385
386 i2c_dev->irq = irq_of_parse_and_map(node: np, index: 0);
387 if (!i2c_dev->irq) {
388 dev_err(&pdev->dev, "irq missing or invalid\n");
389 return -EINVAL;
390 }
391
392 i2c_dev->clk = of_clk_get(np, index: 0);
393 if (IS_ERR(ptr: i2c_dev->clk)) {
394 dev_err(&pdev->dev, "unable to request clock\n");
395 return PTR_ERR(ptr: i2c_dev->clk);
396 }
397
398 i2c_dev->mode = I2C_MODE_STANDARD;
399 err = of_property_read_u32(np, propname: "clock-frequency", out_value: &clk_rate);
400 if (!err && (clk_rate == I2C_MAX_FAST_MODE_FREQ))
401 i2c_dev->mode = I2C_MODE_FAST;
402
403 i2c_dev->dev = &pdev->dev;
404
405 err = devm_request_irq(dev: &pdev->dev, irq: i2c_dev->irq, handler: wmt_i2c_isr, irqflags: 0,
406 devname: "i2c", dev_id: i2c_dev);
407 if (err) {
408 dev_err(&pdev->dev, "failed to request irq %i\n", i2c_dev->irq);
409 return err;
410 }
411
412 adap = &i2c_dev->adapter;
413 i2c_set_adapdata(adap, data: i2c_dev);
414 strscpy(p: adap->name, q: "WMT I2C adapter", size: sizeof(adap->name));
415 adap->owner = THIS_MODULE;
416 adap->algo = &wmt_i2c_algo;
417 adap->dev.parent = &pdev->dev;
418 adap->dev.of_node = pdev->dev.of_node;
419
420 init_completion(x: &i2c_dev->complete);
421
422 err = wmt_i2c_reset_hardware(i2c_dev);
423 if (err) {
424 dev_err(&pdev->dev, "error initializing hardware\n");
425 return err;
426 }
427
428 err = i2c_add_adapter(adap);
429 if (err)
430 return err;
431
432 platform_set_drvdata(pdev, data: i2c_dev);
433
434 return 0;
435}
436
437static void wmt_i2c_remove(struct platform_device *pdev)
438{
439 struct wmt_i2c_dev *i2c_dev = platform_get_drvdata(pdev);
440
441 /* Disable interrupts, clock and delete adapter */
442 writew(val: 0, addr: i2c_dev->base + REG_IMR);
443 clk_disable_unprepare(clk: i2c_dev->clk);
444 i2c_del_adapter(adap: &i2c_dev->adapter);
445}
446
447static const struct of_device_id wmt_i2c_dt_ids[] = {
448 { .compatible = "wm,wm8505-i2c" },
449 { /* Sentinel */ },
450};
451
452static struct platform_driver wmt_i2c_driver = {
453 .probe = wmt_i2c_probe,
454 .remove_new = wmt_i2c_remove,
455 .driver = {
456 .name = "wmt-i2c",
457 .of_match_table = wmt_i2c_dt_ids,
458 },
459};
460
461module_platform_driver(wmt_i2c_driver);
462
463MODULE_DESCRIPTION("Wondermedia I2C master-mode bus adapter");
464MODULE_AUTHOR("Tony Prisk <linux@prisktech.co.nz>");
465MODULE_LICENSE("GPL");
466MODULE_DEVICE_TABLE(of, wmt_i2c_dt_ids);
467

source code of linux/drivers/i2c/busses/i2c-wmt.c