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