xref: /openbmc/linux/drivers/gpio/gpio-em.c (revision 9f5132ae)
1 /*
2  * Emma Mobile GPIO Support - GIO
3  *
4  *  Copyright (C) 2012 Magnus Damm
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; either 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  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  */
19 
20 #include <linux/init.h>
21 #include <linux/platform_device.h>
22 #include <linux/spinlock.h>
23 #include <linux/interrupt.h>
24 #include <linux/ioport.h>
25 #include <linux/io.h>
26 #include <linux/irq.h>
27 #include <linux/irqdomain.h>
28 #include <linux/bitops.h>
29 #include <linux/err.h>
30 #include <linux/gpio.h>
31 #include <linux/slab.h>
32 #include <linux/module.h>
33 #include <linux/pinctrl/consumer.h>
34 #include <linux/platform_data/gpio-em.h>
35 
36 struct em_gio_priv {
37 	void __iomem *base0;
38 	void __iomem *base1;
39 	spinlock_t sense_lock;
40 	struct platform_device *pdev;
41 	struct gpio_chip gpio_chip;
42 	struct irq_chip irq_chip;
43 	struct irq_domain *irq_domain;
44 };
45 
46 #define GIO_E1 0x00
47 #define GIO_E0 0x04
48 #define GIO_EM 0x04
49 #define GIO_OL 0x08
50 #define GIO_OH 0x0c
51 #define GIO_I 0x10
52 #define GIO_IIA 0x14
53 #define GIO_IEN 0x18
54 #define GIO_IDS 0x1c
55 #define GIO_IIM 0x1c
56 #define GIO_RAW 0x20
57 #define GIO_MST 0x24
58 #define GIO_IIR 0x28
59 
60 #define GIO_IDT0 0x40
61 #define GIO_IDT1 0x44
62 #define GIO_IDT2 0x48
63 #define GIO_IDT3 0x4c
64 #define GIO_RAWBL 0x50
65 #define GIO_RAWBH 0x54
66 #define GIO_IRBL 0x58
67 #define GIO_IRBH 0x5c
68 
69 #define GIO_IDT(n) (GIO_IDT0 + ((n) * 4))
70 
71 static inline unsigned long em_gio_read(struct em_gio_priv *p, int offs)
72 {
73 	if (offs < GIO_IDT0)
74 		return ioread32(p->base0 + offs);
75 	else
76 		return ioread32(p->base1 + (offs - GIO_IDT0));
77 }
78 
79 static inline void em_gio_write(struct em_gio_priv *p, int offs,
80 				unsigned long value)
81 {
82 	if (offs < GIO_IDT0)
83 		iowrite32(value, p->base0 + offs);
84 	else
85 		iowrite32(value, p->base1 + (offs - GIO_IDT0));
86 }
87 
88 static void em_gio_irq_disable(struct irq_data *d)
89 {
90 	struct em_gio_priv *p = irq_data_get_irq_chip_data(d);
91 
92 	em_gio_write(p, GIO_IDS, BIT(irqd_to_hwirq(d)));
93 }
94 
95 static void em_gio_irq_enable(struct irq_data *d)
96 {
97 	struct em_gio_priv *p = irq_data_get_irq_chip_data(d);
98 
99 	em_gio_write(p, GIO_IEN, BIT(irqd_to_hwirq(d)));
100 }
101 
102 static int em_gio_irq_reqres(struct irq_data *d)
103 {
104 	struct em_gio_priv *p = irq_data_get_irq_chip_data(d);
105 
106 	if (gpio_lock_as_irq(&p->gpio_chip, irqd_to_hwirq(d))) {
107 		dev_err(p->gpio_chip.dev,
108 			"unable to lock HW IRQ %lu for IRQ\n",
109 			irqd_to_hwirq(d));
110 		return -EINVAL;
111 	}
112 	return 0;
113 }
114 
115 static void em_gio_irq_relres(struct irq_data *d)
116 {
117 	struct em_gio_priv *p = irq_data_get_irq_chip_data(d);
118 
119 	gpio_unlock_as_irq(&p->gpio_chip, irqd_to_hwirq(d));
120 }
121 
122 
123 #define GIO_ASYNC(x) (x + 8)
124 
125 static unsigned char em_gio_sense_table[IRQ_TYPE_SENSE_MASK + 1] = {
126 	[IRQ_TYPE_EDGE_RISING] = GIO_ASYNC(0x00),
127 	[IRQ_TYPE_EDGE_FALLING] = GIO_ASYNC(0x01),
128 	[IRQ_TYPE_LEVEL_HIGH] = GIO_ASYNC(0x02),
129 	[IRQ_TYPE_LEVEL_LOW] = GIO_ASYNC(0x03),
130 	[IRQ_TYPE_EDGE_BOTH] = GIO_ASYNC(0x04),
131 };
132 
133 static int em_gio_irq_set_type(struct irq_data *d, unsigned int type)
134 {
135 	unsigned char value = em_gio_sense_table[type & IRQ_TYPE_SENSE_MASK];
136 	struct em_gio_priv *p = irq_data_get_irq_chip_data(d);
137 	unsigned int reg, offset, shift;
138 	unsigned long flags;
139 	unsigned long tmp;
140 
141 	if (!value)
142 		return -EINVAL;
143 
144 	offset = irqd_to_hwirq(d);
145 
146 	pr_debug("gio: sense irq = %d, mode = %d\n", offset, value);
147 
148 	/* 8 x 4 bit fields in 4 IDT registers */
149 	reg = GIO_IDT(offset >> 3);
150 	shift = (offset & 0x07) << 4;
151 
152 	spin_lock_irqsave(&p->sense_lock, flags);
153 
154 	/* disable the interrupt in IIA */
155 	tmp = em_gio_read(p, GIO_IIA);
156 	tmp &= ~BIT(offset);
157 	em_gio_write(p, GIO_IIA, tmp);
158 
159 	/* change the sense setting in IDT */
160 	tmp = em_gio_read(p, reg);
161 	tmp &= ~(0xf << shift);
162 	tmp |= value << shift;
163 	em_gio_write(p, reg, tmp);
164 
165 	/* clear pending interrupts */
166 	em_gio_write(p, GIO_IIR, BIT(offset));
167 
168 	/* enable the interrupt in IIA */
169 	tmp = em_gio_read(p, GIO_IIA);
170 	tmp |= BIT(offset);
171 	em_gio_write(p, GIO_IIA, tmp);
172 
173 	spin_unlock_irqrestore(&p->sense_lock, flags);
174 
175 	return 0;
176 }
177 
178 static irqreturn_t em_gio_irq_handler(int irq, void *dev_id)
179 {
180 	struct em_gio_priv *p = dev_id;
181 	unsigned long pending;
182 	unsigned int offset, irqs_handled = 0;
183 
184 	while ((pending = em_gio_read(p, GIO_MST))) {
185 		offset = __ffs(pending);
186 		em_gio_write(p, GIO_IIR, BIT(offset));
187 		generic_handle_irq(irq_find_mapping(p->irq_domain, offset));
188 		irqs_handled++;
189 	}
190 
191 	return irqs_handled ? IRQ_HANDLED : IRQ_NONE;
192 }
193 
194 static inline struct em_gio_priv *gpio_to_priv(struct gpio_chip *chip)
195 {
196 	return container_of(chip, struct em_gio_priv, gpio_chip);
197 }
198 
199 static int em_gio_direction_input(struct gpio_chip *chip, unsigned offset)
200 {
201 	em_gio_write(gpio_to_priv(chip), GIO_E0, BIT(offset));
202 	return 0;
203 }
204 
205 static int em_gio_get(struct gpio_chip *chip, unsigned offset)
206 {
207 	return (int)(em_gio_read(gpio_to_priv(chip), GIO_I) & BIT(offset));
208 }
209 
210 static void __em_gio_set(struct gpio_chip *chip, unsigned int reg,
211 			 unsigned shift, int value)
212 {
213 	/* upper 16 bits contains mask and lower 16 actual value */
214 	em_gio_write(gpio_to_priv(chip), reg,
215 		     (BIT(shift + 16)) | (value << shift));
216 }
217 
218 static void em_gio_set(struct gpio_chip *chip, unsigned offset, int value)
219 {
220 	/* output is split into two registers */
221 	if (offset < 16)
222 		__em_gio_set(chip, GIO_OL, offset, value);
223 	else
224 		__em_gio_set(chip, GIO_OH, offset - 16, value);
225 }
226 
227 static int em_gio_direction_output(struct gpio_chip *chip, unsigned offset,
228 				   int value)
229 {
230 	/* write GPIO value to output before selecting output mode of pin */
231 	em_gio_set(chip, offset, value);
232 	em_gio_write(gpio_to_priv(chip), GIO_E1, BIT(offset));
233 	return 0;
234 }
235 
236 static int em_gio_to_irq(struct gpio_chip *chip, unsigned offset)
237 {
238 	return irq_create_mapping(gpio_to_priv(chip)->irq_domain, offset);
239 }
240 
241 static int em_gio_request(struct gpio_chip *chip, unsigned offset)
242 {
243 	return pinctrl_request_gpio(chip->base + offset);
244 }
245 
246 static void em_gio_free(struct gpio_chip *chip, unsigned offset)
247 {
248 	pinctrl_free_gpio(chip->base + offset);
249 
250 	/* Set the GPIO as an input to ensure that the next GPIO request won't
251 	* drive the GPIO pin as an output.
252 	*/
253 	em_gio_direction_input(chip, offset);
254 }
255 
256 static int em_gio_irq_domain_map(struct irq_domain *h, unsigned int irq,
257 				 irq_hw_number_t hwirq)
258 {
259 	struct em_gio_priv *p = h->host_data;
260 
261 	pr_debug("gio: map hw irq = %d, irq = %d\n", (int)hwirq, irq);
262 
263 	irq_set_chip_data(irq, h->host_data);
264 	irq_set_chip_and_handler(irq, &p->irq_chip, handle_level_irq);
265 	set_irq_flags(irq, IRQF_VALID); /* kill me now */
266 	return 0;
267 }
268 
269 static struct irq_domain_ops em_gio_irq_domain_ops = {
270 	.map	= em_gio_irq_domain_map,
271 	.xlate	= irq_domain_xlate_twocell,
272 };
273 
274 static int em_gio_probe(struct platform_device *pdev)
275 {
276 	struct gpio_em_config pdata_dt;
277 	struct gpio_em_config *pdata = dev_get_platdata(&pdev->dev);
278 	struct em_gio_priv *p;
279 	struct resource *io[2], *irq[2];
280 	struct gpio_chip *gpio_chip;
281 	struct irq_chip *irq_chip;
282 	const char *name = dev_name(&pdev->dev);
283 	int ret;
284 
285 	p = devm_kzalloc(&pdev->dev, sizeof(*p), GFP_KERNEL);
286 	if (!p) {
287 		ret = -ENOMEM;
288 		goto err0;
289 	}
290 
291 	p->pdev = pdev;
292 	platform_set_drvdata(pdev, p);
293 	spin_lock_init(&p->sense_lock);
294 
295 	io[0] = platform_get_resource(pdev, IORESOURCE_MEM, 0);
296 	io[1] = platform_get_resource(pdev, IORESOURCE_MEM, 1);
297 	irq[0] = platform_get_resource(pdev, IORESOURCE_IRQ, 0);
298 	irq[1] = platform_get_resource(pdev, IORESOURCE_IRQ, 1);
299 
300 	if (!io[0] || !io[1] || !irq[0] || !irq[1]) {
301 		dev_err(&pdev->dev, "missing IRQ or IOMEM\n");
302 		ret = -EINVAL;
303 		goto err0;
304 	}
305 
306 	p->base0 = devm_ioremap_nocache(&pdev->dev, io[0]->start,
307 					resource_size(io[0]));
308 	if (!p->base0) {
309 		dev_err(&pdev->dev, "failed to remap low I/O memory\n");
310 		ret = -ENXIO;
311 		goto err0;
312 	}
313 
314 	p->base1 = devm_ioremap_nocache(&pdev->dev, io[1]->start,
315 				   resource_size(io[1]));
316 	if (!p->base1) {
317 		dev_err(&pdev->dev, "failed to remap high I/O memory\n");
318 		ret = -ENXIO;
319 		goto err0;
320 	}
321 
322 	if (!pdata) {
323 		memset(&pdata_dt, 0, sizeof(pdata_dt));
324 		pdata = &pdata_dt;
325 
326 		if (of_property_read_u32(pdev->dev.of_node, "ngpios",
327 					 &pdata->number_of_pins)) {
328 			dev_err(&pdev->dev, "Missing ngpios OF property\n");
329 			ret = -EINVAL;
330 			goto err0;
331 		}
332 
333 		ret = of_alias_get_id(pdev->dev.of_node, "gpio");
334 		if (ret < 0) {
335 			dev_err(&pdev->dev, "Couldn't get OF id\n");
336 			goto err0;
337 		}
338 		pdata->gpio_base = ret * 32; /* 32 GPIOs per instance */
339 	}
340 
341 	gpio_chip = &p->gpio_chip;
342 	gpio_chip->of_node = pdev->dev.of_node;
343 	gpio_chip->direction_input = em_gio_direction_input;
344 	gpio_chip->get = em_gio_get;
345 	gpio_chip->direction_output = em_gio_direction_output;
346 	gpio_chip->set = em_gio_set;
347 	gpio_chip->to_irq = em_gio_to_irq;
348 	gpio_chip->request = em_gio_request;
349 	gpio_chip->free = em_gio_free;
350 	gpio_chip->label = name;
351 	gpio_chip->dev = &pdev->dev;
352 	gpio_chip->owner = THIS_MODULE;
353 	gpio_chip->base = pdata->gpio_base;
354 	gpio_chip->ngpio = pdata->number_of_pins;
355 
356 	irq_chip = &p->irq_chip;
357 	irq_chip->name = name;
358 	irq_chip->irq_mask = em_gio_irq_disable;
359 	irq_chip->irq_unmask = em_gio_irq_enable;
360 	irq_chip->irq_set_type = em_gio_irq_set_type;
361 	irq_chip->irq_request_resources = em_gio_irq_reqres;
362 	irq_chip->irq_release_resources = em_gio_irq_relres;
363 	irq_chip->flags	= IRQCHIP_SKIP_SET_WAKE | IRQCHIP_MASK_ON_SUSPEND;
364 
365 	p->irq_domain = irq_domain_add_simple(pdev->dev.of_node,
366 					      pdata->number_of_pins,
367 					      pdata->irq_base,
368 					      &em_gio_irq_domain_ops, p);
369 	if (!p->irq_domain) {
370 		ret = -ENXIO;
371 		dev_err(&pdev->dev, "cannot initialize irq domain\n");
372 		goto err0;
373 	}
374 
375 	if (devm_request_irq(&pdev->dev, irq[0]->start,
376 			     em_gio_irq_handler, 0, name, p)) {
377 		dev_err(&pdev->dev, "failed to request low IRQ\n");
378 		ret = -ENOENT;
379 		goto err1;
380 	}
381 
382 	if (devm_request_irq(&pdev->dev, irq[1]->start,
383 			     em_gio_irq_handler, 0, name, p)) {
384 		dev_err(&pdev->dev, "failed to request high IRQ\n");
385 		ret = -ENOENT;
386 		goto err1;
387 	}
388 
389 	ret = gpiochip_add(gpio_chip);
390 	if (ret) {
391 		dev_err(&pdev->dev, "failed to add GPIO controller\n");
392 		goto err1;
393 	}
394 
395 	if (pdata->pctl_name) {
396 		ret = gpiochip_add_pin_range(gpio_chip, pdata->pctl_name, 0,
397 					     gpio_chip->base, gpio_chip->ngpio);
398 		if (ret < 0)
399 			dev_warn(&pdev->dev, "failed to add pin range\n");
400 	}
401 	return 0;
402 
403 err1:
404 	irq_domain_remove(p->irq_domain);
405 err0:
406 	return ret;
407 }
408 
409 static int em_gio_remove(struct platform_device *pdev)
410 {
411 	struct em_gio_priv *p = platform_get_drvdata(pdev);
412 
413 	gpiochip_remove(&p->gpio_chip);
414 
415 	irq_domain_remove(p->irq_domain);
416 	return 0;
417 }
418 
419 static const struct of_device_id em_gio_dt_ids[] = {
420 	{ .compatible = "renesas,em-gio", },
421 	{},
422 };
423 MODULE_DEVICE_TABLE(of, em_gio_dt_ids);
424 
425 static struct platform_driver em_gio_device_driver = {
426 	.probe		= em_gio_probe,
427 	.remove		= em_gio_remove,
428 	.driver		= {
429 		.name	= "em_gio",
430 		.of_match_table = em_gio_dt_ids,
431 		.owner		= THIS_MODULE,
432 	}
433 };
434 
435 static int __init em_gio_init(void)
436 {
437 	return platform_driver_register(&em_gio_device_driver);
438 }
439 postcore_initcall(em_gio_init);
440 
441 static void __exit em_gio_exit(void)
442 {
443 	platform_driver_unregister(&em_gio_device_driver);
444 }
445 module_exit(em_gio_exit);
446 
447 MODULE_AUTHOR("Magnus Damm");
448 MODULE_DESCRIPTION("Renesas Emma Mobile GIO Driver");
449 MODULE_LICENSE("GPL v2");
450