Merge git://git.denx.de/u-boot-sunxi
[oweals/u-boot.git] / drivers / core / device.c
1 /*
2  * Device manager
3  *
4  * Copyright (c) 2013 Google, Inc
5  *
6  * (C) Copyright 2012
7  * Pavel Herrmann <morpheus.ibis@gmail.com>
8  *
9  * SPDX-License-Identifier:     GPL-2.0+
10  */
11
12 #include <common.h>
13 #include <asm/io.h>
14 #include <fdtdec.h>
15 #include <fdt_support.h>
16 #include <malloc.h>
17 #include <dm/device.h>
18 #include <dm/device-internal.h>
19 #include <dm/lists.h>
20 #include <dm/pinctrl.h>
21 #include <dm/platdata.h>
22 #include <dm/read.h>
23 #include <dm/uclass.h>
24 #include <dm/uclass-internal.h>
25 #include <dm/util.h>
26 #include <linux/err.h>
27 #include <linux/list.h>
28
29 DECLARE_GLOBAL_DATA_PTR;
30
31 static int device_bind_common(struct udevice *parent, const struct driver *drv,
32                               const char *name, void *platdata,
33                               ulong driver_data, ofnode node,
34                               uint of_platdata_size, struct udevice **devp)
35 {
36         struct udevice *dev;
37         struct uclass *uc;
38         int size, ret = 0;
39
40         if (devp)
41                 *devp = NULL;
42         if (!name)
43                 return -EINVAL;
44
45         ret = uclass_get(drv->id, &uc);
46         if (ret) {
47                 debug("Missing uclass for driver %s\n", drv->name);
48                 return ret;
49         }
50
51         dev = calloc(1, sizeof(struct udevice));
52         if (!dev)
53                 return -ENOMEM;
54
55         INIT_LIST_HEAD(&dev->sibling_node);
56         INIT_LIST_HEAD(&dev->child_head);
57         INIT_LIST_HEAD(&dev->uclass_node);
58 #ifdef CONFIG_DEVRES
59         INIT_LIST_HEAD(&dev->devres_head);
60 #endif
61         dev->platdata = platdata;
62         dev->driver_data = driver_data;
63         dev->name = name;
64         dev->node = node;
65         dev->parent = parent;
66         dev->driver = drv;
67         dev->uclass = uc;
68
69         dev->seq = -1;
70         dev->req_seq = -1;
71         if (CONFIG_IS_ENABLED(OF_CONTROL) && CONFIG_IS_ENABLED(DM_SEQ_ALIAS)) {
72                 /*
73                  * Some devices, such as a SPI bus, I2C bus and serial ports
74                  * are numbered using aliases.
75                  *
76                  * This is just a 'requested' sequence, and will be
77                  * resolved (and ->seq updated) when the device is probed.
78                  */
79                 if (uc->uc_drv->flags & DM_UC_FLAG_SEQ_ALIAS) {
80                         if (uc->uc_drv->name && ofnode_valid(node)) {
81                                 dev_read_alias_seq(dev, &dev->req_seq);
82                         }
83                 }
84         }
85
86         if (drv->platdata_auto_alloc_size) {
87                 bool alloc = !platdata;
88
89                 if (CONFIG_IS_ENABLED(OF_PLATDATA)) {
90                         if (of_platdata_size) {
91                                 dev->flags |= DM_FLAG_OF_PLATDATA;
92                                 if (of_platdata_size <
93                                                 drv->platdata_auto_alloc_size)
94                                         alloc = true;
95                         }
96                 }
97                 if (alloc) {
98                         dev->flags |= DM_FLAG_ALLOC_PDATA;
99                         dev->platdata = calloc(1,
100                                                drv->platdata_auto_alloc_size);
101                         if (!dev->platdata) {
102                                 ret = -ENOMEM;
103                                 goto fail_alloc1;
104                         }
105                         if (CONFIG_IS_ENABLED(OF_PLATDATA) && platdata) {
106                                 memcpy(dev->platdata, platdata,
107                                        of_platdata_size);
108                         }
109                 }
110         }
111
112         size = uc->uc_drv->per_device_platdata_auto_alloc_size;
113         if (size) {
114                 dev->flags |= DM_FLAG_ALLOC_UCLASS_PDATA;
115                 dev->uclass_platdata = calloc(1, size);
116                 if (!dev->uclass_platdata) {
117                         ret = -ENOMEM;
118                         goto fail_alloc2;
119                 }
120         }
121
122         if (parent) {
123                 size = parent->driver->per_child_platdata_auto_alloc_size;
124                 if (!size) {
125                         size = parent->uclass->uc_drv->
126                                         per_child_platdata_auto_alloc_size;
127                 }
128                 if (size) {
129                         dev->flags |= DM_FLAG_ALLOC_PARENT_PDATA;
130                         dev->parent_platdata = calloc(1, size);
131                         if (!dev->parent_platdata) {
132                                 ret = -ENOMEM;
133                                 goto fail_alloc3;
134                         }
135                 }
136         }
137
138         /* put dev into parent's successor list */
139         if (parent)
140                 list_add_tail(&dev->sibling_node, &parent->child_head);
141
142         ret = uclass_bind_device(dev);
143         if (ret)
144                 goto fail_uclass_bind;
145
146         /* if we fail to bind we remove device from successors and free it */
147         if (drv->bind) {
148                 ret = drv->bind(dev);
149                 if (ret)
150                         goto fail_bind;
151         }
152         if (parent && parent->driver->child_post_bind) {
153                 ret = parent->driver->child_post_bind(dev);
154                 if (ret)
155                         goto fail_child_post_bind;
156         }
157         if (uc->uc_drv->post_bind) {
158                 ret = uc->uc_drv->post_bind(dev);
159                 if (ret)
160                         goto fail_uclass_post_bind;
161         }
162
163         if (parent)
164                 pr_debug("Bound device %s to %s\n", dev->name, parent->name);
165         if (devp)
166                 *devp = dev;
167
168         dev->flags |= DM_FLAG_BOUND;
169
170         return 0;
171
172 fail_uclass_post_bind:
173         /* There is no child unbind() method, so no clean-up required */
174 fail_child_post_bind:
175         if (CONFIG_IS_ENABLED(DM_DEVICE_REMOVE)) {
176                 if (drv->unbind && drv->unbind(dev)) {
177                         dm_warn("unbind() method failed on dev '%s' on error path\n",
178                                 dev->name);
179                 }
180         }
181
182 fail_bind:
183         if (CONFIG_IS_ENABLED(DM_DEVICE_REMOVE)) {
184                 if (uclass_unbind_device(dev)) {
185                         dm_warn("Failed to unbind dev '%s' on error path\n",
186                                 dev->name);
187                 }
188         }
189 fail_uclass_bind:
190         if (CONFIG_IS_ENABLED(DM_DEVICE_REMOVE)) {
191                 list_del(&dev->sibling_node);
192                 if (dev->flags & DM_FLAG_ALLOC_PARENT_PDATA) {
193                         free(dev->parent_platdata);
194                         dev->parent_platdata = NULL;
195                 }
196         }
197 fail_alloc3:
198         if (dev->flags & DM_FLAG_ALLOC_UCLASS_PDATA) {
199                 free(dev->uclass_platdata);
200                 dev->uclass_platdata = NULL;
201         }
202 fail_alloc2:
203         if (dev->flags & DM_FLAG_ALLOC_PDATA) {
204                 free(dev->platdata);
205                 dev->platdata = NULL;
206         }
207 fail_alloc1:
208         devres_release_all(dev);
209
210         free(dev);
211
212         return ret;
213 }
214
215 int device_bind_with_driver_data(struct udevice *parent,
216                                  const struct driver *drv, const char *name,
217                                  ulong driver_data, ofnode node,
218                                  struct udevice **devp)
219 {
220         return device_bind_common(parent, drv, name, NULL, driver_data, node,
221                                   0, devp);
222 }
223
224 int device_bind(struct udevice *parent, const struct driver *drv,
225                 const char *name, void *platdata, int of_offset,
226                 struct udevice **devp)
227 {
228         return device_bind_common(parent, drv, name, platdata, 0,
229                                   offset_to_ofnode(of_offset), 0, devp);
230 }
231
232 int device_bind_by_name(struct udevice *parent, bool pre_reloc_only,
233                         const struct driver_info *info, struct udevice **devp)
234 {
235         struct driver *drv;
236         uint platdata_size = 0;
237
238         drv = lists_driver_lookup_name(info->name);
239         if (!drv)
240                 return -ENOENT;
241         if (pre_reloc_only && !(drv->flags & DM_FLAG_PRE_RELOC))
242                 return -EPERM;
243
244 #if CONFIG_IS_ENABLED(OF_PLATDATA)
245         platdata_size = info->platdata_size;
246 #endif
247         return device_bind_common(parent, drv, info->name,
248                         (void *)info->platdata, 0, ofnode_null(), platdata_size,
249                         devp);
250 }
251
252 static void *alloc_priv(int size, uint flags)
253 {
254         void *priv;
255
256         if (flags & DM_FLAG_ALLOC_PRIV_DMA) {
257                 priv = memalign(ARCH_DMA_MINALIGN, size);
258                 if (priv) {
259                         memset(priv, '\0', size);
260
261                         /*
262                          * Ensure that the zero bytes are flushed to memory.
263                          * This prevents problems if the driver uses this as
264                          * both an input and an output buffer:
265                          *
266                          * 1. Zeroes written to buffer (here) and sit in the
267                          *      cache
268                          * 2. Driver issues a read command to DMA
269                          * 3. CPU runs out of cache space and evicts some cache
270                          *      data in the buffer, writing zeroes to RAM from
271                          *      the memset() above
272                          * 4. DMA completes
273                          * 5. Buffer now has some DMA data and some zeroes
274                          * 6. Data being read is now incorrect
275                          *
276                          * To prevent this, ensure that the cache is clean
277                          * within this range at the start. The driver can then
278                          * use normal flush-after-write, invalidate-before-read
279                          * procedures.
280                          *
281                          * TODO(sjg@chromium.org): Drop this microblaze
282                          * exception.
283                          */
284 #ifndef CONFIG_MICROBLAZE
285                         flush_dcache_range((ulong)priv, (ulong)priv + size);
286 #endif
287                 }
288         } else {
289                 priv = calloc(1, size);
290         }
291
292         return priv;
293 }
294
295 int device_probe(struct udevice *dev)
296 {
297         const struct driver *drv;
298         int size = 0;
299         int ret;
300         int seq;
301
302         if (!dev)
303                 return -EINVAL;
304
305         if (dev->flags & DM_FLAG_ACTIVATED)
306                 return 0;
307
308         drv = dev->driver;
309         assert(drv);
310
311         /* Allocate private data if requested and not reentered */
312         if (drv->priv_auto_alloc_size && !dev->priv) {
313                 dev->priv = alloc_priv(drv->priv_auto_alloc_size, drv->flags);
314                 if (!dev->priv) {
315                         ret = -ENOMEM;
316                         goto fail;
317                 }
318         }
319         /* Allocate private data if requested and not reentered */
320         size = dev->uclass->uc_drv->per_device_auto_alloc_size;
321         if (size && !dev->uclass_priv) {
322                 dev->uclass_priv = calloc(1, size);
323                 if (!dev->uclass_priv) {
324                         ret = -ENOMEM;
325                         goto fail;
326                 }
327         }
328
329         /* Ensure all parents are probed */
330         if (dev->parent) {
331                 size = dev->parent->driver->per_child_auto_alloc_size;
332                 if (!size) {
333                         size = dev->parent->uclass->uc_drv->
334                                         per_child_auto_alloc_size;
335                 }
336                 if (size && !dev->parent_priv) {
337                         dev->parent_priv = alloc_priv(size, drv->flags);
338                         if (!dev->parent_priv) {
339                                 ret = -ENOMEM;
340                                 goto fail;
341                         }
342                 }
343
344                 ret = device_probe(dev->parent);
345                 if (ret)
346                         goto fail;
347
348                 /*
349                  * The device might have already been probed during
350                  * the call to device_probe() on its parent device
351                  * (e.g. PCI bridge devices). Test the flags again
352                  * so that we don't mess up the device.
353                  */
354                 if (dev->flags & DM_FLAG_ACTIVATED)
355                         return 0;
356         }
357
358         seq = uclass_resolve_seq(dev);
359         if (seq < 0) {
360                 ret = seq;
361                 goto fail;
362         }
363         dev->seq = seq;
364
365         dev->flags |= DM_FLAG_ACTIVATED;
366
367         /*
368          * Process pinctrl for everything except the root device, and
369          * continue regardless of the result of pinctrl. Don't process pinctrl
370          * settings for pinctrl devices since the device may not yet be
371          * probed.
372          */
373         if (dev->parent && device_get_uclass_id(dev) != UCLASS_PINCTRL)
374                 pinctrl_select_state(dev, "default");
375
376         ret = uclass_pre_probe_device(dev);
377         if (ret)
378                 goto fail;
379
380         if (dev->parent && dev->parent->driver->child_pre_probe) {
381                 ret = dev->parent->driver->child_pre_probe(dev);
382                 if (ret)
383                         goto fail;
384         }
385
386         if (drv->ofdata_to_platdata && dev_has_of_node(dev)) {
387                 ret = drv->ofdata_to_platdata(dev);
388                 if (ret)
389                         goto fail;
390         }
391
392         if (drv->probe) {
393                 ret = drv->probe(dev);
394                 if (ret) {
395                         dev->flags &= ~DM_FLAG_ACTIVATED;
396                         goto fail;
397                 }
398         }
399
400         ret = uclass_post_probe_device(dev);
401         if (ret)
402                 goto fail_uclass;
403
404         if (dev->parent && device_get_uclass_id(dev) == UCLASS_PINCTRL)
405                 pinctrl_select_state(dev, "default");
406
407         return 0;
408 fail_uclass:
409         if (device_remove(dev, DM_REMOVE_NORMAL)) {
410                 dm_warn("%s: Device '%s' failed to remove on error path\n",
411                         __func__, dev->name);
412         }
413 fail:
414         dev->flags &= ~DM_FLAG_ACTIVATED;
415
416         dev->seq = -1;
417         device_free(dev);
418
419         return ret;
420 }
421
422 void *dev_get_platdata(struct udevice *dev)
423 {
424         if (!dev) {
425                 dm_warn("%s: null device\n", __func__);
426                 return NULL;
427         }
428
429         return dev->platdata;
430 }
431
432 void *dev_get_parent_platdata(struct udevice *dev)
433 {
434         if (!dev) {
435                 dm_warn("%s: null device\n", __func__);
436                 return NULL;
437         }
438
439         return dev->parent_platdata;
440 }
441
442 void *dev_get_uclass_platdata(struct udevice *dev)
443 {
444         if (!dev) {
445                 dm_warn("%s: null device\n", __func__);
446                 return NULL;
447         }
448
449         return dev->uclass_platdata;
450 }
451
452 void *dev_get_priv(struct udevice *dev)
453 {
454         if (!dev) {
455                 dm_warn("%s: null device\n", __func__);
456                 return NULL;
457         }
458
459         return dev->priv;
460 }
461
462 void *dev_get_uclass_priv(struct udevice *dev)
463 {
464         if (!dev) {
465                 dm_warn("%s: null device\n", __func__);
466                 return NULL;
467         }
468
469         return dev->uclass_priv;
470 }
471
472 void *dev_get_parent_priv(struct udevice *dev)
473 {
474         if (!dev) {
475                 dm_warn("%s: null device\n", __func__);
476                 return NULL;
477         }
478
479         return dev->parent_priv;
480 }
481
482 static int device_get_device_tail(struct udevice *dev, int ret,
483                                   struct udevice **devp)
484 {
485         if (ret)
486                 return ret;
487
488         ret = device_probe(dev);
489         if (ret)
490                 return ret;
491
492         *devp = dev;
493
494         return 0;
495 }
496
497 int device_get_child(struct udevice *parent, int index, struct udevice **devp)
498 {
499         struct udevice *dev;
500
501         list_for_each_entry(dev, &parent->child_head, sibling_node) {
502                 if (!index--)
503                         return device_get_device_tail(dev, 0, devp);
504         }
505
506         return -ENODEV;
507 }
508
509 int device_find_child_by_seq(struct udevice *parent, int seq_or_req_seq,
510                              bool find_req_seq, struct udevice **devp)
511 {
512         struct udevice *dev;
513
514         *devp = NULL;
515         if (seq_or_req_seq == -1)
516                 return -ENODEV;
517
518         list_for_each_entry(dev, &parent->child_head, sibling_node) {
519                 if ((find_req_seq ? dev->req_seq : dev->seq) ==
520                                 seq_or_req_seq) {
521                         *devp = dev;
522                         return 0;
523                 }
524         }
525
526         return -ENODEV;
527 }
528
529 int device_get_child_by_seq(struct udevice *parent, int seq,
530                             struct udevice **devp)
531 {
532         struct udevice *dev;
533         int ret;
534
535         *devp = NULL;
536         ret = device_find_child_by_seq(parent, seq, false, &dev);
537         if (ret == -ENODEV) {
538                 /*
539                  * We didn't find it in probed devices. See if there is one
540                  * that will request this seq if probed.
541                  */
542                 ret = device_find_child_by_seq(parent, seq, true, &dev);
543         }
544         return device_get_device_tail(dev, ret, devp);
545 }
546
547 int device_find_child_by_of_offset(struct udevice *parent, int of_offset,
548                                    struct udevice **devp)
549 {
550         struct udevice *dev;
551
552         *devp = NULL;
553
554         list_for_each_entry(dev, &parent->child_head, sibling_node) {
555                 if (dev_of_offset(dev) == of_offset) {
556                         *devp = dev;
557                         return 0;
558                 }
559         }
560
561         return -ENODEV;
562 }
563
564 int device_get_child_by_of_offset(struct udevice *parent, int node,
565                                   struct udevice **devp)
566 {
567         struct udevice *dev;
568         int ret;
569
570         *devp = NULL;
571         ret = device_find_child_by_of_offset(parent, node, &dev);
572         return device_get_device_tail(dev, ret, devp);
573 }
574
575 static struct udevice *_device_find_global_by_of_offset(struct udevice *parent,
576                                                         int of_offset)
577 {
578         struct udevice *dev, *found;
579
580         if (dev_of_offset(parent) == of_offset)
581                 return parent;
582
583         list_for_each_entry(dev, &parent->child_head, sibling_node) {
584                 found = _device_find_global_by_of_offset(dev, of_offset);
585                 if (found)
586                         return found;
587         }
588
589         return NULL;
590 }
591
592 int device_get_global_by_of_offset(int of_offset, struct udevice **devp)
593 {
594         struct udevice *dev;
595
596         dev = _device_find_global_by_of_offset(gd->dm_root, of_offset);
597         return device_get_device_tail(dev, dev ? 0 : -ENOENT, devp);
598 }
599
600 int device_find_first_child(struct udevice *parent, struct udevice **devp)
601 {
602         if (list_empty(&parent->child_head)) {
603                 *devp = NULL;
604         } else {
605                 *devp = list_first_entry(&parent->child_head, struct udevice,
606                                          sibling_node);
607         }
608
609         return 0;
610 }
611
612 int device_find_next_child(struct udevice **devp)
613 {
614         struct udevice *dev = *devp;
615         struct udevice *parent = dev->parent;
616
617         if (list_is_last(&dev->sibling_node, &parent->child_head)) {
618                 *devp = NULL;
619         } else {
620                 *devp = list_entry(dev->sibling_node.next, struct udevice,
621                                    sibling_node);
622         }
623
624         return 0;
625 }
626
627 struct udevice *dev_get_parent(struct udevice *child)
628 {
629         return child->parent;
630 }
631
632 ulong dev_get_driver_data(struct udevice *dev)
633 {
634         return dev->driver_data;
635 }
636
637 const void *dev_get_driver_ops(struct udevice *dev)
638 {
639         if (!dev || !dev->driver->ops)
640                 return NULL;
641
642         return dev->driver->ops;
643 }
644
645 enum uclass_id device_get_uclass_id(struct udevice *dev)
646 {
647         return dev->uclass->uc_drv->id;
648 }
649
650 const char *dev_get_uclass_name(struct udevice *dev)
651 {
652         if (!dev)
653                 return NULL;
654
655         return dev->uclass->uc_drv->name;
656 }
657
658 bool device_has_children(struct udevice *dev)
659 {
660         return !list_empty(&dev->child_head);
661 }
662
663 bool device_has_active_children(struct udevice *dev)
664 {
665         struct udevice *child;
666
667         for (device_find_first_child(dev, &child);
668              child;
669              device_find_next_child(&child)) {
670                 if (device_active(child))
671                         return true;
672         }
673
674         return false;
675 }
676
677 bool device_is_last_sibling(struct udevice *dev)
678 {
679         struct udevice *parent = dev->parent;
680
681         if (!parent)
682                 return false;
683         return list_is_last(&dev->sibling_node, &parent->child_head);
684 }
685
686 void device_set_name_alloced(struct udevice *dev)
687 {
688         dev->flags |= DM_FLAG_NAME_ALLOCED;
689 }
690
691 int device_set_name(struct udevice *dev, const char *name)
692 {
693         name = strdup(name);
694         if (!name)
695                 return -ENOMEM;
696         dev->name = name;
697         device_set_name_alloced(dev);
698
699         return 0;
700 }
701
702 bool device_is_compatible(struct udevice *dev, const char *compat)
703 {
704         const void *fdt = gd->fdt_blob;
705
706         return !fdt_node_check_compatible(fdt, dev_of_offset(dev), compat);
707 }
708
709 bool of_machine_is_compatible(const char *compat)
710 {
711         const void *fdt = gd->fdt_blob;
712
713         return !fdt_node_check_compatible(fdt, 0, compat);
714 }