使用运行程序时如何提供正确的路径

Question

例如，我有一堆这样的文件名：

[foo

我正在编写一些代码来收集它们并对其进行一些处理。

(setf a (car (uiop:directory-files "/path/to/dir")));;for simplicity
                                              ;;we suppose there is only a [foo at /path/to/dir
(uiop:run-program (list "cat" (namestring a)));; cat is just an example

然后它是这样说的：

 Subprocess #<UIOP/LAUNCH-PROGRAM::PROCESS-INFO {1009C93CA3}>
 with command ("cat" "/path/to/dir/\\[foo")
 exited with error code 1

虽然(uiop:run-program (list "cat" "/path/to/dir/\[asd")) 看起来不错。

我也试过这样的：

(format NIL "~A" a)
(format NIL "~S" temp)
(princ-to-string temp)

那么如何使用正确的路径名调用运行程序？

Answer 1

对于 SBCL，真实名称是可读的，SBCL 允许在其路径名中使用方括号作为通配符，因此它需要在打印的表示中对它们进行转义。例如：

#P"d[0-9]"

有一个pathname-name，即：

#<SB-IMPL::PATTERN "d" (:CHARACTER-SET . "0-9")>

当我测试您的示例并检查路径名时，我看到：

A pathname.                                                                                                                                                                                                                                                             
Namestring: "/tmp/\\[a"                                                                                                                                                                                                                                                 
Host: #<SB-IMPL::UNIX-HOST {100010D983}>                                                                                                                                                                                                                                
Device: NIL                                                                                                                                                                                                                                                             
Directory: (:ABSOLUTE "tmp")                                                                                                                                                                                                                                            
Name: "[a"                                                                                                                                                                                                                                                              
Type: NIL                                                                                                                                                                                                                                                               
Version: :NEWEST                                                                                                                                                                                                                                                        
Truename: #P"/tmp/\\[a"   

所以，组件是可以的：路径名不包含括号，但路径名需要用括号打印才能可读。

不要求以直接作为本机文件名的方式打印路径名，但在 SBCL 中有一个本机文件名接口，documented here。

或者，您可以拨打(uiop:unix-namestring file)。