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 struct Font_FontMgr_FontAliasMapNode
31 const char * EnumName;
32 const char * FontName;
33 Font_FontAspect FontAspect;
36 static const Font_FontMgr_FontAliasMapNode Font_FontMgr_MapOfFontsAliases[] =
41 { "Courier" , "Courier New" , Font_FA_Regular },
42 { "Times-Roman" , "Times New Roman", Font_FA_Regular },
43 { "Times-Bold" , "Times New Roman", Font_FA_Bold },
44 { "Times-Italic" , "Times New Roman", Font_FA_Italic },
45 { "Times-BoldItalic" , "Times New Roman", Font_FA_BoldItalic },
46 { "ZapfChancery-MediumItalic", "Script" , Font_FA_Regular },
47 { "Symbol" , "Symbol" , Font_FA_Regular },
48 { "ZapfDingbats" , "WingDings" , Font_FA_Regular },
49 { "Rock" , "Arial" , Font_FA_Regular },
50 { "Iris" , "Lucida Console" , Font_FA_Regular }
52 #elif defined(__ANDROID__)
54 { "Courier" , "Droid Sans Mono", Font_FA_Regular },
55 { "Times-Roman" , "Droid Serif" , Font_FA_Regular },
56 { "Times-Bold" , "Droid Serif" , Font_FA_Bold },
57 { "Times-Italic" , "Droid Serif" , Font_FA_Italic },
58 { "Times-BoldItalic" , "Droid Serif" , Font_FA_BoldItalic },
59 { "Arial" , "Roboto" , Font_FA_Regular },
63 { "Courier" , "Courier" , Font_FA_Regular },
64 { "Times-Roman" , "Times" , Font_FA_Regular },
65 { "Times-Bold" , "Times" , Font_FA_Bold },
66 { "Times-Italic" , "Times" , Font_FA_Italic },
67 { "Times-BoldItalic" , "Times" , Font_FA_BoldItalic },
68 { "Arial" , "Helvetica" , Font_FA_Regular },
69 { "ZapfChancery-MediumItalic", "-adobe-itc zapf chancery-medium-i-normal--*-*-*-*-*-*-iso8859-1" , Font_FA_Regular },
70 { "Symbol" , "-adobe-symbol-medium-r-normal--*-*-*-*-*-*-adobe-fontspecific" , Font_FA_Regular },
71 { "ZapfDingbats" , "-adobe-itc zapf dingbats-medium-r-normal--*-*-*-*-*-*-adobe-fontspecific" , Font_FA_Regular },
72 { "Rock" , "-sgi-rock-medium-r-normal--*-*-*-*-p-*-iso8859-1" , Font_FA_Regular },
73 { "Iris" , "--iris-medium-r-normal--*-*-*-*-m-*-iso8859-1" , Font_FA_Regular }
78 #define NUM_FONT_ENTRIES (int)(sizeof(Font_FontMgr_MapOfFontsAliases)/sizeof(Font_FontMgr_FontAliasMapNode))
86 #pragma comment (lib, "freetype.lib")
92 // list of supported extensions
93 static Standard_CString Font_FontMgr_Extensions[] =
105 #include <OSD_DirectoryIterator.hxx>
106 #include <OSD_FileIterator.hxx>
107 #include <OSD_Path.hxx>
108 #include <OSD_File.hxx>
109 #include <OSD_OpenMode.hxx>
110 #include <OSD_Protection.hxx>
115 // list of supported extensions
116 static Standard_CString Font_FontMgr_Extensions[] =
126 // X11 configuration file in plain text format (obsolete - doesn't exists in modern distributives)
127 static Standard_CString myFontServiceConf[] = {"/etc/X11/fs/config",
128 "/usr/X11R6/lib/X11/fs/config",
129 "/usr/X11/lib/X11/fs/config",
134 // default fonts paths in Mac OS X
135 static Standard_CString myDefaultFontsDirs[] = {"/System/Library/Fonts",
140 // default fonts paths in most Unix systems (Linux and others)
141 static Standard_CString myDefaultFontsDirs[] = {"/system/fonts", // Android
143 "/usr/local/share/fonts",
148 static void addDirsRecursively (const OSD_Path& thePath,
149 NCollection_Map<TCollection_AsciiString>& theDirsMap)
151 TCollection_AsciiString aDirName;
152 thePath.SystemName (aDirName);
153 if (!theDirsMap.Add (aDirName))
158 for (OSD_DirectoryIterator aDirIterator (thePath, "*"); aDirIterator.More(); aDirIterator.Next())
160 OSD_Path aChildDirPath;
161 aDirIterator.Values().Path (aChildDirPath);
163 TCollection_AsciiString aChildDirName;
164 aChildDirPath.SystemName (aChildDirName);
165 if (!aChildDirName.IsEqual (".") && !aChildDirName.IsEqual (".."))
167 aChildDirName = aDirName + "/" + aChildDirName;
168 OSD_Path aPath (aChildDirName);
169 addDirsRecursively (aPath, theDirsMap);
178 // =======================================================================
179 // function : checkFont
181 // =======================================================================
182 static Handle(Font_SystemFont) checkFont (const Handle(Font_FTLibrary)& theFTLib,
183 const Standard_CString theFontPath)
186 FT_Error aFaceError = FT_New_Face (theFTLib->Instance(), theFontPath, 0, &aFontFace);
187 if (aFaceError != FT_Err_Ok)
192 Font_FontAspect anAspect = Font_FA_Regular;
193 if (aFontFace->style_flags == (FT_STYLE_FLAG_ITALIC | FT_STYLE_FLAG_BOLD))
195 anAspect = Font_FA_BoldItalic;
197 else if (aFontFace->style_flags == FT_STYLE_FLAG_ITALIC)
199 anAspect = Font_FA_Italic;
201 else if (aFontFace->style_flags == FT_STYLE_FLAG_BOLD)
203 anAspect = Font_FA_Bold;
206 Handle(TCollection_HAsciiString) aFontName = new TCollection_HAsciiString (aFontFace->family_name);
207 Handle(TCollection_HAsciiString) aFontPath = new TCollection_HAsciiString (theFontPath);
208 Handle(Font_SystemFont) aResult = new Font_SystemFont (aFontName, anAspect, aFontPath);
210 FT_Done_Face (aFontFace);
215 // =======================================================================
216 // function : GetInstance
218 // =======================================================================
219 Handle(Font_FontMgr) Font_FontMgr::GetInstance()
221 static Handle(Font_FontMgr) _mgr;
224 _mgr = new Font_FontMgr();
230 // =======================================================================
231 // function : Font_FontMgr
233 // =======================================================================
234 Font_FontMgr::Font_FontMgr()
239 // =======================================================================
240 // function : CheckFont
242 // =======================================================================
243 Handle(Font_SystemFont) Font_FontMgr::CheckFont (Standard_CString theFontPath) const
245 Handle(Font_FTLibrary) aFtLibrary = new Font_FTLibrary();
246 return checkFont (aFtLibrary, theFontPath);
249 // =======================================================================
250 // function : RegisterFont
252 // =======================================================================
253 Standard_Boolean Font_FontMgr::RegisterFont (const Handle(Font_SystemFont)& theFont,
254 const Standard_Boolean theToOverride)
256 if (theFont.IsNull())
258 return Standard_False;
261 for (Font_NListOfSystemFont::Iterator aFontIter (myListOfFonts);
262 aFontIter.More(); aFontIter.Next())
264 if (!aFontIter.Value()->FontName()->IsSameString (theFont->FontName(), Standard_False))
269 if (theFont->FontAspect() != Font_FA_Undefined
270 && aFontIter.Value()->FontAspect() != theFont->FontAspect())
275 if (theFont->FontHeight() == -1 || aFontIter.Value()->FontHeight() == -1
276 || theFont->FontHeight() == aFontIter.Value()->FontHeight())
278 if (theFont->FontPath()->String() == aFontIter.Value()->FontPath()->String())
280 return Standard_True;
282 else if (theToOverride)
284 myListOfFonts.Remove (aFontIter);
288 return Standard_False;
293 myListOfFonts.Append (theFont);
294 return Standard_True;
297 // =======================================================================
298 // function : InitFontDataBase
300 // =======================================================================
301 void Font_FontMgr::InitFontDataBase()
303 myListOfFonts.Clear();
304 Handle(Font_FTLibrary) aFtLibrary;
308 // font directory is placed in "C:\Windows\Fonts\"
309 UINT aStrLength = GetSystemWindowsDirectoryA (NULL, 0);
315 char* aWinDir = new char[aStrLength];
316 GetSystemWindowsDirectoryA (aWinDir, aStrLength);
317 Handle(TCollection_HAsciiString) aFontsDir = new TCollection_HAsciiString (aWinDir);
318 aFontsDir->AssignCat ("\\Fonts\\");
321 // read fonts list from registry
323 if (RegOpenKeyExA (HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Fonts",
324 0, KEY_READ, &aFontsKey) != ERROR_SUCCESS)
329 NCollection_Map<TCollection_AsciiString> aSupportedExtensions;
330 for (Standard_Integer anIter = 0; Font_FontMgr_Extensions[anIter] != NULL; ++anIter)
332 Standard_CString anExt = Font_FontMgr_Extensions[anIter];
333 aSupportedExtensions.Add (TCollection_AsciiString (anExt));
336 aFtLibrary = new Font_FTLibrary();
337 static const DWORD aBufferSize = 256;
338 char aNameBuff[aBufferSize];
339 char aPathBuff[aBufferSize];
340 DWORD aNameSize = aBufferSize;
341 DWORD aPathSize = aBufferSize;
342 for (DWORD anIter = 0;
343 RegEnumValueA (aFontsKey, anIter,
344 aNameBuff, &aNameSize, NULL, NULL,
345 (LPBYTE )aPathBuff, &aPathSize) != ERROR_NO_MORE_ITEMS;
346 ++anIter, aNameSize = aBufferSize, aPathSize = aBufferSize)
348 aPathBuff[(aPathSize < aBufferSize) ? aPathSize : (aBufferSize - 1)] = '\0'; // ensure string is NULL-terminated
350 Handle(TCollection_HAsciiString) aFontName = new TCollection_HAsciiString (aNameBuff);
351 Handle(TCollection_HAsciiString) aFontPath = new TCollection_HAsciiString (aPathBuff);
352 if (aFontPath->Search ("\\") == -1)
354 aFontPath->Insert (1, aFontsDir); // make absolute path
357 // check file extension is in list of supported
358 const Standard_Integer anExtensionPosition = aFontPath->SearchFromEnd (".") + 1;
359 if (anExtensionPosition > 0 && anExtensionPosition < aFontPath->Length())
361 Handle(TCollection_HAsciiString) aFontExtension = aFontPath->SubString (anExtensionPosition, aFontPath->Length());
362 aFontExtension->LowerCase();
363 if (aSupportedExtensions.Contains (aFontExtension->String()))
365 Handle(Font_SystemFont) aNewFont = checkFont (aFtLibrary, aFontPath->ToCString());
366 if (!aNewFont.IsNull())
368 myListOfFonts.Append (aNewFont);
374 // close registry key
375 RegCloseKey (aFontsKey);
379 NCollection_Map<TCollection_AsciiString> aMapOfFontsDirs;
380 const OSD_Protection aProtectRead (OSD_R, OSD_R, OSD_R, OSD_R);
382 // read fonts directories from font service config file (obsolete)
383 for (Standard_Integer anIter = 0; myFontServiceConf[anIter] != NULL; ++anIter)
385 const TCollection_AsciiString aFileOfFontsPath (myFontServiceConf[anIter]);
386 OSD_File aFile (aFileOfFontsPath);
392 aFile.Open (OSD_ReadOnly, aProtectRead);
398 Standard_Integer aNByte = 256;
399 Standard_Integer aNbyteRead;
400 TCollection_AsciiString aStr; // read string with information
401 while (!aFile.IsAtEnd())
403 Standard_Integer aLocation = -1;
404 Standard_Integer aPathLocation = -1;
406 aFile.ReadLine (aStr, aNByte, aNbyteRead); // reading 1 line (256 bytes)
407 aLocation = aStr.Search ("catalogue=");
410 aLocation = aStr.Search ("catalogue =");
413 aPathLocation = aStr.Search ("/");
414 if (aLocation > 0 && aPathLocation > 0)
416 aStr = aStr.Split (aPathLocation - 1);
417 TCollection_AsciiString aFontPath;
418 Standard_Integer aPathNumber = 1;
421 // Getting directory paths, which can be splitted by "," or ":"
422 aFontPath = aStr.Token (":,", aPathNumber);
423 aFontPath.RightAdjust();
424 if (!aFontPath.IsEmpty())
426 OSD_Path aPath(aFontPath);
427 addDirsRecursively (aPath, aMapOfFontsDirs);
431 while (!aFontPath.IsEmpty());
437 // append default directories
438 for (Standard_Integer anIter = 0; myDefaultFontsDirs[anIter] != NULL; ++anIter)
440 Standard_CString anItem = myDefaultFontsDirs[anIter];
441 TCollection_AsciiString aPathStr (anItem);
442 OSD_Path aPath (aPathStr);
443 addDirsRecursively (aPath, aMapOfFontsDirs);
446 NCollection_Map<TCollection_AsciiString> aSupportedExtensions;
447 for (Standard_Integer anIter = 0; Font_FontMgr_Extensions[anIter] != NULL; ++anIter)
449 Standard_CString anExt = Font_FontMgr_Extensions[anIter];
450 aSupportedExtensions.Add (TCollection_AsciiString (anExt));
453 aFtLibrary = new Font_FTLibrary();
454 for (NCollection_Map<TCollection_AsciiString>::Iterator anIter (aMapOfFontsDirs);
455 anIter.More(); anIter.Next())
458 OSD_Path aFolderPath (anIter.Value());
459 for (OSD_FileIterator aFileIter (aFolderPath, "*"); aFileIter.More(); aFileIter.Next())
461 OSD_Path aFontFilePath;
462 aFileIter.Values().Path (aFontFilePath);
464 TCollection_AsciiString aFontFileName;
465 aFontFilePath.SystemName (aFontFileName);
466 aFontFileName = anIter.Value() + "/" + aFontFileName;
468 Handle(Font_SystemFont) aNewFont = checkFont (aFtLibrary, aFontFileName.ToCString());
469 if (!aNewFont.IsNull())
471 myListOfFonts.Append (aNewFont);
475 OSD_File aReadFile (anIter.Value() + "/fonts.dir");
476 if (!aReadFile.Exists())
478 continue; // invalid fonts directory
481 aReadFile.Open (OSD_ReadOnly, aProtectRead);
482 if (!aReadFile.IsOpen())
484 continue; // invalid fonts directory
487 Standard_Integer aNbyteRead, aNByte = 256;
488 TCollection_AsciiString aLine (aNByte);
489 Standard_Boolean isFirstLine = Standard_True;
490 const TCollection_AsciiString anEncoding ("iso8859-1\n");
491 while (!aReadFile.IsAtEnd())
493 aReadFile.ReadLine (aLine, aNByte, aNbyteRead);
496 // first line contains the number of fonts in this file
497 // just ignoring it...
498 isFirstLine = Standard_False;
502 Standard_Integer anExtensionPosition = aLine.Search (".") + 1;
503 if (anExtensionPosition == 0)
505 continue; // can't find extension position in the font description
508 Standard_Integer anEndOfFileName = aLine.Location (" ", anExtensionPosition, aLine.Length()) - 1;
509 if (anEndOfFileName < 0 || anEndOfFileName < anExtensionPosition)
511 continue; // font description have empty extension
514 TCollection_AsciiString aFontExtension = aLine.SubString (anExtensionPosition, anEndOfFileName);
515 aFontExtension.LowerCase();
516 if (aSupportedExtensions.Contains (aFontExtension) && (aLine.Search (anEncoding) > 0))
518 // In current implementation use fonts with ISO-8859-1 coding page.
519 // OCCT not give to manage coding page by means of programm interface.
520 // TODO: make high level interface for choosing necessary coding page.
521 Handle(TCollection_HAsciiString) aXLFD =
522 new TCollection_HAsciiString (aLine.SubString (anEndOfFileName + 2, aLine.Length()));
523 Handle(TCollection_HAsciiString) aFontPath =
524 new TCollection_HAsciiString (anIter.Value().ToCString());
525 if (aFontPath->SearchFromEnd ("/") != aFontPath->Length())
527 aFontPath->AssignCat ("/");
529 Handle(TCollection_HAsciiString) aFontFileName =
530 new TCollection_HAsciiString (aLine.SubString (1, anEndOfFileName));
531 aFontPath->AssignCat (aFontFileName);
533 Handle(Font_SystemFont) aNewFontFromXLFD = new Font_SystemFont (aXLFD, aFontPath);
534 Handle(Font_SystemFont) aNewFont = checkFont (aFtLibrary, aFontPath->ToCString());
536 if (aNewFontFromXLFD->IsValid() && !aNewFont.IsNull() &&
537 !aNewFont->IsEqual (aNewFontFromXLFD))
539 myListOfFonts.Append (aNewFont);
540 myListOfFonts.Append (aNewFontFromXLFD);
542 else if (!aNewFont.IsNull())
544 myListOfFonts.Append (aNewFont);
546 else if (aNewFontFromXLFD->IsValid())
548 myListOfFonts.Append (aNewFontFromXLFD);
558 // =======================================================================
559 // function : GetAvailableFonts
561 // =======================================================================
562 const Font_NListOfSystemFont& Font_FontMgr::GetAvailableFonts() const
564 return myListOfFonts;
567 // =======================================================================
568 // function : GetAvailableFontsNames
570 // =======================================================================
571 void Font_FontMgr::GetAvailableFontsNames (TColStd_SequenceOfHAsciiString& theFontsNames) const
573 theFontsNames.Clear();
574 for (Font_NListOfSystemFont::Iterator anIter(myListOfFonts); anIter.More(); anIter.Next())
576 theFontsNames.Append (anIter.Value()->FontName());
580 // =======================================================================
581 // function : GetFont
583 // =======================================================================
584 Handle(Font_SystemFont) Font_FontMgr::GetFont (const Handle(TCollection_HAsciiString)& theFontName,
585 const Font_FontAspect theFontAspect,
586 const Standard_Integer theFontSize) const
588 if ( (theFontSize < 2 && theFontSize != -1) || theFontName.IsNull())
593 for (Font_NListOfSystemFont::Iterator aFontsIterator (myListOfFonts);
594 aFontsIterator.More(); aFontsIterator.Next())
596 if (!theFontName->IsEmpty() && !aFontsIterator.Value()->FontName()->IsSameString (theFontName, Standard_False))
601 if (theFontAspect != Font_FA_Undefined && aFontsIterator.Value()->FontAspect() != theFontAspect)
606 if (theFontSize == -1 || aFontsIterator.Value()->FontHeight() == -1 ||
607 theFontSize == aFontsIterator.Value()->FontHeight())
609 return aFontsIterator.Value();
616 // =======================================================================
617 // function : FindFont
619 // =======================================================================
620 Handle(Font_SystemFont) Font_FontMgr::FindFont (const Handle(TCollection_HAsciiString)& theFontName,
621 const Font_FontAspect theFontAspect,
622 const Standard_Integer theFontSize) const
624 Handle(TCollection_HAsciiString) aFontName = theFontName;
625 Font_FontAspect aFontAspect = theFontAspect;
626 Standard_Integer aFontSize = theFontSize;
628 Handle(Font_SystemFont) aFont = GetFont (aFontName, aFontAspect, aFontSize);
634 // Trying to use font names mapping
635 for (Standard_Integer anIter = 0; anIter < NUM_FONT_ENTRIES; ++anIter)
637 Handle(TCollection_HAsciiString) aFontAlias =
638 new TCollection_HAsciiString (Font_FontMgr_MapOfFontsAliases[anIter].EnumName);
640 if (aFontAlias->IsSameString (aFontName, Standard_False))
642 aFontName = new TCollection_HAsciiString (Font_FontMgr_MapOfFontsAliases[anIter].FontName);
643 aFontAspect = Font_FontMgr_MapOfFontsAliases[anIter].FontAspect;
648 // check font family alias with specified font aspect
649 if (theFontAspect != Font_FA_Undefined
650 && theFontAspect != Font_FA_Regular
651 && theFontAspect != aFontAspect)
653 aFont = GetFont (aFontName, theFontAspect, aFontSize);
660 // check font alias with aspect in the name
661 aFont = GetFont (aFontName, aFontAspect, aFontSize);
667 // Requested family name not found -> search for any font family with given aspect and height
668 aFontName = new TCollection_HAsciiString ("");
669 aFont = GetFont (aFontName, aFontAspect, aFontSize);
675 // The last resort: trying to use ANY font available in the system
676 aFontAspect = Font_FA_Undefined;
678 aFont = GetFont (aFontName, aFontAspect, aFontSize);
684 return NULL; // Fonts are not found in the system.