From owner-FreeBSD-users-jp@jp.freebsd.org  Fri Apr 14 17:02:07 2000
Received: (from daemon@localhost)
	by castle.jp.freebsd.org (8.9.3+3.2W/8.7.3) id RAA35653;
	Fri, 14 Apr 2000 17:02:07 +0900 (JST)
	(envelope-from owner-FreeBSD-users-jp@jp.FreeBSD.org)
Received: from ns.intnl.doshisha.ac.jp (ns.intnl.doshisha.ac.jp [202.11.199.11])
	by castle.jp.freebsd.org (8.9.3+3.2W/8.7.3) with ESMTP id RAA35620
	for <FreeBSD-users-jp@jp.freebsd.org>; Fri, 14 Apr 2000 17:01:51 +0900 (JST)
	(envelope-from massa@intnl.doshisha.ac.jp)
Received: from massabox.intnl.doshisha.ac.jp ([202.11.198.32])
	by ns.intnl.doshisha.ac.jp (8.9.3/3.7W) with ESMTP id QAA19902
	for <FreeBSD-users-jp@jp.freebsd.org>; Fri, 14 Apr 2000 16:54:48 +0900 (JST)
To: FreeBSD-users-jp@jp.freebsd.org
From: Masataka Nakauye <massa@intnl.doshisha.ac.jp>
References: <200004131823.BHG14380.TBNBT@intnl.doshisha.ac.jp>
In-Reply-To: <200004131823.BHG14380.TBNBT@intnl.doshisha.ac.jp>
Message-Id: <200004141704.BIF87015.TTBNB@intnl.doshisha.ac.jp>
X-Mailer: Winbiff [Version 2.30PL4]
Date: Fri, 14 Apr 2000 17:04:51 +0900
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-2022-jp
Reply-To: FreeBSD-users-jp@jp.freebsd.org
Precedence: list
X-Distribute: distribute version 2.1 (Alpha) patchlevel 24e+000315
X-Sequence: FreeBSD-users-jp 51160
Subject: [FreeBSD-users-jp 51160] Re: pw =?ISO-2022-JP?B?GyRCJE4bKEI=?=
 =?ISO-2022-JP?B?GyRCJVElOSVvITwlSUZ+Tk8bKEI=?= 
Errors-To: owner-FreeBSD-users-jp@jp.freebsd.org
Sender: owner-FreeBSD-users-jp@jp.freebsd.org
X-Originator: massa@intnl.doshisha.ac.jp

$BCf?"$G$9!#$*@$OC$K$J$C$F$*$j$^$9!#(B
$B$*$+$2$5$^$G%9%/%j%W%H$,=PMh$^$7$?!#(B


####################################
#
# Do registration
#
####################################
sub Regist {
    local($setdef,$uidmax,$makehome,$add,$mkdir,$chown,$chmod,$winbif;
     
    if ($uidbase == 30000) {
      $uidmax = 31999;
    }
    elsif ($uidbase == 1000)
      {
        $uidmax = 9999;
      }
   else {
        $uidmax = $uidbase + 10000;
   }

    $setdef = "/usr/sbin/pw useradd -D -u $uidbase,$uidmax";
    if($mode eq 'check'){
	print $setdef,"\n";
    } else {
	system($setdef);
    }
    foreach $i (keys %newuser){
        $makehome = "mkdir $homebase$newuser{$i}";
	$add = "/usr/sbin/pw useradd $newuser{$i} -d $homebase$newuser{$i} 
-g $group -m -s $shell -c $filename{$i} -h 0 ";
#	$add = "/usr/sbin/pw useradd -g $group -d $homebase$newuser{$i} -s 
$shell -c ' ' -p $passwd{$i} -n $newuser{$i}";

    $chown = "/usr/sbin/chown -R $newuser{$i}.$group ~$newuser{$i}";
	$winbif = &winbifdata($newuser{$i});
    $chmod = "chmod -R go-rwx ~$newuser{$i}";


	if($mode eq 'check'){
            print $add,"\n";
	    print $mkdir,"\n";
	    print $pubmkdir,\n;
	    print "winbif.bif:\n$winbif\n";
	    print $chown,"\n";
	    print $chmod,"\n";
            print $pubchmod, "\n";
	} else {
	    print "making user $newuser{$i}";
	    system($makehome);
            open (PW, "| $add");
            print PW $passwd{$i} . "\n";
            close PW;
   
	    system($pubmkdir);
#	    open(WINBIFF,"| nkf -s > $homebase$newuser{$i}/winbiff.bif");
#	    print WINBIFF $winbif;
#	    close(WINBIFF);
	    system($chown);
	    system($chmod);
    	    print ".....done\n";
	}
    }
}

--
---- Expanding Possibilities--------->
*  Masataka Nakauye		     * 		
*  Network Specialist at             *
*  Doshisha International Highschool *
*  Phone,Fax: 0774-65-8960           *
--------------------------------------
