1 /* This example code is placed in the public domain. */
10 #include <gnutls/gnutls.h>
12 /* Those functions are defined in other examples.
14 extern void check_alert (gnutls_session_t session
, int ret
);
15 extern int tcp_connect (void);
16 extern void tcp_close (int sd
);
19 #define CAFILE "ca.pem"
20 #define MSG "GET / HTTP/1.0\r\n\r\n"
27 gnutls_session_t session
;
28 char buffer
[MAX_BUF
+ 1];
29 gnutls_certificate_credentials_t xcred
;
31 /* variables used in session resuming
34 char *session_data
= NULL
;
35 size_t session_data_size
= 0;
37 gnutls_global_init ();
40 gnutls_certificate_allocate_credentials (&xcred
);
42 gnutls_certificate_set_x509_trust_file (xcred
, CAFILE
, GNUTLS_X509_FMT_PEM
);
44 for (t
= 0; t
< 2; t
++)
45 { /* connect 2 times to the server */
49 gnutls_init (&session
, GNUTLS_CLIENT
);
51 gnutls_priority_set_direct (session
, "PERFORMANCE:!ARCFOUR-128", NULL
);
53 gnutls_credentials_set (session
, GNUTLS_CRD_CERTIFICATE
, xcred
);
57 /* if this is not the first time we connect */
58 gnutls_session_set_data (session
, session_data
, session_data_size
);
62 gnutls_transport_set_ptr (session
, (gnutls_transport_ptr_t
) sd
);
64 /* Perform the TLS handshake
66 ret
= gnutls_handshake (session
);
70 fprintf (stderr
, "*** Handshake failed\n");
76 printf ("- Handshake was completed\n");
80 { /* the first time we connect */
81 /* get the session data size */
82 gnutls_session_get_data (session
, NULL
, &session_data_size
);
83 session_data
= malloc (session_data_size
);
85 /* put session data to the session variable */
86 gnutls_session_get_data (session
, session_data
, &session_data_size
);
90 { /* the second time we connect */
92 /* check if we actually resumed the previous session */
93 if (gnutls_session_is_resumed (session
) != 0)
95 printf ("- Previous session was resumed\n");
99 fprintf (stderr
, "*** Previous session was NOT resumed\n");
103 /* This function was defined in a previous example
105 /* print_info(session); */
107 gnutls_record_send (session
, MSG
, strlen (MSG
));
109 ret
= gnutls_record_recv (session
, buffer
, MAX_BUF
);
112 printf ("- Peer has closed the TLS connection\n");
117 fprintf (stderr
, "*** Error: %s\n", gnutls_strerror (ret
));
121 printf ("- Received %d bytes: ", ret
);
122 for (ii
= 0; ii
< ret
; ii
++)
124 fputc (buffer
[ii
], stdout
);
126 fputs ("\n", stdout
);
128 gnutls_bye (session
, GNUTLS_SHUT_RDWR
);
134 gnutls_deinit (session
);
138 gnutls_certificate_free_credentials (xcred
);
140 gnutls_global_deinit ();