Histórico da Página

Composition Setup
import.css=/download/attachments/327912/newLayout.css

Portuguese

Classe: tSktSslSrv

Permite o gerenciamento de conexões TCP seguras (SSL).

Hierarquia

A classe não possui hierarquia.

Construtores

New

Cria uma instância da classe tSktSslSrv.

Sintaxe

tSktSslSrv():New( < nSSL2 >, < nSSL3 >, < nTLS1 >, < cPassPhase >, < cCertificate >, < cKey >,

< cCertificate 2>, < cKey 2>, < nHSM >, < nBugs >, < nState >, < nCacheSize >, < nVerbose >, < cModule >) --> oRet

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
nSSL2	Numérico	0 (zero) indica desabilitado, senão habilitado	X
nSSL3	Numérico	0 (zero) indica desabilitado, senão habilitado	X
nTLS1	Numérico	0 (zero) indica desabilitado, senão habilitado	X
cPassPhase	Caracter	Senha	X
cCertificate	Caracter	arquivo de certificado	X
cKey	Caracter	arquivo de chave	X
cCertificate2	Caracter	arquivo de certificado secundário
cKey2	Caracter	arquivo de chave secundário
nHSM	Numérico	0 (zero) indica desabilitado, senão habilitado
nBugs	Numérico	0 (zero) indica desabilitado, senão habilitado
nState	Numérico	0 (zero) indica desabilitado, senão habilitado
nCacheSize	Numérico
nVerbose	Numérico	0 (zero) indica desabilitado, senão habilitado
cModule	Caracter

Retorno

Nome	Tipo	Descrição
oRet	Objeto	Cria um objeto da Classe Server Socket SSL (Servidor SSL)

...

Observações

Exemplo

Local SSL2 := 1

Local SSL3 := 1

Local TLS1 := 1

Local PassPhrase := "senha"

Local cert1 := ""

Local key1 := ""

Local cert2 := ""

Local key2 := ""

Local HSM := 0

Local Bugs := 0

Local State := 0

Local CacheSize := 0

Local Verbose := 0

Local Module := ""

cert1 := "..\..\Users\ricardo.clima\compartilhado\ssl_keys_teste\rsa_privkey_self_cert.crt"

key1 := "..\..\Users\ricardo.clima\compartilhado\ssl_keys_teste\rsa_privkey.pem"

oSockSrv := tSktSslSrv():New(SSL2, SSL3, TLS1, PassPhrase, cert1, key1,

cert2, key2, HSM, Bugs, State, CacheSize, Verbose, Module)

Métodos

StartTcp

Faz o bind e o listen em uma porta específica do servidor e verifica os certificados e configurações da conexão SSL.

Sintaxe

TSktSslSrv():StartTcp ( < nPort >, < cServerName > ) --> lRet

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
nPort	Numérico	Porta de conexão	X
cServerName	Caracter	Identificação do servidor de conexão

Retorno

Nome

Tipo

Descrição

lRet

Lógico

Retorna verdadeiro (.T) se conseguiu fazer o bind, o listen na porta e verificar as configurações da

conexão SSL, e falso (.F.) se não conseguir estabelecer uma conexão na porta.

Observações

Exemplo

lRet = oSockSrv:StartTcp(nPort)

...

Parâmetros

Retorno

Observações

Exemplo

Accept

Faz a aceitação de uma conexão SSL.

...

Sintaxe

TSktSslSrv():Accept ( < nTimeOut > ) --> oObjConn

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
nTimeOut	Numérico	Timeout de aguarde de aceitação em segundos	X

Retorno

Nome	Tipo	Descrição
oObjConn	Objeto	Se conseguiu aceiar uma conexão retorna um objeto do tipo

...

“tSktSslConn” e em caso de falha

retorna nulo (NIL).

Observações

Se nTimeOut for 0 (zero) fica aguardando indefinidamente até aceitar uma conexão.

Exemplo

oObjConn := oSockSrv:Accept( 0 )

...

Parâmetros

Retorno

Observações

...

GetError

Obtém o erro gerado no Servidor.

...

Sintaxe

TSktSslSrv():GetError ( < cMsgErr > ) --> nRet

Parâmetros

Nome	Tipo	Descrição	Obrigatório	Referência
cMsgErr	Caracter	Contém a mensagem de erro	X	X

Retorno

Nome	Tipo	Descrição
nRet	Lógico	Contém o código do erro

Observações

Se não houver erro será retornado 0 (zero).

Exemplo

nErrCode := oSockSrv:GetError(@cErrMsg)

...

Parâmetros

Retorno

Observações

...

Close

Fecha o servidor SSL.

...

Sintaxe

TSktSslSrv():Close() --> lRet

Parâmetros

Retorno

Nome	Tipo	Descrição
lRet	Lógico	Verdadeiro (.T.) se fechou corretamente ou falso (.F.) se houve algum erro no fechamento

Observações

Exemplo

lRet := oSockSrv:Close()

...

Propriedades

...

nAccepted

Indica o número de clientes que foram aceitos (conectados).

...

Sintaxe

TSktSslSrv():nAccepted

Retorno

Nome	Tipo	Descrição
nAccepted	Numérico	Indica o número de clientes que foram aceitos (conectados)

Observações

Exemplo

nAccepted := oSockSrv:nAccepted

...

lBinded

Exemplo

Indica se o servidor está conectado e escutando a porta.

...

Sintaxe

TSktSslSrv():lBinded

Retorno

Nome	Tipo	Descrição
lBinded	Lógico	Indica se o servidor está conectado e escutando a porta

Observações

Exemplo

lBinded := oSockSrv:lBinded

Abrangência

Protheus 11

Veja Também

tSktSslConn , SetSslObj , GetSslObj

Âncora

	_GoBack
	_GoBack

Teste: 10

Árvore de páginas

Versões comparadas

Versão antiga 12

Nova versão 13

Chave

Parâmetros

Retorno

Observações

Exemplo

Parâmetros

Retorno

Observações

Parâmetros

Retorno

Observações

Exemplo