MafiaTelegramBot/MafiaTelegramBot/Game/GameRooms/GameRoom.GameProcess.cs

using System;
using System.Linq;
using System.Threading;
using System.Threading.Tasks;
using MafiaTelegramBot.Controllers;
using MafiaTelegramBot.CustomCollections.Extensions;
using MafiaTelegramBot.Models;
using MafiaTelegramBot.Resources;
using Telegram.Bot.Types;
using Timer = System.Timers.Timer;

namespace MafiaTelegramBot.Game.GameRooms
{
    public partial class GameRoom
    {
        public void Start()
        {
            new Task(async () =>
            {
                IsRunning = true;
                await FirstNight();
                await FirstDay();
                await GameCycle();
                await EndOfGame();
            }).Start();
        }

        private async Task FirstDay()
        {
            IsDay = true;
            await PlayersCh.SendSticker(Stickers.Sticker["Day"]);
            await PlayersCh.Send(strings.first_day_message);
            await Task.Run(async() =>
            {
                var turnsCount = _turnOrder.Count;
                Player firstPlayer = null;
                for (var i = 0; i < turnsCount; ++i)
                {
                    var player = _turnOrder.Dequeue();
                    if(!player.IsPlaying) continue;
                    await player.CurrentRole.DayAction();
                    if (firstPlayer != null && player.IsPlaying) _turnOrder.Enqueue(player);
                    else firstPlayer = player;
                }
                _turnOrder.Enqueue(firstPlayer);
            });
        }

        private async Task FirstNight()
        {
            IsFirstCycle = true;
            IsDay = false;
            await Task.Run(async() =>
            {
                await PlayersCh.SendSticker(Stickers.Sticker["Night"]);
                await PlayersCh.Send(strings.city_falls_asleep);
                var mafia = Players.Values.Where(player => player.GetRole() is Roles.Mafia).ToArray();
                var don = Players.Values.FirstOrDefault(player => player.GetRole() is Roles.Don);
                var message = strings.your_teammates;
                if (don != null) message += $"\n\\({don.TurnOrder}\\) {don.NickName} - {roles.Don}";
                message = mafia.Aggregate(message, (current, player) => current + $"\n\\({player.TurnOrder}\\) {player.NickName}");
                await MafiaCh.Send(message);
                var resetEvent = new ManualResetEvent(false);
                var timer = new Timer
                {
                    AutoReset = false,
                    Interval = 10 * 1000
                };
                timer.Elapsed += (_, _) => resetEvent.Set();
                timer.Start();
                foreach (var player in Players.Values)
                {
                    player.CurrentRole.KnownRoles.Add(player);
                    if(player.GetRole() is Roles.Don or Roles.Mafia) player.CurrentRole.KnownRoles.AddRange(
                        Players.Values.Where(p=> player.Id != p.Id && p.GetRole() is Roles.Mafia or Roles.Don)
                    );
                }
                resetEvent.WaitOne();
            });
        }

        private async Task GameCycle()
        {
            IsFirstCycle = false;
            await Task.Run(async () =>
            {
                var alivePlayers = Players.Values.Where(p => p.IsAlive).ToList();
                var aliveMafia = alivePlayers.Where(p => p.GetRole() is Roles.Don or Roles.Mafia).ToList();
                var gameNotEnded = alivePlayers.Count > 2 * aliveMafia.Count && aliveMafia.Count > 0;
                while (gameNotEnded)
                {
                    await NightPhase();
                    await SummingUpPhase();
                    alivePlayers = Players.Values.Where(p => p.IsAlive).ToList();
                    aliveMafia = alivePlayers.Where(p => p.GetRole() is Roles.Don or Roles.Mafia).ToList();
                    gameNotEnded = alivePlayers.Count > 2 * aliveMafia.Count && aliveMafia.Count > 0;
                    if (!gameNotEnded) break;
                    await DayPhase();
                    await DefencePhase();
                    await DispatchPhase();
                    alivePlayers = Players.Values.Where(p => p.IsAlive).ToList();
                    aliveMafia = alivePlayers.Where(p => p.GetRole() is Roles.Don or Roles.Mafia).ToList();
                    gameNotEnded = alivePlayers.Count > 2 * aliveMafia.Count && aliveMafia.Count > 0;
                    if (!gameNotEnded) break;
                }
            });
        }

        private async Task DayPhase()
        {
            IsDay = true;
            var turnsCount = _turnOrder.Count;
            Player firstPlayer = null;
            for (var i = 0; i < turnsCount; ++i)
            {
                var player = _turnOrder.Dequeue();
                if(!player.IsPlaying || !player.IsAlive) continue;
                if (firstPlayer == null) player.IsFirst = true;
                await player.CurrentRole.DayAction();
                if (player.IsFirst) firstPlayer = player;
                else _turnOrder.Enqueue(player);
            }
            firstPlayer!.IsFirst = false;
            _turnOrder.Enqueue(firstPlayer);
        }

        private async Task NightPhase()
        {
            IsDay = false;
            await PlayersCh.SendSticker(Stickers.Sticker["Night"]);
            await PlayersCh.Send(strings.city_falls_asleep);
            await Task.Run(async () =>
            {
                var resetEvent = new ManualResetEvent(false);
                var timer = new Timer{ Interval = 60*1000, AutoReset = false };
                foreach (var player in Players.Values.Where(p=>p.IsAlive))
                {
                    await player.CurrentRole.NightAction();
                }
                timer.Elapsed += (_, _) => resetEvent.Set();
                timer.Start();
                resetEvent.WaitOne();
            });
        }

        public async Task SummingUpPhase()
        {
            await Task.Run(async () =>
            {
                long killedPlayerId = -1;
                foreach (var (role, players) in PlayersRole)
                {
                    if (role is Roles.Mafia)
                    {
                        foreach (var mafia in players) mafia.IsSpeaker = false;
                        var votes = players.Where(p=> p.IsAlive)
                            .GroupBy(p => p.CurrentRole.GetNightTarget())
                            .Select(item => new {id = item.Key, count = item.Count()})
                            .ToList();
                        var max = votes.Max(item => item.count);
                        var maxCount = votes.Count(item => item.count == max);
                        if (maxCount != 1) continue;
                        var selected = votes.First(item => item.count == max);
                        if (selected.id == -1) continue;
                        killedPlayerId = selected.id;
                        Players[killedPlayerId].IsAlive = false;
                        foreach (var mafia in players) await mafia.CurrentRole.ApplyNightActionResult();
                    }
                    else if (players.Count == 1)
                    {
                        var player = players[0];
                        if (role != Roles.Doctor) player.CanBeHealed = true;
                        await player.CurrentRole.ApplyNightActionResult();
                    }
                }
                var message = strings.city_wakes_up;
                if (killedPlayerId != -1 && !Players[killedPlayerId].IsAlive) message += $"{strings.at_this_night} {Players[killedPlayerId].NickName}";
                else message += strings.everyone_survived;
                await PlayersCh.SendSticker(Stickers.Sticker["Day"]);
                await PlayersCh.Send(message);
            });
        }

        private async Task DefencePhase()
        {
            await Task.Run( async () =>
            {
                try
                {
                    var voteUpPlayers = VoteUpList.Where(p => p.VotedCount == LargeVote);
                    //проверяем есть ли кому защищаться
                    if (voteUpPlayers.Count() > 1)
                    {
                        foreach (var defender in VoteUpList)
                        {
                            await defender.CurrentRole.DefenceAction();
                        
                        }
                        var alivePlayers = Players.Values.Where(p => p.IsAlive).ToList();
                        foreach (var player in alivePlayers)
                        {
                            if (!player.IsPlaying || !player.IsAlive) continue;
                            await player.CurrentRole.VotingUpDefenders();
                        }
                    }
                }
                catch (Exception e)
                {
                    Console.WriteLine(e);
                    throw;
                }
                
                
            });
        }

        private async Task DispatchPhase()
        {
            await Task.Run( () =>
            {
                
            });
        }

        public async Task<Message> PutUpVote(long playerId, long targetId)
        {
            var player = Players[playerId];
            VoteUpList.AddUnique(player);
            if (playerId != targetId)
            {
                var target = Players[targetId];
                target.VotedCount++;
                if (target.VotedCount > LargeVote) LargeVote = target.VotedCount; 
                await PlayersCh.SendExcept(player.ChatId, $"{player.NickName} {strings.vote_to} {target.NickName}");
                return await Bot.SendWithMarkdown2(player.ChatId, $"{strings.you_vote_player} {target.NickName}");
            }
            await PlayersCh.SendExcept(player.ChatId, $"{player.NickName} {strings.vote_to_self}");
            return await Bot.SendWithMarkdown2(player.ChatId, strings.you_vote_to_self);
        }

        private async Task EndOfGame()
        {
            await Task.Run(async () =>
            {
                var aliveMafia = Players.Values.Where(p => p.GetRole() is Roles.Don or Roles.Mafia && p.IsAlive).ToList();
                if (aliveMafia.Count == 0)
                {
                    await PlayersCh.Send(strings.villagers_won, exceptDied: false);
                    await PlayersCh.SendSticker(Stickers.Sticker["VillagerWins"], false);
                }
                else
                {
                    await PlayersCh.Send(strings.mafia_won, exceptDied: false);
                    await PlayersCh.SendSticker(Stickers.Sticker["MafiaWins"], false);
                }
                var rolesMessage = strings.in_this_game_roles;
                var sortedPLayers = Players.Values.ToList();
                sortedPLayers.Sort((x, y) => x.TurnOrder - y.TurnOrder);
                foreach (var player in sortedPLayers)
                {
                    rolesMessage += $"\n\\({player.TurnOrder}\\) {player.NickName} - {player.GetRoleName()}";
                    player.ResetState();
                }
                await PlayersCh.Send(rolesMessage);
                IsRunning = false;
                IsDay = false;
                _turnOrder.Clear();
                Settings.Clear();
                foreach (var (_, list) in PlayersRole) list.Clear();
                if (!Players.ContainsKey(Owner.Id) || Players.Count == 0) new Task(async() => 
                    await RoomController.DissolveRoom(RoomEncrypter.GetCode(RoomName))).Start();
                else
                {
                    await Bot.SendWithMarkdown2(Owner.ChatId, strings.thanks_for_game, Keyboard.OwnerGameMenu);
                    await PlayersCh.SendExcept(Owner.Id, strings.thanks_for_game, Keyboard.PlayerGameMenu, false);
                }
            });
        }
    }
}