Linux Audio

Check our new training course

Loading...
v6.2
  1// SPDX-License-Identifier: GPL-2.0-only
  2/*
  3 *  Copyright Intel Corporation (C) 2017.
  4 *
  5 * Based on the i2c-axxia.c driver.
  6 */
  7#include <linux/clk.h>
  8#include <linux/clkdev.h>
  9#include <linux/err.h>
 10#include <linux/i2c.h>
 11#include <linux/iopoll.h>
 12#include <linux/interrupt.h>
 13#include <linux/module.h>
 14#include <linux/io.h>
 15#include <linux/kernel.h>
 16#include <linux/platform_device.h>
 17
 18#define ALTR_I2C_TFR_CMD	0x00	/* Transfer Command register */
 19#define     ALTR_I2C_TFR_CMD_STA	BIT(9)	/* send START before byte */
 20#define     ALTR_I2C_TFR_CMD_STO	BIT(8)	/* send STOP after byte */
 21#define     ALTR_I2C_TFR_CMD_RW_D	BIT(0)	/* Direction of transfer */
 22#define ALTR_I2C_RX_DATA	0x04	/* RX data FIFO register */
 23#define ALTR_I2C_CTRL		0x08	/* Control register */
 24#define     ALTR_I2C_CTRL_RXT_SHFT	4	/* RX FIFO Threshold */
 25#define     ALTR_I2C_CTRL_TCT_SHFT	2	/* TFER CMD FIFO Threshold */
 26#define     ALTR_I2C_CTRL_BSPEED	BIT(1)	/* Bus Speed (1=Fast) */
 27#define     ALTR_I2C_CTRL_EN	BIT(0)	/* Enable Core (1=Enable) */
 28#define ALTR_I2C_ISER		0x0C	/* Interrupt Status Enable register */
 29#define     ALTR_I2C_ISER_RXOF_EN	BIT(4)	/* Enable RX OVERFLOW IRQ */
 30#define     ALTR_I2C_ISER_ARB_EN	BIT(3)	/* Enable ARB LOST IRQ */
 31#define     ALTR_I2C_ISER_NACK_EN	BIT(2)	/* Enable NACK DET IRQ */
 32#define     ALTR_I2C_ISER_RXRDY_EN	BIT(1)	/* Enable RX Ready IRQ */
 33#define     ALTR_I2C_ISER_TXRDY_EN	BIT(0)	/* Enable TX Ready IRQ */
 34#define ALTR_I2C_ISR		0x10	/* Interrupt Status register */
 35#define     ALTR_I2C_ISR_RXOF		BIT(4)	/* RX OVERFLOW IRQ */
 36#define     ALTR_I2C_ISR_ARB		BIT(3)	/* ARB LOST IRQ */
 37#define     ALTR_I2C_ISR_NACK		BIT(2)	/* NACK DET IRQ */
 38#define     ALTR_I2C_ISR_RXRDY		BIT(1)	/* RX Ready IRQ */
 39#define     ALTR_I2C_ISR_TXRDY		BIT(0)	/* TX Ready IRQ */
 40#define ALTR_I2C_STATUS		0x14	/* Status register */
 41#define     ALTR_I2C_STAT_CORE		BIT(0)	/* Core Status (0=idle) */
 42#define ALTR_I2C_TC_FIFO_LVL	0x18	/* Transfer FIFO LVL register */
 43#define ALTR_I2C_RX_FIFO_LVL	0x1C	/* Receive FIFO LVL register */
 44#define ALTR_I2C_SCL_LOW	0x20	/* SCL low count register */
 45#define ALTR_I2C_SCL_HIGH	0x24	/* SCL high count register */
 46#define ALTR_I2C_SDA_HOLD	0x28	/* SDA hold count register */
 47
 48#define ALTR_I2C_ALL_IRQ	(ALTR_I2C_ISR_RXOF | ALTR_I2C_ISR_ARB | \
 49				 ALTR_I2C_ISR_NACK | ALTR_I2C_ISR_RXRDY | \
 50				 ALTR_I2C_ISR_TXRDY)
 51
 52#define ALTR_I2C_THRESHOLD	0	/* IRQ Threshold at 1 element */
 53#define ALTR_I2C_DFLT_FIFO_SZ	4
 54#define ALTR_I2C_TIMEOUT	100000	/* 100ms */
 55#define ALTR_I2C_XFER_TIMEOUT	(msecs_to_jiffies(250))
 56
 57/**
 58 * struct altr_i2c_dev - I2C device context
 59 * @base: pointer to register struct
 60 * @msg: pointer to current message
 61 * @msg_len: number of bytes transferred in msg
 62 * @msg_err: error code for completed message
 63 * @msg_complete: xfer completion object
 64 * @dev: device reference
 65 * @adapter: core i2c abstraction
 66 * @i2c_clk: clock reference for i2c input clock
 67 * @bus_clk_rate: current i2c bus clock rate
 68 * @buf: ptr to msg buffer for easier use.
 69 * @fifo_size: size of the FIFO passed in.
 70 * @isr_mask: cached copy of local ISR enables.
 71 * @isr_status: cached copy of local ISR status.
 72 * @isr_mutex: mutex for IRQ thread.
 73 */
 74struct altr_i2c_dev {
 75	void __iomem *base;
 76	struct i2c_msg *msg;
 77	size_t msg_len;
 78	int msg_err;
 79	struct completion msg_complete;
 80	struct device *dev;
 81	struct i2c_adapter adapter;
 82	struct clk *i2c_clk;
 83	u32 bus_clk_rate;
 84	u8 *buf;
 85	u32 fifo_size;
 86	u32 isr_mask;
 87	u32 isr_status;
 88	struct mutex isr_mutex;
 89};
 90
 91static void
 92altr_i2c_int_enable(struct altr_i2c_dev *idev, u32 mask, bool enable)
 93{
 94	u32 int_en;
 95
 96	int_en = readl(idev->base + ALTR_I2C_ISER);
 97	if (enable)
 98		idev->isr_mask = int_en | mask;
 99	else
100		idev->isr_mask = int_en & ~mask;
101
102	writel(idev->isr_mask, idev->base + ALTR_I2C_ISER);
103}
104
105static void altr_i2c_int_clear(struct altr_i2c_dev *idev, u32 mask)
106{
107	u32 int_en = readl(idev->base + ALTR_I2C_ISR);
108
109	writel(int_en | mask, idev->base + ALTR_I2C_ISR);
110}
111
112static void altr_i2c_core_disable(struct altr_i2c_dev *idev)
113{
114	u32 tmp = readl(idev->base + ALTR_I2C_CTRL);
115
116	writel(tmp & ~ALTR_I2C_CTRL_EN, idev->base + ALTR_I2C_CTRL);
117}
118
119static void altr_i2c_core_enable(struct altr_i2c_dev *idev)
120{
121	u32 tmp = readl(idev->base + ALTR_I2C_CTRL);
122
123	writel(tmp | ALTR_I2C_CTRL_EN, idev->base + ALTR_I2C_CTRL);
124}
125
126static void altr_i2c_reset(struct altr_i2c_dev *idev)
127{
128	altr_i2c_core_disable(idev);
129	altr_i2c_core_enable(idev);
130}
131
132static inline void altr_i2c_stop(struct altr_i2c_dev *idev)
133{
134	writel(ALTR_I2C_TFR_CMD_STO, idev->base + ALTR_I2C_TFR_CMD);
135}
136
137static void altr_i2c_init(struct altr_i2c_dev *idev)
138{
139	u32 divisor = clk_get_rate(idev->i2c_clk) / idev->bus_clk_rate;
140	u32 clk_mhz = clk_get_rate(idev->i2c_clk) / 1000000;
141	u32 tmp = (ALTR_I2C_THRESHOLD << ALTR_I2C_CTRL_RXT_SHFT) |
142		  (ALTR_I2C_THRESHOLD << ALTR_I2C_CTRL_TCT_SHFT);
143	u32 t_high, t_low;
144
145	if (idev->bus_clk_rate <= I2C_MAX_STANDARD_MODE_FREQ) {
146		tmp &= ~ALTR_I2C_CTRL_BSPEED;
147		/* Standard mode SCL 50/50 */
148		t_high = divisor * 1 / 2;
149		t_low = divisor * 1 / 2;
150	} else {
151		tmp |= ALTR_I2C_CTRL_BSPEED;
152		/* Fast mode SCL 33/66 */
153		t_high = divisor * 1 / 3;
154		t_low = divisor * 2 / 3;
155	}
156	writel(tmp, idev->base + ALTR_I2C_CTRL);
157
158	dev_dbg(idev->dev, "rate=%uHz per_clk=%uMHz -> ratio=1:%u\n",
159		idev->bus_clk_rate, clk_mhz, divisor);
160
161	/* Reset controller */
162	altr_i2c_reset(idev);
163
164	/* SCL High Time */
165	writel(t_high, idev->base + ALTR_I2C_SCL_HIGH);
166	/* SCL Low Time */
167	writel(t_low, idev->base + ALTR_I2C_SCL_LOW);
168	/* SDA Hold Time, 300ns */
169	writel(3 * clk_mhz / 10, idev->base + ALTR_I2C_SDA_HOLD);
170
171	/* Mask all master interrupt bits */
172	altr_i2c_int_enable(idev, ALTR_I2C_ALL_IRQ, false);
173}
174
175/*
176 * altr_i2c_transfer - On the last byte to be transmitted, send
177 * a Stop bit on the last byte.
178 */
179static void altr_i2c_transfer(struct altr_i2c_dev *idev, u32 data)
180{
181	/* On the last byte to be transmitted, send STOP */
182	if (idev->msg_len == 1)
183		data |= ALTR_I2C_TFR_CMD_STO;
184	if (idev->msg_len > 0)
185		writel(data, idev->base + ALTR_I2C_TFR_CMD);
186}
187
188/*
189 * altr_i2c_empty_rx_fifo - Fetch data from RX FIFO until end of
190 * transfer. Send a Stop bit on the last byte.
191 */
192static void altr_i2c_empty_rx_fifo(struct altr_i2c_dev *idev)
193{
194	size_t rx_fifo_avail = readl(idev->base + ALTR_I2C_RX_FIFO_LVL);
195	int bytes_to_transfer = min(rx_fifo_avail, idev->msg_len);
196
197	while (bytes_to_transfer-- > 0) {
198		*idev->buf++ = readl(idev->base + ALTR_I2C_RX_DATA);
199		idev->msg_len--;
200		altr_i2c_transfer(idev, 0);
201	}
202}
203
204/*
205 * altr_i2c_fill_tx_fifo - Fill TX FIFO from current message buffer.
206 */
207static int altr_i2c_fill_tx_fifo(struct altr_i2c_dev *idev)
208{
209	size_t tx_fifo_avail = idev->fifo_size - readl(idev->base +
210						       ALTR_I2C_TC_FIFO_LVL);
211	int bytes_to_transfer = min(tx_fifo_avail, idev->msg_len);
212	int ret = idev->msg_len - bytes_to_transfer;
213
214	while (bytes_to_transfer-- > 0) {
215		altr_i2c_transfer(idev, *idev->buf++);
216		idev->msg_len--;
217	}
218
219	return ret;
220}
221
222static irqreturn_t altr_i2c_isr_quick(int irq, void *_dev)
223{
224	struct altr_i2c_dev *idev = _dev;
225	irqreturn_t ret = IRQ_HANDLED;
226
227	/* Read IRQ status but only interested in Enabled IRQs. */
228	idev->isr_status = readl(idev->base + ALTR_I2C_ISR) & idev->isr_mask;
229	if (idev->isr_status)
230		ret = IRQ_WAKE_THREAD;
231
232	return ret;
233}
234
235static irqreturn_t altr_i2c_isr(int irq, void *_dev)
236{
237	int ret;
238	bool read, finish = false;
239	struct altr_i2c_dev *idev = _dev;
240	u32 status = idev->isr_status;
241
242	mutex_lock(&idev->isr_mutex);
243	if (!idev->msg) {
244		dev_warn(idev->dev, "unexpected interrupt\n");
245		altr_i2c_int_clear(idev, ALTR_I2C_ALL_IRQ);
246		goto out;
247	}
248	read = (idev->msg->flags & I2C_M_RD) != 0;
249
250	/* handle Lost Arbitration */
251	if (unlikely(status & ALTR_I2C_ISR_ARB)) {
252		altr_i2c_int_clear(idev, ALTR_I2C_ISR_ARB);
253		idev->msg_err = -EAGAIN;
254		finish = true;
255	} else if (unlikely(status & ALTR_I2C_ISR_NACK)) {
256		dev_dbg(idev->dev, "Could not get ACK\n");
257		idev->msg_err = -ENXIO;
258		altr_i2c_int_clear(idev, ALTR_I2C_ISR_NACK);
259		altr_i2c_stop(idev);
260		finish = true;
261	} else if (read && unlikely(status & ALTR_I2C_ISR_RXOF)) {
262		/* handle RX FIFO Overflow */
263		altr_i2c_empty_rx_fifo(idev);
264		altr_i2c_int_clear(idev, ALTR_I2C_ISR_RXRDY);
265		altr_i2c_stop(idev);
266		dev_err(idev->dev, "RX FIFO Overflow\n");
267		finish = true;
268	} else if (read && (status & ALTR_I2C_ISR_RXRDY)) {
269		/* RX FIFO needs service? */
270		altr_i2c_empty_rx_fifo(idev);
271		altr_i2c_int_clear(idev, ALTR_I2C_ISR_RXRDY);
272		if (!idev->msg_len)
273			finish = true;
274	} else if (!read && (status & ALTR_I2C_ISR_TXRDY)) {
275		/* TX FIFO needs service? */
276		altr_i2c_int_clear(idev, ALTR_I2C_ISR_TXRDY);
277		if (idev->msg_len > 0)
278			altr_i2c_fill_tx_fifo(idev);
279		else
280			finish = true;
281	} else {
282		dev_warn(idev->dev, "Unexpected interrupt: 0x%x\n", status);
283		altr_i2c_int_clear(idev, ALTR_I2C_ALL_IRQ);
284	}
285
286	if (finish) {
287		/* Wait for the Core to finish */
288		ret = readl_poll_timeout_atomic(idev->base + ALTR_I2C_STATUS,
289						status,
290						!(status & ALTR_I2C_STAT_CORE),
291						1, ALTR_I2C_TIMEOUT);
292		if (ret)
293			dev_err(idev->dev, "message timeout\n");
294		altr_i2c_int_enable(idev, ALTR_I2C_ALL_IRQ, false);
295		altr_i2c_int_clear(idev, ALTR_I2C_ALL_IRQ);
296		complete(&idev->msg_complete);
297		dev_dbg(idev->dev, "Message Complete\n");
298	}
299out:
300	mutex_unlock(&idev->isr_mutex);
301
302	return IRQ_HANDLED;
303}
304
305static int altr_i2c_xfer_msg(struct altr_i2c_dev *idev, struct i2c_msg *msg)
306{
307	u32 imask = ALTR_I2C_ISR_RXOF | ALTR_I2C_ISR_ARB | ALTR_I2C_ISR_NACK;
308	unsigned long time_left;
309	u32 value;
310	u8 addr = i2c_8bit_addr_from_msg(msg);
311
312	mutex_lock(&idev->isr_mutex);
313	idev->msg = msg;
314	idev->msg_len = msg->len;
315	idev->buf = msg->buf;
316	idev->msg_err = 0;
317	reinit_completion(&idev->msg_complete);
318	altr_i2c_core_enable(idev);
319
320	/* Make sure RX FIFO is empty */
321	do {
322		readl(idev->base + ALTR_I2C_RX_DATA);
323	} while (readl(idev->base + ALTR_I2C_RX_FIFO_LVL));
324
325	writel(ALTR_I2C_TFR_CMD_STA | addr, idev->base + ALTR_I2C_TFR_CMD);
326
327	if ((msg->flags & I2C_M_RD) != 0) {
328		imask |= ALTR_I2C_ISER_RXOF_EN | ALTR_I2C_ISER_RXRDY_EN;
329		altr_i2c_int_enable(idev, imask, true);
330		/* write the first byte to start the RX */
331		altr_i2c_transfer(idev, 0);
332	} else {
333		imask |= ALTR_I2C_ISR_TXRDY;
334		altr_i2c_int_enable(idev, imask, true);
335		altr_i2c_fill_tx_fifo(idev);
336	}
337	mutex_unlock(&idev->isr_mutex);
338
339	time_left = wait_for_completion_timeout(&idev->msg_complete,
340						ALTR_I2C_XFER_TIMEOUT);
341	mutex_lock(&idev->isr_mutex);
342	altr_i2c_int_enable(idev, imask, false);
343
344	value = readl(idev->base + ALTR_I2C_STATUS) & ALTR_I2C_STAT_CORE;
345	if (value)
346		dev_err(idev->dev, "Core Status not IDLE...\n");
347
348	if (time_left == 0) {
349		idev->msg_err = -ETIMEDOUT;
350		dev_dbg(idev->dev, "Transaction timed out.\n");
351	}
352
353	altr_i2c_core_disable(idev);
354	mutex_unlock(&idev->isr_mutex);
355
356	return idev->msg_err;
357}
358
359static int
360altr_i2c_xfer(struct i2c_adapter *adap, struct i2c_msg *msgs, int num)
361{
362	struct altr_i2c_dev *idev = i2c_get_adapdata(adap);
363	int i, ret;
364
365	for (i = 0; i < num; i++) {
366		ret = altr_i2c_xfer_msg(idev, msgs++);
367		if (ret)
368			return ret;
369	}
370	return num;
371}
372
373static u32 altr_i2c_func(struct i2c_adapter *adap)
374{
375	return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL;
376}
377
378static const struct i2c_algorithm altr_i2c_algo = {
379	.master_xfer = altr_i2c_xfer,
380	.functionality = altr_i2c_func,
381};
382
383static int altr_i2c_probe(struct platform_device *pdev)
384{
385	struct altr_i2c_dev *idev = NULL;
386	int irq, ret;
387
388	idev = devm_kzalloc(&pdev->dev, sizeof(*idev), GFP_KERNEL);
389	if (!idev)
390		return -ENOMEM;
391
392	idev->base = devm_platform_ioremap_resource(pdev, 0);
393	if (IS_ERR(idev->base))
394		return PTR_ERR(idev->base);
395
396	irq = platform_get_irq(pdev, 0);
397	if (irq < 0)
398		return irq;
399
400	idev->i2c_clk = devm_clk_get(&pdev->dev, NULL);
401	if (IS_ERR(idev->i2c_clk)) {
402		dev_err(&pdev->dev, "missing clock\n");
403		return PTR_ERR(idev->i2c_clk);
404	}
405
406	idev->dev = &pdev->dev;
407	init_completion(&idev->msg_complete);
408	mutex_init(&idev->isr_mutex);
409
410	ret = device_property_read_u32(idev->dev, "fifo-size",
411				       &idev->fifo_size);
412	if (ret) {
413		dev_err(&pdev->dev, "FIFO size set to default of %d\n",
414			ALTR_I2C_DFLT_FIFO_SZ);
415		idev->fifo_size = ALTR_I2C_DFLT_FIFO_SZ;
416	}
417
418	ret = device_property_read_u32(idev->dev, "clock-frequency",
419				       &idev->bus_clk_rate);
420	if (ret) {
421		dev_err(&pdev->dev, "Default to 100kHz\n");
422		idev->bus_clk_rate = I2C_MAX_STANDARD_MODE_FREQ;	/* default clock rate */
423	}
424
425	if (idev->bus_clk_rate > I2C_MAX_FAST_MODE_FREQ) {
426		dev_err(&pdev->dev, "invalid clock-frequency %d\n",
427			idev->bus_clk_rate);
428		return -EINVAL;
429	}
430
431	ret = devm_request_threaded_irq(&pdev->dev, irq, altr_i2c_isr_quick,
432					altr_i2c_isr, IRQF_ONESHOT,
433					pdev->name, idev);
434	if (ret) {
435		dev_err(&pdev->dev, "failed to claim IRQ %d\n", irq);
436		return ret;
437	}
438
439	ret = clk_prepare_enable(idev->i2c_clk);
440	if (ret) {
441		dev_err(&pdev->dev, "failed to enable clock\n");
442		return ret;
443	}
444
445	mutex_lock(&idev->isr_mutex);
446	altr_i2c_init(idev);
447	mutex_unlock(&idev->isr_mutex);
448
449	i2c_set_adapdata(&idev->adapter, idev);
450	strscpy(idev->adapter.name, pdev->name, sizeof(idev->adapter.name));
451	idev->adapter.owner = THIS_MODULE;
452	idev->adapter.algo = &altr_i2c_algo;
453	idev->adapter.dev.parent = &pdev->dev;
454	idev->adapter.dev.of_node = pdev->dev.of_node;
455
456	platform_set_drvdata(pdev, idev);
457
458	ret = i2c_add_adapter(&idev->adapter);
459	if (ret) {
460		clk_disable_unprepare(idev->i2c_clk);
461		return ret;
462	}
463	dev_info(&pdev->dev, "Altera SoftIP I2C Probe Complete\n");
464
465	return 0;
466}
467
468static int altr_i2c_remove(struct platform_device *pdev)
469{
470	struct altr_i2c_dev *idev = platform_get_drvdata(pdev);
471
472	clk_disable_unprepare(idev->i2c_clk);
473	i2c_del_adapter(&idev->adapter);
474
475	return 0;
476}
477
478/* Match table for of_platform binding */
479static const struct of_device_id altr_i2c_of_match[] = {
480	{ .compatible = "altr,softip-i2c-v1.0" },
481	{},
482};
483MODULE_DEVICE_TABLE(of, altr_i2c_of_match);
484
485static struct platform_driver altr_i2c_driver = {
486	.probe = altr_i2c_probe,
487	.remove = altr_i2c_remove,
488	.driver = {
489		.name = "altera-i2c",
490		.of_match_table = altr_i2c_of_match,
491	},
492};
493
494module_platform_driver(altr_i2c_driver);
495
496MODULE_DESCRIPTION("Altera Soft IP I2C bus driver");
497MODULE_AUTHOR("Thor Thayer <thor.thayer@linux.intel.com>");
498MODULE_LICENSE("GPL v2");
v5.14.15
  1// SPDX-License-Identifier: GPL-2.0-only
  2/*
  3 *  Copyright Intel Corporation (C) 2017.
  4 *
  5 * Based on the i2c-axxia.c driver.
  6 */
  7#include <linux/clk.h>
  8#include <linux/clkdev.h>
  9#include <linux/err.h>
 10#include <linux/i2c.h>
 11#include <linux/iopoll.h>
 12#include <linux/interrupt.h>
 13#include <linux/module.h>
 14#include <linux/io.h>
 15#include <linux/kernel.h>
 16#include <linux/platform_device.h>
 17
 18#define ALTR_I2C_TFR_CMD	0x00	/* Transfer Command register */
 19#define     ALTR_I2C_TFR_CMD_STA	BIT(9)	/* send START before byte */
 20#define     ALTR_I2C_TFR_CMD_STO	BIT(8)	/* send STOP after byte */
 21#define     ALTR_I2C_TFR_CMD_RW_D	BIT(0)	/* Direction of transfer */
 22#define ALTR_I2C_RX_DATA	0x04	/* RX data FIFO register */
 23#define ALTR_I2C_CTRL		0x08	/* Control register */
 24#define     ALTR_I2C_CTRL_RXT_SHFT	4	/* RX FIFO Threshold */
 25#define     ALTR_I2C_CTRL_TCT_SHFT	2	/* TFER CMD FIFO Threshold */
 26#define     ALTR_I2C_CTRL_BSPEED	BIT(1)	/* Bus Speed (1=Fast) */
 27#define     ALTR_I2C_CTRL_EN	BIT(0)	/* Enable Core (1=Enable) */
 28#define ALTR_I2C_ISER		0x0C	/* Interrupt Status Enable register */
 29#define     ALTR_I2C_ISER_RXOF_EN	BIT(4)	/* Enable RX OVERFLOW IRQ */
 30#define     ALTR_I2C_ISER_ARB_EN	BIT(3)	/* Enable ARB LOST IRQ */
 31#define     ALTR_I2C_ISER_NACK_EN	BIT(2)	/* Enable NACK DET IRQ */
 32#define     ALTR_I2C_ISER_RXRDY_EN	BIT(1)	/* Enable RX Ready IRQ */
 33#define     ALTR_I2C_ISER_TXRDY_EN	BIT(0)	/* Enable TX Ready IRQ */
 34#define ALTR_I2C_ISR		0x10	/* Interrupt Status register */
 35#define     ALTR_I2C_ISR_RXOF		BIT(4)	/* RX OVERFLOW IRQ */
 36#define     ALTR_I2C_ISR_ARB		BIT(3)	/* ARB LOST IRQ */
 37#define     ALTR_I2C_ISR_NACK		BIT(2)	/* NACK DET IRQ */
 38#define     ALTR_I2C_ISR_RXRDY		BIT(1)	/* RX Ready IRQ */
 39#define     ALTR_I2C_ISR_TXRDY		BIT(0)	/* TX Ready IRQ */
 40#define ALTR_I2C_STATUS		0x14	/* Status register */
 41#define     ALTR_I2C_STAT_CORE		BIT(0)	/* Core Status (0=idle) */
 42#define ALTR_I2C_TC_FIFO_LVL	0x18	/* Transfer FIFO LVL register */
 43#define ALTR_I2C_RX_FIFO_LVL	0x1C	/* Receive FIFO LVL register */
 44#define ALTR_I2C_SCL_LOW	0x20	/* SCL low count register */
 45#define ALTR_I2C_SCL_HIGH	0x24	/* SCL high count register */
 46#define ALTR_I2C_SDA_HOLD	0x28	/* SDA hold count register */
 47
 48#define ALTR_I2C_ALL_IRQ	(ALTR_I2C_ISR_RXOF | ALTR_I2C_ISR_ARB | \
 49				 ALTR_I2C_ISR_NACK | ALTR_I2C_ISR_RXRDY | \
 50				 ALTR_I2C_ISR_TXRDY)
 51
 52#define ALTR_I2C_THRESHOLD	0	/* IRQ Threshold at 1 element */
 53#define ALTR_I2C_DFLT_FIFO_SZ	4
 54#define ALTR_I2C_TIMEOUT	100000	/* 100ms */
 55#define ALTR_I2C_XFER_TIMEOUT	(msecs_to_jiffies(250))
 56
 57/**
 58 * struct altr_i2c_dev - I2C device context
 59 * @base: pointer to register struct
 60 * @msg: pointer to current message
 61 * @msg_len: number of bytes transferred in msg
 62 * @msg_err: error code for completed message
 63 * @msg_complete: xfer completion object
 64 * @dev: device reference
 65 * @adapter: core i2c abstraction
 66 * @i2c_clk: clock reference for i2c input clock
 67 * @bus_clk_rate: current i2c bus clock rate
 68 * @buf: ptr to msg buffer for easier use.
 69 * @fifo_size: size of the FIFO passed in.
 70 * @isr_mask: cached copy of local ISR enables.
 71 * @isr_status: cached copy of local ISR status.
 72 * @isr_mutex: mutex for IRQ thread.
 73 */
 74struct altr_i2c_dev {
 75	void __iomem *base;
 76	struct i2c_msg *msg;
 77	size_t msg_len;
 78	int msg_err;
 79	struct completion msg_complete;
 80	struct device *dev;
 81	struct i2c_adapter adapter;
 82	struct clk *i2c_clk;
 83	u32 bus_clk_rate;
 84	u8 *buf;
 85	u32 fifo_size;
 86	u32 isr_mask;
 87	u32 isr_status;
 88	struct mutex isr_mutex;
 89};
 90
 91static void
 92altr_i2c_int_enable(struct altr_i2c_dev *idev, u32 mask, bool enable)
 93{
 94	u32 int_en;
 95
 96	int_en = readl(idev->base + ALTR_I2C_ISER);
 97	if (enable)
 98		idev->isr_mask = int_en | mask;
 99	else
100		idev->isr_mask = int_en & ~mask;
101
102	writel(idev->isr_mask, idev->base + ALTR_I2C_ISER);
103}
104
105static void altr_i2c_int_clear(struct altr_i2c_dev *idev, u32 mask)
106{
107	u32 int_en = readl(idev->base + ALTR_I2C_ISR);
108
109	writel(int_en | mask, idev->base + ALTR_I2C_ISR);
110}
111
112static void altr_i2c_core_disable(struct altr_i2c_dev *idev)
113{
114	u32 tmp = readl(idev->base + ALTR_I2C_CTRL);
115
116	writel(tmp & ~ALTR_I2C_CTRL_EN, idev->base + ALTR_I2C_CTRL);
117}
118
119static void altr_i2c_core_enable(struct altr_i2c_dev *idev)
120{
121	u32 tmp = readl(idev->base + ALTR_I2C_CTRL);
122
123	writel(tmp | ALTR_I2C_CTRL_EN, idev->base + ALTR_I2C_CTRL);
124}
125
126static void altr_i2c_reset(struct altr_i2c_dev *idev)
127{
128	altr_i2c_core_disable(idev);
129	altr_i2c_core_enable(idev);
130}
131
132static inline void altr_i2c_stop(struct altr_i2c_dev *idev)
133{
134	writel(ALTR_I2C_TFR_CMD_STO, idev->base + ALTR_I2C_TFR_CMD);
135}
136
137static void altr_i2c_init(struct altr_i2c_dev *idev)
138{
139	u32 divisor = clk_get_rate(idev->i2c_clk) / idev->bus_clk_rate;
140	u32 clk_mhz = clk_get_rate(idev->i2c_clk) / 1000000;
141	u32 tmp = (ALTR_I2C_THRESHOLD << ALTR_I2C_CTRL_RXT_SHFT) |
142		  (ALTR_I2C_THRESHOLD << ALTR_I2C_CTRL_TCT_SHFT);
143	u32 t_high, t_low;
144
145	if (idev->bus_clk_rate <= I2C_MAX_STANDARD_MODE_FREQ) {
146		tmp &= ~ALTR_I2C_CTRL_BSPEED;
147		/* Standard mode SCL 50/50 */
148		t_high = divisor * 1 / 2;
149		t_low = divisor * 1 / 2;
150	} else {
151		tmp |= ALTR_I2C_CTRL_BSPEED;
152		/* Fast mode SCL 33/66 */
153		t_high = divisor * 1 / 3;
154		t_low = divisor * 2 / 3;
155	}
156	writel(tmp, idev->base + ALTR_I2C_CTRL);
157
158	dev_dbg(idev->dev, "rate=%uHz per_clk=%uMHz -> ratio=1:%u\n",
159		idev->bus_clk_rate, clk_mhz, divisor);
160
161	/* Reset controller */
162	altr_i2c_reset(idev);
163
164	/* SCL High Time */
165	writel(t_high, idev->base + ALTR_I2C_SCL_HIGH);
166	/* SCL Low Time */
167	writel(t_low, idev->base + ALTR_I2C_SCL_LOW);
168	/* SDA Hold Time, 300ns */
169	writel(3 * clk_mhz / 10, idev->base + ALTR_I2C_SDA_HOLD);
170
171	/* Mask all master interrupt bits */
172	altr_i2c_int_enable(idev, ALTR_I2C_ALL_IRQ, false);
173}
174
175/*
176 * altr_i2c_transfer - On the last byte to be transmitted, send
177 * a Stop bit on the last byte.
178 */
179static void altr_i2c_transfer(struct altr_i2c_dev *idev, u32 data)
180{
181	/* On the last byte to be transmitted, send STOP */
182	if (idev->msg_len == 1)
183		data |= ALTR_I2C_TFR_CMD_STO;
184	if (idev->msg_len > 0)
185		writel(data, idev->base + ALTR_I2C_TFR_CMD);
186}
187
188/*
189 * altr_i2c_empty_rx_fifo - Fetch data from RX FIFO until end of
190 * transfer. Send a Stop bit on the last byte.
191 */
192static void altr_i2c_empty_rx_fifo(struct altr_i2c_dev *idev)
193{
194	size_t rx_fifo_avail = readl(idev->base + ALTR_I2C_RX_FIFO_LVL);
195	int bytes_to_transfer = min(rx_fifo_avail, idev->msg_len);
196
197	while (bytes_to_transfer-- > 0) {
198		*idev->buf++ = readl(idev->base + ALTR_I2C_RX_DATA);
199		idev->msg_len--;
200		altr_i2c_transfer(idev, 0);
201	}
202}
203
204/*
205 * altr_i2c_fill_tx_fifo - Fill TX FIFO from current message buffer.
206 */
207static int altr_i2c_fill_tx_fifo(struct altr_i2c_dev *idev)
208{
209	size_t tx_fifo_avail = idev->fifo_size - readl(idev->base +
210						       ALTR_I2C_TC_FIFO_LVL);
211	int bytes_to_transfer = min(tx_fifo_avail, idev->msg_len);
212	int ret = idev->msg_len - bytes_to_transfer;
213
214	while (bytes_to_transfer-- > 0) {
215		altr_i2c_transfer(idev, *idev->buf++);
216		idev->msg_len--;
217	}
218
219	return ret;
220}
221
222static irqreturn_t altr_i2c_isr_quick(int irq, void *_dev)
223{
224	struct altr_i2c_dev *idev = _dev;
225	irqreturn_t ret = IRQ_HANDLED;
226
227	/* Read IRQ status but only interested in Enabled IRQs. */
228	idev->isr_status = readl(idev->base + ALTR_I2C_ISR) & idev->isr_mask;
229	if (idev->isr_status)
230		ret = IRQ_WAKE_THREAD;
231
232	return ret;
233}
234
235static irqreturn_t altr_i2c_isr(int irq, void *_dev)
236{
237	int ret;
238	bool read, finish = false;
239	struct altr_i2c_dev *idev = _dev;
240	u32 status = idev->isr_status;
241
242	mutex_lock(&idev->isr_mutex);
243	if (!idev->msg) {
244		dev_warn(idev->dev, "unexpected interrupt\n");
245		altr_i2c_int_clear(idev, ALTR_I2C_ALL_IRQ);
246		goto out;
247	}
248	read = (idev->msg->flags & I2C_M_RD) != 0;
249
250	/* handle Lost Arbitration */
251	if (unlikely(status & ALTR_I2C_ISR_ARB)) {
252		altr_i2c_int_clear(idev, ALTR_I2C_ISR_ARB);
253		idev->msg_err = -EAGAIN;
254		finish = true;
255	} else if (unlikely(status & ALTR_I2C_ISR_NACK)) {
256		dev_dbg(idev->dev, "Could not get ACK\n");
257		idev->msg_err = -ENXIO;
258		altr_i2c_int_clear(idev, ALTR_I2C_ISR_NACK);
259		altr_i2c_stop(idev);
260		finish = true;
261	} else if (read && unlikely(status & ALTR_I2C_ISR_RXOF)) {
262		/* handle RX FIFO Overflow */
263		altr_i2c_empty_rx_fifo(idev);
264		altr_i2c_int_clear(idev, ALTR_I2C_ISR_RXRDY);
265		altr_i2c_stop(idev);
266		dev_err(idev->dev, "RX FIFO Overflow\n");
267		finish = true;
268	} else if (read && (status & ALTR_I2C_ISR_RXRDY)) {
269		/* RX FIFO needs service? */
270		altr_i2c_empty_rx_fifo(idev);
271		altr_i2c_int_clear(idev, ALTR_I2C_ISR_RXRDY);
272		if (!idev->msg_len)
273			finish = true;
274	} else if (!read && (status & ALTR_I2C_ISR_TXRDY)) {
275		/* TX FIFO needs service? */
276		altr_i2c_int_clear(idev, ALTR_I2C_ISR_TXRDY);
277		if (idev->msg_len > 0)
278			altr_i2c_fill_tx_fifo(idev);
279		else
280			finish = true;
281	} else {
282		dev_warn(idev->dev, "Unexpected interrupt: 0x%x\n", status);
283		altr_i2c_int_clear(idev, ALTR_I2C_ALL_IRQ);
284	}
285
286	if (finish) {
287		/* Wait for the Core to finish */
288		ret = readl_poll_timeout_atomic(idev->base + ALTR_I2C_STATUS,
289						status,
290						!(status & ALTR_I2C_STAT_CORE),
291						1, ALTR_I2C_TIMEOUT);
292		if (ret)
293			dev_err(idev->dev, "message timeout\n");
294		altr_i2c_int_enable(idev, ALTR_I2C_ALL_IRQ, false);
295		altr_i2c_int_clear(idev, ALTR_I2C_ALL_IRQ);
296		complete(&idev->msg_complete);
297		dev_dbg(idev->dev, "Message Complete\n");
298	}
299out:
300	mutex_unlock(&idev->isr_mutex);
301
302	return IRQ_HANDLED;
303}
304
305static int altr_i2c_xfer_msg(struct altr_i2c_dev *idev, struct i2c_msg *msg)
306{
307	u32 imask = ALTR_I2C_ISR_RXOF | ALTR_I2C_ISR_ARB | ALTR_I2C_ISR_NACK;
308	unsigned long time_left;
309	u32 value;
310	u8 addr = i2c_8bit_addr_from_msg(msg);
311
312	mutex_lock(&idev->isr_mutex);
313	idev->msg = msg;
314	idev->msg_len = msg->len;
315	idev->buf = msg->buf;
316	idev->msg_err = 0;
317	reinit_completion(&idev->msg_complete);
318	altr_i2c_core_enable(idev);
319
320	/* Make sure RX FIFO is empty */
321	do {
322		readl(idev->base + ALTR_I2C_RX_DATA);
323	} while (readl(idev->base + ALTR_I2C_RX_FIFO_LVL));
324
325	writel(ALTR_I2C_TFR_CMD_STA | addr, idev->base + ALTR_I2C_TFR_CMD);
326
327	if ((msg->flags & I2C_M_RD) != 0) {
328		imask |= ALTR_I2C_ISER_RXOF_EN | ALTR_I2C_ISER_RXRDY_EN;
329		altr_i2c_int_enable(idev, imask, true);
330		/* write the first byte to start the RX */
331		altr_i2c_transfer(idev, 0);
332	} else {
333		imask |= ALTR_I2C_ISR_TXRDY;
334		altr_i2c_int_enable(idev, imask, true);
335		altr_i2c_fill_tx_fifo(idev);
336	}
337	mutex_unlock(&idev->isr_mutex);
338
339	time_left = wait_for_completion_timeout(&idev->msg_complete,
340						ALTR_I2C_XFER_TIMEOUT);
341	mutex_lock(&idev->isr_mutex);
342	altr_i2c_int_enable(idev, imask, false);
343
344	value = readl(idev->base + ALTR_I2C_STATUS) & ALTR_I2C_STAT_CORE;
345	if (value)
346		dev_err(idev->dev, "Core Status not IDLE...\n");
347
348	if (time_left == 0) {
349		idev->msg_err = -ETIMEDOUT;
350		dev_dbg(idev->dev, "Transaction timed out.\n");
351	}
352
353	altr_i2c_core_disable(idev);
354	mutex_unlock(&idev->isr_mutex);
355
356	return idev->msg_err;
357}
358
359static int
360altr_i2c_xfer(struct i2c_adapter *adap, struct i2c_msg *msgs, int num)
361{
362	struct altr_i2c_dev *idev = i2c_get_adapdata(adap);
363	int i, ret;
364
365	for (i = 0; i < num; i++) {
366		ret = altr_i2c_xfer_msg(idev, msgs++);
367		if (ret)
368			return ret;
369	}
370	return num;
371}
372
373static u32 altr_i2c_func(struct i2c_adapter *adap)
374{
375	return I2C_FUNC_I2C | I2C_FUNC_SMBUS_EMUL;
376}
377
378static const struct i2c_algorithm altr_i2c_algo = {
379	.master_xfer = altr_i2c_xfer,
380	.functionality = altr_i2c_func,
381};
382
383static int altr_i2c_probe(struct platform_device *pdev)
384{
385	struct altr_i2c_dev *idev = NULL;
386	int irq, ret;
387
388	idev = devm_kzalloc(&pdev->dev, sizeof(*idev), GFP_KERNEL);
389	if (!idev)
390		return -ENOMEM;
391
392	idev->base = devm_platform_ioremap_resource(pdev, 0);
393	if (IS_ERR(idev->base))
394		return PTR_ERR(idev->base);
395
396	irq = platform_get_irq(pdev, 0);
397	if (irq < 0)
398		return irq;
399
400	idev->i2c_clk = devm_clk_get(&pdev->dev, NULL);
401	if (IS_ERR(idev->i2c_clk)) {
402		dev_err(&pdev->dev, "missing clock\n");
403		return PTR_ERR(idev->i2c_clk);
404	}
405
406	idev->dev = &pdev->dev;
407	init_completion(&idev->msg_complete);
408	mutex_init(&idev->isr_mutex);
409
410	ret = device_property_read_u32(idev->dev, "fifo-size",
411				       &idev->fifo_size);
412	if (ret) {
413		dev_err(&pdev->dev, "FIFO size set to default of %d\n",
414			ALTR_I2C_DFLT_FIFO_SZ);
415		idev->fifo_size = ALTR_I2C_DFLT_FIFO_SZ;
416	}
417
418	ret = device_property_read_u32(idev->dev, "clock-frequency",
419				       &idev->bus_clk_rate);
420	if (ret) {
421		dev_err(&pdev->dev, "Default to 100kHz\n");
422		idev->bus_clk_rate = I2C_MAX_STANDARD_MODE_FREQ;	/* default clock rate */
423	}
424
425	if (idev->bus_clk_rate > I2C_MAX_FAST_MODE_FREQ) {
426		dev_err(&pdev->dev, "invalid clock-frequency %d\n",
427			idev->bus_clk_rate);
428		return -EINVAL;
429	}
430
431	ret = devm_request_threaded_irq(&pdev->dev, irq, altr_i2c_isr_quick,
432					altr_i2c_isr, IRQF_ONESHOT,
433					pdev->name, idev);
434	if (ret) {
435		dev_err(&pdev->dev, "failed to claim IRQ %d\n", irq);
436		return ret;
437	}
438
439	ret = clk_prepare_enable(idev->i2c_clk);
440	if (ret) {
441		dev_err(&pdev->dev, "failed to enable clock\n");
442		return ret;
443	}
444
445	mutex_lock(&idev->isr_mutex);
446	altr_i2c_init(idev);
447	mutex_unlock(&idev->isr_mutex);
448
449	i2c_set_adapdata(&idev->adapter, idev);
450	strlcpy(idev->adapter.name, pdev->name, sizeof(idev->adapter.name));
451	idev->adapter.owner = THIS_MODULE;
452	idev->adapter.algo = &altr_i2c_algo;
453	idev->adapter.dev.parent = &pdev->dev;
454	idev->adapter.dev.of_node = pdev->dev.of_node;
455
456	platform_set_drvdata(pdev, idev);
457
458	ret = i2c_add_adapter(&idev->adapter);
459	if (ret) {
460		clk_disable_unprepare(idev->i2c_clk);
461		return ret;
462	}
463	dev_info(&pdev->dev, "Altera SoftIP I2C Probe Complete\n");
464
465	return 0;
466}
467
468static int altr_i2c_remove(struct platform_device *pdev)
469{
470	struct altr_i2c_dev *idev = platform_get_drvdata(pdev);
471
472	clk_disable_unprepare(idev->i2c_clk);
473	i2c_del_adapter(&idev->adapter);
474
475	return 0;
476}
477
478/* Match table for of_platform binding */
479static const struct of_device_id altr_i2c_of_match[] = {
480	{ .compatible = "altr,softip-i2c-v1.0" },
481	{},
482};
483MODULE_DEVICE_TABLE(of, altr_i2c_of_match);
484
485static struct platform_driver altr_i2c_driver = {
486	.probe = altr_i2c_probe,
487	.remove = altr_i2c_remove,
488	.driver = {
489		.name = "altera-i2c",
490		.of_match_table = altr_i2c_of_match,
491	},
492};
493
494module_platform_driver(altr_i2c_driver);
495
496MODULE_DESCRIPTION("Altera Soft IP I2C bus driver");
497MODULE_AUTHOR("Thor Thayer <thor.thayer@linux.intel.com>");
498MODULE_LICENSE("GPL v2");