mieki256's diary

_まめぷろ　ゆうざあ一発！

Perlスクリプトでユーザアカウントを作成してる例、らしい。

_Manpage of CHPASSWD
_Linuxのユーザーのパスワードを一括変更するスクリプト
_パスワードをバッチ処理で一斉更新する
_システム管理/ユーザの追加2 - PukiWiki

こんなコマンドがあったのか…。

user_list.txt を読み込んでユーザアカウントを一括作成。

#!/usr/bin/perl -w

use strict;
use warnings;

my $filename = "user_list.txt";

print "add new user\n";

open(IN,$filename) || die "Can't open $filename : $!";
while(<IN>) {
    chomp;
    next if /^\#/;
    next if /^\s*$/;

    my ($user, $pass, $uid, $gid, $gecos, $homedir, $shellname)
        = split(/:/, $_ );
    print "$user , $pass , $uid , $gid , $gecos , $homedir , $shellname\n";
    if ( 0 ) {
        print "/usr/sbin/useradd -u $uid -g $gid -d $homedir -s $shellname -m $user", "\n";
    } else {
        `/usr/sbin/useradd -u $uid -g $gid -d $homedir -s $shellname -m $user`;
        open(CMD, "| /usr/sbin/chpasswd > /dev/null");
        print CMD "$user:$pass\n";
        close(CMD);
    }
}
close(IN);
exit;

user_list.txt の内容。

# user list

hoge:pass:500:501::/home/hoge:/bin/bash
piyo:pass:500:501::/home/piyo:/sbin/nologin

とかそんな感じで。

_＠IT：ファイル新規作成時のパーミッションを変更するには

上記スクリプトを動かしたら、作成されたディレクトリのパーミッションが 700 になって困った。/etc/login.defs 中で UMASK 077 が指定されてた。該当行をコメントアウト。何も指定しなければ UMASK 022 になる = ディレクトリのパーミッションは 755 になるらしい。