Index: third_party/nspr/mozilla/nsprpub/config/nfspwd.pl |
diff --git a/third_party/nspr/mozilla/nsprpub/config/nfspwd.pl b/third_party/nspr/mozilla/nsprpub/config/nfspwd.pl |
new file mode 100644 |
index 0000000000000000000000000000000000000000..947b822ae5692c8259e4abc8e905f249a3055ce3 |
--- /dev/null |
+++ b/third_party/nspr/mozilla/nsprpub/config/nfspwd.pl |
@@ -0,0 +1,50 @@ |
+#! perl |
+# |
+# ***** BEGIN LICENSE BLOCK ***** |
+# Version: MPL 1.1/GPL 2.0/LGPL 2.1 |
+# |
+# The contents of this file are subject to the Mozilla Public License Version |
+# 1.1 (the "License"); you may not use this file except in compliance with |
+# the License. You may obtain a copy of the License at |
+# http://www.mozilla.org/MPL/ |
+# |
+# Software distributed under the License is distributed on an "AS IS" basis, |
+# WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License |
+# for the specific language governing rights and limitations under the |
+# License. |
+# |
+# The Original Code is the Netscape Portable Runtime (NSPR). |
+# |
+# The Initial Developer of the Original Code is |
+# Netscape Communications Corporation. |
+# Portions created by the Initial Developer are Copyright (C) 1998-2000 |
+# the Initial Developer. All Rights Reserved. |
+# |
+# Contributor(s): |
+# |
+# Alternatively, the contents of this file may be used under the terms of |
+# either the GNU General Public License Version 2 or later (the "GPL"), or |
+# the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), |
+# in which case the provisions of the GPL or the LGPL are applicable instead |
+# of those above. If you wish to allow use of your version of this file only |
+# under the terms of either the GPL or the LGPL, and not to allow others to |
+# use your version of this file under the terms of the MPL, indicate your |
+# decision by deleting the provisions above and replace them with the notice |
+# and other provisions required by the GPL or the LGPL. If you do not delete |
+# the provisions above, a recipient may use your version of this file under |
+# the terms of any one of the MPL, the GPL or the LGPL. |
+# |
+# ***** END LICENSE BLOCK ***** |
+ |
+require "fastcwd.pl"; |
+ |
+$_ = &fastcwd; |
+if (m@^/[uh]/@o || s@^/tmp_mnt/@/@o) { |
+ print("$_\n"); |
+} elsif ((($user, $rest) = m@^/usr/people/(\w+)/(.*)@o) |
+ && readlink("/u/$user") eq "/usr/people/$user") { |
+ print("/u/$user/$rest\n"); |
+} else { |
+ chop($host = `hostname`); |
+ print("/h/$host$_\n"); |
+} |