1 /*
2  * Renesas SoC Identification
3  *
4  * Copyright (C) 2014-2016 Glider bvba
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; version 2 of the License.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  */
15 
16 #include <linux/io.h>
17 #include <linux/of.h>
18 #include <linux/of_address.h>
19 #include <linux/slab.h>
20 #include <linux/string.h>
21 #include <linux/sys_soc.h>
22 
23 
24 struct renesas_family {
25 	const char name[16];
26 	u32 reg;			/* CCCR or PRR, if not in DT */
27 };
28 
29 static const struct renesas_family fam_rcar_gen1 __initconst __maybe_unused = {
30 	.name	= "R-Car Gen1",
31 	.reg	= 0xff000044,		/* PRR (Product Register) */
32 };
33 
34 static const struct renesas_family fam_rcar_gen2 __initconst __maybe_unused = {
35 	.name	= "R-Car Gen2",
36 	.reg	= 0xff000044,		/* PRR (Product Register) */
37 };
38 
39 static const struct renesas_family fam_rcar_gen3 __initconst __maybe_unused = {
40 	.name	= "R-Car Gen3",
41 	.reg	= 0xfff00044,		/* PRR (Product Register) */
42 };
43 
44 static const struct renesas_family fam_rmobile __initconst __maybe_unused = {
45 	.name	= "R-Mobile",
46 	.reg	= 0xe600101c,		/* CCCR (Common Chip Code Register) */
47 };
48 
49 static const struct renesas_family fam_rza __initconst __maybe_unused = {
50 	.name	= "RZ/A",
51 };
52 
53 static const struct renesas_family fam_rzg __initconst __maybe_unused = {
54 	.name	= "RZ/G",
55 	.reg	= 0xff000044,		/* PRR (Product Register) */
56 };
57 
58 static const struct renesas_family fam_shmobile __initconst __maybe_unused = {
59 	.name	= "SH-Mobile",
60 	.reg	= 0xe600101c,		/* CCCR (Common Chip Code Register) */
61 };
62 
63 
64 struct renesas_soc {
65 	const struct renesas_family *family;
66 	u8 id;
67 };
68 
69 static const struct renesas_soc soc_rz_a1h __initconst __maybe_unused = {
70 	.family	= &fam_rza,
71 };
72 
73 static const struct renesas_soc soc_rmobile_ape6 __initconst __maybe_unused = {
74 	.family	= &fam_rmobile,
75 	.id	= 0x3f,
76 };
77 
78 static const struct renesas_soc soc_rmobile_a1 __initconst __maybe_unused = {
79 	.family	= &fam_rmobile,
80 	.id	= 0x40,
81 };
82 
83 static const struct renesas_soc soc_rz_g1h __initconst __maybe_unused = {
84 	.family	= &fam_rzg,
85 	.id	= 0x45,
86 };
87 
88 static const struct renesas_soc soc_rz_g1m __initconst __maybe_unused = {
89 	.family	= &fam_rzg,
90 	.id	= 0x47,
91 };
92 
93 static const struct renesas_soc soc_rz_g1n __initconst __maybe_unused = {
94 	.family	= &fam_rzg,
95 	.id	= 0x4b,
96 };
97 
98 static const struct renesas_soc soc_rz_g1e __initconst __maybe_unused = {
99 	.family	= &fam_rzg,
100 	.id	= 0x4c,
101 };
102 
103 static const struct renesas_soc soc_rcar_m1a __initconst __maybe_unused = {
104 	.family	= &fam_rcar_gen1,
105 };
106 
107 static const struct renesas_soc soc_rcar_h1 __initconst __maybe_unused = {
108 	.family	= &fam_rcar_gen1,
109 	.id	= 0x3b,
110 };
111 
112 static const struct renesas_soc soc_rcar_h2 __initconst __maybe_unused = {
113 	.family	= &fam_rcar_gen2,
114 	.id	= 0x45,
115 };
116 
117 static const struct renesas_soc soc_rcar_m2_w __initconst __maybe_unused = {
118 	.family	= &fam_rcar_gen2,
119 	.id	= 0x47,
120 };
121 
122 static const struct renesas_soc soc_rcar_v2h __initconst __maybe_unused = {
123 	.family	= &fam_rcar_gen2,
124 	.id	= 0x4a,
125 };
126 
127 static const struct renesas_soc soc_rcar_m2_n __initconst __maybe_unused = {
128 	.family	= &fam_rcar_gen2,
129 	.id	= 0x4b,
130 };
131 
132 static const struct renesas_soc soc_rcar_e2 __initconst __maybe_unused = {
133 	.family	= &fam_rcar_gen2,
134 	.id	= 0x4c,
135 };
136 
137 static const struct renesas_soc soc_rcar_h3 __initconst __maybe_unused = {
138 	.family	= &fam_rcar_gen3,
139 	.id	= 0x4f,
140 };
141 
142 static const struct renesas_soc soc_rcar_m3_w __initconst __maybe_unused = {
143 	.family	= &fam_rcar_gen3,
144 	.id	= 0x52,
145 };
146 
147 static const struct renesas_soc soc_rcar_v3m __initconst __maybe_unused = {
148 	.family	= &fam_rcar_gen3,
149 	.id	= 0x54,
150 };
151 
152 static const struct renesas_soc soc_rcar_d3 __initconst __maybe_unused = {
153 	.family	= &fam_rcar_gen3,
154 	.id	= 0x58,
155 };
156 
157 static const struct renesas_soc soc_shmobile_ag5 __initconst __maybe_unused = {
158 	.family	= &fam_shmobile,
159 	.id	= 0x37,
160 };
161 
162 
163 static const struct of_device_id renesas_socs[] __initconst = {
164 #ifdef CONFIG_ARCH_R7S72100
165 	{ .compatible = "renesas,r7s72100",	.data = &soc_rz_a1h },
166 #endif
167 #ifdef CONFIG_ARCH_R8A73A4
168 	{ .compatible = "renesas,r8a73a4",	.data = &soc_rmobile_ape6 },
169 #endif
170 #ifdef CONFIG_ARCH_R8A7740
171 	{ .compatible = "renesas,r8a7740",	.data = &soc_rmobile_a1 },
172 #endif
173 #ifdef CONFIG_ARCH_R8A7742
174 	{ .compatible = "renesas,r8a7742",	.data = &soc_rz_g1h },
175 #endif
176 #ifdef CONFIG_ARCH_R8A7743
177 	{ .compatible = "renesas,r8a7743",	.data = &soc_rz_g1m },
178 #endif
179 #ifdef CONFIG_ARCH_R8A7744
180 	{ .compatible = "renesas,r8a7744",	.data = &soc_rz_g1n },
181 #endif
182 #ifdef CONFIG_ARCH_R8A7745
183 	{ .compatible = "renesas,r8a7745",	.data = &soc_rz_g1e },
184 #endif
185 #ifdef CONFIG_ARCH_R8A7778
186 	{ .compatible = "renesas,r8a7778",	.data = &soc_rcar_m1a },
187 #endif
188 #ifdef CONFIG_ARCH_R8A7779
189 	{ .compatible = "renesas,r8a7779",	.data = &soc_rcar_h1 },
190 #endif
191 #ifdef CONFIG_ARCH_R8A7790
192 	{ .compatible = "renesas,r8a7790",	.data = &soc_rcar_h2 },
193 #endif
194 #ifdef CONFIG_ARCH_R8A7791
195 	{ .compatible = "renesas,r8a7791",	.data = &soc_rcar_m2_w },
196 #endif
197 #ifdef CONFIG_ARCH_R8A7792
198 	{ .compatible = "renesas,r8a7792",	.data = &soc_rcar_v2h },
199 #endif
200 #ifdef CONFIG_ARCH_R8A7793
201 	{ .compatible = "renesas,r8a7793",	.data = &soc_rcar_m2_n },
202 #endif
203 #ifdef CONFIG_ARCH_R8A7794
204 	{ .compatible = "renesas,r8a7794",	.data = &soc_rcar_e2 },
205 #endif
206 #ifdef CONFIG_ARCH_R8A7795
207 	{ .compatible = "renesas,r8a7795",	.data = &soc_rcar_h3 },
208 #endif
209 #ifdef CONFIG_ARCH_R8A7796
210 	{ .compatible = "renesas,r8a7796",	.data = &soc_rcar_m3_w },
211 #endif
212 #ifdef CONFIG_ARCH_R8A77970
213 	{ .compatible = "renesas,r8a77970",	.data = &soc_rcar_v3m },
214 #endif
215 #ifdef CONFIG_ARCH_R8A77995
216 	{ .compatible = "renesas,r8a77995",	.data = &soc_rcar_d3 },
217 #endif
218 #ifdef CONFIG_ARCH_SH73A0
219 	{ .compatible = "renesas,sh73a0",	.data = &soc_shmobile_ag5 },
220 #endif
221 	{ /* sentinel */ }
222 };
223 
224 static int __init renesas_soc_init(void)
225 {
226 	struct soc_device_attribute *soc_dev_attr;
227 	const struct renesas_family *family;
228 	const struct of_device_id *match;
229 	const struct renesas_soc *soc;
230 	void __iomem *chipid = NULL;
231 	struct soc_device *soc_dev;
232 	struct device_node *np;
233 	unsigned int product;
234 
235 	match = of_match_node(renesas_socs, of_root);
236 	if (!match)
237 		return -ENODEV;
238 
239 	soc = match->data;
240 	family = soc->family;
241 
242 	/* Try PRR first, then hardcoded fallback */
243 	np = of_find_compatible_node(NULL, NULL, "renesas,prr");
244 	if (np) {
245 		chipid = of_iomap(np, 0);
246 		of_node_put(np);
247 	} else if (soc->id) {
248 		chipid = ioremap(family->reg, 4);
249 	}
250 	if (chipid) {
251 		product = readl(chipid);
252 		iounmap(chipid);
253 		/* R-Car M3-W ES1.1 incorrectly identifies as ES2.0 */
254 		if ((product & 0x7fff) == 0x5210)
255 			product ^= 0x11;
256 		if (soc->id && ((product >> 8) & 0xff) != soc->id) {
257 			pr_warn("SoC mismatch (product = 0x%x)\n", product);
258 			return -ENODEV;
259 		}
260 	}
261 
262 	soc_dev_attr = kzalloc(sizeof(*soc_dev_attr), GFP_KERNEL);
263 	if (!soc_dev_attr)
264 		return -ENOMEM;
265 
266 	np = of_find_node_by_path("/");
267 	of_property_read_string(np, "model", &soc_dev_attr->machine);
268 	of_node_put(np);
269 
270 	soc_dev_attr->family = kstrdup_const(family->name, GFP_KERNEL);
271 	soc_dev_attr->soc_id = kstrdup_const(strchr(match->compatible, ',') + 1,
272 					     GFP_KERNEL);
273 	if (chipid)
274 		soc_dev_attr->revision = kasprintf(GFP_KERNEL, "ES%u.%u",
275 						   ((product >> 4) & 0x0f) + 1,
276 						   product & 0xf);
277 
278 	pr_info("Detected Renesas %s %s %s\n", soc_dev_attr->family,
279 		soc_dev_attr->soc_id, soc_dev_attr->revision ?: "");
280 
281 	soc_dev = soc_device_register(soc_dev_attr);
282 	if (IS_ERR(soc_dev)) {
283 		kfree(soc_dev_attr->revision);
284 		kfree_const(soc_dev_attr->soc_id);
285 		kfree_const(soc_dev_attr->family);
286 		kfree(soc_dev_attr);
287 		return PTR_ERR(soc_dev);
288 	}
289 
290 	return 0;
291 }
292 early_initcall(renesas_soc_init);
293