summaryrefslogtreecommitdiffstats
path: root/nsprpub/config/nfspwd.pl
diff options
context:
space:
mode:
Diffstat (limited to 'nsprpub/config/nfspwd.pl')
-rw-r--r--nsprpub/config/nfspwd.pl18
1 files changed, 18 insertions, 0 deletions
diff --git a/nsprpub/config/nfspwd.pl b/nsprpub/config/nfspwd.pl
new file mode 100644
index 000000000..1e66be356
--- /dev/null
+++ b/nsprpub/config/nfspwd.pl
@@ -0,0 +1,18 @@
+#! perl
+#
+# This Source Code Form is subject to the terms of the Mozilla Public
+# License, v. 2.0. If a copy of the MPL was not distributed with this
+# file, You can obtain one at http://mozilla.org/MPL/2.0/.
+
+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");
+}