using System;
using System.IO;
using System.Text;
using System.Text.RegularExpressions;
using System.Collections;
using Discuz.Common.Generic;

namespace Discuz.Common
{
	/// <summary>
	/// Template为页面模板类.
	/// </summary>
	public abstract class PageTemplate
	{
		public static Regex[] r = new Regex[25];

	    private Dictionary<string, string> headerTemplateCache = new Dictionary<string, string>();

        /// <summary>
        /// 解析特殊变量
        /// </summary>
        /// <returns></returns>
        public abstract string ReplaceSpecialTemplate(string forumPath, string skinName, string strTemplate);		

		static PageTemplate()
		{

			RegexOptions options = Utils.GetRegexCompiledOptions();

			r[0] = new Regex(@"<%template ([^\[\]\{\}\s]+)%>", options);
			r[1] = new Regex(@"<%loop ((\(([a-zA-Z]+)\) )?)([^\[\]\{\}\s]+) ([^\[\]\{\}\s]+)%>", options);
			r[2] = new Regex(@"<%\/loop%>", options);
			r[3] = new Regex(@"<%while ([^\[\]\{\}\s]+)%>", options);
			r[4] = new Regex(@"<%\/while ([^\[\]\{\}\s]+)%>", options);
			r[5] = new Regex(@"<%if (?:\s*)(([^\s]+)((?:\s*)(\|\||\&\&)(?:\s*)([^\s]+))?)(?:\s*)%>", options);
			r[6] = new Regex(@"<%else(( (?:\s*)if (?:\s*)(([^\s]+)((?:\s*)(\|\||\&\&)(?:\s*)([^\s]+))?))?)(?:\s*)%>", options);
			r[7] = new Regex(@"<%\/if%>", options);

			//解析{var.a}
			r[8] = new Regex(@"(\{strtoint\(([^\s]+?)\)\})", options);

			//解析{request[a]}
			r[9] = new Regex(@"(<%urlencode\(([^\s]+?)\)%>)", options);

			//解析{var[a]}
			r[10] = new Regex(@"(<%datetostr\(([^\s]+?),(.*?)\)%>)", options);
			r[11] = new Regex(@"(\{([^\.\[\]\{\}\s]+)\.([^\[\]\{\}\s]+)\})", options);

			//解析普通变量{}
			r[12] = new Regex(@"(\{request\[([^\[\]\{\}\s]+)\]\})", options);

			//解析==表达式
			r[13] = new Regex(@"(\{([^\[\]\{\}\s]+)\[([^\[\]\{\}\s]+)\]\})", options);

			//解析==表达式
			r[14] = new Regex(@"({([^\[\]/\{\}='\s]+)})", options);

			//解析普通变量{}
			r[15] = new Regex(@"({([^\[\]/\{\}='\s]+)})", options);

			//解析==表达式
			r[16] = new Regex(@"(([=|>|<|!]=)\\" + "\"" + @"([^\s]*)\\" + "\")", options);
			
			//命名空间
			r[17] = new Regex(@"<%namespace (?:""?)([\s\S]+?)(?:""?)%>", options);
			
			//C#代码
			r[18] = new Regex(@"<%csharp%>([\s\S]+?)<%/csharp%>", options);

			//set标签
			r[19] = new Regex(@"<%set ((\(([a-zA-Z]+)\))?)(?:\s*)\{([^\s]+)\}(?:\s*)=(?:\s*)(.*?)(?:\s*)%>", options);

			//截取字符串
			r[20] = new Regex(@"(<%getsubstring\(([^\s]+?),(.\d*?),([^\s]+?)\)%>)", options);
		  
			//repeat标签
			r[21] = new Regex(@"<%repeat\(([^\s]+?)(?:\s*),(?:\s*)([^\s]+?)\)%>", options);

			//继承类Inherits
			r[22] = new Regex(@"<%inherits (?:""?)([\s\S]+?)(?:""?)%>", options);

			r[23] = new Regex(@"<%continue%>");
			r[24] = new Regex(@"<%break%>");
		}

        public virtual string GetTemplate(string forumPath, string skinName, string templateName, int nest, int templateId)
        {
            return GetTemplate(forumPath, skinName, templateName, "", nest, templateId);
        }
		/// <summary>
		/// 获得模板字符串. 首先查找缓存. 如果不在缓存中则从设置中的模板路径来读取模板文件.
		/// 模板文件的路径在Web.config文件中设置.
		/// 如果读取文件成功则会将内容放于缓存中.
		/// </summary>
		/// <param name="forumPath">模板路径</param>
		/// <param name="skinName">模板名</param>
		/// <param name="templateName">模板文件的文件名称, 也是缓存中的模板名称.</param>
        /// <param name="templateSubDirectory">子模板文件夹名称,生成顶级模板文件时为空,当生成子文件夹中的模板是为子文件夹名称</param>
		/// <param name="nest">嵌套次数</param>
		/// <param name="templateId">模板id</param>
		/// <returns>string值,如果失败则为"",成功则为模板内容的string</returns>
		public virtual string GetTemplate(string forumPath,string skinName, string templateName, string templateSubDirectory, int nest,int templateId)
		{
            if(nest == 2 && headerTemplateCache.ContainsKey(forumPath + skinName + "/" + templateName)) //如果是一级子模板,并且已经存在于缓存中
                return headerTemplateCache[forumPath + skinName + "/" + templateName];

            StringBuilder strReturn = new StringBuilder(220000);
			if (nest < 1)
				nest = 1;
            else if (nest > 5)
				return "";

			string extNamespace = "";
            if (templateSubDirectory != string.Empty && !templateSubDirectory.EndsWith("\\"))
            {
                templateSubDirectory += "\\";
            }
			//生成模板config优先，其次是htm
			string configPathFormatStr = "{0}\\{1}\\{2}{3}.config";
			string htmlPathFormatStr = "{0}\\{1}\\{2}{3}.htm";
			string createFilePath;
			string inherits = "Discuz.Web." + templateName;

            if (File.Exists(string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, templateSubDirectory, templateName))) //当前模板当前子文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, templateSubDirectory, templateName);
            else if (File.Exists(string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, "", templateName))) //当前模板当前根文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, "", templateName);
            else if (File.Exists(string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", templateSubDirectory, templateName))) //默认模板当前子文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", templateSubDirectory, templateName);
            else if (File.Exists(string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", "", templateName))) //默认模板当前根文件夹下config存在
                createFilePath = string.Format(configPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", "", templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, templateSubDirectory, templateName))) //当前模板当前子文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, templateSubDirectory, templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, "", templateName))) //当前模板当前根文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), skinName, "", templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", templateSubDirectory, templateName))) //默认模板当前子文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", templateSubDirectory, templateName);
            else if (File.Exists(string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", "", templateName))) //默认模板当前根文件夹下html存在
                createFilePath = string.Format(htmlPathFormatStr, Utils.GetMapPath(forumPath + "templates"), "default", "", templateName);
            else //无文件存在
                return "";

			using (StreamReader objReader = new StreamReader(createFilePath, Encoding.UTF8))
			{
                StringBuilder textOutput = new StringBuilder(70000);
				
				textOutput.Append(objReader.ReadToEnd());
				objReader.Close();

				//处理命名空间
				if (nest == 1)
				{
					//命名空间
					foreach (Match m in r[17].Matches(textOutput.ToString()))
					{
						extNamespace += "\r\n<%@ Import namespace=\"" + m.Groups[1] + "\" %>";
						textOutput.Replace(m.Groups[0].ToString(), string.Empty);
					}

					//inherits
					foreach (Match m in r[22].Matches(textOutput.ToString()))
					{
						inherits = m.Groups[1].ToString();
						textOutput.Replace(m.Groups[0].ToString(), string.Empty);
						break;
					}
					if ("\"".Equals(inherits))
					{
						inherits = "Discuz.Forum.PageBase";
					}

				}
				//处理Csharp语句
				foreach (Match m in r[18].Matches(textOutput.ToString()))
				{
					textOutput.Replace(m.Groups[0].ToString(), m.Groups[0].ToString().Replace("\r\n", "\r\t\r"));
				}

				textOutput.Replace("\r\n", "\r\r\r");
				textOutput.Replace("<%", "\r\r\n<%");
				textOutput.Replace("%>", "%>\r\r\n");
				textOutput.Replace("<%csharp%>\r\r\n", "<%csharp%>").Replace("\r\r\n<%/csharp%>", "<%/csharp%>");
				
				string[] strlist = Utils.SplitString(textOutput.ToString(), "\r\r\n");
				int count = strlist.GetUpperBound(0);
		
				for (int i = 0; i <= count; i++)
				{
                    if (strlist[i] == "")
                        continue;
					strReturn.Append(ConvertTags(nest,forumPath, skinName, templateSubDirectory, strlist[i], templateId));
				}
			}
			if (nest == 1)
			{
                string template = string.Format("<%@ Page language=\"c#\" AutoEventWireup=\"false\" EnableViewState=\"false\" Inherits=\"{0}\" %>\r\n<%@ Import namespace=\"System.Data\" %>\r\n<%@ Import namespace=\"Discuz.Common\" %>\r\n<%@ Import namespace=\"Discuz.Forum\" %>\r\n<%@ Import namespace=\"Discuz.Entity\" %>\r\n{1}\r\n<script runat=\"server\">\r\noverride protected void OnInit(EventArgs e)\r\n{{\r\n\r\n\t/* \r\n\t\tThis page was created by Discuz!NT Template Engine at {2}.\r\n\t\t本页面代码由Discuz!NT模板引擎生成于 {2}. \r\n\t*/\r\n\r\n\tbase.OnInit(e);\r\n\r\n\ttemplateBuilder.Capacity = {3};\r\n{4}\r\n\tResponse.Write(templateBuilder.ToString());\r\n}}\r\n</script>\r\n", inherits, extNamespace, DateTime.Now, strReturn.Capacity, Regex.Replace(strReturn.ToString(),@"\r\n\s*templateBuilder\.Append\(""""\);",""));

				string pageDir = Utils.GetMapPath(forumPath + "aspx\\" + templateId + "\\");
				if (!Directory.Exists(pageDir))
					Utils.CreateDir(pageDir);

                string outputPath = pageDir  + templateName + ".aspx";
				
				using (FileStream fs = new FileStream(outputPath, FileMode.Create,FileAccess.ReadWrite, FileShare.ReadWrite))
				{
					Byte[] info = Encoding.UTF8.GetBytes(template);
					fs.Write(info, 0, info.Length);
					fs.Close();
				}
				
			}
            if(nest == 2)
                headerTemplateCache.Add(forumPath + skinName + "/" + templateName, strReturn.ToString());

            return strReturn.ToString();
		}
		
		/// <summary>
		/// 转换标签
		/// </summary>
		/// <param name="nest">深度</param>
		/// <param name="forumPath">模板路径</param>
		/// <param name="skinName">模板名称</param>
		/// <param name="inputStr">模板内容</param>
		/// <param name="templateid">模板id</param>
		/// <returns></returns>
        private string ConvertTags(int nest, string forumPath, string skinName, string templateSubDirectory, string inputStr, int templateid)
		{
			string strReturn = "";
			string strTemplate;
			strTemplate = inputStr.Replace("\\", "\\\\");
			strTemplate = strTemplate.Replace("\"", "\\\"");
            strTemplate = strTemplate.Replace("</script>", "</\");\r\n\ttemplateBuilder.Append(\"script>");
			bool IsCodeLine = false;		

			foreach (Match m in r[0].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "\r\n" + GetTemplate(forumPath,skinName, m.Groups[1].ToString(), templateSubDirectory, nest + 1, templateid) + "\r\n");
			}
			foreach (Match m in r[1].Matches(strTemplate))
			{
				IsCodeLine = true;
				if (m.Groups[3].ToString() == "")
				{
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
						string.Format("\r\n\tint {0}__loop__id=0;\r\n\tforeach(DataRow {0} in {1}.Rows)\r\n\t{{\r\n\t\t{0}__loop__id++;\r\n", m.Groups[4], m.Groups[5]));
				}
				else
				{
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
						string.Format("\r\n\tint {1}__loop__id=0;\r\n\tforeach({0} {1} in {2})\r\n\t{{\r\n\t\t{1}__loop__id++;\r\n", m.Groups[3], m.Groups[4], m.Groups[5]));
				}
			}

			foreach (Match m in r[2].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					"\r\n\t}\t//end loop\r\n");
			}

			foreach (Match m in r[3].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					string.Format("\r\n\tint {0}__loop__id=0;\r\nwhile({0}.Read())\r\n\t{{\r\n{0}__loop__id++;\r\n", m.Groups[1]));
			}

			foreach (Match m in r[4].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					"\r\n\t}\t//end while\r\n" + m.Groups[1] + ".Close();\r\n");
			}

			foreach (Match m in r[5].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					"\r\n\tif (" + m.Groups[1].ToString().Replace("\\\"", "\"") + ")\r\n\t{\r\n");
			}

			foreach (Match m in r[6].Matches(strTemplate))
			{
				IsCodeLine = true;
				if (m.Groups[1].ToString() == string.Empty)
				{
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					"\r\n\t}\r\n\telse\r\n\t{\r\n");
				}
				else
				{
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
						"\r\n\t}\r\n\telse if (" + m.Groups[3].ToString().Replace("\\\"", "\"") + ")\r\n\t{\r\n");
				}
			}

			foreach (Match m in r[7].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					"\r\n\t}\t//end if\r\n");
			}

			//解析set
			foreach (Match m in r[19].Matches(strTemplate))
			{
				IsCodeLine = true;
				string type = "";
				if (m.Groups[3].ToString() != string.Empty)
				{
					type = m.Groups[3].ToString();
				}
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					string.Format("\t{0} {1} = {2};\r\n\t", type, m.Groups[4], m.Groups[5]).Replace("\\\"", "\"")
					);
			}

            foreach (Match m in r[21].Matches(strTemplate))
            {
                IsCodeLine = true;
                strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                                                 "\tfor (int i = 0; i < " + m.Groups[2] + "; i++)\r\n\t{\r\n\t\ttemplateBuilder.Append(" + m.Groups[1].ToString().Replace("\\\"", "\"").Replace("\\\\", "\\") + ");\r\n\t}\r\n");
            }

			foreach (Match m in r[23].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "\tcontinue;\r\n");			
			}

			foreach (Match m in r[24].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "\tbreak;\r\n");
			}
            
			foreach (Match m in r[8].Matches(strTemplate))
			{
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					"Utils.StrToInt(" + m.Groups[2] + ", 0)");
			}

			foreach (Match m in r[9].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "templateBuilder.Append(Utils.UrlEncode(" + m.Groups[2] + "));");
			}

			foreach (Match m in r[10].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
					          string.Format("\ttemplateBuilder.Append(Convert.ToDateTime({0}).ToString(\"{1}\"));", m.Groups[2], m.Groups[3].ToString().Replace("\\\"", string.Empty)));
			}

			//解析substring
			foreach (Match m in r[20].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
				              string.Format("\ttemplateBuilder.Append(Utils.GetUnicodeSubString({0},{1},\"{2}\"));", m.Groups[2], m.Groups[3], m.Groups[4].ToString().Replace("\\\"", string.Empty)));
			}
					
			//解析{var.a}
			foreach (Match m in r[11].Matches(strTemplate))
			{
				if (IsCodeLine)
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
						string.Format("{0}.{1}{2}", m.Groups[2], Utils.CutString(m.Groups[3].ToString(), 0, 1).ToUpper(), m.Groups[3].ToString().Substring(1, m.Groups[3].ToString().Length - 1)));
				else
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        string.Format("\");\r\n\ttemplateBuilder.Append({0}.{1}{2}.ToString().Trim());\r\n\ttemplateBuilder.Append(\"", m.Groups[2], Utils.CutString(m.Groups[3].ToString(), 0, 1).ToUpper(), m.Groups[3].ToString().Substring(1, m.Groups[3].ToString().Length - 1)));
			}

			//解析{request[a]}
			foreach (Match m in r[12].Matches(strTemplate))
			{
				if (IsCodeLine)
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(), "DNTRequest.GetString(\"" + m.Groups[2] + "\")");
				else
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + DNTRequest.GetString(\"{0}\") + \"", m.Groups[2]));
			}

			//解析{var[a]}
			foreach (Match m in r[13].Matches(strTemplate))
			{
				if (IsCodeLine)
				{
					if (Utils.IsNumeric(m.Groups[3].ToString()))
						strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "[" + m.Groups[3] + "].ToString().Trim()");
					else
					{
						if (m.Groups[3].ToString() == "_id")
							strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "__loop__id");
						else
							strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "[\"" + m.Groups[3] + "\"].ToString().Trim()");
					}
				}
				else
				{
					if (Utils.IsNumeric(m.Groups[3].ToString()))
						strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + {0}[{1}].ToString().Trim() + \"", m.Groups[2], m.Groups[3]));
					else
					{
						if (m.Groups[3].ToString() == "_id")
							strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + {0}__loop__id.ToString() + \"", m.Groups[2]));
						else
							strTemplate = strTemplate.Replace(m.Groups[0].ToString(), string.Format("\" + {0}[\"{1}\"].ToString().Trim() + \"", m.Groups[2], m.Groups[3]));
					}
				}
			}

			strTemplate = ReplaceSpecialTemplate(forumPath,skinName,strTemplate);

			foreach (Match m in r[14].Matches(strTemplate))
			{
				if (m.Groups[0].ToString() == "{commonversion}")
				{
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(), Utils.GetAssemblyVersion());
				}
			}
					
			//解析普通变量{}
			foreach (Match m in r[15].Matches(strTemplate))
			{
				if (IsCodeLine)
					strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2].ToString());
				else
                    strTemplate = strTemplate.Replace(m.Groups[0].ToString(),
                        string.Format("\");\r\n\ttemplateBuilder.Append({0}.ToString());\r\n\ttemplateBuilder.Append(\"", m.Groups[2].ToString().Trim()));
			}
					
					
			//解析==表达式
			foreach (Match m in r[16].Matches(strTemplate))
			{
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[2] + "\"" + m.Groups[3] + "\"");
			}
				
				
			//解析csharpcode
			foreach (Match m in r[18].Matches(strTemplate))
			{
				IsCodeLine = true;
				strTemplate = strTemplate.Replace(m.Groups[0].ToString(), m.Groups[1].ToString().Replace("\r\t\r", "\r\n\t").Replace("\\\"", "\""));
			}
					
			if (IsCodeLine)
			{
				strReturn = strTemplate + "\r\n";
			}
			else
			{
				if (strTemplate.Trim() != "")
				{
                    StringBuilder sb = new StringBuilder(35000);
					foreach (string temp in Utils.SplitString(strTemplate,"\r\r\r"))
					{
						if (temp.Trim() == "")
							continue;
						sb.Append("\ttemplateBuilder.Append(\"" + temp + "\\r\\n\");\r\n");
					}
					strReturn = sb.ToString();
				}
			}
			return strReturn;
		}		
	}    
}