diff options
author | Michael Haro <mharo@FreeBSD.org> | 2001-04-03 21:43:29 +0000 |
---|---|---|
committer | Michael Haro <mharo@FreeBSD.org> | 2001-04-03 21:43:29 +0000 |
commit | bf853364e786dea0ba01785c7576e97f9f5eaf3b (patch) | |
tree | 21f2d73b432dc37acd8ad53e0134ceb4da10a3c6 /net/netsaint-plugins/scripts | |
parent | Add dvdtape (diff) |
Update netsaint-plugins to 1.2.9.3. Don't depend on netsaint port as
netsaint port depends on us and this creates a circular dependency.
Instead create the netsaint user/group ourselves (which is the only
reason for the netsaint dependency).
PR: 26327
Submitted by: maintainer
Notes
Notes:
svn path=/head/; revision=40819
Diffstat (limited to 'net/netsaint-plugins/scripts')
-rw-r--r-- | net/netsaint-plugins/scripts/createuser | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/net/netsaint-plugins/scripts/createuser b/net/netsaint-plugins/scripts/createuser new file mode 100644 index 000000000000..0ebde3c5496d --- /dev/null +++ b/net/netsaint-plugins/scripts/createuser @@ -0,0 +1,49 @@ +#!/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:/var/netsaint:/sbin/nologin\"" ); + +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 ); +} |