1/*
2 * APM X-Gene SoC RNG Driver
3 *
4 * Copyright (c) 2014, Applied Micro Circuits Corporation
5 * Author: Rameshwar Prasad Sahu <rsahu@apm.com>
6 *	   Shamal Winchurkar <swinchurkar@apm.com>
7 *	   Feng Kan <fkan@apm.com>
8 *
9 * This program is free software; you can redistribute  it and/or modify it
10 * under  the terms of  the GNU General  Public License as published by the
11 * Free Software Foundation;  either version 2 of the  License, or (at your
12 * option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17 * GNU General Public License for more details.
18 *
19 * You should have received a copy of the GNU General Public License
20 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 *
22 */
23
24#include <linux/acpi.h>
25#include <linux/clk.h>
26#include <linux/delay.h>
27#include <linux/hw_random.h>
28#include <linux/init.h>
29#include <linux/interrupt.h>
30#include <linux/module.h>
31#include <linux/of_platform.h>
32#include <linux/of_irq.h>
33#include <linux/of_address.h>
34#include <linux/timer.h>
35
36#define RNG_MAX_DATUM			4
37#define MAX_TRY				100
38#define XGENE_RNG_RETRY_COUNT		20
39#define XGENE_RNG_RETRY_INTERVAL	10
40
41/* RNG  Registers */
42#define RNG_INOUT_0			0x00
43#define RNG_INTR_STS_ACK		0x10
44#define RNG_CONTROL			0x14
45#define RNG_CONFIG			0x18
46#define RNG_ALARMCNT			0x1c
47#define RNG_FROENABLE			0x20
48#define RNG_FRODETUNE			0x24
49#define RNG_ALARMMASK			0x28
50#define RNG_ALARMSTOP			0x2c
51#define RNG_OPTIONS			0x78
52#define RNG_EIP_REV			0x7c
53
54#define MONOBIT_FAIL_MASK		BIT(7)
55#define POKER_FAIL_MASK			BIT(6)
56#define LONG_RUN_FAIL_MASK		BIT(5)
57#define RUN_FAIL_MASK			BIT(4)
58#define NOISE_FAIL_MASK			BIT(3)
59#define STUCK_OUT_MASK			BIT(2)
60#define SHUTDOWN_OFLO_MASK		BIT(1)
61#define READY_MASK			BIT(0)
62
63#define MAJOR_HW_REV_RD(src)		(((src) & 0x0f000000) >> 24)
64#define MINOR_HW_REV_RD(src)		(((src) & 0x00f00000) >> 20)
65#define HW_PATCH_LEVEL_RD(src)		(((src) & 0x000f0000) >> 16)
66#define MAX_REFILL_CYCLES_SET(dst, src) \
67			((dst & ~0xffff0000) | (((u32)src << 16) & 0xffff0000))
68#define MIN_REFILL_CYCLES_SET(dst, src) \
69			((dst & ~0x000000ff) | (((u32)src) & 0x000000ff))
70#define ALARM_THRESHOLD_SET(dst, src) \
71			((dst & ~0x000000ff) | (((u32)src) & 0x000000ff))
72#define ENABLE_RNG_SET(dst, src) \
73			((dst & ~BIT(10)) | (((u32)src << 10) & BIT(10)))
74#define REGSPEC_TEST_MODE_SET(dst, src) \
75			((dst & ~BIT(8)) | (((u32)src << 8) & BIT(8)))
76#define MONOBIT_FAIL_MASK_SET(dst, src) \
77			((dst & ~BIT(7)) | (((u32)src << 7) & BIT(7)))
78#define POKER_FAIL_MASK_SET(dst, src) \
79			((dst & ~BIT(6)) | (((u32)src << 6) & BIT(6)))
80#define LONG_RUN_FAIL_MASK_SET(dst, src) \
81			((dst & ~BIT(5)) | (((u32)src << 5) & BIT(5)))
82#define RUN_FAIL_MASK_SET(dst, src) \
83			((dst & ~BIT(4)) | (((u32)src << 4) & BIT(4)))
84#define NOISE_FAIL_MASK_SET(dst, src) \
85			((dst & ~BIT(3)) | (((u32)src << 3) & BIT(3)))
86#define STUCK_OUT_MASK_SET(dst, src) \
87			((dst & ~BIT(2)) | (((u32)src << 2) & BIT(2)))
88#define SHUTDOWN_OFLO_MASK_SET(dst, src) \
89			((dst & ~BIT(1)) | (((u32)src << 1) & BIT(1)))
90
91struct xgene_rng_dev {
92	u32 irq;
93	void  __iomem *csr_base;
94	u32 revision;
95	u32 datum_size;
96	u32 failure_cnt;	/* Failure count last minute */
97	unsigned long failure_ts;/* First failure timestamp */
98	struct timer_list failure_timer;
99	struct device *dev;
100	struct clk *clk;
101};
102
103static void xgene_rng_expired_timer(unsigned long arg)
104{
105	struct xgene_rng_dev *ctx = (struct xgene_rng_dev *) arg;
106
107	/* Clear failure counter as timer expired */
108	disable_irq(ctx->irq);
109	ctx->failure_cnt = 0;
110	del_timer(&ctx->failure_timer);
111	enable_irq(ctx->irq);
112}
113
114static void xgene_rng_start_timer(struct xgene_rng_dev *ctx)
115{
116	ctx->failure_timer.data = (unsigned long) ctx;
117	ctx->failure_timer.function = xgene_rng_expired_timer;
118	ctx->failure_timer.expires = jiffies + 120 * HZ;
119	add_timer(&ctx->failure_timer);
120}
121
122/*
123 * Initialize or reinit free running oscillators (FROs)
124 */
125static void xgene_rng_init_fro(struct xgene_rng_dev *ctx, u32 fro_val)
126{
127	writel(fro_val, ctx->csr_base + RNG_FRODETUNE);
128	writel(0x00000000, ctx->csr_base + RNG_ALARMMASK);
129	writel(0x00000000, ctx->csr_base + RNG_ALARMSTOP);
130	writel(0xFFFFFFFF, ctx->csr_base + RNG_FROENABLE);
131}
132
133static void xgene_rng_chk_overflow(struct xgene_rng_dev *ctx)
134{
135	u32 val;
136
137	val = readl(ctx->csr_base + RNG_INTR_STS_ACK);
138	if (val & MONOBIT_FAIL_MASK)
139		/*
140		 * LFSR detected an out-of-bounds number of 1s after
141		 * checking 20,000 bits (test T1 as specified in the
142		 * AIS-31 standard)
143		 */
144		dev_err(ctx->dev, "test monobit failure error 0x%08X\n", val);
145	if (val & POKER_FAIL_MASK)
146		/*
147		 * LFSR detected an out-of-bounds value in at least one
148		 * of the 16 poker_count_X counters or an out of bounds sum
149		 * of squares value after checking 20,000 bits (test T2 as
150		 * specified in the AIS-31 standard)
151		 */
152		dev_err(ctx->dev, "test poker failure error 0x%08X\n", val);
153	if (val & LONG_RUN_FAIL_MASK)
154		/*
155		 * LFSR detected a sequence of 34 identical bits
156		 * (test T4 as specified in the AIS-31 standard)
157		 */
158		dev_err(ctx->dev, "test long run failure error 0x%08X\n", val);
159	if (val & RUN_FAIL_MASK)
160		/*
161		 * LFSR detected an outof-bounds value for at least one
162		 * of the running counters after checking 20,000 bits
163		 * (test T3 as specified in the AIS-31 standard)
164		 */
165		dev_err(ctx->dev, "test run failure error 0x%08X\n", val);
166	if (val & NOISE_FAIL_MASK)
167		/* LFSR detected a sequence of 48 identical bits */
168		dev_err(ctx->dev, "noise failure error 0x%08X\n", val);
169	if (val & STUCK_OUT_MASK)
170		/*
171		 * Detected output data registers generated same value twice
172		 * in a row
173		 */
174		dev_err(ctx->dev, "stuck out failure error 0x%08X\n", val);
175
176	if (val & SHUTDOWN_OFLO_MASK) {
177		u32 frostopped;
178
179		/* FROs shut down after a second error event. Try recover. */
180		if (++ctx->failure_cnt == 1) {
181			/* 1st time, just recover */
182			ctx->failure_ts = jiffies;
183			frostopped = readl(ctx->csr_base + RNG_ALARMSTOP);
184			xgene_rng_init_fro(ctx, frostopped);
185
186			/*
187			 * We must start a timer to clear out this error
188			 * in case the system timer wrap around
189			 */
190			xgene_rng_start_timer(ctx);
191		} else {
192			/* 2nd time failure in lesser than 1 minute? */
193			if (time_after(ctx->failure_ts + 60 * HZ, jiffies)) {
194				dev_err(ctx->dev,
195					"FRO shutdown failure error 0x%08X\n",
196					val);
197			} else {
198				/* 2nd time failure after 1 minutes, recover */
199				ctx->failure_ts = jiffies;
200				ctx->failure_cnt = 1;
201				/*
202				 * We must start a timer to clear out this
203				 * error in case the system timer wrap
204				 * around
205				 */
206				xgene_rng_start_timer(ctx);
207			}
208			frostopped = readl(ctx->csr_base + RNG_ALARMSTOP);
209			xgene_rng_init_fro(ctx, frostopped);
210		}
211	}
212	/* Clear them all */
213	writel(val, ctx->csr_base + RNG_INTR_STS_ACK);
214}
215
216static irqreturn_t xgene_rng_irq_handler(int irq, void *id)
217{
218	struct xgene_rng_dev *ctx = (struct xgene_rng_dev *) id;
219
220	/* RNG Alarm Counter overflow */
221	xgene_rng_chk_overflow(ctx);
222
223	return IRQ_HANDLED;
224}
225
226static int xgene_rng_data_present(struct hwrng *rng, int wait)
227{
228	struct xgene_rng_dev *ctx = (struct xgene_rng_dev *) rng->priv;
229	u32 i, val = 0;
230
231	for (i = 0; i < XGENE_RNG_RETRY_COUNT; i++) {
232		val = readl(ctx->csr_base + RNG_INTR_STS_ACK);
233		if ((val & READY_MASK) || !wait)
234			break;
235		udelay(XGENE_RNG_RETRY_INTERVAL);
236	}
237
238	return (val & READY_MASK);
239}
240
241static int xgene_rng_data_read(struct hwrng *rng, u32 *data)
242{
243	struct xgene_rng_dev *ctx = (struct xgene_rng_dev *) rng->priv;
244	int i;
245
246	for (i = 0; i < ctx->datum_size; i++)
247		data[i] = readl(ctx->csr_base + RNG_INOUT_0 + i * 4);
248
249	/* Clear ready bit to start next transaction */
250	writel(READY_MASK, ctx->csr_base + RNG_INTR_STS_ACK);
251
252	return ctx->datum_size << 2;
253}
254
255static void xgene_rng_init_internal(struct xgene_rng_dev *ctx)
256{
257	u32 val;
258
259	writel(0x00000000, ctx->csr_base + RNG_CONTROL);
260
261	val = MAX_REFILL_CYCLES_SET(0, 10);
262	val = MIN_REFILL_CYCLES_SET(val, 10);
263	writel(val, ctx->csr_base + RNG_CONFIG);
264
265	val = ALARM_THRESHOLD_SET(0, 0xFF);
266	writel(val, ctx->csr_base + RNG_ALARMCNT);
267
268	xgene_rng_init_fro(ctx, 0);
269
270	writel(MONOBIT_FAIL_MASK |
271		POKER_FAIL_MASK	|
272		LONG_RUN_FAIL_MASK |
273		RUN_FAIL_MASK |
274		NOISE_FAIL_MASK |
275		STUCK_OUT_MASK |
276		SHUTDOWN_OFLO_MASK |
277		READY_MASK, ctx->csr_base + RNG_INTR_STS_ACK);
278
279	val = ENABLE_RNG_SET(0, 1);
280	val = MONOBIT_FAIL_MASK_SET(val, 1);
281	val = POKER_FAIL_MASK_SET(val, 1);
282	val = LONG_RUN_FAIL_MASK_SET(val, 1);
283	val = RUN_FAIL_MASK_SET(val, 1);
284	val = NOISE_FAIL_MASK_SET(val, 1);
285	val = STUCK_OUT_MASK_SET(val, 1);
286	val = SHUTDOWN_OFLO_MASK_SET(val, 1);
287	writel(val, ctx->csr_base + RNG_CONTROL);
288}
289
290static int xgene_rng_init(struct hwrng *rng)
291{
292	struct xgene_rng_dev *ctx = (struct xgene_rng_dev *) rng->priv;
293
294	ctx->failure_cnt = 0;
295	init_timer(&ctx->failure_timer);
296
297	ctx->revision = readl(ctx->csr_base + RNG_EIP_REV);
298
299	dev_dbg(ctx->dev, "Rev %d.%d.%d\n",
300		MAJOR_HW_REV_RD(ctx->revision),
301		MINOR_HW_REV_RD(ctx->revision),
302		HW_PATCH_LEVEL_RD(ctx->revision));
303
304	dev_dbg(ctx->dev, "Options 0x%08X",
305		readl(ctx->csr_base + RNG_OPTIONS));
306
307	xgene_rng_init_internal(ctx);
308
309	ctx->datum_size = RNG_MAX_DATUM;
310
311	return 0;
312}
313
314#ifdef CONFIG_ACPI
315static const struct acpi_device_id xgene_rng_acpi_match[] = {
316	{ "APMC0D18", },
317	{ }
318};
319MODULE_DEVICE_TABLE(acpi, xgene_rng_acpi_match);
320#endif
321
322static struct hwrng xgene_rng_func = {
323	.name		= "xgene-rng",
324	.init		= xgene_rng_init,
325	.data_present	= xgene_rng_data_present,
326	.data_read	= xgene_rng_data_read,
327};
328
329static int xgene_rng_probe(struct platform_device *pdev)
330{
331	struct resource *res;
332	struct xgene_rng_dev *ctx;
333	int rc = 0;
334
335	ctx = devm_kzalloc(&pdev->dev, sizeof(*ctx), GFP_KERNEL);
336	if (!ctx)
337		return -ENOMEM;
338
339	ctx->dev = &pdev->dev;
340	platform_set_drvdata(pdev, ctx);
341
342	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
343	ctx->csr_base = devm_ioremap_resource(&pdev->dev, res);
344	if (IS_ERR(ctx->csr_base))
345		return PTR_ERR(ctx->csr_base);
346
347	ctx->irq = platform_get_irq(pdev, 0);
348	if (ctx->irq < 0) {
349		dev_err(&pdev->dev, "No IRQ resource\n");
350		return ctx->irq;
351	}
352
353	dev_dbg(&pdev->dev, "APM X-Gene RNG BASE %p ALARM IRQ %d",
354		ctx->csr_base, ctx->irq);
355
356	rc = devm_request_irq(&pdev->dev, ctx->irq, xgene_rng_irq_handler, 0,
357				dev_name(&pdev->dev), ctx);
358	if (rc) {
359		dev_err(&pdev->dev, "Could not request RNG alarm IRQ\n");
360		return rc;
361	}
362
363	/* Enable IP clock */
364	ctx->clk = devm_clk_get(&pdev->dev, NULL);
365	if (IS_ERR(ctx->clk)) {
366		dev_warn(&pdev->dev, "Couldn't get the clock for RNG\n");
367	} else {
368		rc = clk_prepare_enable(ctx->clk);
369		if (rc) {
370			dev_warn(&pdev->dev,
371				 "clock prepare enable failed for RNG");
372			return rc;
373		}
374	}
375
376	xgene_rng_func.priv = (unsigned long) ctx;
377
378	rc = hwrng_register(&xgene_rng_func);
379	if (rc) {
380		dev_err(&pdev->dev, "RNG registering failed error %d\n", rc);
381		if (!IS_ERR(ctx->clk))
382			clk_disable_unprepare(ctx->clk);
383		return rc;
384	}
385
386	rc = device_init_wakeup(&pdev->dev, 1);
387	if (rc) {
388		dev_err(&pdev->dev, "RNG device_init_wakeup failed error %d\n",
389			rc);
390		if (!IS_ERR(ctx->clk))
391			clk_disable_unprepare(ctx->clk);
392		hwrng_unregister(&xgene_rng_func);
393		return rc;
394	}
395
396	return 0;
397}
398
399static int xgene_rng_remove(struct platform_device *pdev)
400{
401	struct xgene_rng_dev *ctx = platform_get_drvdata(pdev);
402	int rc;
403
404	rc = device_init_wakeup(&pdev->dev, 0);
405	if (rc)
406		dev_err(&pdev->dev, "RNG init wakeup failed error %d\n", rc);
407	if (!IS_ERR(ctx->clk))
408		clk_disable_unprepare(ctx->clk);
409	hwrng_unregister(&xgene_rng_func);
410
411	return rc;
412}
413
414static const struct of_device_id xgene_rng_of_match[] = {
415	{ .compatible = "apm,xgene-rng" },
416	{ }
417};
418
419MODULE_DEVICE_TABLE(of, xgene_rng_of_match);
420
421static struct platform_driver xgene_rng_driver = {
422	.probe = xgene_rng_probe,
423	.remove	= xgene_rng_remove,
424	.driver = {
425		.name		= "xgene-rng",
426		.of_match_table = xgene_rng_of_match,
427		.acpi_match_table = ACPI_PTR(xgene_rng_acpi_match),
428	},
429};
430
431module_platform_driver(xgene_rng_driver);
432MODULE_DESCRIPTION("APM X-Gene RNG driver");
433MODULE_LICENSE("GPL");
434