all my changes while i was offline.
[dana/openbox.git] / render / font.c
1 #include "../kernel/openbox.h"
2 #include "font.h"
3
4 #include "../kernel/gettext.h"
5 #define _(str) gettext(str)
6
7 #include <X11/Xft/Xft.h>
8 #include <glib.h>
9 #include "../kernel/geom.h"
10
11 #define ELIPSES "..."
12 #define ELIPSES_LENGTH(font, shadow, offset) \
13     (font->elipses_length + (shadow ? offset : 0))
14
15 void font_startup(void)
16 {
17 #ifdef DEBUG
18     int version;
19 #endif /* DEBUG */
20     if (!XftInit(0)) {
21         g_warning(_("Couldn't initialize Xft.\n"));
22         exit(3);
23     }
24 #ifdef DEBUG
25     version = XftGetVersion();
26     g_message("Using Xft %d.%d.%d (Built against %d.%d.%d).",
27               version / 10000 % 100, version / 100 % 100, version % 100,
28               XFT_MAJOR, XFT_MINOR, XFT_REVISION);
29 #endif
30 }
31
32 static void measure_height(ObFont *f)
33 {
34     XGlyphInfo info;
35     char *str;
36
37     /* XXX add some extended UTF8 characters in here? */
38     str = "12345678900-qwertyuiopasdfghjklzxcvbnm"
39         "!@#$%^&*()_+QWERTYUIOPASDFGHJKLZXCVBNM"
40         "`~[]\\;',./{}|:\"<>?";
41
42     XftTextExtentsUtf8(ob_display, f->xftfont,
43                        (FcChar8*)str, strlen(str), &info);
44     f->height = (signed) info.height;
45
46     /* measure an elipses */
47     XftTextExtentsUtf8(ob_display, f->xftfont,
48                        (FcChar8*)ELIPSES, strlen(ELIPSES), &info);
49     f->elipses_length = (signed) info.xOff;
50 }
51
52 ObFont *font_open(char *fontstring)
53 {
54     ObFont *out;
55     XftFont *xf;
56     
57     if ((xf = XftFontOpenName(ob_display, ob_screen, fontstring))) {
58         out = g_new(ObFont, 1);
59         out->xftfont = xf;
60         measure_height(out);
61         return out;
62     }
63     g_warning(_("Unable to load font: %s\n"), fontstring);
64     g_warning(_("Trying fallback font: %s\n"), "sans");
65
66     if ((xf = XftFontOpenName(ob_display, ob_screen, "sans"))) {
67         out = g_new(ObFont, 1);
68         out->xftfont = xf;
69         measure_height(out);
70         return out;
71     }
72     g_warning(_("Unable to load font: %s\n"), "sans");
73     g_warning(_("Aborting!.\n"));
74
75     exit(3); /* can't continue without a font */
76 }
77
78 void font_close(ObFont *f)
79 {
80     if (f) {
81         XftFontClose(ob_display, f->xftfont);
82         g_free(f);
83     }
84 }
85
86 int font_measure_string(ObFont *f, char *str, int shadow, int offset)
87 {
88     XGlyphInfo info;
89
90     XftTextExtentsUtf8(ob_display, f->xftfont,
91                        (FcChar8*)str, strlen(str), &info);
92
93     return (signed) info.xOff + (shadow ? offset : 0);
94 }
95
96 int font_height(ObFont *f, int shadow, int offset)
97 {
98     return f->height + (shadow ? offset : 0);
99 }
100
101 int font_max_char_width(ObFont *f)
102 {
103     return (signed) f->xftfont->max_advance_width;
104 }
105
106 void font_draw(XftDraw *d, TextureText *t, Rect *position)
107 {
108     int x,y,w,h;
109     XftColor c;
110     GString *text;
111     int m, em;
112     size_t l;
113     gboolean shortened = FALSE;
114
115     y = position->y;
116     w = position->width;
117     h = position->height;
118
119     /* accomidate for areas bigger/smaller than Xft thinks the font is tall */
120     y -= (2 * (t->font->xftfont->ascent + t->font->xftfont->descent) -
121           (t->font->height + h) - 1) / 2;
122
123     text = g_string_new(t->string);
124     l = g_utf8_strlen(text->str, -1);
125     m = font_measure_string(t->font, text->str, t->shadow, t->offset);
126     while (l && m > position->width) {
127         shortened = TRUE;
128         /* remove a character from the middle */
129         text = g_string_erase(text, l-- / 2, 1);
130         em = ELIPSES_LENGTH(t->font, t->shadow, t->offset);
131         /* if the elipses are too large, don't show them at all */
132         if (em > position->width)
133             shortened = FALSE;
134         m = font_measure_string(t->font, text->str, t->shadow, t->offset) + em;
135     }
136     if (shortened) {
137         text = g_string_insert(text, (l + 1) / 2, ELIPSES);
138         l += 3;
139     }
140     if (!l) return;
141
142     switch (t->justify) {
143     case Justify_Left:
144         x = position->x;
145         break;
146     case Justify_Right:
147         x = position->x + (w - m);
148         break;
149     case Justify_Center:
150         x = position->x + (w - m) / 2;
151         break;
152     }
153
154     if (t->shadow) {
155         if (t->tint >= 0) {
156             c.color.red = 0;
157             c.color.green = 0;
158             c.color.blue = 0;
159             c.color.alpha = 0xffff * t->tint / 100; /* transparent shadow */
160             c.pixel = BlackPixel(ob_display, ob_screen);
161         } else {
162             c.color.red = 0xffff * -t->tint / 100;
163             c.color.green = 0xffff * -t->tint / 100;
164             c.color.blue = 0xffff * -t->tint / 100;
165             c.color.alpha = 0xffff * -t->tint / 100; /* transparent shadow */
166             c.pixel = WhitePixel(ob_display, ob_screen);
167         }  
168         XftDrawStringUtf8(d, &c, t->font->xftfont, x + t->offset,
169                           t->font->xftfont->ascent + y + t->offset,
170                           (FcChar8*)text->str, l);
171     }  
172     c.color.red = t->color->r | t->color->r << 8;
173     c.color.green = t->color->g | t->color->g << 8;
174     c.color.blue = t->color->b | t->color->b << 8;
175     c.color.alpha = 0xff | 0xff << 8; /* fully opaque text */
176     c.pixel = t->color->pixel;
177                      
178     XftDrawStringUtf8(d, &c, t->font->xftfont, x,
179                       t->font->xftfont->ascent + y,
180                       (FcChar8*)text->str, l);
181     return;
182 }