[fpc-pascal]Crypt() or shadow stuff

[Michael.VanCanneyt at Wisa.be]

On Thu, 29 Aug 2002, Martyn Ranyard wrote:

>
> Hi all,
>
>    I have now a working TCP/IP server program written in FreePascal and
> want to add authentification to it.
>
>    With the DES unit, I can see if the following is true, but this only
> works if the password is in /etc/passwd :
>
>    userpass = crypt(typedpass, typedpass)
>
>    but this unit doesn't allow for the $1 -style passwords so how do I
> verify the password if it is in /etc/shadow?
>
> Code snippet anyone?

I can give you a set of units which should do this, yes.

Michael.