]> git.saurik.com Git - wxWidgets.git/blob - src/gtk1/font.cpp
implement wxListCtrl::ScrollList() (in report view and vertical direction only) ...
[wxWidgets.git] / src / gtk1 / font.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/gtk1/font.cpp
3 // Purpose:
4 // Author: Robert Roebling
5 // Id: $Id$
6 // Copyright: (c) 1998 Robert Roebling and Julian Smart
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 // ============================================================================
11 // declarations
12 // ============================================================================
13
14 // ----------------------------------------------------------------------------
15 // headers
16 // ----------------------------------------------------------------------------
17
18 // For compilers that support precompilation, includes "wx.h".
19 #include "wx/wxprec.h"
20
21 #include "wx/font.h"
22
23 #ifndef WX_PRECOMP
24 #include "wx/log.h"
25 #include "wx/settings.h"
26 #include "wx/cmndata.h"
27 #include "wx/gdicmn.h"
28 #endif
29
30 #include "wx/fontutil.h"
31 #include "wx/utils.h"
32 #include "wx/tokenzr.h"
33
34 #include <strings.h>
35
36 #include "wx/gtk1/private.h"
37 #include <gdk/gdkprivate.h>
38
39 // ----------------------------------------------------------------------------
40 // constants
41 // ----------------------------------------------------------------------------
42
43 // the default size (in points) for the fonts
44 static const int wxDEFAULT_FONT_SIZE = 12;
45
46 // ----------------------------------------------------------------------------
47 // wxScaledFontList: maps the font sizes to the GDK fonts for the given font
48 // ----------------------------------------------------------------------------
49
50 WX_DECLARE_HASH_MAP(int, GdkFont *, wxIntegerHash, wxIntegerEqual,
51 wxScaledFontList);
52
53 // ----------------------------------------------------------------------------
54 // wxFontRefData
55 // ----------------------------------------------------------------------------
56
57 class wxFontRefData : public wxGDIRefData
58 {
59 public:
60 // from broken down font parameters, also default ctor
61 wxFontRefData(int size = -1,
62 int family = wxFONTFAMILY_DEFAULT,
63 int style = wxFONTSTYLE_NORMAL,
64 int weight = wxFONTWEIGHT_NORMAL,
65 bool underlined = false,
66 const wxString& faceName = wxEmptyString,
67 wxFontEncoding encoding = wxFONTENCODING_DEFAULT);
68
69 // from XFLD
70 wxFontRefData(const wxString& fontname);
71
72 // copy ctor
73 wxFontRefData( const wxFontRefData& data );
74
75 virtual ~wxFontRefData();
76
77 // do we have the native font info?
78 bool HasNativeFont() const
79 {
80 // only use m_nativeFontInfo if it had been initialized
81 return !m_nativeFontInfo.IsDefault();
82 }
83
84 // setters: all of them also take care to modify m_nativeFontInfo if we
85 // have it so as to not lose the information not carried by our fields
86 void SetPointSize(int pointSize);
87 void SetFamily(int family);
88 void SetStyle(int style);
89 void SetWeight(int weight);
90 void SetUnderlined(bool underlined);
91 bool SetFaceName(const wxString& facename);
92 void SetEncoding(wxFontEncoding encoding);
93
94 void SetNoAntiAliasing( bool no = true ) { m_noAA = no; }
95 bool GetNoAntiAliasing() const { return m_noAA; }
96
97 // and this one also modifies all the other font data fields
98 void SetNativeFontInfo(const wxNativeFontInfo& info);
99
100 // debugger helper: shows what the font really is
101 //
102 // VZ: I need this as my gdb either shows wildly wrong values or crashes
103 // when I ask it to "p fontRefData" :-(
104 #if defined(__WXDEBUG__)
105 void Dump() const
106 {
107 wxPrintf(_T("%s-%s-%s-%d-%d\n"),
108 m_faceName.c_str(),
109 m_weight == wxFONTWEIGHT_NORMAL
110 ? _T("normal")
111 : m_weight == wxFONTWEIGHT_BOLD
112 ? _T("bold")
113 : _T("light"),
114 m_style == wxFONTSTYLE_NORMAL ? _T("regular") : _T("italic"),
115 m_pointSize,
116 m_encoding);
117 }
118 #endif // Debug
119
120 protected:
121 // common part of all ctors
122 void Init(int pointSize,
123 int family,
124 int style,
125 int weight,
126 bool underlined,
127 const wxString& faceName,
128 wxFontEncoding encoding);
129
130 // set all fields from (already initialized and valid) m_nativeFontInfo
131 void InitFromNative();
132
133 private:
134 // clear m_scaled_xfonts if any
135 void ClearGdkFonts();
136
137 // the map of font sizes to "GdkFont *"
138 wxScaledFontList m_scaled_xfonts;
139
140 int m_pointSize;
141 int m_family,
142 m_style,
143 m_weight;
144 bool m_underlined;
145 wxString m_faceName;
146 wxFontEncoding m_encoding; // Unused under GTK 2.0
147 bool m_noAA; // No anti-aliasing
148
149 // The native font info, basicly an XFLD under GTK 1.2 and
150 // the pango font description under GTK 2.0.
151 wxNativeFontInfo m_nativeFontInfo;
152
153 friend class wxFont;
154 };
155
156 #define M_FONTDATA ((wxFontRefData*)m_refData)
157
158 // ----------------------------------------------------------------------------
159 // wxFontRefData
160 // ----------------------------------------------------------------------------
161
162 void wxFontRefData::Init(int pointSize,
163 int family,
164 int style,
165 int weight,
166 bool underlined,
167 const wxString& faceName,
168 wxFontEncoding encoding)
169 {
170 m_family = family == wxFONTFAMILY_DEFAULT ? wxFONTFAMILY_SWISS : family;
171
172 m_faceName = faceName;
173
174 // we accept both wxDEFAULT and wxNORMAL here - should we?
175 m_style = style == wxDEFAULT ? wxFONTSTYLE_NORMAL : style;
176 m_weight = weight == wxDEFAULT ? wxFONTWEIGHT_NORMAL : weight;
177
178 // and here, do we really want to forbid creation of the font of the size
179 // 90 (the value of wxDEFAULT)??
180 m_pointSize = pointSize == wxDEFAULT || pointSize == -1
181 ? wxDEFAULT_FONT_SIZE
182 : pointSize;
183
184 m_underlined = underlined;
185 m_encoding = encoding;
186
187 m_noAA = false;
188 }
189
190 void wxFontRefData::InitFromNative()
191 {
192 m_noAA = false;
193
194 // get the font parameters from the XLFD
195 // -------------------------------------
196
197 m_faceName = m_nativeFontInfo.GetXFontComponent(wxXLFD_FAMILY);
198
199 m_weight = wxFONTWEIGHT_NORMAL;
200
201 wxString w = m_nativeFontInfo.GetXFontComponent(wxXLFD_WEIGHT).Upper();
202 if ( !w.empty() && w != _T('*') )
203 {
204 // the test below catches all of BOLD, EXTRABOLD, DEMIBOLD, ULTRABOLD
205 // and BLACK
206 if ( ((w[0u] == _T('B') && (!wxStrcmp(w.c_str() + 1, wxT("OLD")) ||
207 !wxStrcmp(w.c_str() + 1, wxT("LACK"))))) ||
208 wxStrstr(w.c_str() + 1, _T("BOLD")) )
209 {
210 m_weight = wxFONTWEIGHT_BOLD;
211 }
212 else if ( w == _T("LIGHT") || w == _T("THIN") )
213 {
214 m_weight = wxFONTWEIGHT_LIGHT;
215 }
216 }
217
218 switch ( wxToupper(m_nativeFontInfo.
219 GetXFontComponent(wxXLFD_SLANT)[0u]).GetValue() )
220 {
221 case _T('I'): // italique
222 m_style = wxFONTSTYLE_ITALIC;
223 break;
224
225 case _T('O'): // oblique
226 m_style = wxFONTSTYLE_SLANT;
227 break;
228
229 default:
230 m_style = wxFONTSTYLE_NORMAL;
231 }
232
233 long ptSize;
234 if ( m_nativeFontInfo.GetXFontComponent(wxXLFD_POINTSIZE).ToLong(&ptSize) )
235 {
236 // size in XLFD is in 10 point units
237 m_pointSize = (int)(ptSize / 10);
238 }
239 else
240 {
241 m_pointSize = wxDEFAULT_FONT_SIZE;
242 }
243
244 // examine the spacing: if the font is monospaced, assume wxTELETYPE
245 // family for compatibility with the old code which used it instead of
246 // IsFixedWidth()
247 if ( m_nativeFontInfo.GetXFontComponent(wxXLFD_SPACING).Upper() == _T('M') )
248 {
249 m_family = wxFONTFAMILY_TELETYPE;
250 }
251 else // not monospaceed
252 {
253 // don't even try guessing it, it doesn't work for too many fonts
254 // anyhow
255 m_family = wxFONTFAMILY_UNKNOWN;
256 }
257
258 // X fonts are never underlined...
259 m_underlined = false;
260
261 // deal with font encoding
262 wxString
263 registry = m_nativeFontInfo.GetXFontComponent(wxXLFD_REGISTRY).Upper(),
264 encoding = m_nativeFontInfo.GetXFontComponent(wxXLFD_ENCODING).Upper();
265
266 if ( registry == _T("ISO8859") )
267 {
268 int cp;
269 if ( wxSscanf(encoding, wxT("%d"), &cp) == 1 )
270 {
271 m_encoding = (wxFontEncoding)(wxFONTENCODING_ISO8859_1 + cp - 1);
272 }
273 }
274 else if ( registry == _T("MICROSOFT") )
275 {
276 int cp;
277 if ( wxSscanf(encoding, wxT("cp125%d"), &cp) == 1 )
278 {
279 m_encoding = (wxFontEncoding)(wxFONTENCODING_CP1250 + cp);
280 }
281 }
282 else if ( registry == _T("KOI8") )
283 {
284 m_encoding = wxFONTENCODING_KOI8;
285 }
286 else // unknown encoding
287 {
288 // may be give a warning here? or use wxFontMapper?
289 m_encoding = wxFONTENCODING_SYSTEM;
290 }
291 }
292
293 wxFontRefData::wxFontRefData( const wxFontRefData& data )
294 : wxGDIRefData()
295 {
296 m_pointSize = data.m_pointSize;
297 m_family = data.m_family;
298 m_style = data.m_style;
299 m_weight = data.m_weight;
300
301 m_underlined = data.m_underlined;
302
303 m_faceName = data.m_faceName;
304 m_encoding = data.m_encoding;
305
306 m_noAA = data.m_noAA;
307
308 // Forces a copy of the internal data. wxNativeFontInfo should probably
309 // have a copy ctor and assignment operator to fix this properly but that
310 // would break binary compatibility...
311 m_nativeFontInfo.FromString(data.m_nativeFontInfo.ToString());
312 }
313
314 wxFontRefData::wxFontRefData(int size, int family, int style,
315 int weight, bool underlined,
316 const wxString& faceName,
317 wxFontEncoding encoding)
318 {
319 Init(size, family, style, weight, underlined, faceName, encoding);
320 }
321
322 wxFontRefData::wxFontRefData(const wxString& fontname)
323 {
324 // FromString() should really work in GTK1 too, doesn't it?
325 m_nativeFontInfo.SetXFontName(fontname);
326
327 InitFromNative();
328 }
329
330 void wxFontRefData::ClearGdkFonts()
331 {
332 for ( wxScaledFontList::iterator i = m_scaled_xfonts.begin();
333 i != m_scaled_xfonts.end();
334 ++i )
335 {
336 GdkFont *font = i->second;
337 gdk_font_unref( font );
338 }
339
340 m_scaled_xfonts.clear();
341 }
342
343 wxFontRefData::~wxFontRefData()
344 {
345 ClearGdkFonts();
346 }
347
348 // ----------------------------------------------------------------------------
349 // wxFontRefData SetXXX()
350 // ----------------------------------------------------------------------------
351
352 void wxFontRefData::SetPointSize(int pointSize)
353 {
354 m_pointSize = pointSize;
355
356 if ( HasNativeFont() )
357 {
358 wxString size;
359 if ( pointSize == -1 )
360 size = _T('*');
361 else
362 size.Printf(_T("%d"), 10*pointSize);
363
364 m_nativeFontInfo.SetXFontComponent(wxXLFD_POINTSIZE, size);
365 }
366 }
367
368 void wxFontRefData::SetFamily(int family)
369 {
370 m_family = family;
371
372 // TODO: what are we supposed to do with m_nativeFontInfo here?
373 }
374
375 void wxFontRefData::SetStyle(int style)
376 {
377 m_style = style;
378
379 if ( HasNativeFont() )
380 {
381 wxString slant;
382 switch ( style )
383 {
384 case wxFONTSTYLE_ITALIC:
385 slant = _T('i');
386 break;
387
388 case wxFONTSTYLE_SLANT:
389 slant = _T('o');
390 break;
391
392 default:
393 wxFAIL_MSG( _T("unknown font style") );
394 // fall through
395
396 case wxFONTSTYLE_NORMAL:
397 slant = _T('r');
398 }
399
400 m_nativeFontInfo.SetXFontComponent(wxXLFD_SLANT, slant);
401 }
402 }
403
404 void wxFontRefData::SetWeight(int weight)
405 {
406 m_weight = weight;
407
408 if ( HasNativeFont() )
409 {
410 wxString boldness;
411 switch ( weight )
412 {
413 case wxFONTWEIGHT_BOLD:
414 boldness = _T("bold");
415 break;
416
417 case wxFONTWEIGHT_LIGHT:
418 boldness = _T("light");
419 break;
420
421 default:
422 wxFAIL_MSG( _T("unknown font weight") );
423 // fall through
424
425 case wxFONTWEIGHT_NORMAL:
426 // unspecified
427 boldness = _T("medium");
428 }
429
430 m_nativeFontInfo.SetXFontComponent(wxXLFD_WEIGHT, boldness);
431 }
432 }
433
434 void wxFontRefData::SetUnderlined(bool underlined)
435 {
436 m_underlined = underlined;
437
438 // the XLFD doesn't have "underlined" field anyhow
439 }
440
441 bool wxFontRefData::SetFaceName(const wxString& facename)
442 {
443 m_faceName = facename;
444
445 if ( HasNativeFont() )
446 {
447 m_nativeFontInfo.SetXFontComponent(wxXLFD_FAMILY, facename);
448 }
449
450 return true;
451 }
452
453 void wxFontRefData::SetEncoding(wxFontEncoding encoding)
454 {
455 m_encoding = encoding;
456
457 if ( HasNativeFont() )
458 {
459 wxNativeEncodingInfo info;
460 if ( wxGetNativeFontEncoding(encoding, &info) )
461 {
462 m_nativeFontInfo.SetXFontComponent(wxXLFD_REGISTRY, info.xregistry);
463 m_nativeFontInfo.SetXFontComponent(wxXLFD_ENCODING, info.xencoding);
464 }
465 }
466 }
467
468 void wxFontRefData::SetNativeFontInfo(const wxNativeFontInfo& info)
469 {
470 // previously cached fonts shouldn't be used
471 ClearGdkFonts();
472
473 m_nativeFontInfo = info;
474
475 // set all the other font parameters from the native font info
476 InitFromNative();
477 }
478
479 // ----------------------------------------------------------------------------
480 // wxFont creation
481 // ----------------------------------------------------------------------------
482
483 IMPLEMENT_DYNAMIC_CLASS(wxFont, wxGDIObject)
484
485 wxFont::wxFont(const wxNativeFontInfo& info)
486 {
487 (void) Create(info.GetXFontName());
488 }
489
490 bool wxFont::Create( int pointSize,
491 int family,
492 int style,
493 int weight,
494 bool underlined,
495 const wxString& face,
496 wxFontEncoding encoding)
497 {
498 UnRef();
499
500 m_refData = new wxFontRefData(pointSize, family, style, weight,
501 underlined, face, encoding);
502
503 return true;
504 }
505
506 bool wxFont::Create(const wxString& fontname)
507 {
508 // VZ: does this really happen?
509 if ( fontname.empty() )
510 {
511 *this = wxSystemSettings::GetFont(wxSYS_DEFAULT_GUI_FONT);
512
513 return true;
514 }
515
516 m_refData = new wxFontRefData(fontname);
517
518 return true;
519 }
520
521 void wxFont::Unshare()
522 {
523 if (!m_refData)
524 {
525 m_refData = new wxFontRefData();
526 }
527 else
528 {
529 wxFontRefData* ref = new wxFontRefData(*(wxFontRefData*)m_refData);
530 UnRef();
531 m_refData = ref;
532 }
533 }
534
535 wxFont::~wxFont()
536 {
537 }
538
539 wxGDIRefData *wxFont::CreateGDIRefData() const
540 {
541 return new wxFontRefData;
542 }
543
544 wxGDIRefData *wxFont::CloneGDIRefData(const wxGDIRefData *data) const
545 {
546 return new wxFontRefData(*wx_static_cast(const wxFontRefData *, data));
547 }
548
549 // ----------------------------------------------------------------------------
550 // accessors
551 // ----------------------------------------------------------------------------
552
553 int wxFont::GetPointSize() const
554 {
555 wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
556
557 return M_FONTDATA->m_pointSize;
558 }
559
560 wxString wxFont::GetFaceName() const
561 {
562 wxCHECK_MSG( Ok(), wxEmptyString, wxT("invalid font") );
563
564 return M_FONTDATA->m_faceName;
565 }
566
567 int wxFont::GetFamily() const
568 {
569 wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
570
571 return M_FONTDATA->m_family;
572 }
573
574 int wxFont::GetStyle() const
575 {
576 wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
577
578 return M_FONTDATA->m_style;
579 }
580
581 int wxFont::GetWeight() const
582 {
583 wxCHECK_MSG( Ok(), 0, wxT("invalid font") );
584
585 return M_FONTDATA->m_weight;
586 }
587
588 bool wxFont::GetUnderlined() const
589 {
590 wxCHECK_MSG( Ok(), false, wxT("invalid font") );
591
592 return M_FONTDATA->m_underlined;
593 }
594
595 wxFontEncoding wxFont::GetEncoding() const
596 {
597 wxCHECK_MSG( Ok(), wxFONTENCODING_DEFAULT, wxT("invalid font") );
598
599 // m_encoding is unused in wxGTK2, return encoding that the user set.
600 return M_FONTDATA->m_encoding;
601 }
602
603 bool wxFont::GetNoAntiAliasing() const
604 {
605 wxCHECK_MSG( Ok(), wxFONTENCODING_DEFAULT, wxT("invalid font") );
606
607 return M_FONTDATA->m_noAA;
608 }
609
610 const wxNativeFontInfo *wxFont::GetNativeFontInfo() const
611 {
612 wxCHECK_MSG( Ok(), (wxNativeFontInfo *)NULL, wxT("invalid font") );
613
614 if ( !M_FONTDATA->HasNativeFont() )
615 {
616 // NB: this call has important side-effect: it not only finds
617 // GdkFont representation, it also initializes m_nativeFontInfo
618 // by calling its SetXFontName method
619 GetInternalFont();
620 }
621
622 return &(M_FONTDATA->m_nativeFontInfo);
623 }
624
625 bool wxFont::IsFixedWidth() const
626 {
627 wxCHECK_MSG( Ok(), false, wxT("invalid font") );
628
629 if ( M_FONTDATA->HasNativeFont() )
630 {
631 // the monospace fonts are supposed to have "M" in the spacing field
632 wxString spacing = M_FONTDATA->
633 m_nativeFontInfo.GetXFontComponent(wxXLFD_SPACING);
634
635 return spacing.Upper() == _T('M');
636 }
637
638 return wxFontBase::IsFixedWidth();
639 }
640
641 // ----------------------------------------------------------------------------
642 // change font attributes
643 // ----------------------------------------------------------------------------
644
645 void wxFont::SetPointSize(int pointSize)
646 {
647 Unshare();
648
649 M_FONTDATA->SetPointSize(pointSize);
650 }
651
652 void wxFont::SetFamily(int family)
653 {
654 Unshare();
655
656 M_FONTDATA->SetFamily(family);
657 }
658
659 void wxFont::SetStyle(int style)
660 {
661 Unshare();
662
663 M_FONTDATA->SetStyle(style);
664 }
665
666 void wxFont::SetWeight(int weight)
667 {
668 Unshare();
669
670 M_FONTDATA->SetWeight(weight);
671 }
672
673 bool wxFont::SetFaceName(const wxString& faceName)
674 {
675 Unshare();
676
677 return M_FONTDATA->SetFaceName(faceName) &&
678 wxFontBase::SetFaceName(faceName);
679 }
680
681 void wxFont::SetUnderlined(bool underlined)
682 {
683 Unshare();
684
685 M_FONTDATA->SetUnderlined(underlined);
686 }
687
688 void wxFont::SetEncoding(wxFontEncoding encoding)
689 {
690 Unshare();
691
692 M_FONTDATA->SetEncoding(encoding);
693 }
694
695 void wxFont::DoSetNativeFontInfo( const wxNativeFontInfo& info )
696 {
697 Unshare();
698
699 M_FONTDATA->SetNativeFontInfo( info );
700 }
701
702 void wxFont::SetNoAntiAliasing( bool no )
703 {
704 Unshare();
705
706 M_FONTDATA->SetNoAntiAliasing( no );
707 }
708
709 // ----------------------------------------------------------------------------
710 // get internal representation of font
711 // ----------------------------------------------------------------------------
712
713 static GdkFont *g_systemDefaultGuiFont = (GdkFont*) NULL;
714
715 // this is also used from tbargtk.cpp and tooltip.cpp, hence extern
716 extern GdkFont *GtkGetDefaultGuiFont()
717 {
718 if (!g_systemDefaultGuiFont)
719 {
720 GtkWidget *widget = gtk_button_new();
721 GtkStyle *def = gtk_rc_get_style( widget );
722 if (def)
723 {
724 g_systemDefaultGuiFont = gdk_font_ref( def->font );
725 }
726 else
727 {
728 def = gtk_widget_get_default_style();
729 if (def)
730 g_systemDefaultGuiFont = gdk_font_ref( def->font );
731 }
732 gtk_widget_destroy( widget );
733 }
734 else
735 {
736 // already have it, but ref it once more before returning
737 gdk_font_ref(g_systemDefaultGuiFont);
738 }
739
740 return g_systemDefaultGuiFont;
741 }
742
743 GdkFont *wxFont::GetInternalFont( float scale ) const
744 {
745 GdkFont *font = (GdkFont *) NULL;
746
747 wxCHECK_MSG( Ok(), font, wxT("invalid font") );
748
749 long int_scale = long(scale * 100.0 + 0.5); // key for fontlist
750 int point_scale = (int)((M_FONTDATA->m_pointSize * 10 * int_scale) / 100);
751
752 wxScaledFontList& list = M_FONTDATA->m_scaled_xfonts;
753 wxScaledFontList::iterator i = list.find(int_scale);
754 if ( i != list.end() )
755 {
756 font = i->second;
757 }
758 else // we don't have this font in this size yet
759 {
760 if (*this == wxSystemSettings::GetFont( wxSYS_DEFAULT_GUI_FONT))
761 {
762 font = GtkGetDefaultGuiFont();
763 }
764
765 if ( !font )
766 {
767 // do we have the XLFD?
768 if ( int_scale == 100 && M_FONTDATA->HasNativeFont() )
769 {
770 font = wxLoadFont(M_FONTDATA->m_nativeFontInfo.GetXFontName());
771 }
772
773 // no XLFD of no exact match - try the approximate one now
774 if ( !font )
775 {
776 wxString xfontname;
777 font = wxLoadQueryNearestFont( point_scale,
778 M_FONTDATA->m_family,
779 M_FONTDATA->m_style,
780 M_FONTDATA->m_weight,
781 M_FONTDATA->m_underlined,
782 M_FONTDATA->m_faceName,
783 M_FONTDATA->m_encoding,
784 &xfontname);
785 // NB: wxFont::GetNativeFontInfo relies on this
786 // side-effect of GetInternalFont
787 if ( int_scale == 100 )
788 M_FONTDATA->m_nativeFontInfo.SetXFontName(xfontname);
789 }
790 }
791
792 if ( font )
793 {
794 list[int_scale] = font;
795 }
796 }
797
798 // it's quite useless to make it a wxCHECK because we're going to crash
799 // anyhow...
800 wxASSERT_MSG( font, wxT("could not load any font?") );
801
802 return font;
803 }