1/**
2 * Copyright (c) 2006-2023 LOVE Development Team
3 *
4 * This software is provided 'as-is', without any express or implied
5 * warranty. In no event will the authors be held liable for any damages
6 * arising from the use of this software.
7 *
8 * Permission is granted to anyone to use this software for any purpose,
9 * including commercial applications, and to alter it and redistribute it
10 * freely, subject to the following restrictions:
11 *
12 * 1. The origin of this software must not be misrepresented; you must not
13 * claim that you wrote the original software. If you use this software
14 * in a product, an acknowledgment in the product documentation would be
15 * appreciated but is not required.
16 * 2. Altered source versions must be plainly marked as such, and must not be
17 * misrepresented as being the original software.
18 * 3. This notice may not be removed or altered from any source distribution.
19 **/
20
21// LOVE
22#include "wrap_Cursor.h"
23
24namespace love
25{
26namespace mouse
27{
28
29Cursor *luax_checkcursor(lua_State *L, int idx)
30{
31 return luax_checktype<Cursor>(L, idx);
32}
33
34int w_Cursor_getType(lua_State *L)
35{
36 Cursor *cursor = luax_checkcursor(L, 1);
37
38 Cursor::CursorType ctype = cursor->getType();
39 const char *typestr = nullptr;
40
41 if (ctype == Cursor::CURSORTYPE_IMAGE)
42 mouse::Cursor::getConstant(ctype, typestr);
43 else if (ctype == Cursor::CURSORTYPE_SYSTEM)
44 {
45 Cursor::SystemCursor systype = cursor->getSystemType();
46 mouse::Cursor::getConstant(systype, typestr);
47 }
48
49 if (!typestr)
50 return luaL_error(L, "Unknown cursor type.");
51
52 lua_pushstring(L, typestr);
53 return 1;
54}
55
56static const luaL_Reg w_Cursor_functions[] =
57{
58 { "getType", w_Cursor_getType },
59 { 0, 0 },
60};
61
62extern "C" int luaopen_cursor(lua_State *L)
63{
64 return luax_register_type(L, &Cursor::type, w_Cursor_functions, nullptr);
65}
66
67} // mouse
68} // love
69