KancolleSniffer/LogServer.cs

   1 // Copyright (C) 2014, 2015 Kazuhiro Fujieda <fujieda@users.osdn.me>\r
   2 //\r
   3 // This program is part of KancolleSniffer.\r
   4 //\r
   5 // KancolleSniffer is free software: you can redistribute it and/or modify\r
   6 // it under the terms of the GNU General Public License as published by\r
   7 // the Free Software Foundation, either version 3 of the License, or\r
   8 // (at your option) any later version.\r
   9 //\r
  10 // This program is distributed in the hope that it will be useful,\r
  11 // but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  13 // GNU General Public License for more details.\r
  14 //\r
  15 // You should have received a copy of the GNU General Public License\r
  16 // along with this program; if not, see <http://www.gnu.org/licenses/>.\r
  17 \r
  18 using System;\r
  19 using System.Globalization;\r
  20 using System.IO;\r
  21 using System.Linq;\r
  22 using System.Net;\r
  23 using System.Net.Sockets;\r
  24 using System.Text;\r
  25 using System.Threading;\r
  26 using System.Web;\r
  27 using System.Windows.Forms;\r
  28 \r
  29 namespace KancolleSniffer\r
  30 {\r
  31     public class LogServer\r
  32     {\r
  33         private readonly TcpListener _listener;\r
  34         private readonly string _indexDir = Path.GetDirectoryName(Application.ExecutablePath);\r
  35         private string _outputDir = Path.GetDirectoryName(Application.ExecutablePath);\r
  36 \r
  37         public int Port { get; private set; }\r
  38 \r
  39         public bool IsListening { get; private set; }\r
  40 \r
  41         public string OutputDir\r
  42         {\r
  43             set { _outputDir = value; }\r
  44         }\r
  45 \r
  46         public LogServer(int port)\r
  47         {\r
  48             _listener = new TcpListener(IPAddress.Loopback, port);\r
  49         }\r
  50 \r
  51         public void Start()\r
  52         {\r
  53             _listener.Start();\r
  54             Port = ((IPEndPoint)_listener.LocalEndpoint).Port;\r
  55             IsListening = true;\r
  56             new Thread(Listen).Start();\r
  57         }\r
  58 \r
  59         private void Listen()\r
  60         {\r
  61             try\r
  62             {\r
  63                 while (true)\r
  64                 {\r
  65                     var socket = _listener.AcceptSocket();\r
  66                     new Thread(Process).Start(socket);\r
  67                 }\r
  68             }\r
  69             catch (SocketException)\r
  70             {\r
  71             }\r
  72             finally\r
  73             {\r
  74                 _listener.Stop();\r
  75             }\r
  76         }\r
  77 \r
  78         private void Process(Object obj)\r
  79         {\r
  80             var client = (Socket)obj;\r
  81             var data = new byte[4096];\r
  82             var from = DateTime.MinValue;\r
  83             var to = DateTime.MaxValue;\r
  84             try\r
  85             {\r
  86                 if (client.Receive(data) == 0)\r
  87                     return;\r
  88                 var request = Encoding.UTF8.GetString(data).Split('\r')[0].Split(' ');\r
  89                 if (request.Length != 3)\r
  90                 {\r
  91                     SendError(client, "400 Bad Request");\r
  92                     return;\r
  93                 }\r
  94                 if (!request[0].StartsWith("GET", StringComparison.OrdinalIgnoreCase))\r
  95                 {\r
  96                     SendError(client, "501 Not Implemented");\r
  97                     return;\r
  98                 }\r
  99                 var tmp = request[1].Split('?');\r
 100                 var path = HttpUtility.UrlDecode(tmp[0]);\r
 101                 if (path == null || !path.StartsWith("/"))\r
 102                 {\r
 103                     SendError(client, "400 Bad Request");\r
 104                     return;\r
 105                 }\r
 106                 if (tmp.Length == 2)\r
 107                 {\r
 108                     var query = HttpUtility.ParseQueryString(tmp[1]);\r
 109                     if (query["from"] != null)\r
 110                     {\r
 111                         double tick;\r
 112                         double.TryParse(query["from"], out tick);\r
 113                         from = new DateTime(1970, 1, 1).ToLocalTime().AddSeconds(tick / 1000);\r
 114                     }\r
 115                     if (query["to"] != null)\r
 116                     {\r
 117                         double tick;\r
 118                         double.TryParse(query["to"], out tick);\r
 119                         to = new DateTime(1970, 1, 1).ToLocalTime().AddSeconds(tick / 1000);\r
 120                     }\r
 121                 }\r
 122 \r
 123                 path = path == "/" ? "index.html" : path.Substring(1);\r
 124                 var full = Path.Combine(_indexDir, path);\r
 125                 var csv = Path.Combine(_outputDir, path);\r
 126                 if (path.EndsWith(".html", StringComparison.OrdinalIgnoreCase) && File.Exists(full))\r
 127                 {\r
 128                     SendFile(client, full, "text/html");\r
 129                     return;\r
 130                 }\r
 131                 if (path.EndsWith(".csv", StringComparison.OrdinalIgnoreCase) && File.Exists(csv))\r
 132                 {\r
 133                     SendFile(client, csv, "text/csv; charset=Shift_JIS");\r
 134                     return;\r
 135                 }\r
 136                 if (path.EndsWith(".json", StringComparison.OrdinalIgnoreCase))\r
 137                 {\r
 138                     SendJsonData(client, csv, from, to);\r
 139                     return;\r
 140                 }\r
 141                 if (path.EndsWith(".js", StringComparison.OrdinalIgnoreCase) && File.Exists(full))\r
 142                 {\r
 143                     SendFile(client, full, "application/javascript");\r
 144                     return;\r
 145                 }\r
 146                 SendError(client, "404 Not Found");\r
 147             }\r
 148             catch (IOException)\r
 149             {\r
 150             }\r
 151             catch (SocketException)\r
 152             {\r
 153             }\r
 154             finally\r
 155             {\r
 156                 client.Close();\r
 157             }\r
 158         }\r
 159 \r
 160         private void SendError(Socket client, string error)\r
 161         {\r
 162             using (var writer = new StreamWriter(new MemoryStream(), Encoding.ASCII))\r
 163             {\r
 164                 writer.Write("HTTP/1.1 {0}\r\n", error);\r
 165                 writer.Write("Server: KancolleSniffer\r\n");\r
 166                 writer.Write("Date: {0:R}\r\n", DateTime.Now);\r
 167                 writer.Write("Connection: close\r\n\r\n");\r
 168                 writer.Write("<html><head><title>{0}</title></head>\r\n", error);\r
 169                 writer.Write("<body><h4>{0}</h4></body></html>\r\n\r\n", error);\r
 170                 writer.Flush();\r
 171                 client.Send(((MemoryStream)writer.BaseStream).ToArray());\r
 172             }\r
 173         }\r
 174 \r
 175         private void SendJsonData(Socket client, string path, DateTime from, DateTime to)\r
 176         {\r
 177             var header = new StreamWriter(new MemoryStream(), Encoding.ASCII);\r
 178             header.Write("HTTP/1.1 200 OK\r\n");\r
 179             header.Write("Server: KancolleSniffer\r\n");\r
 180             header.Write("Date: {0:R}\r\n", DateTime.Now);\r
 181             header.Write("Content-Type: {0}\r\n", "application/json; charset=Shift_JIS");\r
 182             header.Write("Connection: close\r\n\r\n");\r
 183             header.Flush();\r
 184             client.Send(((MemoryStream)header.BaseStream).ToArray());\r
 185 \r
 186             var csv = path.Replace(".json", ".csv");\r
 187             var encoding = Encoding.GetEncoding("Shift_JIS");\r
 188             client.Send(encoding.GetBytes("{ \"data\": [\n"));\r
 189             try\r
 190             {\r
 191                 if (File.Exists(csv))\r
 192                 {\r
 193                     var delimiter = "";\r
 194                     var material = path.EndsWith("資材ログ.json"); // 末尾の空データを削除する必要がある\r
 195                     foreach (var line in File.ReadLines(csv, encoding).Skip(1))\r
 196                     {\r
 197                         var data = line.Split(',');\r
 198                         DateTime date;\r
 199                         if (!DateTime.TryParseExact(data[0], Logger.DateTimeFormat, CultureInfo.InvariantCulture,\r
 200                             DateTimeStyles.AssumeLocal, out date) &&\r
 201                             DateTime.TryParse(data[0], CultureInfo.CurrentCulture, DateTimeStyles.AssumeLocal, out date))\r
 202                         {\r
 203                             data[0] = date.ToString(Logger.DateTimeFormat);\r
 204                         }\r
 205                         if (date < from || to < date)\r
 206                             continue;\r
 207                         client.Send(encoding.GetBytes(delimiter + "[\"" +\r
 208                                                       string.Join("\",\"", (material ? data.Take(9) : data)) + "\"]"));\r
 209                         delimiter = ",\n";\r
 210                     }\r
 211                 }\r
 212             }\r
 213             finally\r
 214             {\r
 215                 client.Send(encoding.GetBytes("]}\n"));\r
 216             }\r
 217         }\r
 218 \r
 219         private void SendFile(Socket client, string path, string mime)\r
 220         {\r
 221             using (var writer = new StreamWriter(new MemoryStream(), Encoding.ASCII))\r
 222             {\r
 223                 writer.Write("HTTP/1.1 200 OK\r\n");\r
 224                 writer.Write("Server: KancolleSniffer\r\n");\r
 225                 writer.Write("Date: {0:R}\r\n", DateTime.Now);\r
 226                 writer.Write("Content-Length: {0}\r\n", new FileInfo(path).Length);\r
 227                 writer.Write("Content-Type: {0}\r\n", mime);\r
 228                 writer.Write("Connection: close\r\n\r\n");\r
 229                 writer.Flush();\r
 230                 client.SendFile(path, ((MemoryStream)writer.BaseStream).ToArray(), null,\r
 231                     TransmitFileOptions.UseDefaultWorkerThread);\r
 232             }\r
 233         }\r
 234 \r
 235         public void Stop()\r
 236         {\r
 237             IsListening = false;\r
 238             _listener.Server.Close();\r
 239         }\r
 240     }\r
 241 }