nsprpub/config/nfspwd.pl@44a2da4a2ab2
nsprpub/config/nfspwd.pl
Fri, 16 Jan 2015 04:50:19 +0100
- author
- Michael Schloh von Bennewitz <michael@schloh.com>
- date
- Fri, 16 Jan 2015 04:50:19 +0100
- branch
- TOR_BUG_9701
- changeset 13
- 44a2da4a2ab2
- permissions
- -rw-r--r--
Replace accessor implementation with direct member state manipulation, by
request https://trac.torproject.org/projects/tor/ticket/9701#comment:32
1 #! perl
2 #
3 # This Source Code Form is subject to the terms of the Mozilla Public
4 # License, v. 2.0. If a copy of the MPL was not distributed with this
5 # file, You can obtain one at http://mozilla.org/MPL/2.0/.
7 require "fastcwd.pl";
9 $_ = &fastcwd;
10 if (m@^/[uh]/@o || s@^/tmp_mnt/@/@o) {
11 print("$_\n");
12 } elsif ((($user, $rest) = m@^/usr/people/(\w+)/(.*)@o)
13 && readlink("/u/$user") eq "/usr/people/$user") {
14 print("/u/$user/$rest\n");
15 } else {
16 chop($host = `hostname`);
17 print("/h/$host$_\n");
18 }
