Comment 5 for bug 492053

After a brief conversation on IRC today, I went hunting through MSDN and found the GetFileAttributes() function, which led to the following session transcript, and lends hope to the idea of closing this bug in the foreseeable future (though I'll be letting someone else do the actual work):

This is SBCL 0.9.12, an implementation of ANSI Common Lisp.

More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.

It is mostly in the public domain; some portions are provided under

BSD-style licenses. See the CREDITS and COPYING files in the

distribution for more information.

os_map: 3, 0x1000, 02000000, 0x1000.

os_map: 3, 0x2000, 05000000, 0x1000.

os_map: 3, 0x3000, 09000000, 0x15bc000.

This is experimental prerelease support for the Windows platform: use

at your own risk. "Your Kitten of Death awaits!"

* (load-shared-object "KERNEL32")

#P"KERNEL32"

* (define-alien-routine "GetFileAttributesA" (unsigned 32) (path c-string))

GETFILEATTRIBUTESA

* (getfileattributesa "c://windows")

16

* (getfileattributesa "c://")

22

* (getfileattributesa "//miyu/noshare")

4294967295

* (getfileattributesa "//miyu/share")

16

*