Integrate owned Intel rerolls, discovery feedback and fair HQ reports

addons/core/Scripts/Game/ERR/ERR_DiscoveryService.c

@@ -5,6 +5,20 @@ class ERR_DiscoveryService
 	protected ERR_GameMode m_Mode;
 	protected ref set<IEntity> m_Spent = new set<IEntity>();
 	void ERR_DiscoveryService(ERR_GameMode mode) { m_Mode = mode; }
+	// Shared ledger for recovered and administratively retired documents.
+	bool IsSpent(IEntity folder) { return folder && m_Spent.Contains(folder); }
+	bool CanMarkSpent(IEntity folder)
+	{
+		return Replication.IsServer() && folder && (m_Spent.Contains(folder) || m_Spent.Count() < 4096);
+	}
+	bool MarkSpent(IEntity folder)
+	{
+		if (!Replication.IsServer() || !folder) return false;
+		if (m_Spent.Contains(folder)) return true;
+		if (m_Spent.Count() >= 4096) return false;
+		m_Spent.Insert(folder);
+		return true;
+	}
 	static void Folders(InventoryStorageManagerComponent inventory, out array<IEntity> folders)
 	{
 		folders.Clear();

addons/core/Scripts/Game/ERR/ERR_GameMode.c

@@ -54,6 +54,7 @@ class ERR_GameMode : SCR_BaseGameMode
 	ERR_PlayerRoster Players() { return m_Roster; }
 	ERR_AdminService Admin() { return m_Admin; }
 	ERR_Settings Settings() { return m_Settings; }
+	ERR_DiscoveryService Discovery() { return m_Discovery; }
 	ERR_TimeService Time() { return m_Time; }
 	ERR_EnvironmentService Environment() { return m_Environment; }
 	ERR_RadioDefenceService RadioDefence() { return m_RadioDefence; }