contrib/lutok/c_gate_test.cpp

   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 }