Einzelnen Beitrag anzeigen

omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: (Indy/OpenSSL) Zertifikate erstellen für SSL-Client/Serv

  Alt 10. Sep 2006, 23:44
Erstmal OpenSSL besorgen und installieren.

Dann eine Konsole öffnen und in das Verzeichnis C:\Programme\OpenSSL\bin wechseln.
Dort dann openssl.exe aufrufen.

Code:
OpenSSL> req -config openssl.cnf -new -out zertifikat.csr
Enter PEM pass phrase: Mein Passwort
Country Name: DE
State or Province Name: Mein Bundesland
Locality Name: Mein Ort
Organization Name: Meine Firma
Organization Unit Name: Meine Abteilung
Common Name: Mein Name
Email Adress: ich@du.de
A challenge Passwort: Mein Zertifikat-Passwort

Code:
OpenSSL> rsa -in privkey.pem -out zertifikat.key
Enter pass phrase for privkey.pem: Mein Passwort

Code:
OpenSSL> x509 -in zertifikat.csr -out zertifikat.cert -req -signkey zertifikat.key -days 365
(365 Tage gültig, kann auch anders gewählt werden)

Code:
OpenSSL> exit
Die erstellten Dateien befinden sich jetzt im BIN-Ordner.

privkey.pem -> sample.key
zertifikat.cert -> sample.crt, sampleRoot.pem

Delphi-Quellcode:
  IdServerIOHandlerSSLOpenSSL.SSLOptions.KeyFile:='sample.key';
  IdServerIOHandlerSSLOpenSSL.SSLOptions.CertFile:='sample.crt';
  IdServerIOHandlerSSLOpenSSL.SSLOptions.RootCertFile:='sampleRoot.pem';
:
procedure TForm.IdServerIOHandlerSSLOpenSSLGetPassword(var Password: String);
begin
  password:= 'Mein Passwort';
end;
Hoffe das hilft.

Gruss
Thorsten
  Mit Zitat antworten Zitat