/* lfs_subr.c */