[Delphi] gecodeerd wachtwoord opslaan in database

Pagina: 1
Acties:

  • Tomatoman
  • Registratie: November 2000
  • Laatst online: 20:54

Tomatoman

Fulltime prutser

Topicstarter
In een database wil ik wachtwoorden opslaan. Al is beveiliging niet erg belangrijk in deze toepassing, toch wil ik de wachtwoorden niet zomaar in een tabel zetten. Ik wil in Delphi het wachtwoord via een algoritme coderen en het gecodeerde wachtwoord in de tabel zetten. Als een gebruiker inlogt, wordt het wachtwoord dat hij opgeeft met datzelfde algoritme gecodeerd en als het resultaat overeenkomt met de waarde in de tabel, heeft de gebruiker blijkbaar het goede wachtwoord ingetypt.

Coderen moet eenvoudig zijn, maar decoderen moeilijk of onmogelijk. Je voelt hem al: wat is een geschikt coderingsalgoritme?

Er is al meer over dit onderwerp geschreven, maar een hint dat bijvoorbeeld 3DES hiervoor geschikt is, helpt me niet echt verder. Graag net iets concreter dus :).

[ Voor 12% gewijzigd door Tomatoman op 24-11-2002 04:20 ]

Een goede grap mag vrienden kosten.


  • Reptile209
  • Registratie: Juni 2001
  • Laatst online: 20:19

Reptile209

- gers -

MD5 is een heel goeie. Het werkt inderdaad in 1 richting. Het MSN-Messenger-authenticatie protocol gebruikt 'm ook.

Daar bestaan mooie delphi-componentjes voor:
http://www.delphicity.net/component.asp?componentid=1069
http://www.torry.net/crypting.htm (zoeken op MD5)
[google=md5 encode component delphi]

[ Voor 28% gewijzigd door Reptile209 op 24-11-2002 04:21 ]

Zo scherp als een voetbal!


  • Tomatoman
  • Registratie: November 2000
  • Laatst online: 20:54

Tomatoman

Fulltime prutser

Topicstarter
Thanks Reptile209, da's precies wat ik nodig heb. Blijkbaar heb ik op de verkeerde plaatsen gezocht. :o

[Edit]
MD5 blijkt onverwacht voordeel te hebben. Het genereert een hash van 16 bytes, wat precies overeenkomt met de lengte van een GUID. En laat een GUID nou een standaard datatype zijn in veel databases. Dat slaat een stuk eenvoudiger op dan een 128-bits getal.

[ Voor 60% gewijzigd door Tomatoman op 24-11-2002 05:10 ]

Een goede grap mag vrienden kosten.


  • LordLarry
  • Registratie: Juli 2001
  • Niet online

LordLarry

Aut disce aut discede

Als ik me niet vergis kan Indy ook een MD5 uitrekenen

We adore chaos because we like to restore order - M.C. Escher


  • jelmervos
  • Registratie: Oktober 2000
  • Niet online

jelmervos

Simple user

Topic volledig makend: http://www.fichtner.net/delphi/md5/

Werkt perfect. Gewoon unit in je uses sectie en gebruiken maar. Mocht je toch nog een voorbeeld willen hebben dan hoor ik dit wel.

"The shell stopped unexpectedly and Explorer.exe was restarted."