forked from enlightenment/efl
606 lines
16 KiB
C
606 lines
16 KiB
C
#include "evas_common.h"
|
|
#include "evas_intl_utils.h" /*defines INTERNATIONAL_SUPPORT if possible */
|
|
#include "evas_font_private.h" /* for Frame-Queuing support */
|
|
|
|
EAPI int
|
|
evas_common_font_query_kerning(RGBA_Font_Int* fi,
|
|
FT_UInt prev, FT_UInt index,
|
|
int* kerning)
|
|
{
|
|
int *result;
|
|
FT_Vector delta;
|
|
int key[2];
|
|
int error = 1;
|
|
|
|
// return 0;
|
|
key[0] = prev;
|
|
key[1] = index;
|
|
|
|
result = eina_hash_find(fi->kerning, key);
|
|
if (result)
|
|
{
|
|
*kerning = result[2];
|
|
goto on_correct;
|
|
}
|
|
|
|
/* NOTE: ft2 seems to have a bug. and sometimes returns bizarre
|
|
* values to kern by - given same font, same size and same
|
|
* prev_index and index. auto/bytecode or none hinting doesnt
|
|
* matter */
|
|
FTLOCK();
|
|
if (FT_Get_Kerning(fi->src->ft.face,
|
|
key[0], key[1],
|
|
ft_kerning_default, &delta) == 0)
|
|
{
|
|
int *push;
|
|
|
|
FTUNLOCK();
|
|
*kerning = delta.x >> 6;
|
|
|
|
push = malloc(sizeof (int) * 3);
|
|
if (!push) return 1;
|
|
|
|
push[0] = key[0];
|
|
push[1] = key[1];
|
|
push[2] = *kerning;
|
|
|
|
eina_hash_direct_add(fi->kerning, push, push);
|
|
|
|
goto on_correct;
|
|
}
|
|
|
|
FTUNLOCK();
|
|
error = 0;
|
|
|
|
on_correct:
|
|
return error;
|
|
}
|
|
|
|
/* string extents */
|
|
EAPI void
|
|
evas_common_font_query_size(RGBA_Font *fn, const char *text, int *w, int *h)
|
|
{
|
|
int use_kerning;
|
|
int pen_x, pen_y;
|
|
int start_x, end_x;
|
|
int chr;
|
|
FT_UInt prev_index;
|
|
RGBA_Font_Int *fi;
|
|
FT_Face pface = NULL;
|
|
|
|
fi = fn->fonts->data;
|
|
|
|
start_x = 0;
|
|
end_x = 0;
|
|
|
|
pen_x = 0;
|
|
pen_y = 0;
|
|
// evas_common_font_size_use(fn);
|
|
use_kerning = FT_HAS_KERNING(fi->src->ft.face);
|
|
prev_index = 0;
|
|
for (chr = 0; text[chr];)
|
|
{
|
|
FT_UInt index;
|
|
RGBA_Font_Glyph *fg;
|
|
int chr_x, chr_y, chr_w;
|
|
int gl, kern;
|
|
|
|
gl = evas_common_font_utf8_get_next((unsigned char *)text, &chr);
|
|
if (gl == 0) break;
|
|
index = evas_common_font_glyph_search(fn, &fi, gl);
|
|
LKL(fi->ft_mutex);
|
|
if (fi->src->current_size != fi->size)
|
|
{
|
|
FT_Activate_Size(fi->ft.size);
|
|
fi->src->current_size = fi->size;
|
|
}
|
|
/* hmmm kerning means i can't sanely do my own cached metric tables! */
|
|
/* grrr - this means font face sharing is kinda... not an option if */
|
|
/* you want performance */
|
|
kern = 0;
|
|
if ((use_kerning) && (prev_index) && (index) &&
|
|
(pface == fi->src->ft.face))
|
|
if (evas_common_font_query_kerning(fi, prev_index, index, &kern))
|
|
pen_x += kern;
|
|
|
|
pface = fi->src->ft.face;
|
|
fg = evas_common_font_int_cache_glyph_get(fi, index);
|
|
LKU(fi->ft_mutex);
|
|
if (!fg) continue;
|
|
|
|
if (kern < 0) kern = 0;
|
|
chr_x = ((pen_x - kern) + (fg->glyph_out->left));
|
|
chr_y = (pen_y + (fg->glyph_out->top));
|
|
// chr_w = fg->glyph_out->bitmap.width;
|
|
chr_w = fg->glyph_out->bitmap.width + kern;
|
|
{
|
|
int advw;
|
|
|
|
advw = ((fg->glyph->advance.x + (kern << 16)) >> 16);
|
|
if (chr_w < advw) chr_w = advw;
|
|
}
|
|
|
|
if ((!prev_index) && (chr_x < 0))
|
|
start_x = chr_x;
|
|
if ((chr_x + chr_w) > end_x)
|
|
end_x = chr_x + chr_w;
|
|
|
|
pen_x += fg->glyph->advance.x >> 16;
|
|
prev_index = index;
|
|
}
|
|
if (w) *w = end_x - start_x;
|
|
if (h) *h = evas_common_font_max_ascent_get(fn) + evas_common_font_max_descent_get(fn);
|
|
}
|
|
|
|
/* text x inset */
|
|
EAPI int
|
|
evas_common_font_query_inset(RGBA_Font *fn, const char *text)
|
|
{
|
|
FT_UInt index;
|
|
RGBA_Font_Glyph *fg;
|
|
int chr;
|
|
int gl;
|
|
RGBA_Font_Int *fi;
|
|
|
|
fi = fn->fonts->data;
|
|
|
|
chr = 0;
|
|
if (!text[0]) return 0;
|
|
gl = evas_common_font_utf8_get_next((unsigned char *)text, &chr);
|
|
if (gl == 0) return 0;
|
|
// evas_common_font_size_use(fn);
|
|
index = evas_common_font_glyph_search(fn, &fi, gl);
|
|
if (fi->src->current_size != fi->size)
|
|
{
|
|
FT_Activate_Size(fi->ft.size);
|
|
fi->src->current_size = fi->size;
|
|
}
|
|
fg = evas_common_font_int_cache_glyph_get(fi, index);
|
|
if (!fg) return 0;
|
|
/*
|
|
INF("fg->glyph_out->left = %i\n"
|
|
"fi->src->ft.face->glyph->bitmap_left = %i\n"
|
|
"fi->src->ft.face->glyph->metrics.horiBearingX = %i\n"
|
|
"fi->src->ft.face->glyph->metrics.horiBearingY = %i\n"
|
|
"fi->src->ft.face->glyph->metrics.horiAdvance = %i"
|
|
,
|
|
(int)fg->glyph_out->left,
|
|
(int)fi->src->ft.face->glyph->bitmap_left,
|
|
(int)fi->src->ft.face->glyph->metrics.horiBearingX >> 6,
|
|
(int)fi->src->ft.face->glyph->metrics.horiBearingY >> 6,
|
|
(int)fi->src->ft.face->glyph->metrics.horiAdvance >> 6
|
|
);
|
|
*/
|
|
return fg->glyph_out->left;
|
|
}
|
|
|
|
/* h & v advance */
|
|
EAPI void
|
|
evas_common_font_query_advance(RGBA_Font *fn, const char *text, int *h_adv, int *v_adv)
|
|
{
|
|
int use_kerning;
|
|
int pen_x, pen_y;
|
|
int start_x;
|
|
int chr;
|
|
FT_UInt prev_index;
|
|
RGBA_Font_Int *fi;
|
|
FT_Face pface = NULL;
|
|
|
|
fi = fn->fonts->data;
|
|
|
|
start_x = 0;
|
|
pen_x = 0;
|
|
pen_y = 0;
|
|
// evas_common_font_size_use(fn);
|
|
FTLOCK();
|
|
use_kerning = FT_HAS_KERNING(fi->src->ft.face);
|
|
FTUNLOCK();
|
|
prev_index = 0;
|
|
for (chr = 0; text[chr];)
|
|
{
|
|
FT_UInt index;
|
|
RGBA_Font_Glyph *fg;
|
|
int chr_x, chr_y, chr_w;
|
|
int gl, kern;
|
|
|
|
gl = evas_common_font_utf8_get_next((unsigned char *)text, &chr);
|
|
if (gl == 0) break;
|
|
index = evas_common_font_glyph_search(fn, &fi, gl);
|
|
LKL(fi->ft_mutex);
|
|
if (fi->src->current_size != fi->size)
|
|
{
|
|
FT_Activate_Size(fi->ft.size);
|
|
fi->src->current_size = fi->size;
|
|
}
|
|
/* hmmm kerning means i can't sanely do my own cached metric tables! */
|
|
/* grrr - this means font face sharing is kinda... not an option if */
|
|
/* you want performance */
|
|
if ((use_kerning) && (prev_index) && (index) &&
|
|
(pface == fi->src->ft.face))
|
|
if (evas_common_font_query_kerning(fi, prev_index, index, &kern))
|
|
pen_x += kern;
|
|
|
|
pface = fi->src->ft.face;
|
|
fg = evas_common_font_int_cache_glyph_get(fi, index);
|
|
LKU(fi->ft_mutex);
|
|
if (!fg) continue;
|
|
|
|
chr_x = (pen_x + (fg->glyph_out->left));
|
|
chr_y = (pen_y + (fg->glyph_out->top));
|
|
chr_w = fg->glyph_out->bitmap.width;
|
|
|
|
pen_x += fg->glyph->advance.x >> 16;
|
|
prev_index = index;
|
|
}
|
|
if (v_adv) *v_adv = evas_common_font_get_line_advance(fn);
|
|
if (h_adv) *h_adv = pen_x - start_x;
|
|
}
|
|
|
|
/* x y w h for char at char pos */
|
|
EAPI int
|
|
evas_common_font_query_char_coords(RGBA_Font *fn, const char *in_text, int pos, int *cx, int *cy, int *cw, int *ch)
|
|
{
|
|
int use_kerning;
|
|
int pen_x, pen_y;
|
|
int prev_chr_end;
|
|
int chr;
|
|
int asc, desc;
|
|
int char_index = 0; /* the index of the current char */
|
|
int position;
|
|
const char *text = in_text;
|
|
int ret_val = 0;
|
|
FT_UInt prev_index;
|
|
RGBA_Font_Int *fi;
|
|
FT_Face pface = NULL;
|
|
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
int len = 0;
|
|
EvasIntlParType direction = FRIBIDI_TYPE_ON;
|
|
EvasIntlLevel *level_list = NULL;
|
|
EvasIntlStrIndex *visual_to_logical = NULL;
|
|
char *visual_text = evas_intl_utf8_to_visual(in_text, &len, &direction, &visual_to_logical, NULL, &level_list);
|
|
text = (visual_text) ? visual_text : in_text;
|
|
#endif
|
|
|
|
fi = fn->fonts->data;
|
|
|
|
pen_x = 0;
|
|
pen_y = 0;
|
|
// evas_common_font_size_use(fn);
|
|
if (fi->src->current_size != fi->size)
|
|
{
|
|
FT_Activate_Size(fi->ft.size);
|
|
fi->src->current_size = fi->size;
|
|
}
|
|
use_kerning = FT_HAS_KERNING(fi->src->ft.face);
|
|
prev_index = 0;
|
|
prev_chr_end = 0;
|
|
asc = evas_common_font_max_ascent_get(fn);
|
|
desc = evas_common_font_max_descent_get(fn);
|
|
|
|
/* find the actual index, not the byte position */
|
|
for (position = 0 , chr = 0 ; in_text[chr] && chr < pos ; position++) {
|
|
evas_common_font_utf8_get_next((unsigned char *)in_text, &chr);
|
|
}
|
|
/* if we couldn't reach the correct position for some reason,
|
|
* return with an error */
|
|
if (chr != pos) {
|
|
ret_val = 0;
|
|
goto end;
|
|
}
|
|
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
/* if it's an in string position (not end), get logical position */
|
|
if (position < len)
|
|
position = evas_intl_position_visual_to_logical(visual_to_logical, position);
|
|
#endif
|
|
|
|
|
|
for (char_index = 0, chr = 0; text[chr]; char_index++)
|
|
{
|
|
int pchr;
|
|
FT_UInt index;
|
|
RGBA_Font_Glyph *fg;
|
|
int chr_x, chr_y, chr_w;
|
|
int gl, kern;
|
|
|
|
pchr = chr;
|
|
gl = evas_common_font_utf8_get_next((unsigned char *)text, &chr);
|
|
if (gl == 0) break;
|
|
index = evas_common_font_glyph_search(fn, &fi, gl);
|
|
LKL(fi->ft_mutex);
|
|
// FIXME: Why no FT_Activate_Size here ?
|
|
kern = 0;
|
|
/* hmmm kerning means i can't sanely do my own cached metric tables! */
|
|
/* grrr - this means font face sharing is kinda... not an option if */
|
|
/* you want performance */
|
|
if ((use_kerning) && (prev_index) && (index) &&
|
|
(pface == fi->src->ft.face))
|
|
{
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
/* if it's rtl, the kerning matching should be reversed, i.e prev
|
|
* index is now the index and the other way around. */
|
|
if (evas_intl_is_rtl_char(level_list, char_index))
|
|
{
|
|
if (evas_common_font_query_kerning(fi, index, prev_index, &kern))
|
|
pen_x += kern;
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
|
|
if (evas_common_font_query_kerning(fi, prev_index, index, &kern))
|
|
pen_x += kern;
|
|
}
|
|
}
|
|
|
|
pface = fi->src->ft.face;
|
|
fg = evas_common_font_int_cache_glyph_get(fi, index);
|
|
LKU(fi->ft_mutex);
|
|
if (!fg) continue;
|
|
|
|
if (kern < 0) kern = 0;
|
|
chr_x = ((pen_x - kern) + (fg->glyph_out->left));
|
|
chr_y = (pen_y + (fg->glyph_out->top));
|
|
chr_w = fg->glyph_out->bitmap.width + (kern);
|
|
/* if (text[chr]) */
|
|
{
|
|
int advw;
|
|
|
|
advw = ((fg->glyph->advance.x + (kern << 16)) >> 16);
|
|
if (chr_w < advw) chr_w = advw;
|
|
}
|
|
if (chr_x > prev_chr_end)
|
|
{
|
|
chr_w += (chr_x - prev_chr_end);
|
|
chr_x = prev_chr_end;
|
|
}
|
|
/* we need to see if the char at the visual position is the char wanted */
|
|
if (char_index == position)
|
|
{
|
|
if (cx) *cx = chr_x;
|
|
if (cy) *cy = -asc;
|
|
if (cw) *cw = chr_w;
|
|
if (ch) *ch = asc + desc;
|
|
ret_val = 1;
|
|
goto end;
|
|
}
|
|
prev_chr_end = chr_x + chr_w;
|
|
pen_x += fg->glyph->advance.x >> 16;
|
|
prev_index = index;
|
|
}
|
|
end:
|
|
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
if (level_list) free(level_list);
|
|
if (visual_to_logical) free(visual_to_logical);
|
|
if (visual_text) free(visual_text);
|
|
#endif
|
|
|
|
return ret_val;
|
|
}
|
|
|
|
/* char pos of text at xy pos */
|
|
EAPI int
|
|
evas_common_font_query_text_at_pos(RGBA_Font *fn, const char *in_text, int x, int y, int *cx, int *cy, int *cw, int *ch)
|
|
{
|
|
int use_kerning;
|
|
int pen_x, pen_y;
|
|
int prev_chr_end;
|
|
int chr;
|
|
int asc, desc;
|
|
int char_index = 0; /* the index of the current char */
|
|
const char *text = in_text;
|
|
int ret_val = -1;
|
|
FT_UInt prev_index;
|
|
RGBA_Font_Int *fi;
|
|
FT_Face pface = NULL;
|
|
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
int len = 0;
|
|
EvasIntlParType direction = FRIBIDI_TYPE_ON;
|
|
EvasIntlLevel *level_list = NULL;
|
|
EvasIntlStrIndex *visual_to_logical = NULL;
|
|
char *visual_text = evas_intl_utf8_to_visual(in_text, &len, &direction, NULL, &visual_to_logical, &level_list);
|
|
text = (visual_text) ? visual_text : in_text;
|
|
#endif
|
|
|
|
fi = fn->fonts->data;
|
|
|
|
pen_x = 0;
|
|
pen_y = 0;
|
|
// evas_common_font_size_use(fn);
|
|
if (fi->src->current_size != fi->size)
|
|
{
|
|
FT_Activate_Size(fi->ft.size);
|
|
fi->src->current_size = fi->size;
|
|
}
|
|
use_kerning = FT_HAS_KERNING(fi->src->ft.face);
|
|
prev_index = 0;
|
|
prev_chr_end = 0;
|
|
asc = evas_common_font_max_ascent_get(fn);
|
|
desc = evas_common_font_max_descent_get(fn);
|
|
|
|
for (char_index = 0, chr = 0; text[chr]; char_index++)
|
|
{
|
|
int pchr;
|
|
FT_UInt index;
|
|
RGBA_Font_Glyph *fg;
|
|
int chr_x, chr_y, chr_w;
|
|
int gl, kern;
|
|
|
|
pchr = chr;
|
|
gl = evas_common_font_utf8_get_next((unsigned char *)text, &chr);
|
|
if (gl == 0) break;
|
|
index = evas_common_font_glyph_search(fn, &fi, gl);
|
|
LKL(fi->ft_mutex);
|
|
// FIXME: Why not FT_Activate_Size here ?
|
|
kern = 0;
|
|
/* hmmm kerning means i can't sanely do my own cached metric tables! */
|
|
/* grrr - this means font face sharing is kinda... not an option if */
|
|
/* you want performance */
|
|
if ((use_kerning) && (prev_index) && (index) &&
|
|
(pface == fi->src->ft.face))
|
|
{
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
/* if it's rtl, the kerning matching should be reversed, i.e prev
|
|
* index is now the index and the other way around. */
|
|
if (evas_intl_is_rtl_char(level_list, char_index))
|
|
{
|
|
if (evas_common_font_query_kerning(fi, index, prev_index, &kern))
|
|
pen_x += kern;
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
|
|
if (evas_common_font_query_kerning(fi, prev_index, index, &kern))
|
|
pen_x += kern;
|
|
}
|
|
}
|
|
|
|
pface = fi->src->ft.face;
|
|
fg = evas_common_font_int_cache_glyph_get(fi, index);
|
|
LKU(fi->ft_mutex);
|
|
if (!fg) continue;
|
|
|
|
if (kern < 0) kern = 0;
|
|
chr_x = ((pen_x - kern) + (fg->glyph_out->left));
|
|
chr_y = (pen_y + (fg->glyph_out->top));
|
|
chr_w = fg->glyph_out->bitmap.width + kern;
|
|
/* if (text[chr]) */
|
|
{
|
|
int advw;
|
|
|
|
advw = ((fg->glyph->advance.x + (kern << 16)) >> 16);
|
|
if (chr_w < advw) chr_w = advw;
|
|
}
|
|
if (chr_x > prev_chr_end)
|
|
{
|
|
chr_w += (chr_x - prev_chr_end);
|
|
chr_x = prev_chr_end;
|
|
}
|
|
if ((x >= chr_x) && (x <= (chr_x + chr_w)) &&
|
|
(y >= -asc) && (y <= desc))
|
|
{
|
|
if (cx) *cx = chr_x;
|
|
if (cy) *cy = -asc;
|
|
if (cw) *cw = chr_w;
|
|
if (ch) *ch = asc + desc;
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
{
|
|
/* we found the char position of the wanted char in the
|
|
* visual string, we now need to translate it to the
|
|
* position in the logical string */
|
|
int i;
|
|
int position = evas_intl_position_visual_to_logical(visual_to_logical, char_index);
|
|
|
|
/* ensure even if the list won't run */
|
|
for (pchr = 0, i = 0; i < position; i++)
|
|
evas_common_font_utf8_get_next((unsigned char *)in_text, &pchr);
|
|
}
|
|
#endif
|
|
ret_val = pchr;
|
|
goto end;
|
|
}
|
|
prev_chr_end = chr_x + chr_w;
|
|
pen_x += fg->glyph->advance.x >> 16;
|
|
prev_index = index;
|
|
}
|
|
|
|
end:
|
|
|
|
#ifdef INTERNATIONAL_SUPPORT
|
|
if (level_list) free(level_list);
|
|
if (visual_to_logical) free(visual_to_logical);
|
|
if (visual_text) free(visual_text);
|
|
#endif
|
|
|
|
return ret_val;
|
|
}
|
|
|
|
/* last char pos of text at xy pos
|
|
* Note: no need for special rtl handling
|
|
* because the string is in logical order, which is correct */
|
|
EAPI int
|
|
evas_common_font_query_last_up_to_pos(RGBA_Font *fn, const char *text, int x, int y)
|
|
{
|
|
int use_kerning;
|
|
int pen_x, pen_y;
|
|
int prev_chr_end;
|
|
int chr;
|
|
int asc, desc;
|
|
FT_UInt prev_index;
|
|
RGBA_Font_Int *fi;
|
|
FT_Face pface = NULL;
|
|
|
|
fi = fn->fonts->data;
|
|
|
|
pen_x = 0;
|
|
pen_y = 0;
|
|
// evas_common_font_size_use(fn);
|
|
use_kerning = FT_HAS_KERNING(fi->src->ft.face);
|
|
prev_index = 0;
|
|
prev_chr_end = 0;
|
|
asc = evas_common_font_max_ascent_get(fn);
|
|
desc = evas_common_font_max_descent_get(fn);
|
|
for (chr = 0; text[chr];)
|
|
{
|
|
int pchr;
|
|
FT_UInt index;
|
|
RGBA_Font_Glyph *fg;
|
|
int chr_x, chr_y, chr_w;
|
|
int gl, kern;
|
|
|
|
pchr = chr;
|
|
gl = evas_common_font_utf8_get_next((unsigned char *)text, &chr);
|
|
if (gl == 0) break;
|
|
index = evas_common_font_glyph_search(fn, &fi, gl);
|
|
LKL(fi->ft_mutex);
|
|
if (fi->src->current_size != fi->size)
|
|
{
|
|
FT_Activate_Size(fi->ft.size);
|
|
fi->src->current_size = fi->size;
|
|
}
|
|
kern = 0;
|
|
/* hmmm kerning means i can't sanely do my own cached metric tables! */
|
|
/* grrr - this means font face sharing is kinda... not an option if */
|
|
/* you want performance */
|
|
if ((use_kerning) && (prev_index) && (index) &&
|
|
(pface == fi->src->ft.face))
|
|
if (evas_common_font_query_kerning(fi, prev_index, index, &kern))
|
|
pen_x += kern;
|
|
|
|
pface = fi->src->ft.face;
|
|
fg = evas_common_font_int_cache_glyph_get(fi, index);
|
|
LKU(fi->ft_mutex);
|
|
if (!fg) continue;
|
|
|
|
if (kern < 0) kern = 0;
|
|
chr_x = ((pen_x - kern) + (fg->glyph_out->left));
|
|
chr_y = (pen_y + (fg->glyph_out->top));
|
|
chr_w = fg->glyph_out->bitmap.width + kern;
|
|
/* if (text[chr]) */
|
|
{
|
|
int advw;
|
|
|
|
advw = ((fg->glyph->advance.x + (kern << 16)) >> 16);
|
|
if (chr_w < advw) chr_w = advw;
|
|
}
|
|
if (chr_x > prev_chr_end)
|
|
{
|
|
chr_w += (chr_x - prev_chr_end);
|
|
chr_x = prev_chr_end;
|
|
}
|
|
if ((x >= chr_x) && (x <= (chr_x + chr_w)) &&
|
|
(y >= -asc) && (y <= desc))
|
|
{
|
|
return pchr;
|
|
}
|
|
prev_chr_end = chr_x + chr_w;
|
|
pen_x += fg->glyph->advance.x >> 16;
|
|
prev_index = index;
|
|
}
|
|
return -1;
|
|
}
|