core/logic_bridge.cpp
author Matt Woodrow <pred@alliedmods.net>
Fri Jul 24 12:59:13 2009 +1200 (2009-07-24)
changeset 2749 1c3d9e4df885
parent 2730 a2ff0a7a1c53
child 2884 be328dae7d3a
permissions -rw-r--r--
A merge?
dvander@2726
     1
/**
dvander@2726
     2
 * vim: set ts=4 sw=4 :
dvander@2726
     3
 * =============================================================================
dvander@2726
     4
 * SourceMod
dvander@2726
     5
 * Copyright (C) 2004-2009 AlliedModders LLC.  All rights reserved.
dvander@2726
     6
 * =============================================================================
dvander@2726
     7
 *
dvander@2726
     8
 * This program is free software; you can redistribute it and/or modify it under
dvander@2726
     9
 * the terms of the GNU General Public License, version 3.0, as published by the
dvander@2726
    10
 * Free Software Foundation.
dvander@2726
    11
 * 
dvander@2726
    12
 * This program is distributed in the hope that it will be useful, but WITHOUT
dvander@2726
    13
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
dvander@2726
    14
 * FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
dvander@2726
    15
 * details.
dvander@2726
    16
 *
dvander@2726
    17
 * You should have received a copy of the GNU General Public License along with
dvander@2726
    18
 * this program.  If not, see <http://www.gnu.org/licenses/>.
dvander@2726
    19
 *
dvander@2726
    20
 * As a special exception, AlliedModders LLC gives you permission to link the
dvander@2726
    21
 * code of this program (as well as its derivative works) to "Half-Life 2," the
dvander@2726
    22
 * "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
dvander@2726
    23
 * by the Valve Corporation.  You must obey the GNU General Public License in
dvander@2726
    24
 * all respects for all other code used.  Additionally, AlliedModders LLC grants
dvander@2726
    25
 * this exception to all derivative works.  AlliedModders LLC defines further
dvander@2726
    26
 * exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
dvander@2726
    27
 * or <http://www.sourcemod.net/license.php>.
dvander@2726
    28
 *
dvander@2726
    29
 * Version: $Id$
dvander@2726
    30
 */
dvander@2726
    31
#include <stdio.h>
dvander@2726
    32
#include <assert.h>
dvander@2726
    33
#include "sourcemod.h"
dvander@2726
    34
#include "sourcemm_api.h"
dvander@2726
    35
#include "sm_globals.h"
dvander@2726
    36
#include "NativeOwner.h"
dvander@2726
    37
#include "sm_autonatives.h"
dvander@2726
    38
#include "logic/intercom.h"
dvander@2726
    39
#include "LibrarySys.h"
dvander@2726
    40
#include "HandleSys.h"
dvander@2726
    41
#include "sm_stringutil.h"
dvander@2726
    42
#include "Logger.h"
dvander@2726
    43
#include "ShareSys.h"
dvander@2728
    44
#include "sm_srvcmds.h"
dvander@2730
    45
#include "ForwardSys.h"
dvander@2726
    46
dvander@2726
    47
static ILibrary *g_pLogic = NULL;
dvander@2726
    48
static LogicInitFunction logic_init_fn;
dvander@2726
    49
dvander@2726
    50
IThreader *g_pThreader;
dvander@2726
    51
ITextParsers *textparsers;
dvander@2726
    52
dvander@2726
    53
class VEngineServer_Logic : public IVEngineServer_Logic
dvander@2726
    54
{
dvander@2726
    55
public:
dvander@2726
    56
	virtual bool IsMapValid(const char *map)
dvander@2726
    57
	{
dvander@2726
    58
		return engine->IsMapValid(map);
dvander@2726
    59
	}
dvander@2726
    60
};
dvander@2726
    61
dvander@2726
    62
static VEngineServer_Logic logic_engine;
dvander@2726
    63
dvander@2726
    64
static void add_natives(sp_nativeinfo_t *natives)
dvander@2726
    65
{
dvander@2726
    66
	g_pCoreNatives->AddNatives(natives);
dvander@2726
    67
}
dvander@2726
    68
dvander@2726
    69
static ConVar *find_convar(const char *name)
dvander@2726
    70
{
dvander@2726
    71
	return icvar->FindVar(name);
dvander@2726
    72
}
dvander@2726
    73
dvander@2726
    74
static void log_error(const char *fmt, ...)
dvander@2726
    75
{
dvander@2726
    76
	va_list ap;
dvander@2726
    77
dvander@2726
    78
	va_start(ap, fmt);
dvander@2726
    79
	g_Logger.LogErrorEx(fmt, ap);
dvander@2726
    80
	va_end(ap);
dvander@2726
    81
}
dvander@2726
    82
dvander@2726
    83
static const char *get_cvar_string(ConVar* cvar)
dvander@2726
    84
{
dvander@2726
    85
	return cvar->GetString();
dvander@2726
    86
}
dvander@2726
    87
dvander@2726
    88
static sm_core_t core_bridge =
dvander@2726
    89
{
dvander@2726
    90
	/* Objects */
dvander@2726
    91
	&g_HandleSys,
dvander@2726
    92
	NULL,
dvander@2726
    93
	&g_SourceMod,
dvander@2726
    94
	&g_LibSys,
dvander@2726
    95
	reinterpret_cast<IVEngineServer*>(&logic_engine),
dvander@2726
    96
	&g_ShareSys,
dvander@2728
    97
	&g_RootMenu,
dvander@2728
    98
	&g_PluginSys,
dvander@2730
    99
	&g_Forwards,
dvander@2726
   100
	/* Functions */
dvander@2726
   101
	add_natives,
dvander@2726
   102
	find_convar,
dvander@2726
   103
	strncopy,
dvander@2726
   104
	UTIL_TrimWhitespace,
dvander@2726
   105
	log_error,
dvander@2726
   106
	get_cvar_string,
dvander@2726
   107
	UTIL_Format
dvander@2726
   108
};
dvander@2726
   109
dvander@2726
   110
void InitLogicBridge()
dvander@2726
   111
{
dvander@2726
   112
	sm_logic_t logic;
dvander@2726
   113
dvander@2726
   114
	core_bridge.core_ident = g_pCoreIdent;
dvander@2726
   115
	logic_init_fn(&core_bridge, &logic);
dvander@2726
   116
dvander@2726
   117
	/* Add SMGlobalClass instances */
dvander@2726
   118
	SMGlobalClass* glob = SMGlobalClass::head;
dvander@2726
   119
	while (glob->m_pGlobalClassNext != NULL)
dvander@2726
   120
	{
dvander@2726
   121
		glob = glob->m_pGlobalClassNext;
dvander@2726
   122
	}
dvander@2726
   123
	assert(glob->m_pGlobalClassNext == NULL);
dvander@2726
   124
	glob->m_pGlobalClassNext = logic.head;
dvander@2726
   125
dvander@2726
   126
	g_pThreader = logic.threader;
dvander@2728
   127
	g_pSourcePawn2->SetProfiler(logic.profiler);
dvander@2726
   128
}
dvander@2726
   129
dvander@2726
   130
bool StartLogicBridge(char *error, size_t maxlength)
dvander@2726
   131
{
dvander@2726
   132
	char file[PLATFORM_MAX_PATH];
dvander@2726
   133
dvander@2726
   134
	/* Now it's time to load the logic binary */
dvander@2726
   135
	g_SMAPI->PathFormat(file,
dvander@2726
   136
		sizeof(file),
dvander@2726
   137
		"%s/bin/sourcemod.logic." PLATFORM_LIB_EXT,
dvander@2726
   138
		g_SourceMod.GetSourceModPath());
dvander@2726
   139
dvander@2726
   140
	char myerror[255];
dvander@2726
   141
	g_pLogic = g_LibSys.OpenLibrary(file, myerror, sizeof(myerror));
dvander@2726
   142
dvander@2726
   143
	if (!g_pLogic)
dvander@2726
   144
	{
dvander@2726
   145
		if (error && maxlength)
dvander@2726
   146
		{
dvander@2726
   147
			UTIL_Format(error, maxlength, "failed to load %s: %s", file, myerror);
dvander@2726
   148
		}
dvander@2726
   149
		return false;
dvander@2726
   150
	}
dvander@2726
   151
dvander@2726
   152
	LogicLoadFunction llf = (LogicLoadFunction)g_pLogic->GetSymbolAddress("logic_load");
dvander@2726
   153
	if (llf == NULL)
dvander@2726
   154
	{
dvander@2726
   155
		g_pLogic->CloseLibrary();
dvander@2726
   156
		if (error && maxlength)
dvander@2726
   157
		{
dvander@2726
   158
			UTIL_Format(error, maxlength, "could not find logic_load function");
dvander@2726
   159
		}
dvander@2726
   160
		return false;
dvander@2726
   161
	}
dvander@2726
   162
dvander@2726
   163
	GetITextParsers getitxt = (GetITextParsers)g_pLogic->GetSymbolAddress("get_textparsers");
dvander@2726
   164
	textparsers = getitxt();
dvander@2726
   165
dvander@2726
   166
	logic_init_fn = llf(SM_LOGIC_MAGIC);
dvander@2726
   167
dvander@2726
   168
	return true;
dvander@2726
   169
}
dvander@2726
   170
dvander@2726
   171
void ShutdownLogicBridge()
dvander@2726
   172
{
dvander@2726
   173
	g_pLogic->CloseLibrary();
dvander@2726
   174
}
dvander@2726
   175