get_info_basedir
extern char *get_info_basedir __P((void));
get_info_basedir() ? get_info_basedir() : "??",
(void) fputs(get_info_basedir(), fp);
putparam("BASEDIR", get_info_basedir());