diff options
| author | Loïc Hoguin <[email protected]> | 2014-04-03 12:50:30 +0200 |
|---|---|---|
| committer | Loïc Hoguin <[email protected]> | 2014-04-03 12:50:30 +0200 |
| commit | b5028ef614b37255bad1997fa940bf9e0cb5d4da (patch) | |
| tree | 5ed25d8bb0f079b602d347efb686a32a3004dacd | |
| parent | 3c6246509591b086e82ba463f22db24796acbc31 (diff) | |
| download | esdl2-b5028ef614b37255bad1997fa940bf9e0cb5d4da.tar.gz esdl2-b5028ef614b37255bad1997fa940bf9e0cb5d4da.tar.bz2 esdl2-b5028ef614b37255bad1997fa940bf9e0cb5d4da.zip | |
Add sdl_window:is_input_grabbed/1
| -rw-r--r-- | c_src/esdl2.h | 1 | ||||
| -rw-r--r-- | c_src/sdl_window.c | 20 | ||||
| -rw-r--r-- | src/esdl2.erl | 4 | ||||
| -rw-r--r-- | src/sdl_window.erl | 5 |
4 files changed, 30 insertions, 0 deletions
diff --git a/c_src/esdl2.h b/c_src/esdl2.h index 17c3565..1798815 100644 --- a/c_src/esdl2.h +++ b/c_src/esdl2.h @@ -164,6 +164,7 @@ F(get_window_brightness, 1) \ F(get_window_display_index, 1) \ F(get_window_flags, 1) \ + F(get_window_grab, 1) \ // Generated declarations for the NIF. diff --git a/c_src/sdl_window.c b/c_src/sdl_window.c index a899656..818fa2f 100644 --- a/c_src/sdl_window.c +++ b/c_src/sdl_window.c @@ -169,3 +169,23 @@ NIF_FUNCTION(get_window_flags) return nif_thread_call(env, thread_get_window_flags, 1, NIF_RES_GET(Window, window_res)); } + +// get_window_grab + +NIF_CALL_HANDLER(thread_get_window_grab) +{ + if (SDL_GetWindowGrab(args[0])) + return atom_true; + + return atom_false; +} + +NIF_FUNCTION(get_window_grab) +{ + void* window_res; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Window, &window_res)); + + return nif_thread_call(env, thread_get_window_grab, 1, + NIF_RES_GET(Window, window_res)); +} diff --git a/src/esdl2.erl b/src/esdl2.erl index bec4d72..3c996fb 100644 --- a/src/esdl2.erl +++ b/src/esdl2.erl @@ -76,6 +76,7 @@ -export([get_window_brightness/1]). -export([get_window_display_index/1]). -export([get_window_flags/1]). +-export([get_window_grab/1]). %% @todo We probably want to accept an env variable or somthing for the location. -on_load(on_load/0). @@ -233,3 +234,6 @@ get_window_display_index(_) -> get_window_flags(_) -> erlang:nif_error({not_loaded, ?MODULE}). + +get_window_grab(_) -> + erlang:nif_error({not_loaded, ?MODULE}). diff --git a/src/sdl_window.erl b/src/sdl_window.erl index 02e9474..bc77974 100644 --- a/src/sdl_window.erl +++ b/src/sdl_window.erl @@ -19,6 +19,7 @@ -export([get_brightness/1]). -export([get_display_index/1]). -export([get_flags/1]). +-export([is_input_grabbed/1]). create(Title, X, Y, W, H, Flags) -> esdl2:create_window(Title, X, Y, W, H, Flags), @@ -42,3 +43,7 @@ get_display_index(Window) -> get_flags(Window) -> esdl2:get_window_flags(Window), receive {'_nif_thread_ret_', Ret} -> Ret end. + +is_input_grabbed(Window) -> + esdl2:get_window_grab(Window), + receive {'_nif_thread_ret_', Ret} -> Ret end. |