Hey all- Thanks for everyone's help with the mass user add problem! I have two possible solutions I'm suggesting for the FAQ. One is to use the pdadduser package, available at http://ghs.ssd.k12.wa.us/~pdavis/projects/pdadduser.html. If you've got the time to learn the syntax, this is my suggestion. However, I found this after I had already written the following perl script, that does what I needed it to do. Feel free to use it to your heart's content, if you find it useful. It requires you to have perl (obviously) and Expect installed with the autopasswd Expect script in your /usr/bin directory. Get more info on Expect (a really neat language/tool for automating processes) at http://expect.nist.gov. It's only been tested, however, on my system running RHL 6.0, but it's pretty standard stuff, so I'm not too concerned that it wouldn't be portable. Well, here it is... ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ #!/usr/bin/perl # # NAME: massadd # DESCRIPTION: Perl script to add users from a file and assign them # passwords from another file # # Created 6/15/00 by Brian J. Sweeney # email: [EMAIL PROTECTED] # # PRE: Two files required, user_file of usernames and pass_file of passwords. # Both files have the same format, one item per line. # # POST: All users in user_file created with corresponding passwords in # pass_file. # # NOTE: The first user in the user_file is given the # first password in the pass_file. Make sure you have the same number # of usernames and passwords! Also, notice this script has no bells and # whistles, no checks to make sure the user is doing what they're # supposed to. It's not too robust. # # REQ: The expect language, and the autopasswd expect script. This is # available at http://expect.nist.gov. NOTE FOR RHL USERS: YOU MUST # INSERT THE COMMAND "sleep 1" BETWEEN THE LINES "expect("password:")" # AND "send("password\r")" IN THE AUTOPASSWD EXPECT SCRIPT # BECAUSE OF A BUG IN THE PASSWD COMMAND. This script assumes your # useradd command is in /usr/sbin, and your autopasswd script is in # /usr/bin. It also (obviously) requires perl! # # Like everything else in the world, this script comes with no guarantees! # I am not responsible if somehow it manages to destroy your computer and/or slay your dog, or # does anything else you didn't want it too! Also, be sure to DESTROY THE PASSWORD FILE # after you use this script, otherwise it's a HUGE security hole! $count=0; if (open(NAME_FILE,"user_file")){ @user_names = <NAME_FILE>; chop (@user_names); print ("Names opened\n"); } if (open(PASS_FILE, "pass_file")){ @passwords = <PASS_FILE>; chop (@passwords); print ("Passwords opened\n"); } close (NAME_FILE); close (PASS_FILE); foreach $user (@user_names) { $pass = @passwords[$count]; print("$count\n"); print("$user\n"); print("$pass\n"); system("/usr/sbin/useradd $user"); system("/usr/bin/autopasswd $user $pass"); print("User $user created with password $pass! \n"); $count++; } ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ _______________________________________________ techtalk mailing list [EMAIL PROTECTED] http://www.linux.org.uk/mailman/listinfo/techtalk
