1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/nsprpub/config/nfspwd.pl Wed Dec 31 06:09:35 2014 +0100 1.3 @@ -0,0 +1,18 @@ 1.4 +#! perl 1.5 +# 1.6 +# This Source Code Form is subject to the terms of the Mozilla Public 1.7 +# License, v. 2.0. If a copy of the MPL was not distributed with this 1.8 +# file, You can obtain one at http://mozilla.org/MPL/2.0/. 1.9 + 1.10 +require "fastcwd.pl"; 1.11 + 1.12 +$_ = &fastcwd; 1.13 +if (m@^/[uh]/@o || s@^/tmp_mnt/@/@o) { 1.14 + print("$_\n"); 1.15 +} elsif ((($user, $rest) = m@^/usr/people/(\w+)/(.*)@o) 1.16 + && readlink("/u/$user") eq "/usr/people/$user") { 1.17 + print("/u/$user/$rest\n"); 1.18 +} else { 1.19 + chop($host = `hostname`); 1.20 + print("/h/$host$_\n"); 1.21 +}