Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  AW: [gelöst]Impersonate in TService

    Delphi
    by Tonic1024, 3. Sep 2013
  Stimmt schon. Aber würde ich jetzt mit bösen Absichten hier sitzen, hätte ich den Abschnitt im MSDN auch gefunden. Darum leuchtet mir nicht ein in wie fern das die API oder Das Betriebsystem im Ganzen jetzt sicherer gemacht hat. Aber darüber ließe sich sicher vortrefflich Tagelang diskutieren...
  
  Der Grundgedanke dahinter wird wohl sein dass das Passwort nicht unnötigerweise in Klartext...
• Forum: Win32/Win64 API (native code)

  AW: [gelöst]Impersonate in TService

    Delphi
    by Tonic1024, 3. Sep 2013
  Nachmal ein Nachtrag von mir. Ich hab noch Probleme gehabt mich auf eine Samba-Freigabe zu verbinden nachdem das Impersonate erfolgreich verlaufen ist.
  
  Windows prüft über die API nur die Korrektheit des Passworts als Hashwert, merkt es sich aber nicht in Klartext. Darum ist es ihm nicht möglich das Passwort bei der Anmeldung am Samba-Dienst zu übergeben. Kein Bug, ein "Sicherheitsfeature",...
• Forum: Win32/Win64 API (native code)

  AW: [gelöst]Impersonate in TService

    Delphi
    by Tonic1024, 22. Aug 2013
  Ich installiere und starte den Service wie hier beschrieben. Nackt, Straight und ohne irgendwelche Extras.
  
  Mein Log sieht jetzt so aus:
  
  
  vorher-SYSTEM
  nachher-Toni
  revert-SYSTEM
• Forum: Win32/Win64 API (native code)

  AW: [gelöst]Impersonate in TService

    Delphi
    by Tonic1024, 22. Aug 2013
  Meine weiteren Recherchen haben das Problem eingekreist und schlußendlich die Lösung zu Tage gefördert.
  
  Für die, die zukünftig mal ähnliche Probleme haben hier die Lösung:
  
  
  function Impersonate(const aUser, aPass: string): Boolean;
  
  begin
  LogonType := LOGON32_LOGON_NETWORK; //LOGON32_LOGON_INTERACTIVE;
• Forum: Win32/Win64 API (native code)

  AW: Impersonate in TService

    Delphi
    by Tonic1024, 22. Aug 2013
  Klingt plausibel.
  
  Ich hab also jetzt testweise den Dienst mal unter meinem Admin-"Personen-Konto" gestartet und ein Impersonate versucht. Selbes Problem.
  
  Ausserdem hab ich diverse Konstelationen getestet, die den selben Code unter dem Selben Admin-Konto in einer Desktop-Applikation ausführt. Dort funktioniert er weiterhin wie gewohnt und es wird auch keine UAC-Meldung geworfen.
  
  
  ...
• Forum: Win32/Win64 API (native code)

  AW: Impersonate in TService

    Delphi
    by Tonic1024, 22. Aug 2013
  Der Kompiler hat in sofern etwas damit zu tun, dass er mir einen Button auf dem Form kompiliert hat, der den Dienst so wie er ist Installiert und startet. Oldschool. Hab ein zugegebenermaßen schon recht altes Tutorial verwendet um mich da ein zu arbeiten.
  
  Hab mich noch den ganzen Abend versucht schlau zu lesen in Bezug auf "Managed Service Accounts". Scheint ja nu state of the Art zu sein....
• Forum: Win32/Win64 API (native code)

  AW: Impersonate in TService

    Delphi
    by Tonic1024, 21. Aug 2013
  Was ist den unordentlich wenn man den Dienst so installiert wie er aus dem Kompiler kommt?
• Forum: Win32/Win64 API (native code)

  [gelöst]Impersonate in TService

    Delphi
    by Tonic1024, 21. Aug 2013
  Hi zusammen...
  
  Ich verwende seit ewigen Zeiten das Impersonate von Luckies webseite. Klappt auch immer ganz prima. Nur leider scheinen die Gegebenheiten innerhalb eines Services etwas anders.
  
  Hier ist mein Code:
  
  function Impersonate(const aUser, aPass: string): Boolean;
  var
  LogonType : Integer;
  LogonProvider : Integer;