Blame


1 9c611279 2012-10-21 rsc #include <u.h>
2 9c611279 2012-10-21 rsc
3 9c611279 2012-10-21 rsc #include <fontconfig/fontconfig.h>
4 9c611279 2012-10-21 rsc #include <ft2build.h>
5 9c611279 2012-10-21 rsc #include FT_FREETYPE_H
6 9c611279 2012-10-21 rsc
7 9c611279 2012-10-21 rsc #include <libc.h>
8 9c611279 2012-10-21 rsc #include <draw.h>
9 9c611279 2012-10-21 rsc #include <memdraw.h>
10 9c611279 2012-10-21 rsc #include "a.h"
11 9c611279 2012-10-21 rsc
12 9c611279 2012-10-21 rsc static FcConfig *fc;
13 9c611279 2012-10-21 rsc static FT_Library lib;
14 9c611279 2012-10-21 rsc static int dpi = 96;
15 9c611279 2012-10-21 rsc
16 9c611279 2012-10-21 rsc void
17 9c611279 2012-10-21 rsc loadfonts(void)
18 9c611279 2012-10-21 rsc {
19 9c611279 2012-10-21 rsc int i;
20 9c611279 2012-10-21 rsc FT_Error e;
21 9c611279 2012-10-21 rsc FcFontSet *sysfonts;
22 9c611279 2012-10-21 rsc
23 9c611279 2012-10-21 rsc if(!FcInit() || (fc=FcInitLoadConfigAndFonts()) == NULL) {
24 9c611279 2012-10-21 rsc fprint(2, "fontconfig initialization failed\n");
25 9c611279 2012-10-21 rsc exits("fontconfig failed");
26 9c611279 2012-10-21 rsc }
27 9c611279 2012-10-21 rsc
28 9c611279 2012-10-21 rsc e = FT_Init_FreeType(&lib);
29 9c611279 2012-10-21 rsc if(e) {
30 9c611279 2012-10-21 rsc fprint(2, "freetype initialization failed: %d\n", e);
31 9c611279 2012-10-21 rsc exits("freetype failed");
32 9c611279 2012-10-21 rsc }
33 9c611279 2012-10-21 rsc
34 9c611279 2012-10-21 rsc sysfonts = FcConfigGetFonts(fc, FcSetSystem);
35 9c611279 2012-10-21 rsc
36 9c611279 2012-10-21 rsc xfont = emalloc9p(sysfonts->nfont*sizeof xfont[0]);
37 9c611279 2012-10-21 rsc memset(xfont, 0, sysfonts->nfont*sizeof xfont[0]);
38 9c611279 2012-10-21 rsc for(i=0; i<sysfonts->nfont; i++) {
39 9c611279 2012-10-21 rsc FcChar8 *fullname, *fontfile;
40 9c611279 2012-10-21 rsc int index;
41 9c611279 2012-10-21 rsc FcPattern *pat = sysfonts->fonts[i];
42 9c611279 2012-10-21 rsc
43 c82e11b2 2018-11-14 rsc if(FcPatternGetString(pat, FC_POSTSCRIPT_NAME, 0, &fullname) != FcResultMatch ||
44 9c611279 2012-10-21 rsc FcPatternGetString(pat, FC_FILE, 0, &fontfile) != FcResultMatch ||
45 9c611279 2012-10-21 rsc FcPatternGetInteger(pat, FC_INDEX, 0, &index) != FcResultMatch)
46 9c611279 2012-10-21 rsc continue;
47 9c611279 2012-10-21 rsc
48 9c611279 2012-10-21 rsc xfont[nxfont].name = strdup((char*)fullname);
49 9c611279 2012-10-21 rsc xfont[nxfont].fontfile = strdup((char*)fontfile);
50 9c611279 2012-10-21 rsc xfont[nxfont].index = index;
51 9c611279 2012-10-21 rsc nxfont++;
52 9c611279 2012-10-21 rsc }
53 9c611279 2012-10-21 rsc
54 9c611279 2012-10-21 rsc FcFontSetDestroy(sysfonts);
55 9c611279 2012-10-21 rsc }
56 9c611279 2012-10-21 rsc
57 9c611279 2012-10-21 rsc void
58 9c611279 2012-10-21 rsc load(XFont *f)
59 9c611279 2012-10-21 rsc {
60 9c611279 2012-10-21 rsc FT_Face face;
61 9c611279 2012-10-21 rsc FT_Error e;
62 9c611279 2012-10-21 rsc FT_ULong charcode;
63 9c611279 2012-10-21 rsc FT_UInt glyph_index;
64 9c611279 2012-10-21 rsc
65 9c611279 2012-10-21 rsc if(f->loaded)
66 9c611279 2012-10-21 rsc return;
67 9c611279 2012-10-21 rsc
68 9c611279 2012-10-21 rsc e = FT_New_Face(lib, f->fontfile, f->index, &face);
69 9c611279 2012-10-21 rsc if(e){
70 9c611279 2012-10-21 rsc fprint(2, "load failed for %s (%s) index:%d\n", f->name, f->fontfile, f->index);
71 9c611279 2012-10-21 rsc return;
72 9c611279 2012-10-21 rsc }
73 9c611279 2012-10-21 rsc if(!FT_IS_SCALABLE(face)) {
74 9c611279 2012-10-21 rsc fprint(2, "%s is a non scalable font, skipping\n", f->name);
75 9c611279 2012-10-21 rsc FT_Done_Face(face);
76 48da9bd7 2018-10-05 0intro f->loaded = 1;
77 9c611279 2012-10-21 rsc return;
78 9c611279 2012-10-21 rsc }
79 9c611279 2012-10-21 rsc f->unit = face->units_per_EM;
80 ed959cfb 2018-11-14 rsc f->height = (int)((face->ascender - face->descender) * 1.35);
81 9c611279 2012-10-21 rsc f->originy = face->descender; // bbox.yMin (or descender) is negative, becase the baseline is y-coord 0
82 9c611279 2012-10-21 rsc
83 9c611279 2012-10-21 rsc for(charcode=FT_Get_First_Char(face, &glyph_index); glyph_index != 0;
84 9c611279 2012-10-21 rsc charcode=FT_Get_Next_Char(face, charcode, &glyph_index)) {
85 9c611279 2012-10-21 rsc
86 775cb933 2015-08-27 rsc int idx = charcode/SubfontSize;
87 9c611279 2012-10-21 rsc
88 9c611279 2012-10-21 rsc if(charcode > 0xffff)
89 9c611279 2012-10-21 rsc break;
90 9c611279 2012-10-21 rsc
91 9c611279 2012-10-21 rsc if(!f->range[idx]) {
92 9c611279 2012-10-21 rsc f->range[idx] = 1;
93 9c611279 2012-10-21 rsc f->nrange++;
94 9c611279 2012-10-21 rsc }
95 9c611279 2012-10-21 rsc }
96 48da9bd7 2018-10-05 0intro // libdraw expects U+0000 to be present
97 48da9bd7 2018-10-05 0intro if(!f->range[0]) {
98 48da9bd7 2018-10-05 0intro f->range[0] = 1;
99 48da9bd7 2018-10-05 0intro f->nrange++;
100 48da9bd7 2018-10-05 0intro }
101 9c611279 2012-10-21 rsc FT_Done_Face(face);
102 9c611279 2012-10-21 rsc f->loaded = 1;
103 9c611279 2012-10-21 rsc }
104 9c611279 2012-10-21 rsc
105 9c611279 2012-10-21 rsc Memsubfont*
106 32dc15fa 2015-02-17 rsc mksubfont(XFont *xf, char *name, int lo, int hi, int size, int antialias)
107 9c611279 2012-10-21 rsc {
108 9c611279 2012-10-21 rsc FT_Face face;
109 9c611279 2012-10-21 rsc FT_Error e;
110 9c611279 2012-10-21 rsc Memimage *m, *mc, *m1;
111 9c611279 2012-10-21 rsc double pixel_size;
112 48da9bd7 2018-10-05 0intro int w, x, y, y0;
113 9c611279 2012-10-21 rsc int i;
114 9c611279 2012-10-21 rsc Fontchar *fc, *fc0;
115 9c611279 2012-10-21 rsc Memsubfont *sf;
116 63002b3e 2014-03-03 0intro //Point rect_points[4];
117 9c611279 2012-10-21 rsc
118 9c611279 2012-10-21 rsc e = FT_New_Face(lib, xf->fontfile, xf->index, &face);
119 9c611279 2012-10-21 rsc if(e){
120 9c611279 2012-10-21 rsc fprint(2, "load failed for %s (%s) index:%d\n", xf->name, xf->fontfile, xf->index);
121 9c611279 2012-10-21 rsc return nil;
122 9c611279 2012-10-21 rsc }
123 9c611279 2012-10-21 rsc
124 9c611279 2012-10-21 rsc e = FT_Set_Char_Size(face, 0, size<<6, dpi, dpi);
125 9c611279 2012-10-21 rsc if(e){
126 9c611279 2012-10-21 rsc fprint(2, "FT_Set_Char_Size failed\n");
127 9c611279 2012-10-21 rsc FT_Done_Face(face);
128 9c611279 2012-10-21 rsc return nil;
129 9c611279 2012-10-21 rsc }
130 9c611279 2012-10-21 rsc
131 9c611279 2012-10-21 rsc pixel_size = (dpi*size)/72.0;
132 48da9bd7 2018-10-05 0intro w = x = (int)((face->max_advance_width) * pixel_size/xf->unit + 0.99999999);
133 9c611279 2012-10-21 rsc y = (int)((face->ascender - face->descender) * pixel_size/xf->unit + 0.99999999);
134 9c611279 2012-10-21 rsc y0 = (int)(-face->descender * pixel_size/xf->unit + 0.99999999);
135 9c611279 2012-10-21 rsc
136 48da9bd7 2018-10-05 0intro m = allocmemimage(Rect(0, 0, x*(hi+1-lo)+1, y+1), antialias ? GREY8 : GREY1);
137 9c611279 2012-10-21 rsc if(m == nil) {
138 9c611279 2012-10-21 rsc FT_Done_Face(face);
139 9c611279 2012-10-21 rsc return nil;
140 9c611279 2012-10-21 rsc }
141 48da9bd7 2018-10-05 0intro mc = allocmemimage(Rect(0, 0, x+1, y+1), antialias ? GREY8 : GREY1);
142 9c611279 2012-10-21 rsc if(mc == nil) {
143 9c611279 2012-10-21 rsc freememimage(m);
144 9c611279 2012-10-21 rsc FT_Done_Face(face);
145 9c611279 2012-10-21 rsc return nil;
146 9c611279 2012-10-21 rsc }
147 9c611279 2012-10-21 rsc memfillcolor(m, DBlack);
148 9c611279 2012-10-21 rsc memfillcolor(mc, DBlack);
149 9c611279 2012-10-21 rsc fc = malloc((hi+2 - lo) * sizeof fc[0]);
150 9c611279 2012-10-21 rsc sf = malloc(sizeof *sf);
151 9c611279 2012-10-21 rsc if(fc == nil || sf == nil) {
152 9c611279 2012-10-21 rsc freememimage(m);
153 9c611279 2012-10-21 rsc freememimage(mc);
154 9c611279 2012-10-21 rsc free(fc);
155 9c611279 2012-10-21 rsc free(sf);
156 9c611279 2012-10-21 rsc FT_Done_Face(face);
157 9c611279 2012-10-21 rsc return nil;
158 9c611279 2012-10-21 rsc }
159 9c611279 2012-10-21 rsc fc0 = fc;
160 9c611279 2012-10-21 rsc
161 9c611279 2012-10-21 rsc //rect_points[0] = mc->r.min;
162 9c611279 2012-10-21 rsc //rect_points[1] = Pt(mc->r.max.x, mc->r.min.y);
163 9c611279 2012-10-21 rsc //rect_points[2] = mc->r.max;
164 9c611279 2012-10-21 rsc //rect_points[3] = Pt(mc->r.min.x, mc->r.max.y);
165 9c611279 2012-10-21 rsc
166 9c611279 2012-10-21 rsc x = 0;
167 9c611279 2012-10-21 rsc for(i=lo; i<=hi; i++, fc++) {
168 48da9bd7 2018-10-05 0intro int k, r;
169 9c611279 2012-10-21 rsc int advance;
170 9c611279 2012-10-21 rsc
171 9c611279 2012-10-21 rsc memfillcolor(mc, DBlack);
172 9c611279 2012-10-21 rsc
173 48da9bd7 2018-10-05 0intro fc->x = x;
174 48da9bd7 2018-10-05 0intro fc->top = 0;
175 48da9bd7 2018-10-05 0intro fc->bottom = Dy(m->r);
176 48da9bd7 2018-10-05 0intro e = 1;
177 48da9bd7 2018-10-05 0intro k = FT_Get_Char_Index(face, i);
178 48da9bd7 2018-10-05 0intro if(k != 0) {
179 cc48e73a 2020-01-13 rsc e = FT_Load_Glyph(face, k, FT_LOAD_RENDER|FT_LOAD_NO_AUTOHINT|(antialias ? 0:FT_LOAD_TARGET_MONO));
180 48da9bd7 2018-10-05 0intro }
181 48da9bd7 2018-10-05 0intro if(e || face->glyph->advance.x <= 0) {
182 48da9bd7 2018-10-05 0intro fc->width = 0;
183 48da9bd7 2018-10-05 0intro fc->left = 0;
184 48da9bd7 2018-10-05 0intro if(i == 0) {
185 48da9bd7 2018-10-05 0intro drawpjw(m, fc, x, w, y, y - y0);
186 48da9bd7 2018-10-05 0intro x += fc->width;
187 48da9bd7 2018-10-05 0intro }
188 48da9bd7 2018-10-05 0intro continue;
189 48da9bd7 2018-10-05 0intro }
190 9c611279 2012-10-21 rsc
191 48da9bd7 2018-10-05 0intro FT_Bitmap *bitmap = &face->glyph->bitmap;
192 48da9bd7 2018-10-05 0intro uchar *base = byteaddr(mc, mc->r.min);
193 48da9bd7 2018-10-05 0intro advance = (face->glyph->advance.x+32) >> 6;
194 9c611279 2012-10-21 rsc
195 48da9bd7 2018-10-05 0intro for(r=0; r < bitmap->rows; r++)
196 48da9bd7 2018-10-05 0intro memmove(base + r*mc->width*sizeof(u32int), bitmap->buffer + r*bitmap->pitch, bitmap->pitch);
197 9c611279 2012-10-21 rsc
198 48da9bd7 2018-10-05 0intro memimagedraw(m, Rect(x, 0, x + advance, y), mc,
199 48da9bd7 2018-10-05 0intro Pt(-face->glyph->bitmap_left, -(y - y0 - face->glyph->bitmap_top)),
200 48da9bd7 2018-10-05 0intro memopaque, ZP, S);
201 9c611279 2012-10-21 rsc
202 9c611279 2012-10-21 rsc fc->width = advance;
203 48da9bd7 2018-10-05 0intro fc->left = 0;
204 9c611279 2012-10-21 rsc x += advance;
205 9c611279 2012-10-21 rsc
206 9c611279 2012-10-21 rsc #ifdef DEBUG_FT_BITMAP
207 9c611279 2012-10-21 rsc for(r=0; r < bitmap->rows; r++) {
208 9c611279 2012-10-21 rsc int c;
209 9c611279 2012-10-21 rsc uchar *span = bitmap->buffer+(r*bitmap->pitch);
210 9c611279 2012-10-21 rsc for(c = 0; c < bitmap->width; c++) {
211 9c611279 2012-10-21 rsc fprint(1, "%02x", span[c]);
212 9c611279 2012-10-21 rsc }
213 9c611279 2012-10-21 rsc fprint(1,"\n");
214 9c611279 2012-10-21 rsc }
215 9c611279 2012-10-21 rsc #endif
216 9c611279 2012-10-21 rsc
217 9c611279 2012-10-21 rsc #ifdef DEBUG_9_BITMAP
218 9c611279 2012-10-21 rsc for(r=0; r < mc->r.max.y; r++) {
219 9c611279 2012-10-21 rsc int c;
220 9c611279 2012-10-21 rsc uchar *span = base+(r*mc->width*sizeof(u32int));
221 9c611279 2012-10-21 rsc for(c = 0; c < Dx(mc->r); c++) {
222 9c611279 2012-10-21 rsc fprint(1, "%02x", span[c]);
223 9c611279 2012-10-21 rsc }
224 9c611279 2012-10-21 rsc fprint(1,"\n");
225 9c611279 2012-10-21 rsc }
226 9c611279 2012-10-21 rsc #endif
227 9c611279 2012-10-21 rsc }
228 9c611279 2012-10-21 rsc fc->x = x;
229 9c611279 2012-10-21 rsc
230 9c611279 2012-10-21 rsc // round up to 32-bit boundary
231 9c611279 2012-10-21 rsc // so that in-memory data is same
232 9c611279 2012-10-21 rsc // layout as in-file data.
233 48da9bd7 2018-10-05 0intro if(x == 0)
234 48da9bd7 2018-10-05 0intro x = 1;
235 48da9bd7 2018-10-05 0intro if(y == 0)
236 48da9bd7 2018-10-05 0intro y = 1;
237 9c611279 2012-10-21 rsc if(antialias)
238 9c611279 2012-10-21 rsc x += -x & 3;
239 9c611279 2012-10-21 rsc else
240 9c611279 2012-10-21 rsc x += -x & 31;
241 9c611279 2012-10-21 rsc m1 = allocmemimage(Rect(0, 0, x, y), antialias ? GREY8 : GREY1);
242 9c611279 2012-10-21 rsc memimagedraw(m1, m1->r, m, m->r.min, memopaque, ZP, S);
243 9c611279 2012-10-21 rsc freememimage(m);
244 a3ec102d 2018-03-27 0intro freememimage(mc);
245 9c611279 2012-10-21 rsc
246 9c611279 2012-10-21 rsc sf->name = nil;
247 9c611279 2012-10-21 rsc sf->n = hi+1 - lo;
248 9c611279 2012-10-21 rsc sf->height = Dy(m1->r);
249 9c611279 2012-10-21 rsc sf->ascent = Dy(m1->r) - y0;
250 9c611279 2012-10-21 rsc sf->info = fc0;
251 9c611279 2012-10-21 rsc sf->bits = m1;
252 9c611279 2012-10-21 rsc
253 9c611279 2012-10-21 rsc FT_Done_Face(face);
254 9c611279 2012-10-21 rsc return sf;
255 9c611279 2012-10-21 rsc }