add function fsize(file)