file-test-lock

[procedure] file-test-lock port [start len]

Chicken: see if the file referred by port is locked or not. See also file-lock, file-unlock.