/*
 * kaifa
 * 
 */

using System;
using System.Net;
using System.Text;
using System.Collections.Generic;
using System.Web.Script.Serialization;
using Model;
using Asa;
using Newtonsoft.Json;
using System.Windows.Forms;
using System.IO;
using static BLL.Extension;
using System.Web.UI;
using Asa.FaceControl;
using System.Configuration;
using System.Linq;
using static BLL.Replacekeywords;
using RestSharp;
using System.Web;
using Http = Model.Http;
using System.Drawing;
using DocumentFormat.OpenXml.Spreadsheet;
using static System.Windows.Forms.VisualStyles.VisualStyleElement.ToolTip;
using DocumentFormat.OpenXml.Wordprocessing;

namespace BLL
{
    public class General : IExtension
    {
        public event IExtension.PrintDelegate Printing;
        public event IExtension.PrintDelegate SaveRetrospect;

        private Config config;
        private List<ExtensionControl> extensions;
        List<string> macroKey;
        private void ReadMacro()
        {
            macroKey = new();
            if (System.IO.File.Exists(FilePath.CONFIG_MACRO_KEY))
            {
                string[] lines = System.IO.File.ReadAllLines(FilePath.CONFIG_MACRO_KEY);
                macroKey.AddRange(lines);
            }
        }

        public General(Config config)
        {
            this.config = config;
            ReadMacro();
        }

        public void Clear()
        {
            LogNet.log.Info("Clear()");
            for (int i = 0; i < extensions.Count; i++)
            {
                if (!extensions[i].CanClear) continue;
                if (extensions[i].Control is FaceComboBox box)
                    box.Items.Clear();
                extensions[i].Control.Text = "";
            }
        }

        public void Dispose()
        {
        }

        public void Load(List<ExtensionControl> extensions)
        {
            this.extensions = extensions;            
        }

        static bool mesResult = false;

        Dictionary<string, string> lastkey = null;
        //读码后第一步        
        public bool SetKey(string[] originalCode, Dictionary<string, string> key, bool hasMatch, out string errmsg)
        {
            errmsg = "";            
            mesResult = false;
            var now = DateTime.Now;            
            if (extensions != null && !extensions[0].Control.InvokeRequired)
            {
                //第一次刷新界面
                for (int i = 0; i < extensions.Count; i++)
                {
                    extensions[i].Control.ForeColor = System.Drawing.Color.White;
                    if (key.ContainsKey(extensions[i].Key))
                        extensions[i].Control.Text = key[extensions[i].Key].Replace("<OCR>", "");
                }
            }
            Application.DoEvents();

            #region  判断指定关键字是否存在内容   
            bool isdisplay = true;
            string str = ConfigHelper.Config.Get("DataSource_ForceMatching", "");
            if (!string.IsNullOrWhiteSpace(str))
            {
                string[] arr = str.Split(',');               
                foreach (var item in arr)
                {
                    key.TryGetValue(item, out string value);
                    if (string.IsNullOrEmpty(value))
                    {
                        isdisplay = false;
                        break;
                    }
                }
            }
            #endregion
            if (!string.IsNullOrEmpty(config.ReelIDKeyWord)&&isdisplay)
            {
                var Reelidstr = GetReelid();
                if (key.ContainsKey(config.ReelIDKeyWord))
                {
                    key[config.ReelIDKeyWord] = Reelidstr;
                }
                else
                {
                    key.Add(config.ReelIDKeyWord, Reelidstr);
                }
                    
            }
            //客户定制key
            string exKey = ConfigHelper.Config.Get("Ex_UserDataKey", "Manufactured_Date");
            if (macroKey.Contains(exKey))
            {
                if (key.ContainsKey(exKey))
                {
                    key[exKey] = DateTime.Now.ToString(ConfigHelper.Config.Get("Ex_UserDataRule", "MM/dd/yyyy"));                   
                }                   
                else
                {
                    key.Add(exKey, DateTime.Now.ToString(ConfigHelper.Config.Get("Ex_UserDataRule", "MM/dd/yyyy")));                   
                }
            }
            if (extensions != null && !extensions[0].Control.InvokeRequired)
            {
                //使用key填充时，请处理字段开头的<OCR>字段
                if(key.ContainsKey(Config.DataSource_DataKey))
                {
                    string CleanData = key[Config.DataSource_DataKey].Replace("<OCR>", "");
                    if (key.ContainsKey(Config.DataSource_DataKey) && ExtraFileData.AllData.ContainsKey(CleanData))
                    {
                        var extraData = ExtraFileData.AllData[CleanData];
                        foreach (var d in extraData)
                        {
                            key[d.Key] = d.Value;
                        }
                    }
                }

                //第二次刷新界面
                for (int i = 0; i < extensions.Count; i++)
                {
                    #region 如果是下拉框加载内容
                    if (extensions[i].Type == "ComboBox")
                    {
                        var s = extensions[i].Control as Asa.FaceControl.FaceComboBox;
                        s.Items.AddRange(ExtraFileData.DataTitle.OrderBy(tit=>tit).ToArray());
                        s.Text = "";
                        s.SelectedIndex = -1;
                        s.Enabled = true;
                    }
                    #endregion
                    extensions[i].Control.ForeColor = System.Drawing.Color.White;
                    if (key.ContainsKey(extensions[i].Key))
                    {
                        extensions[i].Control.Text = key[extensions[i].Key].Replace("<OCR>", "");              
                    }                        
                }
            }

            lastkey = key;
            if (!updatereelid(key, out errmsg))
                return false;

            Application.DoEvents();

            bool close = ConfigHelper.Config.Get("isprinclose", false);
            if (close)
            {
                if (extensions!=null)
                {
                    var batt = extensions.Where(a => a.Type == "Button" && a.Control.Name == "BtnPrint").FirstOrDefault();
                    if (batt != null)
                    {
                        batt.Control.Enabled = true;
                    }
                }
                
            }
            //if (extensions != null && !extensions[0].Control.InvokeRequired)
            //{
            //    if (config.AutoPrint && hasMatch)
            //    {
            //        //if (CanPrint())
            //        PrintLabel(null, EventArgs.Empty);
            //    }
            //}
            //else
            //{
            //    //PrintLabel(null, EventArgs.Empty);
            //}
            //SaveRetrospect?.Invoke(key);
            return true;
        }
        bool updatereelid(Dictionary<string, string> key, out string errmsg)
        {
            errmsg = "";
            if (!string.IsNullOrEmpty(config.HttpReelID))
            {
                Dictionary<string, object> pairs = new Dictionary<string, object>(); 
                if (!GetHttpReelID(key, out errmsg,out pairs))
                {
                    LogNet.log.Error("GetHttpReelID:" + errmsg);
                    return false;
                }
                //key["ReelID"] = newid;
            }
            if (extensions != null && !extensions[0].Control.InvokeRequired)
            {
                for (int i = 0; i < extensions.Count; i++)
                {
                    if (extensions[i].Key.ToLower() == "reelid" && key.ContainsKey("reelid"))
                        extensions[i].Control.Text = key["reelid"];
                }
            }
            //SaveRetrospect?.Invoke(key);
            return true;
        }

        public void Update()
        {
        }

        private string GetReelid()
        {
            LogNet.log.Debug("Enter GetReelid Method");
            if (extensions != null)
            {
                int idIndex = extensions.FindIndex(match => match.Key == config.ReelIDKeyWord);
                if (idIndex == -1) return "";
            }
            //读取参数
            string matchID = config.ReelIDMatch;
            int matchPlace = config.ReelIDPlaces;
            bool matchFill = config.ReelIDFillZero;
            string matchPrefix = config.ReelIDPrefix;
            string matchPostfix = config.ReelIDPostfix;

            //把key替换成实际值
            string[] keys = ObjConversion.StrGetKey(matchID);
            for (int i = 0; i < keys.Length; i++)
            {
                if (keys[i].ToLower().StartsWith("datetime"))
                {
                    string ov = string.Format("[{0}]", keys[i]);
                    var d = keys[i].Split(':');
                    if (d.Length == 2)
                    {
                        matchID = matchID.Replace(ov, DateTime.Now.ToString(d[1]));
                    }
                    else
                    {
                        matchID = matchID.Replace(ov, DateTime.Now.ToString());
                    }
                    continue;
                }
                if (extensions != null)
                {
                    int index = extensions.FindIndex(match => match.Key == keys[i]);
                    if (index == -1) continue;
                    string oldValue = string.Format("[{0}]", keys[i]);
                    //matchID = matchID.Replace(oldValue, extensions[index].Control.Text);

                    matchID = matchID.Replace(oldValue, "");
                }
            }
            //SaveAddReelID();
            var reelID = ReadReelID();
            //填充0
            string text = matchPrefix + matchID;
            if (matchFill)
                text += string.Format("{0:d" + matchPlace + "}", reelID);
            else
                text += reelID.ToString();

            text += matchPostfix;
            return text;
        }

        private int ReadReelID()
        {
            int reelID = 1;
            try
            {
                var reelidfile = FilePath.CONFIG_REELID;
                if (Config.REEL_ID_AutoResetStrategy == 1)
                {
                    Directory.CreateDirectory(reelidfile + "_dir");
                    reelidfile = Path.Combine(FilePath.CONFIG_REELID + "_dir", DateTime.Now.ToString("yyyyMMdd"));
                }
                else if (Config.REEL_ID_AutoResetStrategy == 2)
                {
                    Directory.CreateDirectory(reelidfile + "_dir");
                    reelidfile = Path.Combine(FilePath.CONFIG_REELID + "_dir", DateTime.Now.ToString("yyyyMM"));
                }
                if (File.Exists(reelidfile))
                {
                    string text = File.ReadAllText(reelidfile);
                    bool bln = int.TryParse(text, out reelID);
                    LogNet.log.Info($"ReadReelID {reelidfile}, {bln}, text={text}");
                    File.WriteAllText(reelidfile, (reelID + 1).ToString());
                    LogNet.log.Info($"Save ReelID:{reelID + 1}");
                }
                else
                {
                    reelID = 1;
                    File.WriteAllText(reelidfile, (reelID + 1).ToString());
                    LogNet.log.Info($"ReadReelID {reelidfile} Create");
                }
            }
            catch (Exception ex)
            {
                LogNet.log.Error("ReadReelID", ex);
                MessageBox.Show(ex.Message, "Warning", System.Windows.Forms.MessageBoxButtons.OK, System.Windows.Forms.MessageBoxIcon.Warning);
            }
            return reelID;
        }

        private void GetHttpReelID(object sender, EventArgs e)
        {
            updatereelid(lastkey, out _);
        }
        private void PrintLabel(object sender, EventArgs e)
        {
            LogNet.log.Debug("Enter PrintLabel Method");
            if (lastkey == null) return;

           

            for (int i = 0; i < extensions.Count; i++)
            {          
                if (extensions[i].Key == "") continue;
                if (lastkey.ContainsKey(extensions[i].Key))
                    lastkey[extensions[i].Key] = extensions[i].Control.Text;
                else
                    lastkey.Add(extensions[i].Key, extensions[i].Control.Text);
            }
            #region  判断指定关键字是否存在内容   
            List<string> strings = new List<string>();
            string str = ConfigHelper.Config.Get("DataSource_ForceMatching", "");
            if (!string.IsNullOrWhiteSpace(str))
            {
                string[] arr = str.Split(',');
                foreach (var item in arr)
                {
                    lastkey.TryGetValue(item, out string value);
                    if (string.IsNullOrEmpty(value))
                    {
                        strings.Add(item);
                    }
                }
            }
            #endregion
            for (int i = 0; i < extensions.Count; i++)
            {
                if (strings.Contains(extensions[i].Key))
                {
                    extensions[i].Control.BackColor = System.Drawing.Color.Red;
                    return;
                }
            }
            #region 点击打印按钮，rid内容为空时，生成rid
            if (!string.IsNullOrEmpty(config.ReelIDKeyWord))
            {
                if (lastkey.ContainsKey(config.ReelIDKeyWord))
                {
                    string rid = lastkey[config.ReelIDKeyWord];
                    if (string.IsNullOrWhiteSpace(rid))
                    {
                        var Reelidstr = GetReelid();
                        lastkey[config.ReelIDKeyWord] = Reelidstr;
                    }
                }
            }
            #endregion
            
            Printing?.Invoke(lastkey);
            bool close = ConfigHelper.Config.Get("isprinclose", false);
            if (close)
            {
                var batt = extensions.Where(a => a.Type == "Button" && a.Control.Name == "BtnPrint").FirstOrDefault();
                if (batt != null)
                {
                    batt.Control.Enabled = isprint;
                    isprint = false;
                }
            }
            //进行追溯配置保存
            SaveRetrospect?.Invoke(lastkey);
            for (int i = 0; i < extensions.Count; i++)
            {
                extensions[i].Control.BackColor = System.Drawing.Color.FromArgb(255, 20, 20, 20);
            }
        }
        /// <summary>
        /// 
        /// </summary>
        /// <param name="key"></param>
        /// <param name="errmsg"></param>
        /// <param name="dic">返回请求后，替换完成的键值对</param>
        /// <returns></returns>
        private bool GetHttpReelID(Dictionary<string, string> key, out string errmsg,out Dictionary<string,object> dic)
        {
            errmsg = "";
            dic = null;
            string url = config.HttpReelID;
            string json = Http.PostJson(url, null, key);
            if (json == "")
            {
                errmsg = "Api error";
                if (extensions != null && !extensions[0].Control.InvokeRequired)
                    new FaceMessageBox("BoxReelIDInfoMaintain", errmsg, System.Windows.Forms.MessageBoxButtons.OK, true).ShowDialog();
              
                return false;
            }
            JavaScriptSerializer serializer = new();
            //Dictionary<string, object> dic;
            try
            {
                dic = (Dictionary<string, object>)serializer.DeserializeObject(json);
            }
            catch
            {
                errmsg = "Api parse error:\r\n" + json;
                if (extensions != null && !extensions[0].Control.InvokeRequired)
                    new FaceMessageBox("BoxReelIDInfoMaintain", errmsg, System.Windows.Forms.MessageBoxButtons.OK, true).ShowDialog();

                return false;
            }

            if (!dic.TryGetValue("CODE", out object value))
            {
                if (extensions != null && !extensions[0].Control.InvokeRequired)
                    new FaceMessageBox("BoxReelIDInfoMaintain", "Api return data error:\r\n" + json, System.Windows.Forms.MessageBoxButtons.OK, true).ShowDialog();
                else
                    errmsg = "Api return data error:\r\n" + json;
                return false;
            }

            if (Convert.ToInt32(value) != 0)
            {
                errmsg = "Api parse error:\r\n" + dic["MSG"].ToString();
                if (extensions != null && !extensions[0].Control.InvokeRequired)
                    new FaceMessageBox("BoxReelIDInfoMaintain", errmsg, System.Windows.Forms.MessageBoxButtons.OK, true).ShowDialog();

                return false;
            }

            foreach (var kc in key.Keys)
            {
                if (dic.TryGetValue(kc, out value))
                {
                    key[kc] = value.ToString();
                }
            }

            if (!string.IsNullOrEmpty(key["ReelID"]))
            {
                return true;
            }
            else
                return false;
        }

        // 定义动态按钮点击事件处理方法
        /// <summary>
        /// 通过http获取数据替换关键字内容
        /// </summary>
        /// <param name="sender"></param>
        /// <param name="e"></param>
        private void DynamicButtonClick(object sender, EventArgs e)
        {
            try
            {
                var listexten = extensions.Where(a => a.Type == "TextBox").ToDictionary(kvp => kvp.Key, kvp => kvp.Control.Text);
                string jsondata = Replacekeywordss(listexten);
                if (jsondata != null)
                {
                    ResponseDatas lists = JsonConvert.DeserializeObject<ResponseDatas>(jsondata);
                    foreach (var responseItems in lists.Items)
                    {
                        foreach (var item in responseItems)
                        {
                            foreach (var items in extensions.Where(a => a.Type == "TextBox"))
                            {
                                if (items.Key == item.Name)
                                {
                                    items.Control.Text = item.Value.ToString();
                                }
                                //items.Control.Text = item.Value.ToString();
                            }
                        }
                    }
                }
            }
            catch (Exception ex)
            {
                LogNet.log.Error($"替换数据时出错：{ex.Message}");
            }                                
        }

        private void GetDataButtonClick(object sender, EventArgs e)
        {
            Dictionary<string, string> valuePairs = new Dictionary<string, string>();
            try
            {
                string datakey = Config.DataSource_DataKey;
                foreach (var items in extensions.Where(a => a.Type == "TextBox" && a.Key == datakey))
                {
                    string value = items.Control.Text;
                    var data = ExtraFileData.AllData[value];                 
                    foreach (var item in data)
                    {
                        var ext = extensions.Where(a => a.Type == "TextBox" && a.Key == item.Key).ToList();
                        foreach (var Control in ext)
                        {
                            Control.Control.Text = item.Value;
                            valuePairs.Add(Control.Key, item.Value);
                        }                  
                    }
                }

                lastkey = valuePairs;
            }
            catch (Exception)
            {
                LogNet.log.Info("GetDataButtonClick：请求本地文件数据替换出错！");              
            }        
        }
        public void DrawTextBackground(Dictionary<string, string> key)
        {
            if (extensions != null && !extensions[0].Control.InvokeRequired)
            {
                bool focused = false; // 用于跟踪是否已经聚焦到第一个匹配的文本框
                for (int i = 0; i < extensions.Count; i++)
                {
                    if (key.ContainsKey(extensions[i].Key))
                    {
                        if (key[extensions[i].Key].StartsWith("<OCR>"))
                        {
                            extensions[i].Control.ForeColor = System.Drawing.Color.Yellow;
                        }
                        if (!focused && key[extensions[i].Key].StartsWith("<OCR>"))
                        {
                            extensions[i].Control.Focus();
                            focused = true; // 已经聚焦，不再继续
                        }
                    }

                }
            }
            Application.DoEvents();
        }

        bool isprint = false;
        public void Print(bool match, Dictionary<string, string> key)
        {
            if (extensions != null && !extensions[0].Control.InvokeRequired)
            {               
                //自动打印and模板匹配成功，只负责打印标签
                if (config.AutoPrint && match)
                {
                    isprint = true;
                    PrintLabel(true, EventArgs.Empty);
                }
                //bool close = ConfigHelper.Config.Get("isprinclose", false);               
            }     
            ////进行追溯配置保存
            //SaveRetrospect?.Invoke(key);
        }

        public Dictionary<string, string> ReplaceData(Dictionary<string, string> key)
        {
            string err = null;
            Dictionary<string, object> dic=new Dictionary<string, object>();
            if (!GetHttpReelID(key, out err, out dic))
            {
                return key;
            }           
            return dic?.ToDictionary(a=>a.Key,a=>a.Value.ToString());
        }
    }
}