* README: Add a note about ranges in copyright years.
[bpt/emacs.git] / src / gnutls.h
CommitLineData
8af55556 1/* GnuTLS glue for GNU Emacs.
d0d4361d 2 Copyright (C) 2010, 2011 Free Software Foundation, Inc.
8af55556
TZ
3
4This file is part of GNU Emacs.
5
6GNU Emacs is free software: you can redistribute it and/or modify
7it under the terms of the GNU General Public License as published by
8the Free Software Foundation, either version 3 of the License, or
9(at your option) any later version.
10
11GNU Emacs is distributed in the hope that it will be useful,
12but WITHOUT ANY WARRANTY; without even the implied warranty of
13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14GNU General Public License for more details.
15
16You should have received a copy of the GNU General Public License
17along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
18
19#ifndef EMACS_GNUTLS_DEFINED
20#define EMACS_GNUTLS_DEFINED
21
22#ifdef HAVE_GNUTLS
23#include <gnutls/gnutls.h>
24
25typedef enum
26{
27 /* Initialization stages. */
28 GNUTLS_STAGE_EMPTY = 0,
29 GNUTLS_STAGE_CRED_ALLOC,
30 GNUTLS_STAGE_FILES,
31 GNUTLS_STAGE_INIT,
32 GNUTLS_STAGE_PRIORITY,
33 GNUTLS_STAGE_CRED_SET,
34
35 /* Handshake stages. */
36 GNUTLS_STAGE_HANDSHAKE_CANDO = GNUTLS_STAGE_CRED_SET,
37 GNUTLS_STAGE_TRANSPORT_POINTERS_SET,
38 GNUTLS_STAGE_HANDSHAKE_TRIED,
39
40 GNUTLS_STAGE_READY,
41} gnutls_initstage_t;
42
43#define GNUTLS_EMACS_ERROR_INVALID_TYPE GNUTLS_E_APPLICATION_ERROR_MIN
44
45#define GNUTLS_INITSTAGE(proc) (XPROCESS (proc)->gnutls_initstage)
46
47#define GNUTLS_PROCESS_USABLE(proc) (GNUTLS_INITSTAGE(proc) >= GNUTLS_STAGE_READY)
48
8ed70bf3
LMI
49#define GNUTLS_LOG(level, max, string) if (level <= max) { gnutls_log_function (level, "(Emacs) " string); }
50
c1ae068b
LMI
51#define GNUTLS_LOG2(level, max, string, extra) if (level <= max) { gnutls_log_function2 (level, "(Emacs) " string, extra); }
52
8af55556 53int
df7fcaff 54emacs_gnutls_write (int fildes, struct Lisp_Process *proc, char *buf,
8af55556
TZ
55 unsigned int nbyte);
56int
df7fcaff 57emacs_gnutls_read (int fildes, struct Lisp_Process *proc, char *buf,
8af55556
TZ
58 unsigned int nbyte);
59
60extern void syms_of_gnutls (void);
61
62#endif
63
64#endif