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 38ATF_TEST_CASE_WITHOUT_HEAD(connect); 39ATF_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 56ATF_TEST_CASE_WITHOUT_HEAD(c_state); 57ATF_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 70ATF_INIT_TEST_CASES(tcs) 71{ 72 ATF_ADD_TEST_CASE(tcs, c_state); 73 ATF_ADD_TEST_CASE(tcs, connect); 74} 75