using Oracle.ManagedDataAccess.Client;
using System;
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace UAS_XmlAnalysor
{
    class DataHelper
    {
        //系统默认的的连接字符串
        private string ConnectionStrings = Properties.Settings.Default.Properties["MES"].DefaultValue.ToString();
        //用户选择的数据库的连接字符串
        public static string DBConnectionString;
        public static OracleConnection connection = null;
        OracleCommand command = null;
        /// <summary>
        /// 执行构造函数的时候打开数据库的链接
        /// </summary>
        public DataHelper()
        {
            try
            {
                //如果选择的是默认数据则直接用配置文件的信息连接，否则选择数据库的账套信息
                if (DBConnectionString == null || DBConnectionString == ConnectionStrings)
                    connection = new OracleConnection(ConnectionStrings);
                else
                    connection = new OracleConnection(DBConnectionString);
                connection.Open();
                command = new OracleCommand();
                command.Connection = connection;
                command.CommandTimeout = 0;
            }
            catch (Exception) { }
        }


        /// <summary>
        /// 获取第一行第一列的信息
        /// </summary>
        public object getFieldDataByCondition(string TableName, string Field, string Condition)
        {
            DataTable dt = new DataTable();
            string sql = "select " + Field + " from " + TableName + " where " + Condition;
            command.CommandText = sql;
            command.CommandType = CommandType.Text;
            Reconnect(command);
            OracleDataAdapter ad = new OracleDataAdapter();
            ad.SelectCommand = command;
            try
            {
                ad.Fill(dt);
            }
            catch (Exception)
            {
                connection = new OracleConnection(DBConnectionString);
                connection.Open();
                command.Connection = connection;
                ad = new OracleDataAdapter();
                ad.SelectCommand = command;
                ad.Fill(dt);
            }
            ad.Dispose();
            if (dt.Rows.Count > 0)
            {
                return dt.Rows[0][0];
            }
            else
            {
                return "";
            }
        }

        /// <summary>
        /// 通过表名和获取单行的记录
        /// </summary>
        public DataTable getFieldsDataByCondition(string TableName, string[] Fields, string Condition)
        {
            DataTable dt = new DataTable();
            string sql = "select ";
            sql += AddField(Fields);
            sql += " from " + TableName + " where " + Condition + " and rownum=1";
            command.CommandText = sql;
            command.CommandType = CommandType.Text;
            Reconnect(command);
            OracleDataAdapter ad = new OracleDataAdapter(command);
            try
            {
                ad.Fill(dt);
            }
            catch (Exception)
            {
                connection = new OracleConnection(DBConnectionString);
                connection.Open();
                command.Connection = connection;
                ad = new OracleDataAdapter();
                ad.SelectCommand = command;
                ad.Fill(dt);
            }
            ad.Dispose();
            return dt;
        }

        /// <summary>
        /// 通过表名，字段和条件获取DataTable类型的数据
        /// </summary>
        public DataTable getFieldsDatasByCondition(string TableName, string[] Fields, string Condition)
        {
            DataTable dt = new DataTable();
            string sql = "select ";
            sql += AddField(Fields);
            sql += " from " + TableName + " where " + Condition;
            command.CommandText = sql;
            command.CommandType = CommandType.Text;
            Reconnect(command);
            OracleDataAdapter ad = new OracleDataAdapter(command);
            try
            {
                ad.Fill(dt);
            }
            catch (Exception)
            {
                connection = new OracleConnection(DBConnectionString);
                connection.Open();
                command.Connection = connection;
                ad = new OracleDataAdapter();
                ad.SelectCommand = command;
                ad.Fill(dt);
            }
            ad.Dispose();
            return dt;
        }

        /// <summary>
        /// 检测内容是否存在
        /// </summary>
        /// <param name="TableName"></param>
        /// <param name="Condition"></param>
        /// <returns></returns>
        public bool CheckExist(string TableName, string Condition)
        {
            string sql = "select count(1) from " + TableName + " where " + Condition;
            command.CommandText = sql;
            command.CommandType = CommandType.Text;
            Reconnect(command);
            OracleDataAdapter ad = new OracleDataAdapter(command);
            DataTable dt = new DataTable();
            ad.Fill(dt);
            ad.Dispose();
            return int.Parse(dt.Rows[0][0].ToString()) > 0;
        }

        /// <summary>
        /// 直接执行SQL，同时传入SQL的类型
        /// </summary>
        /// <param name="SQL"></param>
        /// <param name="Type"></param>
        /// <returns></returns>
        public object ExecuteSql(string SQL, string Type, params object[] names)
        {
            command.Parameters.Clear();
            object result = null;
            command.CommandText = SQL;
            command.CommandType = CommandType.Text;
            Reconnect(command);
            //用来拼接参数的
            if (names.Length > 0)
            {
                string[] par = SQL.Split(':');
                //用来存参数的数组
                StringBuilder[] addpar = new StringBuilder[par.Length - 1];
                for (int i = 0; i < par.Length - 1; i++)
                {
                    //新建一个char类型的数组用来存储每个字节的变量
                    char[] c = par[i + 1].ToCharArray();
                    addpar[i] = new StringBuilder();
                    for (int j = 0; j < c.Length; j++)
                    {
                        if (c[j] != ' ' && c[j] != ',')
                        {
                            addpar[i].Append(c[j]);
                        }
                        else
                        {
                            break;
                        }
                    }
                }
                for (int i = 0; i < addpar.Length; i++)
                    command.Parameters.Add(new OracleParameter(addpar[i].ToString(), OracleDbType.Varchar2, names[i], ParameterDirection.Input));
            }
            switch (Type.ToUpper())
            {
                case "SELECT":
                    OracleDataAdapter ad = new OracleDataAdapter(command);
                    result = new DataTable();
                    try
                    {
                        ad.Fill((DataTable)result);
                    }
                    catch (Exception)
                    {
                        connection = new OracleConnection(DBConnectionString);
                        connection.Open();
                        command.Connection = connection;
                        ad = new OracleDataAdapter();
                        ad.SelectCommand = command;
                        ad.Fill((DataTable)result);
                    }
                    break;
                case "DELETE":
                    try
                    {
                        result = command.ExecuteNonQuery();
                    }
                    catch (Exception)
                    {
                        command.Connection = new OracleConnection(DBConnectionString);
                        command.Connection.Open();
                        result = command.ExecuteNonQuery();
                    }
                    break;
                case "UPDATE":
                    try
                    {
                        result = command.ExecuteNonQuery();
                    }
                    catch (Exception)
                    {
                        command.Connection = new OracleConnection(DBConnectionString);
                        command.Connection.Open();
                        result = command.ExecuteNonQuery();
                    }
                    break;
                case "INSERT":
                    try
                    {
                        result = command.ExecuteNonQuery();
                    }
                    catch (Exception)
                    {
                        command.Connection = new OracleConnection(DBConnectionString);
                        command.Connection.Open();
                        result = command.ExecuteNonQuery();
                    }
                    break;
            }
            return result;
        }

        /// <summary>
        /// 取Configs表中的配置，进行该客户是否执行某个操作
        /// </summary>
        /// <param name="Code"></param>
        /// <param name="Caller"></param>
        /// <returns></returns>
        public object GetConfig(string Code, string Caller)
        {
            DataTable dt = new DataTable();
            string sql = "select Data from configs where code='" + Code + "' and caller='" + Caller + "'";
            dt = (DataTable)ExecuteSql(sql, "select");
            if (dt.Rows.Count == 0)
            {
                return "";
            }
            else
            {
                return dt.Rows[0]["Data"];
            }
        }

        /// <summary>
        /// 获取指定表的记录的条数 ,带条件
        /// </summary>
        /// <returns></returns>
        public int getRowCount(string TableName, string Condition)
        {
            DataTable dt = new DataTable();
            string sql = "select count(1) from " + TableName + " where " + Condition;
            command.CommandText = sql;
            command.CommandType = CommandType.Text;
            Reconnect(command);
            OracleDataAdapter ad = new OracleDataAdapter(command);
            ad.Fill(dt);
            ad.Dispose();
            return int.Parse(dt.Rows[0][0].ToString());
        }

        /// <summary>
        /// 根据Caller获取流水号
        /// </summary>
        /// <param name="Caller"></param>
        /// <returns></returns>
        public string GetSerialNumberByCaller(string Caller)
        {
            string SerialNumber = getFieldDataByCondition("MaxNumbers", "mn_number", "mn_tablename='" + Caller + "'").ToString();
            UpdateByCondition("MaxNumbers", "mn_number=mn_number+1", "mn_tablename='" + Caller + "'");
            return SerialNumber;
        }

        /// <summary>
        /// 根据主键ID删除表的数据
        /// </summary>
        /// <param name="TableName">表名</param>
        /// <param name="ID">主键</param>
        /// <param name="DeleteID">需要删除主键ID的数组</param>
        public void DeleteDataByID(string TableName, string ID, string[] DeleteID)
        {
            command.Parameters.Clear();
            string sql = "delete from " + TableName + " where " + ID + " =:DeleteID";
            command.CommandText = sql;
            Reconnect(command);
            command.ArrayBindCount = DeleteID.Length;
            command.Parameters.Add(new OracleParameter("DeleteID", OracleDbType.Long, DeleteID, ParameterDirection.Input));
            try
            {
                command.ExecuteNonQuery();
            }
            catch (Exception)
            {
                command.Connection = new OracleConnection(DBConnectionString);
                command.Connection.Open();
                command.ExecuteNonQuery();
            }
        }

        /// <summary>
        /// 通过序列的名称获取序列
        /// </summary>
        /// <param name="SeqName"></param>
        /// <returns></returns>
        public string GetSEQ(string SeqName)
        {
            DataTable dt = new DataTable();
            dt = (DataTable)ExecuteSql("SELECT " + SeqName + ".NEXTVAL FROM DUAL", "select");
            return dt.Rows[0][0].ToString();
        }

        /// <summary>
        /// 通过序列的名称获取序列
        /// </summary>
        /// <param name="SeqName"></param>
        /// <returns></returns>
        public string[] GetSEQ(string SeqName, int Num)
        {
            DataTable dt = new DataTable();
            dt = (DataTable)ExecuteSql("select " + SeqName + ".nextval from (select 1 from OQCITEMSAMPLES where rownum<" + (Num + 1) + ")", "select");
            string[] SerialNum = new string[dt.Rows.Count];
            for (int i = 0; i < dt.Rows.Count; i++)
            {
                SerialNum[i] = dt.Rows[i][0].ToString();
            }
            return SerialNum;
        }

        public void SaveDataTable(DataTable dt, string TableName, string ID, params string[] sql)
        {
            if (dt == null)
            {
                return;
            }
            StringBuilder sb = new StringBuilder();
            //预防插入的DataTable中存在不属于该表的列，在进行下一步操作之前全部剔除
            DataTable data = (DataTable)ExecuteSql("select Column_Name,Data_Type from cols where TABLE_name=upper('" + TableName + "')", "select");
            //将所有的字段拼接起来
            for (int i = 0; i < data.Rows.Count; i++)
            {
                sb.Append("#" + data.Rows[i]["Column_Name"].ToString());
            }
            //移除掉所有不属于该表的列
            for (int i = dt.Columns.Count - 1; i >= 0; i--)
            {
                if (!sb.ToString().Contains(dt.Columns[i].ColumnName.ToUpper()))
                {
                    dt.Columns.RemoveAt(i);
                }
            }
            sb.Clear();
            //计算有多少个是新加的行,根据主键为空来进行判断
            int NewRowCount = 0;
            for (int i = 0; i < dt.Rows.Count; i++)
            {
                if (dt.Rows[i][ID] == null || dt.Rows[i][ID].ToString() == "")
                {
                    NewRowCount = NewRowCount + 1;
                }
            }
            if (sql.Length > 0)
            {
                if (NewRowCount > 0)
                {
                    //获取参数的个数
                    int paramsNum = sql[0].Split(':').Length - 1;
                    //解析参数的数据
                    string[] param = GetParamFromSQL(sql[0]);
                    //新建一个二维数组去
                    string[][] param_array = new string[paramsNum][];
                    //实例化每个一维数组
                    for (int i = 0; i < paramsNum; i++)
                    {
                        param_array[i] = new string[NewRowCount];
                    }
                    //设置每列参数的索引
                    int num = 0;
                    //变量所有的行，如果有主键为空的则移除，不为空的进行参数的拼接
                    for (int i = dt.Rows.Count - 1; i >= 0; i--)
                    {
                        if (dt.Rows[i][ID] == null || dt.Rows[i][ID].ToString() == "")
                        {
                            //当为新添加行的时候才去设置参数，设置过后索引+1
                            for (int j = 0; j < paramsNum; j++)
                            {
                                param_array[j][num] = dt.Rows[i][param[j]].ToString();
                            }
                            dt.Rows.RemoveAt(i);
                            num++;
                        }
                    }
                    BatchInsertDataTable(sql[0], param, param_array);
                }
            }
            sb.Clear();
            sb.Append("update " + TableName + " set ");
            int ColumnCount = dt.Columns.Count;
            int RowCount = dt.Rows.Count;
            //存数据的参数
            List<string[]> Parameter = new List<string[]>();
            //存参数名的参数
            string[] ParName = new string[ColumnCount];
            for (int i = 0; i < ColumnCount; i++)
            {
                ParName[i] = dt.Columns[i].ColumnName;
                if (i == dt.Columns.Count - 1)
                    sb.Append(dt.Columns[i].ColumnName + "=:" + dt.Columns[i].ColumnName);
                else
                    sb.Append(dt.Columns[i].ColumnName + "=:" + dt.Columns[i].ColumnName + ",");
            }
            sb.Append(" where " + ID + " =:" + ID);
            //先添加参数
            Parameter.Add(ParName);
            //添加参数的具体内容
            for (int i = 0; i < ColumnCount; i++)
            {
                string[] par = new string[RowCount];
                for (int j = 0; j < RowCount; j++)
                {
                    par[j] = dt.Rows[j][i].ToString();
                }
                Parameter.Add(par);
            }
            BatchInsert(sb.ToString(), Parameter.ToArray());
        }

        /// <summary>
        /// 批量通过SQL来执行插入操作 ，参数的第一个数一个string[]数组，用来传递需要添加的参数的名称
        /// 之后的是名称参数数组对应的 ，所有的插入参数数据长度必须是一致的
        /// </summary>
        /// <param name="sql"></param>
        /// <param name="names"></param>
        public void BatchInsert(string sql, params object[][] names)
        {
            command.Parameters.Clear();
            command.CommandText = sql;
            Reconnect(command);
            command.ArrayBindCount = names[1].Length;
            //因为第一个数组保存的是参数的名称，所以循环从1而不是0开始
            //将第一个数组的下标固定为0作为循环添加的参数的名称
            for (int i = 1; i <= names[0].Length; i++)
            {
                command.Parameters.Add(new OracleParameter(names[0][i - 1].ToString(), OracleDbType.Varchar2, names[i], ParameterDirection.Input));
            }
            try
            {
                command.ExecuteNonQuery();
            }
            catch (Exception)
            {
                command.Connection = new OracleConnection(DBConnectionString);
                command.Connection.Open();
                command.ExecuteNonQuery();
            }
        }

        public void BatchInsertDataTable(string sql, string[] param, params object[][] param1)
        {
            command.Parameters.Clear();
            command.CommandText = sql;
            Reconnect(command);
            command.ArrayBindCount = param1[0].Length;
            //因为第一个数组保存的是参数的名称，所以循环从1而不是0开始
            //将第一个数组的下标固定为0作为循环添加的参数的名称
            for (int i = 0; i < param.Length; i++)
            {
                command.Parameters.Add(new OracleParameter(param[i].ToString(), OracleDbType.Varchar2, param1[i], ParameterDirection.Input));
            }
            try
            {
                command.ExecuteNonQuery();
            }
            catch (Exception)
            {
                command.Connection = new OracleConnection(DBConnectionString);
                command.Connection.Open();
                command.ExecuteNonQuery();
            }
        }

        /// <summary>
        /// 通过条件更新
        /// </summary>
        /// <param name="TableName"></param>
        /// <param name="update"></param>
        /// <param name="condition"></param>
        public string UpdateByCondition(string TableName, string update, string condition)
        {
            string sql = "update " + TableName + " set " + update + " where " + condition;
            command.CommandText = sql;
            command.CommandType = CommandType.Text;
            Reconnect(command);
            try
            {
                command.ExecuteNonQuery();
            }
            catch (Exception)
            {
                command.Connection = new OracleConnection(DBConnectionString);
                command.Connection.Open();
                command.ExecuteNonQuery();
            }
            return sql;
        }

        /// <summary>
        /// 调用存储过程
        /// </summary>
        /// <param name="ProcedureName"></param>    
        /// <param name="param"></param>
        public void CallProcedure(string ProcedureName, ref string[] param)
        {
            command.Parameters.Clear();
            command.CommandText = ProcedureName;
            command.CommandType = CommandType.StoredProcedure;
            Reconnect(command);
            for (int i = 0; i < param.Length; i++)
                command.Parameters.Add(new OracleParameter(param[i].ToString(), OracleDbType.Varchar2, 200, param[i], ParameterDirection.InputOutput));
            try
            {
                command.ExecuteNonQuery();
            }
            catch (Exception)
            {
                command.Connection = new OracleConnection(DBConnectionString);
                command.Connection.Open();
                command.ExecuteNonQuery();
            }
            for (int i = 0; i < command.Parameters.Count; i++)
                param[i] = command.Parameters[i].Value.ToString();

        }

        /// <summary>
        /// 出现异常进行回滚的执行方法
        /// </summary>
        /// <param name="SQL"></param>
        public void ExecuteSQLTran(params string[] SQL)
        {
            OracleTransaction tx = connection.BeginTransaction();
            command.Transaction = tx;
            try
            {
                foreach (string sql in SQL)
                {
                    if (!String.IsNullOrEmpty(sql))
                    {
                        command.CommandText = sql;
                        command.CommandType = CommandType.Text;
                        try
                        {
                            command.ExecuteNonQuery();
                        }
                        catch (Exception)
                        {
                            command.Connection = new OracleConnection(DBConnectionString);
                            command.Connection.Open();
                            command.ExecuteNonQuery();
                        }
                    }
                }
                tx.Commit();
            }
            catch (Exception E)
            {
                tx.Rollback();
                throw new Exception(E.Message);
            }
        }

        /// <summary>
        /// 用于将string 的数组转换成SQL的查询内容
        /// </summary>
        /// <param name="Fields"></param>
        /// <returns></returns>
        private string AddField(string[] Fields)
        {
            string sql = " ";
            foreach (string field in Fields)
            {
                sql += field + ",";
            }
            return sql.Substring(0, sql.Length - 1);
        }

        /// <summary>
        /// 通过查询的语句获取查询的字段
        /// </summary>
        /// <param name="field"></param>
        /// <returns></returns>
        private static string[] GetField(string field)
        {
            string[] fields = field.Split(',');
            for (int i = 0; i < fields.Length; i++)
            {
                fields[i] = fields[i].Substring(fields[i].LastIndexOf("as") + 2, fields[i].Length - fields[i].LastIndexOf("as") - 2).Trim();
            }
            return fields;
        }

        public static string[] GetParamFromSQL(string SQL)
        {
            string[] par = SQL.Split(':');
            //用来存参数的数组
            StringBuilder[] addpar = new StringBuilder[par.Length - 1];
            string[] param = new string[par.Length - 1];
            for (int i = 0; i < par.Length - 1; i++)
            {
                //新建一个char类型的数组用来存储每个字节的变量
                char[] c = par[i + 1].ToCharArray();
                addpar[i] = new StringBuilder();

                for (int j = 0; j < c.Length; j++)
                {
                    if (c[j] != ' ' && c[j] != ',' && c[j] != ')')
                    {
                        addpar[i].Append(c[j]);
                    }
                    else
                    {
                        break;
                    }
                }
            }
            for (int i = 0; i < par.Length - 1; i++)
            {
                param[i] = addpar[i].ToString();
            }
            return param;
        }

        public void Dispose()
        {
            command.Dispose();
            connection.Dispose();
        }

        private void Reconnect(OracleCommand cmd)
        {
            if (cmd.Connection.State == ConnectionState.Closed)
            {
                cmd.Connection.Open();
            }
        }
    }
}