[PATCH] bsps/shared/ofw: Implement RTEMS OFW interface

G S Niteesh Babu niteesh.gs at gmail.com
Sat Aug 15 18:49:22 UTC 2020


---
 bsps/include/ofw/ofw.h  | 534 ++++++++++++++++++++++++++++++++
 bsps/shared/ofw/ofw.c   | 654 ++++++++++++++++++++++++++++++++++++++++
 spec/build/bsps/obj.yml |   4 +
 3 files changed, 1192 insertions(+)
 create mode 100644 bsps/include/ofw/ofw.h
 create mode 100644 bsps/shared/ofw/ofw.c

diff --git a/bsps/include/ofw/ofw.h b/bsps/include/ofw/ofw.h
new file mode 100644
index 0000000000..2ca5328abc
--- /dev/null
+++ b/bsps/include/ofw/ofw.h
@@ -0,0 +1,534 @@
+/* SPDX-License-Identifier: BSD-2-Clause */
+
+/**
+ * @file
+ *
+ * @ingroup ofw
+ *
+ * RTEMS FDT implementation of OpenFirmWare Interface.
+ *
+ * RTEMS OFW is a FDT only implementation of the OpenFirmWare interface.
+ * This API is created to be compatible with FreeBSD OpenFirmWare interface.
+ * The main intention is to make porting of FreeBSD drivers to RTEMS easier.
+ */
+
+/*
+ * Copyright (C) 2020 Niteesh Babu G S <niteesh.gs at gmail.com>
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#ifndef _OFW_H
+#define _OFW_H
+
+#ifdef __cplusplus
+extern "C" {
+#endif
+
+#include <stdint.h>
+#include <stddef.h>
+
+/**
+ * Represents a node in the device tree. The offset from fdtp to node is used
+ * instead of fdt offset to make sure this is compatible with OF interface in
+ * FreeBSD.
+ */
+typedef uint32_t  phandle_t;
+/**
+ * Represents the effective phandle of the node.
+ */
+typedef uint32_t  ihandle_t;
+/**
+ * Represents the data type of the buffer.
+ */
+typedef uint32_t  pcell_t;
+
+/**
+ * @struct rtems_ofw_memory_area
+ *
+ * This is used to represent elements(FDT properties) that define
+ * region of memory address.
+ */
+typedef struct {
+  /** The start address of the memory region. */
+  uint32_t start;
+  /** The size of the memory region. */
+  uint32_t size;
+} rtems_ofw_memory_area;
+
+/**
+ * @struct rtems_ofw_ranges
+ *
+ * This is used to represent the ranges property in the device tree.
+ */
+typedef struct {
+  /** The physical address within the child bus address space */
+  uint32_t child_bus;
+  /** The physical address within the parent bus address space */
+  uint32_t parent_bus;
+  /** The size of the range in the child’s address space */
+  uint32_t size;
+} rtems_ofw_ranges;
+
+/**
+ * @brief Gets the node that is next to @a node.
+ *
+ * @param[in] node Node offset
+ *
+ * @retval Peer node offset Successful operation.
+ * @retval 0 No peer node or invalid node handle
+ */
+phandle_t rtems_ofw_peer(
+  phandle_t   node
+);
+
+/**
+ * @brief Gets the node that is the child of @a node.
+ *
+ * @param[in] node Node offset
+ *
+ * @retval child node offset Successful operation.
+ * @retval 0 No child node or invalid node handle
+ */
+phandle_t rtems_ofw_child(
+  phandle_t   node
+);
+
+/**
+ * @brief Gets the node that is the parent of @a node.
+ *
+ * @param[in] node Node offset
+ *
+ * @retval child node offset Successful operation.
+ * @retval 0 No child node or invalid node handle
+ */
+phandle_t rtems_ofw_parent(
+  phandle_t   node
+);
+
+/**
+ * @brief Gets the length of the property mentioned in @a propname.
+ *
+ * @param[in] node Node offset
+ * @param[in] prop Property name
+ *
+ * @retval -1 Invalid node or property
+ * @retval  Length of property on successful operation
+ */
+size_t rtems_ofw_get_prop_len(
+  phandle_t   node,
+  const char *propname
+);
+
+/**
+ * @brief Gets the value of property mentioned in @a propname.
+ *
+ * @param[in] node Node offset
+ * @param[in] prop Property name
+ * @param[out] buf The property value gets stored in this buffer (Pre-allocated)
+ * @param[in] len Length of the buffer
+ 
+ * @retval -1 Invalid node or property
+ * @retval  Length of property on successful operation
+ */
+size_t rtems_ofw_get_prop(
+  phandle_t    node,
+  const char  *propname,
+  void        *buf,
+  size_t       len
+);
+
+/**
+ * @brief Gets the value of property mentioned in @a prop.
+ * 
+ * Gets the value of property of @a node and converts the value into the host's
+ * endianness.
+ *
+ * @param[in] node Node offset
+ * @param[in] prop Property name
+ * @param[out] buf The property value gets stored in this buffer(Pre-allocated)
+ * after converted to the host's endianness
+ * @param[in] len Length of the buffer
+ *
+ * @retval -1 Invalid node or property
+ * @retval  Length of property on successful operation
+ */
+size_t rtems_ofw_get_enc_prop(
+  phandle_t    node,
+  const char  *prop,
+  pcell_t     *buf,
+  size_t       len
+);
+
+/**
+ * @brief Checks if the property @a propname is present in @a node.
+ *
+ * @param[in] node Node offset
+ * @param[in] propname Property name
+ *
+ *  @retval  0 Property not present.
+ *  @retval  1 Property is present.
+ */
+int rtems_ofw_has_prop(
+  phandle_t    node,
+  const char  *propname
+);
+
+/**
+ * @brief Searches for property @a propname in @a node.
+ * 
+ * Searches the node and its parent recursively for the property and fills the
+ * buffer with the first found value.
+ *
+ * @param[in] node Node offset
+ * @param[in] propname Property name
+ * @param[out] buf The property value gets stored in this buffer (Pre-allocated)
+ * @param[in] len Length of the buffer
+ *
+ * @retval  Length of the property if property is found.
+ * @retval  -1 Property is not found.
+ */
+size_t rtems_ofw_search_prop(
+  phandle_t    node,
+  const char  *propname,
+  void        *buf,
+  size_t       len
+);
+
+/**
+ * @brief Searches for property @a propname in @a node.
+ * 
+ * Searches the node and its parent recursively for the property and fills the 
+ * buffer with the first value found after converting it to the endianness of
+ * the host.
+ *
+ * @param[in] node Node offset
+ * @param[in] propname Property name
+ * @param[out] buf The property value gets stored in this buffer(Pre-allocated)
+ * after converted to the host's endianness
+ * @param[in] len Length of the buffer
+ *
+ * @retval  Length of the property if property is found.
+ * @retval  -1 Property is not found.
+ */
+size_t rtems_ofw_search_enc_prop(
+  phandle_t    node,
+  const char  *propname,
+  pcell_t     *buf,
+  size_t       len
+);
+
+/**
+ * @brief Gets the value of property mentioned in @a propname.
+ *
+ * Same as rtems_ofw_getprop, but the @a buf is allocated in this routine and
+ * the user is responsible for freeing it.
+ * 
+ * @param[in] node Node offset
+ * @param[in] propname Property name
+ * @param[out] buf The buffer is allocated in this routine and user is
+ * responsible for freeing.
+ *
+ * @retval  -1 Property is not found.
+ * @retval  Length of the property if property is found.
+ */
+size_t rtems_ofw_get_prop_alloc(
+  phandle_t    node,
+  const char  *propname,
+  void       **buf
+);
+
+/**
+ * @brief Gets multiple values of the property @a propname.
+ * 
+ * Same as rtems_ofw_getprop_alloc but it can read properties with multiple
+ * values.
+ * For eg: reg = <0x1000 0x10 0x2000 0x20>
+ *
+ * @param[in] node Node offset
+ * @param[in] propname Property name
+ * @param[in] elsz Size of the single value
+ * @param[out] buf The buffer is allocated in this routine and user is
+ * responsible for freeing.
+ *
+ * @retval  -1 Property is not found.
+ * @retval   Number of values read.
+ */
+size_t rtems_ofw_get_prop_alloc_multi(
+  phandle_t    node,
+  const char  *propname,
+  int          elsz,
+  void       **buf
+);
+
+/**
+ * @brief Gets the value of property mentioned in @a propname.
+ * 
+ * Same as rtems_ofw_getprop_alloc but the value stored in the buffer is
+ * converted into the host's endianness.
+ *
+ * @param[in] node Node offset
+ * @param[in] propname Property name
+ * @param[out] buf The buffer is allocated in this routine and user is
+ * responsible for freeing.
+ *
+ * @retval  -1 Property is not found.
+ * @retval  Length of the property if property is found.
+ */
+size_t rtems_ofw_get_enc_prop_alloc(
+  phandle_t    node,
+  const char  *propname,
+  void       **buf
+);
+
+/**
+ * @brief Gets multiple values of the property @a propname.
+ *
+ * Same as rtems_ofw_getprop_alloc_multi but the values stored in the buffer
+ * are converted to the host's endianness.
+ * 
+ * @param[in] node Node offset
+ * @param[in] propname Property name
+ * @param[in] elsz Size of the single value
+ * @param[out] buf The buffer is allocated in this routine and user is
+ * responsible for freeing.
+ *
+ * @retval  -1 Property is not found.
+ * @retval   Number of values read.
+ */
+size_t rtems_ofw_get_enc_prop_alloc_multi(
+  phandle_t     node,
+  const char   *propname,
+  int           elsz,
+  void        **buf
+);
+
+/**
+ * @brief Free's the buffers allocated by the rtems_ofw_*_alloc functions.
+ *
+ * @param[in] buf Buffer to be freed
+ */
+void rtems_ofw_free(
+  void   *buf
+);
+
+/**
+ * @brief Finds the next property of @a node.
+ * 
+ * Finds the next property of the node and when @a propname is NULL it returns
+ * the value in the first property.
+ *
+ * @param[in] node Node offset
+ * @param[in] previous Previous property name
+ * @param[out] buf The value of the next property gets stored in this buffer
+ * (Pre-allocated)
+ * @param[in] len Length of the buffer
+ *
+ * @retval  -1 node or previous property does not exist
+ * @retval   0 no more properties
+ * @retval   1 success
+ */
+int rtems_ofw_next_prop(
+  phandle_t    node,
+  const char  *previous,
+  char        *buf,
+  size_t       len
+);
+
+/**
+ * @brief Sets the property @name of @a node to @a buf.
+ *
+ * @param[in] node Node offset
+ * @param[in] name Property name
+ * @param[in] buf Buffer contains the value to be set.
+ * @param[in] len Length of the buffer
+ *
+ * @retval  -1 node does not exist
+ * @retval   0 on success
+ * @retval   libFDT error codes on unsuccessful setting operation
+ */
+int rtems_ofw_set_prop(
+  phandle_t    node,
+  const char  *name,
+  const void  *buf,
+  size_t       len
+);
+
+/**
+ * @brief Converts a device specifier to a fully qualified path name.
+ *
+ * @param[in] dev device specifier
+ * @param[out] buf The path is filled into the buffer(Pre-allocated)
+ * @param[in] length of the buffer
+ *
+ * @retval  -1 always. Unimplemented.
+ */
+size_t rtems_ofw_canon(
+  const char  *dev,
+  char        *buf,
+  size_t       len
+);
+
+/**
+ * @brief Finds the node at the given path
+ *
+ * @param[in] path to the node from root
+ *
+ * @retval  -1 node does not exist
+ * @retval   node handle on success
+ */
+phandle_t rtems_ofw_find_device(
+  const char  *path
+);
+
+/**
+ * @brief This routine converts effective phandle @a xref to node offset.
+ *
+ * @param[in] xref Node phandle
+ *
+ * @retval Node offset on success
+ * @retval Node phandle on failure
+ */
+phandle_t rtems_ofw_node_from_xref(
+  phandle_t   xref
+);
+
+/**
+ * @brief This routine converts node offset to effective phandle of @a node.
+ *
+ * @retval Node phandle on success
+ * @retval Node offset on failure
+ */
+phandle_t rtems_ofw_xref_from_node(
+  phandle_t   node
+);
+
+/*
+ * instance handles(ihandle_t) as same as phandles in the FDT implementation
+ * of OF interface.
+ */
+
+/**
+ * @brief Converts @a instance handle to phandle.
+ *
+ * instance are same as node offsets in FDT.
+ * 
+ * @param[in] instance Node offset
+ * 
+ * @retval phandle of node on success.
+ * @retval instance of node on failure.
+ */
+phandle_t rtems_ofw_instance_to_package(
+  ihandle_t   instance
+);
+
+/**
+ * @brief Find the node's path from phandle.
+ * 
+ * @param[in] node Node offset
+ * @param[out] buf Path is filled into this buffer(Pre-allocated).
+ * @param[in] len Length of the buffer.
+ *
+ * @retval -1 always. Unimplemented.
+ */
+size_t rtems_ofw_package_to_path(
+  phandle_t   node,
+  char       *buf,
+  size_t      len
+);
+
+/**
+ * @brief Find the node's path from ihandle.
+ * 
+ * @param[in] instance Node offset
+ * @param[out] buf Path is filled into this buffer(Pre-allocated).
+ * @param[in] len Length of the buffer.
+ *
+ * @retval -1 always. Unimplemented.
+ */
+size_t rtems_ofw_instance_to_path(
+  ihandle_t  instance,
+  char      *buf,
+  size_t     len
+);
+
+/**
+ * @brief Queries the node's reg value.
+ *
+ * This routine fills the buffer @a buf with the values in reg property of node
+ * @a node. It reads all the values of the property and fills the buffer to max
+ * size.
+ * This routine is local to RTEMS OFW and does not have an corresponding
+ * FreeBSD OFW pair.
+ *
+ * @param[in] node Node offset
+ * @param[out] buf Register values are stored in this buffer(Pre-allocated).
+ * @param[in] size Length of the buffer.
+ *
+ * @retval -1 If reg property is missing.
+ * @retval  Length of the reg property in bytes.
+ */
+int rtems_ofw_get_reg(
+  phandle_t              node,
+  rtems_ofw_memory_area *buf,
+  size_t                 size
+);
+
+/**
+ * @brief Queries the node's interrupt value.
+ *
+ * This routine fills the buffer @a buf with the interrupt number. In case of
+ * multiple numbers it fills the buffer to its full extent.
+ * This routine is local to RTEMS OFW and does not have an corresponding
+ * FreeBSD OFW pair.
+ *
+ * @param[in] node Node offset
+ * @param[out] buf Interrupt values are stored in this buffer(Pre-allocated).
+ * @param[in] size Length of the buffer.
+ *
+ * @retval -1 If interrupts property is missing.
+ * @retval  Length of the interrupts property in bytes.
+ */
+int rtems_ofw_get_interrupts(
+  phandle_t node,
+  void     *buf,
+  size_t    size
+);
+
+/**
+ * @brief Queries the node's status.
+ *
+ * This routine is local to RTEMS OFW and does not have an corresponding
+ * FreeBSD OFW pair.
+ *
+ * @param[in] node Node offset
+ *
+ * @retval true  Status is OK or empty.
+ * @retval false Status is not OK or missing.
+ */
+bool rtems_ofw_node_status( phandle_t node );
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* _OFW_H */
\ No newline at end of file
diff --git a/bsps/shared/ofw/ofw.c b/bsps/shared/ofw/ofw.c
new file mode 100644
index 0000000000..57423e62fc
--- /dev/null
+++ b/bsps/shared/ofw/ofw.c
@@ -0,0 +1,654 @@
+/* SPDX-License-Identifier: BSD-2-Clause */
+
+/**
+ * @file
+ *
+ * @ingroup ofw
+ */
+
+/*
+ * Copyright (C) 2020 Niteesh Babu G S <niteesh.gs at gmail.com>
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+ * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+ * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+ * POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <bsp/fdt.h>
+#include <sys/param.h>
+#include <ofw/ofw.h>
+#include <libfdt.h>
+#include <assert.h>
+#include <rtems/sysinit.h>
+
+const void *fdtp = NULL;
+
+static phandle_t rtems_fdt_offset_to_phandle( int offset )
+{
+  if (offset < 0) {
+    return 0;
+  }
+
+  return (phandle_t)offset + fdt_off_dt_struct(fdtp);
+}
+
+static int rtems_fdt_phandle_to_offset( phandle_t handle )
+{
+  int off;
+  int fdt_off;
+
+  off = (int) handle;
+  fdt_off = fdt_off_dt_struct(fdtp);
+
+  if (off < fdt_off) {
+    return -1;
+
+  }
+
+  return off - fdt_off;
+}
+
+static void rtems_ofw_init( void ) {
+  int rv;
+  const void *fdt;
+  
+  fdt = bsp_fdt_get();
+
+  rv = fdt_check_header(fdt);
+
+  /*
+   * Is assert a good option to handle error?
+   * AFIAK there is no other way to recover from invalid FDT.
+   * On providing an invalid FDT most driver's will fail/crash anyway.
+   */
+  assert(rv == 0);
+
+  fdtp = fdt;
+}
+
+RTEMS_SYSINIT_ITEM(
+  rtems_ofw_init,
+  RTEMS_SYSINIT_BSP_PRE_DRIVERS,
+  RTEMS_SYSINIT_ORDER_FIRST
+);
+
+phandle_t rtems_ofw_peer( phandle_t node )
+{
+  int offset;
+
+  if (node == 0) {
+    int root = fdt_path_offset(fdtp, "/");
+    return rtems_fdt_offset_to_phandle(root);
+  }
+
+  offset = rtems_fdt_phandle_to_offset(node);
+  if (offset < 0) {
+    return 0;
+  }
+
+  offset = fdt_next_subnode(fdtp, offset);
+  return rtems_fdt_offset_to_phandle(offset);
+}
+
+phandle_t rtems_ofw_child( phandle_t node )
+{
+  int offset;
+
+  offset = rtems_fdt_phandle_to_offset(node);
+
+  if (offset < 0) {
+    return 0;
+  }
+
+  offset = fdt_first_subnode(fdtp, offset);
+  return rtems_fdt_offset_to_phandle(offset);
+}
+
+phandle_t rtems_ofw_parent( phandle_t node )
+{
+  int offset;
+
+  offset = rtems_fdt_phandle_to_offset(node);
+
+  if (offset < 0) {
+    return 0;
+  }
+
+  offset = fdt_parent_offset(fdtp, offset);
+  return rtems_fdt_offset_to_phandle(offset);
+}
+
+size_t rtems_ofw_get_prop_len(
+  phandle_t node,
+  const char *propname
+)
+{
+  int offset;
+  int len;
+  const void *prop;
+
+  offset = rtems_fdt_phandle_to_offset(node);
+
+  if (offset < 0) {
+    return -1;
+  }
+
+  prop = fdt_getprop(fdtp, offset, propname, &len);
+
+  if (prop == NULL && strcmp(propname, "name") == 0) {
+    fdt_get_name(fdtp, offset, &len);
+    return len + 1;
+  }
+
+  if (prop == NULL && strcmp(propname, "/chosen") == 0) {
+    if (strcmp(propname, "fdtbootcpu") == 0)
+      return sizeof(pcell_t);
+    if (strcmp(propname, "fdtmemreserv") == 0)
+      return 2 * sizeof(uint64_t) * fdt_num_mem_rsv(fdtp);
+  }
+
+  if (prop == NULL) {
+    return -1;
+  }
+
+  return len;
+}
+
+size_t rtems_ofw_get_prop(
+  phandle_t    node,
+  const char  *propname,
+  void        *buf,
+  size_t       bufsize
+)
+{
+  int offset;
+  int len;
+  const void *prop;
+
+  offset = rtems_fdt_phandle_to_offset(node);
+
+  if (offset < 0) {
+    return -1;
+  }
+
+  prop = fdt_getprop(fdtp, offset, propname, &len);
+
+  if (prop == NULL && strcmp(propname, "name") == 0) {
+    fdt_get_name(fdtp, offset, &len);
+    return len + 1;
+  }
+
+  if (prop == NULL && strcmp(propname, "/chosen") == 0) {
+    if (strcmp(propname, "fdtbootcpu") == 0)
+      return sizeof(pcell_t);
+    if (strcmp(propname, "fdtmemreserv") == 0)
+      return 2 * sizeof(uint64_t) * fdt_num_mem_rsv(fdtp);
+  }
+
+  if (prop == NULL) {
+    return -1;
+  }
+
+  bcopy(prop, buf, MIN(len, bufsize));
+
+  return len;
+}
+
+size_t rtems_ofw_get_enc_prop(
+  phandle_t    node,
+  const char  *prop,
+  pcell_t     *buf,
+  size_t       len
+)
+{
+  size_t rv;
+
+  assert(len % 4 == 0);
+  rv = rtems_ofw_get_prop(node, prop, buf, len);
+
+  if (rv < 0) {
+    return rv;
+  }
+
+  for (int i = 0; i < (len / 4); i++) {
+    buf[i] = fdt32_to_cpu(buf[i]);
+  }
+
+  return rv;
+}
+
+int rtems_ofw_has_prop(
+  phandle_t    node,
+  const char  *propname
+)
+{
+  size_t rv;
+
+  rv = rtems_ofw_get_prop_len(node, propname);
+  return rv >= 0 ? 1 : 0;
+}
+
+size_t rtems_ofw_search_prop(
+  phandle_t    node,
+  const char  *propname,
+  void        *buf,
+  size_t       len
+)
+{
+  size_t rv;
+
+  for (; node != 0; node = rtems_ofw_parent(node)) {
+    if ((rv = rtems_ofw_get_prop(node, propname, buf, len) != -1)) {
+      return rv;
+    }
+  }
+
+  return -1;
+}
+
+size_t rtems_ofw_search_enc_prop(
+  phandle_t    node,
+  const char  *propname,
+  pcell_t     *buf,
+  size_t       len
+)
+{
+  size_t rv;
+
+  for (; node != 0; node = rtems_ofw_parent(node)) {
+    if ((rv = rtems_ofw_get_enc_prop(node, propname, buf, len) != -1)) {
+      return rv;
+    }
+  }
+
+  return -1;
+}
+
+size_t rtems_ofw_get_prop_alloc(
+  phandle_t    node,
+  const char  *propname,
+  void       **buf
+)
+{
+  size_t len;
+
+  if ((len = rtems_ofw_get_prop_len(node, propname)) == -1) {
+    return -1;
+  }
+
+  *buf = NULL;
+
+  if (len > 0) {
+    *buf = malloc(len);
+
+    if (rtems_ofw_get_prop(node, propname, *buf, len) == -1) {
+      rtems_ofw_free(buf);
+      *buf = NULL;
+      return -1;
+    }
+  }
+
+  return len;
+}
+
+size_t rtems_ofw_get_prop_alloc_multi(
+  phandle_t    node,
+  const char  *propname,
+  int          elsz,
+  void       **buf
+)
+{
+  size_t len;
+
+  if ((len = rtems_ofw_get_prop_len(node, propname)) == -1 ||
+      (len % elsz != 0)) {
+    return -1;
+  }
+
+  *buf = NULL;
+
+  if (len > 0) {
+    *buf = malloc(len);
+
+    if (rtems_ofw_get_prop(node, propname, *buf, len) == -1) {
+      rtems_ofw_free(buf);
+      *buf = NULL;
+      return -1;
+    }
+  }
+
+  return (len / elsz);
+}
+
+size_t rtems_ofw_get_enc_prop_alloc(
+  phandle_t    node,
+  const char  *propname,
+  void       **buf
+)
+{
+  size_t len;
+
+  if ((len = rtems_ofw_get_prop_len(node, propname)) == -1) {
+    return -1;
+  }
+
+  *buf = NULL;
+
+  if (len > 0) {
+    *buf = malloc(len);
+
+    if (rtems_ofw_get_enc_prop(node, propname, *buf, len) == -1) {
+      rtems_ofw_free(buf);
+      *buf = NULL;
+      return -1;
+    }
+  }
+
+  return len;
+}
+
+size_t rtems_ofw_get_enc_prop_alloc_multi(
+  phandle_t     node,
+  const char   *propname,
+  int           elsz,
+  void        **buf
+)
+{
+  size_t len;
+
+  if ((len = rtems_ofw_get_prop_len(node, propname)) == -1 ||
+      (len % elsz != 0)) {
+    return -1;
+  }
+
+  *buf = NULL;
+
+  if (len > 0) {
+    *buf = malloc(len);
+
+    if (rtems_ofw_get_enc_prop(node, propname, *buf, len) == -1) {
+      rtems_ofw_free(buf);
+      *buf = NULL;
+      return -1;
+    }
+  }
+
+  return (len / elsz);
+}
+
+void rtems_ofw_free( void *buf )
+{
+  free(buf);
+}
+
+int rtems_ofw_next_prop(
+  phandle_t    node,
+  const char  *previous,
+  char        *buf,
+  size_t       len
+)
+{
+  const void *name;
+  const void *prop;
+  int offset;
+
+  offset = rtems_fdt_phandle_to_offset(node);
+
+  if (offset < 0) {
+    return -1;
+  }
+
+  if (previous == NULL) {
+    offset = fdt_first_property_offset(fdtp, offset);
+  } else {
+    fdt_for_each_property_offset(offset, fdtp, offset) {
+      prop = fdt_getprop_by_offset(fdtp, offset, (const char **)&name, NULL);
+      if (prop == NULL)
+        return -1;
+
+      if (strcmp(previous, name) != 0)
+        continue;
+
+      offset = fdt_next_property_offset(fdtp, offset);
+      break;
+    }
+  }
+
+  if (offset < 0)
+    return 0;
+
+  prop = fdt_getprop_by_offset(fdtp, offset, (const char **)&name, &offset);
+  if (prop == NULL)
+    return -1;
+
+  strncpy(buf, name, len);
+
+  return 1;
+}
+
+int rtems_ofw_set_prop(
+  phandle_t    node,
+  const char  *name,
+  const void  *buf,
+  size_t       len
+)
+{
+  int offset;
+
+  offset = rtems_fdt_phandle_to_offset(node);
+
+  if (offset < 0)
+    return -1;
+
+  if (fdt_setprop_inplace(fdtp, offset, name, buf, len) != 0)
+    return (fdt_setprop(fdtp, offset, name, buf, len));
+
+  return 0;
+}
+
+phandle_t rtems_ofw_find_device( const char *path )
+{
+  int offset;
+
+  offset = fdt_path_offset(fdtp, path);
+  if (offset < 0)
+    return -1;
+
+  return rtems_fdt_offset_to_phandle(offset);
+}
+
+static phandle_t rtems_ofw_get_effective_phandle(
+  phandle_t node,
+  phandle_t xref
+)
+{
+  phandle_t child;
+  phandle_t ref;
+
+  for (child = rtems_ofw_child(node); child != 0; child = rtems_ofw_peer(node)) {
+    ref = rtems_ofw_get_effective_phandle(child, xref);
+    if (ref != -1)
+      return ref;
+
+    if (rtems_ofw_get_enc_prop(child, "phandle", &ref, sizeof(ref)) == -1 &&
+        rtems_ofw_get_enc_prop(child, "ibm,phandle", &ref, sizeof(ref)) == -1 &&
+        rtems_ofw_get_enc_prop(child, "linux,phandle", &ref, sizeof(ref)) == -1
+    ) {
+      continue;
+    }
+
+    if (ref == xref)
+      return child;
+  }
+
+  return -1;
+}
+
+phandle_t rtems_ofw_node_from_xref( phandle_t xref )
+{
+  phandle_t node;
+
+  if ((node = rtems_ofw_get_effective_phandle(rtems_ofw_peer(0), xref)) == -1)
+    return xref;
+
+  return node;
+}
+
+phandle_t rtems_ofw_xref_from_node( phandle_t node )
+{
+  phandle_t ref;
+
+    if (rtems_ofw_get_enc_prop(node, "phandle", &ref, sizeof(ref)) == -1 &&
+        rtems_ofw_get_enc_prop(node, "ibm,phandle", &ref, sizeof(ref)) == -1 &&
+        rtems_ofw_get_enc_prop(node, "linux,phandle", &ref, sizeof(ref)) == -1)
+    {
+      return node;
+    }
+
+    return ref;
+}
+
+phandle_t rtems_ofw_instance_to_package( ihandle_t instance )
+{
+  return rtems_ofw_node_from_xref(instance);
+}
+
+size_t rtems_ofw_package_to_path(
+  phandle_t   node,
+  char       *buf,
+  size_t      len
+)
+{
+  int offset;
+  int rv;
+
+  offset = rtems_fdt_phandle_to_offset(node);
+
+  rv = fdt_get_path(fdtp, offset, buf, len);
+  if (rv != 0)
+    return -1;
+
+  return rv;
+}
+
+size_t rtems_ofw_instance_to_path(
+  ihandle_t  instance,
+  char      *buf,
+  size_t     len
+)
+{
+  int offset;
+  int rv;
+
+  offset = rtems_ofw_instance_to_package(instance);
+  offset = rtems_fdt_phandle_to_offset(offset);
+
+  rv = fdt_get_path(fdtp, offset, buf, len);
+  if (rv != 0)
+    return -1;
+
+  return rv;
+}
+
+int rtems_ofw_get_reg(
+  phandle_t              node,
+  rtems_ofw_memory_area *buf,
+  size_t                 size
+)
+{
+  int len;
+  int offset;
+  int nranges;
+  int nregs;
+  phandle_t parent;
+  rtems_ofw_ranges range;
+  const rtems_ofw_ranges *ptr;
+
+  len = rtems_ofw_get_enc_prop(node, "reg", (pcell_t *)buf, size);
+  if (len <= 0) {
+    return len;
+  }
+
+  nregs = MIN(len, size) / sizeof(rtems_ofw_memory_area);
+
+  for (parent = rtems_ofw_parent(node); parent > 0;
+      parent = rtems_ofw_parent(parent)) {
+
+    offset = rtems_fdt_phandle_to_offset(parent);
+    ptr = fdt_getprop(fdtp, offset, "ranges", &len);
+
+    if (len < 0) {
+      break;
+    }
+
+    nranges = len / sizeof(rtems_ofw_ranges);
+
+    offset = 0;
+    for (int i=0; i < nregs; i++) {
+      for (int j=0; j < nranges; j++) {
+        
+        range.parent_bus = fdt32_to_cpu(ptr[j].parent_bus);
+        range.child_bus = fdt32_to_cpu(ptr[j].child_bus);
+        range.size = fdt32_to_cpu(ptr[j].size);
+
+        if (buf[i].start >= range.child_bus &&
+            buf[i].start < range.child_bus + range.size) {
+          offset = range.parent_bus - range.child_bus;
+          break;
+        }
+
+      }
+      buf[i].start += offset;
+    }
+  }
+
+  return nregs;
+}
+
+int rtems_ofw_get_interrupts(
+  phandle_t node,
+  void     *buf,
+  size_t    size
+)
+{
+  int rv;
+
+  rv = rtems_ofw_get_enc_prop(node, "interrupts", buf, size);
+  return rv;
+}
+
+bool rtems_ofw_node_status( phandle_t node )
+{
+  int len;
+  const char buf[10];
+
+  len = rtems_ofw_get_prop(node, "status", &buf[0], sizeof(buf));
+  if ((len == -1) ||
+      (strncmp(buf, "okay", MIN(5, len)) == 0) ||
+      (strncmp(buf, "ok", MIN(3, len)) == 0)) {
+      return true;
+  }
+
+  return false;
+}
diff --git a/spec/build/bsps/obj.yml b/spec/build/bsps/obj.yml
index 8809238057..141ba25f5e 100644
--- a/spec/build/bsps/obj.yml
+++ b/spec/build/bsps/obj.yml
@@ -24,6 +24,9 @@ install:
   - bsps/include/bsp/u-boot.h
   - bsps/include/bsp/uart-output-char.h
   - bsps/include/bsp/utility.h
+- destination: ${BSP_INCLUDEDIR}/ofw
+  source:
+  - bsps/include/ofw/ofw.h
 - destination: ${BSP_INCLUDEDIR}/libchip
   source:
   - bsps/include/libchip/am29lv160.h
@@ -104,4 +107,5 @@ source:
 - bsps/shared/dev/serial/z85c30_reg.c
 - bsps/shared/start/bootcard.c
 - bsps/shared/rtems-version.c
+- bsps/shared/ofw/ofw.c
 type: build
-- 
2.17.1



More information about the devel mailing list