using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Data.OracleClient;
using System.Diagnostics;
using System.IO;
using System.ServiceProcess;
using System.Text;
using System.Threading;
using System.Timers;
using System.Xml;
using DBUtil;
using FQDService.Utils;

namespace FQDService
{
    /// <summary>
    /// FQD服務
    /// </summary>
    partial class FQDService : ServiceBase
    {
        #region 變量
        /// <summary>
        /// 存儲過程配置文檔
        /// </summary>
        public static XmlDocument doc;
        /// <summary>
        /// 執行存儲過程線程數鎖
        /// </summary>
        public static Object lockTreadCount = new Object();
        /// <summary>
        /// 執行存儲過程超時時間
        /// </summary>
        public static int timeout = 1000;
        /// <summary>
        /// 等待執行存儲過程時間間隔
        /// </summary>
        public static int interval = 100;
        /// <summary>
        /// 執行存儲過程最大數
        /// </summary>
        public static int maxRunProcCount = 5;
        /// <summary>
        /// 執行存儲過程數
        /// </summary>
        public static int runProcCount = 0;
        #endregion

        #region 構造函數
        public FQDService()
        {
            InitializeComponent();
        }
        #endregion

        #region 啟動
        protected override void OnStart(string[] args)
        {
            // TODO: 在此處添加代碼以啟動服務。
            doc = XMLHelper.GetXmlDocument();
            System.Timers.Timer timer = new System.Timers.Timer(60 * 1000);
            timer.Elapsed += new System.Timers.ElapsedEventHandler(RunProc);
            timer.Start();
        }
        #endregion

        #region 結束
        protected override void OnStop()
        {
            // TODO: 在此處添加代碼以執行停止服務所需的關閉操作。
        }
        #endregion

        #region 執行存儲過程
        /// <summary>
        /// 執行存儲過程
        /// </summary>
        public void RunProc(object sender, ElapsedEventArgs e)
        {
            try
            {
                Random rnd = new Random();
                XmlNode rootNode = doc.SelectSingleNode("settings");

                foreach (XmlNode procNode in rootNode.ChildNodes) // 遍歷Proc
                {
                    string procName = procNode.SelectSingleNode("Name").InnerText.Trim();
                    string runTime = procNode.SelectSingleNode("RunTime").InnerText.Trim();

                    if (DateTime.Now.ToString("HH:mm") == "14:55")
                    {
                        bool finish = false; //存儲過程是否執行完畢
                        Thread thread = null;
                        thread = new Thread(new ParameterizedThreadStart(delegate(object obj)
                        {
                            #region 等待執行存儲過程
                            lock (lockTreadCount)
                            {
                                while (runProcCount >= maxRunProcCount)
                                {
                                    Thread.Sleep(interval);
                                }
                                runProcCount++;
                            }
                            #endregion

                            #region 執行存儲過程超時處理
                            Thread threadTimer = new Thread(new ParameterizedThreadStart(delegate(object obj2)
                            {
                                Thread.Sleep(timeout);
                                if (finish == false)
                                {
                                    FileLogger.WriteLog(string.Format("存儲過程{0}執行超時", procName));
                                    if (thread != null)
                                    {
                                        try
                                        {
                                            thread.Abort();
                                        }
                                        catch (Exception ex)
                                        {
                                            FileLogger.WriteErrorLog(string.Format("存儲過程{0}終止線程出錯：{1}", procName, ex.Message));
                                        }
                                    }
                                }
                            }));
                            threadTimer.Start();
                            #endregion

                            #region 為執行存儲過程準備參數
                            XmlNodeList paramList = procNode.SelectSingleNode("Params").ChildNodes;
                            OracleParameter[] oracleParams = new OracleParameter[paramList.Count];
                            for (int i = 0; i < paramList.Count; i++) // 遍歷param
                            {
                                XmlNode paramNode = paramList[i];
                                string paramName = paramNode.SelectSingleNode("Name").InnerText.Trim();
                                string paramType = paramNode.SelectSingleNode("Type").InnerText.Trim();
                                string paramValue = paramNode.SelectSingleNode("Value").InnerText.Trim();

                                oracleParams[i] = new OracleParameter(paramName, Enum.Parse(typeof(OracleType), paramType));
                                if ((OracleType)Enum.Parse(typeof(OracleType), paramType) == OracleType.DateTime)
                                {
                                    DateTime now = DateTime.Now;
                                    string[] paramValueArray = paramValue.Split(':');
                                    oracleParams[i].Value = new DateTime(now.Year, now.Month, now.Day, int.Parse(paramValueArray[0]), int.Parse(paramValueArray[1]), int.Parse(paramValueArray[2]));
                                }
                                else
                                {
                                    oracleParams[i].Value = paramValue;
                                }
                            }
                            #endregion

                            try
                            {
                                try
                                {
                                    #region 執行存儲過程
                                    FileLogger.WriteLog(string.Format("開始執行存儲過程{0}", procName));

                                    //執行存儲過程
                                    //OracleHelper.RunProcedure(procName, oracleParams);

                                    //模擬執行存儲過程
                                    Thread.Sleep(rnd.Next(100, 1900));

                                    FileLogger.WriteLog(string.Format("存儲過程{0}執行成功", procName));
                                    finish = true;
                                    #endregion
                                }
                                catch (Exception ex)
                                {
                                    #region 執行存儲過程失敗日志
                                    StringBuilder sbParams = new StringBuilder();
                                    foreach (OracleParameter oracleParam in oracleParams)
                                    {
                                        sbParams.Append(string.Format("{0}:{1},", oracleParam.ParameterName, oracleParam.Value.ToString()));
                                    }
                                    string strParams = "";
                                    if (sbParams.Length > 0) strParams = sbParams.ToString(0, sbParams.Length - 1);
                                    FileLogger.WriteErrorLog(string.Format("存儲過程執行失敗{0}({1})：{2}", procName, strParams, ex.Message));
                                    #endregion
                                }
                            }
                            catch
                            {
                                //捕獲線程終止異常
                            }
                            finally
                            {
                                runProcCount--;
                            }
                        }));
                        thread.Start();
                    }
                }
            }
            catch (Exception ex)
            {
                FileLogger.WriteErrorLog(ex.Message);
            }
        }
        #endregion

    }
}