2015-01-28 09:14:05 -05:00
|
|
|
|
|
|
|
// ManualBindings_Network.cpp
|
|
|
|
|
|
|
|
// Implements the cNetwork-related API bindings for Lua
|
|
|
|
|
|
|
|
#include "Globals.h"
|
|
|
|
#include "LuaTCPLink.h"
|
|
|
|
#include "ManualBindings.h"
|
|
|
|
#include "tolua++/include/tolua++.h"
|
|
|
|
#include "LuaState.h"
|
|
|
|
#include "LuaTCPLink.h"
|
2015-01-29 05:09:56 -05:00
|
|
|
#include "LuaNameLookup.h"
|
2015-01-28 09:14:05 -05:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// cNetwork API functions:
|
|
|
|
|
|
|
|
/** Binds cNetwork::Connect */
|
|
|
|
static int tolua_cNetwork_Connect(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// cNetwork:Connect(Host, Port, Callbacks) -> bool
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserTable(1, "cNetwork") ||
|
|
|
|
!S.CheckParamString(2) ||
|
|
|
|
!S.CheckParamNumber(3) ||
|
|
|
|
!S.CheckParamTable(4) ||
|
|
|
|
!S.CheckParamEnd(5)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the plugin instance:
|
|
|
|
cPluginLua * Plugin = GetLuaPlugin(L);
|
|
|
|
if (Plugin == nullptr)
|
|
|
|
{
|
|
|
|
// An error message has been already printed in GetLuaPlugin()
|
|
|
|
S.Push(false);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Read the params:
|
|
|
|
AString Host;
|
|
|
|
int Port;
|
|
|
|
S.GetStackValues(2, Host, Port);
|
|
|
|
|
|
|
|
// Check validity:
|
|
|
|
if ((Port < 0) || (Port > 65535))
|
|
|
|
{
|
|
|
|
LOGWARNING("cNetwork:Connect() called with invalid port (%d), failing the request.", Port);
|
|
|
|
S.Push(false);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Create the LuaTCPLink glue class:
|
|
|
|
auto Link = std::make_shared<cLuaTCPLink>(*Plugin, 4);
|
|
|
|
|
|
|
|
// Try to connect:
|
|
|
|
bool res = cNetwork::Connect(Host, static_cast<UInt16>(Port), Link, Link);
|
|
|
|
S.Push(res);
|
|
|
|
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2015-01-29 05:09:56 -05:00
|
|
|
static int tolua_cNetwork_HostnameToIP(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// cNetwork:HostnameToIP(Host, Callbacks) -> bool
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserTable(1, "cNetwork") ||
|
|
|
|
!S.CheckParamString(2) ||
|
|
|
|
!S.CheckParamTable(3) ||
|
|
|
|
!S.CheckParamEnd(4)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the plugin instance:
|
|
|
|
cPluginLua * Plugin = GetLuaPlugin(L);
|
|
|
|
if (Plugin == nullptr)
|
|
|
|
{
|
|
|
|
// An error message has been already printed in GetLuaPlugin()
|
|
|
|
S.Push(false);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Read the params:
|
|
|
|
AString Host;
|
|
|
|
S.GetStackValue(2, Host);
|
|
|
|
|
|
|
|
// Try to look up:
|
|
|
|
bool res = cNetwork::HostnameToIP(Host, std::make_shared<cLuaNameLookup>(Host, *Plugin, 3));
|
|
|
|
S.Push(res);
|
|
|
|
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static int tolua_cNetwork_IPToHostname(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// cNetwork:IPToHostname(IP, Callbacks) -> bool
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserTable(1, "cNetwork") ||
|
|
|
|
!S.CheckParamString(2) ||
|
|
|
|
!S.CheckParamTable(3) ||
|
|
|
|
!S.CheckParamEnd(4)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the plugin instance:
|
|
|
|
cPluginLua * Plugin = GetLuaPlugin(L);
|
|
|
|
if (Plugin == nullptr)
|
|
|
|
{
|
|
|
|
// An error message has been already printed in GetLuaPlugin()
|
|
|
|
S.Push(false);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Read the params:
|
|
|
|
AString Host;
|
|
|
|
S.GetStackValue(2, Host);
|
|
|
|
|
|
|
|
// Try to look up:
|
|
|
|
bool res = cNetwork::IPToHostName(Host, std::make_shared<cLuaNameLookup>(Host, *Plugin, 3));
|
|
|
|
S.Push(res);
|
|
|
|
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2015-01-28 09:14:05 -05:00
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// cTCPLink bindings (routed through cLuaTCPLink):
|
|
|
|
|
|
|
|
static int tolua_cTCPLink_Send(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// LinkInstance:Send(DataString) -> bool
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserType(1, "cTCPLink") ||
|
|
|
|
!S.CheckParamString(2) ||
|
|
|
|
!S.CheckParamEnd(3)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the link:
|
|
|
|
cLuaTCPLink * Link;
|
|
|
|
if (lua_isnil(L, 1))
|
|
|
|
{
|
|
|
|
LOGWARNING("cTCPLink:Send(): invalid link object. Stack trace:");
|
|
|
|
S.LogStackTrace();
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
Link = *static_cast<cLuaTCPLink **>(lua_touserdata(L, 1));
|
|
|
|
|
|
|
|
// Get the data to send:
|
|
|
|
AString Data;
|
|
|
|
S.GetStackValues(2, Data);
|
|
|
|
|
|
|
|
// Send the data:
|
|
|
|
Link->Send(Data);
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static int tolua_cTCPLink_GetLocalIP(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// LinkInstance:GetLocalIP() -> string
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserType(1, "cTCPLink") ||
|
|
|
|
!S.CheckParamEnd(2)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the link:
|
|
|
|
cLuaTCPLink * Link;
|
|
|
|
if (lua_isnil(L, 1))
|
|
|
|
{
|
|
|
|
LOGWARNING("cTCPLink:GetLocalIP(): invalid link object. Stack trace:");
|
|
|
|
S.LogStackTrace();
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
Link = *static_cast<cLuaTCPLink **>(lua_touserdata(L, 1));
|
|
|
|
|
|
|
|
// Get the IP:
|
|
|
|
S.Push(Link->GetLocalIP());
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static int tolua_cTCPLink_GetLocalPort(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// LinkInstance:GetLocalPort() -> number
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserType(1, "cTCPLink") ||
|
|
|
|
!S.CheckParamEnd(2)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the link:
|
|
|
|
cLuaTCPLink * Link;
|
|
|
|
if (lua_isnil(L, 1))
|
|
|
|
{
|
|
|
|
LOGWARNING("cTCPLink:GetLocalPort(): invalid link object. Stack trace:");
|
|
|
|
S.LogStackTrace();
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
Link = *static_cast<cLuaTCPLink **>(lua_touserdata(L, 1));
|
|
|
|
|
|
|
|
// Get the Port:
|
|
|
|
S.Push(Link->GetLocalPort());
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static int tolua_cTCPLink_GetRemoteIP(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// LinkInstance:GetRemoteIP() -> string
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserType(1, "cTCPLink") ||
|
|
|
|
!S.CheckParamEnd(2)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the link:
|
|
|
|
cLuaTCPLink * Link;
|
|
|
|
if (lua_isnil(L, 1))
|
|
|
|
{
|
|
|
|
LOGWARNING("cTCPLink:GetRemoteIP(): invalid link object. Stack trace:");
|
|
|
|
S.LogStackTrace();
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
Link = *static_cast<cLuaTCPLink **>(lua_touserdata(L, 1));
|
|
|
|
|
|
|
|
// Get the IP:
|
|
|
|
S.Push(Link->GetRemoteIP());
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static int tolua_cTCPLink_GetRemotePort(lua_State * L)
|
|
|
|
{
|
|
|
|
// Function signature:
|
|
|
|
// LinkInstance:GetRemotePort() -> number
|
|
|
|
|
|
|
|
cLuaState S(L);
|
|
|
|
if (
|
|
|
|
!S.CheckParamUserType(1, "cTCPLink") ||
|
|
|
|
!S.CheckParamEnd(2)
|
|
|
|
)
|
|
|
|
{
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Get the link:
|
|
|
|
cLuaTCPLink * Link;
|
|
|
|
if (lua_isnil(L, 1))
|
|
|
|
{
|
|
|
|
LOGWARNING("cTCPLink:GetRemotePort(): invalid link object. Stack trace:");
|
|
|
|
S.LogStackTrace();
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
Link = *static_cast<cLuaTCPLink **>(lua_touserdata(L, 1));
|
|
|
|
|
|
|
|
// Get the Port:
|
|
|
|
S.Push(Link->GetRemotePort());
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
// Register the bindings:
|
|
|
|
|
|
|
|
void ManualBindings::BindNetwork(lua_State * tolua_S)
|
|
|
|
{
|
|
|
|
// Create the cNetwork API classes:
|
|
|
|
tolua_usertype(tolua_S, "cNetwork");
|
|
|
|
tolua_cclass(tolua_S, "cNetwork", "cNetwork", "", nullptr);
|
|
|
|
tolua_usertype(tolua_S, "cTCPLink");
|
|
|
|
tolua_cclass(tolua_S, "cTCPLink", "cTCPLink", "", nullptr);
|
|
|
|
|
|
|
|
// Fill in the functions (alpha-sorted):
|
|
|
|
tolua_beginmodule(tolua_S, "cNetwork");
|
|
|
|
tolua_function(tolua_S, "Connect", tolua_cNetwork_Connect);
|
|
|
|
tolua_function(tolua_S, "HostnameToIP", tolua_cNetwork_HostnameToIP);
|
|
|
|
tolua_function(tolua_S, "IPToHostname", tolua_cNetwork_IPToHostname);
|
2015-01-29 05:09:56 -05:00
|
|
|
/*
|
2015-01-28 09:14:05 -05:00
|
|
|
tolua_function(tolua_S, "Listen", tolua_cNetwork_Listen);
|
|
|
|
*/
|
|
|
|
tolua_endmodule(tolua_S);
|
|
|
|
|
|
|
|
tolua_beginmodule(tolua_S, "cTCPLink");
|
|
|
|
tolua_function(tolua_S, "Send", tolua_cTCPLink_Send);
|
|
|
|
tolua_function(tolua_S, "GetLocalIP", tolua_cTCPLink_GetLocalIP);
|
|
|
|
tolua_function(tolua_S, "GetLocalPort", tolua_cTCPLink_GetLocalPort);
|
|
|
|
tolua_function(tolua_S, "GetRemoteIP", tolua_cTCPLink_GetRemoteIP);
|
|
|
|
tolua_function(tolua_S, "GetRemotePort", tolua_cTCPLink_GetRemotePort);
|
|
|
|
tolua_endmodule(tolua_S);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|