Coverage report: /home/ellis/comp/core/ffi/aws-lc/pkg.lisp

Kind	Covered	All	%
expression	0	4	0.0
branch	0	0	nil

Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

1

;;; pkg.lisp --- low-level bindings to librustls

2

3

;;; Commentary:

4

5

;; ref: https://ffi.rustls.dev/

6

7

;; ref: https://docs.rs/rustls/latest/rustls/

8

9

;; ref: https://certifi.io/

10

11

;; ref: https://www.ccadb.org/resources

12

13

;; ccadb_url: https://ccadb.my.salesforce-sites.com/mozilla/IncludedCACertificateReportPEMCSV

14

15

;; mozilla exclusion? "9A296A5182D1D451A2E37F439B74DAAFA267523329F90F9A0D2007C334E23C9A"

16

17

;;; Code:

18

(defpackage :aws-lc

19

(:use :cl :sb-alien :std/alien)

20

(:export

21

:load-crypto :load-ssl

22

:v-asn1 :v-asn1*

23

:asn1-string

24

:asn1-utctime-check

25

:asn1-time-check

26

:asn1-string-free

27

:asn1-string-type

28

:asn1-string-length

29

:asn1-string-data

30

:d2i-x509

31

:aws-lc-c-error

32

:aws-lc-condition

33

:read-aws-lc-error-queue

34

:aws-lc-error-call))

35

36

(in-package :aws-lc)

37

38

(define-alien-loader crypto "/usr/local/lib/")

39

(define-alien-loader ssl "/usr/local/lib/")