1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Pin Control and GPIO driver for SuperH Pin Function Controller.
4 *
5 * Authors: Magnus Damm, Paul Mundt, Laurent Pinchart
6 *
7 * Copyright (C) 2008 Magnus Damm
8 * Copyright (C) 2009 - 2012 Paul Mundt
9 */
10
11#define DRV_NAME "sh-pfc"
12
13#include <linux/bitops.h>
14#include <linux/err.h>
15#include <linux/errno.h>
16#include <linux/io.h>
17#include <linux/ioport.h>
18#include <linux/kernel.h>
19#include <linux/init.h>
20#include <linux/of.h>
21#include <linux/of_device.h>
22#include <linux/pinctrl/machine.h>
23#include <linux/platform_device.h>
24#include <linux/psci.h>
25#include <linux/slab.h>
26#include <linux/sys_soc.h>
27
28#include "core.h"
29
30static int sh_pfc_map_resources(struct sh_pfc *pfc,
31				struct platform_device *pdev)
32{
33	struct sh_pfc_window *windows;
34	unsigned int *irqs = NULL;
35	unsigned int num_windows;
36	struct resource *res;
37	unsigned int i;
38	int num_irqs;
39
40	/* Count the MEM and IRQ resources. */
41	for (num_windows = 0;; num_windows++) {
42		res = platform_get_resource(pdev, IORESOURCE_MEM, num_windows);
43		if (!res)
44			break;
45	}
46	if (num_windows == 0)
47		return -EINVAL;
48
49	num_irqs = platform_irq_count(pdev);
50	if (num_irqs < 0)
51		return num_irqs;
52
53	/* Allocate memory windows and IRQs arrays. */
54	windows = devm_kcalloc(pfc->dev, num_windows, sizeof(*windows),
55			       GFP_KERNEL);
56	if (windows == NULL)
57		return -ENOMEM;
58
59	pfc->num_windows = num_windows;
60	pfc->windows = windows;
61
62	if (num_irqs) {
63		irqs = devm_kcalloc(pfc->dev, num_irqs, sizeof(*irqs),
64				    GFP_KERNEL);
65		if (irqs == NULL)
66			return -ENOMEM;
67
68		pfc->num_irqs = num_irqs;
69		pfc->irqs = irqs;
70	}
71
72	/* Fill them. */
73	for (i = 0; i < num_windows; i++) {
74		windows->virt = devm_platform_get_and_ioremap_resource(pdev, i, &res);
75		if (IS_ERR(windows->virt))
76			return -ENOMEM;
77		windows->phys = res->start;
78		windows->size = resource_size(res);
79		windows++;
80	}
81	for (i = 0; i < num_irqs; i++)
82		*irqs++ = platform_get_irq(pdev, i);
83
84	return 0;
85}
86
87static void __iomem *sh_pfc_phys_to_virt(struct sh_pfc *pfc, u32 reg)
88{
89	struct sh_pfc_window *window;
90	phys_addr_t address = reg;
91	unsigned int i;
92
93	/* scan through physical windows and convert address */
94	for (i = 0; i < pfc->num_windows; i++) {
95		window = pfc->windows + i;
96
97		if (address < window->phys)
98			continue;
99
100		if (address >= (window->phys + window->size))
101			continue;
102
103		return window->virt + (address - window->phys);
104	}
105
106	BUG();
107	return NULL;
108}
109
110int sh_pfc_get_pin_index(struct sh_pfc *pfc, unsigned int pin)
111{
112	unsigned int offset;
113	unsigned int i;
114
115	for (i = 0, offset = 0; i < pfc->nr_ranges; ++i) {
116		const struct sh_pfc_pin_range *range = &pfc->ranges[i];
117
118		if (pin <= range->end)
119			return pin >= range->start
120			     ? offset + pin - range->start : -1;
121
122		offset += range->end - range->start + 1;
123	}
124
125	return -EINVAL;
126}
127
128static int sh_pfc_enum_in_range(u16 enum_id, const struct pinmux_range *r)
129{
130	if (enum_id < r->begin)
131		return 0;
132
133	if (enum_id > r->end)
134		return 0;
135
136	return 1;
137}
138
139u32 sh_pfc_read_raw_reg(void __iomem *mapped_reg, unsigned int reg_width)
140{
141	switch (reg_width) {
142	case 8:
143		return ioread8(mapped_reg);
144	case 16:
145		return ioread16(mapped_reg);
146	case 32:
147		return ioread32(mapped_reg);
148	}
149
150	BUG();
151	return 0;
152}
153
154void sh_pfc_write_raw_reg(void __iomem *mapped_reg, unsigned int reg_width,
155			  u32 data)
156{
157	switch (reg_width) {
158	case 8:
159		iowrite8(data, mapped_reg);
160		return;
161	case 16:
162		iowrite16(data, mapped_reg);
163		return;
164	case 32:
165		iowrite32(data, mapped_reg);
166		return;
167	}
168
169	BUG();
170}
171
172u32 sh_pfc_read(struct sh_pfc *pfc, u32 reg)
173{
174	return sh_pfc_read_raw_reg(sh_pfc_phys_to_virt(pfc, reg), 32);
175}
176
177void sh_pfc_write(struct sh_pfc *pfc, u32 reg, u32 data)
178{
179	if (pfc->info->unlock_reg)
180		sh_pfc_write_raw_reg(
181			sh_pfc_phys_to_virt(pfc, pfc->info->unlock_reg), 32,
182			~data);
183
184	sh_pfc_write_raw_reg(sh_pfc_phys_to_virt(pfc, reg), 32, data);
185}
186
187static void sh_pfc_config_reg_helper(struct sh_pfc *pfc,
188				     const struct pinmux_cfg_reg *crp,
189				     unsigned int in_pos,
190				     void __iomem **mapped_regp, u32 *maskp,
191				     unsigned int *posp)
192{
193	unsigned int k;
194
195	*mapped_regp = sh_pfc_phys_to_virt(pfc, crp->reg);
196
197	if (crp->field_width) {
198		*maskp = (1 << crp->field_width) - 1;
199		*posp = crp->reg_width - ((in_pos + 1) * crp->field_width);
200	} else {
201		*maskp = (1 << crp->var_field_width[in_pos]) - 1;
202		*posp = crp->reg_width;
203		for (k = 0; k <= in_pos; k++)
204			*posp -= crp->var_field_width[k];
205	}
206}
207
208static void sh_pfc_write_config_reg(struct sh_pfc *pfc,
209				    const struct pinmux_cfg_reg *crp,
210				    unsigned int field, u32 value)
211{
212	void __iomem *mapped_reg;
213	unsigned int pos;
214	u32 mask, data;
215
216	sh_pfc_config_reg_helper(pfc, crp, field, &mapped_reg, &mask, &pos);
217
218	dev_dbg(pfc->dev, "write_reg addr = %x, value = 0x%x, field = %u, "
219		"r_width = %u, f_width = %u\n",
220		crp->reg, value, field, crp->reg_width, hweight32(mask));
221
222	mask = ~(mask << pos);
223	value = value << pos;
224
225	data = sh_pfc_read_raw_reg(mapped_reg, crp->reg_width);
226	data &= mask;
227	data |= value;
228
229	if (pfc->info->unlock_reg)
230		sh_pfc_write_raw_reg(
231			sh_pfc_phys_to_virt(pfc, pfc->info->unlock_reg), 32,
232			~data);
233
234	sh_pfc_write_raw_reg(mapped_reg, crp->reg_width, data);
235}
236
237static int sh_pfc_get_config_reg(struct sh_pfc *pfc, u16 enum_id,
238				 const struct pinmux_cfg_reg **crp,
239				 unsigned int *fieldp, u32 *valuep)
240{
241	unsigned int k = 0;
242
243	while (1) {
244		const struct pinmux_cfg_reg *config_reg =
245			pfc->info->cfg_regs + k;
246		unsigned int r_width = config_reg->reg_width;
247		unsigned int f_width = config_reg->field_width;
248		unsigned int curr_width;
249		unsigned int bit_pos;
250		unsigned int pos = 0;
251		unsigned int m = 0;
252
253		if (!r_width)
254			break;
255
256		for (bit_pos = 0; bit_pos < r_width; bit_pos += curr_width) {
257			u32 ncomb;
258			u32 n;
259
260			if (f_width)
261				curr_width = f_width;
262			else
263				curr_width = config_reg->var_field_width[m];
264
265			ncomb = 1 << curr_width;
266			for (n = 0; n < ncomb; n++) {
267				if (config_reg->enum_ids[pos + n] == enum_id) {
268					*crp = config_reg;
269					*fieldp = m;
270					*valuep = n;
271					return 0;
272				}
273			}
274			pos += ncomb;
275			m++;
276		}
277		k++;
278	}
279
280	return -EINVAL;
281}
282
283static int sh_pfc_mark_to_enum(struct sh_pfc *pfc, u16 mark, int pos,
284			      u16 *enum_idp)
285{
286	const u16 *data = pfc->info->pinmux_data;
287	unsigned int k;
288
289	if (pos) {
290		*enum_idp = data[pos + 1];
291		return pos + 1;
292	}
293
294	for (k = 0; k < pfc->info->pinmux_data_size; k++) {
295		if (data[k] == mark) {
296			*enum_idp = data[k + 1];
297			return k + 1;
298		}
299	}
300
301	dev_err(pfc->dev, "cannot locate data/mark enum_id for mark %d\n",
302		mark);
303	return -EINVAL;
304}
305
306int sh_pfc_config_mux(struct sh_pfc *pfc, unsigned mark, int pinmux_type)
307{
308	const struct pinmux_range *range;
309	int pos = 0;
310
311	switch (pinmux_type) {
312	case PINMUX_TYPE_GPIO:
313	case PINMUX_TYPE_FUNCTION:
314		range = NULL;
315		break;
316
317	case PINMUX_TYPE_OUTPUT:
318		range = &pfc->info->output;
319		break;
320
321	case PINMUX_TYPE_INPUT:
322		range = &pfc->info->input;
323		break;
324
325	default:
326		return -EINVAL;
327	}
328
329	/* Iterate over all the configuration fields we need to update. */
330	while (1) {
331		const struct pinmux_cfg_reg *cr;
332		unsigned int field;
333		u16 enum_id;
334		u32 value;
335		int in_range;
336		int ret;
337
338		pos = sh_pfc_mark_to_enum(pfc, mark, pos, &enum_id);
339		if (pos < 0)
340			return pos;
341
342		if (!enum_id)
343			break;
344
345		/* Check if the configuration field selects a function. If it
346		 * doesn't, skip the field if it's not applicable to the
347		 * requested pinmux type.
348		 */
349		in_range = sh_pfc_enum_in_range(enum_id, &pfc->info->function);
350		if (!in_range) {
351			if (pinmux_type == PINMUX_TYPE_FUNCTION) {
352				/* Functions are allowed to modify all
353				 * fields.
354				 */
355				in_range = 1;
356			} else if (pinmux_type != PINMUX_TYPE_GPIO) {
357				/* Input/output types can only modify fields
358				 * that correspond to their respective ranges.
359				 */
360				in_range = sh_pfc_enum_in_range(enum_id, range);
361
362				/*
363				 * special case pass through for fixed
364				 * input-only or output-only pins without
365				 * function enum register association.
366				 */
367				if (in_range && enum_id == range->force)
368					continue;
369			}
370			/* GPIOs are only allowed to modify function fields. */
371		}
372
373		if (!in_range)
374			continue;
375
376		ret = sh_pfc_get_config_reg(pfc, enum_id, &cr, &field, &value);
377		if (ret < 0)
378			return ret;
379
380		sh_pfc_write_config_reg(pfc, cr, field, value);
381	}
382
383	return 0;
384}
385
386const struct pinmux_bias_reg *
387sh_pfc_pin_to_bias_reg(const struct sh_pfc *pfc, unsigned int pin,
388		       unsigned int *bit)
389{
390	unsigned int i, j;
391
392	for (i = 0; pfc->info->bias_regs[i].puen; i++) {
393		for (j = 0; j < ARRAY_SIZE(pfc->info->bias_regs[i].pins); j++) {
394			if (pfc->info->bias_regs[i].pins[j] == pin) {
395				*bit = j;
396				return &pfc->info->bias_regs[i];
397			}
398		}
399	}
400
401	WARN_ONCE(1, "Pin %u is not in bias info list\n", pin);
402
403	return NULL;
404}
405
406static int sh_pfc_init_ranges(struct sh_pfc *pfc)
407{
408	struct sh_pfc_pin_range *range;
409	unsigned int nr_ranges;
410	unsigned int i;
411
412	if (pfc->info->pins[0].pin == (u16)-1) {
413		/* Pin number -1 denotes that the SoC doesn't report pin numbers
414		 * in its pin arrays yet. Consider the pin numbers range as
415		 * continuous and allocate a single range.
416		 */
417		pfc->nr_ranges = 1;
418		pfc->ranges = devm_kzalloc(pfc->dev, sizeof(*pfc->ranges),
419					   GFP_KERNEL);
420		if (pfc->ranges == NULL)
421			return -ENOMEM;
422
423		pfc->ranges->start = 0;
424		pfc->ranges->end = pfc->info->nr_pins - 1;
425		pfc->nr_gpio_pins = pfc->info->nr_pins;
426
427		return 0;
428	}
429
430	/* Count, allocate and fill the ranges. The PFC SoC data pins array must
431	 * be sorted by pin numbers, and pins without a GPIO port must come
432	 * last.
433	 */
434	for (i = 1, nr_ranges = 1; i < pfc->info->nr_pins; ++i) {
435		if (pfc->info->pins[i-1].pin != pfc->info->pins[i].pin - 1)
436			nr_ranges++;
437	}
438
439	pfc->nr_ranges = nr_ranges;
440	pfc->ranges = devm_kcalloc(pfc->dev, nr_ranges, sizeof(*pfc->ranges),
441				   GFP_KERNEL);
442	if (pfc->ranges == NULL)
443		return -ENOMEM;
444
445	range = pfc->ranges;
446	range->start = pfc->info->pins[0].pin;
447
448	for (i = 1; i < pfc->info->nr_pins; ++i) {
449		if (pfc->info->pins[i-1].pin == pfc->info->pins[i].pin - 1)
450			continue;
451
452		range->end = pfc->info->pins[i-1].pin;
453		if (!(pfc->info->pins[i-1].configs & SH_PFC_PIN_CFG_NO_GPIO))
454			pfc->nr_gpio_pins = range->end + 1;
455
456		range++;
457		range->start = pfc->info->pins[i].pin;
458	}
459
460	range->end = pfc->info->pins[i-1].pin;
461	if (!(pfc->info->pins[i-1].configs & SH_PFC_PIN_CFG_NO_GPIO))
462		pfc->nr_gpio_pins = range->end + 1;
463
464	return 0;
465}
466
467#ifdef CONFIG_OF
468static const struct of_device_id sh_pfc_of_table[] = {
469#ifdef CONFIG_PINCTRL_PFC_EMEV2
470	{
471		.compatible = "renesas,pfc-emev2",
472		.data = &emev2_pinmux_info,
473	},
474#endif
475#ifdef CONFIG_PINCTRL_PFC_R8A73A4
476	{
477		.compatible = "renesas,pfc-r8a73a4",
478		.data = &r8a73a4_pinmux_info,
479	},
480#endif
481#ifdef CONFIG_PINCTRL_PFC_R8A7740
482	{
483		.compatible = "renesas,pfc-r8a7740",
484		.data = &r8a7740_pinmux_info,
485	},
486#endif
487#ifdef CONFIG_PINCTRL_PFC_R8A7742
488	{
489		.compatible = "renesas,pfc-r8a7742",
490		.data = &r8a7742_pinmux_info,
491	},
492#endif
493#ifdef CONFIG_PINCTRL_PFC_R8A7743
494	{
495		.compatible = "renesas,pfc-r8a7743",
496		.data = &r8a7743_pinmux_info,
497	},
498#endif
499#ifdef CONFIG_PINCTRL_PFC_R8A7744
500	{
501		.compatible = "renesas,pfc-r8a7744",
502		.data = &r8a7744_pinmux_info,
503	},
504#endif
505#ifdef CONFIG_PINCTRL_PFC_R8A7745
506	{
507		.compatible = "renesas,pfc-r8a7745",
508		.data = &r8a7745_pinmux_info,
509	},
510#endif
511#ifdef CONFIG_PINCTRL_PFC_R8A77470
512	{
513		.compatible = "renesas,pfc-r8a77470",
514		.data = &r8a77470_pinmux_info,
515	},
516#endif
517#ifdef CONFIG_PINCTRL_PFC_R8A774A1
518	{
519		.compatible = "renesas,pfc-r8a774a1",
520		.data = &r8a774a1_pinmux_info,
521	},
522#endif
523#ifdef CONFIG_PINCTRL_PFC_R8A774B1
524	{
525		.compatible = "renesas,pfc-r8a774b1",
526		.data = &r8a774b1_pinmux_info,
527	},
528#endif
529#ifdef CONFIG_PINCTRL_PFC_R8A774C0
530	{
531		.compatible = "renesas,pfc-r8a774c0",
532		.data = &r8a774c0_pinmux_info,
533	},
534#endif
535#ifdef CONFIG_PINCTRL_PFC_R8A774E1
536	{
537		.compatible = "renesas,pfc-r8a774e1",
538		.data = &r8a774e1_pinmux_info,
539	},
540#endif
541#ifdef CONFIG_PINCTRL_PFC_R8A7778
542	{
543		.compatible = "renesas,pfc-r8a7778",
544		.data = &r8a7778_pinmux_info,
545	},
546#endif
547#ifdef CONFIG_PINCTRL_PFC_R8A7779
548	{
549		.compatible = "renesas,pfc-r8a7779",
550		.data = &r8a7779_pinmux_info,
551	},
552#endif
553#ifdef CONFIG_PINCTRL_PFC_R8A7790
554	{
555		.compatible = "renesas,pfc-r8a7790",
556		.data = &r8a7790_pinmux_info,
557	},
558#endif
559#ifdef CONFIG_PINCTRL_PFC_R8A7791
560	{
561		.compatible = "renesas,pfc-r8a7791",
562		.data = &r8a7791_pinmux_info,
563	},
564#endif
565#ifdef CONFIG_PINCTRL_PFC_R8A7792
566	{
567		.compatible = "renesas,pfc-r8a7792",
568		.data = &r8a7792_pinmux_info,
569	},
570#endif
571#ifdef CONFIG_PINCTRL_PFC_R8A7793
572	{
573		.compatible = "renesas,pfc-r8a7793",
574		.data = &r8a7793_pinmux_info,
575	},
576#endif
577#ifdef CONFIG_PINCTRL_PFC_R8A7794
578	{
579		.compatible = "renesas,pfc-r8a7794",
580		.data = &r8a7794_pinmux_info,
581	},
582#endif
583/* Both r8a7795 entries must be present to make sanity checks work */
584#ifdef CONFIG_PINCTRL_PFC_R8A77950
585	{
586		.compatible = "renesas,pfc-r8a7795",
587		.data = &r8a77950_pinmux_info,
588	},
589#endif
590#ifdef CONFIG_PINCTRL_PFC_R8A77951
591	{
592		.compatible = "renesas,pfc-r8a7795",
593		.data = &r8a77951_pinmux_info,
594	},
595#endif
596#ifdef CONFIG_PINCTRL_PFC_R8A77960
597	{
598		.compatible = "renesas,pfc-r8a7796",
599		.data = &r8a77960_pinmux_info,
600	},
601#endif
602#ifdef CONFIG_PINCTRL_PFC_R8A77961
603	{
604		.compatible = "renesas,pfc-r8a77961",
605		.data = &r8a77961_pinmux_info,
606	},
607#endif
608#ifdef CONFIG_PINCTRL_PFC_R8A77965
609	{
610		.compatible = "renesas,pfc-r8a77965",
611		.data = &r8a77965_pinmux_info,
612	},
613#endif
614#ifdef CONFIG_PINCTRL_PFC_R8A77970
615	{
616		.compatible = "renesas,pfc-r8a77970",
617		.data = &r8a77970_pinmux_info,
618	},
619#endif
620#ifdef CONFIG_PINCTRL_PFC_R8A77980
621	{
622		.compatible = "renesas,pfc-r8a77980",
623		.data = &r8a77980_pinmux_info,
624	},
625#endif
626#ifdef CONFIG_PINCTRL_PFC_R8A77990
627	{
628		.compatible = "renesas,pfc-r8a77990",
629		.data = &r8a77990_pinmux_info,
630	},
631#endif
632#ifdef CONFIG_PINCTRL_PFC_R8A77995
633	{
634		.compatible = "renesas,pfc-r8a77995",
635		.data = &r8a77995_pinmux_info,
636	},
637#endif
638#ifdef CONFIG_PINCTRL_PFC_SH73A0
639	{
640		.compatible = "renesas,pfc-sh73a0",
641		.data = &sh73a0_pinmux_info,
642	},
643#endif
644	{ },
645};
646#endif
647
648#if defined(CONFIG_PM_SLEEP) && defined(CONFIG_ARM_PSCI_FW)
649static void sh_pfc_nop_reg(struct sh_pfc *pfc, u32 reg, unsigned int idx)
650{
651}
652
653static void sh_pfc_save_reg(struct sh_pfc *pfc, u32 reg, unsigned int idx)
654{
655	pfc->saved_regs[idx] = sh_pfc_read(pfc, reg);
656}
657
658static void sh_pfc_restore_reg(struct sh_pfc *pfc, u32 reg, unsigned int idx)
659{
660	sh_pfc_write(pfc, reg, pfc->saved_regs[idx]);
661}
662
663static unsigned int sh_pfc_walk_regs(struct sh_pfc *pfc,
664	void (*do_reg)(struct sh_pfc *pfc, u32 reg, unsigned int idx))
665{
666	unsigned int i, n = 0;
667
668	if (pfc->info->cfg_regs)
669		for (i = 0; pfc->info->cfg_regs[i].reg; i++)
670			do_reg(pfc, pfc->info->cfg_regs[i].reg, n++);
671
672	if (pfc->info->drive_regs)
673		for (i = 0; pfc->info->drive_regs[i].reg; i++)
674			do_reg(pfc, pfc->info->drive_regs[i].reg, n++);
675
676	if (pfc->info->bias_regs)
677		for (i = 0; pfc->info->bias_regs[i].puen; i++) {
678			do_reg(pfc, pfc->info->bias_regs[i].puen, n++);
679			if (pfc->info->bias_regs[i].pud)
680				do_reg(pfc, pfc->info->bias_regs[i].pud, n++);
681		}
682
683	if (pfc->info->ioctrl_regs)
684		for (i = 0; pfc->info->ioctrl_regs[i].reg; i++)
685			do_reg(pfc, pfc->info->ioctrl_regs[i].reg, n++);
686
687	return n;
688}
689
690static int sh_pfc_suspend_init(struct sh_pfc *pfc)
691{
692	unsigned int n;
693
694	/* This is the best we can do to check for the presence of PSCI */
695	if (!psci_ops.cpu_suspend)
696		return 0;
697
698	n = sh_pfc_walk_regs(pfc, sh_pfc_nop_reg);
699	if (!n)
700		return 0;
701
702	pfc->saved_regs = devm_kmalloc_array(pfc->dev, n,
703					     sizeof(*pfc->saved_regs),
704					     GFP_KERNEL);
705	if (!pfc->saved_regs)
706		return -ENOMEM;
707
708	dev_dbg(pfc->dev, "Allocated space to save %u regs\n", n);
709	return 0;
710}
711
712static int sh_pfc_suspend_noirq(struct device *dev)
713{
714	struct sh_pfc *pfc = dev_get_drvdata(dev);
715
716	if (pfc->saved_regs)
717		sh_pfc_walk_regs(pfc, sh_pfc_save_reg);
718	return 0;
719}
720
721static int sh_pfc_resume_noirq(struct device *dev)
722{
723	struct sh_pfc *pfc = dev_get_drvdata(dev);
724
725	if (pfc->saved_regs)
726		sh_pfc_walk_regs(pfc, sh_pfc_restore_reg);
727	return 0;
728}
729
730static const struct dev_pm_ops sh_pfc_pm  = {
731	SET_NOIRQ_SYSTEM_SLEEP_PM_OPS(sh_pfc_suspend_noirq, sh_pfc_resume_noirq)
732};
733#define DEV_PM_OPS	&sh_pfc_pm
734#else
735static int sh_pfc_suspend_init(struct sh_pfc *pfc) { return 0; }
736#define DEV_PM_OPS	NULL
737#endif /* CONFIG_PM_SLEEP && CONFIG_ARM_PSCI_FW */
738
739#ifdef DEBUG
740#define SH_PFC_MAX_REGS		300
741#define SH_PFC_MAX_ENUMS	5000
742
743static unsigned int sh_pfc_errors __initdata = 0;
744static unsigned int sh_pfc_warnings __initdata = 0;
745static u32 *sh_pfc_regs __initdata = NULL;
746static u32 sh_pfc_num_regs __initdata = 0;
747static u16 *sh_pfc_enums __initdata = NULL;
748static u32 sh_pfc_num_enums __initdata = 0;
749
750#define sh_pfc_err(fmt, ...)					\
751	do {							\
752		pr_err("%s: " fmt, drvname, ##__VA_ARGS__);	\
753		sh_pfc_errors++;				\
754	} while (0)
755#define sh_pfc_warn(fmt, ...)					\
756	do {							\
757		pr_warn("%s: " fmt, drvname, ##__VA_ARGS__);	\
758		sh_pfc_warnings++;				\
759	} while (0)
760
761static bool __init is0s(const u16 *enum_ids, unsigned int n)
762{
763	unsigned int i;
764
765	for (i = 0; i < n; i++)
766		if (enum_ids[i])
767			return false;
768
769	return true;
770}
771
772static bool __init same_name(const char *a, const char *b)
773{
774	if (!a || !b)
775		return false;
776
777	return !strcmp(a, b);
778}
779
780static void __init sh_pfc_check_reg(const char *drvname, u32 reg)
781{
782	unsigned int i;
783
784	for (i = 0; i < sh_pfc_num_regs; i++)
785		if (reg == sh_pfc_regs[i]) {
786			sh_pfc_err("reg 0x%x conflict\n", reg);
787			return;
788		}
789
790	if (sh_pfc_num_regs == SH_PFC_MAX_REGS) {
791		pr_warn_once("%s: Please increase SH_PFC_MAX_REGS\n", drvname);
792		return;
793	}
794
795	sh_pfc_regs[sh_pfc_num_regs++] = reg;
796}
797
798static int __init sh_pfc_check_enum(const char *drvname, u16 enum_id)
799{
800	unsigned int i;
801
802	for (i = 0; i < sh_pfc_num_enums; i++) {
803		if (enum_id == sh_pfc_enums[i])
804			return -EINVAL;
805	}
806
807	if (sh_pfc_num_enums == SH_PFC_MAX_ENUMS) {
808		pr_warn_once("%s: Please increase SH_PFC_MAX_ENUMS\n", drvname);
809		return 0;
810	}
811
812	sh_pfc_enums[sh_pfc_num_enums++] = enum_id;
813	return 0;
814}
815
816static void __init sh_pfc_check_reg_enums(const char *drvname, u32 reg,
817					  const u16 *enums, unsigned int n)
818{
819	unsigned int i;
820
821	for (i = 0; i < n; i++) {
822		if (enums[i] && sh_pfc_check_enum(drvname, enums[i]))
823			sh_pfc_err("reg 0x%x enum_id %u conflict\n", reg,
824				   enums[i]);
825	}
826}
827
828static void __init sh_pfc_check_pin(const struct sh_pfc_soc_info *info,
829				    u32 reg, unsigned int pin)
830{
831	const char *drvname = info->name;
832	unsigned int i;
833
834	if (pin == SH_PFC_PIN_NONE)
835		return;
836
837	for (i = 0; i < info->nr_pins; i++) {
838		if (pin == info->pins[i].pin)
839			return;
840	}
841
842	sh_pfc_err("reg 0x%x: pin %u not found\n", reg, pin);
843}
844
845static void __init sh_pfc_check_cfg_reg(const char *drvname,
846					const struct pinmux_cfg_reg *cfg_reg)
847{
848	unsigned int i, n, rw, fw;
849
850	sh_pfc_check_reg(drvname, cfg_reg->reg);
851
852	if (cfg_reg->field_width) {
853		fw = cfg_reg->field_width;
854		n = (cfg_reg->reg_width / fw) << fw;
855		/* Skip field checks (done at build time) */
856		goto check_enum_ids;
857	}
858
859	for (i = 0, n = 0, rw = 0; (fw = cfg_reg->var_field_width[i]); i++) {
860		if (fw > 3 && is0s(&cfg_reg->enum_ids[n], 1 << fw))
861			sh_pfc_warn("reg 0x%x: reserved field [%u:%u] can be split to reduce table size\n",
862				    cfg_reg->reg, rw, rw + fw - 1);
863		n += 1 << fw;
864		rw += fw;
865	}
866
867	if (rw != cfg_reg->reg_width)
868		sh_pfc_err("reg 0x%x: var_field_width declares %u instead of %u bits\n",
869			   cfg_reg->reg, rw, cfg_reg->reg_width);
870
871	if (n != cfg_reg->nr_enum_ids)
872		sh_pfc_err("reg 0x%x: enum_ids[] has %u instead of %u values\n",
873			   cfg_reg->reg, cfg_reg->nr_enum_ids, n);
874
875check_enum_ids:
876	sh_pfc_check_reg_enums(drvname, cfg_reg->reg, cfg_reg->enum_ids, n);
877}
878
879static void __init sh_pfc_check_drive_reg(const struct sh_pfc_soc_info *info,
880					  const struct pinmux_drive_reg *drive)
881{
882	const char *drvname = info->name;
883	unsigned long seen = 0, mask;
884	unsigned int i;
885
886	sh_pfc_check_reg(info->name, drive->reg);
887	for (i = 0; i < ARRAY_SIZE(drive->fields); i++) {
888		const struct pinmux_drive_reg_field *field = &drive->fields[i];
889
890		if (!field->pin && !field->offset && !field->size)
891			continue;
892
893		mask = GENMASK(field->offset + field->size - 1, field->offset);
894		if (mask & seen)
895			sh_pfc_err("drive_reg 0x%x: field %u overlap\n",
896				   drive->reg, i);
897		seen |= mask;
898
899		sh_pfc_check_pin(info, drive->reg, field->pin);
900	}
901}
902
903static void __init sh_pfc_check_bias_reg(const struct sh_pfc_soc_info *info,
904					 const struct pinmux_bias_reg *bias)
905{
906	unsigned int i;
907
908	sh_pfc_check_reg(info->name, bias->puen);
909	if (bias->pud)
910		sh_pfc_check_reg(info->name, bias->pud);
911	for (i = 0; i < ARRAY_SIZE(bias->pins); i++)
912		sh_pfc_check_pin(info, bias->puen, bias->pins[i]);
913}
914
915static void __init sh_pfc_check_info(const struct sh_pfc_soc_info *info)
916{
917	const char *drvname = info->name;
918	unsigned int *refcnts;
919	unsigned int i, j, k;
920
921	pr_info("Checking %s\n", drvname);
922	sh_pfc_num_regs = 0;
923	sh_pfc_num_enums = 0;
924
925	/* Check pins */
926	for (i = 0; i < info->nr_pins; i++) {
927		const struct sh_pfc_pin *pin = &info->pins[i];
928
929		if (!pin->name) {
930			sh_pfc_err("empty pin %u\n", i);
931			continue;
932		}
933		for (j = 0; j < i; j++) {
934			const struct sh_pfc_pin *pin2 = &info->pins[j];
935
936			if (same_name(pin->name, pin2->name))
937				sh_pfc_err("pin %s: name conflict\n",
938					   pin->name);
939
940			if (pin->pin != (u16)-1 && pin->pin == pin2->pin)
941				sh_pfc_err("pin %s/%s: pin %u conflict\n",
942					   pin->name, pin2->name, pin->pin);
943
944			if (pin->enum_id && pin->enum_id == pin2->enum_id)
945				sh_pfc_err("pin %s/%s: enum_id %u conflict\n",
946					   pin->name, pin2->name,
947					   pin->enum_id);
948		}
949	}
950
951	/* Check groups and functions */
952	refcnts = kcalloc(info->nr_groups, sizeof(*refcnts), GFP_KERNEL);
953	if (!refcnts)
954		return;
955
956	for (i = 0; i < info->nr_functions; i++) {
957		const struct sh_pfc_function *func = &info->functions[i];
958
959		if (!func->name) {
960			sh_pfc_err("empty function %u\n", i);
961			continue;
962		}
963		for (j = 0; j < i; j++) {
964			if (same_name(func->name, info->functions[j].name))
965				sh_pfc_err("function %s: name conflict\n",
966					   func->name);
967		}
968		for (j = 0; j < func->nr_groups; j++) {
969			for (k = 0; k < info->nr_groups; k++) {
970				if (same_name(func->groups[j],
971					      info->groups[k].name)) {
972					refcnts[k]++;
973					break;
974				}
975			}
976
977			if (k == info->nr_groups)
978				sh_pfc_err("function %s: group %s not found\n",
979					   func->name, func->groups[j]);
980		}
981	}
982
983	for (i = 0; i < info->nr_groups; i++) {
984		const struct sh_pfc_pin_group *group = &info->groups[i];
985
986		if (!group->name) {
987			sh_pfc_err("empty group %u\n", i);
988			continue;
989		}
990		for (j = 0; j < i; j++) {
991			if (same_name(group->name, info->groups[j].name))
992				sh_pfc_err("group %s: name conflict\n",
993					   group->name);
994		}
995		if (!refcnts[i])
996			sh_pfc_err("orphan group %s\n", group->name);
997		else if (refcnts[i] > 1)
998			sh_pfc_warn("group %s referenced by %u functions\n",
999				    group->name, refcnts[i]);
1000	}
1001
1002	kfree(refcnts);
1003
1004	/* Check config register descriptions */
1005	for (i = 0; info->cfg_regs && info->cfg_regs[i].reg; i++)
1006		sh_pfc_check_cfg_reg(drvname, &info->cfg_regs[i]);
1007
1008	/* Check drive strength registers */
1009	for (i = 0; info->drive_regs && info->drive_regs[i].reg; i++)
1010		sh_pfc_check_drive_reg(info, &info->drive_regs[i]);
1011
1012	/* Check bias registers */
1013	for (i = 0; info->bias_regs && info->bias_regs[i].puen; i++)
1014		sh_pfc_check_bias_reg(info, &info->bias_regs[i]);
1015
1016	/* Check ioctrl registers */
1017	for (i = 0; info->ioctrl_regs && info->ioctrl_regs[i].reg; i++)
1018		sh_pfc_check_reg(drvname, info->ioctrl_regs[i].reg);
1019
1020	/* Check data registers */
1021	for (i = 0; info->data_regs && info->data_regs[i].reg; i++) {
1022		sh_pfc_check_reg(drvname, info->data_regs[i].reg);
1023		sh_pfc_check_reg_enums(drvname, info->data_regs[i].reg,
1024				       info->data_regs[i].enum_ids,
1025				       info->data_regs[i].reg_width);
1026	}
1027
1028#ifdef CONFIG_PINCTRL_SH_FUNC_GPIO
1029	/* Check function GPIOs */
1030	for (i = 0; i < info->nr_func_gpios; i++) {
1031		const struct pinmux_func *func = &info->func_gpios[i];
1032
1033		if (!func->name) {
1034			sh_pfc_err("empty function gpio %u\n", i);
1035			continue;
1036		}
1037		for (j = 0; j < i; j++) {
1038			if (same_name(func->name, info->func_gpios[j].name))
1039				sh_pfc_err("func_gpio %s: name conflict\n",
1040					   func->name);
1041		}
1042		if (sh_pfc_check_enum(drvname, func->enum_id))
1043			sh_pfc_err("%s enum_id %u conflict\n", func->name,
1044				   func->enum_id);
1045	}
1046#endif
1047}
1048
1049static void __init sh_pfc_check_driver(const struct platform_driver *pdrv)
1050{
1051	unsigned int i;
1052
1053	sh_pfc_regs = kcalloc(SH_PFC_MAX_REGS, sizeof(*sh_pfc_regs),
1054			      GFP_KERNEL);
1055	if (!sh_pfc_regs)
1056		return;
1057
1058	sh_pfc_enums = kcalloc(SH_PFC_MAX_ENUMS, sizeof(*sh_pfc_enums),
1059			      GFP_KERNEL);
1060	if (!sh_pfc_enums)
1061		goto free_regs;
1062
1063	pr_warn("Checking builtin pinmux tables\n");
1064
1065	for (i = 0; pdrv->id_table[i].name[0]; i++)
1066		sh_pfc_check_info((void *)pdrv->id_table[i].driver_data);
1067
1068#ifdef CONFIG_OF
1069	for (i = 0; pdrv->driver.of_match_table[i].compatible[0]; i++)
1070		sh_pfc_check_info(pdrv->driver.of_match_table[i].data);
1071#endif
1072
1073	pr_warn("Detected %u errors and %u warnings\n", sh_pfc_errors,
1074		sh_pfc_warnings);
1075
1076	kfree(sh_pfc_enums);
1077free_regs:
1078	kfree(sh_pfc_regs);
1079}
1080
1081#else /* !DEBUG */
1082static inline void sh_pfc_check_driver(struct platform_driver *pdrv) {}
1083#endif /* !DEBUG */
1084
1085#ifdef CONFIG_OF
1086static const void *sh_pfc_quirk_match(void)
1087{
1088#if defined(CONFIG_PINCTRL_PFC_R8A77950) || \
1089    defined(CONFIG_PINCTRL_PFC_R8A77951)
1090	const struct soc_device_attribute *match;
1091	static const struct soc_device_attribute quirks[] = {
1092		{
1093			.soc_id = "r8a7795", .revision = "ES1.*",
1094			.data = &r8a77950_pinmux_info,
1095		},
1096		{
1097			.soc_id = "r8a7795",
1098			.data = &r8a77951_pinmux_info,
1099		},
1100
1101		{ /* sentinel */ }
1102	};
1103
1104	match = soc_device_match(quirks);
1105	if (match)
1106		return match->data ?: ERR_PTR(-ENODEV);
1107#endif /* CONFIG_PINCTRL_PFC_R8A77950 || CONFIG_PINCTRL_PFC_R8A77951 */
1108
1109	return NULL;
1110}
1111#endif /* CONFIG_OF */
1112
1113static int sh_pfc_probe(struct platform_device *pdev)
1114{
1115	const struct sh_pfc_soc_info *info;
1116	struct sh_pfc *pfc;
1117	int ret;
1118
1119#ifdef CONFIG_OF
1120	if (pdev->dev.of_node) {
1121		info = sh_pfc_quirk_match();
1122		if (IS_ERR(info))
1123			return PTR_ERR(info);
1124
1125		if (!info)
1126			info = of_device_get_match_data(&pdev->dev);
1127	} else
1128#endif
1129		info = (const void *)platform_get_device_id(pdev)->driver_data;
1130
1131	pfc = devm_kzalloc(&pdev->dev, sizeof(*pfc), GFP_KERNEL);
1132	if (pfc == NULL)
1133		return -ENOMEM;
1134
1135	pfc->info = info;
1136	pfc->dev = &pdev->dev;
1137
1138	ret = sh_pfc_map_resources(pfc, pdev);
1139	if (unlikely(ret < 0))
1140		return ret;
1141
1142	spin_lock_init(&pfc->lock);
1143
1144	if (info->ops && info->ops->init) {
1145		ret = info->ops->init(pfc);
1146		if (ret < 0)
1147			return ret;
1148
1149		/* .init() may have overridden pfc->info */
1150		info = pfc->info;
1151	}
1152
1153	ret = sh_pfc_suspend_init(pfc);
1154	if (ret)
1155		return ret;
1156
1157	/* Enable dummy states for those platforms without pinctrl support */
1158	if (!of_have_populated_dt())
1159		pinctrl_provide_dummies();
1160
1161	ret = sh_pfc_init_ranges(pfc);
1162	if (ret < 0)
1163		return ret;
1164
1165	/*
1166	 * Initialize pinctrl bindings first
1167	 */
1168	ret = sh_pfc_register_pinctrl(pfc);
1169	if (unlikely(ret != 0))
1170		return ret;
1171
1172#ifdef CONFIG_PINCTRL_SH_PFC_GPIO
1173	/*
1174	 * Then the GPIO chip
1175	 */
1176	ret = sh_pfc_register_gpiochip(pfc);
1177	if (unlikely(ret != 0)) {
1178		/*
1179		 * If the GPIO chip fails to come up we still leave the
1180		 * PFC state as it is, given that there are already
1181		 * extant users of it that have succeeded by this point.
1182		 */
1183		dev_notice(pfc->dev, "failed to init GPIO chip, ignoring...\n");
1184	}
1185#endif
1186
1187	platform_set_drvdata(pdev, pfc);
1188
1189	dev_info(pfc->dev, "%s support registered\n", info->name);
1190
1191	return 0;
1192}
1193
1194static const struct platform_device_id sh_pfc_id_table[] = {
1195#ifdef CONFIG_PINCTRL_PFC_SH7203
1196	{ "pfc-sh7203", (kernel_ulong_t)&sh7203_pinmux_info },
1197#endif
1198#ifdef CONFIG_PINCTRL_PFC_SH7264
1199	{ "pfc-sh7264", (kernel_ulong_t)&sh7264_pinmux_info },
1200#endif
1201#ifdef CONFIG_PINCTRL_PFC_SH7269
1202	{ "pfc-sh7269", (kernel_ulong_t)&sh7269_pinmux_info },
1203#endif
1204#ifdef CONFIG_PINCTRL_PFC_SH7720
1205	{ "pfc-sh7720", (kernel_ulong_t)&sh7720_pinmux_info },
1206#endif
1207#ifdef CONFIG_PINCTRL_PFC_SH7722
1208	{ "pfc-sh7722", (kernel_ulong_t)&sh7722_pinmux_info },
1209#endif
1210#ifdef CONFIG_PINCTRL_PFC_SH7723
1211	{ "pfc-sh7723", (kernel_ulong_t)&sh7723_pinmux_info },
1212#endif
1213#ifdef CONFIG_PINCTRL_PFC_SH7724
1214	{ "pfc-sh7724", (kernel_ulong_t)&sh7724_pinmux_info },
1215#endif
1216#ifdef CONFIG_PINCTRL_PFC_SH7734
1217	{ "pfc-sh7734", (kernel_ulong_t)&sh7734_pinmux_info },
1218#endif
1219#ifdef CONFIG_PINCTRL_PFC_SH7757
1220	{ "pfc-sh7757", (kernel_ulong_t)&sh7757_pinmux_info },
1221#endif
1222#ifdef CONFIG_PINCTRL_PFC_SH7785
1223	{ "pfc-sh7785", (kernel_ulong_t)&sh7785_pinmux_info },
1224#endif
1225#ifdef CONFIG_PINCTRL_PFC_SH7786
1226	{ "pfc-sh7786", (kernel_ulong_t)&sh7786_pinmux_info },
1227#endif
1228#ifdef CONFIG_PINCTRL_PFC_SHX3
1229	{ "pfc-shx3", (kernel_ulong_t)&shx3_pinmux_info },
1230#endif
1231	{ },
1232};
1233
1234static struct platform_driver sh_pfc_driver = {
1235	.probe		= sh_pfc_probe,
1236	.id_table	= sh_pfc_id_table,
1237	.driver		= {
1238		.name	= DRV_NAME,
1239		.of_match_table = of_match_ptr(sh_pfc_of_table),
1240		.pm     = DEV_PM_OPS,
1241	},
1242};
1243
1244static int __init sh_pfc_init(void)
1245{
1246	sh_pfc_check_driver(&sh_pfc_driver);
1247	return platform_driver_register(&sh_pfc_driver);
1248}
1249postcore_initcall(sh_pfc_init);
1250