Added Embedding Lua Video #1
Javidx9
6 years ago
committed by
GitHub
parent
5f650f3922
commit
d4cf430f9d
@ -0,0 +1,80 @@ |
|||||||
|
|
||||||
|
-- Embedding Lua in C++ Part #1 |
||||||
|
-- "Stupid 3D printer, I didn't want a nest..." - javidx9 |
||||||
|
-- |
||||||
|
-- License (OLC-3) |
||||||
|
-- ~~~~~~~~~~~~~~~ |
||||||
|
-- |
||||||
|
-- Copyright 2018-2019 OneLoneCoder.com |
||||||
|
-- |
||||||
|
-- Redistribution and use in source and binary forms, with or without |
||||||
|
-- modification, are permitted provided that the following conditions |
||||||
|
-- are met: |
||||||
|
-- |
||||||
|
-- 1. Redistributions or derivations of source code must retain the above |
||||||
|
-- copyright notice, this list of conditions and the following disclaimer. |
||||||
|
-- |
||||||
|
-- 2. Redistributions or derivative works in binary form must reproduce |
||||||
|
-- the above copyright notice. This list of conditions and the following |
||||||
|
-- disclaimer must be reproduced in the documentation and/or other |
||||||
|
-- materials provided with the distribution. |
||||||
|
-- |
||||||
|
-- 3. Neither the name of the copyright holder nor the names of its |
||||||
|
-- contributors may be used to endorse or promote products derived |
||||||
|
-- from this software without specific prior written permission. |
||||||
|
-- |
||||||
|
-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS |
||||||
|
-- "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT |
||||||
|
-- LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR |
||||||
|
-- A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT |
||||||
|
-- HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
||||||
|
-- SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT |
||||||
|
-- LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
||||||
|
-- DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
||||||
|
-- THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
||||||
|
-- (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
||||||
|
-- OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
||||||
|
-- |
||||||
|
-- Relevant Video: https://youtu.be/4l5HdmPoynw |
||||||
|
-- |
||||||
|
-- Links |
||||||
|
-- ~~~~~ |
||||||
|
-- YouTube: https://www.youtube.com/javidx9 |
||||||
|
-- https://www.youtube.com/javidx9extra |
||||||
|
-- Discord: https://discord.gg/WhwHUMV |
||||||
|
-- Twitter: https://www.twitter.com/javidx9 |
||||||
|
-- Twitch: https://www.twitch.tv/javidx9 |
||||||
|
-- GitHub: https://www.github.com/onelonecoder |
||||||
|
-- Patreon: https://www.patreon.com/javidx9 |
||||||
|
-- Homepage: https://www.onelonecoder.com |
||||||
|
-- |
||||||
|
-- Author |
||||||
|
-- ~~~~~~ |
||||||
|
-- David Barr, aka javidx9, ©OneLoneCoder 2019 |
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
-- Stage 1: Reading Simple Values |
||||||
|
a = 5 |
||||||
|
b = 7 |
||||||
|
c = a + b |
||||||
|
d = "OneLoneCoder.com" |
||||||
|
|
||||||
|
-- Stage 2: Reading a simple object |
||||||
|
player = {Title = "Squire", Name = "Ciaran", Family = "Wirral", Level = 20} |
||||||
|
|
||||||
|
-- Stage 3: Calling a Lua Function |
||||||
|
function CalledFromCPP1(r1, r2, r3) |
||||||
|
io.write("[LUA S3] CalledFromCPP1("..r1..", "..r2..", "..r3..")\n") |
||||||
|
return r1 * r2 |
||||||
|
end |
||||||
|
|
||||||
|
-- Stage 4: Calling a C++ Function |
||||||
|
function CalledFromCPP2(r1, r2) |
||||||
|
io.write("[LUA S4] CalledFromCPP2("..r1..", "..r2..")\n") |
||||||
|
io.write("[LUA S4] Calling HostFunction("..r1..", "..r2..")\n") |
||||||
|
r = HostFunction(r1, r2) |
||||||
|
io.write("[LUA S4] HostFunction returned "..r.."\n") |
||||||
|
return r * 15 |
||||||
|
end |
||||||
|
|
||||||
@ -0,0 +1,200 @@ |
|||||||
|
/*
|
||||||
|
Embedding Lua in C++ Part #1 |
||||||
|
"Stupid 3D printer, I didn't want a nest..." - javidx9 |
||||||
|
|
||||||
|
License (OLC-3) |
||||||
|
~~~~~~~~~~~~~~~ |
||||||
|
|
||||||
|
Copyright 2018-2019 OneLoneCoder.com |
||||||
|
|
||||||
|
Redistribution and use in source and binary forms, with or without |
||||||
|
modification, are permitted provided that the following conditions |
||||||
|
are met: |
||||||
|
|
||||||
|
1. Redistributions or derivations of source code must retain the above |
||||||
|
copyright notice, this list of conditions and the following disclaimer. |
||||||
|
|
||||||
|
2. Redistributions or derivative works in binary form must reproduce |
||||||
|
the above copyright notice. This list of conditions and the following |
||||||
|
disclaimer must be reproduced in the documentation and/or other |
||||||
|
materials provided with the distribution. |
||||||
|
|
||||||
|
3. Neither the name of the copyright holder nor the names of its |
||||||
|
contributors may be used to endorse or promote products derived |
||||||
|
from this software without specific prior written permission. |
||||||
|
|
||||||
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS |
||||||
|
"AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT |
||||||
|
LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR |
||||||
|
A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT |
||||||
|
HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
||||||
|
SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT |
||||||
|
LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
||||||
|
DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
||||||
|
THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
||||||
|
(INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE |
||||||
|
OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
||||||
|
|
||||||
|
Relevant Video: https://youtu.be/4l5HdmPoynw
|
||||||
|
|
||||||
|
Links |
||||||
|
~~~~~ |
||||||
|
YouTube: https://www.youtube.com/javidx9
|
||||||
|
https://www.youtube.com/javidx9extra
|
||||||
|
Discord: https://discord.gg/WhwHUMV
|
||||||
|
Twitter: https://www.twitter.com/javidx9
|
||||||
|
Twitch: https://www.twitch.tv/javidx9
|
||||||
|
GitHub: https://www.github.com/onelonecoder
|
||||||
|
Patreon: https://www.patreon.com/javidx9
|
||||||
|
Homepage: https://www.onelonecoder.com
|
||||||
|
|
||||||
|
Author |
||||||
|
~~~~~~ |
||||||
|
David Barr, aka javidx9, ©OneLoneCoder 2019 |
||||||
|
*/ |
||||||
|
|
||||||
|
#include <iostream> |
||||||
|
#include <string> |
||||||
|
|
||||||
|
// include Lua, assumes it is local to this file
|
||||||
|
extern "C" |
||||||
|
{ |
||||||
|
#include "lua535/include/lua.h" |
||||||
|
#include "lua535/include/lauxlib.h" |
||||||
|
#include "lua535/include/lualib.h" |
||||||
|
} |
||||||
|
|
||||||
|
// Link to lua library
|
||||||
|
#ifdef _WIN32 |
||||||
|
#pragma comment(lib, "lua535/liblua53.a") |
||||||
|
#endif |
||||||
|
|
||||||
|
|
||||||
|
// Little error checking utility function
|
||||||
|
bool CheckLua(lua_State *L, int r) |
||||||
|
{ |
||||||
|
if (r != LUA_OK) |
||||||
|
{ |
||||||
|
std::string errormsg = lua_tostring(L, -1); |
||||||
|
std::cout << errormsg << std::endl; |
||||||
|
return false; |
||||||
|
} |
||||||
|
return true; |
||||||
|
} |
||||||
|
|
||||||
|
|
||||||
|
int lua_HostFunction(lua_State *L) |
||||||
|
{ |
||||||
|
float a = (float)lua_tonumber(L, 1); |
||||||
|
float b = (float)lua_tonumber(L, 2); |
||||||
|
std::cout << "[CPP S4] HostFunction(" << a << ", " << b << ") called from Lua" << std::endl; |
||||||
|
float c = a * b; |
||||||
|
lua_pushnumber(L, c); |
||||||
|
return 1; |
||||||
|
} |
||||||
|
|
||||||
|
|
||||||
|
// NOTE !!!
|
||||||
|
// YOU WILL NEED THE "EmbeddingLua1.lua" FILE FROM GITHUB REPO
|
||||||
|
|
||||||
|
|
||||||
|
int main() |
||||||
|
{ |
||||||
|
|
||||||
|
struct Player |
||||||
|
{ |
||||||
|
std::string title; |
||||||
|
std::string name; |
||||||
|
std::string family; |
||||||
|
int level; |
||||||
|
} player; |
||||||
|
|
||||||
|
// Create Lua State
|
||||||
|
lua_State *L = luaL_newstate(); |
||||||
|
|
||||||
|
// Add standard libraries to Lua Virtual Machine
|
||||||
|
luaL_openlibs(L); |
||||||
|
|
||||||
|
// Register our C++ Function in the global Lua space
|
||||||
|
lua_register(L, "HostFunction", lua_HostFunction); |
||||||
|
|
||||||
|
|
||||||
|
// Load and parse the Lua File
|
||||||
|
if(CheckLua(L, luaL_dofile(L, "EmbeddingLua1.lua"))) |
||||||
|
{
|
||||||
|
// Stage 1: Just read simple variables
|
||||||
|
std::cout << "[CPP] Stage 1 - Read Simple Variables" << std::endl; |
||||||
|
lua_getglobal(L, "a"); |
||||||
|
if (lua_isnumber(L, -1)) std::cout << "[CPP S1] a = " << (int)lua_tointeger(L, -1) << std::endl; |
||||||
|
lua_getglobal(L, "b"); |
||||||
|
if (lua_isnumber(L, -1)) std::cout << "[CPP S1] b = " << (int)lua_tointeger(L, -1) << std::endl; |
||||||
|
lua_getglobal(L, "c"); |
||||||
|
if (lua_isnumber(L, -1)) std::cout << "[CPP S1] c = " << (int)lua_tointeger(L, -1) << std::endl; |
||||||
|
lua_getglobal(L, "d"); |
||||||
|
if (lua_isstring(L, -1)) std::cout << "[CPP S1] d = " << lua_tostring(L, -1) << std::endl << std::endl; |
||||||
|
|
||||||
|
// Stage 2: Read Table Object
|
||||||
|
std::cout << "[CPP] Stage 2 - Read Table (Key/Value pairs)" << std::endl; |
||||||
|
lua_getglobal(L, "player"); |
||||||
|
if (lua_istable(L, -1)) |
||||||
|
{ |
||||||
|
lua_pushstring(L, "Name"); |
||||||
|
lua_gettable(L, -2); |
||||||
|
player.name = lua_tostring(L, -1); |
||||||
|
lua_pop(L, 1); |
||||||
|
|
||||||
|
lua_pushstring(L, "Family"); |
||||||
|
lua_gettable(L, -2); |
||||||
|
player.family = lua_tostring(L, -1); |
||||||
|
lua_pop(L, 1); |
||||||
|
|
||||||
|
lua_pushstring(L, "Title"); |
||||||
|
lua_gettable(L, -2); |
||||||
|
player.title = lua_tostring(L, -1); |
||||||
|
lua_pop(L, 1); |
||||||
|
|
||||||
|
lua_pushstring(L, "Level"); |
||||||
|
lua_gettable(L, -2); |
||||||
|
player.level = (int)lua_tointeger(L, -1); |
||||||
|
lua_pop(L, 1); |
||||||
|
} |
||||||
|
std::cout << "[CPP S2] " << player.title << " " << player.name << " of " << player.family << " [Lvl: " << player.level << "]" << std::endl << std::endl;
|
||||||
|
|
||||||
|
// Stage 3: Call Lua Function
|
||||||
|
std::cout << "[CPP] Stage 3 - Call Lua Function" << std::endl; |
||||||
|
lua_getglobal(L, "CalledFromCPP1"); |
||||||
|
if (lua_isfunction(L, -1)) |
||||||
|
{ |
||||||
|
lua_pushnumber(L, 5.0f); |
||||||
|
lua_pushnumber(L, 6.0f); |
||||||
|
lua_pushstring(L, "Bwa ha ha!"); |
||||||
|
std::cout << "[CPP S3] Calling 'CalledFromCPP1' in lua script" << std::endl; |
||||||
|
if (CheckLua(L, lua_pcall(L, 3, 1, 0))) |
||||||
|
{ |
||||||
|
std::cout << "[CPP S3] 'CalledFromCPP1' returned " << (float)lua_tonumber(L, -1) << std::endl << std::endl; |
||||||
|
} |
||||||
|
} |
||||||
|
|
||||||
|
// Stage 4: Call Lua Function, which calls C++ Function
|
||||||
|
std::cout << "[CPP] Stage 4 - Call Lua Function, whcih in turn calls C++ Function" << std::endl; |
||||||
|
lua_getglobal(L, "CalledFromCPP2"); |
||||||
|
if (lua_isfunction(L, -1)) |
||||||
|
{ |
||||||
|
lua_pushnumber(L, 5.0f); |
||||||
|
lua_pushnumber(L, 6.0f); |
||||||
|
std::cout << "[CPP S4] Calling 'CalledFromCPP2' in lua script" << std::endl; |
||||||
|
if (CheckLua(L, lua_pcall(L, 2, 1, 0))) |
||||||
|
{ |
||||||
|
std::cout << "[CPP S4] 'CalledFromCPP2' returned " << (float)lua_tonumber(L, -1) << std::endl << std::endl; |
||||||
|
} |
||||||
|
} |
||||||
|
} |
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
system("pause"); |
||||||
|
lua_close(L); |
||||||
|
return 0; |
||||||
|
} |
||||||
Loading…
Reference in new issue