summaryrefslogtreecommitdiffstats
path: root/ldap/admin/src/CreateInstall.pl
diff options
context:
space:
mode:
authorRich Megginson <rmeggins@redhat.com>2005-10-21 19:21:19 +0000
committerRich Megginson <rmeggins@redhat.com>2005-10-21 19:21:19 +0000
commit35f8ea348b5f4c08f8e09130db59abddd849d870 (patch)
tree4089978c5ec8c123e0c4c81bc8b7f06683bca8a7 /ldap/admin/src/CreateInstall.pl
parent8216af284bf01728074d474131ae781e6033055c (diff)
downloadds-35f8ea348b5f4c08f8e09130db59abddd849d870.tar.gz
ds-35f8ea348b5f4c08f8e09130db59abddd849d870.tar.xz
ds-35f8ea348b5f4c08f8e09130db59abddd849d870.zip
Bug(s) fixed: 171066
Bug Description: Get rid of nsperl; use perldap with system perl Reviewed by: Noriko, Rob, Nathan (Thanks!) Branch: HEAD Fix Description: All perl scripts are made executable by using the #!/usr/bin/env perl *nix trick. This means that the correct version of perl must be in the user's PATH e.g. 5.6.1 or later. This version is either shipped with the OS or available on all platforms. On HP/ux, it is available as a depot which is installed in /opt/perl. For CGI perl scripts, the PATH can be set in the admserv.conf, so we may have to do that for HP/ux. To make perldap work, some ugly hacks are involved. Each perl script that uses perldap has a BEGIN section that figures out where it is in the server root, sets a server root variable, and sets LD_LIBRARY_PATH and SHLIB_PATH to point to serverroot/shared/lib. Perldap will be installed under serverroot/lib/perl. This directory will have 3 subdirectories: arch - containing the binary files; auto - containing autoloaded perl modules; and Mozilla - containing the base perldap .pm files. The BEGIN section also sets the perl INC path to find those modules. The directory gets rid of nsperl plus a lot of old crufty perl building code that we do not use anymore. Those are the removed files. The admin server code also gets rid of the perl.c wrapper. Noriko pointed out that this does not take care of upgrade install, so I added several more files and diffs to take care of that case. Basically, go through the tasks in o=netscaperoot and replace perl?scriptname with just scriptname. Also, go through all of the template generated scripts and replace the shebang line with #!/usr/bin/env perl, and make sure they are chmod +x. I also found a few more places that referenced nsperl and removed them. Platforms tested: RHEL4 Flag Day: no Doc impact: no QA impact: should be covered by regular nightly and manual testing New Tests integrated into TET: none
Diffstat (limited to 'ldap/admin/src/CreateInstall.pl')
-rw-r--r--ldap/admin/src/CreateInstall.pl66
1 files changed, 0 insertions, 66 deletions
diff --git a/ldap/admin/src/CreateInstall.pl b/ldap/admin/src/CreateInstall.pl
deleted file mode 100644
index de15fdac..00000000
--- a/ldap/admin/src/CreateInstall.pl
+++ /dev/null
@@ -1,66 +0,0 @@
-#!perl
-#
-# BEGIN COPYRIGHT BLOCK
-# This Program is free software; you can redistribute it and/or modify it under
-# the terms of the GNU General Public License as published by the Free Software
-# Foundation; version 2 of the License.
-#
-# This Program is distributed in the hope that it will be useful, but WITHOUT
-# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-# FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License along with
-# this Program; if not, write to the Free Software Foundation, Inc., 59 Temple
-# Place, Suite 330, Boston, MA 02111-1307 USA.
-#
-# In addition, as a special exception, Red Hat, Inc. gives You the additional
-# right to link the code of this Program with code not covered under the GNU
-# General Public License ("Non-GPL Code") and to distribute linked combinations
-# including the two, subject to the limitations in this paragraph. Non-GPL Code
-# permitted under this exception must only link to the code of this Program
-# through those well defined interfaces identified in the file named EXCEPTION
-# found in the source code files (the "Approved Interfaces"). The files of
-# Non-GPL Code may instantiate templates or use macros or inline functions from
-# the Approved Interfaces without causing the resulting work to be covered by
-# the GNU General Public License. Only Red Hat, Inc. may make changes or
-# additions to the list of Approved Interfaces. You must obey the GNU General
-# Public License in all respects for all of the Program code and other code used
-# in conjunction with the Program except the Non-GPL Code covered by this
-# exception. If you modify this file, you may extend this exception to your
-# version of the file, but you are not obligated to do so. If you do not wish to
-# provide this exception without modification, you must delete this exception
-# statement from your version and license this file solely under the GPL without
-# exception.
-#
-#
-# Copyright (C) 2001 Sun Microsystems, Inc. Used by permission.
-# Copyright (C) 2005 Red Hat, Inc.
-# All rights reserved.
-# END COPYRIGHT BLOCK
-#
-# figure out what the server root assuming the path to this script is
-# server root/bin/slapd/admin/bin
-
-($serverRoot = $0) =~ s@[\\/]?bin[\\/]slapd[\\/]admin[\\/]bin.*$@@g;
-
-# run the post install program
-$isNT = -d '\\';
-$quote = $isNT ? "\"" : "";
-# make sure the arguments are correctly quoted on NT
-@fixargs = map { /^[\"].*[\"]$/ ? $_ : $quote . $_ . $quote } @ARGV;
-if (! $serverRoot) {
- $serverRoot = ".";
-}
-chdir "$serverRoot/bin/slapd/admin/bin";
-
-# note: exec on NT doesn't work the same way as exec on Unix. On Unix, exec replaces the calling
-# process with the called process. The parent, if waiting for the calling process, will happily
-# wait for it's replacement. On NT however, the parent thinks the calling process has gone, and
-# it doesn't know about the called process, so it stops waiting. So, we have to do a system()
-# on NT to force the calling process to wait for the called process. On Unix, we can do the
-# faster and more memory efficient exec() call.
-if ($isNT) {
- system {'./ds_create'} './ds_create', @fixargs;
-} else {
- exec {'./ds_create'} './ds_create', @fixargs;
-}