在.NET程序中实现HttpServer功能

最近在实现一个可视化数据解析工具,需要在Wpf程序中实现一个HttpServer,实现RESTfull接口,可以接收客户端(DTU或其他嵌入式设备)发送的请求。这种接口在ASP.NET中很容易实现,在Wpf程序中,需要有一个HttpServer才可以,开始考虑将Node.js签入到Wpf中,基本的功能可以实现,但是太麻烦了,程序的可移植性降低了,最好是在Wpf程序中内置这样的一个HttpServer。(当然,单纯的RESTful功能,通过WCF完全可以实现,此处的代码,给大家展示了在socket的基础上,时下基本的http协议,很有意思)

从CodeProject找到两篇文章:http://www.codeproject.com/Articles/137979/Simple-HTTP-Server-in-C 和 http://www.codeproject.com/Articles/25050/Embedded-NET-HTTP-Server ,参考的文章(第二篇),对代码进行了改造,实现了自己需要的功能。

首先在Visual Studio中建一个控制台程序,添加两个文件,Sockets.cs和HTTP.cs,文件内容如下:

Sockets.cs文件内容:

// Client-server helpers for TCP/IP
// ClientInfo: wrapper for a socket which throws
//  Receive events, and allows for messaged communication (using
//  a specified character as end-of-message)
// Server: simple TCP server that throws Connect events
// ByteBuilder: utility class to manage byte arrays built up
//  in multiple transactions

// (C) Richard Smith 2005-9
//   [email protected]
// You can use this for free and give it to people as much as you like
// as long as you leave a credit to me :).

// Code to connect to a SOCKS proxy modified from
//   http://www.thecodeproject.com/csharp/ZaSocks5Proxy.asp

// changelog 1.6
//  Option for thread synchronisation on a UI control

// Define this symbol to include console output in various places
//#define DEBUG

// Define this symbol to use the old host name resolution
//#define NET_1_1

using System;
using System.IO;
using System.Net;
using System.Text;
using System.Threading;
using System.Collections;
using System.Net.Sockets;
using System.Windows.Forms;
using System.Security.Cryptography;

using RedCorona.Cryptography;

//[assembly:System.Reflection.AssemblyVersion("1.6.2010.1228")]

namespace RedCorona.Net {    
    public delegate void ConnectionRead(ClientInfo ci, String text);
    public delegate void ConnectionClosed(ClientInfo ci);
    public delegate void ConnectionReadBytes(ClientInfo ci, byte[] bytes, int len);
    public delegate void ConnectionReadMessage(ClientInfo ci, uint code, byte[] bytes, int len);
    public delegate void ConnectionReadPartialMessage(ClientInfo ci, uint code, byte[] bytes, int start, int read, int sofar, int totallength);
    public delegate void ConnectionNotify(ClientInfo ci);
    
    public enum ClientDirection {In, Out, Left, Right, Both};
    public enum MessageType {Unmessaged, EndMarker, Length, CodeAndLength};
    // ServerDES: The server sends an encryption key on connect
    // ServerRSAClientDES: The server sends an RSA public key, the client sends back a key
    public enum EncryptionType {None, ServerKey, ServerRSAClientKey};
    
    public class EncryptionUtils {
        static RNGCryptoServiceProvider rng = new RNGCryptoServiceProvider();
        public static byte[] GetRandomBytes(int length, bool addByte){
            if(addByte && (length > 255)) throw new ArgumentException("Length must be 1 byte <256");
            byte[] random = new byte[length + (addByte ? 1 : 0)];
            rng.GetBytes(random);
            if(addByte) random[0] = (byte)length;
            return random;
        }
    }
    
    // OnReadBytes: catch the raw bytes as they arrive
    // OnRead: for text ended with a marker character
    // OnReadMessage: for binary info on a messaged client
    public class ClientInfo {
        internal Server server = null;
        private Socket sock;
        private String buffer;
        public event ConnectionRead OnRead;
        public event ConnectionClosed OnClose;
        public event ConnectionReadBytes OnReadBytes;
        public event ConnectionReadMessage OnReadMessage;
        public event ConnectionReadPartialMessage OnPartialMessage;
        public event ConnectionNotify OnReady;
        public MessageType MessageType;
        private ClientDirection dir;
        int id;
        bool alreadyclosed = false;
        public static int NextID = 100;
        private Exception closeException;
        private string closeReason = null;
        //private ClientThread t;
        public object Data = null;
        private Control threadSyncControl;
        
        // Encryption info
        EncryptionType encType;
        int encRead = 0, encStage, encExpected;
        internal bool encComplete;
        internal byte[] encKey;
        internal RSAParameters encParams;
        
        public EncryptionType EncryptionType {
            get { return encType; }
            set {
                if(encStage != 0) throw new ArgumentException("Key exchange has already begun"); 
                encType = value;
                encComplete = encType == EncryptionType.None;
                encExpected = -1;
            }
        }
        public bool EncryptionReady { get { return encComplete; } }
        internal ICryptoTransform encryptor, decryptor;
        public ICryptoTransform Encryptor { get { return encryptor; } }
        public ICryptoTransform Decryptor { get { return decryptor; } }
        public Control ThreadSyncControl { get { return threadSyncControl; } set { threadSyncControl = value; } }
        
        private string delim;
        public const int BUFSIZE = 1024;
        byte[] buf = new byte[BUFSIZE];
        ByteBuilder bytes = new ByteBuilder(10);
        
        byte[] msgheader = new byte[8];
        byte headerread = 0;
        bool wantingChecksum = true;
        
        bool sentReady = false;
        
        public string Delimiter {
            get { return delim; }
            set { delim = value; }
        }
        
        public ClientDirection Direction { get { return dir; } }
        public Socket Socket { get { return sock; } }
        public Server Server { get { return server; } }
        public int ID { get { return id; } }
        
        public bool Closed {
            get { return !sock.Connected; } 
        }
        
        public string CloseReason { get { return closeReason; } }
        public Exception CloseException { get { return closeException; } }
        
        public ClientInfo(Socket cl, bool StartNow) : this(cl, null, null, ClientDirection.Both, StartNow, EncryptionType.None) {}
        //public ClientInfo(Socket cl, ConnectionRead read, ConnectionReadBytes readevt, ClientDirection d) : this(cl, read, readevt, d, true, EncryptionType.None) {}
        public ClientInfo(Socket cl, ConnectionRead read, ConnectionReadBytes readevt, ClientDirection d, bool StartNow) : this(cl, read, readevt, d, StartNow, EncryptionType.None) {}
        public ClientInfo(Socket cl, ConnectionRead read, ConnectionReadBytes readevt, ClientDirection d, bool StartNow, EncryptionType encryptionType){    
            sock = cl; buffer = ""; OnReadBytes = readevt; encType = encryptionType;
            encStage = 0; encComplete = encType == EncryptionType.None;
            OnRead = read;
            MessageType = MessageType.EndMarker;
            dir = d; delim = "\n";
            id = NextID; // Assign each client an application-unique ID
            unchecked{NextID++;}
            //t = new ClientThread(this);
            if(StartNow) BeginReceive();
        }
        
        public void BeginReceive(){
//            t.t.Start();
            if((encType == EncryptionType.None) && (!sentReady)) {
                sentReady = true;
                if(OnReady != null) OnReady(this);
            }
            sock.BeginReceive(buf, 0, BUFSIZE, 0, new AsyncCallback(ReadCallback), this);
        }
        
        public String Send(String text){
            byte[] ba = Encoding.UTF8.GetBytes(text);
            String s = "";
            for(int i = 0; i < ba.Length; i++) s += ba[i] + " ";
            Send(ba);
            return s;
        }
        
        public void SendMessage(uint code, byte[] bytes){ SendMessage(code, bytes, 0, bytes.Length); }
        public void SendMessage(uint code, byte[] bytes, byte paramType){ SendMessage(code, bytes, paramType, bytes.Length); }
        public void SendMessage(uint code, byte[] bytes, byte paramType, int len){
            if(paramType > 0){
                ByteBuilder b = new ByteBuilder(3);
                b.AddParameter(bytes, paramType);
                bytes = b.Read(0, b.Length);
                len = bytes.Length;
            } 
            
            lock(sock){
                byte checksum = 0; byte[] ba;
                switch(MessageType){
                    case MessageType.CodeAndLength:                    
                        Send(ba = UintToBytes(code));
                        for(int i = 0; i < 4; i++) checksum += ba[i];
                        Send(ba = IntToBytes(len));
                        for(int i = 0; i < 4; i++) checksum += ba[i];
                        if(encType != EncryptionType.None) Send(new byte[]{checksum});
                        break;
                    case MessageType.Length:
                        Send(ba = IntToBytes(len));
                        for(int i = 0; i < 4; i++) checksum += ba[i];
                        if(encType != EncryptionType.None) Send(new byte[]{checksum});
                        break;
                }
                Send(bytes, len);
                if(encType != EncryptionType.None){
                    checksum = 0;
                    for(int i = 0; i < len; i++) checksum += bytes[i];
                    Send(new byte[]{checksum});
                }
            }
            
        }
        public void Send(byte[] bytes){ Send(bytes, bytes.Length); }
        public void Send(byte[] bytes, int len){
            if(!encComplete) throw new IOException("Key exchange is not yet completed");
            if(encType != EncryptionType.None){
                byte[] outbytes = new byte[len];
                Encryptor.TransformBlock(bytes, 0, len, outbytes, 0);
                bytes = outbytes;
                //Console.Write("Encryptor IV: "); LogBytes(encryptor.Key, encryptor.IV.length);
            }
            #if DEBUG
            Console.Write(ID + " Sent: "); LogBytes(bytes, len);
            #endif
            try {
                sock.Send(bytes, len, SocketFlags.None);
            } catch(Exception e){
                closeException = e;
                closeReason = "Exception in send: "+e.Message;
                Close();
            }
        }
        
        public bool MessageWaiting(){
            FillBuffer(sock);
            return buffer.IndexOf(delim) >= 0;
        }
        
        public String Read(){
            //FillBuffer(sock);
            int p = buffer.IndexOf(delim);
            if(p >= 0){
                String res = buffer.Substring(0, p);
                buffer = buffer.Substring(p + delim.Length);
                return res;
            } else return "";
        }
        
        private void FillBuffer(Socket sock){
            byte[] buf = new byte[256];
            int read;
            while(sock.Available != 0){
                read = sock.Receive(buf);
                if(OnReadBytes != null) OnReadBytes(this, buf, read);
                buffer += Encoding.UTF8.GetString(buf, 0, read);
            }
        }
        
        void ReadCallback(IAsyncResult ar){
            try {
                int read = sock.EndReceive(ar);
                //Console.WriteLine("Socket "+ID+" read "+read+" bytes");
                if(read > 0){
                    DoRead(buf, read);
                    BeginReceive();
                } else {
                    #if DEBUG
                    Console.WriteLine(ID + " zero byte read closure");
                    #endif
                    closeReason = "Zero byte read (no data available)";
                    closeException = null;
                    Close();
                }
            } catch(SocketException e){
                #if DEBUG
                Console.WriteLine(ID + " socket exception closure: "+e);
                #endif
                closeReason = "Socket exception (" + e.Message + ")";
                closeException = e;
                Close();
            } catch(ObjectDisposedException e){
                #if DEBUG
                Console.WriteLine(ID + " disposed exception closure");
                #endif
                closeReason = "Disposed exception (socket object was disposed by the subsystem)";
                closeException = e;
                Close();
            }
        }
        
        internal void DoRead(byte[] buf, int read){
            if(read > 0){                
                if(OnRead != null){ // Simple text mode
                    buffer += Encoding.UTF8.GetString(buf, 0, read);
                    while(buffer.IndexOf(delim) >= 0){
                        if(threadSyncControl != null) threadSyncControl.BeginInvoke(OnRead, new object[]{this, Read()});
                        else OnRead(this, Read());
                    }
                }
            }
            Console.WriteLine(ID + " read "+read+" bytes for event handler");
            ReadInternal(buf, read, false);
        }
        
        public static void LogBytes(byte[] buf, int len){
            byte[] ba = new byte[len];
            Array.Copy(buf, ba, len);
            Console.WriteLine(ByteBuilder.FormatParameter(new Parameter(ba, ParameterType.Byte)));        
        }
        
        void ReadInternal(byte[] buf, int read, bool alreadyEncrypted){            
        
        Console.WriteLine(ID + " read "+read+" bytes for event handler");
            if((!alreadyEncrypted) && (encType != EncryptionType.None)){
                if(encComplete){
                    #if DEBUG
                    Console.Write(ID + " Received: "); LogBytes(buf, read);
                    #endif
                    buf = decryptor.TransformFinalBlock(buf, 0, read);
                    #if DEBUG
                    Console.Write(ID + " Decrypted: "); LogBytes(buf, read);
                    #endif
                } else {
                    // Client side key exchange
                    int ofs = 0;
                    if(encExpected < 0){ 
                        encStage++;
                        ofs++; read--; encExpected = buf[0]; // length of key to come
                        encKey = new byte[encExpected];
                        encRead = 0;
                    }
                    if(read >= encExpected){
                        Array.Copy(buf, ofs, encKey, encRead, encExpected);
                        int togo = read - encExpected;
                        encExpected = -1;
                        #if DEBUG
                        Console.WriteLine(ID + " Read encryption key: "+ByteBuilder.FormatParameter(new Parameter(encKey, ParameterType.Byte)));
                        #endif
                        if(server == null) ClientEncryptionTransferComplete();
                        else ServerEncryptionTransferComplete();
                        if(togo > 0){
                            byte[] newbuf = new byte[togo];
                            Array.Copy(buf, read + ofs - togo, newbuf, 0, togo);
                            ReadInternal(newbuf, togo, false);
                        }
                    } else {
                        Array.Copy(buf, ofs, encKey, encRead, read);
                        encExpected -= read; encRead += read;                    
                    }
                    return;
                }
            }
            
            if((!alreadyEncrypted) && (OnReadBytes != null)){
                if(threadSyncControl != null) threadSyncControl.BeginInvoke(OnReadBytes, new object[]{this, buf, read});
                else OnReadBytes(this, buf, read);
            }
            
            if((OnReadMessage != null) && (MessageType != MessageType.Unmessaged)){
                // Messaged mode
                int copied;
                uint code = 0;
                switch(MessageType){
                    case MessageType.CodeAndLength:
                    case MessageType.Length:
                        int length;
                        if(MessageType == MessageType.Length){
                            copied = FillHeader(ref buf, 4, read);                        
                            if(headerread < 4) break;
                            length = GetInt(msgheader, 0, 4);
                        } else{
                            copied = FillHeader(ref buf, 8, read);
                            if(headerread < 8) break;
                            code = (uint)GetInt(msgheader, 0, 4);
                            length = GetInt(msgheader, 4, 4);
                        }
                        if(read == copied) break;
                        // If encryption is on, the next byte is a checksum of the header
                        int ofs = 0;
                        if(wantingChecksum && (encType != EncryptionType.None)){
                            byte checksum = buf[0];
                            ofs++;
                            wantingChecksum = false;
                            byte headersum = 0;
                            for(int i = 0; i < 8; i++) headersum += msgheader[i];
                            if(checksum != headersum){
                                Close();
                                throw new IOException("Header checksum failed! (was "+checksum+", calculated "+headersum+")");
                            }
                        }
                        bytes.Add(buf, ofs, read - ofs - copied);
                        if(encType != EncryptionType.None) length++; // checksum byte
                        
                        // Now we know we are reading into the body of the message
                        #if DEBUG
                        Console.WriteLine(ID + " Added "+(read - ofs - copied)+" bytes, have "+bytes.Length+" of "+length);
                        #endif
                        if(OnPartialMessage != null) {
                            if(threadSyncControl != null) threadSyncControl.BeginInvoke(OnPartialMessage, new object[]{this, code, buf, ofs, read - ofs - copied, bytes.Length, length});
                            else OnPartialMessage(this, code, buf, ofs, read - ofs - copied, bytes.Length, length);
                        }
                        
                        if(bytes.Length >= length){
                            // A message was received!
                             headerread = 0; wantingChecksum = true;
                            byte[] msg = bytes.Read(0, length);
                            if(encType != EncryptionType.None){
                                byte checksum = msg[length - 1], msgsum = 0;
                                for(int i = 0; i < length - 1; i++) msgsum += msg[i];
                                if(checksum != msgsum){
                                    Close();
                                    throw new IOException("Content checksum failed! (was "+checksum+", calculated "+msgsum+")");
                                }
                                if(threadSyncControl != null) threadSyncControl.BeginInvoke(OnReadMessage, new object[]{this, code, msg, length - 1});
                                else OnReadMessage(this, code, msg, length - 1);
                            } else {
                                if(threadSyncControl != null) threadSyncControl.BeginInvoke(OnReadMessage, new object[]{this, code, msg, length });
                                else OnReadMessage(this, code, msg, length);
                            }
                            // Don't forget to put the rest through the mill
                            int togo = bytes.Length - length;
                            if(togo > 0){
                                byte[] whatsleft = bytes.Read(length, togo);
                                bytes.Clear();
                                ReadInternalSecondPass(whatsleft);
                            } else bytes.Clear();
                        }
                        //if(OnStatus != null) OnStatus(this, bytes.Length, length);
                        break;
                }
            }
        }
        
        void ReadInternalSecondPass(byte[] newbytes){
            ReadInternal(newbytes, newbytes.Length, true);
        }
        
        int FillHeader(ref byte[] buf, int to, int read) {
            int copied = 0;
            if(headerread < to){
                // First copy the header into the header variable.
                for(int i = 0; (i < read) && (headerread < to); i++, headerread++, copied++){
                    msgheader[headerread] = buf[i];
                }
            }
            if(copied > 0){
                // Take the header bytes off the 'message' section
                byte[] newbuf = new byte[read - copied];
                for(int i = 0; i < newbuf.Length; i++) newbuf[i] = buf[i + copied];
                buf = newbuf;
            }
            return copied;
        }
        
        internal ICryptoTransform MakeEncryptor(){ return MakeCrypto(true); }
        internal ICryptoTransform MakeDecryptor(){ return MakeCrypto(false); }
        internal ICryptoTransform MakeCrypto(bool encrypt){
            if(encrypt) return new SimpleEncryptor(encKey);
            else return new SimpleDecryptor(encKey);
        }        
        
        void ServerEncryptionTransferComplete(){
            switch(encType){
                case EncryptionType.None:
                    throw new ArgumentException("Should not have key exchange for unencrypted connection!");                
                case EncryptionType.ServerKey:
                    throw new ArgumentException("Should not have server-side key exchange for server keyed connection!");                
                case EncryptionType.ServerRSAClientKey:
                    // Symmetric key is in RSA-encoded encKey
                    RSACryptoServiceProvider rsa = new RSACryptoServiceProvider();
                    rsa.ImportParameters(encParams);
                    encKey = rsa.Decrypt(encKey, false);
                    #if DEBUG
                    Console.WriteLine("Symmetric key is: "); LogBytes(encKey, encKey.Length);
                    #endif
                    MakeEncoders();
                    server.KeyExchangeComplete(this);
                    break;
            }
        }
        
        void ClientEncryptionTransferComplete(){
            // A part of the key exchange process has been completed, and the key is
            // in encKey
            switch(encType){
                case EncryptionType.None:
                    throw new ArgumentException("Should not have key exchange for unencrypted connection!");                
                case EncryptionType.ServerKey:
                    // key for transfer is now in encKey, so all is good
                    MakeEncoders();
                    break;
                case EncryptionType.ServerRSAClientKey:
                    // Stage 1: modulus; Stage 2: exponent
                    // When the exponent arrives, create a random DES key
                    // and send it
                    switch(encStage){
                        case 1: encParams.Modulus = encKey; break;
                        case 2:
                            encParams.Exponent = encKey;
                            RSACryptoServiceProvider rsa = new RSACryptoServiceProvider();
                            rsa.ImportParameters(encParams);
                            encKey = EncryptionUtils.GetRandomBytes(24, false);
                            byte[] send = GetLengthEncodedVector(rsa.Encrypt(encKey, false));
                            sock.Send(send);                        
                            #if DEBUG
                            Console.WriteLine("Sent symmetric key: "+ByteBuilder.FormatParameter(new Parameter(send, ParameterType.Byte)));
                            #endif
                            MakeEncoders();
                            break;
                    }
                    break;
            }
        }
        
        internal void MakeEncoders(){
            encryptor = MakeEncryptor();    
            decryptor = MakeDecryptor();
            encComplete = true;
            if(OnReady != null) OnReady(this);
        }
            
        public static byte[] GetLengthEncodedVector(byte[] from){
            int l = from.Length;
            if(l > 255) throw new ArgumentException("Cannot length encode more than 255");
            byte[] to = new byte[l + 1];
            to[0] = (byte)l;
            Array.Copy(from, 0, to, 1, l);
            return to;
        }
        
        public static int GetInt(byte[] ba, int from, int len){
            int r = 0;
            for(int i = 0; i < len; i++)
                r += ba[from + i] << ((len - i - 1) * 8);
            return r;
        }
        
        public static int[] GetIntArray(byte[] ba){ return GetIntArray(ba, 0, ba.Length, 4); }
        public static int[] GetIntArray(byte[] ba, int from, int len){ return GetIntArray(ba, from, len, 4); }
        public static int[] GetIntArray(byte[] ba, int from, int len, int stride){
            int[] res = new int[len / stride];
            for(int i = 0; i < res.Length; i++){
                res[i] = GetInt(ba, from + (i * stride), stride);
            }
            return res;
        }
        
        public static uint[] GetUintArray(byte[] ba){
            uint[] res = new uint[ba.Length / 4];
            for(int i = 0; i < res.Length; i++){
                res[i] = (uint)GetInt(ba, i * 4, 4);
            }
            return res;
        }
        
        public static double[] GetDoubleArray(byte[] ba){
            double[] res = new double[ba.Length / 8];
            for(int i = 0; i < res.Length; i++){
                res[i] = BitConverter.ToDouble(ba, i * 8);
            }
            return res;
        }
        
        public static byte[] IntToBytes(int val){ return UintToBytes((uint)val); }
        public static byte[] UintToBytes(uint val){
            byte[] res = new byte[4];
            for(int i = 3; i >= 0; i--){
                res[i] = (byte)val; val >>= 8;
            }
            return res;
        }
        
        public static byte[] IntArrayToBytes(int[] val){
            byte[] res = new byte[val.Length * 4];
            for(int i = 0; i < val.Length; i++){
                byte[] vb = IntToBytes(val[i]);
                res[(i * 4)] = vb[0];
                res[(i * 4) + 1] = vb[1];
                res[(i * 4) + 2] = vb[2];
                res[(i * 4) + 3] = vb[3];
            }
            return res;
        }
        
        public static byte[] UintArrayToBytes(uint[] val){
            byte[] res = new byte[val.Length * 4];
            for(uint i = 0; i < val.Length; i++){
                byte[] vb = IntToBytes((int)val[i]);
                res[(i * 4)] = vb[0];
                res[(i * 4) + 1] = vb[1];
                res[(i * 4) + 2] = vb[2];
                res[(i * 4) + 3] = vb[3];
            }
            return res;
        }
        
        public static byte[] DoubleArrayToBytes(double[] val){
            byte[] res = new byte[val.Length * 8];
            for(int i = 0; i < val.Length; i++){
                byte[] vb = BitConverter.GetBytes(val[i]);
                for(int ii = 0; ii < 8; ii++) res[(i*8)+ii] = vb[ii];
            }
            return res;
        }
        
        public static byte[] StringArrayToBytes(string[] val, Encoding e){
            byte[][] baa = new byte[val.Length][];
            int l = 0;
            for(int i = 0; i < val.Length; i++){ baa[i] = e.GetBytes(val[i]); l += 4 + baa[i].Length; }
            byte[] r = new byte[l + 4];
            IntToBytes(val.Length).CopyTo(r, 0);
            int ofs = 4;
            for(int i = 0; i < baa.Length; i++){
                IntToBytes(baa[i].Length).CopyTo(r, ofs); ofs += 4;
                baa[i].CopyTo(r, ofs); ofs += baa[i].Length;
            }
            return r;
        }
        
        public static string[] GetStringArray(byte[] ba, Encoding e){
            int l = GetInt(ba, 0, 4), ofs = 4;
            string[] r = new string[l];
            for(int i = 0; i < l; i++){
                int thislen = GetInt(ba, ofs, 4); ofs += 4;
                r[i] = e.GetString(ba, ofs, thislen); ofs += thislen;
            }
            return r;
        }
        
        public void Close(string reason){ if(!alreadyclosed){ closeReason = reason; Close(); } }
        public void Close(){
            if(!alreadyclosed){
                if(server != null) server.ClientClosed(this);
                if(OnClose != null) {
                    if((threadSyncControl != null) && (threadSyncControl.InvokeRequired))
                        threadSyncControl.Invoke(OnClose, new object[]{this});
                    else OnClose(this);
                }
                alreadyclosed = true;
                #if DEBUG
                Console.WriteLine("**closed client** at "+DateTime.Now.Ticks);
                #endif
            }
            sock.Close();
        }
    }
    
    public class Sockets {
        // Socks proxy inspired by http://www.thecodeproject.com/csharp/ZaSocks5Proxy.asp
        public static SocksProxy SocksProxy;
        public static bool UseSocks = false;
        
        public static Socket CreateTCPSocket(String address, int port){return CreateTCPSocket(address, port, UseSocks, SocksProxy);}
        public static Socket CreateTCPSocket(String address, int port, bool useSocks, SocksProxy proxy){
            Socket sock;
            if(useSocks) sock = ConnectToSocksProxy(proxy.host, proxy.port, address, port, proxy.username, proxy.password);
            else {
                #if NET_1_1
                IPAddress host = Dns.GetHostByName(address).AddressList[0];
                #else
                IPAddress host = Dns.GetHostEntry(address).AddressList[0];
                #endif
                sock = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);
                sock.Connect(new IPEndPoint(host, port));
            }
            return sock;
        }

        private static string[] errorMsgs=    {
            "Operation completed successfully.",
            "General SOCKS server failure.",
            "Connection not allowed by ruleset.",
            "Network unreachable.",
            "Host unreachable.",
            "Connection refused.",
            "TTL expired.",
            "Command not supported.",
            "Address type not supported.",
            "Unknown error."
        };

        public static Socket ConnectToSocksProxy(IPAddress proxyIP, int proxyPort, String destAddress, int destPort, string userName, string password){
            byte[] request = new byte[257];
            byte[] response = new byte[257];
            ushort nIndex;
            
            IPAddress destIP = null;
            
            try{ destIP = IPAddress.Parse(destAddress); }
            catch { }
            
            IPEndPoint proxyEndPoint = new IPEndPoint(proxyIP, proxyPort);

            // open a TCP connection to SOCKS server...
            Socket s;
            s = new Socket(AddressFamily.InterNetwork,SocketType.Stream,ProtocolType.Tcp);
            s.Connect(proxyEndPoint);    
/*            } catch(SocketException){
                throw new SocketException(0, "Could not connect to proxy server.");
            }*/

            nIndex = 0;
            request[nIndex++]=0x05; // Version 5.
            request[nIndex++]=0x02; // 2 Authentication methods are in packet...
            request[nIndex++]=0x00; // NO AUTHENTICATION REQUIRED
            request[nIndex++]=0x02; // USERNAME/PASSWORD
            // Send the authentication negotiation request...
            s.Send(request,nIndex,SocketFlags.None);

            // Receive 2 byte response...
            int nGot = s.Receive(response,2,SocketFlags.None);    
            if (nGot!=2)
                throw new ConnectionException("Bad response received from proxy server.");

            if (response[1]==0xFF)
            {    // No authentication method was accepted close the socket.
                s.Close();
                throw new ConnectionException("None of the authentication method was accepted by proxy server.");
            }

            byte[] rawBytes;

            if (/*response[1]==0x02*/true)
            {//Username/Password Authentication protocol
                nIndex = 0;
                request[nIndex++]=0x05; // Version 5.

                // add user name
                request[nIndex++]=(byte)userName.Length;
                rawBytes = Encoding.Default.GetBytes(userName);
                rawBytes.CopyTo(request,nIndex);
                nIndex+=(ushort)rawBytes.Length;

                // add password
                request[nIndex++]=(byte)password.Length;
                rawBytes = Encoding.Default.GetBytes(password);
                rawBytes.CopyTo(request,nIndex);
                nIndex+=(ushort)rawBytes.Length;

                // Send the Username/Password request
                s.Send(request,nIndex,SocketFlags.None);
                // Receive 2 byte response...
                nGot = s.Receive(response,2,SocketFlags.None);    
                if (nGot!=2)
                    throw new ConnectionException("Bad response received from proxy server.");
                if (response[1] != 0x00)
                    throw new ConnectionException("Bad Usernaem/Password.");
            }
            // This version only supports connect command. 
            // UDP and Bind are not supported.

            // Send connect request now...
            nIndex = 0;
            request[nIndex++]=0x05;    // version 5.
            request[nIndex++]=0x01;    // command = connect.
            request[nIndex++]=0x00;    // Reserve = must be 0x00

            if (destIP != null)
            {// Destination adress in an IP.
                switch(destIP.AddressFamily)
                {
                    case AddressFamily.InterNetwork:
                        // Address is IPV4 format
                        request[nIndex++]=0x01;
                        rawBytes = destIP.GetAddressBytes();
                        rawBytes.CopyTo(request,nIndex);
                        nIndex+=(ushort)rawBytes.Length;
                        break;
                    case AddressFamily.InterNetworkV6:
                        // Address is IPV6 format
                        request[nIndex++]=0x04;
                        rawBytes = destIP.GetAddressBytes();
                        rawBytes.CopyTo(request,nIndex);
                        nIndex+=(ushort)rawBytes.Length;
                        break;
                }
            }
            else
            {// Dest. address is domain name.
                request[nIndex++]=0x03;    // Address is full-qualified domain name.
                request[nIndex++]=Convert.ToByte(destAddress.Length); // length of address.
                rawBytes = Encoding.Default.GetBytes(destAddress);
                rawBytes.CopyTo(request,nIndex);
                nIndex+=(ushort)rawBytes.Length;
            }

            // using big-edian byte order
            byte[] portBytes = BitConverter.GetBytes((ushort)destPort);
            for (int i=portBytes.Length-1;i>=0;i--)
                request[nIndex++]=portBytes[i];

            // send connect request.
            s.Send(request,nIndex,SocketFlags.None);
            s.Receive(response);    // Get variable length response...
            if (response[1]!=0x00)
                throw new ConnectionException(errorMsgs[response[1]]);
            // Success Connected...
            return s;
        }
    }
    
    public struct SocksProxy {
        public IPAddress host;
        public ushort port;
        public string username, password;
        
        public SocksProxy(String hostname, ushort port, String username, String password){
            this.port = port;
            #if NET_1_1
            host = Dns.GetHostByName(hostname).AddressList[0];
            #else
            host = Dns.GetHostEntry(hostname).AddressList[0];
            #endif
            this.username = username; this.password = password;
        }
    }
    
    public class ConnectionException: Exception {
        public ConnectionException(string message) : base(message) {}
    }
    
    // Server code cribbed from Framework Help
    public delegate bool ClientEvent(Server serv, ClientInfo new_client); // whether to accept the client
    public class Server {
        class ClientState {
            // To hold the state information about a client between transactions
            internal Socket Socket = null;
            internal const int BufferSize = 1024;
            internal byte[] buffer = new byte[BufferSize];
            internal StringBuilder sofar = new StringBuilder();  

            internal ClientState(Socket sock){
                Socket = sock;
            }
        }
  
      Hashtable clients = new Hashtable();
      Socket ss;

      public event ClientEvent Connect, ClientReady;
      public IEnumerable Clients {
        get { return clients.Values; }
      }

        public Socket ServerSocket {
            get { return ss; }
        }

        public ClientInfo this[int id]{
            get { return (ClientInfo)clients[id]; }
/*                foreach(ClientInfo ci in Clients)
                    if(ci.ID == id) return ci;
                return null;
            }*/
        }
        
        public object SyncRoot { get { return this; } }

        private EncryptionType encType;
        public EncryptionType DefaultEncryptionType {
            get { return encType; }
            set { encType = value; }
        }
  
        public int Port {
            get { return ((IPEndPoint)ss.LocalEndPoint).Port; }
        }

        public Server(int port) : this(port, null) {}
        public Server(int port, ClientEvent connDel) {
            Connect = connDel;

            ss = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp );
            ss.Bind(new IPEndPoint(IPAddress.Any, port));
            ss.Listen(100);

            // Start the accept process. When a connection is accepted, the callback
            // must do this again to accept another connection
            ss.BeginAccept(new AsyncCallback(AcceptCallback), ss);
        }

        internal void ClientClosed(ClientInfo ci){
            lock(SyncRoot) clients.Remove(ci.ID);
        }

        public void Broadcast(byte[] bytes){
            lock(SyncRoot) foreach(ClientInfo ci in Clients) ci.Send(bytes);
        }

        public void BroadcastMessage(uint code, byte[] bytes){BroadcastMessage(code, bytes, 0); }
        public void BroadcastMessage(uint code, byte[] bytes, byte paramType){
            lock(SyncRoot) foreach(ClientInfo ci in Clients) ci.SendMessage(code, bytes, paramType);
        }

        // ASYNC CALLBACK CODE
        void AcceptCallback(IAsyncResult ar) {
            try{
                Socket server = (Socket) ar.AsyncState;
                Socket cs = server.EndAccept(ar);

                // Start the thing listening again
                server.BeginAccept(new AsyncCallback(AcceptCallback), server);

                ClientInfo c = new ClientInfo(cs, null, null, ClientDirection.Both, false);
                c.server = this;
                // Allow the new client to be rejected by the application
                if(Connect != null){
                    if(!Connect(this, c)){
                        // Rejected
                        cs.Close();
                        return;
                    }
                }
                // Initiate key exchange
                c.EncryptionType = encType;
                switch(encType){
                    case EncryptionType.None: KeyExchangeComplete(c); break;
                    case EncryptionType.ServerKey:
                        c.encKey = GetSymmetricKey();
                        byte[] key = ClientInfo.GetLengthEncodedVector(c.encKey);
                        cs.Send(key);
                        #if DEBUG
                        Console.Write(c.ID + " Sent key: "); ClientInfo.LogBytes(key, key.Length);
                        #endif
                        c.MakeEncoders();
                        KeyExchangeComplete(c); 
                        break;
                    case EncryptionType.ServerRSAClientKey:
                        RSACryptoServiceProvider rsa = new RSACryptoServiceProvider();
                        RSAParameters p = rsa.ExportParameters(true);
                        cs.Send(ClientInfo.GetLengthEncodedVector(p.Modulus));
                        cs.Send(ClientInfo.GetLengthEncodedVector(p.Exponent));
                        c.encParams = p;
                        break;
                    default: throw new ArgumentException("Unknown or unsupported encryption type "+encType);
                }
                lock(SyncRoot) clients[c.ID] = c;
                c.BeginReceive();
            } catch(ObjectDisposedException) {  }
            catch(SocketException) { }
            catch(Exception e) { Console.WriteLine(e); }            
        }
        
        protected virtual byte[] GetSymmetricKey(){
            return EncryptionUtils.GetRandomBytes(24, false);
        }
        
        internal void KeyExchangeComplete(ClientInfo ci){
            // Key exchange is complete on this client. Client ready
            // handlers may still force a close of the connection
            if(ClientReady != null)
                if(!ClientReady(this, ci)) ci.Close("ClientReady callback rejected connection");
        }
        
        ~Server() { Close(); }
        public void Close(){
            ArrayList cl2 = new ArrayList();
            foreach(ClientInfo c in Clients) cl2.Add(c);
            foreach(ClientInfo c in cl2) c.Close("Server shutdown");
            
            ss.Close();
        }
    }
    
    public class ByteBuilder : MarshalByRefObject {
        byte[][] data;
        int packsize, used, paraminx = 0;
        
        public int Length {
            get {
                int len = 0;
                for(int i = 0; i < used; i++) len += data[i].Length;
                return len;
            }
        }
        
        public byte this[int i]{
            get { return Read(i, 1)[0]; }
        }
        
        public ByteBuilder() : this(10) {}
        public ByteBuilder(int packsize){
            this.packsize = packsize; used = 0;
            data = new byte[packsize][];
        }
        
        public ByteBuilder(byte[] data) {
            packsize = 1;
            used = 1;
            this.data = new byte[][] { data };
        }
        
        public ByteBuilder(byte[] data, int len) : this(data, 0, len) {}
        public ByteBuilder(byte[] data, int from, int len) : this(1) {
            Add(data, from, len);
        }
        public void Add(byte[] moredata){ Add(moredata, 0, moredata.Length); }
        public void Add(byte[] moredata, int from, int len){
//Console.WriteLine("Getting "+from+" to "+(from+len-1)+" of "+moredata.Length);
            if(used < packsize){
                data[used] = new byte[len];
                for(int j = from; j < from + len; j++)
                    data[used][j - from] = moredata[j];
                used++;
            } else {
                // Compress the existing items into the first array
                byte[] newdata = new byte[Length + len];
                int np = 0;
                for(int i = 0; i < used; i++)
                    for(int j = 0; j < data[i].Length; j++)
                        newdata[np++] = data[i][j];
                for(int j = from; j < from + len; j++)
                    newdata[np++] = moredata[j];
                data[0] = newdata;
                for(int i = 1; i < used; i++) data[i] = null;
                used = 1;
            }
        }
        
        public byte[] Read(int from, int len){
            if(len == 0) return new byte[0];
            byte[] res = new byte[len];
            int done = 0, start = 0;
            
            for(int i = 0; i < used; i++){
                if((start + data[i].Length) <= from){
                    start += data[i].Length; continue;
                }
                // Now we're in the data block
                for(int j = 0; j < data[i].Length; j++){
                    if((j + start) < from) continue;
                    res[done++] = data[i][j];
                    if(done == len) return res;
                }
            }
            
            throw new ArgumentException("Datapoints "+from+" and "+(from+len)+" must be less than "+Length);
        }
        
        public void Clear(){
            used = 0;
            for(int i = 0; i < used; i++) data[i] = null;            
        }
        
        public Parameter GetNextParameter(){ return GetParameter(ref paraminx); }
        public void ResetParameterPointer(){ paraminx = 0; }
        
        public Parameter GetParameter(ref int index){
            paraminx = index;
            Parameter res = new Parameter();
            res.Type = Read(index++, 1)[0];
            byte[] lenba = Read(index, 4);
            index += 4;
            int len = ClientInfo.GetInt(lenba, 0, 4);
            res.content = Read(index, len);
            index += len;
            return res;
        }
        
        public void AddParameter(Parameter param){ AddParameter(param.content, param.Type); }
        public void AddParameter(byte[] content, byte Type){
            Add(new byte[]{Type});
            Add(ClientInfo.IntToBytes(content.Length));
            Add(content);
        }
        
        public void AddInt(int i){ AddParameter(ClientInfo.IntToBytes(i), ParameterType.Int); }
        public void AddIntArray(int[] ia){ AddParameter(ClientInfo.IntArrayToBytes(ia), ParameterType.Int); }
        public void AddString(string s){ AddParameter(Encoding.UTF8.GetBytes(s), ParameterType.String); }
        public void AddStringArray(string[] sa){ AddParameter(ClientInfo.StringArrayToBytes(sa, Encoding.UTF8), ParameterType.StringArray); }
        public void AddDouble(double i){ AddParameter(BitConverter.GetBytes(i), ParameterType.Double); }
        public void AddLong(long i){ AddParameter(BitConverter.GetBytes(i), ParameterType.Long); }
        public void AddDoubleArray(double[] ia){ AddParameter(ClientInfo.DoubleArrayToBytes(ia), ParameterType.Double); }
        
        public int GetInt(){ return ClientInfo.GetInt(GetNextParameter().content, 0, 4);}
        public int[] GetIntArray(){ return ClientInfo.GetIntArray(GetNextParameter().content);}
        public double GetDouble(){ return BitConverter.ToDouble(GetNextParameter().content, 0);}
        public double[] GetDoubleArray(){ return ClientInfo.GetDoubleArray(GetNextParameter().content);}
        public long GetLong(){ return BitConverter.ToInt64(GetNextParameter().content, 0);}
        public string GetString(){ return Encoding.UTF8.GetString(GetNextParameter().content);}
        public string[] GetStringArray(){ return ClientInfo.GetStringArray(GetNextParameter().content, Encoding.UTF8);}
        
        public static String FormatParameter(Parameter p){
            switch(p.Type){
                case ParameterType.Int:
                    int[] ia = ClientInfo.GetIntArray(p.content);
                    StringBuilder sb = new StringBuilder();
                    foreach(int i in ia) sb.Append(i + " ");
                    return sb.ToString();
                case ParameterType.Uint:
                    ia = ClientInfo.GetIntArray(p.content);
                    sb = new StringBuilder();
                    foreach(int i in ia) sb.Append(i.ToString("X8") + " ");
                    return sb.ToString();
                case ParameterType.Double:
                    double[] da = ClientInfo.GetDoubleArray(p.content);
                    sb = new StringBuilder();
                    foreach(double d in da) sb.Append(d + " ");
                    return sb.ToString();
                case ParameterType.String:
                    return Encoding.UTF8.GetString(p.content);
                case ParameterType.StringArray:
                    string[] sa = ClientInfo.GetStringArray(p.content, Encoding.UTF8);
                    sb = new StringBuilder();
                    foreach(string s in sa) sb.Append(s + "; ");
                    return sb.ToString();
                case ParameterType.Byte:
                    sb = new StringBuilder();
                    foreach(int b in p.content) sb.Append(b.ToString("X2") + " ");
                    return sb.ToString();
                default: return "??";
            }
        }        
    }
    
    [Serializable]
    public struct Parameter {
        public byte Type;
        public byte[] content;
        
        public Parameter(byte[] content, byte type){
            this.content = content; Type = type;
        }
    }
    
    public struct ParameterType {
        public const byte Unparameterised = 0;
        public const byte Int = 1;
        public const byte Uint = 2;
        public const byte String = 3;
        public const byte Byte = 4;
        public const byte StringArray = 5;
        public const byte Double = 6;
        public const byte Long = 7;
    }
}

namespace RedCorona.Cryptography {
    // Cryptographic classes
    public abstract class BaseCrypto : ICryptoTransform {
        public int InputBlockSize { get { return 1; } }
        public int OutputBlockSize { get { return 1; } }
        public bool CanTransformMultipleBlocks { get { return true; } }
        public bool CanReuseTransform { get { return true; } }        
        
        protected byte[] key;
        protected byte currentKey;
        protected int done = 0, keyinx = 0;
        
        protected BaseCrypto(byte[] key){
            if(key.Length == 0) throw new ArgumentException("Must provide a key");
            this.key = key;
            currentKey = 0;
            for(int i = 0; i < key.Length; i++) currentKey += key[i];
        }
        
        protected abstract byte DoByte(byte b);
        public int TransformBlock(byte[] from, int frominx, int len, byte[] to, int toinx){
            #if DEBUG
            Console.WriteLine("Starting transform, key is "+currentKey);
            #endif
            for(int i = 0; i < len; i++){            
                byte oldkey = currentKey;
                to[toinx + i] = DoByte(from[frominx + i]);
                #if DEBUG
                Console.WriteLine("  encrypting "+from[frominx + i]+" to "+to[toinx + i]+", key is "+oldkey);
                #endif
                BumpKey();
            }
            return len;
        }
        public byte[] TransformFinalBlock(byte[] from, int frominx, int len){
            byte[] to = new byte[len];
            TransformBlock(from, frominx, len, to, 0);
            return to;
        }
        protected void BumpKey(){
            keyinx = (keyinx + 1) % key.Length;
            currentKey = Multiply257(key[keyinx], currentKey);
        }
        
        protected static byte Multiply257(byte a, byte b){
             return (byte)((((a + 1) * (b + 1)) % 257) - 1);
        }
        
        protected static byte[] complements = {0,128,85,192,102,42,146,224,199,179,186,149,177,201,119,240,120,99,229,89,48,221,189,74,71,88,237,100,194,59,198,248,147,188,234,49,131,114,144,44,162,152,5,110,39,94,174,165,20,35,125,172,96,118,242,178,247,225,60,29,58,227,101,252,86,73,233,222,148,245,180,24,168,65,23,185,246,200,243,150,164,209,95,204,126,2,64,183,25,19,208,175,151,215,45,82,52,138,134,17,27,62,4,214,163,176,244,187,223,249,43,217,115,123,37,112,133,158,53,14,16,157,139,113,219,50,84,254,1,171,205,36,142,116,98,239,241,202,97,122,143,218,132,140,38,212,6,32,68,11,79,92,41,251,193,228,238,121,117,203,173,210,40,104,80,47,236,230,72,191,253,129,51,160,46,91,105,12,55,9,70,232,190,87,231,75,10,107,33,22,182,169,3,154,28,197,226,195,30,8,77,13,137,159,83,130,220,235,90,81,161,216,145,250,103,93,211,111,141,124,206,21,67,108,7,57,196,61,155,18,167,184,181,66,34,207,166,26,156,135,15,136,54,78,106,69,76,56,31,109,213,153,63,170,127,255};
        protected static byte Complement257(byte b){ return complements[b]; }
        
        public void Dispose(){} // for IDisposable
    }
    
    public class SimpleEncryptor : BaseCrypto {
        public SimpleEncryptor(byte[] key) : base(key) {}
        
        protected override byte DoByte(byte b){
            byte b2 = Multiply257((byte)(b+currentKey), currentKey);
            currentKey = Multiply257((byte)(b+b2), currentKey);
            return b2;
        }
    }
    public class SimpleDecryptor : BaseCrypto {
        public SimpleDecryptor(byte[] key) : base(key) {}
        
        protected override byte DoByte(byte b){
            byte b2 = (byte)(Multiply257(b, Complement257(currentKey)) - currentKey);
            currentKey = Multiply257((byte)(b+b2), currentKey);
            return b2;
        }
    }
}

HTTP.cs内容如下:

//#define DEBUG
// Embedded HTTP server, partial 1.1 support with keep-alive and session management
// REQUIRES: Sockets.dll (or Sockets.cs)

// v1.0

// HttpServer: Main class that implements a HTTP server on top of Sockets server.
//   Includes session management via cookies, keep-alive, UTF8 transfer of text
//   and simple query string parsing (via GET or POST).
// HttpRequest: Represents the request made by the user, with header fields,
//   query string and cookies pre-parsed. Typical server code will read the 
//   properties of this request to determine what to do.
// HttpResponse: The response which is to be sent back to the user. A simple
//   server will set the Content property, but you can send binary information
//   via RawContent, and change the mime type or response code.
// Session: A container into which you may put state information that will be
//  available in future requests from the same user.
// IHttpHandler: You must implement this interface in order to process
//   requests.
// SubstitutingFileHandler: An implementation of IHttpHandler that reads files
//   from disk and allows substitutions of <%pseudotags> within text documents.

// (C) Richard Smith 2008
//   [email protected]
// If downloaded from CodeProject, this file is subject to the CodeProject Open Licence 1.0.
// If downloaded from elsewhere, you may freely distribute the source code, as long as this
// header is not removed or modified. You may not charge for the source code or any compiled
// library that includes this class; however you may link to it from commercial software. Please
// leave a credit to the original download location in your documentation or About box.

// Simple HTTP server
using System;
using System.IO;
using System.Net;
using System.Text;
using System.Text.RegularExpressions;
using System.Collections;
using System.Collections.Generic;

namespace RedCorona.Net
{
    public class HttpServer
    {
        Server s;
        Hashtable hostmap = new Hashtable();    // Map<string, string>: Host => Home folder
        ArrayList handlers = new ArrayList();        // List<IHttpHandler>
        Hashtable sessions = new Hashtable();        // Map<string,Session>

        int sessionTimeout = 600;

        public Hashtable Hostmap { get { return hostmap; } }
        public Server Server { get { return s; } }
        public ArrayList Handlers { get { return handlers; } }
        public int SessionTimeout
        {
            get { return sessionTimeout; }
            set { sessionTimeout = value; CleanUpSessions(); }
        }

        public HttpServer(Server s)
        {
            this.s = s;
            s.Connect += new ClientEvent(ClientConnect);
            handlers.Add(new FallbackHandler());
        }

        bool ClientConnect(Server s, ClientInfo ci)
        {
            ci.Delimiter = "\r\n\r\n";
            ci.Data = new ClientData(ci);
            ci.OnRead += new ConnectionRead(ClientRead);
            ci.OnReadBytes += new ConnectionReadBytes(ClientReadBytes);
            return true;
        }

        void ClientRead(ClientInfo ci, string text)
        {
            // Read header, if in right state
            ClientData data = (ClientData)ci.Data;
            if (data.state != ClientState.Header) return; // already done; must be some text in content, which will be handled elsewhere
            text = text.Substring(data.headerskip);
            Console.WriteLine("Read header: " + text + " (skipping first " + data.headerskip + ")");
            data.headerskip = 0;
            string[] lines = text.Replace("\r\n", "\n").Split('\n');
            data.req.HeaderText = text;
            // First line: METHOD /path/url HTTP/version
            string[] firstline = lines[0].Split(' ');
            if (firstline.Length != 3) { SendResponse(ci, data.req, new HttpResponse(400, "Incorrect first header line " + lines[0]), true); return; }
            if (firstline[2].Substring(0, 4) != "HTTP") { SendResponse(ci, data.req, new HttpResponse(400, "Unknown protocol " + firstline[2]), true); return; }
            data.req.Method = firstline[0];
            data.req.Url = firstline[1];
            data.req.HttpVersion = firstline[2].Substring(5);
            int p;
            for (int i = 1; i < lines.Length; i++)
            {
                p = lines[i].IndexOf(':');
                if (p > 0) data.req.Header[lines[i].Substring(0, p)] = lines[i].Substring(p + 2);
                else Console.WriteLine("Warning, incorrect header line " + lines[i]);
            }
            // If ? in URL, split out query information
            p = firstline[1].IndexOf('?');
            if (p > 0)
            {
                data.req.Page = data.req.Url.Substring(0, p);
                data.req.QueryString = data.req.Url.Substring(p + 1);
            }
            else
            {
                data.req.Page = data.req.Url;
                data.req.QueryString = "";
            }

            if (data.req.Page.IndexOf("..") >= 0) { SendResponse(ci, data.req, new HttpResponse(400, "Invalid path"), true); return; }

            if (!data.req.Header.TryGetValue("Host", out data.req.Host)) { SendResponse(ci, data.req, new HttpResponse(400, "No Host specified"), true); return; }

            string cookieHeader;
            if (data.req.Header.TryGetValue("Cookie", out cookieHeader))
            {
                string[] cookies = cookieHeader.Split(';');
                foreach (string cookie in cookies)
                {
                    p = cookie.IndexOf('=');
                    if (p > 0)
                    {
                        data.req.Cookies[cookie.Substring(0, p).Trim()] = cookie.Substring(p + 1);
                    }
                    else
                    {
                        data.req.Cookies[cookie.Trim()] = "";
                    }
                }
            }

            string contentLengthString;
            if (data.req.Header.TryGetValue("Content-Length", out contentLengthString))
                data.req.ContentLength = Int32.Parse(contentLengthString);
            else data.req.ContentLength = 0;

            //if(data.req.ContentLength > 0){
            data.state = ClientState.PreContent;
            data.skip = text.Length + 4;
            //} else DoProcess(ci);

            //ClientReadBytes(ci, new byte[0], 0); // For content length 0 body
        }

        public string GetFilename(HttpRequest req)
        {
            string folder = (string)hostmap[req.Host];
            if (folder == null) folder = "webhome";
            if (req.Page == "/") return folder + "/index.html";
            else return folder + req.Page;
        }

        void DoProcess(ClientInfo ci)
        {
            ClientData data = (ClientData)ci.Data;
            string sessid;
            if (data.req.Cookies.TryGetValue("_sessid", out sessid))
                data.req.Session = (Session)sessions[sessid];
            bool closed = Process(ci, data.req);
            data.state = closed ? ClientState.Closed : ClientState.Header;
            data.read = 0;
            HttpRequest oldreq = data.req;
            data.req = new HttpRequest(); // Once processed, the connection will be used for a new request
            data.req.Session = oldreq.Session; // ... but session is persisted
            data.req.From = ((IPEndPoint)ci.Socket.RemoteEndPoint).Address;
        }

        void ClientReadBytes(ClientInfo ci, byte[] bytes, int len)
        {
            CleanUpSessions();
            int ofs = 0;
            ClientData data = (ClientData)ci.Data;
            Console.WriteLine("Reading " + len + " bytes of content, in state " + data.state + ", skipping " + data.skip + ", read " + data.read);
            switch (data.state)
            {
                case ClientState.Content: break;
                case ClientState.PreContent:
                    data.state = ClientState.Content;
                    if ((data.skip - data.read) > len) { data.skip -= len; return; }
                    ofs = data.skip - data.read; data.skip = 0;
                    break;
                //case ClientState.Header: data.read += len - data.headerskip; return;
                default: data.read += len; return;
            }
            data.req.Content += Encoding.Default.GetString(bytes, ofs, len - ofs);
            data.req.BytesRead += len - ofs;
            data.headerskip += len - ofs;
#if DEBUG
            Console.WriteLine("Reading " + (len - ofs) + " bytes of content. Got " + data.req.BytesRead + " of " + data.req.ContentLength);
#endif
            if (data.req.BytesRead >= data.req.ContentLength)
            {
                if (data.req.Method == "POST")
                {
                    if (data.req.QueryString == "") data.req.QueryString = data.req.Content;
                    else data.req.QueryString += "&" + data.req.Content;
                }
                ParseQuery(data.req);
                DoProcess(ci);
            }
        }

        void ParseQuery(HttpRequest req)
        {
            if (req.QueryString == "") return;
            string[] sections = req.QueryString.Split('&');
            for (int i = 0; i < sections.Length; i++)
            {
                int p = sections[i].IndexOf('=');
                if (p < 0) req.Query[sections[i]] = "";
                else req.Query[sections[i].Substring(0, p)] = URLDecode(sections[i].Substring(p + 1));
            }
        }

        public static string URLDecode(string input)
        {
            StringBuilder output = new StringBuilder();
            int p;
            while ((p = input.IndexOf('%')) >= 0)
            {
                output.Append(input.Substring(0, p));
                string hexNumber = input.Substring(p + 1, 2);
                input = input.Substring(p + 3);
                output.Append((char)int.Parse(hexNumber, System.Globalization.NumberStyles.HexNumber));
            }
            return output.Append(input).ToString();
        }

        protected virtual bool Process(ClientInfo ci, HttpRequest req)
        {
            HttpResponse resp = new HttpResponse();
            resp.Url = req.Url;
            //注意,此处从最后添加的Handler开始遍历,如果找到合适的则退出循环
            for (int i = handlers.Count - 1; i >= 0; i--)
            {
                IHttpHandler handler = (IHttpHandler)handlers[i];
                //如果handler.Process返回成功,则直接退出循环
                if (handler.Process(this, req, resp))
                {
                    //SendResponse(ci, req, resp, resp.ReturnCode != 200);
                    SendResponse(ci, req, resp, true);
                    return resp.ReturnCode != 200;
                }
            }
            return true;
        }

        enum ClientState { Closed, Header, PreContent, Content };
        class ClientData
        {
            internal HttpRequest req = new HttpRequest();
            internal ClientState state = ClientState.Header;
            internal int skip, read, headerskip;

            internal ClientData(ClientInfo ci)
            {
                req.From = ((IPEndPoint)ci.Socket.RemoteEndPoint).Address;
            }
        }

        public Session RequestSession(HttpRequest req)
        {
            if (req.Session != null)
            {
                if (sessions[req.Session.ID] == req.Session) return req.Session;
            }
            req.Session = new Session(req.From);
            sessions[req.Session.ID] = req.Session;
            return req.Session;
        }

        void CleanUpSessions()
        {
            ICollection keys = sessions.Keys;
            ArrayList toRemove = new ArrayList();
            foreach (string k in keys)
            {
                Session s = (Session)sessions[k];
                int time = (int)((DateTime.Now - s.LastTouched).TotalSeconds);
                if (time > sessionTimeout)
                {
                    toRemove.Add(k);
                    Console.WriteLine("Removed session " + k);
                }
            }
            foreach (object k in toRemove) sessions.Remove(k);
        }

        // Response stuff
        static Hashtable Responses = new Hashtable();
        static HttpServer()
        {
            Responses[200] = "OK";
            Responses[302] = "Found";
            Responses[303] = "See Other";
            Responses[400] = "Bad Request";
            Responses[404] = "Not Found";
            Responses[500] = "Misc Server Error";
            Responses[502] = "Server Busy";
        }

        void SendResponse(ClientInfo ci, HttpRequest req, HttpResponse resp, bool close)
        {
#if DEBUG
            Console.WriteLine("Response: " + resp.ReturnCode + Responses[resp.ReturnCode]);
#endif
            ByteBuilder bb = new ByteBuilder();
            bb.Add(Encoding.UTF8.GetBytes("HTTP/1.1 " + resp.ReturnCode + " " + Responses[resp.ReturnCode] +
                    "\r\nDate: " + DateTime.Now.ToString("R") +
                    "\r\nServer: RedCoronaEmbedded/1.0" +
                    "\r\nConnection: " + (close ? "close" : "Keep-Alive")));
            if (resp.RawContent == null)
                bb.Add(Encoding.UTF8.GetBytes("\r\nContent-Encoding: utf-8" +
                    "\r\nContent-Length: " + resp.Content.Length));
            else
                bb.Add(Encoding.UTF8.GetBytes("\r\nContent-Length: " + resp.RawContent.Length));
            if (resp.ContentType != null)
                bb.Add(Encoding.UTF8.GetBytes("\r\nContent-Type: " + resp.ContentType));
            if (req.Session != null) bb.Add(Encoding.UTF8.GetBytes("\r\nSet-Cookie: _sessid=" + req.Session.ID + "; path=/"));
            foreach (KeyValuePair<string, string> de in resp.Header) bb.Add(Encoding.UTF8.GetBytes("\r\n" + de.Key + ": " + de.Value));
            bb.Add(Encoding.UTF8.GetBytes("\r\n\r\n")); // End of header
            if (resp.RawContent != null) bb.Add(resp.RawContent);
            else bb.Add(Encoding.UTF8.GetBytes(resp.Content));
            ci.Send(bb.Read(0, bb.Length));
#if DEBUG
            Console.WriteLine("** SENDING\n" + resp.Content);
#endif
            if (close) ci.Close();
        }

        class FallbackHandler : IHttpHandler
        {
            public bool Process(HttpServer server, HttpRequest req, HttpResponse resp)
            {
#if DEBUG
                Console.WriteLine("Processing " + req);
#endif
                server.RequestSession(req);
                StringBuilder sb = new StringBuilder();
                sb.Append("<h3>Session</h3>");
                sb.Append("<p>ID: " + req.Session.ID + "<br>User: " + req.Session.User);
                sb.Append("<h3>Header</h3>");
                sb.Append("Method: " + req.Method + "; URL: '" + req.Url + "'; HTTP version " + req.HttpVersion + "<p>");
                foreach (KeyValuePair<string, string> ide in req.Header) sb.Append(" " + ide.Key + ": " + ide.Value + "<br>");
                sb.Append("<h3>Cookies</h3>");
                foreach (KeyValuePair<string, string> ide in req.Cookies) sb.Append(" " + ide.Key + ": " + ide.Value + "<br>");
                sb.Append("<h3>Query</h3>");
                foreach (KeyValuePair<string, string> ide in req.Query) sb.Append(" " + ide.Key + ": " + ide.Value + "<br>");
                sb.Append("<h3>Content</h3>");
                sb.Append(req.Content);
                resp.Content = sb.ToString();
                return true;
            }
        }
    }

    public class HttpRequest
    {
        public bool GotHeader = false;
        public string Method, Url, Page, HttpVersion, Host, Content, HeaderText, QueryString;
        public IPAddress From;
        //public byte[] RawContent;
        public Dictionary<string, string> Query = new Dictionary<string, string>(), Header = new Dictionary<string, string>(), Cookies = new Dictionary<string, string>();

        public int ContentLength, BytesRead;
        public Session Session;
    }

    public class HttpResponse
    {
        public int ReturnCode = 200;
        public Dictionary<string, string> Header = new Dictionary<string, string>();
        public string Url, Content, ContentType = "text/html";
        public byte[] RawContent = null;

        public HttpResponse() { }
        public HttpResponse(int code, string content) { ReturnCode = code; Content = content; }

        public void MakeRedirect(string newurl)
        {
            ReturnCode = 303;
            Header["Location"] = newurl;
            Content = "This document is requesting a redirection to <a href=" + newurl + ">" + newurl + "</a>";
        }
    }

    public interface IHttpHandler
    {
        bool Process(HttpServer server, HttpRequest request, HttpResponse response);
    }

    public class Session
    {
        string id;
        IPAddress user;
        DateTime lasttouched;

        Hashtable data = new Hashtable();

        public string ID { get { return id; } }
        public DateTime LastTouched { get { return lasttouched; } }
        public IPAddress User { get { return user; } }

        public object this[object key]
        {
            get { return data[key]; }
            set { data[key] = value; Touch(); }
        }

        public Session(IPAddress user)
        {
            this.user = user;
            this.id = Guid.NewGuid().ToString();
            Touch();
        }

        public void Touch() { lasttouched = DateTime.Now; }
    }

    public class SubstitutingFileReader : IHttpHandler
    {
        // Reads a file, and substitutes <%x>
        HttpRequest req;
        bool substitute = true;

        public bool Substitute { get { return substitute; } set { substitute = value; } }

        public static Hashtable MimeTypes;

        static SubstitutingFileReader()
        {
            MimeTypes = new Hashtable();
            MimeTypes[".html"] = "text/html";
            MimeTypes[".htm"] = "text/html";
            MimeTypes[".css"] = "text/css";
            MimeTypes[".js"] = "application/x-javascript";

            MimeTypes[".png"] = "image/png";
            MimeTypes[".gif"] = "image/gif";
            MimeTypes[".jpg"] = "image/jpeg";
            MimeTypes[".jpeg"] = "image/jpeg";
        }

        public virtual bool Process(HttpServer server, HttpRequest request, HttpResponse response)
        {
            string fn = server.GetFilename(request);
            if (!File.Exists(fn))
            {
                response.ReturnCode = 404;
                response.Content = "File not found.";
                return true;
            }
            string ext = Path.GetExtension(fn);
            string mime = (string)MimeTypes[ext];
            if (mime == null) mime = "application/octet-stream";
            response.ContentType = mime;
            try
            {
                if (mime.Substring(0, 5) == "text/")
                {
                    // Mime type 'text' is substituted
                    StreamReader sr = new StreamReader(fn);
                    response.Content = sr.ReadToEnd();
                    sr.Close();
                    if (substitute)
                    {
                        // Do substitutions
                        Regex regex = new Regex(@"\<\%(?<tag>[^>]+)\>");
                        lock (this)
                        {
                            req = request;
                            response.Content = regex.Replace(response.Content, new MatchEvaluator(RegexMatch));
                        }
                    }
                }
                else
                {
                    FileStream fs = File.Open(fn, FileMode.Open);
                    byte[] buf = new byte[fs.Length];
                    fs.Read(buf, 0, buf.Length);
                    fs.Close();
                    response.RawContent = buf;
                }
            }
            catch (Exception e)
            {
                response.ReturnCode = 500;
                response.Content = "Error reading file: " + e;
                return true;
            }
            return true;
        }

        public virtual string GetValue(HttpRequest req, string tag)
        {
            return "<span class=error>Unknown substitution: " + tag + "</span>";
        }

        string RegexMatch(Match m)
        {
            try
            {
                return GetValue(req, m.Groups["tag"].Value);
            }
            catch (Exception e)
            {
                return "<span class=error>Error substituting " + m.Groups["tag"].Value + "</span>";
            }
        }
    }

    public enum HMethod
    {
        GET,
        POST,
        DELETE,
        PUT
    }
    /// <summary>
    /// RESTfull处理器的接口
    /// </summary>
    public interface IRESTfulHandler
    {
        bool Process(HttpServer server, HttpRequest request, HttpResponse response, Dictionary<string, string> param);
    }
    public class RESTfulApiHandlerBase : IHttpHandler
    {
        public RESTfulApiHandlerBase(HMethod method, string sUrl, List<string> param, IRESTfulHandler handler)
        {
            m_method = method;
            m_sUrl = sUrl;
            m_listParam = param;
            m_handler = handler;
        }
        private HMethod m_method = HMethod.GET;
        private string m_sUrl = "";
        private List<string> m_listParam = new List<string>();
        private IRESTfulHandler m_handler = null;

        public bool Process(HttpServer server, HttpRequest request, HttpResponse response)
        {
            if (request.Method != m_method.ToString())
                return false;
            if (!request.Page.Equals(m_sUrl, StringComparison.CurrentCultureIgnoreCase))
                return false;

            //处理查询参数
            string sQueryString = request.QueryString;
            if (m_method == HMethod.DELETE || m_method == HMethod.PUT)
                sQueryString = request.Content;

            Dictionary<string, string> queryParam = GetParam(sQueryString);
            if (queryParam.Count != m_listParam.Count)
                return false;

            HashSet<string> set1 = new HashSet<string>(m_listParam);
            HashSet<string> set2 = new HashSet<string>(queryParam.Keys);
            //两个集合是否相同
            if (!set1.SetEquals(set2))
                return false;

            if (m_handler != null)
                return m_handler.Process(server, request, response, queryParam);
            return false;
        }

        private static Dictionary<String, String> GetParam(String sQueryString)
        {
            Dictionary<String, String> param = new Dictionary<string, string>();
            if (string.IsNullOrEmpty(sQueryString))
                return param;
            string[] ar = sQueryString.Split(new char[] { '&' });

            foreach (string item in ar)
            {
                int nFind = item.IndexOf('=');
                string sKey = item.Substring(0, nFind);
                string sValue = item.Substring(nFind + 1, item.Length - nFind - 1);
                param[sKey] = sValue;

            }

            return param;
        }
    }
}

将Program.cs中代码修改如下:

using RedCorona.Net;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            HttpServer http = new HttpServer(new Server(800));
            http.Handlers.Add(new SubstitutingFileReader());
            http.Handlers.Add(new RESTfulApiHandlerBase(HMethod.GET, "/api/patientinfo", new List<string>() { "Function", "UserJID" }, new PatientGetHander()));
            http.Handlers.Add(new RESTfulApiHandlerBase(HMethod.POST, "/api/patientinfo", new List<string>() { "Function", "UserJID" }, new PatientPostHander()));
            http.Handlers.Add(new RESTfulApiHandlerBase(HMethod.DELETE, "/api/patientinfo", new List<string>() { "Function", "UserJID" }, new PatientDeleteHander()));
            http.Handlers.Add(new RESTfulApiHandlerBase(HMethod.PUT, "/api/patientinfo", new List<string>() { "Function", "UserJID" }, new PatientPutHander()));
            Console.WriteLine("服务已启动,点击任何按键退出");
            Console.ReadKey();
        }
    }

    public class PatientGetHander : IRESTfulHandler
    {

        public bool Process(HttpServer server, HttpRequest request, HttpResponse response, Dictionary<string, string> param)
        {
            Console.WriteLine("PatientGetHander 完成!");
            response.Content = "PatientGetHander 完成!";
            return true;
        }
    }

    public class PatientDeleteHander : IRESTfulHandler
    {

        public bool Process(HttpServer server, HttpRequest request, HttpResponse response, Dictionary<string, string> param)
        {
            Console.WriteLine("PatientDeleteHander 完成!");
            response.Content = "PatientDeleteHander 完成!";
            return true;
        }
    }

    public class PatientPostHander : IRESTfulHandler
    {

        public bool Process(HttpServer server, HttpRequest request, HttpResponse response, Dictionary<string, string> param)
        {
            Console.WriteLine("PatientPostHander 完成!");
            response.Content = "PatientPostHander 完成!";
            return true;
        }
    }

    public class PatientPutHander : IRESTfulHandler
    {

        public bool Process(HttpServer server, HttpRequest request, HttpResponse response, Dictionary<string, string> param)
        {
            Console.WriteLine("PatientPutHander 完成!");
            response.Content = "PatientPutHander 完成!";
            return true;
        }
    }
}

运行应用程序,可以发送POST/GET/PUT/DELETE命令进行测试。

 

你可能感兴趣的:(server)