xref: /freebsd/contrib/lutok/c_gate_test.cpp (revision f7c32ed617858bcd22f8d1b03199099d50125721)
1 // Copyright 2011 Google Inc.
2 // All rights reserved.
3 //
4 // Redistribution and use in source and binary forms, with or without
5 // modification, are permitted provided that the following conditions are
6 // met:
7 //
8 // * Redistributions of source code must retain the above copyright
9 //   notice, this list of conditions and the following disclaimer.
10 // * Redistributions in binary form must reproduce the above copyright
11 //   notice, this list of conditions and the following disclaimer in the
12 //   documentation and/or other materials provided with the distribution.
13 // * Neither the name of Google Inc. nor the names of its contributors
14 //   may be used to endorse or promote products derived from this software
15 //   without specific prior written permission.
16 //
17 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
18 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
19 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
20 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
21 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
22 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
23 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
27 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 
29 #include "c_gate.hpp"
30 
31 #include <atf-c++.hpp>
32 #include <lua.hpp>
33 
34 #include "state.ipp"
35 #include "test_utils.hpp"
36 
37 
38 ATF_TEST_CASE_WITHOUT_HEAD(connect);
39 ATF_TEST_CASE_BODY(connect)
40 {
41     lua_State* raw_state = luaL_newstate();
42     ATF_REQUIRE(raw_state != NULL);
43 
44     {
45         lutok::state state = lutok::state_c_gate::connect(raw_state);
46         lua_pushinteger(raw(state), 123);
47     }
48     // If the wrapper object had closed the Lua state, we could very well crash
49     // here.
50     ATF_REQUIRE_EQ(123, lua_tointeger(raw_state, -1));
51 
52     lua_close(raw_state);
53 }
54 
55 
56 ATF_TEST_CASE_WITHOUT_HEAD(c_state);
57 ATF_TEST_CASE_BODY(c_state)
58 {
59     lutok::state state;
60     state.push_integer(5);
61     {
62         lutok::state_c_gate gate(state);
63         lua_State* raw_state = gate.c_state();
64         ATF_REQUIRE_EQ(5, lua_tointeger(raw_state, -1));
65     }
66     state.pop(1);
67 }
68 
69 
70 ATF_INIT_TEST_CASES(tcs)
71 {
72     ATF_ADD_TEST_CASE(tcs, c_state);
73     ATF_ADD_TEST_CASE(tcs, connect);
74 }
75