diff options
| author | K. Handa | 2015-01-07 22:51:41 +0900 |
|---|---|---|
| committer | K. Handa | 2015-01-07 22:51:41 +0900 |
| commit | 88bc8332eb14bcc4780fd3fe3dd4de2205c31dbf (patch) | |
| tree | 18da116400703b67738bdbbd38cc4abf4c1e929f /src/gnutls.c | |
| parent | 3f79d3131629f73da16ec121d2a0056f11b70e65 (diff) | |
| parent | 95295df44cc2b6e0e2442aeff96b0fe2ceac405c (diff) | |
| download | emacs-88bc8332eb14bcc4780fd3fe3dd4de2205c31dbf.tar.gz emacs-88bc8332eb14bcc4780fd3fe3dd4de2205c31dbf.zip | |
Merge branch master of git.sv.gnu.org:/srv/git/emacs.
Diffstat (limited to 'src/gnutls.c')
| -rw-r--r-- | src/gnutls.c | 25 |
1 files changed, 3 insertions, 22 deletions
diff --git a/src/gnutls.c b/src/gnutls.c index f945778cc91..75fe6149a55 100644 --- a/src/gnutls.c +++ b/src/gnutls.c | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | /* GnuTLS glue for GNU Emacs. | 1 | /* GnuTLS glue for GNU Emacs. |
| 2 | Copyright (C) 2010-2014 Free Software Foundation, Inc. | 2 | Copyright (C) 2010-2015 Free Software Foundation, Inc. |
| 3 | 3 | ||
| 4 | This file is part of GNU Emacs. | 4 | This file is part of GNU Emacs. |
| 5 | 5 | ||
| @@ -35,28 +35,8 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ | |||
| 35 | 35 | ||
| 36 | static bool emacs_gnutls_handle_error (gnutls_session_t, int); | 36 | static bool emacs_gnutls_handle_error (gnutls_session_t, int); |
| 37 | 37 | ||
| 38 | static Lisp_Object Qgnutls_dll; | ||
| 39 | static Lisp_Object Qgnutls_code; | ||
| 40 | static Lisp_Object Qgnutls_anon, Qgnutls_x509pki; | ||
| 41 | static Lisp_Object Qgnutls_e_interrupted, Qgnutls_e_again, | ||
| 42 | Qgnutls_e_invalid_session, Qgnutls_e_not_ready_for_handshake; | ||
| 43 | static bool gnutls_global_initialized; | 38 | static bool gnutls_global_initialized; |
| 44 | 39 | ||
| 45 | /* The following are for the property list of `gnutls-boot'. */ | ||
| 46 | static Lisp_Object QCgnutls_bootprop_priority; | ||
| 47 | static Lisp_Object QCgnutls_bootprop_trustfiles; | ||
| 48 | static Lisp_Object QCgnutls_bootprop_keylist; | ||
| 49 | static Lisp_Object QCgnutls_bootprop_crlfiles; | ||
| 50 | static Lisp_Object QCgnutls_bootprop_callbacks; | ||
| 51 | static Lisp_Object QCgnutls_bootprop_loglevel; | ||
| 52 | static Lisp_Object QCgnutls_bootprop_hostname; | ||
| 53 | static Lisp_Object QCgnutls_bootprop_min_prime_bits; | ||
| 54 | static Lisp_Object QCgnutls_bootprop_verify_flags; | ||
| 55 | static Lisp_Object QCgnutls_bootprop_verify_error; | ||
| 56 | |||
| 57 | /* Callback keys for `gnutls-boot'. Unused currently. */ | ||
| 58 | static Lisp_Object QCgnutls_bootprop_callbacks_verify; | ||
| 59 | |||
| 60 | static void gnutls_log_function (int, const char *); | 40 | static void gnutls_log_function (int, const char *); |
| 61 | static void gnutls_log_function2 (int, const char *, const char *); | 41 | static void gnutls_log_function2 (int, const char *, const char *); |
| 62 | #ifdef HAVE_GNUTLS3 | 42 | #ifdef HAVE_GNUTLS3 |
| @@ -1656,13 +1636,14 @@ syms_of_gnutls (void) | |||
| 1656 | DEFSYM (Qgnutls_code, "gnutls-code"); | 1636 | DEFSYM (Qgnutls_code, "gnutls-code"); |
| 1657 | DEFSYM (Qgnutls_anon, "gnutls-anon"); | 1637 | DEFSYM (Qgnutls_anon, "gnutls-anon"); |
| 1658 | DEFSYM (Qgnutls_x509pki, "gnutls-x509pki"); | 1638 | DEFSYM (Qgnutls_x509pki, "gnutls-x509pki"); |
| 1639 | |||
| 1640 | /* The following are for the property list of 'gnutls-boot'. */ | ||
| 1659 | DEFSYM (QCgnutls_bootprop_hostname, ":hostname"); | 1641 | DEFSYM (QCgnutls_bootprop_hostname, ":hostname"); |
| 1660 | DEFSYM (QCgnutls_bootprop_priority, ":priority"); | 1642 | DEFSYM (QCgnutls_bootprop_priority, ":priority"); |
| 1661 | DEFSYM (QCgnutls_bootprop_trustfiles, ":trustfiles"); | 1643 | DEFSYM (QCgnutls_bootprop_trustfiles, ":trustfiles"); |
| 1662 | DEFSYM (QCgnutls_bootprop_keylist, ":keylist"); | 1644 | DEFSYM (QCgnutls_bootprop_keylist, ":keylist"); |
| 1663 | DEFSYM (QCgnutls_bootprop_crlfiles, ":crlfiles"); | 1645 | DEFSYM (QCgnutls_bootprop_crlfiles, ":crlfiles"); |
| 1664 | DEFSYM (QCgnutls_bootprop_callbacks, ":callbacks"); | 1646 | DEFSYM (QCgnutls_bootprop_callbacks, ":callbacks"); |
| 1665 | DEFSYM (QCgnutls_bootprop_callbacks_verify, "verify"); | ||
| 1666 | DEFSYM (QCgnutls_bootprop_min_prime_bits, ":min-prime-bits"); | 1647 | DEFSYM (QCgnutls_bootprop_min_prime_bits, ":min-prime-bits"); |
| 1667 | DEFSYM (QCgnutls_bootprop_loglevel, ":loglevel"); | 1648 | DEFSYM (QCgnutls_bootprop_loglevel, ":loglevel"); |
| 1668 | DEFSYM (QCgnutls_bootprop_verify_flags, ":verify-flags"); | 1649 | DEFSYM (QCgnutls_bootprop_verify_flags, ":verify-flags"); |