sourcemod-central: core/PluginSys.cpp@f5494c328158 (annotated)

dvander@370	1	/**
ds@653	2	* vim: set ts=4 :
ds@1330	3	* =============================================================================
dvander@1231	4	* SourceMod
ds@1947	5	* Copyright (C) 2004-2008 AlliedModders LLC. All rights reserved.
ds@1330	6	* =============================================================================
dvander@370	7	*
ds@1330	8	* This program is free software; you can redistribute it and/or modify it under
ds@1330	9	* the terms of the GNU General Public License, version 3.0, as published by the
ds@1330	10	* Free Software Foundation.
dvander@1231	11	*
ds@1330	12	* This program is distributed in the hope that it will be useful, but WITHOUT
ds@1330	13	* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
ds@1330	14	* FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
ds@1330	15	* details.
dvander@1231	16	*
ds@1330	17	* You should have received a copy of the GNU General Public License along with
ds@1330	18	* this program. If not, see <http://www.gnu.org/licenses/>.
dvander@1231	19	*
ds@1330	20	* As a special exception, AlliedModders LLC gives you permission to link the
ds@1330	21	* code of this program (as well as its derivative works) to "Half-Life 2," the
ds@1330	22	* "Source Engine," the "SourcePawn JIT," and any Game MODs that run on software
ds@1330	23	* by the Valve Corporation. You must obey the GNU General Public License in
ds@1330	24	* all respects for all other code used. Additionally, AlliedModders LLC grants
ds@1330	25	* this exception to all derivative works. AlliedModders LLC defines further
ds@1330	26	* exceptions, found in LICENSE.txt (as of this writing, version JULY-31-2007),
ds@1330	27	* or <http://www.sourcemod.net/license.php>.
dvander@370	28	*
dvander@370	29	* Version: $Id$
dvander@370	30	*/
dvander@370	31
dvander@173	32	#include <stdio.h>
dvander@173	33	#include "PluginSys.h"
dvander@229	34	#include "ShareSys.h"
dvander@190	35	#include "LibrarySys.h"
dvander@220	36	#include "HandleSys.h"
ds@611	37	#include "ForwardSys.h"
dvander@197	38	#include "sourcemm_api.h"
dvander@209	39	#include "sourcemod.h"
dvander@592	40	#include "Logger.h"
dvander@298	41	#include "ExtensionSys.h"
dvander@309	42	#include "sm_srvcmds.h"
dvander@309	43	#include "sm_stringutil.h"
dvander@848	44	#include "ConCmdManager.h"
dvander@848	45	#include "PlayerManager.h"
dvander@978	46	#include "CoreConfig.h"
dvander@3004	47	#include "logic_bridge.h"
dvander@173	48
dvander@211	49	CPluginManager g_PluginSys;
dvander@220	50	HandleType_t g_PluginType = 0;
dvander@229	51	IdentityType_t g_PluginIdent = 0;
dvander@173	52
dvander@209	53	CPlugin::CPlugin(const char *file)
dvander@209	54	{
dvander@209	55	static int MySerial = 0;
dvander@209	56
dvander@209	57	m_type = PluginType_Private;
dvander@209	58	m_status = Plugin_Uncompiled;
fyrenmoo@2675	59	m_bSilentlyFailed = false;
dvander@209	60	m_serial = ++MySerial;
dvander@2193	61	m_pRuntime = NULL;
dvander@2798	62	m_errormsg[sizeof(m_errormsg) - 1] = '\0';
dvander@2814	63	UTIL_Format(m_filename, sizeof(m_filename), "%s", file);
dvander@229	64	m_handle = 0;
dvander@229	65	m_ident = NULL;
dvander@486	66	m_pProps = sm_trie_create();
dvander@605	67	m_FakeNativesMissing = false;
faluco@1112	68	m_LibraryMissing = false;
dvander@1630	69	m_bGotAllLoaded = false;
dvander@3004	70	m_pPhrases = translator->CreatePhraseCollection();
dvander@2342	71	m_MaxClientsVar = NULL;
dvander@209	72	}
dvander@209	73
dvander@209	74	CPlugin::~CPlugin()
dvander@173	75	{
dvander@298	76	if (m_handle)
dvander@298	77	{
dvander@298	78	HandleSecurity sec;
dvander@298	79	sec.pOwner = g_PluginSys.GetIdentity();
dvander@298	80	sec.pIdentity = sec.pOwner;
dvander@298	81
dvander@298	82	g_HandleSys.FreeHandle(m_handle, &sec);
dvander@298	83	g_ShareSys.DestroyIdentity(m_ident);
dvander@298	84	}
dvander@298	85
dvander@2193	86	if (m_pRuntime != NULL)
dvander@209	87	{
dvander@2193	88	delete m_pRuntime;
dvander@2193	89	m_pRuntime = NULL;
dvander@209	90	}
dvander@209	91
faluco@641	92	if (m_pProps)
dvander@486	93	{
dvander@486	94	sm_trie_destroy(m_pProps);
dvander@486	95	}
dvander@978	96	for (size_t i=0; i<m_configs.size(); i++)
dvander@978	97	{
dvander@978	98	delete m_configs[i];
dvander@978	99	}
dvander@978	100	m_configs.clear();
dvander@2042	101	if (m_pPhrases != NULL)
dvander@2042	102	{
dvander@2042	103	m_pPhrases->Destroy();
dvander@2042	104	m_pPhrases = NULL;
dvander@2042	105	}
dvander@229	106	}
dvander@229	107
dvander@229	108	void CPlugin::InitIdentity()
dvander@229	109	{
dvander@229	110	if (!m_handle)
dvander@229	111	{
dvander@868	112	m_ident = g_ShareSys.CreateIdentity(g_PluginIdent, this);
dvander@262	113	m_handle = g_HandleSys.CreateHandle(g_PluginType, this, g_PluginSys.GetIdentity(), g_PluginSys.GetIdentity(), NULL);
dvander@2193	114	m_pRuntime->GetDefaultContext()->SetKey(1, m_ident);
dvander@2193	115	m_pRuntime->GetDefaultContext()->SetKey(2, (IPlugin *)this);
dvander@229	116	}
dvander@209	117	}
dvander@209	118
dvander@1766	119	unsigned int CPlugin::CalcMemUsage()
dvander@1766	120	{
dvander@1766	121	unsigned int base_size =
dvander@1766	122	sizeof(CPlugin)
dvander@1766	123	+ sizeof(IdentityToken_t)
dvander@1766	124	+ (m_configs.size() * (sizeof(AutoConfig *) + sizeof(AutoConfig)))
dvander@1766	125	+ sm_trie_mem_usage(m_pProps);
dvander@1766	126
dvander@1766	127	for (unsigned int i = 0; i < m_configs.size(); i++)
dvander@1766	128	{
dvander@1766	129	base_size += m_configs[i]->autocfg.size();
dvander@1766	130	base_size += m_configs[i]->folder.size();
dvander@1766	131	}
dvander@1766	132
dvander@1766	133	for (List<String>::iterator i = m_Libraries.begin();
dvander@1766	134	i != m_Libraries.end();
dvander@1766	135	i++)
dvander@1766	136	{
dvander@1766	137	base_size += (*i).size();
dvander@1766	138	}
dvander@1766	139
dvander@1766	140	for (List<String>::iterator i = m_RequiredLibs.begin();
dvander@1766	141	i != m_RequiredLibs.end();
dvander@1766	142	i++)
dvander@1766	143	{
dvander@1766	144	base_size += (*i).size();
dvander@1766	145	}
dvander@1766	146
dvander@1766	147	return base_size;
dvander@1766	148	}
dvander@1766	149
dvander@536	150	Handle_t CPlugin::GetMyHandle()
dvander@536	151	{
dvander@536	152	return m_handle;
dvander@536	153	}
dvander@536	154
dvander@209	155	CPlugin CPlugin::CreatePlugin(const char file, char *error, size_t maxlength)
dvander@209	156	{
ds@652	157	char fullpath[PLATFORM_MAX_PATH];
dvander@317	158	g_SourceMod.BuildPath(Path_SM, fullpath, sizeof(fullpath), "plugins/%s", file);
dvander@209	159	FILE *fp = fopen(fullpath, "rb");
dvander@173	160
dvander@298	161	CPlugin *pPlugin = new CPlugin(file);
dvander@298	162
dvander@173	163	if (!fp)
dvander@173	164	{
dvander@209	165	if (error)
dvander@209	166	{
dvander@2814	167	UTIL_Format(error, maxlength, "Unable to open file");
dvander@209	168	}
dvander@298	169	pPlugin->m_status = Plugin_BadLoad;
dvander@298	170	return pPlugin;
dvander@173	171	}
dvander@173	172
dvander@173	173	fclose(fp);
dvander@173	174
dvander@209	175	return pPlugin;
dvander@209	176	}
dvander@209	177
dvander@486	178	bool CPlugin::GetProperty(const char prop, void ptr, bool remove/ =false */)
dvander@486	179	{
dvander@486	180	bool exists = sm_trie_retrieve(m_pProps, prop, ptr);
dvander@486	181
dvander@486	182	if (exists && remove)
dvander@486	183	{
dvander@486	184	sm_trie_delete(m_pProps, prop);
dvander@486	185	}
dvander@486	186
dvander@486	187	return exists;
dvander@486	188	}
dvander@486	189
dvander@486	190	bool CPlugin::SetProperty(const char prop, void ptr)
dvander@486	191	{
dvander@486	192	return sm_trie_insert(m_pProps, prop, ptr);
dvander@486	193	}
dvander@486	194
dvander@2193	195	IPluginRuntime *CPlugin::GetRuntime()
dvander@209	196	{
dvander@2193	197	return m_pRuntime;
dvander@209	198	}
dvander@209	199
dvander@209	200	void CPlugin::SetErrorState(PluginStatus status, const char *error_fmt, ...)
dvander@209	201	{
dvander@605	202	PluginStatus old_status = m_status;
dvander@209	203	m_status = status;
dvander@209	204
dvander@605	205	if (old_status == Plugin_Running)
dvander@605	206	{
dvander@605	207	/* Tell everyone we're now paused */
dvander@605	208	g_PluginSys._SetPauseState(this, true);
dvander@605	209	}
dvander@605	210
dvander@209	211	va_list ap;
dvander@209	212	va_start(ap, error_fmt);
dvander@2814	213	UTIL_FormatArgs(m_errormsg, sizeof(m_errormsg), error_fmt, ap);
dvander@209	214	va_end(ap);
dvander@173	215
dvander@2193	216	if (m_pRuntime != NULL)
dvander@176	217	{
dvander@2193	218	m_pRuntime->SetPauseState(true);
dvander@176	219	}
dvander@176	220	}
dvander@176	221
dvander@2342	222	bool CPlugin::UpdateInfo()
dvander@173	223	{
dvander@173	224	/* Now grab the info */
dvander@173	225	uint32_t idx;
dvander@173	226	IPluginContext *base = GetBaseContext();
dvander@173	227	int err = base->FindPubvarByName("myinfo", &idx);
dvander@173	228
dvander@413	229	memset(&m_info, 0, sizeof(m_info));
dvander@413	230
dvander@173	231	if (err == SP_ERROR_NONE)
dvander@173	232	{
dvander@173	233	struct sm_plugininfo_c_t
dvander@173	234	{
dvander@173	235	cell_t name;
dvander@173	236	cell_t description;
dvander@173	237	cell_t author;
dvander@173	238	cell_t version;
dvander@173	239	cell_t url;
dvander@173	240	};
dvander@173	241	sm_plugininfo_c_t *cinfo;
dvander@173	242	cell_t local_addr;
dvander@173	243
dvander@173	244	base->GetPubvarAddrs(idx, &local_addr, (cell_t **)&cinfo);
dvander@173	245	base->LocalToString(cinfo->name, (char **)&m_info.name);
dvander@173	246	base->LocalToString(cinfo->description, (char **)&m_info.description);
dvander@173	247	base->LocalToString(cinfo->author, (char **)&m_info.author);
dvander@173	248	base->LocalToString(cinfo->url, (char **)&m_info.url);
dvander@173	249	base->LocalToString(cinfo->version, (char **)&m_info.version);
dvander@173	250	}
dvander@173	251
dvander@173	252	m_info.author = m_info.author ? m_info.author : "";
dvander@173	253	m_info.description = m_info.description ? m_info.description : "";
dvander@173	254	m_info.name = m_info.name ? m_info.name : "";
dvander@173	255	m_info.url = m_info.url ? m_info.url : "";
dvander@173	256	m_info.version = m_info.version ? m_info.version : "";
dvander@2105	257
dvander@2105	258	if ((err = base->FindPubvarByName("__version", &idx)) == SP_ERROR_NONE)
dvander@2105	259	{
dvander@2105	260	struct __version_info
dvander@2105	261	{
dvander@2105	262	cell_t version;
dvander@2105	263	cell_t filevers;
dvander@2105	264	cell_t date;
dvander@2105	265	cell_t time;
dvander@2105	266	};
dvander@2105	267	__version_info *info;
dvander@2105	268	cell_t local_addr;
dvander@2342	269	const char pDate, pTime, *pFileVers;
dvander@2105	270
dvander@2105	271	pDate = "";
dvander@2105	272	pTime = "";
dvander@2105	273
dvander@2105	274	base->GetPubvarAddrs(idx, &local_addr, (cell_t **)&info);
dvander@2105	275	m_FileVersion = info->version;
dvander@2636	276	if (m_FileVersion >= 4)
dvander@2105	277	{
dvander@2105	278	base->LocalToString(info->date, (char **)&pDate);
dvander@2105	279	base->LocalToString(info->time, (char **)&pTime);
dvander@2105	280	UTIL_Format(m_DateTime, sizeof(m_DateTime), "%s %s", pDate, pTime);
dvander@2105	281	}
dvander@2636	282	if (m_FileVersion > 5)
dvander@2342	283	{
dvander@2342	284	base->LocalToString(info->filevers, (char **)&pFileVers);
dvander@2342	285	SetErrorState(Plugin_Failed, "Newer SourceMod required (%s or higher)", pFileVers);
dvander@2342	286	return false;
dvander@2342	287	}
dvander@2105	288	}
dvander@2105	289	else
dvander@2105	290	{
dvander@2105	291	m_FileVersion = 0;
dvander@2105	292	}
dvander@2342	293
dvander@2342	294	if ((err = base->FindPubvarByName("MaxClients", &idx)) == SP_ERROR_NONE)
dvander@2342	295	{
dvander@2342	296	base->GetPubvarByIndex(idx, &m_MaxClientsVar);
dvander@2342	297	}
dvander@2342	298
dvander@2342	299	return true;
dvander@2342	300	}
dvander@2342	301
dvander@2342	302	void CPlugin::SyncMaxClients(int max_clients)
dvander@2342	303	{
dvander@2342	304	if (m_MaxClientsVar == NULL)
dvander@2342	305	{
dvander@2342	306	return;
dvander@2342	307	}
dvander@2342	308
dvander@2342	309	*m_MaxClientsVar->offs = max_clients;
dvander@173	310	}
dvander@173	311
ds@426	312	void CPlugin::Call_OnPluginStart()
dvander@211	313	{
dvander@211	314	if (m_status != Plugin_Loaded)
dvander@211	315	{
dvander@211	316	return;
dvander@211	317	}
dvander@211	318
dvander@211	319	m_status = Plugin_Running;
dvander@211	320
dvander@2342	321	SyncMaxClients(g_Players.MaxClients());
dvander@2342	322
dvander@211	323	cell_t result;
dvander@2193	324	IPluginFunction *pFunction = m_pRuntime->GetFunctionByName("OnPluginStart");
dvander@211	325	if (!pFunction)
dvander@211	326	{
dvander@211	327	return;
dvander@211	328	}
dvander@211	329
dvander@838	330	int err;
dvander@838	331	if ((err=pFunction->Execute(&result)) != SP_ERROR_NONE)
dvander@838	332	{
dvander@838	333	SetErrorState(Plugin_Error, "Error detected in plugin startup (see error logs)");
dvander@838	334	}
dvander@282	335	}
dvander@282	336
ds@426	337	void CPlugin::Call_OnPluginEnd()
dvander@282	338	{
faluco@736	339	if (m_status > Plugin_Paused)
dvander@211	340	{
dvander@282	341	return;
dvander@211	342	}
dvander@282	343
dvander@282	344	cell_t result;
dvander@2193	345	IPluginFunction *pFunction = m_pRuntime->GetFunctionByName("OnPluginEnd");
dvander@282	346	if (!pFunction)
dvander@282	347	{
dvander@282	348	return;
dvander@282	349	}
dvander@282	350
dvander@282	351	pFunction->Execute(&result);
dvander@211	352	}
dvander@211	353
faluco@1221	354	void CPlugin::Call_OnAllPluginsLoaded()
faluco@1221	355	{
faluco@1221	356	if (m_status > Plugin_Paused)
faluco@1221	357	{
faluco@1221	358	return;
faluco@1221	359	}
faluco@1221	360
dvander@1630	361	if (m_bGotAllLoaded)
dvander@1630	362	{
dvander@1630	363	return;
dvander@1630	364	}
dvander@1630	365
dvander@1630	366	m_bGotAllLoaded = true;
dvander@1630	367
faluco@1221	368	cell_t result;
dvander@2193	369	IPluginFunction *pFunction = m_pRuntime->GetFunctionByName("OnAllPluginsLoaded");
dvander@1631	370	if (pFunction != NULL)
faluco@1221	371	{
dvander@1631	372	pFunction->Execute(&result);
faluco@1221	373	}
faluco@1221	374
skamonkey@3401	375	if (g_SourceMod.IsMapRunning())
dvander@1630	376	{
dvander@2193	377	if ((pFunction = m_pRuntime->GetFunctionByName("OnMapStart")) != NULL)
dvander@1630	378	{
dvander@1630	379	pFunction->Execute(NULL);
dvander@1630	380	}
dvander@1630	381	}
dvander@1630	382
dvander@1630	383	if (SM_AreConfigsExecuted())
dvander@1630	384	{
dvander@1630	385	SM_ExecuteForPlugin(GetBaseContext());
dvander@1630	386	}
faluco@1221	387	}
faluco@1221	388
fyrenmoo@2675	389	APLRes CPlugin::Call_AskPluginLoad(char *error, size_t maxlength)
dvander@211	390	{
dvander@211	391	if (m_status != Plugin_Created)
dvander@211	392	{
fyrenmoo@2675	393	return APLRes_Failure;
dvander@211	394	}
dvander@211	395
faluco@216	396	m_status = Plugin_Loaded;
faluco@216	397
dvander@211	398	int err;
dvander@211	399	cell_t result;
fyrenmoo@2675	400	bool haveNewAPL = false;
fyrenmoo@2675	401	IPluginFunction *pFunction = m_pRuntime->GetFunctionByName("AskPluginLoad2");
dvander@211	402
fyrenmoo@2675	403	if (pFunction)
dvander@211	404	{
fyrenmoo@2675	405	haveNewAPL = true;
fyrenmoo@2675	406	}
fyrenmoo@2675	407	else if (!(pFunction = m_pRuntime->GetFunctionByName("AskPluginLoad")))
fyrenmoo@2675	408	{
fyrenmoo@2675	409	return APLRes_Success;
dvander@211	410	}
dvander@211	411
dvander@222	412	pFunction->PushCell(m_handle);
dvander@211	413	pFunction->PushCell(g_PluginSys.IsLateLoadTime() ? 1 : 0);
dvander@211	414	pFunction->PushStringEx(error, maxlength, 0, SM_PARAM_COPYBACK);
dvander@211	415	pFunction->PushCell(maxlength);
dvander@211	416	if ((err=pFunction->Execute(&result)) != SP_ERROR_NONE)
dvander@211	417	{
fyrenmoo@2675	418	return APLRes_Failure;
dvander@211	419	}
dvander@211	420
fyrenmoo@2675	421	if (haveNewAPL)
fyrenmoo@2675	422	{
fyrenmoo@2675	423	return (APLRes)result;
fyrenmoo@2675	424	}
fyrenmoo@2675	425	else if (result)
dvander@211	426	{
fyrenmoo@2675	427	return APLRes_Success;
dvander@211	428	}
fyrenmoo@2675	429	else
fyrenmoo@2675	430	{
fyrenmoo@2675	431	return APLRes_Failure;
fyrenmoo@2675	432	}
dvander@211	433	}
dvander@211	434
dvander@2193	435	void *CPlugin::GetPluginStructure()
dvander@173	436	{
dvander@2193	437	return NULL;
dvander@173	438	}
dvander@173	439
dvander@615	440	IPluginContext *CPlugin::GetBaseContext()
dvander@173	441	{
dvander@2193	442	if (m_pRuntime == NULL)
dvander@2193	443	{
dvander@2193	444	return NULL;
dvander@2193	445	}
dvander@2193	446
dvander@2193	447	return m_pRuntime->GetDefaultContext();
dvander@173	448	}
dvander@173	449
dvander@615	450	sp_context_t *CPlugin::GetContext()
dvander@173	451	{
dvander@2193	452	return NULL;
dvander@173	453	}
dvander@173	454
dvander@615	455	const char *CPlugin::GetFilename()
dvander@173	456	{
dvander@173	457	return m_filename;
dvander@173	458	}
dvander@173	459
dvander@615	460	PluginType CPlugin::GetType()
dvander@173	461	{
dvander@174	462	return m_type;
dvander@173	463	}
dvander@173	464
dvander@615	465	const sm_plugininfo_t *CPlugin::GetPublicInfo()
dvander@173	466	{
dvander@2342	467	if (GetStatus() >= Plugin_Created)
dvander@2342	468	{
dvander@2342	469	return NULL;
dvander@2342	470	}
dvander@173	471	return &m_info;
dvander@173	472	}
dvander@173	473
dvander@615	474	unsigned int CPlugin::GetSerial()
dvander@173	475	{
dvander@173	476	return m_serial;
dvander@173	477	}
dvander@173	478
dvander@615	479	PluginStatus CPlugin::GetStatus()
dvander@173	480	{
dvander@173	481	return m_status;
dvander@173	482	}
dvander@173	483
fyrenmoo@2675	484	bool CPlugin::IsSilentlyFailed()
fyrenmoo@2675	485	{
fyrenmoo@2675	486	return m_bSilentlyFailed;
fyrenmoo@2675	487	}
fyrenmoo@2675	488
dvander@615	489	bool CPlugin::IsDebugging()
dvander@173	490	{
dvander@2193	491	if (m_pRuntime == NULL)
dvander@209	492	{
dvander@209	493	return false;
dvander@209	494	}
dvander@209	495
dvander@2226	496	return true;
dvander@173	497	}
dvander@173	498
fyrenmoo@2675	499	void CPlugin::SetSilentlyFailed(bool sf)
fyrenmoo@2675	500	{
fyrenmoo@2675	501	m_bSilentlyFailed = sf;
fyrenmoo@2675	502	}
fyrenmoo@2675	503
dvander@1124	504	void CPlugin::LibraryActions(bool dropping)
dvander@1124	505	{
dvander@1124	506	List<String>::iterator iter;
dvander@1124	507	for (iter = m_Libraries.begin();
dvander@1124	508	iter != m_Libraries.end();
dvander@1124	509	iter++)
dvander@1124	510	{
dvander@1572	511	g_PluginSys.OnLibraryAction((*iter).c_str(), true, dropping);
dvander@1124	512	}
dvander@1124	513	}
dvander@1124	514
dvander@173	515	bool CPlugin::SetPauseState(bool paused)
dvander@173	516	{
dvander@1124	517	if (paused && GetStatus() != Plugin_Running)
dvander@173	518	{
dvander@173	519	return false;
dvander@1124	520	} else if (!paused && GetStatus() != Plugin_Paused) {
dvander@173	521	return false;
dvander@173	522	}
dvander@282	523
dvander@1124	524	if (paused)
dvander@1124	525	{
dvander@1124	526	LibraryActions(true);
dvander@1124	527	}
dvander@1124	528
dvander@2193	529	IPluginFunction *pFunction = m_pRuntime->GetFunctionByName("OnPluginPauseChange");
dvander@282	530	if (pFunction)
dvander@282	531	{
dvander@282	532	cell_t result;
dvander@282	533	pFunction->PushCell(paused ? 1 : 0);
dvander@282	534	pFunction->Execute(&result);
dvander@282	535	}
dvander@173	536
dvander@525	537	if (paused)
dvander@525	538	{
dvander@525	539	m_status = Plugin_Paused;
dvander@2193	540	m_pRuntime->SetPauseState(true);
dvander@525	541	} else {
dvander@525	542	m_status = Plugin_Running;
dvander@2193	543	m_pRuntime->SetPauseState(false);
dvander@525	544	}
dvander@525	545
faluco@430	546	g_PluginSys._SetPauseState(this, paused);
faluco@430	547
dvander@1124	548	if (!paused)
dvander@1124	549	{
dvander@1124	550	LibraryActions(false);
dvander@1124	551	}
dvander@1124	552
dvander@173	553	return true;
dvander@173	554	}
dvander@174	555
dvander@615	556	IdentityToken_t *CPlugin::GetIdentity()
dvander@220	557	{
dvander@229	558	return m_ident;
dvander@220	559	}
dvander@220	560
dvander@615	561	bool CPlugin::IsRunnable()
faluco@290	562	{
faluco@290	563	return (m_status <= Plugin_Paused) ? true : false;
faluco@290	564	}
faluco@290	565
faluco@333	566	time_t CPlugin::GetFileTimeStamp()
faluco@333	567	{
ds@652	568	char path[PLATFORM_MAX_PATH];
faluco@333	569	g_SourceMod.BuildPath(Path_SM, path, sizeof(path), "plugins/%s", m_filename);
faluco@333	570	#ifdef PLATFORM_WINDOWS
faluco@333	571	struct _stat s;
faluco@333	572	if (_stat(path, &s) != 0)
dvander@351	573	#elif defined PLATFORM_POSIX
faluco@333	574	struct stat s;
faluco@333	575	if (stat(path, &s) != 0)
faluco@333	576	#endif
faluco@333	577	{
faluco@333	578	return 0;
dvander@1630	579	}
dvander@1630	580	else
dvander@1630	581	{
faluco@333	582	return s.st_mtime;
faluco@333	583	}
faluco@333	584	}
faluco@333	585
dvander@615	586	time_t CPlugin::GetTimeStamp()
faluco@333	587	{
faluco@333	588	return m_LastAccess;
faluco@333	589	}
faluco@333	590
faluco@333	591	void CPlugin::SetTimeStamp(time_t t)
faluco@333	592	{
faluco@333	593	m_LastAccess = t;
faluco@333	594	}
faluco@333	595
dvander@2042	596	IPhraseCollection *CPlugin::GetPhrases()
faluco@389	597	{
dvander@2042	598	return m_pPhrases;
faluco@389	599	}
faluco@389	600
dvander@605	601	void CPlugin::DependencyDropped(CPlugin *pOwner)
dvander@605	602	{
dvander@2193	603	if (!m_pRuntime)
dvander@605	604	{
dvander@605	605	return;
dvander@605	606	}
dvander@605	607
faluco@1112	608	List<String>::iterator reqlib_iter;
faluco@1112	609	List<String>::iterator lib_iter;
faluco@1112	610	for (lib_iter=pOwner->m_Libraries.begin(); lib_iter!=pOwner->m_Libraries.end(); lib_iter++)
faluco@1112	611	{
faluco@1112	612	for (reqlib_iter=m_RequiredLibs.begin(); reqlib_iter!=m_RequiredLibs.end(); reqlib_iter++)
faluco@1112	613	{
faluco@1112	614	if ((reqlib_iter) == (lib_iter))
faluco@1112	615	{
faluco@1112	616	m_LibraryMissing = true;
faluco@1112	617	}
faluco@1112	618	}
faluco@1112	619	}
faluco@1112	620
dvander@2086	621	List<NativeEntry *>::iterator iter;
dvander@2086	622	NativeEntry *pNative;
dvander@605	623	sp_native_t *native;
dvander@605	624	uint32_t idx;
dvander@605	625	unsigned int unbound = 0;
dvander@605	626
dvander@2086	627	for (iter = pOwner->m_Natives.begin();
dvander@2086	628	iter != pOwner->m_Natives.end();
dvander@605	629	iter++)
dvander@605	630	{
dvander@605	631	pNative = (*iter);
dvander@605	632	/* Find this native! */
dvander@2193	633	if (m_pRuntime->FindNativeByName(pNative->name, &idx) != SP_ERROR_NONE)
dvander@605	634	{
dvander@605	635	continue;
dvander@605	636	}
dvander@605	637	/* Unbind it */
dvander@2193	638	m_pRuntime->GetNativeByIndex(idx, &native);
dvander@605	639	native->pfn = NULL;
dvander@605	640	native->status = SP_NATIVE_UNBOUND;
dvander@605	641	unbound++;
dvander@605	642	}
dvander@605	643
dvander@605	644	if (unbound)
dvander@605	645	{
dvander@605	646	m_FakeNativesMissing = true;
faluco@1112	647	}
faluco@1112	648
faluco@1112	649	/* :IDEA: in the future, add native trapping? */
faluco@1112	650	if (m_FakeNativesMissing \|\| m_LibraryMissing)
faluco@1112	651	{
dvander@605	652	SetErrorState(Plugin_Error, "Depends on plugin: %s", pOwner->GetFilename());
dvander@605	653	}
dvander@605	654	}
dvander@605	655
dvander@978	656	unsigned int CPlugin::GetConfigCount()
dvander@978	657	{
dvander@978	658	return (unsigned int)m_configs.size();
dvander@978	659	}
dvander@978	660
dvander@978	661	AutoConfig *CPlugin::GetConfig(unsigned int i)
dvander@978	662	{
dvander@978	663	if (i >= GetConfigCount())
dvander@978	664	{
dvander@978	665	return NULL;
dvander@978	666	}
dvander@978	667
dvander@978	668	return m_configs[i];
dvander@978	669	}
dvander@978	670
dvander@978	671	void CPlugin::AddConfig(bool autoCreate, const char cfg, const char folder)
dvander@978	672	{
dvander@1846	673	/* Do a check for duplicates to prevent double-execution */
dvander@1846	674	for (size_t i = 0; i < m_configs.size(); i++)
dvander@1846	675	{
dvander@1846	676	if (m_configs[i]->autocfg.compare(cfg) == 0
dvander@1846	677	&& m_configs[i]->folder.compare(folder) == 0
dvander@1846	678	&& m_configs[i]->create == autoCreate)
dvander@1846	679	{
dvander@1846	680	return;
dvander@1846	681	}
dvander@1846	682	}
dvander@1846	683
dvander@978	684	AutoConfig *c = new AutoConfig;
dvander@978	685
dvander@978	686	c->autocfg = cfg;
dvander@978	687	c->folder = folder;
dvander@978	688	c->create = autoCreate;
dvander@978	689
dvander@978	690	m_configs.push_back(c);
dvander@978	691	}
dvander@978	692
dvander@2086	693	void CPlugin::DropEverything()
dvander@2086	694	{
dvander@2086	695	CPlugin *pOther;
dvander@2086	696	List<CPlugin *>::iterator iter;
dvander@2086	697	List<WeakNative>::iterator wk_iter;
dvander@2086	698
dvander@2086	699	/* Tell everyone that depends on us that we're about to drop */
dvander@2086	700	for (iter = m_Dependents.begin();
dvander@2086	701	iter != m_Dependents.end();
dvander@2086	702	iter++)
dvander@2086	703	{
dvander@2086	704	pOther = (*iter);
dvander@2086	705	pOther->DependencyDropped(this);
dvander@2086	706	}
dvander@2086	707
dvander@2086	708	/* Note: we don't care about things we depend on.
dvander@2086	709	* The reason is that extensions have their own cleanup
dvander@2086	710	* code for plugins. Although the "right" design would be
dvander@2086	711	* to centralize that here, i'm omitting it for now. Thus,
dvander@2086	712	* the code below to walk the plugins list will suffice.
dvander@2086	713	*/
dvander@2086	714
dvander@2086	715	/* Other plugins could be holding weak references that were
dvander@2086	716	* added by us. We need to clean all of those up now.
dvander@2086	717	*/
dvander@2086	718	for (iter = g_PluginSys.m_plugins.begin();
dvander@2086	719	iter != g_PluginSys.m_plugins.end();
dvander@2086	720	iter++)
dvander@2086	721	{
dvander@2086	722	(*iter)->DropRefsTo(this);
dvander@2086	723	}
dvander@2086	724
dvander@2086	725	/* Proceed with the rest of the necessities. */
dvander@2086	726	CNativeOwner::DropEverything();
dvander@2086	727	}
dvander@2086	728
dvander@2086	729	bool CPlugin::AddFakeNative(IPluginFunction pFunc, const char name, SPVM_FAKENATIVE_FUNC func)
dvander@2086	730	{
dvander@2086	731	NativeEntry *pEntry;
dvander@2086	732
dvander@2086	733	if ((pEntry = g_ShareSys.AddFakeNative(pFunc, name, func)) == NULL)
dvander@2086	734	{
dvander@2086	735	return false;
dvander@2086	736	}
dvander@2086	737
dvander@2086	738	m_Natives.push_back(pEntry);
dvander@2086	739
dvander@2086	740	return true;
dvander@2086	741	}
dvander@2086	742
dvander@174	743	/*******************
dvander@174	744	* PLUGIN ITERATOR *
dvander@174	745	*******************/
dvander@190	746
dvander@213	747	CPluginManager::CPluginIterator::CPluginIterator(List<CPlugin > _mylist)
dvander@174	748	{
dvander@174	749	mylist = _mylist;
faluco@216	750	Reset();
dvander@174	751	}
dvander@174	752
dvander@174	753	IPlugin *CPluginManager::CPluginIterator::GetPlugin()
dvander@174	754	{
dvander@174	755	return (*current);
dvander@174	756	}
dvander@174	757
dvander@174	758	bool CPluginManager::CPluginIterator::MorePlugins()
dvander@174	759	{
dvander@174	760	return (current != mylist->end());
dvander@174	761	}
dvander@174	762
dvander@174	763	void CPluginManager::CPluginIterator::NextPlugin()
dvander@174	764	{
dvander@174	765	current++;
dvander@174	766	}
dvander@174	767
dvander@174	768	void CPluginManager::CPluginIterator::Release()
dvander@174	769	{
dvander@211	770	g_PluginSys.ReleaseIterator(this);
dvander@174	771	}
dvander@174	772
dvander@174	773	CPluginManager::CPluginIterator::~CPluginIterator()
dvander@174	774	{
dvander@174	775	}
dvander@174	776
dvander@174	777	void CPluginManager::CPluginIterator::Reset()
dvander@174	778	{
dvander@174	779	current = mylist->begin();
dvander@174	780	}
dvander@174	781
dvander@174	782	/******************
dvander@174	783	* PLUGIN MANAGER *
dvander@174	784	******************/
dvander@174	785
dvander@211	786	CPluginManager::CPluginManager()
dvander@211	787	{
dvander@211	788	m_LoadLookup = sm_trie_create();
dvander@211	789	m_AllPluginsLoaded = false;
dvander@229	790	m_MyIdent = NULL;
dvander@1630	791	m_LoadingLocked = false;
dvander@211	792	}
dvander@211	793
dvander@211	794	CPluginManager::~CPluginManager()
dvander@211	795	{
dvander@282	796	/* :NOTICE:
dvander@282	797	* Ignore the fact that there might be plugins in the cache.
dvander@282	798	* This usually means that Core is not being unloaded properly, and everything
dvander@282	799	* will crash anyway. YAY
dvander@282	800	*/
dvander@211	801	sm_trie_destroy(m_LoadLookup);
faluco@641	802
faluco@641	803	CStack<CPluginManager::CPluginIterator *>::iterator iter;
faluco@641	804	for (iter=m_iters.begin(); iter!=m_iters.end(); iter++)
faluco@641	805	{
faluco@641	806	delete (*iter);
faluco@641	807	}
faluco@641	808	m_iters.popall();
dvander@211	809	}
dvander@211	810
dvander@1018	811	void CPluginManager::Shutdown()
dvander@1018	812	{
dvander@1018	813	List<CPlugin *>::iterator iter;
dvander@1018	814
dvander@1018	815	while ((iter = m_plugins.begin()) != m_plugins.end())
dvander@1018	816	{
dvander@1018	817	UnloadPlugin(*iter);
dvander@1018	818	}
dvander@1018	819	}
dvander@1018	820
dvander@213	821	void CPluginManager::LoadAll_FirstPass(const char config, const char basedir)
dvander@190	822	{
dvander@203	823	/* First read in the database of plugin settings */
dvander@1656	824	SMCError err;
dvander@1656	825	SMCStates states;
faluco@216	826	m_AllPluginsLoaded = false;
dvander@1656	827	if ((err=textparsers->ParseFile_SMC(config, &m_PluginInfo, &states)) != SMCError_Okay)
dvander@203	828	{
dvander@305	829	g_Logger.LogError("[SM] Encountered fatal error parsing file \"%s\"", config);
dvander@1406	830	const char *err_msg = textparsers->GetSMCErrorString(err);
dvander@282	831	if (err_msg)
dvander@282	832	{
dvander@305	833	g_Logger.LogError("[SM] Parse error encountered: \"%s\"", err_msg);
dvander@282	834	}
dvander@203	835	}
dvander@203	836
dvander@209	837	LoadPluginsFromDir(basedir, NULL);
dvander@209	838	}
dvander@203	839
dvander@209	840	void CPluginManager::LoadPluginsFromDir(const char basedir, const char localpath)
dvander@209	841	{
ds@652	842	char base_path[PLATFORM_MAX_PATH];
dvander@209	843
dvander@209	844	/* Form the current path to start reading from */
dvander@209	845	if (localpath == NULL)
dvander@209	846	{
dvander@209	847	g_LibSys.PathFormat(base_path, sizeof(base_path), "%s", basedir);
dvander@209	848	} else {
dvander@209	849	g_LibSys.PathFormat(base_path, sizeof(base_path), "%s/%s", basedir, localpath);
dvander@209	850	}
dvander@209	851
dvander@209	852	IDirectory *dir = g_LibSys.OpenDirectory(base_path);
dvander@209	853
dvander@209	854	if (!dir)
dvander@209	855	{
dvander@282	856	char error[256];
dvander@282	857	g_LibSys.GetPlatformError(error, sizeof(error));
dvander@305	858	g_Logger.LogError("[SM] Failure reading from plugins path: %s", localpath);
dvander@305	859	g_Logger.LogError("[SM] Platform returned error: %s", error);
dvander@209	860	return;
dvander@209	861	}
dvander@209	862
dvander@190	863	while (dir->MoreFiles())
dvander@190	864	{
dvander@209	865	if (dir->IsEntryDirectory()
dvander@209	866	&& (strcmp(dir->GetEntryName(), ".") != 0)
dvander@209	867	&& (strcmp(dir->GetEntryName(), "..") != 0)
dvander@209	868	&& (strcmp(dir->GetEntryName(), "disabled") != 0)
dvander@209	869	&& (strcmp(dir->GetEntryName(), "optional") != 0))
dvander@190	870	{
ds@652	871	char new_local[PLATFORM_MAX_PATH];
dvander@209	872	if (localpath == NULL)
dvander@209	873	{
dvander@209	874	/* If no path yet, don't add a former slash */
dvander@2814	875	UTIL_Format(new_local, sizeof(new_local), "%s", dir->GetEntryName());
dvander@209	876	} else {
dvander@209	877	g_LibSys.PathFormat(new_local, sizeof(new_local), "%s/%s", localpath, dir->GetEntryName());
dvander@209	878	}
dvander@209	879	LoadPluginsFromDir(basedir, new_local);
dvander@209	880	} else if (dir->IsEntryFile()) {
dvander@209	881	const char *name = dir->GetEntryName();
dvander@209	882	size_t len = strlen(name);
dvander@211	883	if (len >= 4
dvander@211	884	&& strcmp(&name[len-4], ".smx") == 0)
dvander@209	885	{
dvander@211	886	/* If the filename matches, load the plugin */
ds@652	887	char plugin[PLATFORM_MAX_PATH];
dvander@211	888	if (localpath == NULL)
dvander@211	889	{
dvander@2814	890	UTIL_Format(plugin, sizeof(plugin), "%s", name);
dvander@211	891	} else {
dvander@211	892	g_LibSys.PathFormat(plugin, sizeof(plugin), "%s/%s", localpath, name);
dvander@211	893	}
dvander@211	894	LoadAutoPlugin(plugin);
dvander@209	895	}
dvander@209	896	}
dvander@209	897	dir->NextEntry();
dvander@209	898	}
dvander@209	899	g_LibSys.CloseDirectory(dir);
dvander@209	900	}
dvander@209	901
ds@755	902	LoadRes CPluginManager::_LoadPlugin(CPlugin *_plugin, const char path, bool debug, PluginType type, char error[], size_t maxlength)
dvander@209	903	{
dvander@1630	904	if (m_LoadingLocked)
dvander@1630	905	{
dvander@1630	906	return LoadRes_NeverLoad;
dvander@1630	907	}
dvander@1630	908
dvander@2193	909	int err;
dvander@1436	910	bool no_load = false;
dvander@1436	911	PluginSettings *pset;
dvander@1436	912	unsigned int setcount = m_PluginInfo.GetSettingsNum();
dvander@1436	913	for (unsigned int i=0; i<setcount; i++)
dvander@1436	914	{
dvander@1436	915	if ((pset = m_PluginInfo.GetSettingsIfMatch(i, path)) == NULL)
dvander@1436	916	{
dvander@1436	917	continue;
dvander@1436	918	}
dvander@1436	919	if (pset->blockload_val)
dvander@1436	920	{
dvander@1436	921	no_load = true;
dvander@1436	922	break;
dvander@1436	923	}
dvander@1436	924	}
dvander@1436	925
dvander@211	926	/**
dvander@211	927	* Does this plugin already exist?
dvander@211	928	*/
dvander@211	929	CPlugin *pPlugin;
dvander@298	930	if (sm_trie_retrieve(m_LoadLookup, path, (void **)&pPlugin))
dvander@211	931	{
dvander@211	932	/* Check to see if we should try reloading it */
dvander@211	933	if (pPlugin->GetStatus() == Plugin_BadLoad
dvander@282	934	\|\| pPlugin->GetStatus() == Plugin_Error
dvander@1436	935	\|\| pPlugin->GetStatus() == Plugin_Failed
dvander@1436	936	\|\| no_load)
dvander@211	937	{
dvander@211	938	UnloadPlugin(pPlugin);
dvander@1630	939	}
dvander@1630	940	else
dvander@1630	941	{
faluco@383	942	if (_plugin)
faluco@383	943	{
faluco@383	944	*_plugin = pPlugin;
faluco@383	945	}
faluco@383	946	return LoadRes_AlreadyLoaded;
dvander@211	947	}
dvander@211	948	}
dvander@211	949
dvander@1436	950	if (no_load)
dvander@1436	951	{
dvander@1436	952	return LoadRes_NeverLoad;
dvander@1436	953	}
dvander@1436	954
ds@755	955	pPlugin = CPlugin::CreatePlugin(path, error, maxlength);
dvander@209	956
dvander@209	957	assert(pPlugin != NULL);
dvander@209	958
dvander@209	959	pPlugin->m_type = PluginType_MapUpdated;
dvander@209	960
dvander@209	961	ICompilation *co = NULL;
dvander@209	962
dvander@209	963	if (pPlugin->m_status == Plugin_Uncompiled)
dvander@209	964	{
dvander@2193	965	co = g_pSourcePawn2->StartCompilation();
dvander@209	966	}
dvander@209	967
dvander@209	968	for (unsigned int i=0; i<setcount; i++)
dvander@209	969	{
dvander@298	970	if ((pset=m_PluginInfo.GetSettingsIfMatch(i, path)) == NULL)
dvander@209	971	{
dvander@209	972	continue;
dvander@209	973	}
dvander@209	974	pPlugin->m_type = pset->type_val;
dvander@209	975	if (co)
dvander@209	976	{
dvander@209	977	for (unsigned int j=0; j<pset->opts_num; j++)
dvander@209	978	{
dvander@209	979	const char key, val;
dvander@209	980	m_PluginInfo.GetOptionsForPlugin(pset, j, &key, &val);
dvander@209	981	if (!key \|\| !val)
dvander@209	982	{
dvander@209	983	continue;
dvander@209	984	}
dvander@2193	985	if ((err = co->SetOption(key, val)) == SP_ERROR_NONE)
dvander@209	986	{
dvander@298	987	if (error)
dvander@298	988	{
dvander@2814	989	UTIL_Format(error, maxlength, "Unable to set JIT option (key \"%s\") (value \"%s\")", key, val);
dvander@298	990	}
dvander@2193	991	co->Abort();
dvander@209	992	co = NULL;
dvander@209	993	break;
dvander@209	994	}
dvander@209	995	}
dvander@190	996	}
dvander@190	997	}
dvander@209	998
dvander@298	999	/* Do the actual compiling */
dvander@2193	1000	if (co != NULL)
dvander@209	1001	{
dvander@2193	1002	char fullpath[PLATFORM_MAX_PATH];
dvander@2193	1003	g_SourceMod.BuildPath(Path_SM, fullpath, sizeof(fullpath), "plugins/%s", pPlugin->m_filename);
dvander@2193	1004
dvander@2193	1005	pPlugin->m_pRuntime = g_pSourcePawn2->LoadPlugin(co, fullpath, &err);
dvander@2193	1006	if (pPlugin->m_pRuntime == NULL)
dvander@2193	1007	{
asherkin@3509	1008	if (error)
asherkin@3509	1009	{
asherkin@3509	1010	UTIL_Format(error,
asherkin@3509	1011	maxlength,
asherkin@3509	1012	"Unable to load plugin (error %d: %s)",
asherkin@3509	1013	err,
asherkin@3509	1014	g_pSourcePawn2->GetErrorString(err));
asherkin@3509	1015	}
dvander@2342	1016	pPlugin->m_status = Plugin_BadLoad;
dvander@2193	1017	}
dvander@2193	1018	else
dvander@2193	1019	{
dvander@2342	1020	if (pPlugin->UpdateInfo())
dvander@2342	1021	{
dvander@2342	1022	pPlugin->m_status = Plugin_Created;
dvander@2342	1023	}
dvander@2342	1024	else
dvander@2342	1025	{
asherkin@3509	1026	if (error)
asherkin@3509	1027	{
asherkin@3509	1028	UTIL_Format(error, maxlength, "%s", pPlugin->m_errormsg);
asherkin@3509	1029	}
dvander@2342	1030	}
dvander@2193	1031	}
dvander@209	1032	}
dvander@209	1033
fyrenmoo@2675	1034	LoadRes loadFailure = LoadRes_Failure;
dvander@298	1035	/* Get the status */
dvander@211	1036	if (pPlugin->GetStatus() == Plugin_Created)
dvander@211	1037	{
dvander@2086	1038	/* First native pass - add anything from Core */
dvander@2086	1039	g_ShareSys.BindNativesToPlugin(pPlugin, true);
dvander@229	1040	pPlugin->InitIdentity();
fyrenmoo@2675	1041	APLRes result = pPlugin->Call_AskPluginLoad(error, maxlength);
fyrenmoo@2675	1042	switch (result)
dvander@315	1043	{
fyrenmoo@2675	1044	case APLRes_Success:
dvander@315	1045	/* Autoload any modules */
ds@755	1046	LoadOrRequireExtensions(pPlugin, 1, error, maxlength);
fyrenmoo@2675	1047	break;
fyrenmoo@2675	1048	case APLRes_Failure:
teame06@1200	1049	pPlugin->SetErrorState(Plugin_Failed, "%s", error);
fyrenmoo@2675	1050	loadFailure = LoadRes_Failure;
fyrenmoo@2675	1051	break;
fyrenmoo@2675	1052	case APLRes_SilentFailure:
fyrenmoo@2675	1053	pPlugin->SetErrorState(Plugin_Failed, "%s", error);
fyrenmoo@2675	1054	loadFailure = LoadRes_SilentFailure;
fyrenmoo@2675	1055	pPlugin->SetSilentlyFailed(true);
fyrenmoo@2675	1056	break;
fyrenmoo@2675	1057	default:
fyrenmoo@2675	1058	assert(false);
dvander@315	1059	}
dvander@211	1060	}
dvander@211	1061
faluco@333	1062	/* Save the time stamp */
faluco@333	1063	time_t t = pPlugin->GetFileTimeStamp();
faluco@333	1064	pPlugin->SetTimeStamp(t);
faluco@333	1065
dvander@298	1066	if (_plugin)
dvander@298	1067	{
dvander@298	1068	*_plugin = pPlugin;
dvander@298	1069	}
dvander@298	1070
fyrenmoo@2675	1071	return (pPlugin->GetStatus() == Plugin_Loaded) ? LoadRes_Successful : loadFailure;
dvander@190	1072	}
dvander@190	1073
ds@755	1074	IPlugin CPluginManager::LoadPlugin(const char path, bool debug, PluginType type, char error[], size_t maxlength, bool *wasloaded)
dvander@174	1075	{
dvander@298	1076	CPlugin *pl;
faluco@383	1077	LoadRes res;
dvander@211	1078
faluco@383	1079	*wasloaded = false;
dvander@2226	1080	if ((res=_LoadPlugin(&pl, path, true, type, error, maxlength)) == LoadRes_Failure)
dvander@211	1081	{
dvander@298	1082	delete pl;
dvander@174	1083	return NULL;
dvander@174	1084	}
dvander@174	1085
faluco@383	1086	if (res == LoadRes_AlreadyLoaded)
faluco@383	1087	{
faluco@383	1088	*wasloaded = true;
faluco@383	1089	return pl;
faluco@383	1090	}
faluco@383	1091
dvander@1436	1092	if (res == LoadRes_NeverLoad)
dvander@1436	1093	{
dvander@2814	1094	if (error)
dvander@1630	1095	{
dvander@2814	1096	if (m_LoadingLocked)
dvander@2814	1097	{
dvander@2814	1098	UTIL_Format(error, maxlength, "There is a global plugin loading lock in effect");
dvander@2814	1099	}
dvander@2814	1100	else
dvander@2814	1101	{
dvander@2814	1102	UTIL_Format(error, maxlength, "This plugin is blocked from loading (see plugin_settings.cfg)");
dvander@2814	1103	}
dvander@1630	1104	}
dvander@1436	1105	return NULL;
dvander@1436	1106	}
dvander@1436	1107
dvander@298	1108	AddPlugin(pl);
dvander@298	1109
dvander@315	1110	/* Run second pass if we need to */
dvander@315	1111	if (IsLateLoadTime() && pl->GetStatus() == Plugin_Loaded)
dvander@315	1112	{
ds@755	1113	if (!RunSecondPass(pl, error, maxlength))
dvander@315	1114	{
dvander@315	1115	UnloadPlugin(pl);
dvander@315	1116	return NULL;
dvander@315	1117	}
faluco@1221	1118	pl->Call_OnAllPluginsLoaded();
dvander@315	1119	}
dvander@315	1120
dvander@298	1121	return pl;
dvander@298	1122	}
dvander@298	1123
dvander@298	1124	void CPluginManager::LoadAutoPlugin(const char *plugin)
dvander@298	1125	{
dvander@1436	1126	CPlugin *pl = NULL;
faluco@383	1127	LoadRes res;
dvander@298	1128	char error[255] = "Unknown error";
dvander@298	1129
faluco@383	1130	if ((res=_LoadPlugin(&pl, plugin, false, PluginType_MapUpdated, error, sizeof(error))) == LoadRes_Failure)
dvander@209	1131	{
dvander@305	1132	g_Logger.LogError("[SM] Failed to load plugin \"%s\": %s", plugin, error);
dvander@2342	1133	pl->SetErrorState(
dvander@2885	1134	pl->GetStatus() <= Plugin_Created ? Plugin_BadLoad : pl->GetStatus(),
dvander@2342	1135	"%s",
dvander@2342	1136	error);
dvander@209	1137	}
dvander@209	1138
fyrenmoo@2675	1139	if (res == LoadRes_Successful \|\| res == LoadRes_Failure \|\| res == LoadRes_SilentFailure)
faluco@383	1140	{
faluco@383	1141	AddPlugin(pl);
faluco@383	1142	}
dvander@209	1143	}
dvander@209	1144
dvander@211	1145	void CPluginManager::AddPlugin(CPlugin *pPlugin)
dvander@209	1146	{
dvander@174	1147	List<IPluginsListener *>::iterator iter;
dvander@174	1148	IPluginsListener *pListener;
dvander@298	1149
dvander@174	1150	for (iter=m_listeners.begin(); iter!=m_listeners.end(); iter++)
dvander@174	1151	{
dvander@174	1152	pListener = (*iter);
dvander@174	1153	pListener->OnPluginCreated(pPlugin);
dvander@174	1154	}
dvander@174	1155
dvander@298	1156	m_plugins.push_back(pPlugin);
dvander@298	1157	sm_trie_insert(m_LoadLookup, pPlugin->m_filename, pPlugin);
dvander@211	1158	}
dvander@211	1159
dvander@213	1160	void CPluginManager::LoadAll_SecondPass()
dvander@213	1161	{
dvander@213	1162	List<CPlugin *>::iterator iter;
dvander@213	1163	CPlugin *pPlugin;
dvander@213	1164
dvander@315	1165	char error[256];
dvander@213	1166	for (iter=m_plugins.begin(); iter!=m_plugins.end(); iter++)
dvander@213	1167	{
dvander@213	1168	pPlugin = (*iter);
dvander@213	1169	if (pPlugin->GetStatus() == Plugin_Loaded)
dvander@213	1170	{
dvander@315	1171	error[0] = '\0';
dvander@315	1172	if (!RunSecondPass(pPlugin, error, sizeof(error)))
dvander@315	1173	{
dvander@315	1174	g_Logger.LogError("[SM] Unable to load plugin \"%s\": %s", pPlugin->GetFilename(), error);
dvander@315	1175	pPlugin->SetErrorState(Plugin_Failed, "%s", error);
dvander@315	1176	}
dvander@213	1177	}
dvander@213	1178	}
dvander@298	1179
faluco@216	1180	m_AllPluginsLoaded = true;
dvander@213	1181	}
dvander@213	1182
faluco@1112	1183	bool CPluginManager::FindOrRequirePluginDeps(CPlugin pPlugin, char error, size_t maxlength)
faluco@1112	1184	{
faluco@1112	1185	struct _pl
faluco@1112	1186	{
faluco@1112	1187	cell_t name;
faluco@1112	1188	cell_t file;
faluco@1112	1189	cell_t required;
faluco@1112	1190	} *pl;
faluco@1112	1191
faluco@1112	1192	IPluginContext *pBase = pPlugin->GetBaseContext();
faluco@1112	1193	uint32_t num = pBase->GetPubVarsNum();
faluco@1112	1194	sp_pubvar_t *pubvar;
faluco@1112	1195	char name, file;
faluco@1112	1196	char pathfile[PLATFORM_MAX_PATH];
faluco@1112	1197
faluco@1112	1198	for (uint32_t i=0; i<num; i++)
faluco@1112	1199	{
faluco@1112	1200	if (pBase->GetPubvarByIndex(i, &pubvar) != SP_ERROR_NONE)
faluco@1112	1201	{
faluco@1112	1202	continue;
faluco@1112	1203	}
faluco@1112	1204	if (strncmp(pubvar->name, "__pl_", 5) == 0)
faluco@1112	1205	{
faluco@1112	1206	pl = (_pl *)pubvar->offs;
faluco@1112	1207	if (pBase->LocalToString(pl->file, &file) != SP_ERROR_NONE)
faluco@1112	1208	{
faluco@1112	1209	continue;
faluco@1112	1210	}
faluco@1112	1211	if (pBase->LocalToString(pl->name, &name) != SP_ERROR_NONE)
faluco@1112	1212	{
faluco@1112	1213	continue;
faluco@1112	1214	}
faluco@1112	1215	g_LibSys.GetFileFromPath(pathfile, sizeof(pathfile), pPlugin->GetFilename());
faluco@1112	1216	if (strcmp(pathfile, file) == 0)
faluco@1112	1217	{
faluco@1112	1218	continue;
faluco@1112	1219	}
faluco@1112	1220	if (pl->required == false)
faluco@1112	1221	{
faluco@1112	1222	IPluginFunction *pFunc;
faluco@1112	1223	char buffer[64];
dvander@1123	1224	UTIL_Format(buffer, sizeof(buffer), "__pl_%s_SetNTVOptional", &pubvar->name[5]);
faluco@1112	1225	if ((pFunc=pBase->GetFunctionByName(buffer)))
faluco@1112	1226	{
faluco@1112	1227	cell_t res;
faluco@1112	1228	pFunc->Execute(&res);
dvander@2193	1229	if (pPlugin->GetBaseContext()->GetLastNativeError() != SP_ERROR_NONE)
faluco@1112	1230	{
faluco@1112	1231	if (error)
faluco@1112	1232	{
dvander@2814	1233	UTIL_Format(error, maxlength, "Fatal error during initializing plugin load");
faluco@1112	1234	}
faluco@1112	1235	return false;
faluco@1112	1236	}
faluco@1112	1237	}
dvander@1572	1238	}
dvander@1572	1239	else
dvander@1572	1240	{
faluco@1112	1241	/* Check that we aren't registering the same library twice */
faluco@1112	1242	if (pPlugin->m_RequiredLibs.find(name) == pPlugin->m_RequiredLibs.end())
faluco@1112	1243	{
faluco@1112	1244	pPlugin->m_RequiredLibs.push_back(name);
dvander@1572	1245	}
dvander@1572	1246	else
dvander@1572	1247	{
faluco@1112	1248	continue;
faluco@1112	1249	}
faluco@1112	1250	List<CPlugin *>::iterator iter;
faluco@1112	1251	CPlugin *pl;
faluco@1112	1252	bool found = false;
faluco@1112	1253	for (iter=m_plugins.begin(); iter!=m_plugins.end(); iter++)
faluco@1112	1254	{
faluco@1112	1255	pl = (*iter);
faluco@1112	1256	if (pl->m_Libraries.find(name) != pl->m_Libraries.end())
faluco@1112	1257	{
faluco@1112	1258	found = true;
faluco@1112	1259	break;
faluco@1112	1260	}
faluco@1112	1261	}
faluco@1112	1262	if (!found)
faluco@1112	1263	{
faluco@1112	1264	if (error)
faluco@1112	1265	{
dvander@2814	1266	UTIL_Format(error, maxlength, "Could not find required plugin \"%s\"", name);
faluco@1112	1267	}
faluco@1112	1268	return false;
faluco@1112	1269	}
faluco@1112	1270	}
faluco@1112	1271	}
faluco@1112	1272	}
faluco@1112	1273
faluco@1112	1274	return true;
faluco@1112	1275	}
faluco@1112	1276
dvander@315	1277	bool CPluginManager::LoadOrRequireExtensions(CPlugin pPlugin, unsigned int pass, char error, size_t maxlength)
dvander@211	1278	{
dvander@298	1279	/* Find any extensions this plugin needs */
dvander@298	1280	struct _ext
dvander@298	1281	{
dvander@298	1282	cell_t name;
dvander@298	1283	cell_t file;
dvander@298	1284	cell_t autoload;
dvander@298	1285	cell_t required;
dvander@298	1286	} *ext;
dvander@298	1287
dvander@298	1288	IPluginContext *pBase = pPlugin->GetBaseContext();
dvander@298	1289	uint32_t num = pBase->GetPubVarsNum();
dvander@298	1290	sp_pubvar_t *pubvar;
dvander@298	1291	IExtension *pExt;
ds@652	1292	char path[PLATFORM_MAX_PATH];
dvander@298	1293	char file, name;
dvander@298	1294	for (uint32_t i=0; i<num; i++)
dvander@298	1295	{
dvander@298	1296	if (pBase->GetPubvarByIndex(i, &pubvar) != SP_ERROR_NONE)
dvander@298	1297	{
dvander@298	1298	continue;
dvander@298	1299	}
dvander@298	1300	if (strncmp(pubvar->name, "__ext_", 6) == 0)
dvander@298	1301	{
dvander@298	1302	ext = (_ext *)pubvar->offs;
dvander@298	1303	if (pBase->LocalToString(ext->file, &file) != SP_ERROR_NONE)
dvander@298	1304	{
dvander@298	1305	continue;
dvander@298	1306	}
dvander@298	1307	if (pBase->LocalToString(ext->name, &name) != SP_ERROR_NONE)
dvander@298	1308	{
dvander@298	1309	continue;
dvander@298	1310	}
dvander@315	1311	if (pass == 1)
dvander@298	1312	{
dvander@315	1313	/* Attempt to auto-load if necessary */
dvander@315	1314	if (ext->autoload)
dvander@315	1315	{
dvander@315	1316	g_LibSys.PathFormat(path, PLATFORM_MAX_PATH, "%s", file);
skamonkey@3402	1317	bool bErrorOnMissing = ext->required ? true : false;
skamonkey@3402	1318	g_Extensions.LoadAutoExtension(path, bErrorOnMissing);
dvander@315	1319	}
dvander@1572	1320	}
dvander@1572	1321	else if (pass == 2)
dvander@1572	1322	{
dvander@315	1323	/* Is this required? */
dvander@315	1324	if (ext->required)
dvander@298	1325	{
dvander@315	1326	g_LibSys.PathFormat(path, PLATFORM_MAX_PATH, "%s", file);
dvander@315	1327	if ((pExt = g_Extensions.FindExtensionByFile(path)) == NULL)
dvander@315	1328	{
dvander@315	1329	pExt = g_Extensions.FindExtensionByName(name);
dvander@315	1330	}
dvander@315	1331	/* :TODO: should we bind to unloaded extensions?
dvander@315	1332	* Currently the extension manager will ignore this.
dvander@315	1333	*/
dvander@315	1334	if (!pExt \|\| !pExt->IsRunning(NULL, 0))
dvander@315	1335	{
dvander@315	1336	if (error)
dvander@315	1337	{
dvander@2814	1338	UTIL_Format(error, maxlength, "Required extension \"%s\" file(\"%s\") not running", name, file);
dvander@315	1339	}
dvander@315	1340	return false;
dvander@1572	1341	}
dvander@1572	1342	else
dvander@1572	1343	{
dvander@315	1344	g_Extensions.BindChildPlugin(pExt, pPlugin);
dvander@315	1345	}
dvander@298	1346	}
dvander@1572	1347	else
dvander@1572	1348	{
dvander@1572	1349	IPluginFunction *pFunc;
dvander@1572	1350	char buffer[64];
dvander@1572	1351	UTIL_Format(buffer, sizeof(buffer), "__ext_%s_SetNTVOptional", &pubvar->name[6]);
dvander@1572	1352
dvander@1572	1353	if ((pFunc = pBase->GetFunctionByName(buffer)) != NULL)
dvander@1572	1354	{
dvander@1572	1355	cell_t res;
dvander@1572	1356	pFunc->Execute(&res);
dvander@2193	1357	if (pPlugin->GetBaseContext()->GetLastNativeError() != SP_ERROR_NONE)
dvander@1572	1358	{
dvander@1572	1359	if (error)
dvander@1572	1360	{
dvander@1572	1361	UTIL_Format(error, maxlength, "Fatal error during plugin initialization (ext req)");
dvander@1572	1362	}
dvander@1572	1363	return false;
dvander@1572	1364	}
dvander@1572	1365	}
dvander@1572	1366	}
dvander@298	1367	}
dvander@315	1368	}
dvander@315	1369	}
dvander@315	1370
dvander@315	1371	return true;
dvander@315	1372	}
dvander@315	1373
dvander@315	1374	bool CPluginManager::RunSecondPass(CPlugin pPlugin, char error, size_t maxlength)
dvander@315	1375	{
dvander@315	1376	/* Second pass for extension requirements */
dvander@315	1377	if (!LoadOrRequireExtensions(pPlugin, 2, error, maxlength))
dvander@315	1378	{
dvander@315	1379	return false;
dvander@315	1380	}
dvander@315	1381
faluco@1112	1382	if (!FindOrRequirePluginDeps(pPlugin, error, maxlength))
faluco@1112	1383	{
faluco@1112	1384	return false;
faluco@1112	1385	}
faluco@1112	1386
dvander@2086	1387	/* Run another binding pass */
dvander@2086	1388	g_ShareSys.BindNativesToPlugin(pPlugin, false);
dvander@1572	1389
dvander@2086	1390	/* Find any unbound natives. Right now, these are not allowed. */
dvander@315	1391	IPluginContext *pContext = pPlugin->GetBaseContext();
dvander@315	1392	uint32_t num = pContext->GetNativesNum();
dvander@315	1393	sp_native_t *native;
dvander@315	1394	for (unsigned int i=0; i<num; i++)
dvander@315	1395	{
dvander@315	1396	if (pContext->GetNativeByIndex(i, &native) != SP_ERROR_NONE)
dvander@315	1397	{
dvander@315	1398	break;
dvander@315	1399	}
dvander@798	1400	if (native->status == SP_NATIVE_UNBOUND
faluco@1089	1401	&& native->name[0] != '@'
faluco@1089	1402	&& !(native->flags & SP_NTVFLAG_OPTIONAL))
dvander@315	1403	{
dvander@315	1404	if (error)
dvander@298	1405	{
dvander@2814	1406	UTIL_Format(error, maxlength, "Native \"%s\" was not found", native->name);
dvander@298	1407	}
dvander@315	1408	return false;
dvander@298	1409	}
dvander@298	1410	}
dvander@211	1411
dvander@211	1412	/* Finish by telling all listeners */
dvander@211	1413	List<IPluginsListener *>::iterator iter;
dvander@211	1414	IPluginsListener *pListener;
dvander@211	1415	for (iter=m_listeners.begin(); iter!=m_listeners.end(); iter++)
dvander@211	1416	{
dvander@211	1417	pListener = (*iter);
dvander@211	1418	pListener->OnPluginLoaded(pPlugin);
dvander@211	1419	}
dvander@298	1420
dvander@298	1421	/* Tell this plugin to finish initializing itself */
ds@426	1422	pPlugin->Call_OnPluginStart();
dvander@298	1423
dvander@605	1424	/* Now, if we have fake natives, go through all plugins that might need rebinding */
dvander@2086	1425	if (pPlugin->GetStatus() <= Plugin_Paused && pPlugin->m_Natives.size())
dvander@605	1426	{
dvander@605	1427	List<CPlugin *>::iterator pl_iter;
dvander@605	1428	CPlugin *pOther;
dvander@605	1429	for (pl_iter = m_plugins.begin();
dvander@605	1430	pl_iter != m_plugins.end();
dvander@605	1431	pl_iter++)
dvander@605	1432	{
dvander@605	1433	pOther = (*pl_iter);
dvander@1122	1434	if ((pOther->GetStatus() == Plugin_Error
faluco@1112	1435	&& (pOther->m_FakeNativesMissing \|\| pOther->m_LibraryMissing))
dvander@1122	1436	\|\| pOther->m_FakeNativesMissing)
dvander@605	1437	{
faluco@1112	1438	TryRefreshDependencies(pOther);
dvander@605	1439	}
dvander@2086	1440	else if ((pOther->GetStatus() == Plugin_Running
dvander@2086	1441	\|\| pOther->GetStatus() == Plugin_Paused)
dvander@2086	1442	&& pOther != pPlugin)
dvander@2086	1443	{
dvander@2086	1444	List<NativeEntry *>::iterator nv_iter;
dvander@2086	1445	for (nv_iter = pPlugin->m_Natives.begin();
dvander@2086	1446	nv_iter != pPlugin->m_Natives.end();
dvander@2086	1447	nv_iter++)
dvander@2086	1448	{
dvander@2086	1449	g_ShareSys.BindNativeToPlugin(pOther, (*nv_iter));
dvander@2086	1450	}
dvander@2086	1451	}
dvander@605	1452	}
dvander@605	1453	}
dvander@605	1454
dvander@1124	1455	/* Go through our libraries and tell other plugins they're added */
dvander@1124	1456	List<String>::iterator s_iter;
dvander@1124	1457	for (s_iter = pPlugin->m_Libraries.begin();
dvander@1124	1458	s_iter != pPlugin->m_Libraries.end();
dvander@1124	1459	s_iter++)
dvander@1124	1460	{
dvander@1572	1461	OnLibraryAction((*s_iter).c_str(), true, false);
dvander@1124	1462	}
dvander@1124	1463
dvander@2042	1464	/* :TODO: optimize? does this even matter? */
dvander@2042	1465	pPlugin->GetPhrases()->AddPhraseFile("core.phrases");
dvander@1621	1466
dvander@298	1467	return true;
dvander@211	1468	}
dvander@211	1469
faluco@1112	1470	void CPluginManager::TryRefreshDependencies(CPlugin *pPlugin)
dvander@605	1471	{
dvander@605	1472	assert(pPlugin->GetBaseContext() != NULL);
dvander@605	1473
dvander@2086	1474	g_ShareSys.BindNativesToPlugin(pPlugin, false);
dvander@605	1475
faluco@1112	1476	List<String>::iterator lib_iter;
faluco@1112	1477	List<String>::iterator req_iter;
faluco@1112	1478	List<CPlugin *>::iterator pl_iter;
faluco@1112	1479	CPlugin *pl;
faluco@1112	1480	for (req_iter=pPlugin->m_RequiredLibs.begin(); req_iter!=pPlugin->m_RequiredLibs.end(); req_iter++)
faluco@1112	1481	{
faluco@1112	1482	bool found = false;
faluco@1112	1483	for (pl_iter=m_plugins.begin(); pl_iter!=m_plugins.end(); pl_iter++)
faluco@1112	1484	{
faluco@1112	1485	pl = (*pl_iter);
faluco@1112	1486	for (lib_iter=pl->m_Libraries.begin(); lib_iter!=pl->m_Libraries.end(); lib_iter++)
faluco@1112	1487	{
faluco@1112	1488	if ((req_iter) == (lib_iter))
faluco@1112	1489	{
faluco@1112	1490	found = true;
faluco@1112	1491	}
faluco@1112	1492	}
faluco@1112	1493	}
faluco@1112	1494	if (!found)
faluco@1112	1495	{
faluco@1112	1496	pPlugin->SetErrorState(Plugin_Error, "Library not found: %s", (*req_iter).c_str());
faluco@1112	1497	return;
faluco@1112	1498	}
faluco@1112	1499	}
faluco@1112	1500
dvander@605	1501	/* Find any unbound natives
dvander@605	1502	* Right now, these are not allowed
dvander@605	1503	*/
dvander@605	1504	IPluginContext *pContext = pPlugin->GetBaseContext();
dvander@605	1505	uint32_t num = pContext->GetNativesNum();
dvander@605	1506	sp_native_t *native;
dvander@605	1507	for (unsigned int i=0; i<num; i++)
dvander@605	1508	{
dvander@605	1509	if (pContext->GetNativeByIndex(i, &native) != SP_ERROR_NONE)
dvander@605	1510	{
dvander@605	1511	break;
dvander@605	1512	}
asherkin@3507	1513	if (native->status == SP_NATIVE_UNBOUND
asherkin@3507	1514	&& native->name[0] != '@'
asherkin@3507	1515	&& !(native->flags & SP_NTVFLAG_OPTIONAL))
dvander@605	1516	{
dvander@605	1517	pPlugin->SetErrorState(Plugin_Error, "Native not found: %s", native->name);
dvander@605	1518	return;
dvander@605	1519	}
dvander@605	1520	}
dvander@605	1521
dvander@1122	1522	if (pPlugin->GetStatus() == Plugin_Error)
dvander@605	1523	{
dvander@1122	1524	/* If we got here, all natives are okay again! */
dvander@1122	1525	pPlugin->m_status = Plugin_Running;
dvander@2193	1526	if (pPlugin->m_pRuntime->IsPaused())
dvander@601	1527	{
dvander@2193	1528	pPlugin->m_pRuntime->SetPauseState(false);
ds@1952	1529	_SetPauseState(pPlugin, false);
dvander@601	1530	}
dvander@601	1531	}
dvander@601	1532	}
dvander@601	1533
dvander@174	1534	bool CPluginManager::UnloadPlugin(IPlugin *plugin)
dvander@174	1535	{
dvander@174	1536	CPlugin pPlugin = (CPlugin )plugin;
dvander@298	1537
dvander@298	1538	/* This prevents removal during insertion or anything else weird */
dvander@298	1539	if (m_plugins.find(pPlugin) == m_plugins.end())
dvander@298	1540	{
dvander@298	1541	return false;
dvander@298	1542	}
dvander@298	1543
dvander@1638	1544	IPluginContext *pContext = plugin->GetBaseContext();
dvander@2342	1545	if (pContext != NULL && pContext->IsInExec())
dvander@1638	1546	{
dvander@1638	1547	char buffer[255];
dvander@1638	1548	UTIL_Format(buffer, sizeof(buffer), "sm plugins unload %s\n", plugin->GetFilename());
dvander@1638	1549	engine->ServerCommand(buffer);
dvander@1638	1550	return false;
dvander@1638	1551	}
dvander@1638	1552
dvander@605	1553	/* Remove us from the lookup table and linked list */
dvander@605	1554	m_plugins.remove(pPlugin);
dvander@605	1555	sm_trie_delete(m_LoadLookup, pPlugin->m_filename);
dvander@605	1556
dvander@1124	1557	/* Go through our libraries and tell other plugins they're gone */
dvander@1124	1558	List<String>::iterator s_iter;
dvander@1124	1559	for (s_iter = pPlugin->m_Libraries.begin();
dvander@1124	1560	s_iter != pPlugin->m_Libraries.end();
dvander@1124	1561	s_iter++)
dvander@1124	1562	{
dvander@1572	1563	OnLibraryAction((*s_iter).c_str(), true, true);
dvander@1124	1564	}
dvander@1124	1565
dvander@174	1566	List<IPluginsListener *>::iterator iter;
dvander@174	1567	IPluginsListener *pListener;
dvander@282	1568
dvander@311	1569	if (pPlugin->GetStatus() <= Plugin_Error)
dvander@282	1570	{
dvander@282	1571	/* Notify listeners of unloading */
dvander@282	1572	for (iter=m_listeners.begin(); iter!=m_listeners.end(); iter++)
dvander@282	1573	{
dvander@282	1574	pListener = (*iter);
dvander@282	1575	pListener->OnPluginUnloaded(pPlugin);
dvander@282	1576	}
dvander@282	1577	/* Notify plugin */
ds@426	1578	pPlugin->Call_OnPluginEnd();
dvander@282	1579	}
dvander@282	1580
dvander@2086	1581	pPlugin->DropEverything();
faluco@1112	1582
dvander@174	1583	for (iter=m_listeners.begin(); iter!=m_listeners.end(); iter++)
dvander@174	1584	{
dvander@282	1585	/* Notify listeners of destruction */
dvander@174	1586	pListener = (*iter);
dvander@174	1587	pListener->OnPluginDestroyed(pPlugin);
dvander@174	1588	}
dvander@176	1589
dvander@282	1590	/* Tell the plugin to delete itself */
dvander@174	1591	delete pPlugin;
dvander@174	1592
dvander@174	1593	return true;
dvander@174	1594	}
dvander@174	1595
dvander@174	1596	IPlugin CPluginManager::FindPluginByContext(const sp_context_t ctx)
dvander@174	1597	{
dvander@2193	1598	IPlugin *pPlugin;
dvander@2193	1599	IPluginContext *pContext;
dvander@2193	1600
dvander@2193	1601	pContext = reinterpret_cast<IPluginContext >(const_cast<sp_context_t >(ctx));
dvander@2193	1602
dvander@2193	1603	if (pContext->GetKey(2, (void **)&pPlugin))
dvander@2193	1604	{
dvander@2193	1605	return pPlugin;
dvander@2193	1606	}
dvander@2193	1607
dvander@2193	1608	return NULL;
dvander@2193	1609	}
dvander@2193	1610
dvander@2193	1611	CPlugin CPluginManager::GetPluginByCtx(const sp_context_t ctx)
dvander@2193	1612	{
dvander@2193	1613	return (CPlugin *)FindPluginByContext(ctx);
dvander@174	1614	}
dvander@174	1615
dvander@174	1616	unsigned int CPluginManager::GetPluginCount()
dvander@174	1617	{
dvander@174	1618	return m_plugins.size();
dvander@174	1619	}
dvander@174	1620
dvander@174	1621	void CPluginManager::AddPluginsListener(IPluginsListener *listener)
dvander@174	1622	{
dvander@174	1623	m_listeners.push_back(listener);
dvander@174	1624	}
dvander@174	1625
dvander@174	1626	void CPluginManager::RemovePluginsListener(IPluginsListener *listener)
dvander@174	1627	{
dvander@174	1628	m_listeners.remove(listener);
dvander@174	1629	}
dvander@174	1630
dvander@174	1631	IPluginIterator *CPluginManager::GetPluginIterator()
dvander@174	1632	{
dvander@174	1633	if (m_iters.empty())
dvander@174	1634	{
dvander@174	1635	return new CPluginIterator(&m_plugins);
dvander@174	1636	} else {
dvander@174	1637	CPluginIterator *iter = m_iters.front();
dvander@174	1638	m_iters.pop();
faluco@216	1639	iter->Reset();
dvander@174	1640	return iter;
dvander@174	1641	}
dvander@174	1642	}
dvander@174	1643
dvander@174	1644	void CPluginManager::ReleaseIterator(CPluginIterator *iter)
dvander@174	1645	{
dvander@174	1646	m_iters.push(iter);
dvander@174	1647	}
dvander@176	1648
dvander@203	1649	bool CPluginManager::TestAliasMatch(const char alias, const char localpath)
dvander@203	1650	{
dvander@203	1651	/* As an optimization, we do not call strlen, but compute the length in the first pass */
dvander@203	1652	size_t alias_len = 0;
dvander@203	1653	size_t local_len = 0;
dvander@203	1654
dvander@203	1655	const char *ptr = alias;
dvander@203	1656	unsigned int alias_explicit_paths = 0;
dvander@203	1657	unsigned int alias_path_end = 0;
dvander@203	1658	while (*ptr != '\0')
dvander@203	1659	{
dvander@203	1660	if (ptr == '\\' \|\| ptr == '/')
dvander@203	1661	{
dvander@203	1662	alias_explicit_paths++;
dvander@203	1663	alias_path_end = alias_len;
dvander@203	1664	}
dvander@203	1665	alias_len++;
dvander@203	1666	ptr++;
dvander@203	1667	}
dvander@203	1668
dvander@209	1669	if (alias_explicit_paths && alias_path_end == alias_len - 1)
dvander@203	1670	{
dvander@203	1671	/* Trailing slash is totally invalid here */
dvander@203	1672	return false;
dvander@203	1673	}
dvander@203	1674
dvander@203	1675	ptr = localpath;
dvander@203	1676	unsigned int local_explicit_paths = 0;
dvander@203	1677	unsigned int local_path_end = 0;
dvander@203	1678	while (*ptr != '\0')
dvander@203	1679	{
dvander@203	1680	if (ptr == '\\' \|\| ptr == '/')
dvander@203	1681	{
dvander@203	1682	local_explicit_paths++;
dvander@203	1683	local_path_end = local_len;
dvander@203	1684	}
dvander@203	1685	local_len++;
dvander@203	1686	ptr++;
dvander@203	1687	}
dvander@203	1688
dvander@203	1689	/* If the alias has more explicit paths than the real path,
dvander@203	1690	* no match will be possible.
dvander@203	1691	*/
dvander@203	1692	if (alias_explicit_paths > local_explicit_paths)
dvander@203	1693	{
dvander@203	1694	return false;
dvander@203	1695	}
dvander@203	1696
dvander@203	1697	if (alias_explicit_paths)
dvander@203	1698	{
dvander@203	1699	/* We need to find if the paths match now. For example, these should all match:
dvander@203	1700	* csdm csdm
dvander@203	1701	* csdm optional/csdm
dvander@203	1702	* csdm/ban optional/crab/csdm/ban
dvander@203	1703	*/
dvander@203	1704	const char *aliasptr = alias;
dvander@203	1705	const char *localptr = localpath;
dvander@203	1706	bool match = true;
dvander@203	1707	do
dvander@203	1708	{
dvander@203	1709	if (aliasptr != localptr)
dvander@203	1710	{
dvander@203	1711	/* We have to knock one path off */
dvander@203	1712	local_explicit_paths--;
dvander@203	1713	if (alias_explicit_paths > local_explicit_paths)
dvander@203	1714	{
dvander@203	1715	/* Skip out if we're gonna have an impossible match */
dvander@203	1716	return false;
dvander@203	1717	}
dvander@203	1718	/* Eat up localptr tokens until we get a result */
dvander@203	1719	while (((localptr - localpath) < (int)local_path_end)
dvander@203	1720	&& *localptr != '/'
dvander@203	1721	&& *localptr != '\\')
dvander@203	1722	{
dvander@203	1723	localptr++;
dvander@203	1724	}
dvander@203	1725	/* Check if we hit the end of our searchable area.
dvander@203	1726	* This probably isn't possible because of the path
dvander@203	1727	* count check, but it's a good idea anyway.
dvander@203	1728	*/
dvander@203	1729	if ((localptr - localpath) >= (int)local_path_end)
dvander@203	1730	{
dvander@203	1731	return false;
dvander@203	1732	} else {
dvander@203	1733	/* Consume the slash token */
dvander@203	1734	localptr++;
dvander@203	1735	}
dvander@203	1736	/* Reset the alias pointer so we can continue consuming */
dvander@203	1737	aliasptr = alias;
dvander@203	1738	match = false;
dvander@203	1739	continue;
dvander@203	1740	}
dvander@203	1741	/* Note:
dvander@203	1742	* This is safe because if localptr terminates early, aliasptr will too
dvander@203	1743	*/
dvander@203	1744	do
dvander@203	1745	{
dvander@203	1746	/* We should never reach the end of the string because of this check. */
dvander@203	1747	bool aliasend = (aliasptr - alias) > (int)alias_path_end;
dvander@203	1748	bool localend = (localptr - localpath) > (int)local_path_end;
dvander@203	1749	if (aliasend \|\| localend)
dvander@203	1750	{
dvander@203	1751	if (aliasend && localend)
dvander@203	1752	{
dvander@203	1753	/* we matched, and we can break out now */
dvander@203	1754	match = true;
dvander@203	1755	break;
dvander@203	1756	}
dvander@203	1757	/* Otherwise, we've hit the end somehow and rest won't match up. Break out. */
dvander@203	1758	match = false;
dvander@203	1759	break;
dvander@203	1760	}
dvander@203	1761
dvander@203	1762	/* If we got here, it's safe to compare the next two tokens */
dvander@203	1763	if (localptr != aliasptr)
dvander@203	1764	{
dvander@203	1765	match = false;
dvander@203	1766	break;
dvander@203	1767	}
dvander@203	1768	localptr++;
dvander@203	1769	aliasptr++;
dvander@203	1770	} while (true);
dvander@203	1771	} while (!match);
dvander@203	1772	}
dvander@203	1773
dvander@203	1774	/* If we got here, it's time to compare filenames */
dvander@203	1775	const char *aliasptr = alias;
dvander@203	1776	const char *localptr = localpath;
dvander@203	1777
dvander@203	1778	if (alias_explicit_paths)
dvander@203	1779	{
dvander@203	1780	aliasptr = &alias[alias_path_end + 1];
dvander@203	1781	}
dvander@203	1782
dvander@203	1783	if (local_explicit_paths)
dvander@203	1784	{
dvander@203	1785	localptr = &localpath[local_path_end + 1];
dvander@203	1786	}
dvander@203	1787
dvander@203	1788	while (true)
dvander@203	1789	{
dvander@203	1790	if (aliasptr == '')
dvander@203	1791	{
dvander@203	1792	/* First, see if this is the last character */
dvander@351	1793	if ((unsigned)(aliasptr - alias) == alias_len - 1)
dvander@203	1794	{
dvander@203	1795	/* If so, there's no need to match anything else */
dvander@203	1796	return true;
dvander@203	1797	}
dvander@203	1798	/* Otherwise, we need to search for an appropriate matching sequence in local.
dvander@203	1799	* Note that we only need to search up to the next asterisk.
dvander@203	1800	*/
dvander@203	1801	aliasptr++;
dvander@203	1802	bool match = true;
dvander@203	1803	const char *local_orig = localptr;
dvander@203	1804	do
dvander@203	1805	{
dvander@203	1806	match = true;
dvander@203	1807	while (aliasptr != '\0' && aliasptr != '*')
dvander@203	1808	{
dvander@203	1809	/* Since aliasptr is never '\0', localptr hitting the end will fail */
dvander@203	1810	if (aliasptr != localptr)
dvander@203	1811	{
dvander@203	1812	match = false;
dvander@203	1813	break;
dvander@203	1814	}
dvander@203	1815	aliasptr++;
dvander@203	1816	localptr++;
dvander@203	1817	}
dvander@203	1818	if (!match)
dvander@203	1819	{
dvander@203	1820	/* If we didn't get a match, we need to advance the search stream.
dvander@203	1821	* This will let us skip tokens while still searching for another match.
dvander@203	1822	*/
dvander@203	1823	localptr = ++local_orig;
dvander@203	1824	/* Make sure we don't go out of bounds */
dvander@203	1825	if (*localptr == '\0')
dvander@203	1826	{
dvander@203	1827	break;
dvander@203	1828	}
dvander@203	1829	}
dvander@203	1830	} while (!match);
dvander@203	1831
dvander@203	1832	if (!match)
dvander@203	1833	{
dvander@203	1834	return false;
dvander@203	1835	} else {
dvander@203	1836	/* If we got a match, move on to the next token */
dvander@203	1837	continue;
dvander@203	1838	}
dvander@203	1839	} else if (*aliasptr == '\0') {
dvander@203	1840	if (*localptr == '\0'
dvander@203	1841	\|\|
dvander@203	1842	strcmp(localptr, ".smx") == 0)
dvander@203	1843	{
dvander@203	1844	return true;
dvander@203	1845	} else {
dvander@203	1846	return false;
dvander@203	1847	}
dvander@203	1848	} else if (aliasptr != localptr) {
dvander@203	1849	return false;
dvander@203	1850	}
dvander@203	1851	aliasptr++;
dvander@203	1852	localptr++;
dvander@203	1853	}
dvander@203	1854
dvander@203	1855	return true;
dvander@203	1856	}
dvander@203	1857
faluco@290	1858	bool CPluginManager::IsLateLoadTime() const
dvander@176	1859	{
dvander@315	1860	return (m_AllPluginsLoaded \|\| !g_SourceMod.IsMapLoading());
dvander@176	1861	}
dvander@220	1862
dvander@220	1863	void CPluginManager::OnSourceModAllInitialized()
dvander@220	1864	{
dvander@229	1865	m_MyIdent = g_ShareSys.CreateCoreIdentity();
dvander@229	1866
dvander@262	1867	HandleAccess sec;
dvander@262	1868	g_HandleSys.InitAccessDefaults(NULL, &sec);
dvander@220	1869
dvander@262	1870	sec.access[HandleAccess_Delete] = HANDLE_RESTRICT_IDENTITY;
dvander@262	1871	sec.access[HandleAccess_Clone] = HANDLE_RESTRICT_IDENTITY;
dvander@262	1872
dvander@262	1873	g_PluginType = g_HandleSys.CreateType("Plugin", this, 0, NULL, &sec, m_MyIdent, NULL);
dvander@229	1874	g_PluginIdent = g_ShareSys.CreateIdentType("PLUGIN");
dvander@309	1875
dvander@309	1876	g_RootMenu.AddRootConsoleCommand("plugins", "Manage Plugins", this);
dvander@336	1877
dvander@336	1878	g_ShareSys.AddInterface(NULL, this);
dvander@220	1879	}
dvander@220	1880
dvander@220	1881	void CPluginManager::OnSourceModShutdown()
dvander@220	1882	{
dvander@309	1883	g_RootMenu.RemoveRootConsoleCommand("plugins", this);
dvander@309	1884
dvander@1630	1885	UnloadAll();
dvander@298	1886
dvander@229	1887	g_HandleSys.RemoveType(g_PluginType, m_MyIdent);
dvander@229	1888	g_ShareSys.DestroyIdentType(g_PluginIdent);
dvander@229	1889	g_ShareSys.DestroyIdentity(m_MyIdent);
dvander@220	1890	}
dvander@220	1891
dvander@220	1892	void CPluginManager::OnHandleDestroy(HandleType_t type, void *object)
dvander@220	1893	{
dvander@220	1894	/* We don't care about the internal object, actually */
dvander@220	1895	}
dvander@233	1896
dvander@1766	1897	bool CPluginManager::GetHandleApproxSize(HandleType_t type, void object, unsigned int pSize)
dvander@1766	1898	{
dvander@1766	1899	pSize = ((CPlugin )object)->CalcMemUsage();
dvander@1766	1900	return true;
dvander@1766	1901	}
dvander@1766	1902
dvander@247	1903	IPlugin CPluginManager::PluginFromHandle(Handle_t handle, HandleError err)
dvander@247	1904	{
dvander@247	1905	IPlugin *pPlugin;
dvander@247	1906	HandleError _err;
dvander@247	1907
dvander@262	1908	HandleSecurity sec;
dvander@262	1909
dvander@262	1910	sec.pOwner = NULL;
dvander@262	1911	sec.pIdentity = m_MyIdent;
dvander@262	1912
dvander@262	1913	if ((_err=g_HandleSys.ReadHandle(handle, g_PluginType, &sec, (void **)&pPlugin)) != HandleError_None)
dvander@247	1914	{
dvander@247	1915	pPlugin = NULL;
dvander@247	1916	}
dvander@247	1917
dvander@247	1918	if (err)
dvander@247	1919	{
dvander@247	1920	*err = _err;
dvander@247	1921	}
dvander@247	1922
dvander@247	1923	return pPlugin;
dvander@247	1924	}
faluco@290	1925
faluco@290	1926	CPlugin *CPluginManager::GetPluginByOrder(int num)
faluco@290	1927	{
faluco@290	1928	if (num < 1 \|\| num > (int)GetPluginCount())
faluco@290	1929	{
faluco@290	1930	return NULL;
faluco@290	1931	}
faluco@290	1932
faluco@290	1933	CPlugin *pl;
faluco@290	1934	int id = 1;
faluco@290	1935
ds@2113	1936	SourceHook::List<CPlugin *>::iterator iter;
ds@2113	1937	for (iter = m_plugins.begin(); iter != m_plugins.end() && id < num; iter++, id++) {}
faluco@290	1938
ds@2113	1939	pl = *iter;
faluco@290	1940
faluco@290	1941	return pl;
dvander@298	1942	}
dvander@309	1943
dvander@309	1944	const char *CPluginManager::GetStatusText(PluginStatus st)
dvander@309	1945	{
dvander@309	1946	switch (st)
dvander@309	1947	{
dvander@309	1948	case Plugin_Running:
dvander@309	1949	return "Running";
dvander@309	1950	case Plugin_Paused:
dvander@309	1951	return "Paused";
dvander@309	1952	case Plugin_Error:
dvander@309	1953	return "Error";
dvander@309	1954	case Plugin_Uncompiled:
dvander@309	1955	return "Uncompiled";
dvander@309	1956	case Plugin_BadLoad:
dvander@309	1957	return "Bad Load";
dvander@309	1958	case Plugin_Failed:
dvander@309	1959	return "Failed";
dvander@309	1960	default:
dvander@309	1961	assert(false);
dvander@309	1962	return "-";
dvander@309	1963	}
dvander@309	1964	}
dvander@309	1965
faluco@1541	1966	void CPluginManager::OnRootConsoleCommand(const char *cmdname, const CCommand &command)
dvander@309	1967	{
faluco@1541	1968	int argcount = command.ArgC();
dvander@309	1969	if (argcount >= 3)
dvander@309	1970	{
faluco@1541	1971	const char *cmd = command.Arg(2);
dvander@309	1972	if (strcmp(cmd, "list") == 0)
dvander@309	1973	{
dvander@309	1974	char buffer[256];
dvander@309	1975	unsigned int id = 1;
dvander@309	1976	int plnum = GetPluginCount();
dvander@309	1977
dvander@309	1978	if (!plnum)
dvander@309	1979	{
dvander@309	1980	g_RootMenu.ConsolePrint("[SM] No plugins loaded");
dvander@309	1981	return;
dvander@1630	1982	}
dvander@1630	1983	else
dvander@1630	1984	{
ds@582	1985	g_RootMenu.ConsolePrint("[SM] Listing %d plugin%s:", GetPluginCount(), (plnum > 1) ? "s" : "");
dvander@309	1986	}
dvander@309	1987
dvander@2105	1988	CPlugin *pl;
dvander@2105	1989	SourceHook::List<CPlugin *>::iterator iter;
dvander@2105	1990	SourceHook::List<CPlugin *> m_FailList;
pred@1920	1991
ds@2113	1992	for (iter = m_plugins.begin(); iter != m_plugins.end(); iter++, id++)
dvander@309	1993	{
dvander@2105	1994	pl = (*iter);
dvander@309	1995	assert(pl->GetStatus() != Plugin_Created);
dvander@309	1996	int len = 0;
dvander@309	1997	const sm_plugininfo_t *info = pl->GetPublicInfo();
fyrenmoo@2675	1998	if (pl->GetStatus() != Plugin_Running && !pl->IsSilentlyFailed())
dvander@340	1999	{
dvander@340	2000	len += UTIL_Format(buffer, sizeof(buffer), " %02d <%s>", id, GetStatusText(pl->GetStatus()));
pred@1920	2001
pred@1920	2002	if (pl->GetStatus() <= Plugin_Error)
pred@1920	2003	{
pred@1920	2004	/* Plugin has failed to load. */
pred@1920	2005	m_FailList.push_back(pl);
pred@1920	2006	}
dvander@1630	2007	}
dvander@1630	2008	else
dvander@1630	2009	{
dvander@340	2010	len += UTIL_Format(buffer, sizeof(buffer), " %02d", id);
dvander@340	2011	}
dvander@2342	2012	if (pl->GetStatus() < Plugin_Created)
dvander@309	2013	{
fyrenmoo@2675	2014	if (pl->IsSilentlyFailed())
fyrenmoo@2675	2015	len += UTIL_Format(&buffer[len], sizeof(buffer)-len, " Disabled:");
dvander@2342	2016	len += UTIL_Format(&buffer[len], sizeof(buffer)-len, " \"%s\"", (IS_STR_FILLED(info->name)) ? info->name : pl->GetFilename());
dvander@2342	2017	if (IS_STR_FILLED(info->version))
dvander@2342	2018	{
dvander@2342	2019	len += UTIL_Format(&buffer[len], sizeof(buffer)-len, " (%s)", info->version);
dvander@2342	2020	}
dvander@2342	2021	if (IS_STR_FILLED(info->author))
dvander@2342	2022	{
dvander@2342	2023	UTIL_Format(&buffer[len], sizeof(buffer)-len, " by %s", info->author);
dvander@2342	2024	}
dvander@309	2025	}
dvander@2342	2026	else
dvander@309	2027	{
dvander@2342	2028	UTIL_Format(&buffer[len], sizeof(buffer)-len, " %s", pl->m_filename);
dvander@309	2029	}
dvander@309	2030	g_RootMenu.ConsolePrint("%s", buffer);
dvander@309	2031	}
dvander@309	2032
pred@1920	2033	if (!m_FailList.empty())
pred@1920	2034	{
pred@1920	2035	g_RootMenu.ConsolePrint("Load Errors:");
pred@1920	2036
dvander@2105	2037	SourceHook::List<CPlugin *>::iterator _iter;
pred@1920	2038
pred@1920	2039	CPlugin *pl;
pred@1920	2040
pred@1920	2041	for (_iter=m_FailList.begin(); _iter!=m_FailList.end(); _iter++)
pred@1920	2042	{
pred@1920	2043	pl = (CPlugin )_iter;
pred@1920	2044	g_RootMenu.ConsolePrint("%s: %s",(IS_STR_FILLED(pl->GetPublicInfo()->name)) ? pl->GetPublicInfo()->name : pl->GetFilename(), pl->m_errormsg);
pred@1920	2045	}
pred@1920	2046	}
pred@1920	2047
dvander@309	2048	return;
dvander@1630	2049	}
dvander@1630	2050	else if (strcmp(cmd, "load") == 0)
dvander@1630	2051	{
dvander@309	2052	if (argcount < 4)
dvander@309	2053	{
dvander@310	2054	g_RootMenu.ConsolePrint("[SM] Usage: sm plugins load <file>");
dvander@309	2055	return;
dvander@309	2056	}
dvander@309	2057
dvander@309	2058	char error[128];
faluco@383	2059	bool wasloaded;
faluco@1541	2060	const char *filename = command.Arg(3);
ds@794	2061
ds@794	2062	char pluginfile[256];
ds@794	2063	const char *ext = g_LibSys.GetFileExtension(filename) ? "" : ".smx";
fyrenmoo@2869	2064	g_SourceMod.BuildPath(Path_None, pluginfile, sizeof(pluginfile), "%s%s", filename, ext);
ds@794	2065
ds@794	2066	IPlugin *pl = LoadPlugin(pluginfile, false, PluginType_MapUpdated, error, sizeof(error), &wasloaded);
faluco@383	2067
faluco@383	2068	if (wasloaded)
faluco@383	2069	{
ds@794	2070	g_RootMenu.ConsolePrint("[SM] Plugin %s is already loaded.", pluginfile);
faluco@383	2071	return;
faluco@383	2072	}
dvander@309	2073
dvander@309	2074	if (pl)
dvander@309	2075	{
ds@794	2076	g_RootMenu.ConsolePrint("[SM] Loaded plugin %s successfully.", pluginfile);
dvander@1630	2077	}
dvander@1630	2078	else
dvander@1630	2079	{
ds@794	2080	g_RootMenu.ConsolePrint("[SM] Plugin %s failed to load: %s.", pluginfile, error);
dvander@309	2081	}
dvander@309	2082
dvander@309	2083	return;
dvander@1630	2084	}
dvander@1630	2085	else if (strcmp(cmd, "unload") == 0)
dvander@1630	2086	{
dvander@309	2087	if (argcount < 4)
dvander@309	2088	{
ds@1252	2089	g_RootMenu.ConsolePrint("[SM] Usage: sm plugins unload <#\|file>");
dvander@309	2090	return;
dvander@309	2091	}
dvander@309	2092
ds@1252	2093	CPlugin *pl;
ds@1252	2094	char *end;
faluco@1541	2095	const char *arg = command.Arg(3);
ds@1252	2096	int id = strtol(arg, &end, 10);
ds@1252	2097
ds@1252	2098	if (*end == '\0')
dvander@309	2099	{
ds@1252	2100	pl = GetPluginByOrder(id);
ds@1252	2101	if (!pl)
ds@1252	2102	{
ds@1252	2103	g_RootMenu.ConsolePrint("[SM] Plugin index %d not found.", id);
ds@1252	2104	return;
ds@1252	2105	}
dvander@1630	2106	}
dvander@1630	2107	else
dvander@1630	2108	{
ds@1252	2109	char pluginfile[256];
ds@1252	2110	const char *ext = g_LibSys.GetFileExtension(arg) ? "" : ".smx";
fyrenmoo@2869	2111	g_SourceMod.BuildPath(Path_None, pluginfile, sizeof(pluginfile), "%s%s", arg, ext);
dvander@309	2112
ds@1252	2113	if (!sm_trie_retrieve(m_LoadLookup, pluginfile, (void **)&pl))
ds@1252	2114	{
ds@1252	2115	g_RootMenu.ConsolePrint("[SM] Plugin %s is not loaded.", pluginfile);
ds@1252	2116	return;
ds@1252	2117	}
ds@1252	2118	}
dvander@309	2119
ds@652	2120	char name[PLATFORM_MAX_PATH];
dvander@2342	2121
dvander@2342	2122	if (pl->GetStatus() < Plugin_Created)
dvander@2342	2123	{
dvander@2342	2124	const sm_plugininfo_t *info = pl->GetPublicInfo();
dvander@2342	2125	UTIL_Format(name, sizeof(name), (IS_STR_FILLED(info->name)) ? info->name : pl->GetFilename());
dvander@2342	2126	}
dvander@2342	2127	else
dvander@2342	2128	{
dvander@2342	2129	UTIL_Format(name, sizeof(name), "%s", pl->GetFilename());
dvander@2342	2130	}
dvander@309	2131
dvander@309	2132	if (UnloadPlugin(pl))
dvander@309	2133	{
dvander@310	2134	g_RootMenu.ConsolePrint("[SM] Plugin %s unloaded successfully.", name);
dvander@1630	2135	}
dvander@1630	2136	else
dvander@1630	2137	{
dvander@310	2138	g_RootMenu.ConsolePrint("[SM] Failed to unload plugin %s.", name);
dvander@309	2139	}
dvander@309	2140
dvander@309	2141	return;
dvander@1630	2142	}
dvander@1630	2143	else if (strcmp(cmd, "unload_all") == 0)
dvander@1630	2144	{
dvander@1630	2145	g_PluginSys.UnloadAll();
dvander@1630	2146	g_RootMenu.ConsolePrint("[SM] All plugins have been unloaded.");
dvander@1630	2147	return;
dvander@1630	2148	}
dvander@1630	2149	else if (strcmp(cmd, "load_lock") == 0)
dvander@1630	2150	{
dvander@1630	2151	if (m_LoadingLocked)
dvander@1630	2152	{
dvander@1630	2153	g_RootMenu.ConsolePrint("[SM] There is already a loading lock in effect.");
dvander@1630	2154	}
dvander@1630	2155	else
dvander@1630	2156	{
dvander@1630	2157	m_LoadingLocked = true;
dvander@1630	2158	g_RootMenu.ConsolePrint("[SM] Loading is now locked; no plugins will be loaded or re-loaded.");
dvander@1630	2159	}
dvander@1630	2160	return;
dvander@1630	2161	}
dvander@1630	2162	else if (strcmp(cmd, "load_unlock") == 0)
dvander@1630	2163	{
dvander@1630	2164	if (m_LoadingLocked)
dvander@1630	2165	{
dvander@1630	2166	m_LoadingLocked = false;
dvander@1630	2167	g_RootMenu.ConsolePrint("[SM] The loading lock is no longer in effect.");
dvander@1630	2168	}
dvander@1630	2169	else
dvander@1630	2170	{
dvander@1630	2171	g_RootMenu.ConsolePrint("[SM] There was no loading lock in effect.");
dvander@1630	2172	}
dvander@1630	2173	return;
dvander@1630	2174	}
dvander@1630	2175	else if (strcmp(cmd, "info") == 0)
dvander@1630	2176	{
dvander@309	2177	if (argcount < 4)
dvander@309	2178	{
dvander@310	2179	g_RootMenu.ConsolePrint("[SM] Usage: sm plugins info <#>");
dvander@309	2180	return;
dvander@309	2181	}
dvander@309	2182
dvander@1902	2183	CPlugin *pl;
dvander@1902	2184	char *end;
dvander@1902	2185	const char *arg = command.Arg(3);
dvander@1902	2186	int id = strtol(arg, &end, 10);
dvander@1902	2187
dvander@1902	2188	if (*end == '\0')
dvander@309	2189	{
dvander@1902	2190	pl = GetPluginByOrder(id);
dvander@1902	2191	if (!pl)
dvander@1902	2192	{
dvander@1902	2193	g_RootMenu.ConsolePrint("[SM] Plugin index %d not found.", id);
dvander@1902	2194	return;
dvander@1902	2195	}
dvander@1902	2196	}
dvander@1902	2197	else
dvander@1902	2198	{
dvander@1902	2199	char pluginfile[256];
dvander@1902	2200	const char *ext = g_LibSys.GetFileExtension(arg) ? "" : ".smx";
fyrenmoo@2869	2201	g_SourceMod.BuildPath(Path_None, pluginfile, sizeof(pluginfile), "%s%s", arg, ext);
dvander@1902	2202
dvander@1902	2203	if (!sm_trie_retrieve(m_LoadLookup, pluginfile, (void **)&pl))
dvander@1902	2204	{
dvander@1902	2205	g_RootMenu.ConsolePrint("[SM] Plugin %s is not loaded.", pluginfile);
dvander@1902	2206	return;
dvander@1902	2207	}
dvander@309	2208	}
dvander@309	2209
dvander@309	2210	const sm_plugininfo_t *info = pl->GetPublicInfo();
dvander@309	2211
dvander@309	2212	g_RootMenu.ConsolePrint(" Filename: %s", pl->GetFilename());
dvander@315	2213	if (pl->GetStatus() <= Plugin_Error)
dvander@309	2214	{
dvander@315	2215	if (IS_STR_FILLED(info->name))
dvander@315	2216	{
dvander@605	2217	if (IS_STR_FILLED(info->description))
dvander@605	2218	{
dvander@605	2219	g_RootMenu.ConsolePrint(" Title: %s (%s)", info->name, info->description);
dvander@605	2220	} else {
dvander@605	2221	g_RootMenu.ConsolePrint(" Title: %s", info->name);
dvander@605	2222	}
dvander@605	2223	}
dvander@605	2224	if (IS_STR_FILLED(info->author))
dvander@605	2225	{
dvander@605	2226	g_RootMenu.ConsolePrint(" Author: %s", info->author);
dvander@315	2227	}
dvander@315	2228	if (IS_STR_FILLED(info->version))
dvander@315	2229	{
dvander@315	2230	g_RootMenu.ConsolePrint(" Version: %s", info->version);
dvander@315	2231	}
dvander@315	2232	if (IS_STR_FILLED(info->url))
dvander@315	2233	{
dvander@315	2234	g_RootMenu.ConsolePrint(" URL: %s", info->url);
dvander@315	2235	}
dvander@605	2236	if (pl->GetStatus() == Plugin_Error)
dvander@315	2237	{
dvander@605	2238	g_RootMenu.ConsolePrint(" Error: %s", pl->m_errormsg);
dvander@1630	2239	}
dvander@1630	2240	else
dvander@1630	2241	{
dvander@2105	2242	if (pl->GetStatus() == Plugin_Running)
dvander@2105	2243	{
dvander@2226	2244	g_RootMenu.ConsolePrint(" Status: running");
dvander@2105	2245	}
dvander@2105	2246	else
dvander@2105	2247	{
dvander@2105	2248	g_RootMenu.ConsolePrint(" Status: not running");
dvander@2105	2249	}
ds@860	2250
ds@861	2251	const char *typestr = "";
ds@860	2252	switch (pl->GetType())
ds@860	2253	{
ds@860	2254	case PluginType_MapUpdated:
ds@860	2255	typestr = "Map Change if Updated";
ds@860	2256	break;
ds@860	2257	case PluginType_MapOnly:
ds@860	2258	typestr = "Map Change";
ds@860	2259	break;
ds@860	2260	case PluginType_Private:
ds@860	2261	case PluginType_Global:
ds@860	2262	typestr = "Never";
ds@860	2263	break;
ds@860	2264	}
ds@860	2265
ds@860	2266	g_RootMenu.ConsolePrint(" Reloads: %s", typestr);
dvander@315	2267	}
dvander@2105	2268	if (pl->m_FileVersion >= 3)
dvander@2105	2269	{
dvander@2105	2270	g_RootMenu.ConsolePrint(" Timestamp: %s", pl->m_DateTime);
dvander@2105	2271	}
dvander@1630	2272	}
dvander@1630	2273	else
dvander@1630	2274	{
dvander@315	2275	g_RootMenu.ConsolePrint(" Load error: %s", pl->m_errormsg);
dvander@2342	2276	if (pl->GetStatus() < Plugin_Created)
dvander@315	2277	{
dvander@2342	2278	g_RootMenu.ConsolePrint(" File info: (title \"%s\") (version \"%s\")",
dvander@2342	2279	info->name ? info->name : "<none>",
dvander@2342	2280	info->version ? info->version : "<none>");
dvander@2342	2281	if (IS_STR_FILLED(info->url))
dvander@2342	2282	{
dvander@2342	2283	g_RootMenu.ConsolePrint(" File URL: %s", info->url);
dvander@2342	2284	}
dvander@315	2285	}
dvander@309	2286	}
dvander@309	2287
dvander@309	2288	return;
dvander@1630	2289	}
dvander@1630	2290	else if (strcmp(cmd, "refresh") == 0)
dvander@1630	2291	{
dvander@1630	2292	g_SourceMod.DoGlobalPluginLoads();
dvander@1630	2293	g_RootMenu.ConsolePrint("[SM] The plugin list has been refreshed and reloaded.");
dvander@1630	2294	return;
dvander@1630	2295	}
dvander@1630	2296	else if (strcmp(cmd, "reload") == 0)
dvander@1630	2297	{
faluco@1348	2298	if (argcount < 4)
faluco@1348	2299	{
faluco@1348	2300	g_RootMenu.ConsolePrint("[SM] Usage: sm plugins reload <#\|file>");
faluco@1348	2301	return;
faluco@1348	2302	}
faluco@1348	2303
faluco@1348	2304	CPlugin *pl;
faluco@1348	2305	char *end;
faluco@1541	2306	const char *arg = command.Arg(3);
faluco@1348	2307	int id = strtol(arg, &end, 10);
faluco@1348	2308
faluco@1348	2309	if (*end == '\0')
faluco@1348	2310	{
faluco@1348	2311	pl = GetPluginByOrder(id);
faluco@1348	2312	if (!pl)
faluco@1348	2313	{
faluco@1348	2314	g_RootMenu.ConsolePrint("[SM] Plugin index %d not found.", id);
faluco@1348	2315	return;
faluco@1348	2316	}
dvander@1630	2317	}
dvander@1630	2318	else
dvander@1630	2319	{
faluco@1348	2320	char pluginfile[256];
faluco@1348	2321	const char *ext = g_LibSys.GetFileExtension(arg) ? "" : ".smx";
fyrenmoo@2869	2322	g_SourceMod.BuildPath(Path_None, pluginfile, sizeof(pluginfile), "%s%s", arg, ext);
faluco@1348	2323
faluco@1348	2324	if (!sm_trie_retrieve(m_LoadLookup, pluginfile, (void **)&pl))
faluco@1348	2325	{
faluco@1348	2326	g_RootMenu.ConsolePrint("[SM] Plugin %s is not loaded.", pluginfile);
faluco@1348	2327	return;
faluco@1348	2328	}
faluco@1348	2329	}
faluco@1348	2330
faluco@1348	2331	char name[PLATFORM_MAX_PATH];
faluco@1348	2332	const sm_plugininfo_t *info = pl->GetPublicInfo();
dvander@2886	2333	if (pl->GetStatus() <= Plugin_Paused)
dvander@2885	2334	strcpy(name, (IS_STR_FILLED(info->name)) ? info->name : pl->GetFilename());
dvander@2885	2335	else
dvander@2885	2336	strcpy(name, pl->GetFilename());
faluco@1348	2337
faluco@1348	2338	if (ReloadPlugin(pl))
faluco@1348	2339	{
faluco@1348	2340	g_RootMenu.ConsolePrint("[SM] Plugin %s reloaded successfully.", name);
dvander@1630	2341	}
dvander@1630	2342	else
dvander@1630	2343	{
faluco@1348	2344	g_RootMenu.ConsolePrint("[SM] Failed to reload plugin %s.", name);
faluco@1348	2345	}
faluco@1348	2346
faluco@1348	2347	return;
dvander@309	2348	}
dvander@309	2349	}
dvander@309	2350
dvander@309	2351	/* Draw the main menu */
dvander@309	2352	g_RootMenu.ConsolePrint("SourceMod Plugins Menu:");
dvander@1630	2353	g_RootMenu.DrawGenericOption("info", "Information about a plugin");
dvander@309	2354	g_RootMenu.DrawGenericOption("list", "Show loaded plugins");
dvander@309	2355	g_RootMenu.DrawGenericOption("load", "Load a plugin");
dvander@1630	2356	g_RootMenu.DrawGenericOption("load_lock", "Prevents any more plugins from being loaded");
dvander@1630	2357	g_RootMenu.DrawGenericOption("load_unlock", "Re-enables plugin loading");
dvander@1630	2358	g_RootMenu.DrawGenericOption("refresh", "Reloads/refreshes all plugins in the plugins folder");
dvander@1630	2359	g_RootMenu.DrawGenericOption("reload", "Reloads a plugin");
dvander@309	2360	g_RootMenu.DrawGenericOption("unload", "Unload a plugin");
dvander@1630	2361	g_RootMenu.DrawGenericOption("unload_all", "Unloads all plugins");
faluco@1348	2362	}
faluco@1348	2363
faluco@1348	2364	bool CPluginManager::ReloadPlugin(CPlugin *pl)
faluco@1348	2365	{
faluco@1348	2366	List<CPlugin *>::iterator iter;
faluco@1348	2367	char filename[PLATFORM_MAX_PATH];
dvander@2226	2368	bool wasloaded;
faluco@1348	2369	PluginType ptype;
faluco@1348	2370	IPlugin *newpl;
faluco@1348	2371	int id = 1;
faluco@1348	2372
faluco@1348	2373	strcpy(filename, pl->m_filename);
faluco@1348	2374	ptype = pl->GetType();
faluco@1348	2375
faluco@1348	2376	for (iter=m_plugins.begin(); iter!=m_plugins.end(); iter++, id++)
faluco@1348	2377	{
faluco@1348	2378	if ((*iter) == pl)
faluco@1348	2379	{
faluco@1348	2380	break;
faluco@1348	2381	}
faluco@1348	2382	}
faluco@1348	2383
faluco@1348	2384	if (!UnloadPlugin(pl))
faluco@1348	2385	{
faluco@1348	2386	return false;
faluco@1348	2387	}
dvander@2226	2388	if (!(newpl=LoadPlugin(filename, true, ptype, NULL, 0, &wasloaded)))
faluco@1348	2389	{
faluco@1348	2390	return false;
faluco@1348	2391	}
faluco@1348	2392
faluco@1348	2393	for (iter=m_plugins.begin(); iter!=m_plugins.end(); iter++)
faluco@1348	2394	{
faluco@1348	2395	if ((iter) == (CPlugin )newpl)
faluco@1348	2396	{
faluco@1348	2397	m_plugins.erase(iter);
faluco@1348	2398	break;
faluco@1348	2399	}
faluco@1348	2400	}
faluco@1348	2401
faluco@1348	2402	int i;
dvander@1630	2403	for (i=1, iter=m_plugins.begin(); iter!=m_plugins.end() && i<id; iter++, i++)
dvander@1630	2404	{
dvander@1630	2405	}
faluco@1348	2406	m_plugins.insert(iter, (CPlugin *)newpl);
faluco@1348	2407
faluco@1348	2408	return true;
dvander@309	2409	}
faluco@333	2410
faluco@333	2411	void CPluginManager::ReloadOrUnloadPlugins()
faluco@333	2412	{
dvander@1630	2413	/* If we're in a load lock, just skip this whole bit. */
dvander@1630	2414	if (m_LoadingLocked)
dvander@1630	2415	{
dvander@1630	2416	return;
dvander@1630	2417	}
dvander@1630	2418
faluco@333	2419	List<CPlugin *>::iterator iter;
faluco@333	2420	List<CPlugin *> tmp_list = m_plugins;
faluco@333	2421	CPlugin *pl;
faluco@333	2422	time_t t;
faluco@333	2423
faluco@333	2424	for (iter=tmp_list.begin(); iter!=tmp_list.end(); iter++)
faluco@333	2425	{
faluco@333	2426	pl = (*iter);
faluco@333	2427	if (pl->GetType() == PluginType_MapOnly)
faluco@333	2428	{
faluco@333	2429	UnloadPlugin((IPlugin *)pl);
dvander@1630	2430	}
dvander@1630	2431	else if (pl->GetType() == PluginType_MapUpdated)
dvander@1630	2432	{
dvander@450	2433	t = pl->GetFileTimeStamp();
dvander@450	2434	if (!t \|\| t > pl->GetTimeStamp())
faluco@333	2435	{
faluco@333	2436	pl->SetTimeStamp(t);
faluco@333	2437	UnloadPlugin((IPlugin *)pl);
faluco@333	2438	}
faluco@333	2439	}
faluco@333	2440	}
faluco@333	2441	}
faluco@430	2442
faluco@430	2443	void CPluginManager::_SetPauseState(CPlugin *pl, bool paused)
faluco@430	2444	{
faluco@430	2445	List<IPluginsListener *>::iterator iter;
faluco@430	2446	IPluginsListener *pListener;
faluco@430	2447	for (iter=m_listeners.begin(); iter!=m_listeners.end(); iter++)
faluco@430	2448	{
faluco@430	2449	pListener = (*iter);
faluco@430	2450	pListener->OnPluginPauseChange(pl, paused);
faluco@430	2451	}
dvander@464	2452	}
dvander@464	2453
ds@611	2454	void CPluginManager::AddFunctionsToForward(const char name, IChangeableForward pForward)
ds@611	2455	{
ds@611	2456	List<CPlugin *>::iterator iter;
ds@611	2457	CPlugin *pPlugin;
ds@611	2458	IPluginFunction *pFunction;
ds@611	2459
ds@611	2460	for (iter = m_plugins.begin(); iter != m_plugins.end(); iter++)
ds@611	2461	{
ds@611	2462	pPlugin = (*iter);
ds@611	2463
ds@611	2464	if (pPlugin->GetStatus() <= Plugin_Paused)
ds@611	2465	{
ds@611	2466	pFunction = pPlugin->GetBaseContext()->GetFunctionByName(name);
ds@611	2467
ds@611	2468	if (pFunction)
ds@611	2469	{
ds@611	2470	pForward->AddFunction(pFunction);
ds@611	2471	}
ds@611	2472	}
ds@611	2473	}
ds@611	2474	}
dvander@900	2475
dvander@900	2476	CPlugin CPluginManager::GetPluginFromIdentity(IdentityToken_t pToken)
dvander@900	2477	{
dvander@900	2478	if (pToken->type != g_PluginIdent)
dvander@900	2479	{
dvander@900	2480	return NULL;
dvander@900	2481	}
dvander@900	2482
dvander@900	2483	return (CPlugin *)(pToken->ptr);
dvander@900	2484	}
dvander@978	2485
dvander@1572	2486	void CPluginManager::OnLibraryAction(const char *lib, bool is_a_plugin, bool drop)
dvander@978	2487	{
dvander@978	2488	List<CPlugin *>::iterator iter;
dvander@978	2489
dvander@1124	2490	struct _pl
dvander@1124	2491	{
dvander@1124	2492	cell_t name;
dvander@1124	2493	cell_t file;
dvander@1124	2494	cell_t required;
dvander@1124	2495	} *plc;
dvander@1124	2496
dvander@1572	2497	struct _ext
dvander@1572	2498	{
dvander@1572	2499	cell_t name;
dvander@1572	2500	cell_t file;
dvander@1572	2501	cell_t autoload;
dvander@1572	2502	cell_t required;
dvander@1572	2503	} *ext;
dvander@1572	2504
dvander@1124	2505	const char *name = drop ? "OnLibraryRemoved" : "OnLibraryAdded";
dvander@1124	2506
dvander@1124	2507	for (iter=m_plugins.begin();
dvander@1124	2508	iter!=m_plugins.end();
dvander@1124	2509	iter++)
dvander@1124	2510	{
dvander@1124	2511	CPlugin pl = (iter);
dvander@1124	2512	if (pl->GetStatus() != Plugin_Running)
dvander@1124	2513	{
dvander@1124	2514	continue;
dvander@1124	2515	}
dvander@1124	2516	IPluginContext *pContext = pl->GetBaseContext();
dvander@1124	2517	IPluginFunction *pf = pContext->GetFunctionByName(name);
dvander@1124	2518	if (!pf)
dvander@1124	2519	{
dvander@1124	2520	continue;
dvander@1124	2521	}
dvander@1124	2522	uint32_t num_vars = pContext->GetPubVarsNum();
dvander@1124	2523	for (uint32_t i=0; i<num_vars; i++)
dvander@1124	2524	{
dvander@1124	2525	sp_pubvar_t *pubvar;
dvander@1124	2526	if (pContext->GetPubvarByIndex(i, &pubvar) != SP_ERROR_NONE)
dvander@1124	2527	{
dvander@1124	2528	continue;
dvander@1124	2529	}
dvander@1572	2530	if (is_a_plugin && strncmp(pubvar->name, "__pl_", 5) == 0)
dvander@1124	2531	{
dvander@1572	2532	plc = (_pl *)pubvar->offs;
dvander@1572	2533	if (plc->required)
dvander@1572	2534	{
dvander@1572	2535	continue;
dvander@1572	2536	}
dvander@1572	2537	char *str;
dvander@1572	2538	pContext->LocalToString(plc->name, &str);
dvander@1572	2539	if (strcmp(str, lib) != 0)
dvander@1572	2540	{
dvander@1572	2541	continue;
dvander@1572	2542	}
dvander@1572	2543	pf->PushString(lib);
dvander@1572	2544	pf->Execute(NULL);
dvander@1124	2545	}
dvander@1572	2546	else if (!is_a_plugin && strncmp(pubvar->name, "__ext_", 6) == 0)
dvander@1124	2547	{
dvander@1572	2548	ext = (_ext *)pubvar->offs;
dvander@1572	2549	if (ext->required)
dvander@1572	2550	{
dvander@1572	2551	continue;
dvander@1572	2552	}
dvander@1572	2553	char *str;
dvander@1572	2554	pContext->LocalToString(ext->name, &str);
dvander@1572	2555	if (strcmp(str, lib) != 0)
dvander@1572	2556	{
dvander@1572	2557	continue;
dvander@1572	2558	}
dvander@1572	2559	pf->PushString(lib);
dvander@1572	2560	pf->Execute(NULL);
dvander@1124	2561	}
dvander@1124	2562	}
dvander@1124	2563	}
dvander@978	2564	}
dvander@1124	2565
dvander@1124	2566	bool CPluginManager::LibraryExists(const char *lib)
dvander@1124	2567	{
dvander@1124	2568	List<CPlugin *>::iterator iter;
dvander@1124	2569
dvander@1124	2570	for (iter=m_plugins.begin();
dvander@1124	2571	iter!=m_plugins.end();
dvander@1124	2572	iter++)
dvander@1124	2573	{
dvander@1124	2574	CPlugin pl = (iter);
dvander@1124	2575	if (pl->GetStatus() != Plugin_Running)
dvander@1124	2576	{
dvander@1124	2577	continue;
dvander@1124	2578	}
dvander@1124	2579	List<String>::iterator s_iter;
dvander@1124	2580	for (s_iter = pl->m_Libraries.begin();
dvander@1124	2581	s_iter != pl->m_Libraries.end();
dvander@1124	2582	s_iter++)
dvander@1124	2583	{
dvander@1124	2584	if ((*s_iter).compare(lib) == 0)
dvander@1124	2585	{
dvander@1124	2586	return true;
dvander@1124	2587	}
dvander@1124	2588	}
dvander@1124	2589	}
dvander@1124	2590
dvander@1124	2591	return false;
dvander@1124	2592	}
faluco@1221	2593
faluco@1221	2594	void CPluginManager::AllPluginsLoaded()
faluco@1221	2595	{
faluco@1221	2596	List<CPlugin *>::iterator iter;
faluco@1221	2597	CPlugin *pl;
faluco@1221	2598
faluco@1221	2599	for (iter=m_plugins.begin(); iter!=m_plugins.end(); iter++)
faluco@1221	2600	{
faluco@1221	2601	pl = (*iter);
faluco@1221	2602	pl->Call_OnAllPluginsLoaded();
faluco@1221	2603	}
dvander@1232	2604	}
dvander@1630	2605
dvander@1630	2606	void CPluginManager::UnloadAll()
dvander@1630	2607	{
dvander@1630	2608	List<CPlugin *>::iterator iter;
dvander@1630	2609	while ( (iter = m_plugins.begin()) != m_plugins.end() )
dvander@1630	2610	{
dvander@1630	2611	UnloadPlugin((*iter));
dvander@1630	2612	}
dvander@1630	2613	}
dvander@1638	2614
dvander@1638	2615	int CPluginManager::GetOrderOfPlugin(IPlugin *pl)
dvander@1638	2616	{
dvander@1638	2617	int id = 1;
dvander@1638	2618	List<CPlugin *>::iterator iter;
dvander@1638	2619
dvander@1638	2620	for (iter = m_plugins.begin(); iter != m_plugins.end(); iter++, id++)
dvander@1638	2621	{
dvander@1638	2622	if ((*iter) == pl)
dvander@1638	2623	{
dvander@1638	2624	return id;
dvander@1638	2625	}
dvander@1638	2626	}
dvander@1638	2627
dvander@1638	2628	return -1;
dvander@1638	2629	}
dvander@1638	2630
dvander@1902	2631	CPlugin CPluginManager::FindPluginByConsoleArg(const char arg)
dvander@1902	2632	{
dvander@1902	2633	int id;
dvander@1902	2634	char *end;
dvander@1902	2635	CPlugin *pl;
dvander@1902	2636
dvander@1902	2637	id = strtol(arg, &end, 10);
dvander@1902	2638
dvander@1902	2639	if (*end == '\0')
dvander@1902	2640	{
dvander@1902	2641	pl = GetPluginByOrder(id);
dvander@1902	2642	if (!pl)
dvander@1902	2643	{
dvander@1902	2644	return NULL;
dvander@1902	2645	}
dvander@1902	2646	}
dvander@1902	2647	else
dvander@1902	2648	{
dvander@1902	2649	char pluginfile[256];
dvander@1902	2650	const char *ext = g_LibSys.GetFileExtension(arg) ? "" : ".smx";
dvander@1902	2651	UTIL_Format(pluginfile, sizeof(pluginfile), "%s%s", arg, ext);
dvander@1902	2652
dvander@1902	2653	if (!sm_trie_retrieve(m_LoadLookup, pluginfile, (void **)&pl))
dvander@1902	2654	{
dvander@1902	2655	return NULL;
dvander@1902	2656	}
dvander@1902	2657	}
dvander@1902	2658
dvander@1902	2659	return pl;
dvander@1902	2660	}
dvander@2342	2661
dvander@2342	2662	void CPluginManager::OnSourceModMaxPlayersChanged(int newvalue)
dvander@2342	2663	{
dvander@2342	2664	SyncMaxClients(newvalue);
dvander@2342	2665	}
dvander@2342	2666
dvander@2342	2667	void CPluginManager::SyncMaxClients(int max_clients)
dvander@2342	2668	{
dvander@2342	2669	List<CPlugin *>::iterator iter;
dvander@2342	2670
dvander@2342	2671	for (iter = m_plugins.begin(); iter != m_plugins.end(); iter++)
dvander@2342	2672	{
dvander@2342	2673	(*iter)->SyncMaxClients(max_clients);
dvander@2342	2674	}
dvander@2342	2675	}
dvander@2547	2676
dvander@2547	2677	void CPluginManager::ListPluginsToClient(CPlayer *player, const CCommand &args)
dvander@2547	2678	{
dvander@2547	2679	char buffer[256];
dvander@2547	2680	unsigned int id = 0;
dvander@2547	2681	int plnum = GetPluginCount();
dvander@2547	2682	edict_t *e = player->GetEdict();
dvander@2547	2683	unsigned int start = 0;
dvander@2547	2684
dvander@2547	2685	if (!plnum)
dvander@2547	2686	{
dvander@2547	2687	ClientConsolePrint(e, "[SM] No plugins found.");
dvander@2547	2688	return;
dvander@2547	2689	}
dvander@2547	2690
dvander@2547	2691	if (args.ArgC() > 2)
dvander@2547	2692	{
dvander@2547	2693	start = atoi(args.Arg(2));
dvander@2547	2694	}
dvander@2547	2695
dvander@2547	2696	CPlugin *pl;
dvander@2547	2697	SourceHook::List<CPlugin *>::iterator iter;
dvander@2547	2698	SourceHook::List<CPlugin *> m_FailList;
dvander@2547	2699
dvander@2547	2700	for (iter = m_plugins.begin();
dvander@2547	2701	iter != m_plugins.end();
dvander@2547	2702	iter++)
dvander@2547	2703	{
dvander@2547	2704	pl = (*iter);
dvander@2547	2705
dvander@2547	2706	if (pl->GetStatus() != Plugin_Running)
dvander@2547	2707	{
dvander@2547	2708	continue;
dvander@2547	2709	}
dvander@2547	2710
dvander@2547	2711	/* Count valid plugins */
dvander@2547	2712	id++;
dvander@2547	2713	if (id < start)
dvander@2547	2714	{
dvander@2547	2715	continue;
dvander@2547	2716	}
dvander@2547	2717
dvander@2547	2718	if (id - start > 10)
dvander@2547	2719	{
dvander@2547	2720	break;
dvander@2547	2721	}
dvander@2547	2722
dvander@2547	2723	size_t len;
dvander@2547	2724	const sm_plugininfo_t *info = pl->GetPublicInfo();
dvander@2547	2725	len = UTIL_Format(buffer, sizeof(buffer), " \"%s\"", (IS_STR_FILLED(info->name)) ? info->name : pl->GetFilename());
dvander@2547	2726	if (IS_STR_FILLED(info->version))
dvander@2547	2727	{
dvander@2547	2728	len += UTIL_Format(&buffer[len], sizeof(buffer)-len, " (%s)", info->version);
dvander@2547	2729	}
dvander@2547	2730	if (IS_STR_FILLED(info->author))
dvander@2547	2731	{
dvander@2547	2732	UTIL_Format(&buffer[len], sizeof(buffer)-len, " by %s", info->author);
dvander@2547	2733	}
dvander@2547	2734	else
dvander@2547	2735	{
dvander@2547	2736	UTIL_Format(&buffer[len], sizeof(buffer)-len, " %s", pl->m_filename);
dvander@2547	2737	}
dvander@2547	2738	ClientConsolePrint(e, "%s", buffer);
dvander@2547	2739	}
dvander@2547	2740
dvander@2547	2741	/* See if we can get more plugins */
dvander@2547	2742	while (iter != m_plugins.end())
dvander@2547	2743	{
dvander@2547	2744	if ((*iter)->GetStatus() == Plugin_Running)
dvander@2547	2745	{
dvander@2547	2746	break;
dvander@2547	2747	}
dvander@2547	2748	}
dvander@2547	2749
dvander@2547	2750	/* Do we actually have more plugins? */
dvander@2547	2751	if (iter != m_plugins.end())
dvander@2547	2752	{
fyrenmoo@3129	2753	ClientConsolePrint(e, "To see more, type \"sm plugins %d\"", id);
dvander@2547	2754	}
dvander@2547	2755	}

author	Asher Baker <asherkin@gmail.com>
	Sun May 27 01:51:03 2012 +0100 (2012-05-27)
changeset 3509	f5494c328158
parent 3507	d1b6fde18611
child 3601	d3a2fb7b3a1e
permissions	-rw-r--r--