Checking for case-sensitive filenames on Windows

[nerobotParticipant]

As you may know, Windows has case-insensitive file system.

Below you can see the function that gives you case-sensitive filename by possible case-insensitive path.

Monkey

Function GetCaseSensitivePath:String( path:String ) #If __HOSTOS__="windows" Local dir:=ExtractDir( path ) Local items:=LoadDir( dir ) If items Local lower:=StripDir( path ).ToLower() For Local i:=Eachin items If i.ToLower()=lower Return dir+i Next Endif Return path #Else Return path #Endif End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Function GetCaseSensitivePath:String( path:String )   #If __HOSTOS__="windows" Local dir:=ExtractDir( path ) Local items:=LoadDir( dir ) If items Local lower:=StripDir( path ).ToLower() For Local i:=Eachin items If i.ToLower()=lower Return dir+i Next Endif Return path #Else Return path #Endif End

NOTE: there is a fix for a filename part of path only, casing of directory part remains as is.

[nerobotParticipant]

There also is libc.realpath() function, maybe it’s a better solution?

But I couldn’t to cope with it.

[AmonParticipant]

Cool.

Dude, you’re on a useful tool/snippet/fix/module, mission. Thank you. Your motivation is quite impressive and I’d like to emulate that. I’ll try.

[nerobotParticipant]

Yeah!

I found this solution fixing that: https://github.com/engor/Ted2Go/issues/84

[Author]

Posts