frdmsg
{'f', fturnon, frdmsg, fwrmsg, frddata, fwrdata, fturnoff},
extern int frdmsg(), frddata();
if (frdmsg(ibuf, fn) != FAIL) {