[bug #33815] `canonicalize-path' leads `primitive-load' to stat like crazy [2.0.2]

[Ludovic Courtès]

URL:
  <http://savannah.gnu.org/bugs/?33815>

                 Summary: `canonicalize-path' leads `primitive-load' to stat
like crazy [2.0.2]
                 Project: Guile
            Submitted by: civodul
            Submitted on: Fri 22 Jul 2011 12:35:58 PM GMT
                Category: None
                Severity: 4 - Important
              Item Group: None
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open
         Discussion Lock: Any

    _______________________________________________________

Details:

Hello,

#v+
$ unset GUILE_LOAD_PATH
$ unset GUILE_LOAD_COMPILED_PATH

$ strace -e lstat,stat guile -c 1

[...]

stat("/home/ludo/soft/share/guile/2.0/ice-9/eval.scm", {st_mode=S_IFREG|0644,
st_size=18985, ...}) = 0
stat("/home/ludo/soft/lib/guile/2.0/ccache/ice-9/eval.go",
{st_mode=S_IFREG|0644, st_size=11929, ...}) = 0
stat("/home/ludo/soft/share/guile/2.0/ice-9/eval.scm", {st_mode=S_IFREG|0644,
st_size=18985, ...}) = 0
stat("/home/ludo/soft/lib/guile/2.0/ccache/ice-9/eval.go",
{st_mode=S_IFREG|0644, st_size=11929, ...}) = 0
stat("/home/ludo/soft/share/guile/2.0/init.scm", 0x7fffe6ef5630) = -1 ENOENT
(No such file or directory)
stat("/home/ludo/soft/share/guile/site/2.0/init.scm", 0x7fffe6ef5630) = -1
ENOENT (No such file or directory)
stat("/home/ludo/soft/share/guile/site/init.scm", 0x7fffe6ef5630) = -1 ENOENT
(No such file or directory)
stat("/home/ludo/soft/share/guile/init.scm", 0x7fffe6ef5630) = -1 ENOENT (No
such file or directory)
stat("/home/ludo/soft/share/guile/2.0/ice-9/boot-9.scm",
{st_mode=S_IFREG|0644, st_size=131349, ...}) = 0
lstat("/home", {st_mode=S_IFDIR|0755, st_size=4096, ...}) = 0
lstat("/home/ludo", {st_mode=S_IFDIR|0755, st_size=12288, ...}) = 0
lstat("/home/ludo/soft", {st_mode=S_IFDIR|0755, st_size=4096, ...}) = 0
lstat("/home/ludo/soft/share", {st_mode=S_IFDIR|0755, st_size=4096, ...}) = 0
lstat("/home/ludo/soft/share/guile", {st_mode=S_IFDIR|0755, st_size=4096,
...}) = 0
lstat("/home/ludo/soft/share/guile/2.0", {st_mode=S_IFDIR|0755, st_size=4096,
...}) = 0
lstat("/home/ludo/soft/share/guile/2.0/ice-9", {st_mode=S_IFDIR|0755,
st_size=4096, ...}) = 0
lstat("/home/ludo/soft/share/guile/2.0/ice-9/boot-9.scm",
{st_mode=S_IFREG|0644, st_size=131349, ...}) = 0
stat("/home/ludo/soft/lib/guile/2.0/ccache/ice-9/boot-9.go",
{st_mode=S_IFREG|0644, st_size=227749, ...}) = 0
stat("/home/ludo/soft/share/guile/2.0/ice-9/boot-9.scm",
{st_mode=S_IFREG|0644, st_size=131349, ...}) = 0
stat("/home/ludo/soft/lib/guile/2.0/ccache/ice-9/boot-9.go",
{st_mode=S_IFREG|0644, st_size=227749, ...}) = 0
#v-

For ice-9/eval.{scm,go}, everything is as expected.  However, for
ice-9/boot-9.{scm,go} and all subsequent files, each tree component is stat'd,
due to the use of `canonicalize_path'.

This may be necessary for user's files and cache, but at perhaps we could
remove the `canonicalize_path' call for anything under
$libdir/share/guile/2.0, or cache the result somehow (memoizing in
`scm_canonicalize_path'?).

Ludo'.




    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?33815>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/