1 // Copyright 2003 Adam Megacz, see the COPYING file for licensing [GPL]
4 #include <freetype/freetype.h>
8 /* NOTE: _user_info is defined in crt0.c. It points to a 4096 byte
9 block of memory that contains 1024 32-bit values that can be set
10 with the setUserInfo() method of MIPSEmu.
12 The VM will pause after initialization. When unpaused, it expects
15 user_info[0] = ptr to font byte stream in memory
16 user_info[1] = length of font stream
17 user_info[2] = unicode index of first glyph to render
18 user_info[3] = unicode index of last glyph to render
19 user_info[4] = point size to render in
21 The VM will then iterate over the requested glyphs, performing the
22 following actions for each glyph:
25 - store the address of the glyph bitmap in user_info[5]
26 - store the width of the glyph bitmap in user_info[6]
27 - store the height of the glyph bitmap in user_info[7]
28 - store the font's ascender into user_info[8]
29 - store the font's height into user_info[9]
30 - store the glyph's ascender into user_info[10]
31 - store the glyph's advance into user_info[11]
33 The VM will then pause after each glyph. The VM should not be
34 unpaused after the last glyph until the next glyph set has been
35 configured in user_info (ie it does not pause twice).
39 #define FT_Check(expr) do { \
41 errprint(#expr " failed\n"); \
46 #define max(a, b) ((a) > (b) ? (a) : (b))
47 #define min(a, b) ((a) < (b) ? (a) : (b))
49 static int errprint(const char *s) {
53 n = write(STDERR_FILENO,s,l);
67 FT_Library library; /* handle to library */
68 FT_Face face; /* handle to face object */
70 FT_Check(FT_Init_FreeType(&library));
71 FT_Check(FT_New_Memory_Face(library, user_info[0], (int)user_info[1], 0, &face));
76 FT_Check(FT_Set_Char_Size(face, 0, ((int)user_info[4]) * 64, 72, 72));
77 for(charcode = (int)user_info[2]; charcode <= (int)user_info[3]; charcode++) {
79 glyph_index = FT_Get_Char_Index(face, charcode);
80 FT_Check(FT_Load_Glyph(face, glyph_index, FT_LOAD_DEFAULT | FT_LOAD_FORCE_AUTOHINT));
81 FT_Check(FT_Render_Glyph(face->glyph, FT_RENDER_MODE_NORMAL));
83 user_info[5] = (char*)face->glyph->bitmap.buffer;
84 user_info[6] = (char*)face->glyph->bitmap.width;
85 user_info[7] = (char*)face->glyph->bitmap.rows;
86 user_info[8] = (char*)(face->size->metrics.ascender >> 6);
87 user_info[9] = (char*)((-1 * face->size->metrics.descender) >> 6);
88 user_info[10] = (char*)(face->glyph->metrics.horiBearingY >> 6);
89 user_info[11] = (char*)(face->glyph->advance.x >> 6);
96 // Kerning code; add back in later
98 if (old_glyph_index != -1) {
99 if (FT_HAS_KERNING(face)) {
100 FT_Check(FT_Get_Kerning(face, old_glyph_index, glyph_index, 0, &kerning));
103 x += face->glyph->advance.x >> 6;
106 old_glyph_index = glyph_index;
110 extern int mspack_main();
111 int main(int argc, char **argv) {
112 if(argc < 1) return 1;
113 if(strcmp(argv[0],"mspack")==0) return mspack_main();
114 if(strcmp(argv[0],"freetype")==0) return freetype_main();