using System;
using System.Collections.Generic;
using System.IO;
using System.Linq;
using System.Reflection;
using System.Text;
using System.Web;
using NPOI;
using NPOI.HPSF;
using NPOI.HSSF.UserModel;
using NPOI.SS.UserModel;

namespace System
{
    public class NPOIHelper
    {

        
 
/// <summary>
        /// 用於Web匯出
        /// </summary>
        /// <param name="strFileName">檔名</param>
        /// <param name="list">todo: describe list parameter on ExportByWeb</param>
        /// <param name="titleDic">todo: describe titleDic parameter on ExportByWeb</param>
 

        public static void ExportByWeb<T>(List<T> list, string strFileName, Dictionary<string, string> titleDic)
        {
            HttpContext curContext = HttpContext.Current;

            // 設定編碼和附件格式
            curContext.Response.ContentType = "application/vnd.ms-excel
 
";
            curContext.Response.ContentEncoding = Encoding.UTF8;
            curContext.Response.Charset = "";
            strFileName = strFileName + DateTime.Now.ToString("yyyyMMddHHmmss");
            string fileName = HttpUtility.UrlEncode(strFileName, Encoding.UTF8) + ".xls";
            curContext.Response.AppendHeader("Content-Disposition",
                "attachment;filename=" + fileName);

            curContext.Response.BinaryWrite(ListToExcel(list, strFileName, titleDic).GetBuffer());
            curContext.Response.End();
        }

        /// <summary>
        /// List匯出到Excel的MemoryStream
        /// </summary>
        /// <param name="list">需要匯出的泛型List</param>
        /// <param name="strHeaderText">第一行標題頭</param>
        /// <param name="titleDictionaries">列名稱字典對映</param>
        /// <param name="title">todo: describe title parameter on ListToExcel</param>
        /// <param name="titleDic">todo: describe titleDic parameter on ListToExcel</param>
        /// <returns>記憶體流</returns>
        private static MemoryStream ListToExcel<T>(List<T> list, string strHeaderText = null,
            Dictionary<string, string> titleDic = null)
        {
            HSSFWorkbook workbook = new HSSFWorkbook();
            HSSFSheet sheet = (HSSFSheet)workbook.CreateSheet();

            //設定檔案屬性
            SetFileSummary(strHeaderText, workbook);

            //獲取列寬
            int[] arrColWidth = GetColumnWidth(titleDic);

            //日期風格
            ICellStyle dateStyle = GetDateStyle(workbook);

            //Excel標題風格
            HSSFCellStyle headStyle = GetHeadStyle(workbook);

            /*在第一行建立標題行*/
            CreateHeadRow(titleDic, sheet, arrColWidth, headStyle);

            //通過反射得到物件的屬性集合  
            Type type = null;
            if (list != null && list.Count > 0)
            {
                type = list.First().GetType();
                for (int row = 0; row < list.Count; row++)
                {
                    HSSFRow dataRow = (HSSFRow)sheet.CreateRow(row + 1);

                    int cellIndex = 0;
                    foreach (var dicItem in titleDic)
                    {
                        HSSFCell newCell = (HSSFCell)dataRow.CreateCell(cellIndex);

                        string drValue = string.Empty;

                        PropertyInfo propInfo = type.GetProperty(dicItem.Key);

                        var propValue = type.GetProperty(dicItem.Key).GetValue(list[row]);
                        if (propValue != null)
                        {
                            drValue = propValue.ToString();
                        }
                        SetCellValueByType(newCell, drValue, propInfo, dateStyle);

                        cellIndex = cellIndex + 1;
                    }
                }
            }

            using (MemoryStream ms = new MemoryStream())
            {
                workbook.Write(ms);
                ms.Flush();
                ms.Position = 0;
                workbook.Close();
                return ms;
            }
        }

        private static void SetCellValueByType(HSSFCell newCell, string drValue, PropertyInfo propInfo, ICellStyle dateStyle)
        {
            if (string.IsNullOrEmpty(drValue))
            {
                return;
            }

            string propertyName = GetPropertyFullName(propInfo);

            switch (propertyName)
            {
                case "System.String": //字串型別
                    newCell.SetCellValue(drValue);
                    break;
                case "System.DateTime": //日期型別
                    DateTime dateV;
                    DateTime.TryParse(drValue, out dateV);
                    newCell.SetCellValue(dateV);

                    newCell.CellStyle = dateStyle; //格式化顯示
                    break;
                case "System.Boolean": //布林型
                    bool boolV = false;
                    bool.TryParse(drValue, out boolV);
                    newCell.SetCellValue(boolV);
                    break;
                case "System.Int16": //整型
                case "System.Int32":
                case "System.Int64":
                case "System.Byte":
                    int intV = 0;
                    int.TryParse(drValue, out intV);
                    newCell.SetCellValue(intV);
                    break;
                case "System.Decimal": //浮點型
                case "System.Double":
                    double doubV = 0;
                    double.TryParse(drValue, out doubV);
                    newCell.SetCellValue(doubV);
                    break;
                case "System.DBNull": //空值處理
                    newCell.SetCellValue("");
                    break;
                default:
                    newCell.SetCellValue(drValue);
                    break;
            }
        }

        private static string GetPropertyFullName(PropertyInfo propInfo)
        {
            var propertyName = propInfo.PropertyType.FullName;
            if (propInfo.PropertyType.IsGenericType && propInfo.PropertyType.GetGenericTypeDefinition() == typeof(Nullable<>))
            {
                propertyName = propInfo.PropertyType.GetGenericArguments()[0].FullName;
            }

            return propertyName;
        }

        public static object GetCellValueByType(ICell cell, PropertyInfo propInfo)
        {
            if (string.IsNullOrWhiteSpace(cell.ToString()))
            {
                return string.Empty;
            }
            if (propInfo.PropertyType.IsEnum)
            {
                return Enum.Parse(propInfo.PropertyType, cell.ToString());
            }
            string propertyName = GetPropertyFullName(propInfo);
            switch (propertyName)
            {
                case "System.String": //字串型別
                    return cell.ToString();
                case "System.DateTime": //日期型別
                    return cell.DateCellValue;
                case "System.Boolean": //布林型
                    return cell.BooleanCellValue;
                case "System.Int16": //整型
                case "System.Int32":
                case "System.Int64":
                    int.TryParse(cell.ToString(), out int value);
                    return value;
                case "System.Byte":
                case "System.Decimal": //浮點型
                case "System.Double":
                    return cell.NumericCellValue;
                case "System.Single":
                    return Convert.ToSingle(cell.ToString());
                default:
                    return cell.ToString();
            }
        }

        private static void CreateHeadRow(Dictionary<string, string> titleDic, HSSFSheet sheet, int[] arrColWidth, HSSFCellStyle headStyle)
        {
            HSSFRow headerRow = (HSSFRow)sheet.CreateRow(0);

            int colIndex = 0;
            foreach (var dicItem in titleDic)
            {
                string columnName = dicItem.Value;
                headerRow.CreateCell(colIndex).SetCellValue(columnName);
                headerRow.GetCell(colIndex).CellStyle = headStyle;
                //設定列寬
                sheet.SetColumnWidth(colIndex, (arrColWidth[colIndex] + 1) * 500);
                colIndex++;
            }
        }

        private static HSSFCellStyle GetHeadStyle(HSSFWorkbook workbook)
        {
            HSSFCellStyle headStyle = (HSSFCellStyle)workbook.CreateCellStyle();
            HSSFFont font = (HSSFFont)workbook.CreateFont();
            font.FontHeightInPoints = 14;
            font.Boldweight = 500;
            font.FontName = "宋體";
            headStyle.SetFont(font);
            headStyle.VerticalAlignment = VerticalAlignment.Center;
            headStyle.Alignment = HorizontalAlignment.Center;//水平對齊
            return headStyle;
        }

        private static HSSFCellStyle GetDateStyle(HSSFWorkbook workbook)
        {
            HSSFCellStyle dateStyle = (HSSFCellStyle)workbook.CreateCellStyle();
            HSSFDataFormat format = (HSSFDataFormat)workbook.CreateDataFormat();
            dateStyle.DataFormat = format.GetFormat("yyyy-mm-dd HH:mm:ss");
            return dateStyle;
        }

        /// <summary>
        /// 設定檔案屬性資訊
        /// </summary>
        /// <param name="strHeaderText"></param>
        /// <param name="workbook"></param>
        private static void SetFileSummary(string strHeaderText, HSSFWorkbook workbook)
        {
            DocumentSummaryInformation dsi = PropertySetFactory.CreateDocumentSummaryInformation();
            dsi.Company = "NPOI";
            workbook.DocumentSummaryInformation = dsi;

            SummaryInformation si = PropertySetFactory.CreateSummaryInformation();
            si.Author = ""; //填加xls檔案作者資訊
            si.ApplicationName = "管理系統"; //填加xls檔案建立程式資訊
            si.LastAuthor = ""; //填加xls檔案最後儲存者資訊
            si.Comments = ""; //填加xls檔案作者資訊
            si.Title = strHeaderText; //填加xls檔案標題資訊
            si.Subject = ""; //填加檔案主題資訊
            si.CreateDateTime = DateTime.Now;
            workbook.SummaryInformation = si;
        }

        /// <summary>
        /// 獲取列寬
        /// </summary>
        /// <param name="titleDic"></param>
        /// <returns></returns>
        private static int[] GetColumnWidth(Dictionary<string, string> titleDic)
        {
            int fieldsCount = titleDic.Count;
            int[] arrColWidth = new int[fieldsCount];
            int index = 0;
            foreach (var item in titleDic)
            {
                arrColWidth[index] = Encoding.GetEncoding(936).GetBytes(item.Value).Length;
                index++;
            }

            return arrColWidth;
        }
    }
}