void TkpGetSubFonts( Tcl_Interp *interp, Tk_Font tkfont) { Tcl_Obj *objv[3], *listPtr, *resultPtr; UnixFtFont *fontPtr = (UnixFtFont *) tkfont; FcPattern *pattern; char *family = "Unknown", **familyPtr = &family; char *foundry = "Unknown", **foundryPtr = &foundry; char *encoding = "Unknown", **encodingPtr = &encoding; int i; resultPtr = Tcl_NewListObj(0, NULL); for (i = 0; i < fontPtr->nfaces ; ++i) { pattern = FcFontRenderPrepare(0, fontPtr->pattern, fontPtr->faces[i].source); XftPatternGetString(pattern, XFT_FAMILY, 0, familyPtr); XftPatternGetString(pattern, XFT_FOUNDRY, 0, foundryPtr); XftPatternGetString(pattern, XFT_ENCODING, 0, encodingPtr); objv[0] = Tcl_NewStringObj(family, -1); objv[1] = Tcl_NewStringObj(foundry, -1); objv[2] = Tcl_NewStringObj(encoding, -1); listPtr = Tcl_NewListObj(3, objv); Tcl_ListObjAppendElement(NULL, resultPtr, listPtr); } Tcl_SetObjResult(interp, resultPtr); }
void TkpGetFontFamilies( Tcl_Interp *interp, /* Interp to hold result. */ Tk_Window tkwin) /* For display to query. */ { Tcl_Obj *resultPtr; XftFontSet *list; int i; resultPtr = Tcl_NewListObj(0, NULL); list = XftListFonts(Tk_Display(tkwin), Tk_ScreenNumber(tkwin), (char*)0, /* pattern elements */ XFT_FAMILY, (char*)0); /* fields */ for (i = 0; i < list->nfont; i++) { char *family, **familyPtr = &family; if (XftPatternGetString(list->fonts[i], XFT_FAMILY, 0, familyPtr) == XftResultMatch) { Tcl_Obj *strPtr = Tcl_NewStringObj(family, -1); Tcl_ListObjAppendElement(NULL, resultPtr, strPtr); } } XftFontSetDestroy(list); Tcl_SetObjResult(interp, resultPtr); }
void nr_type_xft_build_def (NRTypeFaceDefFT2 *dft2, const gchar *name, const gchar *family) { XftPattern *pat; pat = (XftPattern *)g_hash_table_lookup (NRXftNamedict, name); if (pat) { char *file; int index; XftPatternGetString (pat, XFT_FILE, 0, &file); XftPatternGetInteger (pat, XFT_INDEX, 0, &index); if (file) { nr_type_ft2_build_def (dft2, name, family, file, index); } } }
static void GetTkFontAttributes( XftFont *ftFont, TkFontAttributes *faPtr) { const char *family = "Unknown"; const char *const *familyPtr = &family; int weight, slant, size, pxsize; double ptsize; (void) XftPatternGetString(ftFont->pattern, XFT_FAMILY, 0, familyPtr); if (XftPatternGetDouble(ftFont->pattern, XFT_SIZE, 0, &ptsize) == XftResultMatch) { size = (int) ptsize; } else if (XftPatternGetInteger(ftFont->pattern, XFT_PIXEL_SIZE, 0, &pxsize) == XftResultMatch) { size = -pxsize; } else { size = 12; } if (XftPatternGetInteger(ftFont->pattern, XFT_WEIGHT, 0, &weight) != XftResultMatch) { weight = XFT_WEIGHT_MEDIUM; } if (XftPatternGetInteger(ftFont->pattern, XFT_SLANT, 0, &slant) != XftResultMatch) { slant = XFT_SLANT_ROMAN; } #if DEBUG_FONTSEL printf("family %s size %d weight %d slant %d\n", family, size, weight, slant); #endif /* DEBUG_FONTSEL */ faPtr->family = Tk_GetUid(family); faPtr->size = size; faPtr->weight = (weight > XFT_WEIGHT_MEDIUM) ? TK_FW_BOLD : TK_FW_NORMAL; faPtr->slant = (slant > XFT_SLANT_ROMAN) ? TK_FS_ITALIC : TK_FS_ROMAN; faPtr->underline = 0; faPtr->overstrike = 0; }
void JXFontManager::GetFontNames ( JPtrArray<JString>* fontNames ) const { if (itsAllFontNames != NULL) { fontNames->CopyObjects(*itsAllFontNames, fontNames->GetCleanUpAction(), kJFalse); } else { fontNames->CleanOut(); fontNames->SetCompareFunction(JCompareStringsCaseInsensitive); fontNames->SetSortOrder(JOrderedSetT::kSortAscending); #ifdef _J_USE_XFT FcBool scalable = 1; XftFontSet* fs = XftListFonts(*itsDisplay, DefaultScreen((Display*)*itsDisplay), XFT_SCALABLE, XftTypeBool, scalable, 0, XFT_FAMILY, 0); for (int i=0; i<fs->nfont; i++) { char* raw_name; if (XftPatternGetString(fs->fonts[i], XFT_FAMILY, 0, &raw_name) == XftResultMatch) { JString name(raw_name); JBoolean isDuplicate; const JIndex index = fontNames->GetInsertionSortIndex(&name, &isDuplicate); if (!isDuplicate) { fontNames->InsertAtIndex(index, name); } } } XftFontSetDestroy(fs); #else int nameCount; char** nameList = XListFonts(*itsDisplay, "-*-*-*-*-*-*-*-*-75-75-*-*-*-*", INT_MAX, &nameCount); if (nameList == NULL) { return; } JString name, charSet; for (int i=0; i<nameCount; i++) { const std::string s(nameList[i], strlen(nameList[i])); std::istringstream input(s); input.ignore(); // initial dash JIgnoreUntil(input, '-'); // foundry name name = JReadUntil(input, '-'); // font name JIgnoreUntil(input, "-75-75-"); // ignore specs JIgnoreUntil(input, '-'); JIgnoreUntil(input, '-'); JReadAll(input, &charSet); // char set if (name.IsEmpty() || name == "nil") { continue; } ConvertToPSFontName(&name); // Until JPSPrinter can embed fonts in a Postscript file, we are limited // to only the standard Postscript fonts. if (name == JXGetCourierFontName() || name == JXGetHelveticaFontName() || name == JXGetSymbolFontName() || name == JXGetTimesFontName()) { // if (name != JXGetSymbolFontName()) // { // name = CombineNameAndCharacterSet(name, charSet); // } JBoolean isDuplicate; const JIndex index = fontNames->GetInsertionSortIndex(&name, &isDuplicate); if (!isDuplicate) { fontNames->InsertAtIndex(index, name); } } } XFreeFontNames(nameList); #endif // save names for next time JXFontManager* me = const_cast<JXFontManager*>(this); me->itsAllFontNames = new JPtrArray<JString>(*fontNames, JPtrArrayT::kDeleteAll, kJTrue); assert( me->itsAllFontNames != NULL ); } }
void JXFontManager::GetMonospaceFontNames ( JPtrArray<JString>* fontNames ) const { if (itsMonoFontNames != NULL) { fontNames->CopyObjects(*itsMonoFontNames, fontNames->GetCleanUpAction(), kJFalse); } else { (JXGetApplication())->DisplayBusyCursor(); fontNames->CleanOut(); fontNames->SetCompareFunction(JCompareStringsCaseInsensitive); fontNames->SetSortOrder(JOrderedSetT::kSortAscending); #ifdef _J_USE_XFT FcBool scalable = 1; XftFontSet* fs = XftListFonts(*itsDisplay, DefaultScreen((Display*)*itsDisplay), XFT_SPACING, XftTypeInteger, XFT_MONO, XFT_SCALABLE, XftTypeBool, scalable, 0, XFT_FAMILY, 0); for (int i=0; i<fs->nfont; i++) { char* raw_name; if (XftPatternGetString(fs->fonts[i], XFT_FAMILY, 0, &raw_name) == XftResultMatch) { JString name(raw_name); JBoolean isDuplicate; const JIndex index = fontNames->GetInsertionSortIndex(&name, &isDuplicate); if (!isDuplicate) { fontNames->InsertAtIndex(index, name); } } } XftFontSetDestroy(fs); #else JPtrArray<JString> allFontNames(JPtrArrayT::kDeleteAll); allFontNames.SetCompareFunction(JCompareStringsCaseInsensitive); allFontNames.SetSortOrder(JOrderedSetT::kSortAscending); for (int j=0; j<kMonospaceFontPatternCount; j++) { int nameCount; char** nameList = XListFonts(*itsDisplay, kMonospaceFontPattern[j], INT_MAX, &nameCount); if (nameList == NULL) { return; } JString name, charSet; for (int i=0; i<nameCount; i++) { const std::string s(nameList[i], strlen(nameList[i])); std::istringstream input(s); input.ignore(); // initial dash JIgnoreUntil(input, '-'); // foundry name name = JReadUntil(input, '-'); // font name JIgnoreUntil(input, "-iso"); // ignore specs JReadAll(input, &charSet); // char set if (name.IsEmpty() || name == "nil") { continue; } ConvertToPSFontName(&name); #if ! QUERY_FOR_MONOSPACE if (name == "Clean" || name == "Courier" || name == "Fixed" || name == "Terminal" || name == "Lucidatypewriter" || name == "Profontwindows") { #endif // charSet.Prepend("iso"); // name = CombineNameAndCharacterSet(name, charSet); JBoolean isDuplicate; const JIndex index = allFontNames.GetInsertionSortIndex(&name, &isDuplicate); if (!isDuplicate) { allFontNames.InsertAtIndex(index, name); // cout << nameList[i] << endl; XFontStruct* xfont = XLoadQueryFont(*itsDisplay, nameList[i]); if (xfont != NULL) { if (IsMonospace(*xfont)) { JString* n = new JString(name); assert( n != NULL ); const JBoolean ok = fontNames->InsertSorted(n, kJFalse); assert( ok ); } XFreeFont(*itsDisplay, xfont); } } #if ! QUERY_FOR_MONOSPACE } #endif } XFreeFontNames(nameList); } #endif // save names for next time JXFontManager* me = const_cast<JXFontManager*>(this); me->itsMonoFontNames = new JPtrArray<JString>(*fontNames, JPtrArrayT::kDeleteAll, kJTrue); assert( me->itsMonoFontNames != NULL ); } }
XFontStruct* XftCoreOpen (Display *dpy, XftPattern *pattern) { XftCoreFont *cf; char *xlfd; char *xlfd_pixel = 0; char *i, *o; int d; Bool scalable; double pixel_size; int pixel_int; XFontStruct *ret; #if 0 printf ("Core "); XftPatternPrint (pattern); #endif if (XftPatternGetString (pattern, XFT_XLFD, 0, &xlfd) != XftResultMatch) return 0; if (XftPatternGetBool (pattern, XFT_SCALABLE, 0, &scalable) != XftResultMatch) return 0; if (scalable) { if (XftPatternGetDouble (pattern, XFT_PIXEL_SIZE, 0, &pixel_size) != XftResultMatch) return 0; pixel_int = (int) (pixel_size + 0.5); if (pixel_int) { xlfd_pixel = (char *) malloc (strlen (xlfd) + 32); i = xlfd; o = xlfd_pixel; d = 0; while (d != 7 && *i) { if ((*o++ = *i++) == '-') d++; } if (*i) { sprintf (o, "%d", pixel_int); o += strlen (o); while (*i != '-') ++i; } while ((*o++ = *i++)); #if 0 printf ("original %s sized %s\n", xlfd, xlfd_pixel); #endif xlfd = xlfd_pixel; } } for (cf = _XftCoreFonts; cf; cf = cf->next) { if (cf->display == dpy && !_XftStrCmpIgnoreCase (cf->xlfd, xlfd)) { cf->ref++; if (_XftFontDebug () & XFT_DBG_REF) { printf ("Xlfd \"%s\" matches existing font (%d)\n", xlfd, cf->ref); } break; } } if (!cf) { ret = XLoadQueryFont (dpy, xlfd); if (!ret) return 0; cf = (XftCoreFont *) malloc (sizeof (XftCoreFont) + strlen (xlfd) + 1); if (!cf) { XFreeFont (dpy, ret); return 0; } if (_XftFontDebug () & XFT_DBG_REF) printf ("Xlfd \"%s\" matches new font\n", xlfd); cf->next = _XftCoreFonts; _XftCoreFonts = cf; cf->ref = 1; cf->font = ret; cf->xlfd = (char *) (cf + 1); strcpy (cf->xlfd, xlfd); } if (xlfd_pixel) free (xlfd_pixel); return cf->font; }
static void nr_type_xft_init (void) { XftFontSet *fs; const char *debugenv; int debug, ret; int i, pos, fpos; debugenv = getenv ("INKSCAPE_DEBUG_XFT"); debug = (debugenv && *debugenv && (*debugenv != '0')); ret = XftInit (NULL); if (debug) { fprintf (stderr, "XftInit result %d\n", ret); fprintf (stderr, "Reading Xft font database...\n"); } /* Get family list */ fs = XftListFonts (GDK_DISPLAY (), 0, XFT_SCALABLE, XftTypeBool, 1, XFT_OUTLINE, XftTypeBool, 1, 0, XFT_FAMILY, 0); NRXftFamilies.length = fs->nfont; NRXftFamilies.names = nr_new (gchar *, NRXftFamilies.length); NRXftFamilies.destructor = NULL; XftFontSetDestroy (fs); if (debug) { fprintf (stderr, "Read %lu families\n", NRXftFamilies.length); } /* Get typeface list */ NRXftPatterns = XftListFonts (GDK_DISPLAY (), 0, XFT_SCALABLE, XftTypeBool, 1, XFT_OUTLINE, XftTypeBool, 1, 0, XFT_FAMILY, XFT_WEIGHT, XFT_SLANT, XFT_FILE, XFT_INDEX, 0); NRXftTypefaces.length = NRXftPatterns->nfont; NRXftTypefaces.names = nr_new (gchar *, NRXftTypefaces.length); NRXftTypefaces.destructor = NULL; NRXftNamedict = g_hash_table_new (g_str_hash, g_str_equal); NRXftFamilydict = g_hash_table_new (g_str_hash, g_str_equal); if (debug) { fprintf (stderr, "Read %lu fonts\n", NRXftTypefaces.length); } pos = 0; fpos = 0; for (i = 0; i < NRXftPatterns->nfont; i++) { char *name, *file; XftPatternGetString (NRXftPatterns->fonts[i], XFT_FAMILY, 0, &name); if (debug) { fprintf (stderr, "Typeface %s\n", name); } XftPatternGetString (NRXftPatterns->fonts[i], XFT_FILE, 0, &file); if (file) { int len; if (debug) { fprintf (stderr, "Got filename %s\n", file); } len = strlen (file); /* fixme: This is silly and evil */ /* But Freetype just does not load pfa reliably (Lauris) */ /* Changed to exclude pfa, better for OSX */ if ((len > 4) && /* (!strcmp (file + len - 4, ".ttf") || !strcmp (file + len - 4, ".TTF") || !strcmp (file + len - 4, ".ttc") || !strcmp (file + len - 4, ".TTC") || !strcmp (file + len - 4, ".otf") || !strcmp (file + len - 4, ".OTF") || !strcmp (file + len - 4, ".pfb") || !strcmp (file + len - 4, ".PFB"))) { */ strcmp (file + len - 4, ".pfa") && strcmp (file + len - 4, ".PFA")) { char *fn, *wn, *sn, *name; int weight; int slant; if (debug) { fprintf (stderr, "Seems valid\n"); } XftPatternGetString (NRXftPatterns->fonts[i], XFT_FAMILY, 0, &fn); XftPatternGetInteger (NRXftPatterns->fonts[i], XFT_WEIGHT, 0, &weight); XftPatternGetInteger (NRXftPatterns->fonts[i], XFT_SLANT, 0, &slant); switch (weight) { case XFT_WEIGHT_LIGHT: wn = "Light"; break; case XFT_WEIGHT_MEDIUM: wn = "Book"; break; case XFT_WEIGHT_DEMIBOLD: wn = "Demibold"; break; case XFT_WEIGHT_BOLD: wn = "Bold"; break; case XFT_WEIGHT_BLACK: wn = "Black"; break; default: wn = "Normal"; break; } switch (slant) { case XFT_SLANT_ROMAN: sn = "Roman"; break; case XFT_SLANT_ITALIC: sn = "Italic"; break; case XFT_SLANT_OBLIQUE: sn = "Oblique"; break; default: sn = "Normal"; break; } name = g_strdup_printf ("%s %s %s", fn, wn, sn); if (!g_hash_table_lookup (NRXftNamedict, name)) { if (!g_hash_table_lookup (NRXftFamilydict, fn)) { NRXftFamilies.names[fpos] = g_strdup (fn); g_hash_table_insert (NRXftFamilydict, NRXftFamilies.names[fpos++], (void *) TRUE); } NRXftTypefaces.names[pos++] = name; g_hash_table_insert (NRXftNamedict, name, NRXftPatterns->fonts[i]); } else { g_free (name); } } } } NRXftTypefaces.length = pos; NRXftFamilies.length = fpos; nrxfti = TRUE; }