diff options
author | cvs2svn <cvs2svn@FreeBSD.org> | 2000-09-23 01:36:53 +0000 |
---|---|---|
committer | cvs2svn <cvs2svn@FreeBSD.org> | 2000-09-23 01:36:53 +0000 |
commit | 8c7499bdfa85657ea6c2517ada0ef4a4db489beb (patch) | |
tree | 1c37a6088704b234484b1352cd1f882fb2a253ad /net/nagios/scripts/createuser | |
parent | Catch up with Wnn6-lib update. (diff) |
This commit was manufactured by cvs2svn to create tag 'RELEASE_4_1_1'.release/4.1.1
Notes
Notes:
svn path=/head/; revision=33029
svn path=/tags/RELEASE_4_1_1/; revision=33030; tag=release/4.1.1
Diffstat (limited to 'net/nagios/scripts/createuser')
-rw-r--r-- | net/nagios/scripts/createuser | 49 |
1 files changed, 0 insertions, 49 deletions
diff --git a/net/nagios/scripts/createuser b/net/nagios/scripts/createuser deleted file mode 100644 index ce858d738462..000000000000 --- a/net/nagios/scripts/createuser +++ /dev/null @@ -1,49 +0,0 @@ -#!/usr/bin/perl -# - -eval '(exit $?0)' && eval 'exec /usr/bin/perl -S $0 ${1+"$@"}' -& eval 'exec /usr/bin/perl -S $0 $argv:q' -if 0; - -if( $> ) { - print "\nYou must be root to run this step!\n\n"; - exit 1; -} - -if( getpwnam( "netsaint" ) ) { - ( $null, $null, $nsUID ) = getpwnam( "netsaint" ); -} else { - $nsUID = 70; - while( getpwuid( $nsUID ) ) { - $nsUID++; - } -} - -if( getgrnam( "netsaint" ) ) { - ( $null, $null, $nsGID ) = getgrnam( "netsaint" ); -} else { - $nsGID = 70; - while( getgrgid( $nsGID ) ) { - $nsGID++; - } - &append_file( "/etc/group", "netsaint:*:$nsGID:" ); -} - -print "netsaint user using uid $nsUID and gid $nsGID\n"; - -system( "/usr/bin/chpass -a \"netsaint:*:$nsUID:$nsGID\:\:0:0:Netsaint pseudo-user:$ENV{'PREFIX'}/netsaint:/bin/sh\"" ); - -sub append_file { - local($file,@list) = @_; - local($LOCK_EX) = 2; - local($LOCK_NB) = 4; - local($LOCK_UN) = 8; - - open(F, ">> $file") || die "$file: $!\n"; - while( ! flock( F, $LOCK_EX | $LOCK_NB ) ) { - exit 1; - } - print F join( "\n", @list) . "\n"; - close F; - flock( F, $LOCK_UN ); -} |