GNU Linux-libre 4.19.264-gnu1
[releases.git] / drivers / uio / uio_fsl_elbc_gpcm.c
1 // SPDX-License-Identifier: GPL-2.0
2 /* uio_fsl_elbc_gpcm: UIO driver for eLBC/GPCM peripherals
3
4    Copyright (C) 2014 Linutronix GmbH
5      Author: John Ogness <john.ogness@linutronix.de>
6
7    This driver provides UIO access to memory of a peripheral connected
8    to the Freescale enhanced local bus controller (eLBC) interface
9    using the general purpose chip-select mode (GPCM).
10
11    Here is an example of the device tree entries:
12
13         localbus@ffe05000 {
14                 ranges = <0x2 0x0 0x0 0xff810000 0x10000>;
15
16                 dpm@2,0 {
17                         compatible = "fsl,elbc-gpcm-uio";
18                         reg = <0x2 0x0 0x10000>;
19                         elbc-gpcm-br = <0xff810800>;
20                         elbc-gpcm-or = <0xffff09f7>;
21                         interrupt-parent = <&mpic>;
22                         interrupts = <4 1>;
23                         device_type = "netx5152";
24                         uio_name = "netx_custom";
25                         netx5152,init-win0-offset = <0x0>;
26                 };
27         };
28
29    Only the entries reg (to identify bank) and elbc-gpcm-* (initial BR/OR
30    values) are required. The entries interrupt*, device_type, and uio_name
31    are optional (as well as any type-specific options such as
32    netx5152,init-win0-offset). As long as no interrupt handler is needed,
33    this driver can be used without any type-specific implementation.
34
35    The netx5152 type has been tested to work with the netX 51/52 hardware
36    from Hilscher using the Hilscher userspace netX stack.
37
38    The netx5152 type should serve as a model to add new type-specific
39    devices as needed.
40 */
41
42 #include <linux/module.h>
43 #include <linux/device.h>
44 #include <linux/string.h>
45 #include <linux/slab.h>
46 #include <linux/platform_device.h>
47 #include <linux/uio_driver.h>
48 #include <linux/of_address.h>
49 #include <linux/of_irq.h>
50
51 #include <asm/fsl_lbc.h>
52
53 #define MAX_BANKS 8
54
55 struct fsl_elbc_gpcm {
56         struct device *dev;
57         struct fsl_lbc_regs __iomem *lbc;
58         u32 bank;
59         const char *name;
60
61         void (*init)(struct uio_info *info);
62         void (*shutdown)(struct uio_info *info, bool init_err);
63         irqreturn_t (*irq_handler)(int irq, struct uio_info *info);
64 };
65
66 static ssize_t reg_show(struct device *dev, struct device_attribute *attr,
67                         char *buf);
68 static ssize_t reg_store(struct device *dev, struct device_attribute *attr,
69                          const char *buf, size_t count);
70
71 DEVICE_ATTR(reg_br, S_IRUGO|S_IWUSR|S_IWGRP, reg_show, reg_store);
72 DEVICE_ATTR(reg_or, S_IRUGO|S_IWUSR|S_IWGRP, reg_show, reg_store);
73
74 static ssize_t reg_show(struct device *dev, struct device_attribute *attr,
75                         char *buf)
76 {
77         struct platform_device *pdev = to_platform_device(dev);
78         struct uio_info *info = platform_get_drvdata(pdev);
79         struct fsl_elbc_gpcm *priv = info->priv;
80         struct fsl_lbc_bank *bank = &priv->lbc->bank[priv->bank];
81
82         if (attr == &dev_attr_reg_br) {
83                 return scnprintf(buf, PAGE_SIZE, "0x%08x\n",
84                                  in_be32(&bank->br));
85
86         } else if (attr == &dev_attr_reg_or) {
87                 return scnprintf(buf, PAGE_SIZE, "0x%08x\n",
88                                  in_be32(&bank->or));
89         }
90
91         return 0;
92 }
93
94 static ssize_t reg_store(struct device *dev, struct device_attribute *attr,
95                          const char *buf, size_t count)
96 {
97         struct platform_device *pdev = to_platform_device(dev);
98         struct uio_info *info = platform_get_drvdata(pdev);
99         struct fsl_elbc_gpcm *priv = info->priv;
100         struct fsl_lbc_bank *bank = &priv->lbc->bank[priv->bank];
101         unsigned long val;
102         u32 reg_br_cur;
103         u32 reg_or_cur;
104         u32 reg_new;
105
106         /* parse use input */
107         if (kstrtoul(buf, 0, &val) != 0)
108                 return -EINVAL;
109         reg_new = (u32)val;
110
111         /* read current values */
112         reg_br_cur = in_be32(&bank->br);
113         reg_or_cur = in_be32(&bank->or);
114
115         if (attr == &dev_attr_reg_br) {
116                 /* not allowed to change effective base address */
117                 if ((reg_br_cur & reg_or_cur & BR_BA) !=
118                     (reg_new & reg_or_cur & BR_BA)) {
119                         return -EINVAL;
120                 }
121
122                 /* not allowed to change mode */
123                 if ((reg_new & BR_MSEL) != BR_MS_GPCM)
124                         return -EINVAL;
125
126                 /* write new value (force valid) */
127                 out_be32(&bank->br, reg_new | BR_V);
128
129         } else if (attr == &dev_attr_reg_or) {
130                 /* not allowed to change access mask */
131                 if ((reg_or_cur & OR_GPCM_AM) != (reg_new & OR_GPCM_AM))
132                         return -EINVAL;
133
134                 /* write new value */
135                 out_be32(&bank->or, reg_new);
136
137         } else {
138                 return -EINVAL;
139         }
140
141         return count;
142 }
143
144 #ifdef CONFIG_UIO_FSL_ELBC_GPCM_NETX5152
145 #define DPM_HOST_WIN0_OFFSET    0xff00
146 #define DPM_HOST_INT_STAT0      0xe0
147 #define DPM_HOST_INT_EN0        0xf0
148 #define DPM_HOST_INT_MASK       0xe600ffff
149 #define DPM_HOST_INT_GLOBAL_EN  0x80000000
150
151 static irqreturn_t netx5152_irq_handler(int irq, struct uio_info *info)
152 {
153         void __iomem *reg_int_en = info->mem[0].internal_addr +
154                                         DPM_HOST_WIN0_OFFSET +
155                                         DPM_HOST_INT_EN0;
156         void __iomem *reg_int_stat = info->mem[0].internal_addr +
157                                         DPM_HOST_WIN0_OFFSET +
158                                         DPM_HOST_INT_STAT0;
159
160         /* check if an interrupt is enabled and active */
161         if ((ioread32(reg_int_en) & ioread32(reg_int_stat) &
162              DPM_HOST_INT_MASK) == 0) {
163                 return IRQ_NONE;
164         }
165
166         /* disable interrupts */
167         iowrite32(ioread32(reg_int_en) & ~DPM_HOST_INT_GLOBAL_EN, reg_int_en);
168
169         return IRQ_HANDLED;
170 }
171
172 static void netx5152_init(struct uio_info *info)
173 {
174         unsigned long win0_offset = DPM_HOST_WIN0_OFFSET;
175         struct fsl_elbc_gpcm *priv = info->priv;
176         const void *prop;
177
178         /* get an optional initial win0 offset */
179         prop = of_get_property(priv->dev->of_node,
180                                "netx5152,init-win0-offset", NULL);
181         if (prop)
182                 win0_offset = of_read_ulong(prop, 1);
183
184         /* disable interrupts */
185         iowrite32(0, info->mem[0].internal_addr + win0_offset +
186                      DPM_HOST_INT_EN0);
187 }
188
189 static void netx5152_shutdown(struct uio_info *info, bool init_err)
190 {
191         if (init_err)
192                 return;
193
194         /* disable interrupts */
195         iowrite32(0, info->mem[0].internal_addr + DPM_HOST_WIN0_OFFSET +
196                      DPM_HOST_INT_EN0);
197 }
198 #endif
199
200 static void setup_periph(struct fsl_elbc_gpcm *priv,
201                                    const char *type)
202 {
203 #ifdef CONFIG_UIO_FSL_ELBC_GPCM_NETX5152
204         if (strcmp(type, "netx5152") == 0) {
205                 priv->irq_handler = netx5152_irq_handler;
206                 priv->init = netx5152_init;
207                 priv->shutdown = netx5152_shutdown;
208                 priv->name = "netX 51/52";
209                 return;
210         }
211 #endif
212 }
213
214 static int check_of_data(struct fsl_elbc_gpcm *priv,
215                                    struct resource *res,
216                                    u32 reg_br, u32 reg_or)
217 {
218         /* check specified bank */
219         if (priv->bank >= MAX_BANKS) {
220                 dev_err(priv->dev, "invalid bank\n");
221                 return -ENODEV;
222         }
223
224         /* check specified mode (BR_MS_GPCM is 0) */
225         if ((reg_br & BR_MSEL) != BR_MS_GPCM) {
226                 dev_err(priv->dev, "unsupported mode\n");
227                 return -ENODEV;
228         }
229
230         /* check specified mask vs. resource size */
231         if ((~(reg_or & OR_GPCM_AM) + 1) != resource_size(res)) {
232                 dev_err(priv->dev, "address mask / size mismatch\n");
233                 return -ENODEV;
234         }
235
236         /* check specified address */
237         if ((reg_br & reg_or & BR_BA) != fsl_lbc_addr(res->start)) {
238                 dev_err(priv->dev, "base address mismatch\n");
239                 return -ENODEV;
240         }
241
242         return 0;
243 }
244
245 static int get_of_data(struct fsl_elbc_gpcm *priv, struct device_node *node,
246                        struct resource *res, u32 *reg_br,
247                        u32 *reg_or, unsigned int *irq, char **name)
248 {
249         const char *dt_name;
250         const char *type;
251         int ret;
252
253         /* get the memory resource */
254         ret = of_address_to_resource(node, 0, res);
255         if (ret) {
256                 dev_err(priv->dev, "failed to get resource\n");
257                 return ret;
258         }
259
260         /* get the bank number */
261         ret = of_property_read_u32(node, "reg", &priv->bank);
262         if (ret) {
263                 dev_err(priv->dev, "failed to get bank number\n");
264                 return ret;
265         }
266
267         /* get BR value to set */
268         ret = of_property_read_u32(node, "elbc-gpcm-br", reg_br);
269         if (ret) {
270                 dev_err(priv->dev, "missing elbc-gpcm-br value\n");
271                 return ret;
272         }
273
274         /* get OR value to set */
275         ret = of_property_read_u32(node, "elbc-gpcm-or", reg_or);
276         if (ret) {
277                 dev_err(priv->dev, "missing elbc-gpcm-or value\n");
278                 return ret;
279         }
280
281         /* get optional peripheral type */
282         priv->name = "generic";
283         if (of_property_read_string(node, "device_type", &type) == 0)
284                 setup_periph(priv, type);
285
286         /* get optional irq value */
287         *irq = irq_of_parse_and_map(node, 0);
288
289         /* sanity check device tree data */
290         ret = check_of_data(priv, res, *reg_br, *reg_or);
291         if (ret)
292                 return ret;
293
294         /* get optional uio name */
295         if (of_property_read_string(node, "uio_name", &dt_name) != 0)
296                 dt_name = "eLBC_GPCM";
297         *name = kstrdup(dt_name, GFP_KERNEL);
298         if (!*name)
299                 return -ENOMEM;
300
301         return 0;
302 }
303
304 static int uio_fsl_elbc_gpcm_probe(struct platform_device *pdev)
305 {
306         struct device_node *node = pdev->dev.of_node;
307         struct fsl_elbc_gpcm *priv;
308         struct uio_info *info;
309         char *uio_name = NULL;
310         struct resource res;
311         unsigned int irq;
312         u32 reg_br_cur;
313         u32 reg_or_cur;
314         u32 reg_br_new;
315         u32 reg_or_new;
316         int ret;
317
318         if (!fsl_lbc_ctrl_dev || !fsl_lbc_ctrl_dev->regs)
319                 return -ENODEV;
320
321         /* allocate private data */
322         priv = kzalloc(sizeof(*priv), GFP_KERNEL);
323         if (!priv)
324                 return -ENOMEM;
325         priv->dev = &pdev->dev;
326         priv->lbc = fsl_lbc_ctrl_dev->regs;
327
328         /* get device tree data */
329         ret = get_of_data(priv, node, &res, &reg_br_new, &reg_or_new,
330                           &irq, &uio_name);
331         if (ret)
332                 goto out_err0;
333
334         /* allocate UIO structure */
335         info = kzalloc(sizeof(*info), GFP_KERNEL);
336         if (!info) {
337                 ret = -ENOMEM;
338                 goto out_err0;
339         }
340
341         /* get current BR/OR values */
342         reg_br_cur = in_be32(&priv->lbc->bank[priv->bank].br);
343         reg_or_cur = in_be32(&priv->lbc->bank[priv->bank].or);
344
345         /* if bank already configured, make sure it matches */
346         if ((reg_br_cur & BR_V)) {
347                 if ((reg_br_cur & BR_MSEL) != BR_MS_GPCM ||
348                     (reg_br_cur & reg_or_cur & BR_BA)
349                      != fsl_lbc_addr(res.start)) {
350                         dev_err(priv->dev,
351                                 "bank in use by another peripheral\n");
352                         ret = -ENODEV;
353                         goto out_err1;
354                 }
355
356                 /* warn if behavior settings changing */
357                 if ((reg_br_cur & ~(BR_BA | BR_V)) !=
358                     (reg_br_new & ~(BR_BA | BR_V))) {
359                         dev_warn(priv->dev,
360                                  "modifying BR settings: 0x%08x -> 0x%08x",
361                                  reg_br_cur, reg_br_new);
362                 }
363                 if ((reg_or_cur & ~OR_GPCM_AM) != (reg_or_new & ~OR_GPCM_AM)) {
364                         dev_warn(priv->dev,
365                                  "modifying OR settings: 0x%08x -> 0x%08x",
366                                  reg_or_cur, reg_or_new);
367                 }
368         }
369
370         /* configure the bank (force base address and GPCM) */
371         reg_br_new &= ~(BR_BA | BR_MSEL);
372         reg_br_new |= fsl_lbc_addr(res.start) | BR_MS_GPCM | BR_V;
373         out_be32(&priv->lbc->bank[priv->bank].or, reg_or_new);
374         out_be32(&priv->lbc->bank[priv->bank].br, reg_br_new);
375
376         /* map the memory resource */
377         info->mem[0].internal_addr = ioremap(res.start, resource_size(&res));
378         if (!info->mem[0].internal_addr) {
379                 dev_err(priv->dev, "failed to map chip region\n");
380                 ret = -ENODEV;
381                 goto out_err1;
382         }
383
384         /* set all UIO data */
385         if (node->name)
386                 info->mem[0].name = kstrdup(node->name, GFP_KERNEL);
387         info->mem[0].addr = res.start;
388         info->mem[0].size = resource_size(&res);
389         info->mem[0].memtype = UIO_MEM_PHYS;
390         info->priv = priv;
391         info->name = uio_name;
392         info->version = "0.0.1";
393         if (irq != NO_IRQ) {
394                 if (priv->irq_handler) {
395                         info->irq = irq;
396                         info->irq_flags = IRQF_SHARED;
397                         info->handler = priv->irq_handler;
398                 } else {
399                         irq = NO_IRQ;
400                         dev_warn(priv->dev, "ignoring irq, no handler\n");
401                 }
402         }
403
404         if (priv->init)
405                 priv->init(info);
406
407         /* register UIO device */
408         if (uio_register_device(priv->dev, info) != 0) {
409                 dev_err(priv->dev, "UIO registration failed\n");
410                 ret = -ENODEV;
411                 goto out_err2;
412         }
413
414         /* store private data */
415         platform_set_drvdata(pdev, info);
416
417         /* create sysfs files */
418         ret = device_create_file(priv->dev, &dev_attr_reg_br);
419         if (ret)
420                 goto out_err3;
421         ret = device_create_file(priv->dev, &dev_attr_reg_or);
422         if (ret)
423                 goto out_err4;
424
425         dev_info(priv->dev,
426                  "eLBC/GPCM device (%s) at 0x%llx, bank %d, irq=%d\n",
427                  priv->name, (unsigned long long)res.start, priv->bank,
428                  irq != NO_IRQ ? irq : -1);
429
430         return 0;
431 out_err4:
432         device_remove_file(priv->dev, &dev_attr_reg_br);
433 out_err3:
434         platform_set_drvdata(pdev, NULL);
435         uio_unregister_device(info);
436 out_err2:
437         if (priv->shutdown)
438                 priv->shutdown(info, true);
439         iounmap(info->mem[0].internal_addr);
440 out_err1:
441         kfree(info->mem[0].name);
442         kfree(info);
443 out_err0:
444         kfree(uio_name);
445         kfree(priv);
446         return ret;
447 }
448
449 static int uio_fsl_elbc_gpcm_remove(struct platform_device *pdev)
450 {
451         struct uio_info *info = platform_get_drvdata(pdev);
452         struct fsl_elbc_gpcm *priv = info->priv;
453
454         device_remove_file(priv->dev, &dev_attr_reg_or);
455         device_remove_file(priv->dev, &dev_attr_reg_br);
456         platform_set_drvdata(pdev, NULL);
457         uio_unregister_device(info);
458         if (priv->shutdown)
459                 priv->shutdown(info, false);
460         iounmap(info->mem[0].internal_addr);
461         kfree(info->mem[0].name);
462         kfree(info->name);
463         kfree(info);
464         kfree(priv);
465
466         return 0;
467
468 }
469
470 static const struct of_device_id uio_fsl_elbc_gpcm_match[] = {
471         { .compatible = "fsl,elbc-gpcm-uio", },
472         {}
473 };
474 MODULE_DEVICE_TABLE(of, uio_fsl_elbc_gpcm_match);
475
476 static struct platform_driver uio_fsl_elbc_gpcm_driver = {
477         .driver = {
478                 .name = "fsl,elbc-gpcm-uio",
479                 .of_match_table = uio_fsl_elbc_gpcm_match,
480         },
481         .probe = uio_fsl_elbc_gpcm_probe,
482         .remove = uio_fsl_elbc_gpcm_remove,
483 };
484 module_platform_driver(uio_fsl_elbc_gpcm_driver);
485
486 MODULE_LICENSE("GPL");
487 MODULE_AUTHOR("John Ogness <john.ogness@linutronix.de>");
488 MODULE_DESCRIPTION("Freescale Enhanced Local Bus Controller GPCM driver");