+ char *fp = find_command, *ep = fp+sizeof(find_command)-1;
+ fp += snprintf(fp, ep-fp, "find '%s'", search_path);
+ const char *bc_font_path = getenv("BC_FONT_PATH");
+ if( bc_font_path ) {
+ const char *path = bc_font_path;
+ for( int len=0; *path; path+=len ) {
+ const char *cp = strchr(path,':');
+ len = !cp ? strlen(path) : cp-path;
+ char font_path[BCTEXTLEN];
+ memcpy(font_path, path, len); font_path[len] = 0;
+ if( cp ) ++len;
+ fp += snprintf(fp, ep-fp, " '%s'", font_path);
+ }
+ }
+ fp += snprintf(fp, ep-fp, " -name 'fonts.scale' -print -exec cat {} \\;");