xref: /openbmc/u-boot/drivers/core/device.c (revision 5994e8b6)
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 		dm_dbg("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 }
715