Coverage report: /home/ellis/comp/ext/ironclad/src/public-key/elliptic-curve.lisp

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

Key

Not instrumented

Conditionalized out

Executed

Not executed

Both branches taken

One branch taken

Neither branch taken

1

;;;; elliptic-curve.lisp

2

(in-package :crypto)

3

4

(defgeneric ec-point-on-curve-p (p)

5

(:documentation "Return T if the point P is on the curve."))

6

7

(defgeneric ec-point-equal (p q)

8

(:documentation "Return T if P and Q represent the same point."))

9

10

(defgeneric ec-double (p)

11

(:documentation "Return the point 2P."))

12

13

(defgeneric ec-add (p q)

14

(:documentation "Return the point P + Q."))

15

16

(defgeneric ec-scalar-mult (p e)

17

(:documentation "Return the point e * P."))

18

19

(defgeneric ec-scalar-inv (kind n)

20

(:documentation "Return the modular inverse of N."))

21

22

(defgeneric ec-make-point (kind &key &allow-other-keys)

23

(:documentation "Return a point of KIND, initialized according to the

24

specified coordinates."))

25

26

(defgeneric ec-destructure-point (p)

27

(:documentation "Return a plist containing the coordinates of the point P."))

28

29

(defgeneric ec-encode-scalar (kind n)

30

(:documentation "Return an octet vector representing the integer N."))

31

32

(defgeneric ec-decode-scalar (kind octets)

33

(:documentation "Return the integer represented by the OCTETS."))

34

35

(defgeneric ec-encode-point (p)

36

(:documentation "Return an octet vector representing the point P."))

37

38

(defgeneric ec-decode-point (kind octets)

39

(:documentation "Return the point represented by the OCTETS."))