head 1.3; access; symbols pkgsrc-2013Q2:1.3.0.54 pkgsrc-2013Q2-base:1.3 pkgsrc-2012Q4:1.3.0.52 pkgsrc-2012Q4-base:1.3 pkgsrc-2011Q4:1.3.0.50 pkgsrc-2011Q4-base:1.3 pkgsrc-2011Q2:1.3.0.48 pkgsrc-2011Q2-base:1.3 pkgsrc-2009Q4:1.3.0.46 pkgsrc-2009Q4-base:1.3 pkgsrc-2008Q4:1.3.0.44 pkgsrc-2008Q4-base:1.3 pkgsrc-2008Q3:1.3.0.42 pkgsrc-2008Q3-base:1.3 cube-native-xorg:1.3.0.40 cube-native-xorg-base:1.3 pkgsrc-2008Q2:1.3.0.38 pkgsrc-2008Q2-base:1.3 pkgsrc-2008Q1:1.3.0.36 pkgsrc-2008Q1-base:1.3 pkgsrc-2007Q4:1.3.0.34 pkgsrc-2007Q4-base:1.3 pkgsrc-2007Q3:1.3.0.32 pkgsrc-2007Q3-base:1.3 pkgsrc-2007Q2:1.3.0.30 pkgsrc-2007Q2-base:1.3 pkgsrc-2007Q1:1.3.0.28 pkgsrc-2007Q1-base:1.3 pkgsrc-2006Q4:1.3.0.26 pkgsrc-2006Q4-base:1.3 pkgsrc-2006Q3:1.3.0.24 pkgsrc-2006Q3-base:1.3 pkgsrc-2006Q2:1.3.0.22 pkgsrc-2006Q2-base:1.3 pkgsrc-2006Q1:1.3.0.20 pkgsrc-2006Q1-base:1.3 pkgsrc-2005Q4:1.3.0.18 pkgsrc-2005Q4-base:1.3 pkgsrc-2005Q3:1.3.0.16 pkgsrc-2005Q3-base:1.3 pkgsrc-2005Q2:1.3.0.14 pkgsrc-2005Q2-base:1.3 pkgsrc-2005Q1:1.3.0.12 pkgsrc-2005Q1-base:1.3 pkgsrc-2004Q4:1.3.0.10 pkgsrc-2004Q4-base:1.3 pkgsrc-2004Q3:1.3.0.8 pkgsrc-2004Q3-base:1.3 pkgsrc-2004Q2:1.3.0.6 pkgsrc-2004Q2-base:1.3 pkgsrc-2004Q1:1.3.0.4 pkgsrc-2004Q1-base:1.3 pkgsrc-2003Q4:1.3.0.2 pkgsrc-2003Q4-base:1.3 buildlink2-base:1.3; locks; strict; comment @# @; 1.3 date 98.06.05.14.09.43; author agc; state dead; branches; next 1.2; 1.2 date 98.05.08.21.56.02; author hubertf; state Exp; branches; next 1.1; 1.1 date 98.05.07.17.10.49; author agc; state Exp; branches; next ; desc @@ 1.3 log @Use addnerd to add the user, rather than a custom Perl script. @ text @#!/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; } @@ARGV = "backup" unless @@ARGV; $backup = $ARGV[0]; if( getpwnam( $backup ) ) { ( $null, $null, $newUID ) = getpwnam( $backup ); $addname = 0; } else { $newUID = 70; while( getpwuid( $newUID ) ) { $newUID++; } $addname = 1; } if( getgrnam( $backup ) ) { ( $null, $null, $newGID ) = getgrnam( $backup ); } else { $newGID = 70; while( getgrgid( $newGID ) ) { $newGID++; } &append_file( "/etc/group", "${backup}:*:${newGID}:" ); } print "Amanda user $backup using uid $newUID\n"; print "Amanda user $backup using gid $newGID\n"; if ($addname) { system( "/usr/bin/chpass -l -a \"$backup:*************:${newUID}:${newGID}::0:0:Amanda backup user:$ENV{'PREFIX'}/$backup:/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 ); } @ 1.2 log @use -l switch to chpass (eww, undocumented :-/), to work even when NIS is set up @ text @@ 1.1 log @Remove unnecessary configure script - 2.4.0 comes with a GNU autoconf one. Add a createuser Perl script, based on the one in databases/postgresql, which is used to ensure that the Amanda backup user exists. @ text @d42 1 a42 1 system( "/usr/bin/chpass -a \"$backup:*************:${newUID}:${newGID}::0:0:Amanda backup user:$ENV{'PREFIX'}/$backup:/bin/sh\"" ); @