1 /*-------------------------------------------------------------------------
4 * functions related to setting up a secure connection to the backend.
5 * Secure connections are expected to provide confidentiality,
6 * message integrity and endpoint authentication.
9 * Portions Copyright (c) 1996-2009, PostgreSQL Global Development Group
10 * Portions Copyright (c) 1994, Regents of the University of California
14 * $PostgreSQL: pgsql/src/interfaces/libpq/fe-secure.c,v 1.115 2009/01/01 17:24:03 momjian Exp $
18 * We don't provide informational callbacks here (like
19 * info_cb() in be-secure.c), since there's mechanism to
20 * display that information to the client.
22 *-------------------------------------------------------------------------
25 #include "postgres_fe.h"
38 #include <sys/socket.h>
41 #include <netinet/in.h>
42 #ifdef HAVE_NETINET_TCP_H
43 #include <netinet/tcp.h>
45 #include <arpa/inet.h>
50 #ifdef ENABLE_THREAD_SAFETY
52 #include "pthread-win32.h"
60 #include <openssl/ssl.h>
61 #include <openssl/bio.h>
62 #if (SSLEAY_VERSION_NUMBER >= 0x00907000L)
63 #include <openssl/conf.h>
65 #if (SSLEAY_VERSION_NUMBER >= 0x00907000L) && !defined(OPENSSL_NO_ENGINE)
66 #include <openssl/engine.h>
71 #define USER_CERT_FILE ".postgresql/postgresql.crt"
72 #define USER_KEY_FILE ".postgresql/postgresql.key"
73 #define ROOT_CERT_FILE ".postgresql/root.crt"
74 #define ROOT_CRL_FILE ".postgresql/root.crl"
76 /* On Windows, the "home" directory is already PostgreSQL-specific */
77 #define USER_CERT_FILE "postgresql.crt"
78 #define USER_KEY_FILE "postgresql.key"
79 #define ROOT_CERT_FILE "root.crt"
80 #define ROOT_CRL_FILE "root.crl"
83 #ifndef HAVE_ERR_SET_MARK
84 /* These don't exist in OpenSSL before 0.9.8 */
85 #define ERR_set_mark() ((void) 0)
86 #define ERR_pop_to_mark() ((void) 0)
89 static bool verify_peer_name_matches_certificate(PGconn *);
90 static int verify_cb(int ok, X509_STORE_CTX *ctx);
91 static int client_cert_cb(SSL *, X509 **, EVP_PKEY **);
92 static int init_ssl_system(PGconn *conn);
93 static void destroy_ssl_system(void);
94 static int initialize_SSL(PGconn *);
95 static void destroySSL(void);
96 static PostgresPollingStatusType open_client_SSL(PGconn *);
97 static void close_SSL(PGconn *);
98 static char *SSLerrmessage(void);
99 static void SSLerrfree(char *buf);
101 static bool pq_initssllib = true;
102 static SSL_CTX *SSL_context = NULL;
104 #ifdef ENABLE_THREAD_SAFETY
105 static int ssl_open_connections = 0;
108 static pthread_mutex_t ssl_config_mutex = PTHREAD_MUTEX_INITIALIZER;
110 static pthread_mutex_t ssl_config_mutex = NULL;
111 static long win32_ssl_create_mutex = 0;
114 #endif /* ENABLE_THREAD_SAFETY */
120 * Macros to handle disabling and then restoring the state of SIGPIPE handling.
121 * Note that DISABLE_SIGPIPE() must appear at the start of a block.
125 #ifdef ENABLE_THREAD_SAFETY
127 #define DISABLE_SIGPIPE(failaction) \
129 bool sigpipe_pending; \
130 bool got_epipe = false; \
132 if (pq_block_sigpipe(&osigmask, &sigpipe_pending) < 0) \
135 #define REMEMBER_EPIPE(cond) \
141 #define RESTORE_SIGPIPE() \
142 pq_reset_sigpipe(&osigmask, sigpipe_pending, got_epipe)
144 #else /* !ENABLE_THREAD_SAFETY */
146 #define DISABLE_SIGPIPE(failaction) \
147 pqsigfunc oldsighandler = pqsignal(SIGPIPE, SIG_IGN)
149 #define REMEMBER_EPIPE(cond)
151 #define RESTORE_SIGPIPE() \
152 pqsignal(SIGPIPE, oldsighandler)
154 #endif /* ENABLE_THREAD_SAFETY */
157 #define DISABLE_SIGPIPE(failaction)
158 #define REMEMBER_EPIPE(cond)
159 #define RESTORE_SIGPIPE()
163 /* ------------------------------------------------------------ */
164 /* Procedures common to all secure sessions */
165 /* ------------------------------------------------------------ */
169 * Exported function to allow application to tell us it's already
170 * initialized OpenSSL.
173 PQinitSSL(int do_init)
176 pq_initssllib = do_init;
181 * Initialize global context
184 pqsecure_initialize(PGconn *conn)
189 r = initialize_SSL(conn);
196 * Destroy global context
199 pqsecure_destroy(void)
207 * Attempt to negotiate secure session.
209 PostgresPollingStatusType
210 pqsecure_open_client(PGconn *conn)
213 /* First time through? */
214 if (conn->ssl == NULL)
216 if (!(conn->ssl = SSL_new(SSL_context)) ||
217 !SSL_set_app_data(conn->ssl, conn) ||
218 !SSL_set_fd(conn->ssl, conn->sock))
220 char *err = SSLerrmessage();
222 printfPQExpBuffer(&conn->errorMessage,
223 libpq_gettext("could not establish SSL connection: %s\n"),
227 return PGRES_POLLING_FAILED;
231 * Initialize errorMessage to empty. This allows open_client_SSL() to
232 * detect whether client_cert_cb() has stored a message.
234 resetPQExpBuffer(&conn->errorMessage);
236 /* Begin or continue the actual handshake */
237 return open_client_SSL(conn);
239 /* shouldn't get here */
240 return PGRES_POLLING_FAILED;
245 * Close secure session.
248 pqsecure_close(PGconn *conn)
257 * Read data from a secure connection.
260 pqsecure_read(PGconn *conn, void *ptr, size_t len)
269 /* SSL_read can write to the socket, so we need to disable SIGPIPE */
270 DISABLE_SIGPIPE(return -1);
273 n = SSL_read(conn->ssl, ptr, len);
274 err = SSL_get_error(conn->ssl, n);
279 case SSL_ERROR_WANT_READ:
282 case SSL_ERROR_WANT_WRITE:
285 * Returning 0 here would cause caller to wait for read-ready,
286 * which is not correct since what SSL wants is wait for
287 * write-ready. The former could get us stuck in an infinite
288 * wait, so don't risk it; busy-loop instead.
291 case SSL_ERROR_SYSCALL:
297 REMEMBER_EPIPE(SOCK_ERRNO == EPIPE);
298 printfPQExpBuffer(&conn->errorMessage,
299 libpq_gettext("SSL SYSCALL error: %s\n"),
300 SOCK_STRERROR(SOCK_ERRNO, sebuf, sizeof(sebuf)));
304 printfPQExpBuffer(&conn->errorMessage,
305 libpq_gettext("SSL SYSCALL error: EOF detected\n"));
307 SOCK_ERRNO_SET(ECONNRESET);
314 char *err = SSLerrmessage();
316 printfPQExpBuffer(&conn->errorMessage,
317 libpq_gettext("SSL error: %s\n"), err);
321 case SSL_ERROR_ZERO_RETURN:
322 SOCK_ERRNO_SET(ECONNRESET);
326 printfPQExpBuffer(&conn->errorMessage,
327 libpq_gettext("unrecognized SSL error code: %d\n"),
337 n = recv(conn->sock, ptr, len, 0);
343 * Write data to a secure connection.
346 pqsecure_write(PGconn *conn, const void *ptr, size_t len)
350 DISABLE_SIGPIPE(return -1);
357 n = SSL_write(conn->ssl, ptr, len);
358 err = SSL_get_error(conn->ssl, n);
363 case SSL_ERROR_WANT_READ:
366 * Returning 0 here causes caller to wait for write-ready,
367 * which is not really the right thing, but it's the best we
372 case SSL_ERROR_WANT_WRITE:
375 case SSL_ERROR_SYSCALL:
381 REMEMBER_EPIPE(SOCK_ERRNO == EPIPE);
382 printfPQExpBuffer(&conn->errorMessage,
383 libpq_gettext("SSL SYSCALL error: %s\n"),
384 SOCK_STRERROR(SOCK_ERRNO, sebuf, sizeof(sebuf)));
388 printfPQExpBuffer(&conn->errorMessage,
389 libpq_gettext("SSL SYSCALL error: EOF detected\n"));
390 SOCK_ERRNO_SET(ECONNRESET);
397 char *err = SSLerrmessage();
399 printfPQExpBuffer(&conn->errorMessage,
400 libpq_gettext("SSL error: %s\n"), err);
404 case SSL_ERROR_ZERO_RETURN:
405 SOCK_ERRNO_SET(ECONNRESET);
409 printfPQExpBuffer(&conn->errorMessage,
410 libpq_gettext("unrecognized SSL error code: %d\n"),
419 n = send(conn->sock, ptr, len, 0);
420 REMEMBER_EPIPE(n < 0 && SOCK_ERRNO == EPIPE);
428 /* ------------------------------------------------------------ */
429 /* SSL specific code */
430 /* ------------------------------------------------------------ */
434 * Certificate verification callback
436 * This callback allows us to log intermediate problems during
437 * verification, but there doesn't seem to be a clean way to get
438 * our PGconn * structure. So we can't log anything!
440 * This callback also allows us to override the default acceptance
441 * criteria (e.g., accepting self-signed or expired certs), but
442 * for now we accept the default checks.
445 verify_cb(int ok, X509_STORE_CTX *ctx)
452 * Check if a wildcard certificate matches the server hostname.
454 * The rule for this is:
455 * 1. We only match the '*' character as wildcard
456 * 2. We match only wildcards at the start of the string
457 * 3. The '*' character does *not* match '.', meaning that we match only
458 * a single pathname component.
459 * 4. We don't support more than one '*' in a single pattern.
461 * This is roughly in line with RFC2818, but contrary to what most browsers
462 * appear to be implementing (point 3 being the difference)
464 * Matching is always cone case-insensitive, since DNS is case insensitive.
467 wildcard_certificate_match(const char *pattern, const char *string)
469 int lenpat = strlen(pattern);
470 int lenstr = strlen(string);
472 /* If we don't start with a wildcard, it's not a match (rule 1 & 2) */
479 /* If pattern is longer than the string, we can never match */
482 if (pg_strcasecmp(pattern+1, string+lenstr-lenpat+1) != 0)
483 /* If string does not end in pattern (minus the wildcard), we don't match */
486 if (strchr(string, '.') < string+lenstr-lenpat)
487 /* If there is a dot left of where the pattern started to match, we don't match (rule 3) */
490 /* String ended with pattern, and didn't have a dot before, so we match */
496 * Verify that common name resolves to peer.
499 verify_peer_name_matches_certificate(PGconn *conn)
502 * If told not to verify the peer name, don't do it. Return
503 * 0 indicating that the verification was successful.
505 if(strcmp(conn->sslverify, "cn") != 0)
508 if (conn->pghostaddr)
510 printfPQExpBuffer(&conn->errorMessage,
511 libpq_gettext("verified SSL connections are only supported when connecting to a hostname"));
517 * Connect by hostname.
519 * XXX: Should support alternate names here
521 if (pg_strcasecmp(conn->peer_cn, conn->pghost) == 0)
522 /* Exact name match */
524 else if (wildcard_certificate_match(conn->peer_cn, conn->pghost))
525 /* Matched wildcard certificate */
529 printfPQExpBuffer(&conn->errorMessage,
530 libpq_gettext("server common name '%s' does not match hostname '%s'"),
531 conn->peer_cn, conn->pghost);
538 * Callback used by SSL to load client cert and key.
539 * This callback is only called when the server wants a
542 * Since BIO functions can set OpenSSL error codes, we must
543 * reset the OpenSSL error stack on *every* exit from this
544 * function once we've started using BIO.
546 * Must return 1 on success, 0 on no data or error.
549 client_cert_cb(SSL *ssl, X509 **x509, EVP_PKEY **pkey)
551 char homedir[MAXPGPATH];
558 char fnbuf[MAXPGPATH];
560 PGconn *conn = (PGconn *) SSL_get_app_data(ssl);
563 if (!pqGetHomeDirectory(homedir, sizeof(homedir)))
565 printfPQExpBuffer(&conn->errorMessage,
566 libpq_gettext("could not get user information\n"));
570 /* read the user certificate */
572 strncpy(fnbuf, conn->sslcert, sizeof(fnbuf));
574 snprintf(fnbuf, sizeof(fnbuf), "%s/%s", homedir, USER_CERT_FILE);
577 * OpenSSL <= 0.9.8 lacks error stack handling, which means it's likely to
578 * report wrong error messages if access to the cert file fails. Do our
579 * own check for the readability of the file to catch the majority of such
580 * problems before OpenSSL gets involved.
582 #ifndef HAVE_ERR_SET_MARK
586 if ((fp2 = fopen(fnbuf, "r")) == NULL)
588 printfPQExpBuffer(&conn->errorMessage,
589 libpq_gettext("could not open certificate file \"%s\": %s\n"),
590 fnbuf, pqStrerror(errno, sebuf, sizeof(sebuf)));
597 /* save OpenSSL error stack */
600 if ((bio = BIO_new_file(fnbuf, "r")) == NULL)
602 printfPQExpBuffer(&conn->errorMessage,
603 libpq_gettext("could not open certificate file \"%s\": %s\n"),
604 fnbuf, pqStrerror(errno, sebuf, sizeof(sebuf)));
609 if (PEM_read_bio_X509(bio, x509, NULL, NULL) == NULL)
611 char *err = SSLerrmessage();
613 printfPQExpBuffer(&conn->errorMessage,
614 libpq_gettext("could not read certificate file \"%s\": %s\n"),
625 * Read the SSL key. If a key is specified, treat it as an engine:key combination
626 * if there is colon present - we don't support files with colon in the name. The
627 * exception is if the second character is a colon, in which case it can be a Windows
628 * filename with drive specification.
630 if (conn->sslkey && strlen(conn->sslkey) > 0)
632 #if (SSLEAY_VERSION_NUMBER >= 0x00907000L) && !defined(OPENSSL_NO_ENGINE)
633 if (strchr(conn->sslkey, ':')
635 && conn->sslkey[1] != ':'
639 /* Colon, but not in second character, treat as engine:key */
641 char *engine_str = strdup(conn->sslkey);
642 char *engine_colon = strchr(engine_str, ':');
644 *engine_colon = '\0'; /* engine_str now has engine name */
645 engine_colon++; /* engine_colon now has key name */
647 engine_ptr = ENGINE_by_id(engine_str);
648 if (engine_ptr == NULL)
650 char *err = SSLerrmessage();
652 printfPQExpBuffer(&conn->errorMessage,
653 libpq_gettext("could not load SSL engine \"%s\": %s\n"),
661 *pkey = ENGINE_load_private_key(engine_ptr, engine_colon,
665 char *err = SSLerrmessage();
667 printfPQExpBuffer(&conn->errorMessage,
668 libpq_gettext("could not read private SSL key \"%s\" from engine \"%s\": %s\n"),
669 engine_colon, engine_str, err);
677 fnbuf[0] = '\0'; /* indicate we're not going to load from a file */
680 #endif /* support for SSL engines */
682 /* PGSSLKEY is not an engine, treat it as a filename */
683 strncpy(fnbuf, conn->sslkey, sizeof(fnbuf));
688 /* No PGSSLKEY specified, load default file */
689 snprintf(fnbuf, sizeof(fnbuf), "%s/%s", homedir, USER_KEY_FILE);
692 if (fnbuf[0] != '\0')
694 /* read the user key from file */
696 if (stat(fnbuf, &buf) != 0)
698 printfPQExpBuffer(&conn->errorMessage,
699 libpq_gettext("certificate present, but not private key file \"%s\"\n"),
705 if (!S_ISREG(buf.st_mode) || buf.st_mode & (S_IRWXG | S_IRWXO))
707 printfPQExpBuffer(&conn->errorMessage,
708 libpq_gettext("private key file \"%s\" has group or world access; permissions should be u=rw (0600) or less\n"),
715 if ((bio = BIO_new_file(fnbuf, "r")) == NULL)
717 printfPQExpBuffer(&conn->errorMessage,
718 libpq_gettext("could not open private key file \"%s\": %s\n"),
719 fnbuf, pqStrerror(errno, sebuf, sizeof(sebuf)));
724 BIO_get_fp(bio, &fp);
725 if (fstat(fileno(fp), &buf2) == -1 ||
726 buf.st_dev != buf2.st_dev || buf.st_ino != buf2.st_ino)
728 printfPQExpBuffer(&conn->errorMessage,
729 libpq_gettext("private key file \"%s\" changed during execution\n"), fnbuf);
735 if (PEM_read_bio_PrivateKey(bio, pkey, NULL, NULL) == NULL)
737 char *err = SSLerrmessage();
739 printfPQExpBuffer(&conn->errorMessage,
740 libpq_gettext("could not read private key file \"%s\": %s\n"),
752 /* verify that the cert and key go together */
753 if (!X509_check_private_key(*x509, *pkey))
755 char *err = SSLerrmessage();
757 printfPQExpBuffer(&conn->errorMessage,
758 libpq_gettext("certificate does not match private key file \"%s\": %s\n"),
770 #ifdef ENABLE_THREAD_SAFETY
772 * Callback functions for OpenSSL internal locking
776 pq_threadidcallback(void)
779 * This is not standards-compliant. pthread_self() returns pthread_t, and
780 * shouldn't be cast to unsigned long, but CRYPTO_set_id_callback requires
781 * it, so we have to do it.
783 return (unsigned long) pthread_self();
786 static pthread_mutex_t *pq_lockarray;
789 pq_lockingcallback(int mode, int n, const char *file, int line)
791 if (mode & CRYPTO_LOCK)
793 if (pthread_mutex_lock(&pq_lockarray[n]))
794 PGTHREAD_ERROR("failed to lock mutex");
798 if (pthread_mutex_unlock(&pq_lockarray[n]))
799 PGTHREAD_ERROR("failed to unlock mutex");
802 #endif /* ENABLE_THREAD_SAFETY */
805 * Initialize SSL system. In threadsafe mode, this includes setting
806 * up OpenSSL callback functions to do thread locking.
808 * If the caller has told us (through PQinitSSL) that he's taking care
809 * of SSL, we expect that callbacks are already set, and won't try to
812 * The conn parameter is only used to be able to pass back an error
813 * message - no connection local setup is made.
816 init_ssl_system(PGconn *conn)
818 #ifdef ENABLE_THREAD_SAFETY
820 /* Also see similar code in fe-connect.c, default_threadlock() */
821 if (ssl_config_mutex == NULL)
823 while (InterlockedExchange(&win32_ssl_create_mutex, 1) == 1)
824 /* loop, another thread own the lock */ ;
825 if (ssl_config_mutex == NULL)
827 if (pthread_mutex_init(&ssl_config_mutex, NULL))
830 InterlockedExchange(&win32_ssl_create_mutex, 0);
833 if (pthread_mutex_lock(&ssl_config_mutex))
839 * If necessary, set up an array to hold locks for OpenSSL. OpenSSL will
840 * tell us how big to make this array.
842 if (pq_lockarray == NULL)
846 pq_lockarray = malloc(sizeof(pthread_mutex_t) * CRYPTO_num_locks());
849 pthread_mutex_unlock(&ssl_config_mutex);
852 for (i = 0; i < CRYPTO_num_locks(); i++)
854 if (pthread_mutex_init(&pq_lockarray[i], NULL))
858 pthread_mutex_unlock(&ssl_config_mutex);
864 if (ssl_open_connections++ == 0)
866 /* These are only required for threaded SSL applications */
867 CRYPTO_set_id_callback(pq_threadidcallback);
868 CRYPTO_set_locking_callback(pq_lockingcallback);
871 #endif /* ENABLE_THREAD_SAFETY */
877 #if SSLEAY_VERSION_NUMBER >= 0x00907000L
878 OPENSSL_config(NULL);
881 SSL_load_error_strings();
883 SSL_context = SSL_CTX_new(TLSv1_method());
886 char *err = SSLerrmessage();
888 printfPQExpBuffer(&conn->errorMessage,
889 libpq_gettext("could not create SSL context: %s\n"),
892 #ifdef ENABLE_THREAD_SAFETY
893 pthread_mutex_unlock(&ssl_config_mutex);
899 #ifdef ENABLE_THREAD_SAFETY
900 pthread_mutex_unlock(&ssl_config_mutex);
906 * This function is needed because if the libpq library is unloaded
907 * from the application, the callback functions will no longer exist when
908 * SSL used by other parts of the system. For this reason,
909 * we unregister the SSL callback functions when the last libpq
910 * connection is closed.
912 * Callbacks are only set when we're compiled in threadsafe mode, so
913 * we only need to remove them in this case.
916 destroy_ssl_system(void)
918 #ifdef ENABLE_THREAD_SAFETY
919 /* Mutex is created in initialize_ssl_system() */
920 if (pthread_mutex_lock(&ssl_config_mutex))
925 if (ssl_open_connections > 0)
926 --ssl_open_connections;
928 if (ssl_open_connections == 0)
930 /* No connections left, unregister all callbacks */
931 CRYPTO_set_locking_callback(NULL);
932 CRYPTO_set_id_callback(NULL);
935 * We don't free the lock array. If we get another connection
936 * from the same caller, we will just re-use it with the existing
939 * This means we leak a little memory on repeated load/unload
945 pthread_mutex_unlock(&ssl_config_mutex);
951 * Initialize SSL context.
954 initialize_SSL(PGconn *conn)
957 char homedir[MAXPGPATH];
958 char fnbuf[MAXPGPATH];
960 if (init_ssl_system(conn))
964 * If sslverify is set to anything other than "none", perform certificate
965 * verification. If set to "cn" we will also do further verifications after
966 * the connection has been completed.
969 /* Set up to verify server cert, if root.crt is present */
970 if (pqGetHomeDirectory(homedir, sizeof(homedir)))
972 if (conn->sslrootcert)
973 strncpy(fnbuf, conn->sslrootcert, sizeof(fnbuf));
975 snprintf(fnbuf, sizeof(fnbuf), "%s/%s", homedir, ROOT_CERT_FILE);
977 if (stat(fnbuf, &buf) == 0)
981 if (!SSL_CTX_load_verify_locations(SSL_context, fnbuf, NULL))
983 char *err = SSLerrmessage();
985 printfPQExpBuffer(&conn->errorMessage,
986 libpq_gettext("could not read root certificate file \"%s\": %s\n"),
992 if ((cvstore = SSL_CTX_get_cert_store(SSL_context)) != NULL)
995 strncpy(fnbuf, conn->sslcrl, sizeof(fnbuf));
997 snprintf(fnbuf, sizeof(fnbuf), "%s/%s", homedir, ROOT_CRL_FILE);
999 /* setting the flags to check against the complete CRL chain */
1000 if (X509_STORE_load_locations(cvstore, fnbuf, NULL) != 0)
1001 /* OpenSSL 0.96 does not support X509_V_FLAG_CRL_CHECK */
1002 #ifdef X509_V_FLAG_CRL_CHECK
1003 X509_STORE_set_flags(cvstore,
1004 X509_V_FLAG_CRL_CHECK | X509_V_FLAG_CRL_CHECK_ALL);
1005 /* if not found, silently ignore; we do not require CRL */
1008 char *err = SSLerrmessage();
1010 printfPQExpBuffer(&conn->errorMessage,
1011 libpq_gettext("SSL library does not support CRL certificates (file \"%s\")\n"),
1019 SSL_CTX_set_verify(SSL_context, SSL_VERIFY_PEER, verify_cb);
1023 if (strcmp(conn->sslverify, "none") != 0)
1025 printfPQExpBuffer(&conn->errorMessage,
1026 libpq_gettext("root certificate file (%s) not found"), fnbuf);
1033 if (strcmp(conn->sslverify, "none") != 0)
1035 printfPQExpBuffer(&conn->errorMessage,
1036 libpq_gettext("cannot find home directory to locate root certificate file"));
1041 /* set up mechanism to provide client certificate, if available */
1042 SSL_CTX_set_client_cert_cb(SSL_context, client_cert_cb);
1050 destroy_ssl_system();
1054 * Attempt to negotiate SSL connection.
1056 static PostgresPollingStatusType
1057 open_client_SSL(PGconn *conn)
1061 r = SSL_connect(conn->ssl);
1064 int err = SSL_get_error(conn->ssl, r);
1068 case SSL_ERROR_WANT_READ:
1069 return PGRES_POLLING_READING;
1071 case SSL_ERROR_WANT_WRITE:
1072 return PGRES_POLLING_WRITING;
1074 case SSL_ERROR_SYSCALL:
1079 printfPQExpBuffer(&conn->errorMessage,
1080 libpq_gettext("SSL SYSCALL error: %s\n"),
1081 SOCK_STRERROR(SOCK_ERRNO, sebuf, sizeof(sebuf)));
1083 printfPQExpBuffer(&conn->errorMessage,
1084 libpq_gettext("SSL SYSCALL error: EOF detected\n"));
1086 return PGRES_POLLING_FAILED;
1091 * If there are problems with the local certificate files,
1092 * these will be detected by client_cert_cb() which is
1093 * called from SSL_connect(). We want to return that
1094 * error message and not the rather unhelpful error that
1095 * OpenSSL itself returns. So check to see if an error
1096 * message was already stored.
1098 if (conn->errorMessage.len == 0)
1100 char *err = SSLerrmessage();
1102 printfPQExpBuffer(&conn->errorMessage,
1103 libpq_gettext("SSL error: %s\n"),
1108 return PGRES_POLLING_FAILED;
1112 printfPQExpBuffer(&conn->errorMessage,
1113 libpq_gettext("unrecognized SSL error code: %d\n"),
1116 return PGRES_POLLING_FAILED;
1121 * We already checked the server certificate in initialize_SSL()
1122 * using SSL_CTX_set_verify() if root.crt exists.
1125 /* pull out server distinguished and common names */
1126 conn->peer = SSL_get_peer_certificate(conn->ssl);
1127 if (conn->peer == NULL)
1129 char *err = SSLerrmessage();
1131 printfPQExpBuffer(&conn->errorMessage,
1132 libpq_gettext("certificate could not be obtained: %s\n"),
1136 return PGRES_POLLING_FAILED;
1139 X509_NAME_oneline(X509_get_subject_name(conn->peer),
1140 conn->peer_dn, sizeof(conn->peer_dn));
1141 conn->peer_dn[sizeof(conn->peer_dn) - 1] = '\0';
1143 X509_NAME_get_text_by_NID(X509_get_subject_name(conn->peer),
1144 NID_commonName, conn->peer_cn, SM_USER);
1145 conn->peer_cn[SM_USER] = '\0';
1147 if (!verify_peer_name_matches_certificate(conn))
1150 return PGRES_POLLING_FAILED;
1153 /* SSL handshake is complete */
1154 return PGRES_POLLING_OK;
1158 * Close SSL connection.
1161 close_SSL(PGconn *conn)
1165 DISABLE_SIGPIPE((void) 0);
1166 SSL_shutdown(conn->ssl);
1167 SSL_free(conn->ssl);
1170 /* We have to assume we got EPIPE */
1171 REMEMBER_EPIPE(true);
1177 X509_free(conn->peer);
1183 * Obtain reason string for last SSL error
1185 * Some caution is needed here since ERR_reason_error_string will
1186 * return NULL if it doesn't recognize the error code. We don't
1187 * want to return NULL ever.
1189 static char ssl_nomem[] = "out of memory allocating error description";
1191 #define SSL_ERR_LEN 128
1196 unsigned long errcode;
1197 const char *errreason;
1200 errbuf = malloc(SSL_ERR_LEN);
1203 errcode = ERR_get_error();
1206 snprintf(errbuf, SSL_ERR_LEN, libpq_gettext("no SSL error reported"));
1209 errreason = ERR_reason_error_string(errcode);
1210 if (errreason != NULL)
1212 strlcpy(errbuf, errreason, SSL_ERR_LEN);
1215 snprintf(errbuf, SSL_ERR_LEN, libpq_gettext("SSL error code %lu"), errcode);
1220 SSLerrfree(char *buf)
1222 if (buf != ssl_nomem)
1227 * Return pointer to OpenSSL object.
1230 PQgetssl(PGconn *conn)
1236 #else /* !USE_SSL */
1239 PQgetssl(PGconn *conn)
1243 #endif /* USE_SSL */
1246 #if defined(ENABLE_THREAD_SAFETY) && !defined(WIN32)
1249 * Block SIGPIPE for this thread. This prevents send()/write() from exiting
1253 pq_block_sigpipe(sigset_t *osigset, bool *sigpipe_pending)
1255 sigset_t sigpipe_sigset;
1258 sigemptyset(&sigpipe_sigset);
1259 sigaddset(&sigpipe_sigset, SIGPIPE);
1261 /* Block SIGPIPE and save previous mask for later reset */
1262 SOCK_ERRNO_SET(pthread_sigmask(SIG_BLOCK, &sigpipe_sigset, osigset));
1266 /* We can have a pending SIGPIPE only if it was blocked before */
1267 if (sigismember(osigset, SIGPIPE))
1269 /* Is there a pending SIGPIPE? */
1270 if (sigpending(&sigset) != 0)
1273 if (sigismember(&sigset, SIGPIPE))
1274 *sigpipe_pending = true;
1276 *sigpipe_pending = false;
1279 *sigpipe_pending = false;
1285 * Discard any pending SIGPIPE and reset the signal mask.
1287 * Note: we are effectively assuming here that the C library doesn't queue
1288 * up multiple SIGPIPE events. If it did, then we'd accidentally leave
1289 * ours in the queue when an event was already pending and we got another.
1290 * As long as it doesn't queue multiple events, we're OK because the caller
1291 * can't tell the difference.
1293 * The caller should say got_epipe = FALSE if it is certain that it
1294 * didn't get an EPIPE error; in that case we'll skip the clear operation
1295 * and things are definitely OK, queuing or no. If it got one or might have
1296 * gotten one, pass got_epipe = TRUE.
1298 * We do not want this to change errno, since if it did that could lose
1299 * the error code from a preceding send(). We essentially assume that if
1300 * we were able to do pq_block_sigpipe(), this can't fail.
1303 pq_reset_sigpipe(sigset_t *osigset, bool sigpipe_pending, bool got_epipe)
1305 int save_errno = SOCK_ERRNO;
1309 /* Clear SIGPIPE only if none was pending */
1310 if (got_epipe && !sigpipe_pending)
1312 if (sigpending(&sigset) == 0 &&
1313 sigismember(&sigset, SIGPIPE))
1315 sigset_t sigpipe_sigset;
1317 sigemptyset(&sigpipe_sigset);
1318 sigaddset(&sigpipe_sigset, SIGPIPE);
1320 sigwait(&sigpipe_sigset, &signo);
1324 /* Restore saved block mask */
1325 pthread_sigmask(SIG_SETMASK, osigset, NULL);
1327 SOCK_ERRNO_SET(save_errno);
1330 #endif /* ENABLE_THREAD_SAFETY && !WIN32 */