EVCB_OCPP.OCPPServer.16J/EVCB_OCPP.WSServer/Service/ConfirmWaitingMessageSerevice.cs

using EVCB_OCPP.Domain;
using EVCB_OCPP.Domain.Models.MainDb;
using EVCB_OCPP.Packet.Features;
using EVCB_OCPP.WSServer.Message;
using Microsoft.EntityFrameworkCore;
using Microsoft.EntityFrameworkCore.Query.Internal;
using Microsoft.Extensions.Logging;
using Microsoft.Identity.Client;
using Newtonsoft.Json;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace EVCB_OCPP.WSServer.Service
{
    public enum ConfirmWaitingMessageRemoveReason
    {
        HitRetryLimit,
        Confirmed,
    }

    public class ConfirmWaitingMessageSerevice
    {
        private static readonly List<string> needConfirmActions = new List<string>()
        {
             "GetConfiguration",
             "ChangeConfiguration",
             "RemoteStartTransaction",
             "RemoteStopTransaction",
             "ChangeAvailability",
             "ClearCache",
             "DataTransfer",
             "Reset",
             "UnlockConnector",
             "TriggerMessage",
             "GetDiagnostics",
             "UpdateFirmware",
             "GetLocalListVersion",
             "SendLocalList",
             "SetChargingProfile",
             "ClearChargingProfile",
             "GetCompositeSchedule",
             "ReserveNow",
             "CancelReservation",
             "ExtendedTriggerMessage"
        };

        public static bool IsNeedConfirm(string action)
        {
            return needConfirmActions.Contains(action);
        }

        public ConfirmWaitingMessageSerevice(
            IDbContextFactory<MainDBContext> maindbContextFactory
            ,ILogger<ConfirmWaitingMessageSerevice> logger)
        {
            this.maindbContextFactory = maindbContextFactory;
            this.logger = logger;
        }

        public event EventHandler<ConfirmWaitingMessageRemoveReason> OnMessageRemoved;

        private readonly Object _lockConfirmPacketList = new object();
        private readonly IDbContextFactory<MainDBContext> maindbContextFactory;
        private readonly ILogger<ConfirmWaitingMessageSerevice> logger;
        private readonly List<NeedConfirmMessage> needConfirmPacketList = new();
        private readonly Dictionary<string, MessageResultWaitObject> asyncWaitingTasks = new();

        internal async Task Add(string chargePointSerialNumber, int table_id, string requestId, string action, string msg_id, string createdBy, string sendMessage)
        {
            NeedConfirmMessage _needConfirmMsg = new NeedConfirmMessage();
            _needConfirmMsg.Id = table_id;
            _needConfirmMsg.SentAction = action;
            _needConfirmMsg.SentOn = DateTime.UtcNow;
            _needConfirmMsg.SentTimes = 4;
            _needConfirmMsg.ChargePointSerialNumber = chargePointSerialNumber;
            _needConfirmMsg.RequestId = requestId;
            _needConfirmMsg.SentUniqueId = msg_id;
            _needConfirmMsg.CreatedBy = createdBy;
            _needConfirmMsg.SentMessage = sendMessage;

            if (needConfirmActions.Contains(action))
            {

                lock (_lockConfirmPacketList)
                {
                    needConfirmPacketList.Add(_needConfirmMsg);
                }
            }

            #region 更新資料表單一欄位
            var dateTimeNow = DateTime.UtcNow;
            var _UpdatedItem = new ServerMessage() { Id = table_id, UpdatedOn = dateTimeNow };
            //db.Configuration.AutoDetectChangesEnabled = false;//自動呼叫DetectChanges()比對所有的entry集合的每一個屬性Properties的新舊值
            //db.Configuration.ValidateOnSaveEnabled = false;// 因為Entity有些欄位必填，若不避開會有Validate錯誤
            // var _UpdatedItem = db.ServerMessage.Where(x => x.Id == item.Id).FirstOrDefault();

            using (var db = await maindbContextFactory.CreateDbContextAsync())
            {
                db.ServerMessage.Attach(_UpdatedItem);
                _UpdatedItem.UpdatedOn = dateTimeNow;
                db.Entry(_UpdatedItem).Property(x => x.UpdatedOn).IsModified = true;// 可以直接使用這方式強制某欄位要更新，只是查詢集合耗效能而己

                await db.SaveChangesAsync();
                db.ChangeTracker.Clear();
            }

            #endregion
        }

        internal List<NeedConfirmMessage> GetPendingMessages()
        {
            List<NeedConfirmMessage> sendMessages = new List<NeedConfirmMessage>();
            lock (_lockConfirmPacketList)
            {
                sendMessages = needConfirmPacketList.Where(x => x.SentTimes > 1 && x.CreatedBy == "Server").ToList();
            }

            return sendMessages;
        }

        internal async Task<bool> TryConfirmMessage(MessageResult analysisResult)
        {
            bool confirmed = false;
            //if (needConfirmActions.Contains(analysisResult.Action))
            if (!IsNeedConfirm(analysisResult.Action))
            {
                return confirmed;
            }

            NeedConfirmMessage foundRequest = null;
            lock (_lockConfirmPacketList)
            {
                foundRequest = needConfirmPacketList.Where(x => x.SentUniqueId == analysisResult.UUID).FirstOrDefault();
            }

            if (foundRequest != null && foundRequest.Id > 0)
            {
                RemoveWaitingMsg(foundRequest, ConfirmWaitingMessageRemoveReason.Confirmed, analysisResult);

                foundRequest.SentTimes = 0;
                foundRequest.SentInterval = 0;
                analysisResult.RequestId = foundRequest.RequestId;

                using (var db = await maindbContextFactory.CreateDbContextAsync())
                {
                    var sc = await db.ServerMessage.Where(x => x.Id == foundRequest.Id).FirstOrDefaultAsync();
                    sc.InMessage = JsonConvert.SerializeObject(analysisResult.Message, Formatting.None);
                    sc.ReceivedOn = DateTime.UtcNow;
                    await db.SaveChangesAsync();
                    //  Console.WriteLine(string.Format("Now:{0} ServerMessage Id:{1} ", DateTime.UtcNow.ToString("yyyy/MM/dd HH:mm:ss"), foundRequest.Id));

                }
                confirmed = true;



            }
            else if (analysisResult.Action == Actions.TriggerMessage.ToString())
            {
                confirmed = true;
            }
            else
            {
                logger.LogError(string.Format("Received no record Action:{0} MessageId:{1} ", analysisResult.Action, analysisResult.UUID));
            }

            return confirmed;
        }

        internal void SignalMessageSended(NeedConfirmMessage resendItem)
        {
            var dateTimeNow = DateTime.UtcNow;
            resendItem.SentTimes--;
            resendItem.SentOn = dateTimeNow;
        }

        internal void RemoveExpiredConfirmMessage()
        {
            var before10Mins = DateTime.UtcNow.AddMinutes(-10);
            var removeList = needConfirmPacketList.Where(x => x.SentTimes == 0 || x.SentOn < before10Mins).ToList();

            foreach (var item in removeList)
            {
                RemoveWaitingMsg(item, ConfirmWaitingMessageRemoveReason.HitRetryLimit);
            }
        }

        internal async Task<MessageResult> WaitResultAsync(string msgId, int maxWaitSec = 65000)
        {
            var waiObj = new MessageResultWaitObject();
            asyncWaitingTasks.Add(msgId, waiObj);
            var task = waiObj.Lock.WaitAsync();
            var completedTask = await Task.WhenAny(task, Task.Delay(650_000));
            return waiObj.Result;
        }

        private void RemoveWaitingMsg(
            NeedConfirmMessage msg, 
            ConfirmWaitingMessageRemoveReason reason,
            MessageResult response = null)
        {
            lock (_lockConfirmPacketList)
            {
                needConfirmPacketList.Remove(msg);
            }

            if (asyncWaitingTasks.Keys.Contains(msg.RequestId))
            {
                asyncWaitingTasks[msg.RequestId].Result = response;
                asyncWaitingTasks[msg.RequestId].Lock.Release();
            }
            OnMessageRemoved?.Invoke(this, reason);
        }
    }

    internal class MessageResultWaitObject
    {
        public MessageResult Result { get; set; } = null;
        public SemaphoreSlim Lock { get; set; } = new SemaphoreSlim(0);
    }
}