Umstellung LDAP auf SSL/TLS

[Blup]

Ich versuche eine vorhandene Anwendung von LDAP zu LDAPS umzustellen.

Derzeitiges Problem: Fehlermeldung bei der Abfrage der Option LDAP_OPT_SSL.
Als Ergebnis bekomme ich einen Code der mit ldap_err2string als "Parameterfehler" zurück gibt.

Delphi-Quellcode:

FConn: Pointer;
FSSL: Pointer;
FVersion: Integer;

  TriggerProtocol(Self, 'Initialize an LDAP session using SSL');
  fConn := ldap_sslinit(PChar(fHost), fPort, 1);

  try
    FVersion := LDAP_VERSION3;
    TriggerProtocol(Self, Format('Setting Protocol version to %d', [FVersion]));
    LDAPCheck(ldap_set_option(fConn, LDAP_OPT_PROTOCOL_VERSION, @FVersion));

    TriggerProtocol(Self, 'Checking if SSL is enabled');
    FSSL := LDAP_OPT_OFF;
    LDAPCheck(ldap_get_option(fConn, LDAP_OPT_SSL, FSSL));
    TriggerProtocol(Self, IfThen(FSSL = LDAP_OPT_ON, 'SSL is enabled', 'SSL not enabled'));

    if FSSL <> LDAP_OPT_ON then
    begin
      TriggerProtocol(Self, 'SSL being enabled...');
      FSSL := LDAP_OPT_ON;
      LDAPCheck(ldap_set_option(fConn, LDAP_OPT_SSL, FSSL));
    end;

Das Protokoll:

Code:

Initialize an LDAP session using SSL
Setting Protocol version to 3
Checking if SSL is enabled
Parameterfehler

[Kas Ob.]

Zitat von Blup:

Delphi-Quellcode:

    //LDAPCheck(ldap_get_option(fConn, LDAP_OPT_SSL, FSSL));
    LDAPCheck(ldap_get_option(fConn, LDAP_OPT_SSL, @FSSL)); ??

Also notice that FSSL and FVersion should be NativeUInt.

[Blup]

@FSSL

Das gibt "Lokaler Fehler".

[Kas Ob.]

Zitat von Blup:

@FSSL

Das gibt "Lokaler Fehler".

At least it is not a parameter error any more, i would suggest to follow Microsoft example and find the missing step leading to this.

https://learn.microsoft.com/en-us/pr...ession-options

[Kas Ob.]

sorry !

this one is more direct:
https://learn.microsoft.com/en-us/pr...ssion-over-ssl

[Blup]

Zitat von Kas Ob.:

sorry !

this one is more direct:
https://learn.microsoft.com/en-us/pr...ssion-over-ssl

Das ist das Beispiel das ich versuche nachzuprogrammieren.

Code:

//  Verify that SSL is enabled on the connection.
    //  (returns LDAP_OPT_ON/_OFF).
    printf("Checking if SSL is enabled\n");
    returnCode = ldap_get_option(pLdapConnection,LDAP_OPT_SSL,(void*)&lv);
    if (returnCode != LDAP_SUCCESS)
        goto FatalExit;

Und genau an der Stelle komme ich jetzt nicht weiter.