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 ();