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