view release on metacpan or  search on metacpan

Client.pm  view on Meta::CPAN

=head3 ssl_set_cert

 my $int_CassError = $cass->ssl_set_cert($ssl, $cert);

Set client-side certificate chain. This is used to authenticate the client on the server-side. This should contain the entire Certificate chain starting with the certificate itself. 

Return: CASS_OK if successful, otherwise an error occurred


=head3 ssl_set_private_key

 my $int_CassError = $cass->ssl_set_private_key($ssl, $key, $password);

Set client-side private key. This is used to authenticate the client on the server-side. 

Return: CASS_OK if successful, otherwise an error occurred


=head2 Future

=head3 future_free

Client.xs  view on Meta::CPAN

		STRLEN len;
	CODE:
		char *cert_c = SvPV( cert, len );
		CassString cert_str = {cert_c, (cass_size_t)len};
		
		RETVAL = cass_ssl_set_cert(ssl, cert_str);
	OUTPUT:
		RETVAL

CassError
ssl_set_private_key(cass, ssl, key, password)
	Database::Cassandra::Client cass;
	CassSsl *ssl;
	SV *key;
	const char* password;
	
	PREINIT:
		STRLEN len;
	CODE:
		char *key_c = SvPV( key, len );
		CassString key_str = {key_c, (cass_size_t)len};
		
		RETVAL = cass_ssl_set_private_key(ssl, key_str, password);
	OUTPUT:
		RETVAL

#***********************************************************************************
#*
#* Future
#*
#***********************************************************************************

void