ports/stm32: Add OpenAMP's remoteproc port.

iabdalkader · iabdalkader · commit ee3469bc7bf7 · 2023-11-20T10:06:57.000+01:00
Signed-off-by: iabdalkader &lt;i.abdalkader@gmail.com&gt;
diff --git a/ports/stm32/Makefile b/ports/stm32/Makefile
@@ -495,6 +495,9 @@ endif # MICROPY_PY_BLUETOOTH
 
 ifeq ($(MICROPY_PY_OPENAMP),1)
 SRC_C += metal/metal_port.c
+ifeq ($(MICROPY_PY_REMOTEPROC),1)
+SRC_C += mprprocport.c
+endif
 endif
 
 # SRC_O should be placed first to work around this LTO bug with binutils <2.35:
diff --git a/ports/stm32/mprprocport.c b/ports/stm32/mprprocport.c
@@ -0,0 +1,236 @@
+/*
+ * This file is part of the MicroPython project, http://micropython.org/
+ *
+ * The MIT License (MIT)
+ *
+ * Copyright (c) 2023 Arduino SA
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a copy
+ * of this software and associated documentation files (the "Software"), to deal
+ * in the Software without restriction, including without limitation the rights
+ * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+ * copies of the Software, and to permit persons to whom the Software is
+ * furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+ * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+ * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+ * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+ * THE SOFTWARE.
+ *
+ * modremoteproc stm32 port.
+ */
+#include <stdio.h>
+#include <stdint.h>
+
+#include "py/obj.h"
+#include "py/runtime.h"
+#include "py/gc.h"
+
+#include "metal/alloc.h"
+#include "metal/errno.h"
+#include "metal/io.h"
+#include "metal/sys.h"
+#include "metal/device.h"
+#include "metal/utilities.h"
+#include "openamp/remoteproc.h"
+#include "openamp/remoteproc_loader.h"
+
+#include "lib/oofatfs/ff.h"
+#include "lib/oofatfs/diskio.h"
+
+#include "extmod/vfs.h"
+#include "extmod/vfs_fat.h"
+
+#define debug_printf(...) mp_printf(&mp_plat_print, __VA_ARGS__)
+
+#define FILE_BUF_SIZE   (512)
+
+typedef struct filestore {
+    FIL fp;
+    uint8_t buf[FILE_BUF_SIZE];
+} filestore_t;
+
+static FATFS *lookup_path(const TCHAR **path) {
+    mp_vfs_mount_t *fs = mp_vfs_lookup_path(*path, path);
+    if (fs == MP_VFS_NONE || fs == MP_VFS_ROOT) {
+        return NULL;
+    }
+    // here we assume that the mounted device is FATFS
+    return &((fs_user_mount_t *)MP_OBJ_TO_PTR(fs->obj))->fatfs;
+}
+
+static int store_open(void *store, const char *path, const void **image_data) {
+    debug_printf("store_open(): %s\n", path);
+
+    filestore_t *fstore = store;
+
+    FATFS *fs = lookup_path(&path);
+    if (fs == NULL) {
+        return -EINVAL;
+    }
+
+    FRESULT res = f_open(fs, &fstore->fp, path, FA_READ);
+    if (res != FR_OK) {
+        return -EINVAL;
+    }
+
+    UINT n;
+    res = f_read(&fstore->fp, fstore->buf, FILE_BUF_SIZE, &n);
+    if (res != FR_OK || n != FILE_BUF_SIZE) {
+        return -EINVAL;
+    }
+    *image_data = fstore->buf;
+
+    return FILE_BUF_SIZE;
+}
+
+static void store_close(void *store) {
+    debug_printf("store_close()\n");
+    filestore_t *fstore = store;
+    f_close(&fstore->fp);
+    metal_free_memory(store);
+}
+
+static int store_load(void *store, size_t offset, size_t size,
+    const void **data, metal_phys_addr_t pa,
+    struct metal_io_region *io,
+    char is_blocking) {
+
+    filestore_t *fstore = store;
+    FRESULT res = f_lseek(&fstore->fp, offset);
+    if (res != FR_OK) {
+        return -EINVAL;
+    }
+
+    if (pa == METAL_BAD_PHYS) {
+        *data = fstore->buf;
+        size = size > FILE_BUF_SIZE ? FILE_BUF_SIZE : size;
+        debug_printf("store_load(): pa 0x%lx offset %u size %u \n", (uint32_t)pa, offset, size);
+    } else {
+        void *va = metal_io_phys_to_virt(io, pa);
+        if (va == NULL) {
+            return -EINVAL;
+        }
+        *data = va;
+        debug_printf("store_load(): pa 0x%lx va 0x%p offset %u size %u \n", (uint32_t)pa, va, offset, size);
+    }
+
+    UINT nread;
+    res = f_read(&fstore->fp, (void *)*data, size, &nread);
+    if (res != FR_OK) {
+        return -EINVAL;
+    }
+
+    return nread;
+}
+
+const struct image_store_ops mp_store_ops = {
+    .open = store_open,
+    .close = store_close,
+    .load = store_load,
+    .features = SUPPORT_SEEK,
+};
+
+static struct remoteproc *rproc_init(struct remoteproc *rproc,
+    const struct remoteproc_ops *ops, void *arg) {
+    debug_printf("rproc_init()\n");
+    rproc = rproc;
+    rproc->ops = ops;
+    rproc->priv = metal_allocate_memory(sizeof(filestore_t));
+    metal_list_init(&rproc->mems);
+    rproc->state = RPROC_READY;     // RPROC_OFFLINE to call config
+    return rproc;
+}
+
+static void *rproc_mmap(struct remoteproc *rproc, metal_phys_addr_t *pa,
+    metal_phys_addr_t *da, size_t size, unsigned int attribute,
+    struct metal_io_region **io) {
+    debug_printf("rproc_mmap(): pa 0x%p da 0x%p io 0x%p size %u\n", *pa, *da, *io, size);
+
+    struct remoteproc_mem *mem;
+    metal_phys_addr_t lpa = *pa;
+    metal_phys_addr_t lda = *da;
+
+    if (lda == METAL_BAD_PHYS) {
+        return NULL;
+    }
+
+    if (lpa == METAL_BAD_PHYS) {
+        lpa = lda;
+    }
+
+    mem = metal_allocate_memory(sizeof(*mem));
+    if (!mem) {
+        return NULL;
+    }
+
+    *io = metal_allocate_memory(sizeof(struct metal_io_region));
+    if (!*io) {
+        metal_free_memory(mem);
+        return NULL;
+    }
+
+    remoteproc_init_mem(mem, NULL, lpa, lda, size, *io);
+
+    metal_io_init(*io, (void *)mem->da, &mem->pa, size,
+        sizeof(metal_phys_addr_t) << 3, attribute, NULL);
+
+    remoteproc_add_mem(rproc, mem);
+    *pa = lpa;
+    *da = lda;
+    return metal_io_phys_to_virt(*io, mem->pa);
+}
+
+static int rproc_start(struct remoteproc *rproc) {
+    debug_printf("rproc_start()\n");
+    if (RCC->GCR & RCC_GCR_BOOT_C2) {
+        // CM4 core is already booted.
+        debug_printf("rproc_start(): CM4 core is already booted.\n");
+        return -1;
+    }
+
+    // Flush M7 cache.
+    struct metal_list *node;
+    metal_list_for_each(&rproc->mems, node) {
+        struct remoteproc_mem *mem;
+        mem = metal_container_of(node, struct remoteproc_mem, node);
+        SCB_CleanDCache_by_Addr((uint32_t *)mem->pa, mem->size);
+    }
+
+    HAL_PWREx_HoldCore(PWR_CORE_CPU2);
+    HAL_SYSCFG_CM4BootAddConfig(SYSCFG_BOOT_ADDR0, (uint32_t)rproc->bootaddr);
+    HAL_RCCEx_EnableBootCore(RCC_BOOT_C2);
+    return 0;
+}
+
+static int rproc_stop(struct remoteproc *rproc) {
+    debug_printf("rproc_stop()\n");
+    (void)rproc;
+    return 0;
+}
+
+static void rproc_remove(struct remoteproc *rproc) {
+    debug_printf("rproc_remove()\n");
+    (void)rproc;
+}
+
+static int rproc_shutdown(struct remoteproc *rproc) {
+    debug_printf("rproc_shutdown()\n");
+    (void)rproc;
+    return 0;
+}
+
+const struct remoteproc_ops mp_rproc_ops = {
+    .init = rproc_init,
+    .mmap = rproc_mmap,
+    .start = rproc_start,
+    .stop = rproc_stop,
+    .remove = rproc_remove,
+    .shutdown = rproc_shutdown,
+};
