1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * Copyright (C) 2014 Uwe Kleine-Koenig for Pengutronix
4 */
5 #include <linux/module.h>
6 #include <linux/platform_device.h>
7 #include <linux/i2c.h>
8 #include <linux/io.h>
9 #include <linux/interrupt.h>
10 #include <linux/err.h>
11 #include <linux/clk.h>
12
13 #define DRIVER_NAME "efm32-i2c"
14
15 #define MASK_VAL(mask, val) ((val << __ffs(mask)) & mask)
16
17 #define REG_CTRL 0x00
18 #define REG_CTRL_EN 0x00001
19 #define REG_CTRL_SLAVE 0x00002
20 #define REG_CTRL_AUTOACK 0x00004
21 #define REG_CTRL_AUTOSE 0x00008
22 #define REG_CTRL_AUTOSN 0x00010
23 #define REG_CTRL_ARBDIS 0x00020
24 #define REG_CTRL_GCAMEN 0x00040
25 #define REG_CTRL_CLHR__MASK 0x00300
26 #define REG_CTRL_BITO__MASK 0x03000
27 #define REG_CTRL_BITO_OFF 0x00000
28 #define REG_CTRL_BITO_40PCC 0x01000
29 #define REG_CTRL_BITO_80PCC 0x02000
30 #define REG_CTRL_BITO_160PCC 0x03000
31 #define REG_CTRL_GIBITO 0x08000
32 #define REG_CTRL_CLTO__MASK 0x70000
33 #define REG_CTRL_CLTO_OFF 0x00000
34
35 #define REG_CMD 0x04
36 #define REG_CMD_START 0x00001
37 #define REG_CMD_STOP 0x00002
38 #define REG_CMD_ACK 0x00004
39 #define REG_CMD_NACK 0x00008
40 #define REG_CMD_CONT 0x00010
41 #define REG_CMD_ABORT 0x00020
42 #define REG_CMD_CLEARTX 0x00040
43 #define REG_CMD_CLEARPC 0x00080
44
45 #define REG_STATE 0x08
46 #define REG_STATE_BUSY 0x00001
47 #define REG_STATE_MASTER 0x00002
48 #define REG_STATE_TRANSMITTER 0x00004
49 #define REG_STATE_NACKED 0x00008
50 #define REG_STATE_BUSHOLD 0x00010
51 #define REG_STATE_STATE__MASK 0x000e0
52 #define REG_STATE_STATE_IDLE 0x00000
53 #define REG_STATE_STATE_WAIT 0x00020
54 #define REG_STATE_STATE_START 0x00040
55 #define REG_STATE_STATE_ADDR 0x00060
56 #define REG_STATE_STATE_ADDRACK 0x00080
57 #define REG_STATE_STATE_DATA 0x000a0
58 #define REG_STATE_STATE_DATAACK 0x000c0
59
60 #define REG_STATUS 0x0c
61 #define REG_STATUS_PSTART 0x00001
62 #define REG_STATUS_PSTOP 0x00002
63 #define REG_STATUS_PACK 0x00004
64 #define REG_STATUS_PNACK 0x00008
65 #define REG_STATUS_PCONT 0x00010
66 #define REG_STATUS_PABORT 0x00020
67 #define REG_STATUS_TXC 0x00040
68 #define REG_STATUS_TXBL 0x00080
69 #define REG_STATUS_RXDATAV 0x00100
70
71 #define REG_CLKDIV 0x10
72 #define REG_CLKDIV_DIV__MASK 0x001ff
73 #define REG_CLKDIV_DIV(div) MASK_VAL(REG_CLKDIV_DIV__MASK, (div))
74
75 #define REG_SADDR 0x14
76 #define REG_SADDRMASK 0x18
77 #define REG_RXDATA 0x1c
78 #define REG_RXDATAP 0x20
79 #define REG_TXDATA 0x24
80 #define REG_IF 0x28
81 #define REG_IF_START 0x00001
82 #define REG_IF_RSTART 0x00002
83 #define REG_IF_ADDR 0x00004
84 #define REG_IF_TXC 0x00008
85 #define REG_IF_TXBL 0x00010
86 #define REG_IF_RXDATAV 0x00020
87 #define REG_IF_ACK 0x00040
88 #define REG_IF_NACK 0x00080
89 #define REG_IF_MSTOP 0x00100
90 #define REG_IF_ARBLOST 0x00200
91 #define REG_IF_BUSERR 0x00400
92 #define REG_IF_BUSHOLD 0x00800
93 #define REG_IF_TXOF 0x01000
94 #define REG_IF_RXUF 0x02000
95 #define REG_IF_BITO 0x04000
96 #define REG_IF_CLTO 0x08000
97 #define REG_IF_SSTOP 0x10000
98
99 #define REG_IFS 0x2c
100 #define REG_IFC 0x30
101 #define REG_IFC__MASK 0x1ffcf
102
103 #define REG_IEN 0x34
104
105 #define REG_ROUTE 0x38
106 #define REG_ROUTE_SDAPEN 0x00001
107 #define REG_ROUTE_SCLPEN 0x00002
108 #define REG_ROUTE_LOCATION__MASK 0x00700
109 #define REG_ROUTE_LOCATION(n) MASK_VAL(REG_ROUTE_LOCATION__MASK, (n))
110
111 struct efm32_i2c_ddata {
112 struct i2c_adapter adapter;
113
114 struct clk *clk;
115 void __iomem *base;
116 unsigned int irq;
117 u8 location;
118 unsigned long frequency;
119
120 /* transfer data */
121 struct completion done;
122 struct i2c_msg *msgs;
123 size_t num_msgs;
124 size_t current_word, current_msg;
125 int retval;
126 };
127
efm32_i2c_read32(struct efm32_i2c_ddata * ddata,unsigned offset)128 static u32 efm32_i2c_read32(struct efm32_i2c_ddata *ddata, unsigned offset)
129 {
130 return readl(ddata->base + offset);
131 }
132
efm32_i2c_write32(struct efm32_i2c_ddata * ddata,unsigned offset,u32 value)133 static void efm32_i2c_write32(struct efm32_i2c_ddata *ddata,
134 unsigned offset, u32 value)
135 {
136 writel(value, ddata->base + offset);
137 }
138
efm32_i2c_send_next_msg(struct efm32_i2c_ddata * ddata)139 static void efm32_i2c_send_next_msg(struct efm32_i2c_ddata *ddata)
140 {
141 struct i2c_msg *cur_msg = &ddata->msgs[ddata->current_msg];
142
143 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_START);
144 efm32_i2c_write32(ddata, REG_TXDATA, i2c_8bit_addr_from_msg(cur_msg));
145 }
146
efm32_i2c_send_next_byte(struct efm32_i2c_ddata * ddata)147 static void efm32_i2c_send_next_byte(struct efm32_i2c_ddata *ddata)
148 {
149 struct i2c_msg *cur_msg = &ddata->msgs[ddata->current_msg];
150
151 if (ddata->current_word >= cur_msg->len) {
152 /* cur_msg completely transferred */
153 ddata->current_word = 0;
154 ddata->current_msg += 1;
155
156 if (ddata->current_msg >= ddata->num_msgs) {
157 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_STOP);
158 complete(&ddata->done);
159 } else {
160 efm32_i2c_send_next_msg(ddata);
161 }
162 } else {
163 efm32_i2c_write32(ddata, REG_TXDATA,
164 cur_msg->buf[ddata->current_word++]);
165 }
166 }
167
efm32_i2c_recv_next_byte(struct efm32_i2c_ddata * ddata)168 static void efm32_i2c_recv_next_byte(struct efm32_i2c_ddata *ddata)
169 {
170 struct i2c_msg *cur_msg = &ddata->msgs[ddata->current_msg];
171
172 cur_msg->buf[ddata->current_word] = efm32_i2c_read32(ddata, REG_RXDATA);
173 ddata->current_word += 1;
174 if (ddata->current_word >= cur_msg->len) {
175 /* cur_msg completely transferred */
176 ddata->current_word = 0;
177 ddata->current_msg += 1;
178
179 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_NACK);
180
181 if (ddata->current_msg >= ddata->num_msgs) {
182 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_STOP);
183 complete(&ddata->done);
184 } else {
185 efm32_i2c_send_next_msg(ddata);
186 }
187 } else {
188 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_ACK);
189 }
190 }
191
efm32_i2c_irq(int irq,void * dev_id)192 static irqreturn_t efm32_i2c_irq(int irq, void *dev_id)
193 {
194 struct efm32_i2c_ddata *ddata = dev_id;
195 struct i2c_msg *cur_msg = &ddata->msgs[ddata->current_msg];
196 u32 irqflag = efm32_i2c_read32(ddata, REG_IF);
197 u32 state = efm32_i2c_read32(ddata, REG_STATE);
198
199 efm32_i2c_write32(ddata, REG_IFC, irqflag & REG_IFC__MASK);
200
201 switch (state & REG_STATE_STATE__MASK) {
202 case REG_STATE_STATE_IDLE:
203 /* arbitration lost? */
204 ddata->retval = -EAGAIN;
205 complete(&ddata->done);
206 break;
207 case REG_STATE_STATE_WAIT:
208 /*
209 * huh, this shouldn't happen.
210 * Reset hardware state and get out
211 */
212 ddata->retval = -EIO;
213 efm32_i2c_write32(ddata, REG_CMD,
214 REG_CMD_STOP | REG_CMD_ABORT |
215 REG_CMD_CLEARTX | REG_CMD_CLEARPC);
216 complete(&ddata->done);
217 break;
218 case REG_STATE_STATE_START:
219 /* "caller" is expected to send an address */
220 break;
221 case REG_STATE_STATE_ADDR:
222 /* wait for Ack or NAck of slave */
223 break;
224 case REG_STATE_STATE_ADDRACK:
225 if (state & REG_STATE_NACKED) {
226 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_STOP);
227 ddata->retval = -ENXIO;
228 complete(&ddata->done);
229 } else if (cur_msg->flags & I2C_M_RD) {
230 /* wait for slave to send first data byte */
231 } else {
232 efm32_i2c_send_next_byte(ddata);
233 }
234 break;
235 case REG_STATE_STATE_DATA:
236 if (cur_msg->flags & I2C_M_RD) {
237 efm32_i2c_recv_next_byte(ddata);
238 } else {
239 /* wait for Ack or Nack of slave */
240 }
241 break;
242 case REG_STATE_STATE_DATAACK:
243 if (state & REG_STATE_NACKED) {
244 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_STOP);
245 complete(&ddata->done);
246 } else {
247 efm32_i2c_send_next_byte(ddata);
248 }
249 }
250
251 return IRQ_HANDLED;
252 }
253
efm32_i2c_master_xfer(struct i2c_adapter * adap,struct i2c_msg * msgs,int num)254 static int efm32_i2c_master_xfer(struct i2c_adapter *adap,
255 struct i2c_msg *msgs, int num)
256 {
257 struct efm32_i2c_ddata *ddata = i2c_get_adapdata(adap);
258 int ret;
259
260 if (ddata->msgs)
261 return -EBUSY;
262
263 ddata->msgs = msgs;
264 ddata->num_msgs = num;
265 ddata->current_word = 0;
266 ddata->current_msg = 0;
267 ddata->retval = -EIO;
268
269 reinit_completion(&ddata->done);
270
271 dev_dbg(&ddata->adapter.dev, "state: %08x, status: %08x\n",
272 efm32_i2c_read32(ddata, REG_STATE),
273 efm32_i2c_read32(ddata, REG_STATUS));
274
275 efm32_i2c_send_next_msg(ddata);
276
277 wait_for_completion(&ddata->done);
278
279 if (ddata->current_msg >= ddata->num_msgs)
280 ret = ddata->num_msgs;
281 else
282 ret = ddata->retval;
283
284 return ret;
285 }
286
efm32_i2c_functionality(struct i2c_adapter * adap)287 static u32 efm32_i2c_functionality(struct i2c_adapter *adap)
288 {
289 return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL;
290 }
291
292 static const struct i2c_algorithm efm32_i2c_algo = {
293 .master_xfer = efm32_i2c_master_xfer,
294 .functionality = efm32_i2c_functionality,
295 };
296
efm32_i2c_get_configured_location(struct efm32_i2c_ddata * ddata)297 static u32 efm32_i2c_get_configured_location(struct efm32_i2c_ddata *ddata)
298 {
299 u32 reg = efm32_i2c_read32(ddata, REG_ROUTE);
300
301 return (reg & REG_ROUTE_LOCATION__MASK) >>
302 __ffs(REG_ROUTE_LOCATION__MASK);
303 }
304
efm32_i2c_probe(struct platform_device * pdev)305 static int efm32_i2c_probe(struct platform_device *pdev)
306 {
307 struct efm32_i2c_ddata *ddata;
308 struct resource *res;
309 unsigned long rate;
310 struct device_node *np = pdev->dev.of_node;
311 u32 location, frequency;
312 int ret;
313 u32 clkdiv;
314
315 ddata = devm_kzalloc(&pdev->dev, sizeof(*ddata), GFP_KERNEL);
316 if (!ddata)
317 return -ENOMEM;
318 platform_set_drvdata(pdev, ddata);
319
320 init_completion(&ddata->done);
321 strlcpy(ddata->adapter.name, pdev->name, sizeof(ddata->adapter.name));
322 ddata->adapter.owner = THIS_MODULE;
323 ddata->adapter.algo = &efm32_i2c_algo;
324 ddata->adapter.dev.parent = &pdev->dev;
325 ddata->adapter.dev.of_node = pdev->dev.of_node;
326 i2c_set_adapdata(&ddata->adapter, ddata);
327
328 ddata->clk = devm_clk_get(&pdev->dev, NULL);
329 if (IS_ERR(ddata->clk)) {
330 ret = PTR_ERR(ddata->clk);
331 dev_err(&pdev->dev, "failed to get clock: %d\n", ret);
332 return ret;
333 }
334
335 ddata->base = devm_platform_get_and_ioremap_resource(pdev, 0, &res);
336 if (IS_ERR(ddata->base))
337 return PTR_ERR(ddata->base);
338
339 if (resource_size(res) < 0x42) {
340 dev_err(&pdev->dev, "memory resource too small\n");
341 return -EINVAL;
342 }
343
344 ret = platform_get_irq(pdev, 0);
345 if (ret <= 0) {
346 if (!ret)
347 ret = -EINVAL;
348 return ret;
349 }
350
351 ddata->irq = ret;
352
353 ret = clk_prepare_enable(ddata->clk);
354 if (ret < 0) {
355 dev_err(&pdev->dev, "failed to enable clock (%d)\n", ret);
356 return ret;
357 }
358
359
360 ret = of_property_read_u32(np, "energymicro,location", &location);
361
362 if (ret)
363 /* fall back to wrongly namespaced property */
364 ret = of_property_read_u32(np, "efm32,location", &location);
365
366 if (!ret) {
367 dev_dbg(&pdev->dev, "using location %u\n", location);
368 } else {
369 /* default to location configured in hardware */
370 location = efm32_i2c_get_configured_location(ddata);
371
372 dev_info(&pdev->dev, "fall back to location %u\n", location);
373 }
374
375 ddata->location = location;
376
377 ret = of_property_read_u32(np, "clock-frequency", &frequency);
378 if (!ret) {
379 dev_dbg(&pdev->dev, "using frequency %u\n", frequency);
380 } else {
381 frequency = I2C_MAX_STANDARD_MODE_FREQ;
382 dev_info(&pdev->dev, "defaulting to 100 kHz\n");
383 }
384 ddata->frequency = frequency;
385
386 rate = clk_get_rate(ddata->clk);
387 if (!rate) {
388 dev_err(&pdev->dev, "there is no input clock available\n");
389 ret = -EINVAL;
390 goto err_disable_clk;
391 }
392 clkdiv = DIV_ROUND_UP(rate, 8 * ddata->frequency) - 1;
393 if (clkdiv >= 0x200) {
394 dev_err(&pdev->dev,
395 "input clock too fast (%lu) to divide down to bus freq (%lu)",
396 rate, ddata->frequency);
397 ret = -EINVAL;
398 goto err_disable_clk;
399 }
400
401 dev_dbg(&pdev->dev, "input clock = %lu, bus freq = %lu, clkdiv = %lu\n",
402 rate, ddata->frequency, (unsigned long)clkdiv);
403 efm32_i2c_write32(ddata, REG_CLKDIV, REG_CLKDIV_DIV(clkdiv));
404
405 efm32_i2c_write32(ddata, REG_ROUTE, REG_ROUTE_SDAPEN |
406 REG_ROUTE_SCLPEN |
407 REG_ROUTE_LOCATION(ddata->location));
408
409 efm32_i2c_write32(ddata, REG_CTRL, REG_CTRL_EN |
410 REG_CTRL_BITO_160PCC | 0 * REG_CTRL_GIBITO);
411
412 efm32_i2c_write32(ddata, REG_IFC, REG_IFC__MASK);
413 efm32_i2c_write32(ddata, REG_IEN, REG_IF_TXC | REG_IF_ACK | REG_IF_NACK
414 | REG_IF_ARBLOST | REG_IF_BUSERR | REG_IF_RXDATAV);
415
416 /* to make bus idle */
417 efm32_i2c_write32(ddata, REG_CMD, REG_CMD_ABORT);
418
419 ret = request_irq(ddata->irq, efm32_i2c_irq, 0, DRIVER_NAME, ddata);
420 if (ret < 0) {
421 dev_err(&pdev->dev, "failed to request irq (%d)\n", ret);
422 goto err_disable_clk;
423 }
424
425 ret = i2c_add_adapter(&ddata->adapter);
426 if (ret) {
427 free_irq(ddata->irq, ddata);
428
429 err_disable_clk:
430 clk_disable_unprepare(ddata->clk);
431 }
432 return ret;
433 }
434
efm32_i2c_remove(struct platform_device * pdev)435 static int efm32_i2c_remove(struct platform_device *pdev)
436 {
437 struct efm32_i2c_ddata *ddata = platform_get_drvdata(pdev);
438
439 i2c_del_adapter(&ddata->adapter);
440 free_irq(ddata->irq, ddata);
441 clk_disable_unprepare(ddata->clk);
442
443 return 0;
444 }
445
446 static const struct of_device_id efm32_i2c_dt_ids[] = {
447 {
448 .compatible = "energymicro,efm32-i2c",
449 }, {
450 /* sentinel */
451 }
452 };
453 MODULE_DEVICE_TABLE(of, efm32_i2c_dt_ids);
454
455 static struct platform_driver efm32_i2c_driver = {
456 .probe = efm32_i2c_probe,
457 .remove = efm32_i2c_remove,
458
459 .driver = {
460 .name = DRIVER_NAME,
461 .of_match_table = efm32_i2c_dt_ids,
462 },
463 };
464 module_platform_driver(efm32_i2c_driver);
465
466 MODULE_AUTHOR("Uwe Kleine-Koenig <u.kleine-koenig@pengutronix.de>");
467 MODULE_DESCRIPTION("EFM32 i2c driver");
468 MODULE_LICENSE("GPL v2");
469 MODULE_ALIAS("platform:" DRIVER_NAME);
470