A handy proc and a script that uses it.
The proc to see the mounted partitions.
The script to see which partitions are becoming to full.


'''mounted'''

On a Linux system there are a lot of mounted partitions that are virtual. Sometimes I am just interested in which partitions are physical. For this I wrote the proc mounted.


======
proc mounted {} {
    set mount   [open "|mount" RDONLY]
    set mounted [list]
    # Skip header
    gets ${mount}
    while {-1 != [gets ${mount} line]} {
        if {[string index ${line} 0] == "/"} {
            lappend mounted [lindex [split ${line}] 2]
        }
    }
    close ${mount}
    lsort -nocase ${mounted}
}
======

A real partition starts with a '/', so all the lines that do not start with a '/' are skipped.
The third entry is the mountpoint, so this is added to the list.
When all entries are processed the sorted list is returned.







<<categories>>System Maintenance | Linux | Partitions