Generating password string in /var/nis/passwd with Perl

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]



Hello,

in our network we have AD (Win 2003) for user authentication
under Windows and NIS (CentOS 5.2) for same under Linux:

# rpm -qf /var/yp
filesystem-2.4.0-1.el5.centos
ypbind-1.19-8.el5
yp-tools-2.9-0.1
ypserv-2.19-3

I have written a CGI Script to add new users both to AD and
NIS and also to create the home dirs at our NetApp-Filer.
Unfortunately some steps still have to be made by hand
(the sysadmin copy-pastes it from a browser to a shell).

I could skip one manual step (calling yppasswd) if I knew
how to generate the passwd string for /var/nis/passwd:

farber:oav3dV4.Mnj/.:10154153:5725:Alexander
Farber,jn-05/02,,,,:/home/farber:/bin/bash

Has anybody already figured out, how to do it from Perl?
I'm sure there must be some way (smth. with Perl's crypt).

Regards
Alex

PS: Here is my script: http://pastebin.com/m46057a70
       feel free to modify and use
_______________________________________________
CentOS mailing list
CentOS@xxxxxxxxxx
http://lists.centos.org/mailman/listinfo/centos

[Index of Archives]     [CentOS]     [CentOS Announce]     [CentOS Development]     [CentOS ARM Devel]     [CentOS Docs]     [CentOS Virtualization]     [Carrier Grade Linux]     [Linux Media]     [Asterisk]     [DCCP]     [Netdev]     [Xorg]     [Linux USB]
  Powered by Linux