1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
|
// Copyright (c) 2017-2018, Loïc Hoguin <[email protected]>
//
// Permission to use, copy, modify, and/or distribute this software for any
// purpose with or without fee is hereby granted, provided that the above
// copyright notice and this permission notice appear in all copies.
//
// THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
// WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
// MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
// ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
// WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
// ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
// OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
#include "esdl2.h"
#if !SDL_VERSION_ATLEAST(2, 0, 6)
#define SDL_BLENDMODE_INVALID 0x7FFFFFFF
#endif
#define BLEND_MODE_ENUM(E) \
E(none, SDL_BLENDMODE_NONE) \
E(blend, SDL_BLENDMODE_BLEND) \
E(add, SDL_BLENDMODE_ADD) \
E(mod, SDL_BLENDMODE_MOD) \
E(invalid, SDL_BLENDMODE_INVALID)
NIF_ATOM_TO_ENUM_FUNCTION(atom_to_blend_mode, SDL_BlendMode, BLEND_MODE_ENUM)
NIF_ENUM_TO_ATOM_FUNCTION(blend_mode_to_atom, SDL_BlendMode, BLEND_MODE_ENUM)
#if SDL_VERSION_ATLEAST(2, 0, 6)
#define BLEND_OPERATION_ENUM(E) \
E(add, SDL_BLENDOPERATION_ADD) \
E(substract, SDL_BLENDOPERATION_SUBTRACT) \
E(rev_substract, SDL_BLENDOPERATION_REV_SUBTRACT) \
E(minimum, SDL_BLENDOPERATION_MINIMUM) \
E(maximum, SDL_BLENDOPERATION_MAXIMUM)
static NIF_ATOM_TO_ENUM_FUNCTION(atom_to_blend_operation, SDL_BlendOperation, BLEND_OPERATION_ENUM)
#define BLEND_FACTOR_ENUM(E) \
E(zero, SDL_BLENDFACTOR_ZERO) \
E(one, SDL_BLENDFACTOR_ONE) \
E(src_color, SDL_BLENDFACTOR_SRC_COLOR) \
E(one_minus_src_color, SDL_BLENDFACTOR_ONE_MINUS_SRC_COLOR) \
E(src_alpha, SDL_BLENDFACTOR_SRC_ALPHA) \
E(one_minus_src_alpha, SDL_BLENDFACTOR_ONE_MINUS_SRC_ALPHA) \
E(dst_color, SDL_BLENDFACTOR_DST_COLOR) \
E(one_minus_dst_color, SDL_BLENDFACTOR_ONE_MINUS_DST_COLOR) \
E(dst_alpha, SDL_BLENDFACTOR_DST_ALPHA) \
E(one_minus_dst_alpha, SDL_BLENDFACTOR_ONE_MINUS_DST_ALPHA)
static NIF_ATOM_TO_ENUM_FUNCTION(atom_to_blend_factor, SDL_BlendFactor, BLEND_FACTOR_ENUM)
// compose_custom_blend_mode
NIF_CALL_HANDLER(thread_compose_custom_blend_mode)
{
SDL_BlendMode mode;
ERL_NIF_TERM term;
mode = SDL_ComposeCustomBlendMode(
(long)args[0], (long)args[1], (long)args[2],
(long)args[3], (long)args[4], (long)args[5]);
term = blend_mode_to_atom(mode);
if (!enif_is_identical(term, atom_undefined))
return term;
return enif_make_int(env, mode);
}
NIF_FUNCTION(compose_custom_blend_mode)
{
SDL_BlendFactor srcColorFactor, dstColorFactor, srcAlphaFactor, dstAlphaFactor;
SDL_BlendOperation colorOp, alphaOp;
BADARG_IF(!atom_to_blend_factor(env, argv[0], &srcColorFactor));
BADARG_IF(!atom_to_blend_factor(env, argv[1], &dstColorFactor));
BADARG_IF(!atom_to_blend_operation(env, argv[2], &colorOp));
BADARG_IF(!atom_to_blend_factor(env, argv[3], &srcAlphaFactor));
BADARG_IF(!atom_to_blend_factor(env, argv[4], &dstAlphaFactor));
BADARG_IF(!atom_to_blend_operation(env, argv[5], &alphaOp));
return nif_thread_call(env, thread_compose_custom_blend_mode, 6,
srcColorFactor, dstColorFactor, colorOp,
srcAlphaFactor, dstAlphaFactor, alphaOp);
}
#else
NIF_FUNCTION(compose_custom_blend_mode)
{
return atom_undefined;
}
#endif /* SDL_VERSION_ATLEAST(2, 0, 6) */
|
