1 // Created on: 2008-01-20
2 // Created by: Alexander A. BORODIN
3 // Copyright (c) 2008-2014 OPEN CASCADE SAS
5 // This file is part of Open CASCADE Technology software library.
7 // This library is free software; you can redistribute it and/or modify it under
8 // the terms of the GNU Lesser General Public License version 2.1 as published
9 // by the Free Software Foundation, with special exception defined in the file
10 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11 // distribution for complete text of the license and disclaimer of any warranty.
13 // Alternatively, this file may be used under the terms of Open CASCADE
14 // commercial license or contractual agreement.
17 #include <Font_FontMgr.hxx>
18 #include <Font_FTLibrary.hxx>
19 #include <Font_SystemFont.hxx>
20 #include <NCollection_List.hxx>
21 #include <NCollection_Map.hxx>
22 #include <OSD_Environment.hxx>
23 #include <Standard_Stream.hxx>
24 #include <Standard_Type.hxx>
25 #include <TCollection_HAsciiString.hxx>
28 #include FT_FREETYPE_H
29 IMPLEMENT_STANDARD_RTTIEXT(Font_FontMgr,Standard_Transient)
31 struct Font_FontMgr_FontAliasMapNode
33 const char * EnumName;
34 const char * FontName;
35 Font_FontAspect FontAspect;
38 static const Font_FontMgr_FontAliasMapNode Font_FontMgr_MapOfFontsAliases[] =
41 #if defined(_WIN32) || defined(__APPLE__)
43 { "Courier" , "Courier New" , Font_FA_Regular },
44 { "Times-Roman" , "Times New Roman", Font_FA_Regular },
45 { "Times-Bold" , "Times New Roman", Font_FA_Bold },
46 { "Times-Italic" , "Times New Roman", Font_FA_Italic },
47 { "Times-BoldItalic" , "Times New Roman", Font_FA_BoldItalic },
48 { "ZapfChancery-MediumItalic", "Script" , Font_FA_Regular },
49 { "Symbol" , "Symbol" , Font_FA_Regular },
50 { "ZapfDingbats" , "WingDings" , Font_FA_Regular },
51 { "Rock" , "Arial" , Font_FA_Regular },
52 { "Iris" , "Lucida Console" , Font_FA_Regular }
54 #elif defined(__ANDROID__)
56 { "Courier" , "Droid Sans Mono", Font_FA_Regular },
57 { "Times-Roman" , "Droid Serif" , Font_FA_Regular },
58 { "Times-Bold" , "Droid Serif" , Font_FA_Bold },
59 { "Times-Italic" , "Droid Serif" , Font_FA_Italic },
60 { "Times-BoldItalic" , "Droid Serif" , Font_FA_BoldItalic },
61 { "Arial" , "Roboto" , Font_FA_Regular },
65 { "Courier" , "Courier" , Font_FA_Regular },
66 { "Times-Roman" , "Times" , Font_FA_Regular },
67 { "Times-Bold" , "Times" , Font_FA_Bold },
68 { "Times-Italic" , "Times" , Font_FA_Italic },
69 { "Times-BoldItalic" , "Times" , Font_FA_BoldItalic },
70 { "Arial" , "Helvetica" , Font_FA_Regular },
71 { "ZapfChancery-MediumItalic", "-adobe-itc zapf chancery-medium-i-normal--*-*-*-*-*-*-iso8859-1" , Font_FA_Regular },
72 { "Symbol" , "-adobe-symbol-medium-r-normal--*-*-*-*-*-*-adobe-fontspecific" , Font_FA_Regular },
73 { "ZapfDingbats" , "-adobe-itc zapf dingbats-medium-r-normal--*-*-*-*-*-*-adobe-fontspecific" , Font_FA_Regular },
74 { "Rock" , "-sgi-rock-medium-r-normal--*-*-*-*-p-*-iso8859-1" , Font_FA_Regular },
75 { "Iris" , "--iris-medium-r-normal--*-*-*-*-m-*-iso8859-1" , Font_FA_Regular }
80 #define NUM_FONT_ENTRIES (int)(sizeof(Font_FontMgr_MapOfFontsAliases)/sizeof(Font_FontMgr_FontAliasMapNode))
88 #pragma comment (lib, "freetype.lib")
94 // list of supported extensions
95 static Standard_CString Font_FontMgr_Extensions[] =
107 #include <OSD_DirectoryIterator.hxx>
108 #include <OSD_FileIterator.hxx>
109 #include <OSD_Path.hxx>
110 #include <OSD_File.hxx>
111 #include <OSD_OpenMode.hxx>
112 #include <OSD_Protection.hxx>
117 // list of supported extensions
118 static Standard_CString Font_FontMgr_Extensions[] =
126 // Datafork TrueType (OS X), obsolete
132 #if !defined(__ANDROID__) && !defined(__APPLE__)
133 // X11 configuration file in plain text format (obsolete - doesn't exists in modern distributives)
134 static Standard_CString myFontServiceConf[] = {"/etc/X11/fs/config",
135 "/usr/X11R6/lib/X11/fs/config",
136 "/usr/X11/lib/X11/fs/config",
142 // default fonts paths in Mac OS X
143 static Standard_CString myDefaultFontsDirs[] = {"/System/Library/Fonts",
148 // default fonts paths in most Unix systems (Linux and others)
149 static Standard_CString myDefaultFontsDirs[] = {"/system/fonts", // Android
151 "/usr/local/share/fonts",
156 static void addDirsRecursively (const OSD_Path& thePath,
157 NCollection_Map<TCollection_AsciiString>& theDirsMap)
159 TCollection_AsciiString aDirName;
160 thePath.SystemName (aDirName);
161 if (!theDirsMap.Add (aDirName))
166 for (OSD_DirectoryIterator aDirIterator (thePath, "*"); aDirIterator.More(); aDirIterator.Next())
168 OSD_Path aChildDirPath;
169 aDirIterator.Values().Path (aChildDirPath);
171 TCollection_AsciiString aChildDirName;
172 aChildDirPath.SystemName (aChildDirName);
173 if (!aChildDirName.IsEqual (".") && !aChildDirName.IsEqual (".."))
175 aChildDirName = aDirName + "/" + aChildDirName;
176 OSD_Path aPath (aChildDirName);
177 addDirsRecursively (aPath, theDirsMap);
182 } // anonymous namespace
186 // =======================================================================
187 // function : checkFont
189 // =======================================================================
190 static Handle(Font_SystemFont) checkFont (const Handle(Font_FTLibrary)& theFTLib,
191 const Standard_CString theFontPath)
194 FT_Error aFaceError = FT_New_Face (theFTLib->Instance(), theFontPath, 0, &aFontFace);
195 if (aFaceError != FT_Err_Ok)
200 Font_FontAspect anAspect = Font_FA_Regular;
201 if (aFontFace->style_flags == (FT_STYLE_FLAG_ITALIC | FT_STYLE_FLAG_BOLD))
203 anAspect = Font_FA_BoldItalic;
205 else if (aFontFace->style_flags == FT_STYLE_FLAG_ITALIC)
207 anAspect = Font_FA_Italic;
209 else if (aFontFace->style_flags == FT_STYLE_FLAG_BOLD)
211 anAspect = Font_FA_Bold;
214 Handle(Font_SystemFont) aResult;
215 if (aFontFace->family_name != NULL // skip broken fonts (error in FreeType?)
216 && FT_Select_Charmap (aFontFace, ft_encoding_unicode) == 0) // Font_FTFont supports only UNICODE fonts
218 Handle(TCollection_HAsciiString) aFontName = new TCollection_HAsciiString (aFontFace->family_name);
219 Handle(TCollection_HAsciiString) aFontPath = new TCollection_HAsciiString (theFontPath);
220 aResult = new Font_SystemFont (aFontName, anAspect, aFontPath);
221 // automatically identify some known single-line fonts
222 aResult->SetSingleStrokeFont (aFontName->String().StartsWith ("OLF "));
225 FT_Done_Face (aFontFace);
230 // =======================================================================
231 // function : GetInstance
233 // =======================================================================
234 Handle(Font_FontMgr) Font_FontMgr::GetInstance()
236 static Handle(Font_FontMgr) _mgr;
239 _mgr = new Font_FontMgr();
245 // =======================================================================
246 // function : Font_FontMgr
248 // =======================================================================
249 Font_FontMgr::Font_FontMgr()
254 // =======================================================================
255 // function : CheckFont
257 // =======================================================================
258 Handle(Font_SystemFont) Font_FontMgr::CheckFont (Standard_CString theFontPath) const
260 Handle(Font_FTLibrary) aFtLibrary = new Font_FTLibrary();
261 return checkFont (aFtLibrary, theFontPath);
264 // =======================================================================
265 // function : RegisterFont
267 // =======================================================================
268 Standard_Boolean Font_FontMgr::RegisterFont (const Handle(Font_SystemFont)& theFont,
269 const Standard_Boolean theToOverride)
271 if (theFont.IsNull())
273 return Standard_False;
276 for (Font_NListOfSystemFont::Iterator aFontIter (myListOfFonts);
277 aFontIter.More(); aFontIter.Next())
279 if (!aFontIter.Value()->FontName()->IsSameString (theFont->FontName(), Standard_False))
284 if (theFont->FontAspect() != Font_FA_Undefined
285 && aFontIter.Value()->FontAspect() != theFont->FontAspect())
290 if (theFont->FontHeight() == -1 || aFontIter.Value()->FontHeight() == -1
291 || theFont->FontHeight() == aFontIter.Value()->FontHeight())
293 if (theFont->FontPath()->String() == aFontIter.Value()->FontPath()->String())
295 return Standard_True;
297 else if (theToOverride)
299 myListOfFonts.Remove (aFontIter);
303 return Standard_False;
308 myListOfFonts.Append (theFont);
309 return Standard_True;
312 // =======================================================================
313 // function : InitFontDataBase
315 // =======================================================================
316 void Font_FontMgr::InitFontDataBase()
318 myListOfFonts.Clear();
319 Handle(Font_FTLibrary) aFtLibrary;
321 #if defined(OCCT_UWP)
322 // system font files are not accessible
324 #elif defined(_WIN32)
326 // font directory is placed in "C:\Windows\Fonts\"
327 UINT aStrLength = GetSystemWindowsDirectoryA (NULL, 0);
333 char* aWinDir = new char[aStrLength];
334 GetSystemWindowsDirectoryA (aWinDir, aStrLength);
335 Handle(TCollection_HAsciiString) aFontsDir = new TCollection_HAsciiString (aWinDir);
336 aFontsDir->AssignCat ("\\Fonts\\");
339 // read fonts list from registry
341 if (RegOpenKeyExA (HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Fonts",
342 0, KEY_READ, &aFontsKey) != ERROR_SUCCESS)
347 NCollection_Map<TCollection_AsciiString> aSupportedExtensions;
348 for (Standard_Integer anIter = 0; Font_FontMgr_Extensions[anIter] != NULL; ++anIter)
350 Standard_CString anExt = Font_FontMgr_Extensions[anIter];
351 aSupportedExtensions.Add (TCollection_AsciiString (anExt));
354 aFtLibrary = new Font_FTLibrary();
355 static const DWORD aBufferSize = 256;
356 char aNameBuff[aBufferSize];
357 char aPathBuff[aBufferSize];
358 DWORD aNameSize = aBufferSize;
359 DWORD aPathSize = aBufferSize;
360 for (DWORD anIter = 0;
361 RegEnumValueA (aFontsKey, anIter,
362 aNameBuff, &aNameSize, NULL, NULL,
363 (LPBYTE )aPathBuff, &aPathSize) != ERROR_NO_MORE_ITEMS;
364 ++anIter, aNameSize = aBufferSize, aPathSize = aBufferSize)
366 aPathBuff[(aPathSize < aBufferSize) ? aPathSize : (aBufferSize - 1)] = '\0'; // ensure string is NULL-terminated
368 Handle(TCollection_HAsciiString) aFontName = new TCollection_HAsciiString (aNameBuff);
369 Handle(TCollection_HAsciiString) aFontPath = new TCollection_HAsciiString (aPathBuff);
370 if (aFontPath->Search ("\\") == -1)
372 aFontPath->Insert (1, aFontsDir); // make absolute path
375 // check file extension is in list of supported
376 const Standard_Integer anExtensionPosition = aFontPath->SearchFromEnd (".") + 1;
377 if (anExtensionPosition > 0 && anExtensionPosition < aFontPath->Length())
379 Handle(TCollection_HAsciiString) aFontExtension = aFontPath->SubString (anExtensionPosition, aFontPath->Length());
380 aFontExtension->LowerCase();
381 if (aSupportedExtensions.Contains (aFontExtension->String()))
383 Handle(Font_SystemFont) aNewFont = checkFont (aFtLibrary, aFontPath->ToCString());
384 if (!aNewFont.IsNull())
386 myListOfFonts.Append (aNewFont);
392 // close registry key
393 RegCloseKey (aFontsKey);
397 NCollection_Map<TCollection_AsciiString> aMapOfFontsDirs;
398 #if !defined(__ANDROID__) && !defined(__APPLE__)
399 const OSD_Protection aProtectRead (OSD_R, OSD_R, OSD_R, OSD_R);
401 // read fonts directories from font service config file (obsolete)
402 for (Standard_Integer anIter = 0; myFontServiceConf[anIter] != NULL; ++anIter)
404 const TCollection_AsciiString aFileOfFontsPath (myFontServiceConf[anIter]);
405 OSD_File aFile (aFileOfFontsPath);
411 aFile.Open (OSD_ReadOnly, aProtectRead);
417 Standard_Integer aNByte = 256;
418 Standard_Integer aNbyteRead;
419 TCollection_AsciiString aStr; // read string with information
420 while (!aFile.IsAtEnd())
422 Standard_Integer aLocation = -1;
423 Standard_Integer aPathLocation = -1;
425 aFile.ReadLine (aStr, aNByte, aNbyteRead); // reading 1 line (256 bytes)
426 aLocation = aStr.Search ("catalogue=");
429 aLocation = aStr.Search ("catalogue =");
432 aPathLocation = aStr.Search ("/");
433 if (aLocation > 0 && aPathLocation > 0)
435 aStr = aStr.Split (aPathLocation - 1);
436 TCollection_AsciiString aFontPath;
437 Standard_Integer aPathNumber = 1;
440 // Getting directory paths, which can be splitted by "," or ":"
441 aFontPath = aStr.Token (":,", aPathNumber);
442 aFontPath.RightAdjust();
443 if (!aFontPath.IsEmpty())
445 OSD_Path aPath(aFontPath);
446 addDirsRecursively (aPath, aMapOfFontsDirs);
450 while (!aFontPath.IsEmpty());
457 // append default directories
458 for (Standard_Integer anIter = 0; myDefaultFontsDirs[anIter] != NULL; ++anIter)
460 Standard_CString anItem = myDefaultFontsDirs[anIter];
461 TCollection_AsciiString aPathStr (anItem);
462 OSD_Path aPath (aPathStr);
463 addDirsRecursively (aPath, aMapOfFontsDirs);
466 NCollection_Map<TCollection_AsciiString> aSupportedExtensions;
467 for (Standard_Integer anIter = 0; Font_FontMgr_Extensions[anIter] != NULL; ++anIter)
469 Standard_CString anExt = Font_FontMgr_Extensions[anIter];
470 aSupportedExtensions.Add (TCollection_AsciiString (anExt));
473 aFtLibrary = new Font_FTLibrary();
474 for (NCollection_Map<TCollection_AsciiString>::Iterator anIter (aMapOfFontsDirs);
475 anIter.More(); anIter.Next())
477 #if defined(__ANDROID__) || defined(__APPLE__)
478 OSD_Path aFolderPath (anIter.Value());
479 for (OSD_FileIterator aFileIter (aFolderPath, "*"); aFileIter.More(); aFileIter.Next())
481 OSD_Path aFontFilePath;
482 aFileIter.Values().Path (aFontFilePath);
484 TCollection_AsciiString aFontFileName;
485 aFontFilePath.SystemName (aFontFileName);
486 aFontFileName = anIter.Value() + "/" + aFontFileName;
488 Handle(Font_SystemFont) aNewFont = checkFont (aFtLibrary, aFontFileName.ToCString());
489 if (!aNewFont.IsNull())
491 myListOfFonts.Append (aNewFont);
495 OSD_File aReadFile (anIter.Value() + "/fonts.dir");
496 if (!aReadFile.Exists())
498 continue; // invalid fonts directory
501 aReadFile.Open (OSD_ReadOnly, aProtectRead);
502 if (!aReadFile.IsOpen())
504 continue; // invalid fonts directory
507 Standard_Integer aNbyteRead, aNByte = 256;
508 TCollection_AsciiString aLine (aNByte);
509 Standard_Boolean isFirstLine = Standard_True;
510 const TCollection_AsciiString anEncoding ("iso8859-1\n");
511 while (!aReadFile.IsAtEnd())
513 aReadFile.ReadLine (aLine, aNByte, aNbyteRead);
516 // first line contains the number of fonts in this file
517 // just ignoring it...
518 isFirstLine = Standard_False;
522 Standard_Integer anExtensionPosition = aLine.Search (".") + 1;
523 if (anExtensionPosition == 0)
525 continue; // can't find extension position in the font description
528 Standard_Integer anEndOfFileName = aLine.Location (" ", anExtensionPosition, aLine.Length()) - 1;
529 if (anEndOfFileName < 0 || anEndOfFileName < anExtensionPosition)
531 continue; // font description have empty extension
534 TCollection_AsciiString aFontExtension = aLine.SubString (anExtensionPosition, anEndOfFileName);
535 aFontExtension.LowerCase();
536 if (aSupportedExtensions.Contains (aFontExtension) && (aLine.Search (anEncoding) > 0))
538 // In current implementation use fonts with ISO-8859-1 coding page.
539 // OCCT not give to manage coding page by means of programm interface.
540 // TODO: make high level interface for choosing necessary coding page.
541 Handle(TCollection_HAsciiString) aXLFD =
542 new TCollection_HAsciiString (aLine.SubString (anEndOfFileName + 2, aLine.Length()));
543 Handle(TCollection_HAsciiString) aFontPath =
544 new TCollection_HAsciiString (anIter.Value().ToCString());
545 if (aFontPath->SearchFromEnd ("/") != aFontPath->Length())
547 aFontPath->AssignCat ("/");
549 Handle(TCollection_HAsciiString) aFontFileName =
550 new TCollection_HAsciiString (aLine.SubString (1, anEndOfFileName));
551 aFontPath->AssignCat (aFontFileName);
553 Handle(Font_SystemFont) aNewFontFromXLFD = new Font_SystemFont (aXLFD, aFontPath);
554 Handle(Font_SystemFont) aNewFont = checkFont (aFtLibrary, aFontPath->ToCString());
556 if (aNewFontFromXLFD->IsValid() && !aNewFont.IsNull() &&
557 !aNewFont->IsEqual (aNewFontFromXLFD))
559 myListOfFonts.Append (aNewFont);
560 myListOfFonts.Append (aNewFontFromXLFD);
562 else if (!aNewFont.IsNull())
564 myListOfFonts.Append (aNewFont);
566 else if (aNewFontFromXLFD->IsValid())
568 myListOfFonts.Append (aNewFontFromXLFD);
578 // =======================================================================
579 // function : GetAvailableFonts
581 // =======================================================================
582 const Font_NListOfSystemFont& Font_FontMgr::GetAvailableFonts() const
584 return myListOfFonts;
587 // =======================================================================
588 // function : GetAvailableFontsNames
590 // =======================================================================
591 void Font_FontMgr::GetAvailableFontsNames (TColStd_SequenceOfHAsciiString& theFontsNames) const
593 theFontsNames.Clear();
594 for (Font_NListOfSystemFont::Iterator anIter(myListOfFonts); anIter.More(); anIter.Next())
596 theFontsNames.Append (anIter.Value()->FontName());
600 // =======================================================================
601 // function : GetFont
603 // =======================================================================
604 Handle(Font_SystemFont) Font_FontMgr::GetFont (const Handle(TCollection_HAsciiString)& theFontName,
605 const Font_FontAspect theFontAspect,
606 const Standard_Integer theFontSize) const
608 if ( (theFontSize < 2 && theFontSize != -1) || theFontName.IsNull())
613 for (Font_NListOfSystemFont::Iterator aFontsIterator (myListOfFonts);
614 aFontsIterator.More(); aFontsIterator.Next())
616 if (!theFontName->IsEmpty() && !aFontsIterator.Value()->FontName()->IsSameString (theFontName, Standard_False))
621 if (theFontAspect != Font_FA_Undefined && aFontsIterator.Value()->FontAspect() != theFontAspect)
626 if (theFontSize == -1 || aFontsIterator.Value()->FontHeight() == -1 ||
627 theFontSize == aFontsIterator.Value()->FontHeight())
629 return aFontsIterator.Value();
636 // =======================================================================
637 // function : FindFont
639 // =======================================================================
640 Handle(Font_SystemFont) Font_FontMgr::FindFont (const Handle(TCollection_HAsciiString)& theFontName,
641 const Font_FontAspect theFontAspect,
642 const Standard_Integer theFontSize) const
644 Handle(TCollection_HAsciiString) aFontName = theFontName;
645 Font_FontAspect aFontAspect = theFontAspect;
646 Standard_Integer aFontSize = theFontSize;
648 Handle(Font_SystemFont) aFont = GetFont (aFontName, aFontAspect, aFontSize);
654 // Trying to use font names mapping
655 for (Standard_Integer anIter = 0; anIter < NUM_FONT_ENTRIES; ++anIter)
657 Handle(TCollection_HAsciiString) aFontAlias =
658 new TCollection_HAsciiString (Font_FontMgr_MapOfFontsAliases[anIter].EnumName);
660 if (aFontAlias->IsSameString (aFontName, Standard_False))
662 aFontName = new TCollection_HAsciiString (Font_FontMgr_MapOfFontsAliases[anIter].FontName);
663 aFontAspect = Font_FontMgr_MapOfFontsAliases[anIter].FontAspect;
668 // check font family alias with specified font aspect
669 if (theFontAspect != Font_FA_Undefined
670 && theFontAspect != Font_FA_Regular
671 && theFontAspect != aFontAspect)
673 aFont = GetFont (aFontName, theFontAspect, aFontSize);
680 // check font alias with aspect in the name
681 aFont = GetFont (aFontName, aFontAspect, aFontSize);
687 // Requested family name not found -> search for any font family with given aspect and height
688 aFontName = new TCollection_HAsciiString ("");
689 aFont = GetFont (aFontName, aFontAspect, aFontSize);
695 // The last resort: trying to use ANY font available in the system
696 aFontAspect = Font_FA_Undefined;
698 aFont = GetFont (aFontName, aFontAspect, aFontSize);
704 return NULL; // Fonts are not found in the system.