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

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

Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

1

;;; rustls/types.lisp --- Rustls FFI Types

2

3

;;

4

5

;;; Code:

6

(in-package :aws-lc)

7

8

(define-alien-type asn1-string

9

(struct asn1-string-st

10

(length int)

11

(type int)

12

(data (* unsigned-char))

13

(flags long)))

14

15

(define-alien-enum (v-asn1 int)

16

:universal #x00

17

:application #x40

18

:context-specific #x80

19

:private #xc0

20

:constructed #x20

21

:primitive-tag #x1f

22

:max-universal #xff

23

:undef -1

24

:other -3

25

:any -4

26

:eoc 0

27

:boolean 1

28

:integer 2

29

:bit-string 3

30

:octet-string 4

31

:null 5

32

:object 6

33

:object-descriptor 7

34

:external 8

35

:real 9

36

:enumerated 10

37

:utf8string 12

38

:sequence 16

39

:set 17

40

:numericstring 18

41

:printablestring 19

42

:t61string 20

43

:teletexstring 20

44

:videotexstring 21

45

:ia5string 22

46

:utftime 23

47

:generalizedtime 24

48

:graphicstring 25

49

:iso64string 26

50

:visiblestring 26

51

:universalstring 28

52

:bmpstring 30

53

:neg #x100

54

:neg-integer (logior 2 #x100)

55

:neg-enumerated (logior 10 #x100))

56

57

(define-opaque x509)

58

59

(define-alien-enum (err-lib int)

60

:none 1

61

:sys 2

62

:bn 3

63

:rsa 4

64

:dh 5

65

:evp 6

66

:buf 7

67

:obj 8

68

:pem 9

69

:dsa 10

70

:x509 11

71

:asn1 12

72

:conf 13

73

:crypto 14

74

:ec 15

75

:ssl 16

76

:bio 17

77

:pkcs7 18

78

:pkcs8 19

79

:x509v3 20

80

:rand 21

81

:engine 22

82

:ocsp 23

83

:ui 24

84

:comp 25

85

:ecdsa 26

86

:ecdh 27

87

:hmac 28

88

:digest 29

89

:cipher 30

90

:hkdf 31

91

:trust-token 32

92

:user 33

93

:libs 34

94

:pkcs12 35

95

:dso 36

96

:ossl-store 37

97

:fips 38

98

:cms 39

99

:ts 40

100

:ct 41

101

:async 42

102

:kdf 43

103

:sm2 44)