diff options
Diffstat (limited to 'c_src')
-rw-r--r-- | c_src/esdl2.h | 3 | ||||
-rw-r--r-- | c_src/sdl_ttf.c | 87 |
2 files changed, 90 insertions, 0 deletions
diff --git a/c_src/esdl2.h b/c_src/esdl2.h index e82278a..60835a7 100644 --- a/c_src/esdl2.h +++ b/c_src/esdl2.h @@ -440,8 +440,11 @@ F(ttf_font_line_skip, 1) \ F(ttf_get_font_hinting, 1) \ F(ttf_get_font_kerning, 1) \ + F(ttf_get_font_kerning_size_glyphs, 3) \ F(ttf_get_font_outline, 1) \ F(ttf_get_font_style, 1) \ + F(ttf_glyph_is_provided, 2) \ + F(ttf_glyph_metrics, 2) \ F(ttf_init, 0) \ F(ttf_open_font, 2) \ F(ttf_open_font_index, 3) \ diff --git a/c_src/sdl_ttf.c b/c_src/sdl_ttf.c index 917c9d9..ccde11c 100644 --- a/c_src/sdl_ttf.c +++ b/c_src/sdl_ttf.c @@ -239,6 +239,36 @@ NIF_FUNCTION(ttf_get_font_kerning) NIF_RES_GET(Font, font_res)); } +// ttf_get_font_kerning_size_glyphs + +NIF_CALL_HANDLER(thread_ttf_get_font_kerning_size_glyphs) +{ + int size; + + size = TTF_GetFontKerningSizeGlyphs(args[0], (long)args[1], (long)args[2]); + + if (size < 0) + return sdl_error_tuple(env); + + return enif_make_tuple2(env, + atom_ok, + enif_make_int(env, size) + ); +} + +NIF_FUNCTION(ttf_get_font_kerning_size_glyphs) +{ + void* font_res; + unsigned int previous_ch, ch; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Font, &font_res)); + BADARG_IF(!enif_get_uint(env, argv[1], &previous_ch)); + BADARG_IF(!enif_get_uint(env, argv[2], &ch)); + + return nif_thread_call(env, thread_ttf_get_font_kerning_size_glyphs, 3, + NIF_RES_GET(Font, font_res), previous_ch, ch); +} + // ttf_get_font_outline NIF_CALL_HANDLER(thread_ttf_get_font_outline) @@ -273,6 +303,63 @@ NIF_FUNCTION(ttf_get_font_style) NIF_RES_GET(Font, font_res)); } +// ttf_glyph_is_provided + +NIF_CALL_HANDLER(thread_ttf_glyph_is_provided) +{ + if (TTF_GlyphIsProvided(args[0], (long)args[1])) + return atom_true; + + return atom_false; +} + +NIF_FUNCTION(ttf_glyph_is_provided) +{ + void* font_res; + unsigned int ch; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Font, &font_res)); + BADARG_IF(!enif_get_uint(env, argv[1], &ch)); + + return nif_thread_call(env, thread_ttf_glyph_is_provided, 2, + NIF_RES_GET(Font, font_res), ch); +} + +// ttf_glyph_metrics + +NIF_CALL_HANDLER(thread_ttf_glyph_metrics) +{ + int minx, maxx, miny, maxy, advance; + + if (TTF_GlyphMetrics(args[0], (long)args[1], + &minx, &maxx, &miny, &maxy, &advance)) { + return sdl_error_tuple(env); + } + + return enif_make_tuple2(env, + atom_ok, + enif_make_tuple5(env, + enif_make_int(env, minx), + enif_make_int(env, maxx), + enif_make_int(env, miny), + enif_make_int(env, maxy), + enif_make_int(env, advance) + ) + ); +} + +NIF_FUNCTION(ttf_glyph_metrics) +{ + void* font_res; + unsigned int ch; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Font, &font_res)); + BADARG_IF(!enif_get_uint(env, argv[1], &ch)); + + return nif_thread_call(env, thread_ttf_glyph_metrics, 2, + NIF_RES_GET(Font, font_res), ch); +} + // ttf_init NIF_CALL_HANDLER(thread_ttf_init) |