[visualise_impacts] Improved code for sending temporary entities.

1) Change "BSP Decal" to "World Decal" allows you to use command `r_cleardecal` for clearing.
2) Now when sending temporary entities, cvar `sv_multiplayer_maxtempentities` is taken into account; previously, the code ignored this and created a bunch of timers.
3) Attempting to add code to automatically clean up temporary entities.

Author: A1mDev

addons/sourcemod/gamedata/visualise_impacts.txt

@@ -0,0 +1,28 @@
+"Games"
+{
+	"left4dead2"
+	{
+		"Signatures"
+		{
+			/** @A1m:
+			 * [Windows]
+			 * To locate the `CBaseEntity::RemoveAllDecals` function, follow these steps:
+			 *  1. Find the `CC_Ent_Create` function — it can be identified by the string "Cannot ent_create players!\n".
+			 *  2. Near the end of `CC_Ent_Create`, there is a call to `UTIL_DropToFloor`. Check the xrefs to this function.
+			 *  3. Among the cross-references, look for `CItem::Respawn` (usually the second-to-last one).
+			 *  4. Inside `CItem::Respawn`, you will find a call to `CBaseEntity::RemoveAllDecals`.
+			 *
+			 * Signature:
+			 *     void CBaseEntity::RemoveAllDecals( void )
+			 */
+			"CBaseEntity::RemoveAllDecals"
+			{
+				"library"		"server"
+
+				"linux"			"@_ZN11CBaseEntity15RemoveAllDecalsEv"
+								/* 6A 00 51 E8 ? ? ? ? 6A 01 */
+				"windows"		"\x6A\x00\x51\xE8\x2A\x2A\x2A\x2A\x6A\x01"
+			}
+		}
+	}
+}

addons/sourcemod/scripting/visualise_impacts.sp

@@ -1,101 +1,286 @@
-/* @A1m`:
- * We cannot send to the client temporary objects larger than specified in cvar 'sv_multiplayer_maxtempentities'.
- * A large number of decals will not be displayed if you do not set a delay in sending,
- * or we need to increase the cvar 'sv_multiplayer_maxtempentities' value, by default it is 32 (we can set 255). 
+/** @A1m`:
+ * The engine does not allow sending temporary entities larger than the value set in the cvar 'sv_multiplayer_maxtempentities'.
+ * If too many decals are sent in a single tick, some will not be displayed unless we add a delay,
+ * or increase the cvar value (default is 32, can be raised up to 255).
  *
- * TE_SendToClient with the set delay does not fix this issue.
- * Now the plugin shows all impacts correctly.
- * The plugin also correctly resets this delay with some time, so we don't get high delay.
- * Fix plugin not working after loading the map, it was necessary to constantly reload it.
-*/
+ * Note: Using TE_SendToClient with a delay alone does not fix this issue.
+ *
+ * This plugin solves the problem by properly queuing decals, so all bullet impacts are displayed.
+ * The delay is cleared automatically after a short period, so it won’t accumulate.
+ * Additionally, the plugin fixes an issue where it would stop working after map load (previously it required a manual reload)
+ * (Add PrecacheDecal in `OnMapStart`).
+ *
+ * The plugin now supports automatic decal removal after the configured time period.
+ *
+ * Original code & Notes (Author Jahze): https://github.com/Jahze/l4d2_plugins/tree/master/spread_patch
+ *
+ * Note: For some reason, calling function `CBaseEntity::RemoveAllDecals` for the client doesn't work to clear decals.
+ * Note: Use command `r_removedecals` for client to clean old decals.
+ * 
+**/
 
 #pragma semicolon 1
 #pragma newdecls required
 
 #include <sourcemod>
 #include <sdktools>
 
-#define DECAL_NAME "materials/decals/metal/metal01b.vtf"
+#define GAMEDATA_FILE						"visualise_impacts"
+#define REMOVEALLDECALS_SIGN				"CBaseEntity::RemoveAllDecals"
+#define DECAL_NAME							"materials/decals/metal/metal01b.vtf"
 
 int
-	decalThisTick = 0,
-	iLastTick = 0,
 	g_iPrecacheDecal = 0;
-	
-public Plugin myinfo = 
+
+float
+	g_hRemoveDecalsTime = 0.0;
+
+ConVar
+	g_hCvarMultiplayerMaxTempEnts = null,
+	g_hCvarRemoveDecalsTime = null;
+
+Handle
+	g_hCallRemoveAllDecals = null;
+
+ArrayList
+	g_DecalQueue = null;
+
+public Plugin myinfo =
 {
 	name = "Visualise impacts",
-	author = "Jahze?, A1m`",
-	version = "1.3",
-	description = "See name",
+	author = "A1m`",
+	version = "1.6",
+	description = "Shows bullet impacts (based on the original by Jahze, fully rewritten and improved)",
 	url = "https://github.com/SirPlease/L4D2-Competitive-Rework" 
 };
 
 public void OnPluginStart()
 {
+	InitGameData();
+	InitPlugin();
+
+	g_hCvarRemoveDecalsTime = CreateConVar("l4d_remove_decals_time", "20.0", "After what time will the decals be removed? (0 for disable)", _, true, 0.0, true, 320.0);
+
+	RegConsoleCmd("sm_remove_decals", Cmd_RemoveDecals);
+}
+
+void InitGameData()
+{
+	GameData hGameData = new GameData(GAMEDATA_FILE);
+	if (hGameData == null) {
+		SetFailState("Could not load gamedata/%s.txt", GAMEDATA_FILE);
+	}
+
+	StartPrepSDKCall(SDKCall_Entity);
+
+	if (!PrepSDKCall_SetFromConf(hGameData, SDKConf_Signature, REMOVEALLDECALS_SIGN)) {
+		SetFailState("Function '%s' not found", REMOVEALLDECALS_SIGN);
+	}
+
+	g_hCallRemoveAllDecals = EndPrepSDKCall();
+	if (g_hCallRemoveAllDecals == null) {
+		SetFailState("Function '%s' found, but something went wrong", REMOVEALLDECALS_SIGN);
+	}
+
+	delete hGameData;
+}
+
+void InitPlugin()
+{
+	g_hCvarMultiplayerMaxTempEnts = FindConVar("sv_multiplayer_maxtempentities");
+
+	g_DecalQueue = new ArrayList();
+
 	g_iPrecacheDecal = PrecacheDecal(DECAL_NAME, true);
-	
-	HookEvent("bullet_impact", BulletImpactEvent, EventHookMode_Post);
-	HookEvent("round_start", EventRoundReset, EventHookMode_PostNoCopy);
-	HookEvent("round_end", EventRoundReset, EventHookMode_PostNoCopy);
+
+	HookEvent("bullet_impact", Event_BulletImpact, EventHookMode_Post);
+
+	HookEvent("round_start", Event_RoundChangeState, EventHookMode_PostNoCopy);
+	HookEvent("round_end", Event_RoundChangeState, EventHookMode_PostNoCopy);
+}
+
+public void OnPluginEnd()
+{
+	ClearAllData();
 }
 
 public void OnMapStart()
 {
+	ClearAllData();
+
 	if (!IsDecalPrecached(DECAL_NAME)) {
 		g_iPrecacheDecal = PrecacheDecal(DECAL_NAME, true); //true or false?
 	}
 }
 
-void EventRoundReset(Event hEvent, const char[] name, bool dontBroadcast)
+public void OnMapEnd()
 {
-	decalThisTick = 0;
-	iLastTick = 0;
+	ClearAllData();
 }
 
-void BulletImpactEvent(Event hEvent, const char[] name, bool dontBroadcast)
+public void OnGameFrame()
 {
-	float pos[3];
-	int userid = hEvent.GetInt("userid");
-	//int client = GetClientOfUserId(userid);
+	/** @A1m`:
+	 * We only use half the possible value for reliability if any other decals were sent.
+	 * We use a function `OnGameFrame` instead of creating a bunch of timers,
+	 * and no longer ignore cvar `sv_multiplayer_maxtempentities`.
+	**/
 
-	pos[0] = hEvent.GetFloat("x");
-	pos[1] = hEvent.GetFloat("y");
-	pos[2] = hEvent.GetFloat("z");
-
-	int iTick = GetGameTickCount();
+	SendSendQueueDecals();
+	ShouldRemoveAllDecals();
+}
 
-	if (iTick != iLastTick) {
-		decalThisTick = 0;
-		iLastTick = iTick;
+void ShouldRemoveAllDecals()
+{
+	if (g_hRemoveDecalsTime <= 0.5 || GetGameTime() < g_hRemoveDecalsTime) {
+		return;
 	}
 
-	ArrayStack hStack = new ArrayStack(sizeof(pos));
-	hStack.PushArray(pos[0], sizeof(pos));
-	hStack.Push(userid);
-	
-	CreateTimer(++decalThisTick * GetTickInterval(), TimerDelayShowDecal, hStack, TIMER_FLAG_NO_MAPCHANGE | TIMER_HNDL_CLOSE);
+	RemoveAllDecalsForAll();
+	g_hRemoveDecalsTime = 0.0;
 }
 
-Action TimerDelayShowDecal(Handle hTimer, ArrayStack hStack)
+void SendSendQueueDecals()
 {
-	if (!hStack.Empty) {
-		int client = GetClientOfUserId(hStack.Pop());
-		if (client > 0) {
-			float pos[3];
-			hStack.PopArray(pos[0], sizeof(pos));
-			SendDecal(client, pos);
+	if (g_DecalQueue.Length <= 0) {
+		return;
+	}
+
+	int iMaxPerTick = 32 / 2; // 32 - default value
+
+	if (g_hCvarMultiplayerMaxTempEnts != null) {
+		int iCvarValue = g_hCvarMultiplayerMaxTempEnts.IntValue;
+
+		// Disabled?
+		// We protect against division by zero and guarantee that at least one decal will be send.
+		if (iCvarValue < 1) {
+			return;
+		}
+
+		if (iCvarValue < 2) {
+			iCvarValue = 2;
 		}
+
+		iMaxPerTick = iCvarValue / 2;
 	}
 
-	return Plugin_Stop;
+	int iProcessed = 0;
+
+	while (g_DecalQueue.Length > 0 && iProcessed < iMaxPerTick) {
+		DataPack hDp = g_DecalQueue.Get(0);
+
+		if (hDp != null) {
+			hDp.Reset();
+
+			int iClient = GetClientOfUserId(hDp.ReadCell());
+			if (iClient > 0) {
+				float fPos[3];
+				hDp.ReadFloatArray(fPos, sizeof(fPos));
+
+				SendDecal(iClient, fPos);
+			}
+		}
+
+		CloseHandle(hDp);
+		g_DecalQueue.Erase(0);
+		iProcessed++;
+	}
+}
+
+Action Cmd_RemoveDecals(int iClient, int iArgs)
+{
+	RemoveAllDecalsForAll();
+
+	ReplyToCommand(iClient, "All decals removed successfully!");
+	return Plugin_Handled;
+}
+
+void Event_RoundChangeState(Event hEvent, const char[] sEventName, bool bDontBroadcast)
+{
+	ClearAllData();
 }
 
-void SendDecal(int client, float pos[3])
+void Event_BulletImpact(Event hEvent, const char[] sEventName, bool bDontBroadcast)
 {
-	TE_Start("BSP Decal");
-	TE_WriteVector("m_vecOrigin", pos);
-	TE_WriteNum("m_nEntity", 0);
+	int iUserId = hEvent.GetInt("userid");
+
+	float fPos[3];
+	fPos[0] = hEvent.GetFloat("x");
+	fPos[1] = hEvent.GetFloat("y");
+	fPos[2] = hEvent.GetFloat("z");
+
+	DataPack hDp = new DataPack();
+	hDp.WriteCell(iUserId);
+	hDp.WriteFloatArray(fPos, sizeof(fPos), false);
+
+	g_DecalQueue.Push(hDp);
+
+	g_hRemoveDecalsTime = GetGameTime() + g_hCvarRemoveDecalsTime.FloatValue;
+}
+
+void SendDecal(int iClient, float fPos[3])
+{
+	/** @A1m`:
+	 * "World Decal" instead of "BSP Decal" allows you to use command `r_cleardecal` for clearing.
+	 * Command `r_cleardecal` cannot be executed by the server only by the client. =(
+	 * But it seems like it's impossible to clean "BSP Decal" at all.
+	**/
+
+	TE_Start("World Decal");
+
+	TE_WriteVector("m_vecOrigin", fPos);
 	TE_WriteNum("m_nIndex", g_iPrecacheDecal);
-	TE_SendToClient(client, 0.0);
+
+	TE_SendToClient(iClient, 0.0);
+
+	g_hRemoveDecalsTime = GetGameTime() + g_hCvarRemoveDecalsTime.FloatValue;
+}
+
+void RemoveAllDecalsForAll()
+{
+	for (int iIter = 1; iIter <= MaxClients; iIter++) {
+		if (!IsClientInGame(iIter) || IsFakeClient(iIter)) {
+			continue;
+		}
+
+		RemoveAllDecals(iIter);
+	}
+}
+
+/** @A1m`:
+ * I don't know how to implement this code in sourcemod, it seems impossible,
+ * it takes the index of the entity class instead of the usermessage index.
+ *
+#define BASEENTITY_MSG_REMOVE_DECALS		1
+
+void CBaseEntity::RemoveAllDecals( void )
+{
+	EntityMessageBegin( this );
+		MessageWriteByte( BASEENTITY_MSG_REMOVE_DECALS );
+	MessageEnd();
+}
+**/
+
+void RemoveAllDecals(int iClient)
+{
+	PrintToChat(iClient, "[Note] Use command `r_removedecals` for client to clean old decals.");
+
+	SDKCall(g_hCallRemoveAllDecals, iClient);
+}
+
+void ClearAllData()
+{
+	g_hRemoveDecalsTime = 0.0;
+
+	for (int iIter = 0; iIter < g_DecalQueue.Length; iIter++) {
+		DataPack hDp = g_DecalQueue.Get(0);
+
+		if (hDp != null) {
+			CloseHandle(hDp);
+		}
+
+		g_DecalQueue.Erase(0);
+	}
+
+	g_DecalQueue.Clear();
 }