获取当前工作目录而不解析符号链接

Question

Sys.getcwd 似乎总是 return 当前目录的“真实路径”，自动解析符号链接。

例如：

$ cd /tmp
$ mkdir real
$ ln -s real symlink
$ cd symlink
$ ocaml

# Unix.getcwd();;
- : string = "/tmp/real"

如何获得 shell 看到的“实际”cwd，即 /tmp/symlink，理想情况下不需要外部库？

Answer 1

我假设您使用的是类 Unix 系统（Linux 或类似系统）。

传统上，在 Unix 中，“实际”当前目录是文件系统中特定的打开文件，而不是字符串。获取此目录的字符串表示的方法需要搜索包含目录中的文件及其包含目录，依此类推直至文件系统的根目录。

由于硬链接和软链接，同一个文件可以有多个名称。所以这个搜索过程没有一个结果。

此外，这是一个相当缓慢的过程。为了避免重复搜索，shell 倾向于缓存他们对当前目录名称的想法。您要求的是从其他进程中找出 shell 中此缓存的内容。这在一般情况下是不可能的。

然而，许多shells 定义了一个环境变量与当前目录的名称。所以你可以试试这个：

$ mkdir real
$ ln -s real symlink
$ cd symlink
$ ocaml
        OCaml version 4.10.0

# Sys.getenv "PWD";;
- : string = "/Users/jeffsco/tryhofp/symlink"

作为旁注，shell 完全有可能对当前目录的名称有误：

$ mkdir mydir
$ cd mydir
$ mv /Users/jeffsco/mydir /Users/jeffsco/otherdir
$ pwd
/Users/jeffsco/mydir
$ ls /Users/jeffsco/mydir
ls: /Users/jeffsco/mydir: No such file or directory
$ /bin/pwd
/Users/jeffsco/otherdir

这里的要点是 pwd 是一个 shell 内置的，显示 shell 认为是当前目录的名称。但是 shell 是错误的。 /bin/pwd 命令执行我上面描述的搜索，它获取当前目录的真实名称。

获取当前工作目录而不解析符号链接

Getting current working directory without resolving symlinks

ocaml