mutex for mbedtls

src/session.jl

@@ -6,10 +6,10 @@ module session
 export GoogleSession, authorize
 
 import Base: string, print, show
-using Dates, Base64 
+using Dates, Base64
 
 #using Requests
-using HTTP, HTTP.Messages 
+using HTTP, HTTP.Messages
 
 import JSON
 import MbedTLS
@@ -18,14 +18,20 @@ using ..error
 using ..credentials
 using ..root
 
+global mbedtlslock = ReentrantLock()
 """
     SHA256withRSA(message, key)
 
 Sign message using private key with RSASSA-PKCS1-V1_5-SIGN algorithm.
 """
-SHA256withRSA(message, key::MbedTLS.PKContext) = MbedTLS.sign(key, MbedTLS.MD_SHA256,
-    MbedTLS.digest(MbedTLS.MD_SHA256, message), MbedTLS.MersenneTwister(0)
-)
+function SHA256withRSA(message, key::MbedTLS.PKContext)
+    lock(mbedtlslock)
+    output = MbedTLS.sign(key, MbedTLS.MD_SHA256,
+                 MbedTLS.digest(MbedTLS.MD_SHA256, message), MbedTLS.MersenneTwister(0)
+                 )
+    unlock(mbedtlslock)
+    output
+end
 
 """
 GoogleSession(...)
@@ -141,7 +147,7 @@ function JWS(credentials::JSONCredentials, claimset::JWTClaimSet, header::JWTHea
     "$payload.$signature"
 end
 
-function token(credentials::JSONCredentials, 
+function token(credentials::JSONCredentials,
                scopes::AbstractVector{<: AbstractString})
     # construct claim-set from service account email and requested scopes
     claimset = JWTClaimSet(credentials.client_email, scopes)