buffer-file-coding-system に encode-coding-string して length 取る、とか…