1
2
3
4
5
6
7
8
9
10
11
12
13
14
15#include <linux/clk.h>
16#include <linux/err.h>
17#include <linux/kernel.h>
18#include <linux/module.h>
19#include <linux/errno.h>
20#include <linux/platform_device.h>
21#include <linux/i2c.h>
22#include <linux/interrupt.h>
23#include <linux/wait.h>
24#include <linux/i2c-ocores.h>
25#include <linux/slab.h>
26#include <linux/io.h>
27#include <linux/log2.h>
28
29struct ocores_i2c {
30 void __iomem *base;
31 u32 reg_shift;
32 u32 reg_io_width;
33 wait_queue_head_t wait;
34 struct i2c_adapter adap;
35 struct i2c_msg *msg;
36 int pos;
37 int nmsgs;
38 int state;
39 struct clk *clk;
40 int ip_clock_khz;
41 int bus_clock_khz;
42 void (*setreg)(struct ocores_i2c *i2c, int reg, u8 value);
43 u8 (*getreg)(struct ocores_i2c *i2c, int reg);
44};
45
46
47#define OCI2C_PRELOW 0
48#define OCI2C_PREHIGH 1
49#define OCI2C_CONTROL 2
50#define OCI2C_DATA 3
51#define OCI2C_CMD 4
52#define OCI2C_STATUS 4
53
54#define OCI2C_CTRL_IEN 0x40
55#define OCI2C_CTRL_EN 0x80
56
57#define OCI2C_CMD_START 0x91
58#define OCI2C_CMD_STOP 0x41
59#define OCI2C_CMD_READ 0x21
60#define OCI2C_CMD_WRITE 0x11
61#define OCI2C_CMD_READ_ACK 0x21
62#define OCI2C_CMD_READ_NACK 0x29
63#define OCI2C_CMD_IACK 0x01
64
65#define OCI2C_STAT_IF 0x01
66#define OCI2C_STAT_TIP 0x02
67#define OCI2C_STAT_ARBLOST 0x20
68#define OCI2C_STAT_BUSY 0x40
69#define OCI2C_STAT_NACK 0x80
70
71#define STATE_DONE 0
72#define STATE_START 1
73#define STATE_WRITE 2
74#define STATE_READ 3
75#define STATE_ERROR 4
76
77#define TYPE_OCORES 0
78#define TYPE_GRLIB 1
79
80static void oc_setreg_8(struct ocores_i2c *i2c, int reg, u8 value)
81{
82 iowrite8(value, i2c->base + (reg << i2c->reg_shift));
83}
84
85static void oc_setreg_16(struct ocores_i2c *i2c, int reg, u8 value)
86{
87 iowrite16(value, i2c->base + (reg << i2c->reg_shift));
88}
89
90static void oc_setreg_32(struct ocores_i2c *i2c, int reg, u8 value)
91{
92 iowrite32(value, i2c->base + (reg << i2c->reg_shift));
93}
94
95static void oc_setreg_16be(struct ocores_i2c *i2c, int reg, u8 value)
96{
97 iowrite16be(value, i2c->base + (reg << i2c->reg_shift));
98}
99
100static void oc_setreg_32be(struct ocores_i2c *i2c, int reg, u8 value)
101{
102 iowrite32be(value, i2c->base + (reg << i2c->reg_shift));
103}
104
105static inline u8 oc_getreg_8(struct ocores_i2c *i2c, int reg)
106{
107 return ioread8(i2c->base + (reg << i2c->reg_shift));
108}
109
110static inline u8 oc_getreg_16(struct ocores_i2c *i2c, int reg)
111{
112 return ioread16(i2c->base + (reg << i2c->reg_shift));
113}
114
115static inline u8 oc_getreg_32(struct ocores_i2c *i2c, int reg)
116{
117 return ioread32(i2c->base + (reg << i2c->reg_shift));
118}
119
120static inline u8 oc_getreg_16be(struct ocores_i2c *i2c, int reg)
121{
122 return ioread16be(i2c->base + (reg << i2c->reg_shift));
123}
124
125static inline u8 oc_getreg_32be(struct ocores_i2c *i2c, int reg)
126{
127 return ioread32be(i2c->base + (reg << i2c->reg_shift));
128}
129
130static inline void oc_setreg(struct ocores_i2c *i2c, int reg, u8 value)
131{
132 i2c->setreg(i2c, reg, value);
133}
134
135static inline u8 oc_getreg(struct ocores_i2c *i2c, int reg)
136{
137 return i2c->getreg(i2c, reg);
138}
139
140static void ocores_process(struct ocores_i2c *i2c)
141{
142 struct i2c_msg *msg = i2c->msg;
143 u8 stat = oc_getreg(i2c, OCI2C_STATUS);
144
145 if ((i2c->state == STATE_DONE) || (i2c->state == STATE_ERROR)) {
146
147 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_IACK);
148 wake_up(&i2c->wait);
149 return;
150 }
151
152
153 if (stat & OCI2C_STAT_ARBLOST) {
154 i2c->state = STATE_ERROR;
155 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_STOP);
156 return;
157 }
158
159 if ((i2c->state == STATE_START) || (i2c->state == STATE_WRITE)) {
160 i2c->state =
161 (msg->flags & I2C_M_RD) ? STATE_READ : STATE_WRITE;
162
163 if (stat & OCI2C_STAT_NACK) {
164 i2c->state = STATE_ERROR;
165 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_STOP);
166 return;
167 }
168 } else
169 msg->buf[i2c->pos++] = oc_getreg(i2c, OCI2C_DATA);
170
171
172 if (i2c->pos == msg->len) {
173 i2c->nmsgs--;
174 i2c->msg++;
175 i2c->pos = 0;
176 msg = i2c->msg;
177
178 if (i2c->nmsgs) {
179
180 if (!(msg->flags & I2C_M_NOSTART)) {
181 u8 addr = (msg->addr << 1);
182
183 if (msg->flags & I2C_M_RD)
184 addr |= 1;
185
186 i2c->state = STATE_START;
187
188 oc_setreg(i2c, OCI2C_DATA, addr);
189 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_START);
190 return;
191 } else
192 i2c->state = (msg->flags & I2C_M_RD)
193 ? STATE_READ : STATE_WRITE;
194 } else {
195 i2c->state = STATE_DONE;
196 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_STOP);
197 return;
198 }
199 }
200
201 if (i2c->state == STATE_READ) {
202 oc_setreg(i2c, OCI2C_CMD, i2c->pos == (msg->len-1) ?
203 OCI2C_CMD_READ_NACK : OCI2C_CMD_READ_ACK);
204 } else {
205 oc_setreg(i2c, OCI2C_DATA, msg->buf[i2c->pos++]);
206 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_WRITE);
207 }
208}
209
210static irqreturn_t ocores_isr(int irq, void *dev_id)
211{
212 struct ocores_i2c *i2c = dev_id;
213
214 ocores_process(i2c);
215
216 return IRQ_HANDLED;
217}
218
219static int ocores_xfer(struct i2c_adapter *adap, struct i2c_msg *msgs, int num)
220{
221 struct ocores_i2c *i2c = i2c_get_adapdata(adap);
222
223 i2c->msg = msgs;
224 i2c->pos = 0;
225 i2c->nmsgs = num;
226 i2c->state = STATE_START;
227
228 oc_setreg(i2c, OCI2C_DATA,
229 (i2c->msg->addr << 1) |
230 ((i2c->msg->flags & I2C_M_RD) ? 1:0));
231
232 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_START);
233
234 if (wait_event_timeout(i2c->wait, (i2c->state == STATE_ERROR) ||
235 (i2c->state == STATE_DONE), HZ))
236 return (i2c->state == STATE_DONE) ? num : -EIO;
237 else
238 return -ETIMEDOUT;
239}
240
241static int ocores_init(struct device *dev, struct ocores_i2c *i2c)
242{
243 int prescale;
244 int diff;
245 u8 ctrl = oc_getreg(i2c, OCI2C_CONTROL);
246
247
248 oc_setreg(i2c, OCI2C_CONTROL, ctrl & ~(OCI2C_CTRL_EN|OCI2C_CTRL_IEN));
249
250 prescale = (i2c->ip_clock_khz / (5 * i2c->bus_clock_khz)) - 1;
251 prescale = clamp(prescale, 0, 0xffff);
252
253 diff = i2c->ip_clock_khz / (5 * (prescale + 1)) - i2c->bus_clock_khz;
254 if (abs(diff) > i2c->bus_clock_khz / 10) {
255 dev_err(dev,
256 "Unsupported clock settings: core: %d KHz, bus: %d KHz\n",
257 i2c->ip_clock_khz, i2c->bus_clock_khz);
258 return -EINVAL;
259 }
260
261 oc_setreg(i2c, OCI2C_PRELOW, prescale & 0xff);
262 oc_setreg(i2c, OCI2C_PREHIGH, prescale >> 8);
263
264
265 oc_setreg(i2c, OCI2C_CMD, OCI2C_CMD_IACK);
266 oc_setreg(i2c, OCI2C_CONTROL, ctrl | OCI2C_CTRL_IEN | OCI2C_CTRL_EN);
267
268 return 0;
269}
270
271
272static u32 ocores_func(struct i2c_adapter *adap)
273{
274 return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL;
275}
276
277static const struct i2c_algorithm ocores_algorithm = {
278 .master_xfer = ocores_xfer,
279 .functionality = ocores_func,
280};
281
282static struct i2c_adapter ocores_adapter = {
283 .owner = THIS_MODULE,
284 .name = "i2c-ocores",
285 .class = I2C_CLASS_DEPRECATED,
286 .algo = &ocores_algorithm,
287};
288
289static const struct of_device_id ocores_i2c_match[] = {
290 {
291 .compatible = "opencores,i2c-ocores",
292 .data = (void *)TYPE_OCORES,
293 },
294 {
295 .compatible = "aeroflexgaisler,i2cmst",
296 .data = (void *)TYPE_GRLIB,
297 },
298 {},
299};
300MODULE_DEVICE_TABLE(of, ocores_i2c_match);
301
302#ifdef CONFIG_OF
303
304
305
306static u8 oc_getreg_grlib(struct ocores_i2c *i2c, int reg)
307{
308 u32 rd;
309 int rreg = reg;
310 if (reg != OCI2C_PRELOW)
311 rreg--;
312 rd = ioread32be(i2c->base + (rreg << i2c->reg_shift));
313 if (reg == OCI2C_PREHIGH)
314 return (u8)(rd >> 8);
315 else
316 return (u8)rd;
317}
318
319static void oc_setreg_grlib(struct ocores_i2c *i2c, int reg, u8 value)
320{
321 u32 curr, wr;
322 int rreg = reg;
323 if (reg != OCI2C_PRELOW)
324 rreg--;
325 if (reg == OCI2C_PRELOW || reg == OCI2C_PREHIGH) {
326 curr = ioread32be(i2c->base + (rreg << i2c->reg_shift));
327 if (reg == OCI2C_PRELOW)
328 wr = (curr & 0xff00) | value;
329 else
330 wr = (((u32)value) << 8) | (curr & 0xff);
331 } else {
332 wr = value;
333 }
334 iowrite32be(wr, i2c->base + (rreg << i2c->reg_shift));
335}
336
337static int ocores_i2c_of_probe(struct platform_device *pdev,
338 struct ocores_i2c *i2c)
339{
340 struct device_node *np = pdev->dev.of_node;
341 const struct of_device_id *match;
342 u32 val;
343 u32 clock_frequency;
344 bool clock_frequency_present;
345
346 if (of_property_read_u32(np, "reg-shift", &i2c->reg_shift)) {
347
348 if (!of_property_read_u32(np, "regstep", &val)) {
349 if (!is_power_of_2(val)) {
350 dev_err(&pdev->dev, "invalid regstep %d\n",
351 val);
352 return -EINVAL;
353 }
354 i2c->reg_shift = ilog2(val);
355 dev_warn(&pdev->dev,
356 "regstep property deprecated, use reg-shift\n");
357 }
358 }
359
360 clock_frequency_present = !of_property_read_u32(np, "clock-frequency",
361 &clock_frequency);
362 i2c->bus_clock_khz = 100;
363
364 i2c->clk = devm_clk_get(&pdev->dev, NULL);
365
366 if (!IS_ERR(i2c->clk)) {
367 int ret = clk_prepare_enable(i2c->clk);
368
369 if (ret) {
370 dev_err(&pdev->dev,
371 "clk_prepare_enable failed: %d\n", ret);
372 return ret;
373 }
374 i2c->ip_clock_khz = clk_get_rate(i2c->clk) / 1000;
375 if (clock_frequency_present)
376 i2c->bus_clock_khz = clock_frequency / 1000;
377 }
378
379 if (i2c->ip_clock_khz == 0) {
380 if (of_property_read_u32(np, "opencores,ip-clock-frequency",
381 &val)) {
382 if (!clock_frequency_present) {
383 dev_err(&pdev->dev,
384 "Missing required parameter 'opencores,ip-clock-frequency'\n");
385 return -ENODEV;
386 }
387 i2c->ip_clock_khz = clock_frequency / 1000;
388 dev_warn(&pdev->dev,
389 "Deprecated usage of the 'clock-frequency' property, please update to 'opencores,ip-clock-frequency'\n");
390 } else {
391 i2c->ip_clock_khz = val / 1000;
392 if (clock_frequency_present)
393 i2c->bus_clock_khz = clock_frequency / 1000;
394 }
395 }
396
397 of_property_read_u32(pdev->dev.of_node, "reg-io-width",
398 &i2c->reg_io_width);
399
400 match = of_match_node(ocores_i2c_match, pdev->dev.of_node);
401 if (match && (long)match->data == TYPE_GRLIB) {
402 dev_dbg(&pdev->dev, "GRLIB variant of i2c-ocores\n");
403 i2c->setreg = oc_setreg_grlib;
404 i2c->getreg = oc_getreg_grlib;
405 }
406
407 return 0;
408}
409#else
410#define ocores_i2c_of_probe(pdev,i2c) -ENODEV
411#endif
412
413static int ocores_i2c_probe(struct platform_device *pdev)
414{
415 struct ocores_i2c *i2c;
416 struct ocores_i2c_platform_data *pdata;
417 struct resource *res;
418 int irq;
419 int ret;
420 int i;
421
422 irq = platform_get_irq(pdev, 0);
423 if (irq < 0)
424 return irq;
425
426 i2c = devm_kzalloc(&pdev->dev, sizeof(*i2c), GFP_KERNEL);
427 if (!i2c)
428 return -ENOMEM;
429
430 res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
431 i2c->base = devm_ioremap_resource(&pdev->dev, res);
432 if (IS_ERR(i2c->base))
433 return PTR_ERR(i2c->base);
434
435 pdata = dev_get_platdata(&pdev->dev);
436 if (pdata) {
437 i2c->reg_shift = pdata->reg_shift;
438 i2c->reg_io_width = pdata->reg_io_width;
439 i2c->ip_clock_khz = pdata->clock_khz;
440 i2c->bus_clock_khz = 100;
441 } else {
442 ret = ocores_i2c_of_probe(pdev, i2c);
443 if (ret)
444 return ret;
445 }
446
447 if (i2c->reg_io_width == 0)
448 i2c->reg_io_width = 1;
449
450 if (!i2c->setreg || !i2c->getreg) {
451 bool be = pdata ? pdata->big_endian :
452 of_device_is_big_endian(pdev->dev.of_node);
453
454 switch (i2c->reg_io_width) {
455 case 1:
456 i2c->setreg = oc_setreg_8;
457 i2c->getreg = oc_getreg_8;
458 break;
459
460 case 2:
461 i2c->setreg = be ? oc_setreg_16be : oc_setreg_16;
462 i2c->getreg = be ? oc_getreg_16be : oc_getreg_16;
463 break;
464
465 case 4:
466 i2c->setreg = be ? oc_setreg_32be : oc_setreg_32;
467 i2c->getreg = be ? oc_getreg_32be : oc_getreg_32;
468 break;
469
470 default:
471 dev_err(&pdev->dev, "Unsupported I/O width (%d)\n",
472 i2c->reg_io_width);
473 return -EINVAL;
474 }
475 }
476
477 ret = ocores_init(&pdev->dev, i2c);
478 if (ret)
479 return ret;
480
481 init_waitqueue_head(&i2c->wait);
482 ret = devm_request_irq(&pdev->dev, irq, ocores_isr, 0,
483 pdev->name, i2c);
484 if (ret) {
485 dev_err(&pdev->dev, "Cannot claim IRQ\n");
486 return ret;
487 }
488
489
490 platform_set_drvdata(pdev, i2c);
491 i2c->adap = ocores_adapter;
492 i2c_set_adapdata(&i2c->adap, i2c);
493 i2c->adap.dev.parent = &pdev->dev;
494 i2c->adap.dev.of_node = pdev->dev.of_node;
495
496
497 ret = i2c_add_adapter(&i2c->adap);
498 if (ret) {
499 dev_err(&pdev->dev, "Failed to add adapter\n");
500 return ret;
501 }
502
503
504 if (pdata) {
505 for (i = 0; i < pdata->num_devices; i++)
506 i2c_new_device(&i2c->adap, pdata->devices + i);
507 }
508
509 return 0;
510}
511
512static int ocores_i2c_remove(struct platform_device *pdev)
513{
514 struct ocores_i2c *i2c = platform_get_drvdata(pdev);
515
516
517 oc_setreg(i2c, OCI2C_CONTROL, oc_getreg(i2c, OCI2C_CONTROL)
518 & ~(OCI2C_CTRL_EN|OCI2C_CTRL_IEN));
519
520
521 i2c_del_adapter(&i2c->adap);
522
523 if (!IS_ERR(i2c->clk))
524 clk_disable_unprepare(i2c->clk);
525
526 return 0;
527}
528
529#ifdef CONFIG_PM_SLEEP
530static int ocores_i2c_suspend(struct device *dev)
531{
532 struct ocores_i2c *i2c = dev_get_drvdata(dev);
533 u8 ctrl = oc_getreg(i2c, OCI2C_CONTROL);
534
535
536 oc_setreg(i2c, OCI2C_CONTROL, ctrl & ~(OCI2C_CTRL_EN|OCI2C_CTRL_IEN));
537
538 if (!IS_ERR(i2c->clk))
539 clk_disable_unprepare(i2c->clk);
540 return 0;
541}
542
543static int ocores_i2c_resume(struct device *dev)
544{
545 struct ocores_i2c *i2c = dev_get_drvdata(dev);
546
547 if (!IS_ERR(i2c->clk)) {
548 unsigned long rate;
549 int ret = clk_prepare_enable(i2c->clk);
550
551 if (ret) {
552 dev_err(dev,
553 "clk_prepare_enable failed: %d\n", ret);
554 return ret;
555 }
556 rate = clk_get_rate(i2c->clk) / 1000;
557 if (rate)
558 i2c->ip_clock_khz = rate;
559 }
560 return ocores_init(dev, i2c);
561}
562
563static SIMPLE_DEV_PM_OPS(ocores_i2c_pm, ocores_i2c_suspend, ocores_i2c_resume);
564#define OCORES_I2C_PM (&ocores_i2c_pm)
565#else
566#define OCORES_I2C_PM NULL
567#endif
568
569static struct platform_driver ocores_i2c_driver = {
570 .probe = ocores_i2c_probe,
571 .remove = ocores_i2c_remove,
572 .driver = {
573 .name = "ocores-i2c",
574 .of_match_table = ocores_i2c_match,
575 .pm = OCORES_I2C_PM,
576 },
577};
578
579module_platform_driver(ocores_i2c_driver);
580
581MODULE_AUTHOR("Peter Korsgaard <jacmet@sunsite.dk>");
582MODULE_DESCRIPTION("OpenCores I2C bus driver");
583MODULE_LICENSE("GPL");
584MODULE_ALIAS("platform:ocores-i2c");
585