WIP: add additional crypto functions using PSA API

src/libAtomVM/globalcontext.c

@@ -32,6 +32,7 @@
 #include "interop.h"
 #include "list.h"
 #include "mailbox.h"
+#include "otp_crypto.h"
 #include "posix_nifs.h"
 #include "refc_binary.h"
 #include "resources.h"
@@ -161,6 +162,48 @@ GlobalContext *globalcontext_new(void)
     }
 #endif
 
+#ifdef MBEDTLS_PSA_CRYPTO_C
+    glb->psa_hash_op_resource_type = enif_init_resource_type(&env, "psa_hash_op", &psa_hash_op_resource_type_init, ERL_NIF_RT_CREATE, NULL);
+    if (IS_NULL_PTR(glb->psa_hash_op_resource_type)) {
+#if HAVE_OPEN && HAVE_CLOSE
+        resource_type_destroy(glb->posix_fd_resource_type);
+#endif
+#ifndef AVM_NO_SMP
+        smp_rwlock_destroy(glb->modules_lock);
+#endif
+        free(glb->modules_table);
+        atom_table_destroy(glb->atom_table);
+        free(glb);
+        return NULL;
+    }
+    glb->psa_cipher_op_resource_type = enif_init_resource_type(&env, "psa_cipher_op", &psa_cipher_op_resource_type_init, ERL_NIF_RT_CREATE, NULL);
+    if (IS_NULL_PTR(glb->psa_cipher_op_resource_type)) {
+#if HAVE_OPEN && HAVE_CLOSE
+        resource_type_destroy(glb->posix_fd_resource_type);
+#endif
+#ifndef AVM_NO_SMP
+        smp_rwlock_destroy(glb->modules_lock);
+#endif
+        free(glb->modules_table);
+        atom_table_destroy(glb->atom_table);
+        free(glb);
+        return NULL;
+    }
+    glb->psa_mac_op_resource_type = enif_init_resource_type(&env, "psa_mac_op", &psa_mac_op_resource_type_init, ERL_NIF_RT_CREATE, NULL);
+    if (IS_NULL_PTR(glb->psa_mac_op_resource_type)) {
+#if HAVE_OPEN && HAVE_CLOSE
+        resource_type_destroy(glb->posix_fd_resource_type);
+#endif
+#ifndef AVM_NO_SMP
+        smp_rwlock_destroy(glb->modules_lock);
+#endif
+        free(glb->modules_table);
+        atom_table_destroy(glb->atom_table);
+        free(glb);
+        return NULL;
+    }
+#endif
+
     sys_init_platform(glb);
 
 #ifndef AVM_NO_SMP

src/libAtomVM/globalcontext.h

@@ -42,6 +42,15 @@
 #include "timer_list.h"
 #include "valueshashtable.h"
 
+#ifdef ATOMVM_HAS_MBEDTLS
+#include <mbedtls/version.h>
+#if defined(MBEDTLS_VERSION_NUMBER) && (MBEDTLS_VERSION_NUMBER >= 0x03000000)
+#include <mbedtls/build_info.h>
+#else
+#include <mbedtls/config.h>
+#endif
+#endif
+
 #ifdef __cplusplus
 extern "C" {
 #endif
@@ -179,6 +188,12 @@ struct GlobalContext
     ErlNifResourceType *posix_dir_resource_type;
 #endif
 
+#ifdef MBEDTLS_PSA_CRYPTO_C
+    ErlNifResourceType *psa_hash_op_resource_type;
+    ErlNifResourceType *psa_cipher_op_resource_type;
+    ErlNifResourceType *psa_mac_op_resource_type;
+#endif
+
     void *platform_data;
 };