From 733a9d146649f4cf07fb9b8331afaa131b5390d2 Mon Sep 17 00:00:00 2001 From: James FitzGibbon Date: Wed, 2 Apr 1997 18:18:04 +0000 Subject: Remove now obsolete postgres95 port Clean up newly imported PostgreSQL port: - variable reorganization and cleanup - remove NOMANCOMPRESS conditional in favour of MAN?= - prevent import of installing user's $PATH into ${PREFIX}/pgsql/.profile - change package name to remove 'v' - remove some of the latent bugs left over from the postgres95 port. --- .../postgresql-devel-server/scripts/createuser | 50 ---------------------- 1 file changed, 50 deletions(-) delete mode 100644 databases/postgresql-devel-server/scripts/createuser (limited to 'databases/postgresql-devel-server/scripts/createuser') diff --git a/databases/postgresql-devel-server/scripts/createuser b/databases/postgresql-devel-server/scripts/createuser deleted file mode 100644 index 4c24a164fbd6..000000000000 --- a/databases/postgresql-devel-server/scripts/createuser +++ /dev/null @@ -1,50 +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( "postgres" ) ) { - ( $null, $null, $pgUID ) = getpwnam( "postgres" ); -} else { - $pgUID = 70; - while( getpwuid( $pgUID ) ) { - $pgUID++; - } -} - -if( getgrnam( "postgres" ) ) { - ( $null, $null, $pgGID ) = getgrnam( "postgres" ); -} else { - $pgGID = 70; - while( getgrgid( $pgGID ) ) { - $pgGID++; - } - &append_file( "/etc/group", "postgres:*:$pgGID:" ); -} - -print "postgres user using uid $pgUID\n"; -print "postgres user using gid $pgGID\n"; - -system( "/usr/bin/chpass -a \"postgres:*:$pgUID:$pgGID::0:0:Postgres95 pseudo-user:$ENV{'PREFIX'}/postgres95:/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 ); -} -- cgit v1.2.3