(define-module (webid-oidc stubs)
  #:use-module (webid-oidc config)
  #:use-module (webid-oidc errors))

(load-extension
 (format #f "~a/libwebidoidc" libdir)
 "init_webidoidc")

(define (fix-base64-decode data)
  (catch 'base64-decoding-error
    (lambda ()
      (base64-decode data))
    (lambda error
      (raise-not-base64 data error))))

(export
 base64-encode
 (fix-base64-decode . base64-decode)
 random
 random-init!)