3rdparties/software/cl+ssl-20200427-git/src/package.lisp (2178 bytes)
1 ;;;; -*- Mode: LISP; Syntax: COMMON-LISP; indent-tabs-mode: nil; coding: utf-8; show-trailing-whitespace: t -*- 2 ;;; 3 ;;; Copyright (C) 2001, 2003 Eric Marsden 4 ;;; Copyright (C) 2005 David Lichteblau 5 ;;; "the conditions and ENSURE-SSL-FUNCALL are by Jochen Schmidt." 6 ;;; 7 ;;; See LICENSE for details. 8 9 #+xcvb (module (:depends-on ((:when (:featurep :sbcl) (:require :sb-posix))))) 10 11 (in-package :cl-user) 12 13 (defpackage :cl+ssl 14 (:use :common-lisp :trivial-gray-streams) 15 (:export #:*default-cipher-list* 16 #:ensure-initialized 17 #:reload 18 #:stream-fd 19 #:make-ssl-client-stream 20 #:*make-ssl-client-stream-verify-default* 21 #:make-ssl-server-stream 22 #:use-certificate-chain-file 23 #:random-bytes 24 ;; DEPRECATED. 25 ;; Use the (MAKE-SSL-CLIENT-STREAM .. :VERIFY ?) to enable/disable verification. 26 ;; MAKE-CONTEXT also allows to enab/disable verification. 27 #:ssl-check-verify-p 28 #:ssl-load-global-verify-locations 29 #:ssl-set-global-default-verify-paths 30 #:ssl-error-verify 31 #:ssl-error-stream 32 #:ssl-error-code 33 #:ssl-error-initialize 34 #:ssl-ctx-free 35 36 #:with-pem-password 37 38 #:+ssl-verify-none+ 39 #:+ssl-verify-peer+ 40 #:+ssl-verify-fail-if-no-peer-cert+ 41 #:+ssl-verify-client-once+ 42 43 #:+ssl-op-no-sslv2+ 44 #:+ssl-op-no-sslv3+ 45 #:+ssl-op-no-tlsv1+ 46 #:+ssl-op-no-tlsv1-1+ 47 #:+ssl-op-no-tlsv1-2+ 48 49 #:+ssl-sess-cache-off+ 50 #:+ssl-sess-cache-client+ 51 #:+ssl-sess-cache-server+ 52 #:+ssl-sess-cache-both+ 53 #:+ssl-sess-cache-no-auto-clear+ 54 #:+ssl-sess-cache-no-internal-lookup+ 55 #:+ssl-sess-cache-no-internal-store+ 56 #:+ssl-sess-cache-no-internal+ 57 58 #:make-context 59 #:with-global-context 60 61 ;; x509 stuff 62 #:decode-certificate-from-file 63 #:decode-certificate 64 #:ssl-stream-x509-certificate 65 66 ;; hostname-verification 67 #:verify-hostname))