[Ecls-list] not to resolve symlinks

Gábor Balázs gabalz at gmail.com
Wed Oct 26 16:14:45 UTC 2011


If it should, then maybe there is a bug:

TEST> ls -l
total 4
drwxr-xr-x 2 bege users 4096 Oct 25 23:25 dir
lrwxrwxrwx 1 bege users    3 Oct 25 23:25 dir-link -> dir
-rw-r--r-- 1 bege users    0 Oct 25 23:25 file
lrwxrwxrwx 1 bege users    4 Oct 25 23:25 file-link -> file

ECL (Embeddable Common-Lisp) 11.1.1
Copyright (C) 1984 Taiichi Yuasa and Masami Hagiya
Copyright (C) 1993 Giuseppe Attardi
Copyright (C) 2000 Juan J. Garcia-Ripoll

> (directory "./*")
(#P"/home/bege/TEST/file" #P"/home/bege/TEST/file")

> (directory "./*" :resolve-symlinks nil)
(#P"/home/bege/TEST/file" #P"/home/bege/TEST/file") ; no difference (file
symlinks are resolved)

> (directory "./*/")
(#P"/home/bege/TEST/dir/" #P"/home/bege/TEST/dir/")

> (directory "./*/" :resolve-symlink nil)
(#P"/home/bege/TEST/dir/" #P"/home/bege/TEST/dir/")    ; no difference
(directory symlinks are resolved)

Or maybe I just don't know what is the proper keyword as ECL accepts
everything.
>From ECL's unixfsys.d file:

@(defun directory (mask &key &allow_other_keys)

Furthermore by checking the list_directory function, the resolve-symlink
functionality doesn't seem to be implemented:

component_path = file_truename(component_path, component);
kind = VALUES(1);
out = CONS(CONS(component_path, kind), out);

Or maybe I just cannot figure out how to use it...
Thanks,
`bg`


2011/10/26 Juan Jose Garcia-Ripoll <juanjose.garciaripoll at googlemail.com>

> 2011/10/26 Gábor Balázs <gabalz at gmail.com>
>
>> Is there a way with ECL not to resolve symlinks in directory listings?
>> Like other Lisp implementations (eg. SBCL) usually have an option like : (directory
>> "/tmp/*" :resolve-symlinks nil)
>
>
> Same syntax (:resolve-symlinks) should work.
>
> Juanjo
>
> --
> Instituto de Física Fundamental, CSIC
> c/ Serrano, 113b, Madrid 28006 (Spain)
> http://juanjose.garciaripoll.googlepages.com
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/ecl-devel/attachments/20111026/14cc3677/attachment.html>


More information about the ecl-devel mailing list