tbd-station-14/Content.Server/Procedural/DungeonJob/DungeonJob.Ore.cs

using System.Threading.Tasks;
using Content.Shared.Procedural;
using Content.Shared.Procedural.Components;
using Content.Shared.Procedural.DungeonLayers;
using Robust.Shared.Collections;
using Robust.Shared.Prototypes;
using Robust.Shared.Random;

namespace Content.Server.Procedural.DungeonJob;

public sealed partial class DungeonJob
{
    /// <summary>
    /// <see cref="OreDunGen"/>
    /// </summary>
    private async Task PostGen(
        OreDunGen gen,
        Dungeon dungeon,
        Random random)
    {
        // Doesn't use dungeon data because layers and we don't need top-down support at the moment.

        var emptyTiles = false;
        var replaceEntities = new Dictionary<Vector2i, EntityUid>();
        var availableTiles = new List<Vector2i>();

        foreach (var node in dungeon.AllTiles)
        {
            // Empty tile, skip if relevant.
            if (!emptyTiles && (!_maps.TryGetTile(_grid, node, out var tile) || tile.IsEmpty))
                continue;

            // Check if it's a valid spawn, if so then use it.
            var enumerator = _maps.GetAnchoredEntitiesEnumerator(_gridUid, _grid, node);
            var found = false;

            // We use existing entities as a mark to spawn in place
            // OR
            // We check for any existing entities to see if we can spawn there.
            while (enumerator.MoveNext(out var uid))
            {
                // We can't replace so just stop here.
                if (gen.Replacement == null)
                    break;

                var prototype = _entManager.GetComponent<MetaDataComponent>(uid.Value).EntityPrototype;

                if (prototype?.ID == gen.Replacement)
                {
                    replaceEntities[node] = uid.Value;
                    found = true;
                    break;
                }
            }

            if (!found)
                continue;

            // Add it to valid nodes.
            availableTiles.Add(node);

            await SuspendDungeon();

            if (!ValidateResume())
                return;
        }

        var remapping = new Dictionary<EntProtoId, EntProtoId>();

        // TODO: Move this to engine
        if (_prototype.TryIndex(gen.Entity, out var proto) &&
            proto.Components.TryGetComponent("EntityRemap", out var comps))
        {
            var remappingComp = (EntityRemapComponent) comps;
            remapping = remappingComp.Mask;
        }

        var frontier = new ValueList<Vector2i>(32);

        // Iterate the group counts and pathfind out each group.
        for (var i = 0; i < gen.Count; i++)
        {
            await SuspendDungeon();

            if (!ValidateResume())
                return;

            var groupSize = random.Next(gen.MinGroupSize, gen.MaxGroupSize + 1);

            // While we have remaining tiles keep iterating
            while (groupSize > 0 && availableTiles.Count > 0)
            {
                var startNode = random.PickAndTake(availableTiles);
                frontier.Clear();
                frontier.Add(startNode);

                // This essentially may lead to a vein being split in multiple areas but the count matters more than position.
                while (frontier.Count > 0 && groupSize > 0)
                {
                    // Need to pick a random index so we don't just get straight lines of ores.
                    var frontierIndex = random.Next(frontier.Count);
                    var node = frontier[frontierIndex];
                    frontier.RemoveSwap(frontierIndex);
                    availableTiles.Remove(node);

                    // Add neighbors if they're valid, worst case we add no more and pick another random seed tile.
                    for (var x = -1; x <= 1; x++)
                    {
                        for (var y = -1; y <= 1; y++)
                        {
                            var neighbor = new Vector2i(node.X + x, node.Y + y);

                            if (frontier.Contains(neighbor) || !availableTiles.Contains(neighbor))
                                continue;

                            frontier.Add(neighbor);
                        }
                    }

                    var prototype = gen.Entity;

                    if (replaceEntities.TryGetValue(node, out var existingEnt))
                    {
                        var existingProto = _entManager.GetComponent<MetaDataComponent>(existingEnt).EntityPrototype;
                        _entManager.DeleteEntity(existingEnt);

                        if (existingProto != null && remapping.TryGetValue(existingProto.ID, out var remapped))
                        {
                            prototype = remapped;
                        }
                    }

                    // Tile valid salad so add it.
                    _entManager.SpawnAtPosition(prototype, _maps.GridTileToLocal(_gridUid, _grid, node));

                    groupSize--;
                }
            }

            if (groupSize > 0)
            {
                _sawmill.Warning($"Found remaining group size for ore veins of {gen.Replacement ?? "null"}!");
            }
        }
    }
}