using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using CommunityToolkit.Mvvm.ComponentModel;
using CommonServiceLocator;
using System.Windows.Threading;
using static DyeingComputer.UserClass.SqliteHelper;
using System.Data;
using System.Collections.ObjectModel;
using DyeingComputer.View;
using System.Windows;
using DyeingComputer.UserClass;
using System.Reflection;
using System.Windows.Documents;
using System.Runtime.CompilerServices;
using NModbus;
using NModbus.Serial;
using System.IO.Ports;
using OpenTK.Graphics.ES11;
using DyeingComputer.Properties;
using Microsoft.Win32;
using static DyeingComputer.Windows.ViewStep;


namespace DyeingComputer.ViewModel
{
    /// <summary>
    /// 变量传递至ui
    /// </summary>
    public class ViewModelBase : INotifyPropertyChanged
    {
        public event PropertyChangedEventHandler PropertyChanged;
        protected virtual void OnPropertyChanged(string propertyName)
        {
            if (this.PropertyChanged != null)
                this.PropertyChanged(this, new PropertyChangedEventArgs(propertyName));
        }
        public void RaisePropertyChanged(string propertyName)
        {
            if (propertyName != null)
            {
                PropertyChanged.Invoke(this, new PropertyChangedEventArgs(propertyName));
            }
        }
    }

    public class MainWindowViewModel : ViewModelBase
    {
        private SQLiteHelper SQLiteHelpers = null;  //定义数据库
        private readonly string DBAddress = Environment.CurrentDirectory + "\\DataBase\\800COMPUTER.db";  //数据库路径
        private PID PID = null;
        private IniFile.IniFiles Configini = new IniFile.IniFiles(Convert.ToString(System.AppDomain.CurrentDomain.BaseDirectory) + "DyeingComputer.ini");
        PID pid = new PID();

        public MainWindowViewModel()
        {
            SQLiteHelpers = new SQLiteHelper(DBAddress); //数据库连接路径
            SQLiteHelpers.Open();  //打开数据库
            pid.Kp = Convert.ToDouble( SQLiteHelpers.ExecuteScalar("select value from system where ParameterID = 'ST01'", null));  //读取
            pid.Ki = Convert.ToDouble( SQLiteHelpers.ExecuteScalar("select value from system where ParameterID = 'ST02'", null));
            pid.Kd = Convert.ToDouble( SQLiteHelpers.ExecuteScalar("select value from system where ParameterID = 'ST03'", null));
            pid.N = Convert.ToDouble(SQLiteHelpers.ExecuteScalar("select value from system where ParameterID = 'ST04'", null));  
            pid.OutputUpperLimit = Convert.ToDouble(SQLiteHelpers.ExecuteScalar("select value from system where ParameterID = 'ST05'", null));
            pid.OutputLowerLimit = Convert.ToDouble(SQLiteHelpers.ExecuteScalar("select value from system where ParameterID = 'ST06'", null));
            SQLiteHelpers.Close();

            WorkNumder = "----------";
            CountDown();   //启动循环任务
            SQL_data();   //读数据库
            UPort();    //启动串口

        }

        public string work_Temp;  //显示温度
        public string Work_Temp  //通知UI控件参数改变
        {
            get { return work_Temp; }
            set { work_Temp = value; OnPropertyChanged("Work_Temp"); }
        }
        public string work_Numder;  //显示工单号
        public string Work_Numder  //通知UI控件参数改变
        {
            get { return work_Numder; }
            set { work_Numder = value; OnPropertyChanged("Work_Numder"); }
        }
        public string status_Str;  //显示状态
        public string Status_Str  //通知UI控件参数改变
        {
            get { return status_Str; }
            set { status_Str = value; OnPropertyChanged("Status_Str"); }
        }
        public string sys_Time;  //显示系统时间
        public string Sys_Time  //通知UI控件参数改变
        {
            get { return sys_Time; }
            set { sys_Time = value; OnPropertyChanged("Sys_Time"); }
        }

        public void CountDown()
        {
            DispatcherTimer timer1s = new DispatcherTimer//初始化循环，每1秒调用一次Tick
            {
                Interval = TimeSpan.FromSeconds(0.5)//秒
            };
            timer1s.Tick += Tick_Event_1S;
            timer1s.Start();

            DispatcherTimer timer5s = new DispatcherTimer//初始化循环，每1秒调用一次Tick
            {
                Interval = TimeSpan.FromSeconds(5)//秒
            };
            timer5s.Tick += Tick_Event_5S;
            timer5s.Start();

            //设置定时器
            DispatcherTimer disTimer = new DispatcherTimer
            {
                Interval = TimeSpan.FromMilliseconds(100) //毫秒
            };
             disTimer.Tick += new EventHandler(DisTimer_100MS);//每一秒执行的方法
             disTimer.Start();//计时开始
        }//时间周期初始化

        public static object Name_err;
        public static object WorkNumder;
        void Tick_Event_1S(object sender, EventArgs e)//Tick_Event周期执行事件1S
        {
            Sys_Time = DateTime.Now.ToString("yyyy/MM/dd HH:mm:ss");
            Work_Temp = Selet_dtm("1010") + "  ℃";
            Work_Numder = WorkNumder.ToString();
         //   Status_Str = "qweqeqwqqfwfqef";

            if (LINK_OK) Modbus_link();
            IO_data();    
        }
        void Tick_Event_5S(object sender, EventArgs e)//Tick_Event周期执行事件5S
        {
            if (!LINK_OK) Modbus_link();
            if (Name_err != null) Status_Str = Name_err.ToString();
            STEP_RUN();
        }
        void DisTimer_100MS(object sender, EventArgs e)//Tick_Event周期执行事件100MS
        {
         //   if (LINK_OK) Modbus_link();
        }



        string STEP_ID = "0";
        double STEP_P1 = 0;
        double STEP_P2 = 0;
        double STEP_P3 = 0;
        double STEP_P4 = 0;
        double STEP_P5 = 0;

        void STEP_START(object sender, AddressUpdateEventArgs e) 
        {
            
            if (e.StepID == "001") 
            {
                
            }
        }

        void STEP_RUN()
        {

        }










        public static SerialPort port = new SerialPort();//创建串口
        static ModbusFactory factory = new ModbusFactory();
        // Create Modbus Master
        static IModbusMaster master = factory.CreateRtuMaster(port);

        void UPort()
        {
            try
            {
                port.PortName = Configini.IniReadvalue("SYS", "COM");
                port.BaudRate = 115200;//配置
                port.DataBits = 8;
                port.Parity = Parity.None;
                port.StopBits = StopBits.One;
                port.ReadTimeout = 100;
                port.WriteTimeout = 100;
                port.Open();//打开串口
            }
            catch (Exception e)
            {
                LogGing.LogGingDATA("800_SerialPort_Not");
                LogGing.LogGingDATA(e.Message);
            }
        }

        private bool LINK_OK = false;
        private int LINK_RUN = 0;
        private int LINK_ERR = 0;
        bool[] DQ = new bool[128];
        ushort DQ_L = 128;
        bool[] DO = new bool[128];
        ushort DO_L = 128;
        //int[] MW = new int[128];
      //  ushort MW_L = 128;
        ushort[] DW = new ushort[100];
        ushort DW_L = 100;
        ushort[] RW = new ushort[100];
        ushort RW_L = 100;
        readonly byte slaveId = 1;
        
        private async void Modbus_link()
        {
            await Task.Run(() =>
            {
                LINK_RUN++;
                try
                {
                    master.WriteMultipleCoils(slaveId, 00000, DQ);  //写入线圈
                    master.WriteMultipleRegisters(slaveId,07000,DW);  //写入寄存器

                    DO = master.ReadCoils(slaveId, 01000, DO_L);  //读取线圈
                  //  DQ = master.ReadCoils(slaveId, 00000, DQ_L);
                    RW = master.ReadHoldingRegisters(slaveId,06000, RW_L);  //读取寄存器
                   // RW = master.ReadHoldingRegisters(slaveId, 07000, RW_L);
                    LINK_OK =true;
                }
                catch (Exception ex) 
                {
                    LINK_OK=false;
                    LINK_ERR++;
               //     LogGing.LogGingDATA(ex.Message);
                    Name_err = "PLC"+Properties.Resources.Connectionlost+"("+ ex.Message + ")";
                }                      
            });
        }

        public DataTable dt_d = new DataTable("DIO");
        public DataTable dt_a = new DataTable("AIO");
        public DataTable dt_m = new DataTable("M");
        void SQL_data()//获得io表
        {
            SQLiteHelpers = new SQLiteHelper(DBAddress); //数据库连接路径
            SQLiteHelpers.Open();  //打开数据库
            dt_d = SQLiteHelpers.ExecuteDataSet("select * from IOName where ID>'2000' AND ID<'4000'", null).Tables[0];  //读取表写入缓存
            dt_a = SQLiteHelpers.ExecuteDataSet("select * from IOName where type='AI' OR type='AO'", null).Tables[0];
            dt_m = SQLiteHelpers.ExecuteDataSet("select * from IOName where type='M'", null).Tables[0];
            SQLiteHelpers.Close();
        }

        async void IO_data()//刷新
        {
            updata_dtm("1001", LINK_RUN);
            updata_dtm("1002", LINK_ERR);

            await Task.Run(() =>
            {
                lock (dt_d)
                {
                    for (ushort i = 0; i < DO_L; i++) { updata_dtd((i + 2001).ToString(), DO[i]); }
                    //for (ushort i = 0; i < DQ_L; i++) { updata_dtd((i + 3001).ToString(), DQ[i]); }
                    for (ushort i = 0; i < DQ_L; i++) { DQ[i] = Selet_dtd((i + 3001).ToString()); }
                }
                lock (dt_a)
                {
                    for (ushort i = 0; i < RW_L; i++) { updata_dta((i + 4001).ToString(), RW[i]); }
                    for (ushort i = 0; i < DW_L; i++) { DW[i] = Convert.ToUInt16(Selet_dta((i + 5001).ToString())); }
                }
            });

            await Task.Run(() =>
            {
                SYSData_A = ToObservableCollection<DATA_A>(dt_a);
                SYSData_D = ToObservableCollection<DATA_D>(dt_d);
                SYSData_M = ToObservableCollection<DATA_M>(dt_m);
            });
        }

        public int Selet_dtm(string key)//M寄存器
        {
            DataRow[] arrRows = dt_m.Select("ID=" + key);
            int index = Convert.ToInt16(arrRows[0]["Value"].ToString());
            return index;
        }
        public bool Selet_dtd(string key)//D寄存器
        {
            DataRow[] arrRows = dt_d.Select("ID=" + key);
            bool index = Convert.ToBoolean(arrRows[0]["DIO"].ToString());
            return index;
        }
        public int Selet_dta(string key)//A寄存器
        {
            DataRow[] arrRows = dt_a.Select("ID=" + key);
            int index = Convert.ToInt16(arrRows[0]["AIO"].ToString());
            return index;
        }
        public void updata_dtm(string key,int Value)//更新M寄存器
        {
            DataRow[] arrRows = dt_m.Select("ID="+key);
            int index = dt_m.Rows.IndexOf(arrRows[0]);
            if (index != -1)
            {
                DataRow drEmployee = dt_m.Rows[index];
                drEmployee.BeginEdit();
                drEmployee["Value"] = Value;
                drEmployee.EndEdit();
            }
        }
        public void updata_dtd(string key, bool Value)//更新D寄存器
        {
            DataRow[] arrRows = dt_d.Select("ID='" + key+"'");
            int index = dt_d.Rows.IndexOf(arrRows[0]);
            if (index != -1)
            {
                DataRow drEmployee = dt_d.Rows[index];
                drEmployee.BeginEdit();
                drEmployee["DIO"] = Value;
                drEmployee.EndEdit();
                drEmployee.AcceptChanges();
                drEmployee.ClearErrors();
            }
        }
        public void updata_dta(string key, int Value)//更新A寄存器
        {
            DataRow[] arrRows = dt_a.Select("ID=" + key);
            int index = dt_a.Rows.IndexOf(arrRows[0]);
            if (index != -1)
            {
                DataRow drEmployee = dt_a.Rows[index];
                drEmployee.BeginEdit();
                drEmployee["AIO"] = Value;
                drEmployee.EndEdit();
            }
        }

        ObservableCollection<DATA_A> sysData_A = new ObservableCollection<DATA_A>();
        ObservableCollection<DATA_D> sysData_D = new ObservableCollection<DATA_D>();
        ObservableCollection<DATA_M> sysData_M = new ObservableCollection<DATA_M>();
        public ObservableCollection<DATA_A> SYSData_A
        {

            get { return sysData_A; }
            set
            {
                sysData_A = value;
                RaisePropertyChanged("SYSData_A");
            }
        }
        public ObservableCollection<DATA_D> SYSData_D
        {

            get { return sysData_D; }
            set
            {
                sysData_D = value;
                RaisePropertyChanged("SYSData_D");
            }
        }
        public ObservableCollection<DATA_M> SYSData_M
        {

            get { return sysData_M; }
            set
            {
                sysData_M = value;
                RaisePropertyChanged("SYSData_M");
            }
        }
        public class DATA_A
        {
            public string IOName { get; set; }
            public int AIO { get; set; }
            public string ID { get; set; }
            public string type { get; set; }
        }
        public class DATA_D
        {
            public string IOName { get; set; }
            public bool DIO { get; set; }
            public string ID { get; set; }
            public string type {  get; set; }
        }
        public class DATA_M
        {
            public string IOName { get; set; }
            public int Value { get; set; }
            public String ID { get; set; }
        }
        public ObservableCollection<T> ToObservableCollection<T>(DataTable dt) where T : class, new()
        {
            Type t = typeof(T);
            PropertyInfo[] propertys = t.GetProperties();
            ObservableCollection<T> lst = new ObservableCollection<T>();
            string typeName = string.Empty;
            foreach (DataRow dr in dt.Rows)
            {
                T entity = new T();
                foreach (PropertyInfo pi in propertys)
                {
                    typeName = pi.Name;
                    if (dt.Columns.Contains(typeName))
                    {
                        if (!pi.CanWrite) continue;
                        object value = dr[typeName];
                        if (value == DBNull.Value) continue;
                        if (pi.PropertyType == typeof(string))
                        {
                            pi.SetValue(entity, value.ToString(), null);
                        }
                        else if (pi.PropertyType == typeof(int) || pi.PropertyType == typeof(int?))
                        {
                            pi.SetValue(entity, int.Parse(value.ToString()), null);
                        }
                        else if (pi.PropertyType == typeof(DateTime?) || pi.PropertyType == typeof(DateTime))
                        {
                            pi.SetValue(entity, DateTime.Parse(value.ToString()), null);
                        }
                        else if (pi.PropertyType == typeof(float))
                        {
                            pi.SetValue(entity, float.Parse(value.ToString()), null);
                        }
                        else if (pi.PropertyType == typeof(double))
                        {
                            pi.SetValue(entity, double.Parse(value.ToString()), null);
                        }
                        else
                        {
                            pi.SetValue(entity, value, null);
                        }
                    }
                }
                lst.Add(entity);
            }
            return lst;
        }

    }
}