annotate Net/HTTP.cs @ 3:0cc7be03775f

Improved HTTP Server components
author Ivo Smits <Ivo@UCIS.nl>
date Tue, 08 Jan 2013 02:13:27 +0100
parents 3ab940a0c7a0
children 9e2e6433f57a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
1 ???using System;
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
2 using System.Collections.Generic;
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
3 using System.IO;
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
4 using System.Net;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
5 using System.Net.Sockets;
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
6 using System.Text;
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
7 using UCIS.Util;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
8 using HTTPHeader = System.Collections.Generic.KeyValuePair<string, string>;
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
9
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
10 namespace UCIS.Net.HTTP {
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
11 public class HTTPServer : TCPServer.IModule, IDisposable {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
12 public IHTTPContentProvider ContentProvider { get; set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
13 public Boolean ServeFlashPolicyFile { get; set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
14 private Socket Listener = null;
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
15
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
16 public HTTPServer() { }
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
17
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
18 public void Listen(int port) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
19 Listen(new IPEndPoint(IPAddress.Any, port));
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
20 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
21
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
22 public void Listen(EndPoint localep) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
23 if (Listener != null) throw new InvalidOperationException("A listener exists");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
24 Listener = new Socket(localep.AddressFamily, SocketType.Stream, ProtocolType.Tcp);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
25 Listener.Bind(localep);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
26 Listener.Listen(5);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
27 Listener.BeginAccept(AcceptCallback, null);
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
28 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
29
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
30 private void AcceptCallback(IAsyncResult ar) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
31 try {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
32 Socket socket = Listener.EndAccept(ar);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
33 new HTTPContext(this, socket);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
34 } catch (Exception) { }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
35 try {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
36 Listener.BeginAccept(AcceptCallback, null);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
37 } catch (Exception) { }
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
38 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
39
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
40 public void Dispose() {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
41 if (Listener != null) Listener.Close();
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
42 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
43
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
44 bool TCPServer.IModule.Accept(TCPStream stream) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
45 new HTTPContext(this, stream);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
46 return false;
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
47 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
48 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
49
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
50 public class HTTPContext {
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
51 public HTTPServer Server { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
52 public EndPoint LocalEndPoint { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
53 public EndPoint RemoteEndPoint { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
54
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
55 public String RequestMethod { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
56 public String RequestPath { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
57 public String RequestQuery { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
58 public int HTTPVersion { get; set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
59
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
60 public Socket Socket { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
61 public Boolean SuppressStandardHeaders { get; set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
62
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
63 private Stream Stream;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
64 private StreamWriter Writer;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
65 private List<HTTPHeader> RequestHeaders;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
66 private HTTPConnectionState State = HTTPConnectionState.Starting;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
67
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
68 private enum HTTPConnectionState {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
69 Starting = 0,
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
70 ReceivingRequest = 1,
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
71 ProcessingRequest = 2,
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
72 SendingHeaders = 3,
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
73 SendingContent = 4,
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
74 Closed = 5,
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
75 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
76
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
77 public HTTPContext(HTTPServer server, TCPStream stream) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
78 this.Server = server;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
79 this.Socket = stream.Socket;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
80 this.LocalEndPoint = Socket.LocalEndPoint;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
81 this.RemoteEndPoint = Socket.RemoteEndPoint;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
82 this.Stream = stream;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
83 Init();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
84 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
85
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
86 public HTTPContext(HTTPServer server, Socket socket) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
87 this.Server = server;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
88 this.Socket = socket;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
89 this.LocalEndPoint = socket.LocalEndPoint;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
90 this.RemoteEndPoint = socket.RemoteEndPoint;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
91 this.Stream = new NetworkStream(socket, true);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
92 Init();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
93 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
94
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
95 private void Init() {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
96 Writer = new StreamWriter(Stream, Encoding.ASCII);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
97 Writer.NewLine = "\r\n";
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
98 Writer.AutoFlush = true;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
99 UCIS.ThreadPool.RunTask(ReceiveOperation, null);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
100 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
101
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
102 private String ReadLine() {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
103 StringBuilder s = new StringBuilder();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
104 while (true) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
105 int b = Stream.ReadByte();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
106 if (b == -1) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
107 if (s.Length == null) return null;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
108 break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
109 } else if (b == 13) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
110 } else if (b == 10) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
111 break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
112 } else {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
113 s.Append((Char)b);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
114 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
115 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
116 return s.ToString();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
117 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
118
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
119 private void ReceiveOperation(Object state) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
120 State = HTTPConnectionState.ReceivingRequest;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
121 try {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
122 String line = ReadLine();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
123 if (line == null) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
124 Close();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
125 return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
126 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
127 if (Server.ServeFlashPolicyFile && line[0] == '<') { //<policy-file-request/>
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
128 Writer.WriteLine("<cross-domain-policy><allow-access-from domain=\"*\" to-ports=\"*\" /></cross-domain-policy>");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
129 Stream.WriteByte(0);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
130 Close();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
131 return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
132 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
133 String[] request = line.Split(' ');
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
134 if (request.Length != 3) goto SendError400AndClose;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
135 RequestMethod = request[0];
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
136 String RequestAddress = request[1];
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
137 switch (request[2]) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
138 case "HTTP/1.0": HTTPVersion = 10; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
139 case "HTTP/1.1": HTTPVersion = 11; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
140 default: goto SendError400AndClose;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
141 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
142 request = RequestAddress.Split(new Char[] { '?' });
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
143 RequestPath = Uri.UnescapeDataString(request[0]);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
144 RequestQuery = request.Length > 1 ? request[1] : null;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
145 RequestHeaders = new List<HTTPHeader>();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
146 while (true) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
147 line = ReadLine();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
148 if (line == null) goto SendError400AndClose;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
149 if (line.Length == 0) break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
150 request = line.Split(new String[] { ": " }, 2, StringSplitOptions.None);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
151 if (request.Length != 2) goto SendError400AndClose;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
152 RequestHeaders.Add(new HTTPHeader(request[0], request[1]));
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
153 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
154 IHTTPContentProvider content = Server.ContentProvider;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
155 if (content == null) goto SendError500AndClose;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
156 State = HTTPConnectionState.ProcessingRequest;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
157 content.ServeRequest(this);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
158 } catch (Exception ex) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
159 Console.Error.WriteLine(ex);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
160 switch (State) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
161 case HTTPConnectionState.ProcessingRequest: goto SendError500AndClose;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
162 default:
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
163 Close();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
164 break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
165 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
166 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
167 return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
168
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
169 SendError400AndClose:
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
170 SendErrorAndClose(400);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
171 return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
172 SendError500AndClose:
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
173 SendErrorAndClose(500);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
174 return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
175 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
176
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
177 public String GetRequestHeader(String name) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
178 if (State != HTTPConnectionState.ProcessingRequest && State != HTTPConnectionState.SendingHeaders && State != HTTPConnectionState.SendingContent) throw new InvalidOperationException();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
179 foreach (HTTPHeader h in RequestHeaders) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
180 if (name.Equals(h.Key, StringComparison.OrdinalIgnoreCase)) return h.Value;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
181 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
182 return null;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
183 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
184 public String[] GetRequestHeaders(String name) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
185 if (State != HTTPConnectionState.ProcessingRequest && State != HTTPConnectionState.SendingHeaders && State != HTTPConnectionState.SendingContent) throw new InvalidOperationException();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
186 String[] items = new String[0];
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
187 foreach (HTTPHeader h in RequestHeaders) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
188 if (name.Equals(h.Key, StringComparison.OrdinalIgnoreCase)) ArrayUtil.Add(ref items, h.Value);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
189 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
190 return items;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
191 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
192
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
193 public void SendErrorAndClose(int state) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
194 try {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
195 SendStatus(state);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
196 GetResponseStream();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
197 } catch (Exception ex) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
198 Console.Error.WriteLine(ex);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
199 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
200 Close();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
201 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
202
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
203 public void SendStatus(int code) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
204 String message;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
205 switch (code) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
206 case 101: message = "Switching Protocols"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
207 case 200: message = "OK"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
208 case 400: message = "Bad Request"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
209 case 404: message = "Not Found"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
210 case 500: message = "Internal Server Error"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
211 default: message = "Unknown Status"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
212 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
213 SendStatus(code, message);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
214 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
215 public void SendStatus(int code, String message) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
216 if (State != HTTPConnectionState.ProcessingRequest) throw new InvalidOperationException();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
217 StringBuilder sb = new StringBuilder();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
218 sb.Append("HTTP/");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
219 switch (HTTPVersion) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
220 case 10: sb.Append("1.0"); break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
221 case 11: sb.Append("1.1"); break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
222 default: throw new ArgumentException("The HTTP version is not supported", "HTTPVersion");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
223 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
224 sb.Append(" ");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
225 sb.Append(code);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
226 sb.Append(" ");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
227 sb.Append(message);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
228 Writer.WriteLine(sb.ToString());
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
229 State = HTTPConnectionState.SendingHeaders;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
230 if (!SuppressStandardHeaders) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
231 SendHeader("Expires", "Expires: Sun, 1 Jan 2000 00:00:00 GMT");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
232 SendHeader("Cache-Control", "no-store, no-cache, must-revalidate");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
233 SendHeader("Cache-Control", "post-check=0, pre-check=0");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
234 SendHeader("Pragma", "no-cache");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
235 SendHeader("Server", "UCIS Webserver");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
236 SendHeader("Connection", "Close");
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
237 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
238 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
239 public void SendHeader(String name, String value) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
240 if (State == HTTPConnectionState.ProcessingRequest) SendStatus(200);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
241 if (State != HTTPConnectionState.SendingHeaders) throw new InvalidOperationException();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
242 Writer.WriteLine(name + ": " + value);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
243 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
244 public Stream GetResponseStream() {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
245 if (State == HTTPConnectionState.ProcessingRequest) SendStatus(200);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
246 if (State == HTTPConnectionState.SendingHeaders) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
247 Writer.WriteLine();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
248 State = HTTPConnectionState.SendingContent;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
249 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
250 if (State != HTTPConnectionState.SendingContent) throw new InvalidOperationException();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
251 return Stream;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
252 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
253
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
254 public void Close() {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
255 if (State == HTTPConnectionState.Closed) return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
256 Stream.Close();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
257 State = HTTPConnectionState.Closed;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
258 }
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
259 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
260
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
261 public interface IHTTPContentProvider {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
262 void ServeRequest(HTTPContext context);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
263 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
264 public class HTTPPathSelector : IHTTPContentProvider {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
265 private List<KeyValuePair<String, IHTTPContentProvider>> Prefixes;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
266 private StringComparison PrefixComparison;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
267 public HTTPPathSelector() : this(false) { }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
268 public HTTPPathSelector(Boolean caseSensitive) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
269 Prefixes = new List<KeyValuePair<string, IHTTPContentProvider>>();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
270 PrefixComparison = caseSensitive ? StringComparison.Ordinal : StringComparison.OrdinalIgnoreCase;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
271 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
272 public void AddPrefix(String prefix, IHTTPContentProvider contentProvider) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
273 Prefixes.Add(new KeyValuePair<string, IHTTPContentProvider>(prefix, contentProvider));
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
274 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
275 public void DeletePrefix(String prefix) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
276 Prefixes.RemoveAll(delegate(KeyValuePair<string, IHTTPContentProvider> item) { return prefix.Equals(item.Key, PrefixComparison); });
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
277 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
278 public void ServeRequest(HTTPContext context) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
279 KeyValuePair<string, IHTTPContentProvider> c = Prefixes.Find(delegate(KeyValuePair<string, IHTTPContentProvider> item) { return context.RequestPath.StartsWith(item.Key, PrefixComparison); });
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
280 if (c.Value != null) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
281 c.Value.ServeRequest(context);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
282 } else {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
283 context.SendErrorAndClose(404);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
284 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
285 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
286 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
287 public class HTTPFileProvider : IHTTPContentProvider {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
288 public String FileName { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
289 public String ContentType { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
290 public HTTPFileProvider(String fileName) : this(fileName, "application/octet-stream") { }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
291 public HTTPFileProvider(String fileName, String contentType) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
292 this.FileName = fileName;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
293 this.ContentType = contentType;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
294 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
295 public void ServeRequest(HTTPContext context) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
296 if (File.Exists(FileName)) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
297 using (FileStream fs = File.OpenRead(FileName)) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
298 context.SendStatus(200);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
299 context.SendHeader("Content-Type", ContentType);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
300 context.SendHeader("Content-Length", fs.Length.ToString());
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
301 long left = fs.Length;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
302 Stream response = context.GetResponseStream();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
303 byte[] buffer = new byte[1024 * 10];
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
304 while (fs.CanRead) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
305 int len = fs.Read(buffer, 0, buffer.Length);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
306 if (len <= 0) break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
307 left -= len;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
308 response.Write(buffer, 0, len);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
309 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
310 response.Close();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
311 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
312 } else {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
313 context.SendErrorAndClose(404);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
314 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
315 }
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
316 }
3
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
317 public class HTTPUnTarchiveProvider : IHTTPContentProvider {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
318 public String TarFileName { get; private set; }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
319 public HTTPUnTarchiveProvider(String tarFile) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
320 this.TarFileName = tarFile;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
321 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
322 public void ServeRequest(HTTPContext context) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
323 if (!File.Exists(TarFileName)) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
324 context.SendErrorAndClose(404);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
325 return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
326 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
327 String reqname1 = context.RequestPath;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
328 if (reqname1.Length > 0 && reqname1[0] == '/') reqname1 = reqname1.Substring(1);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
329 String reqname2 = reqname1;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
330 if (reqname2.Length > 0 && !reqname2.EndsWith("/")) reqname2 += "/";
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
331 reqname2 += "index.htm";
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
332 using (FileStream fs = File.OpenRead(TarFileName)) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
333 while (true) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
334 Byte[] header = new Byte[512];
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
335 if (fs.Read(header, 0, 512) != 512) break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
336 int flen = Array.IndexOf<Byte>(header, 0, 0, 100);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
337 if (flen == 0) continue;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
338 if (flen == -1) flen = 100;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
339 String fname = Encoding.ASCII.GetString(header, 0, flen);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
340 String fsize = Encoding.ASCII.GetString(header, 124, 11);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
341 int fsizei = Convert.ToInt32(fsize, 8);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
342 if (reqname1.Equals(fname, StringComparison.OrdinalIgnoreCase) || reqname2.Equals(fname)) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
343 context.SendStatus(200);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
344 context.SendHeader("Content-Length", fsizei.ToString());
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
345 String ctype = null;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
346 switch (Path.GetExtension(fname).ToUpperInvariant()) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
347 case ".txt": ctype = "text/plain"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
348 case ".htm":
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
349 case ".html": ctype = "text/html"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
350 case ".css": ctype = "text/css"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
351 case ".js": ctype = "application/x-javascript"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
352 case ".png": ctype = "image/png"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
353 case ".jpg":
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
354 case ".jpeg": ctype = "image/jpeg"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
355 case ".gif": ctype = "image/gif"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
356 case ".ico": ctype = "image/x-icon"; break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
357 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
358 if (ctype != null) context.SendHeader("Content-Type", ctype);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
359 Stream response = context.GetResponseStream();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
360 int left = fsizei;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
361 while (left > 0) {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
362 byte[] buffer = new byte[1024 * 10];
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
363 int len = fs.Read(buffer, 0, buffer.Length);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
364 if (len <= 0) break;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
365 left -= len;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
366 response.Write(buffer, 0, len);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
367 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
368 response.Close();
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
369 return;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
370 } else {
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
371 fs.Seek(fsizei, SeekOrigin.Current);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
372 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
373 int padding = fsizei % 512;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
374 if (padding != 0) padding = 512 - padding;
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
375 fs.Seek(padding, SeekOrigin.Current);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
376 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
377 }
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
378 context.SendErrorAndClose(404);
0cc7be03775f Improved HTTP Server components
Ivo Smits <Ivo@UCIS.nl>
parents: 0
diff changeset
379 }
0
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
380 }
3ab940a0c7a0 Initial commit
Ivo Smits <Ivo@UCIS.nl>
parents:
diff changeset
381 }