free memory on sd card

[Cor]

How to get the free memory on sd card.

Before i download a file i want to detect if there is enough room on sd card?

search forum but could not find

 

[Erel]

You can use the Phone library Shell method and run "df". It will return a string which contains this information.

 

[Cor]

Thanks

the following code returns a list of available memory in device

    Dim p As Phone
    Dim sb As StringBuilder
    sb.Initialize
   p.Shell("df", Null, sb, Null)  ' free space
    Msgbox(sb.ToString, "Memory:")

 

[Cor]

so you will get info about only sdcard

p.Shell("df", Array As String("sdcard"), sb, Null)  ' free space

 

[Cor]

Does space always returns in K bytes?

 

[Erel]

I don't know.

 

[francoisg]

Try the following to return only size of sdcard ... EDIT: Oops, does not seem to work on all devices :-( ---> try the 2'nd function to see if an sdcard is mounted, seems to work on most device ...

' *** Returns amount of avalable space on specified device (in kb) ...
Sub GetAvailableSpace (DeviceName As String) As Long
    Dim ph as Phone
    Dim sb As StringBuilder
    sb.Initialize
    ' *** Returns: device_name: xxxK total, yyyyK used, zzzK available (block size nnnn)
    ph.Shell("df | grep " & DeviceName, Null, sb, Null)  ' *** Return free space of specified device only ...
    If (sb.ToString <> "") Then Return Regex.Split("K available", Regex.Split(",", sb.ToString)(2))(0) Else Return -1
End Sub

' *** Returns true if the specified device is mounted, false if not ...
Sub GetDeviceAvailable (DeviceName As String) As Boolean
    Dim sb As StringBuilder
    sb.Initialize
    ph.Shell("mount", Null, sb, Null)
    Return (sb.ToString.IndexOf(DeviceName) > -1)
End Sub

 

[rtesluk]

Small Demo App

Dec 5 2011
09:20 Hours


Here is a little app to demo stringbuilder and shell("df",null,sb,null)

Regards,

Ray Tesluk :icon_clap: