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

author	David Anderson <dvander@alliedmods.net>
	Sun Mar 01 16:39:25 2009 -0500 (2009-03-01)
changeset 2636	dfa3c6dd31a5
parent 2547	5917289f3c73
child 2675	1502dc625325
permissions	-rw-r--r--