using System;
using System.Collections.Generic;
using System.Data.OleDb;
using System.Linq;
using System.Text;
using System.Data;
using CnasSynchronousCommon;

namespace CnasSynchronusDAL
{
    public static class MdbDAL
    {
        /// <summary>
        /// 获取所有表名和表结构
        /// </summary>
        /// <param name="strPath"></param>
        /// <returns></returns>
        public static Dictionary<string, DataTable> ReadAccessTables(string strPath, string strPwd,string strAccessVersion)
        {
            Dictionary<string, DataTable> dictTables = new Dictionary<string, DataTable>();
            try
            {
                //连接字符串
                string connstring = string.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                if(!string.IsNullOrWhiteSpace(strAccessVersion)&&strAccessVersion != "0")
                     connstring = string.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                using (OleDbConnection conn = new OleDbConnection(connstring))
                {
                    conn.Open();
                    DataTable TablesName = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, new object[] { null, null, null, "Table" }); //得到所有sheet的名字

                    string sql = "";
                    OleDbDataAdapter ada = null;
                    foreach (DataRow dr in TablesName.Rows)
                    {
                        string strTableName = dr[2].ToString();

                        sql = string.Format("SELECT * FROM [{0}] where 1=0", strTableName); //查询字符串
                        ada = new OleDbDataAdapter(sql, connstring);
                        DataSet set = new DataSet();
                        ada.Fill(set);

                        dictTables.Add(strTableName.ToUpper(), set.Tables[0]);
                    }
                }
            }
            catch (Exception ex)
            {
                //发生异常，写入日志
                AppLog.Error(ex.Message);
            }
            return dictTables;
        }

        internal static DataTable ReadAccessTableStruct(string strPath, string strPwd, string strAccessVersion, string strViewName, string strViewSQL,string strTableName)
        {
            DataTable dt = new DataTable();
            try
            {
                //连接字符串
                string connstring = string.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                if (!string.IsNullOrWhiteSpace(strAccessVersion) && strAccessVersion != "0")
                    connstring = string.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                using (OleDbConnection conn = new OleDbConnection(connstring))
                {
                    conn.Open();

                    //DataTable TablesName = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, new object[] { null, null, null, "Table" }); //得到所有sheet的名字
                    string sql = "";
                    OleDbDataAdapter ada = null;
                    if (strViewName == strTableName && string.IsNullOrWhiteSpace(strViewName))
                        sql = strViewSQL + "where 1=0";
                    else
                        sql = string.Format("select * from [{0}] where 1=0", strTableName); //查询字符串
                    ada = new OleDbDataAdapter(sql, connstring);
                    DataSet set = new DataSet();
                    ada.Fill(set);

                    dt = set.Tables[0];
                }
            }
            catch (Exception ex)
            {
                //发生异常，写入日志
                AppLog.Error(ex.Message);
            }
            return dt;
        }

        public static DataTable ReadAccessTablesByDate(string strPath, string strPwd, string strTableName, string strDateColumn, string strDate, string strAccessVersion,string strSpecialDateFormat,string strViewName, string strViewSQL)
        {
            DataTable dt = new DataTable();
            try
            {
                //连接字符串
                string connstring = string.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                if (!string.IsNullOrWhiteSpace(strAccessVersion) && strAccessVersion != "0")
                     connstring = string.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                using (OleDbConnection conn = new OleDbConnection(connstring))
                {
                    conn.Open();

                    DataTable TablesName = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, new object[] { null, null, null, "Table" }); //得到所有sheet的名字
                    string sql = "";
                    OleDbDataAdapter ada = null;
                    if (strViewName == strTableName && string.IsNullOrWhiteSpace(strViewName))
                        sql = strViewSQL + $" where {strDateColumn} is not null";
                    else
                        sql = string.Format("select * from [{0}] where {1} is not null", strTableName, strDateColumn); //查询字符串
                    ada = new OleDbDataAdapter(sql, connstring);
                    DataSet set = new DataSet();
                    ada.Fill(set);

                    /*将日期字段转换成可识别的数据，然后比较日期大小*/
                    DataTable dt_Middle = set.Tables[0].Clone();
                    DateTime dtTime = DateTime.Now;
                    foreach (DataRow dr in set.Tables[0].Rows)
                    {
                        if (DateTime.TryParse(dr[strDateColumn].ToString(), out dtTime))
                        {
                            if (dtTime > Convert.ToDateTime(strDate))
                            {
                                DataRow drNew = dt_Middle.NewRow();
                                drNew.ItemArray = dr.ItemArray;
                                dt_Middle.Rows.Add(drNew);
                            }
                        }
                        else if (IfSepcialDateFormat(dr[strDateColumn].ToString(), strSpecialDateFormat, ref dtTime))
                        {
                            if (dtTime > Convert.ToDateTime(strDate))
                            {
                                DataRow drNew = dt_Middle.NewRow();
                                drNew.ItemArray = dr.ItemArray;
                                dt_Middle.Rows.Add(drNew);
                            }
                        }
                    }

                    /*将数据库中某些特殊类型的日期数据转换一下格式，便于后续处理*/
                    dt = DateAndTimeTypeOpera(dt_Middle);
                }
            }
            catch (Exception ex)
            {
                //发生异常，写入日志
                AppLog.Error(ex.Message);
            }
            return dt;
        }

        private static bool IfSepcialDateFormat(string strValue,string strSpecialDateFormat, ref DateTime dtTime)
        {
            bool bIfTrue = true;
            try
            {
                dtTime = DateTime.ParseExact(strValue, strSpecialDateFormat, new System.Globalization.CultureInfo("zh-CN", true));
            }
            catch (Exception e)
            {
                bIfTrue = false;
                AppLog.Error(e.Message);
            }
            return bIfTrue;
        }

        public static DataTable ReadAccessTablesByTableName(string strPath, string strUser, string strPwd, string strTableName,string strAccessVersion)
        {
            DataSet set = new DataSet();
            try
            {
                //连接字符串
                string connstring = string.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                if (!string.IsNullOrWhiteSpace(strAccessVersion) && strAccessVersion != "0")
                    connstring = string.Format("Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0};Persist Security Info=False;Jet OLEDB:Database Password={1}", strPath, strPwd);
                using (OleDbConnection conn = new OleDbConnection(connstring))
                {
                    conn.Open();
                    DataTable TablesName = conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, new object[] { null, null, null, "Table" }); //得到所有sheet的名字

                    string sql = "";
                    OleDbDataAdapter ada = null;
                    sql = string.Format("SELECT * FROM [{0}]", strTableName); //查询字符串
                    ada = new OleDbDataAdapter(sql, connstring);

                    ada.Fill(set);
                }
            }
            catch (Exception ex)
            {
                //发生异常，写入日志
                AppLog.Error(ex.Message);
            }
            return set.Tables[0];
        }


        /// <summary>
        /// 获取数据时，单独处理某些（Date和Time）类型数据，并把数据类型转换为字符串类型
        /// </summary>
        private static DataTable DateAndTimeTypeOpera(DataTable dt)
        {
            DataTable dtNewFormat = new DataTable();
            List<string> lstChangeColumn = new List<string>();
            //添加列
            foreach (DataColumn dc in dt.Columns)
            {
                string strDateType = dc.DataType.ToString();
                switch (strDateType.ToUpper())
                {
                    case "SYSTEM.DATETIME":
                        dtNewFormat.Columns.Add(dc.ColumnName, typeof(string));  //使用字符串来存储该字段，而不是采用它的数据库格式（C#无法区分Date, Time，DateTime，前两种格式会自动补充数据，导致数据的不准确）
                        lstChangeColumn.Add(dc.ColumnName);
                        break;
                    default:
                        dtNewFormat.Columns.Add(dc.ColumnName, dc.DataType);
                        break;
                }
            }

            //添加数据行
            foreach (DataRow dr in dt.Rows)
            {
                DataRow drNewRow = dtNewFormat.NewRow();
                foreach (DataColumn dc in dtNewFormat.Columns)
                {
                    if (lstChangeColumn.Contains(dc.ColumnName))
                    {
                        if (dr[dc.ColumnName] != null && dr[dc.ColumnName].ToString() != "")
                        {
                            DateTime dateTime = Convert.ToDateTime(dr[dc.ColumnName]);
                            string strTime = dateTime.ToString("HH:mm:ss");
                            if (dateTime <= Convert.ToDateTime("1900-01-02"))
                            {
                                drNewRow[dc.ColumnName] = strTime;
                            }
                            else
                            {
                                if (strTime == "00:00:00")
                                    drNewRow[dc.ColumnName] = Convert.ToDateTime(dr[dc.ColumnName]).ToString("yyyy-MM-dd");
                                else
                                    drNewRow[dc.ColumnName] = Convert.ToDateTime(dr[dc.ColumnName]).ToString("yyyy-MM-dd HH:mm:ss");
                            }                            
                        }
                    }
                    else
                    {
                        drNewRow[dc.ColumnName] = dr[dc.ColumnName];
                    }
                }
                dtNewFormat.Rows.Add(drNewRow);
            }

            //返回数据
            return dtNewFormat;
        }

    }
}