UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   0 J$ e3 {4 y1 M0 h8 r! Y! M  C7 L
3. 
   - B2 U# w- N9 E
4. #pragma   once
   
5. 
   * C1 d  b' T3 o' b. S
6. typedef   unsigned   long   ulong;
   0 e7 q4 f9 p; b7 }/ i7 W6 G
7. 
   
8. class   MyUPnP
   
9. {
   : U. O# v" b% G! Y! I2 F
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    , G& ]/ z* a: L1 p4 W
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    # n7 z0 T8 V- c) o
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    - v+ a$ s+ ?4 Z8 C
18. 
    4 t4 r+ W, a4 A+ [4 G! T6 h' }. k% d
19. typedef   enum{
    9 m0 I; `! V' {1 }/ A9 L+ y
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
      l- {3 ^8 g, N0 P) z
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    0 t# H' v! Z% o" H0 y+ m
26. WORD   externalPort; //   Port   mapping   external   port
    $ S$ o' E; `6 q7 p; [8 u/ b# y/ R. f
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    9 P/ E, g  Z. _9 }
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    , R' V# X" Z! {9 N+ x# N
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    9 U7 I7 f# C4 j' p- M! {0 K6 v
37. 
    1 Z3 Z* r; r& S7 g
38. CString GetLastError();
    # d$ A+ r7 x6 Y9 T8 I& }/ L! J
39. CString GetLocalIPStr();
    + z7 u, ~$ `) P6 C, P! `! k
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    " C! G" O! Z, \7 A
42. 
    , D9 M0 h" D. {3 I& N
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    ' M. T! v4 V( {( S# I% s
46. 
    0 \0 \* g, A1 z" E& ^, ^
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    6 i4 ^. P4 G  U! C" Z2 i
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    7 C( }1 l3 ]/ W* _% b6 I2 a' _4 x: D
50. 
    4 y7 K+ u) j3 k
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    : Z& J  O, _* R8 g& W/ `1 d
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    6 ?% ^6 `0 f8 u' e
62. CString m_description;
    0 q- T7 X% ~$ e3 Y  _/ n8 C
63. CString m_baseurl;
    4 C+ D5 o7 w2 v' E- `
64. CString m_controlurl;
    4 X8 Z) L! W* A2 L4 f. E( L6 |
65. CString m_friendlyname;
    " w8 h3 a  `. U9 S6 r9 @0 z
66. CString m_modelname;
    : Z" N" L2 y$ [6 ?
67. int m_version;
    2 K8 }4 T' L, J: w0 m8 r* B+ I; V
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    - W0 S) w* E, O' e7 u
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    9 U6 g. z8 K3 d% j7 z
75. 
    
76. bool isSearched;
    : E, \. v$ X+ H8 X; C: e3 L
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   4 w& i% @, M( p- u9 O
2. #include   "stdafx.h "
   3 C) D3 _, X9 {, W( v
3. 
   ) k" u4 ?# t% H4 w
4. #include   "upnp.h "
   
5. 
   6 k7 S" k' t! Y$ [4 K0 R4 A4 ?
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   5 z2 {8 f  m' S! {8 g5 T% w
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   " c9 N5 z  K$ J- o5 x
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    ! R; `0 d3 p* n, s) j( w2 U
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    
17. {
    % ]# {4 ?3 [( G' R
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    ; a" P; s- w7 B/ J2 M
21. 
    
22. return   s;
    
23. }
    
24. 
    " y5 F* c9 D6 z% q. p
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    9 z' [/ `1 Z: I# k& A/ v
28. }
    1 c9 E/ h+ M! I4 d! a
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    1 i$ r# s3 P$ q" k
31. {
    6 M% j* B& s3 v" V9 s& X# S
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    : b! P9 D9 T8 T* m) a
37. char   buffer[10240];
    
38. 
    * v: i5 b: a/ U
39. const   CStringA   sa(request);
    % \" j, R% W: q* W) k
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    9 p/ G7 i* L/ f6 h) m
43. uint32   ip   =   inet_addr(CStringA(addr));
    0 T) k. B. @! k" r$ T2 X9 q6 d
44. struct   sockaddr_in   sockaddr;
    * [. `6 k% B  e  b
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    ! U  e. v  }4 ]
47. sockaddr.sin_port   =   htons(port);
    ) ?& \* T3 [" T7 x
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    6 g8 r, z: Z9 z' p- \- R
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    7 j1 F- X0 A$ b6 l9 t' A+ ~
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    * O; c( Z; P: W- `; d0 h/ P
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    ! W* D( X0 ]; v' e& _) y. q: n8 K
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    & A4 ^( D5 |' I$ N9 p* Z6 y# t
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    5 P3 s$ D% E1 G) R  j
62. 
    * \  n* R% \6 w
63. return   true;
    ( n& P# c2 e' e1 w0 r5 M
64. }
      V( O' k: `1 ?9 o: t2 G% D
65. 
    ' i* B3 L7 h! u; p' g
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    # B% [/ Y; e1 ?% g' ?! Q
71. int   length   =   sa.GetLength();
    1 C! q) F- f8 h  T
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    ; }' l* w: m" }" x+ O* S
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    * d, W5 I1 ?6 e, A, i7 p% P; D7 I" a
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    / H1 i7 C' J; S# T' z2 g
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    , g% c- Q' n$ n2 G3 c! x* e3 N+ _/ a
79. 
    7 w/ d  k2 P$ b7 y1 V
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    % c2 L# g' m/ [  i* ~) R
84. {
    
85. int   pos   =   0;
    4 ?4 {' V3 r1 }7 u+ f0 v
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    : G+ I' T% E/ w3 I9 P# Y
91. 
    
92. pos   =   0;
    8 I3 U* o; P, b
93. status.Tokenize(_T( "   "),   pos);
    ; p& G7 X' p8 ]; {* z' L
94. status   =   status.Tokenize(_T( "   "),   pos);
    1 N& ?5 q1 N2 Y  B! n9 [# P
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    9 ?, b; \3 D) A( h& t
97. }
    $ t. f- U5 ~% y% l
98. 
      a; X) D( b4 E, j; Y9 a. t
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     ' ^/ e2 p! x0 E& a  T
101. CString   startTag   =   ' < '   +   name   +   '> ';
     * G7 Z7 i$ r3 I  \5 z
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     ' I' I$ V, z) M, V+ q
105. int   posStart   =   all.Find(startTag);
     7 [  \. N: X# X
106. if   (posStart <0)   return   CString();
     
107. 
     ! d2 }/ r% A4 ^4 B' q
108. int   posEnd   =   all.Find(endTag,   posStart);
     1 z' Q7 ~. D! y
109. if   (posStart> =posEnd)   return   CString();
     # W! C2 \: ?3 c% n& X0 y
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     0 m1 c/ Z  C& t: `
112. }
     
113. 
     - l- t4 G# k% h( y( D, N3 Y; a
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     
120. 
     $ Z' N6 E3 ?8 u" k6 l# J0 M
121. MyUPnP::~MyUPnP()
     / g# t; c. M" c# ?4 o) `5 w
122. {
     8 B  C8 \/ u) c! v" B5 O
123. UPNPNAT_MAPPING   search;
     - }" i( d. C2 V- a1 ?, I$ l5 |6 M% w
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     5 m2 z" D  S+ y* Q
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     1 [% S8 X, ^8 r: a+ _/ R- w! X; D
127. RemoveNATPortMapping(search,   false);
     + Y4 W5 S" T( z9 q
128. }
     
129. 
     , h  R% r) I1 W2 k+ b" \) y
130. m_Mappings.RemoveAll();
     
131. }
     , @8 I* ?. _8 w+ }1 @" @) {
132. 
     
133. 
     4 B3 Q2 N, ?0 [# f/ M
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     / a; d0 l0 A+ p: Z7 t2 o9 J
137. m_version   =   version;
     
138. 
     " E: p$ x- I( I+ E$ C! M
139. #define   NUMBEROFDEVICES 2
     3 v6 P0 v  ?9 {. N( I: o' m
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     , f+ n2 Q' W, J/ N
142. {UPNPPORTMAP0,   _T( "service ")},
     : }' k( f4 v7 c/ w5 _
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     9 W2 {8 D9 C) N4 L3 F; j- u
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     6 ]: V, f- X4 v3 c7 Z
149. 
     $ B2 g" {$ B! {9 D7 Y
150. int   rlen   =   0;
     + S/ l* E6 t- C- f$ K
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     : y# P3 |2 g% _( |% K
155. CString   request;
     
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     
157. 6,   m_name);
     ' I2 [! j' s# F$ b
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     % p9 I! ^6 Q1 x, W9 S
159. }
     7 j2 B7 `& g% W7 `; a
160. }
     + ~: [7 n! d$ |$ x) ]6 H
161. 
     8 r6 N9 B. A( ]
162. Sleep(10);
     2 M! c) E* g2 l6 G  \
163. 
     # o0 x' Q' V3 K4 u
164. char   buffer[10240];
     ! E6 T! G0 J8 A% h6 S8 n& G9 C
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     * }. p" {. Y+ w3 W; H. i
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     + V0 R! w3 x5 ?) A3 d
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     : ^- h* q# G' A1 G$ o5 J- J
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     - C6 G7 {/ p5 Y$ P6 m& {6 D& D) j
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     % _" w& @/ e3 W& A2 P
178. if   (line.IsEmpty())   return   false;
     6 X1 r4 S% B; w, ?
179. CString   name   =   line.Mid(0,   9);
     $ z/ }: u( A# b$ h" [$ c! s+ R
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     + t7 i. r4 y; E5 L
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     7 c8 N8 I9 d& k2 \& w) j- N: w
186. }
     
187. }
     
188. }
     
189. }
     * G9 [+ k: t: d6 O) r
190. }
     
191. closesocket(s);
     
192. 
     ' L$ P% o/ z9 p+ l+ X+ X3 g" P" F
193. return   false;
     * p- l& f: n3 q, N) _4 r% N2 _
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，

! ]2 }! c0 X8 b3 F
# L' g' A( I) N# W7 @0 ]! S///////////////////////////////////////////
, i6 m! Z; D0 o3 A1 M//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
2 W- a, h3 z; V7 m6 a+ y

" z6 J! A7 r5 q9 X0 O+ L#pragma once
#include <exception>
# M, J9 c; P7 I. @

  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
* S, i: r/ |* J+ K5 `5 ?8 _        TRIS_TRUE
7 J9 A, \9 w/ B};

( v6 x% e4 j/ ~9 A# m2 C8 y
enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};
1 \' I( T0 m) ~; E2 u( F
: M# f- j. ^. W# S' {
/ X: W2 A" e7 Q  L5 e; {2 d' K
  s9 u1 y5 b1 u7 f
class CUPnPImpl
* I9 V! j; Q" `1 B; g4 L, x- H{
public:
        CUPnPImpl();
        virtual ~CUPnPImpl();
5 f# L, f) T% X6 }* h        struct UPnPError : std::exception {};
0 l% J2 Y& y  ?$ t        enum {
4 ^( y/ B+ j: \+ b! r                UPNP_OK,
" C# i$ K$ }7 o  g3 v                UPNP_FAILED,
. L$ C& j' @2 T5 `' F0 g                UPNP_TIMEOUT
        };
7 R- {& b$ w; _/ F9 M' q: I

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
2 U) x3 M  i/ E$ V  v  x        virtual bool        CheckAndRefresh() = 0;
6 R# I  O2 w* x3 x% s: D; Q        virtual void        StopAsyncFind() = 0;
: @0 p. Y* z  i1 G5 a9 c! J        virtual void        DeletePorts() = 0;
" v4 Q6 ^- T, g. T/ m        virtual bool        IsReady() = 0;
- D! x' ?( ^: X        virtual int                GetImplementationID() = 0;
       
' D8 W0 E4 {! J1 B/ P        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


( \% |4 a3 [( D: q. G( I        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
! T( s2 \9 _5 z; p9 i; B- _! U        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
' E. G4 k( Y9 Y% x( j        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
  s+ m/ e5 Z7 I2 }# b

  _* G$ C8 k' w" F  ~2 V: u- D// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
! B" K! i! D: U+ Q        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
6 J- q7 _$ Z8 p4 I

private:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;

) ?0 p2 l+ b& V
};


! K) \! l( ^; h, h" b. O7 _* f% I// Dummy Implementation to be used when no other implementation is available
) F3 j) N3 ^! hclass CUPnPImplNone: public CUPnPImpl
  K3 n: B- D2 }7 l4 v5 B{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
8 {" ~2 v3 Z$ K/ }# Y& x0 P, F( i        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
1 n$ f& `* {' Z! o7 k$ c2 k/ K        virtual bool        IsReady()                                                                                                { return false; }
& j* q! `5 x% k- L7 b        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
/ l5 E- N5 e; D/ _

/ X2 Y# V, K* ?3 I/////////////////////////////////////
8 x& ?% J, M  q, c# b//下面是使用windows操作系统自带的UPNP功能的子类

0 a2 n; t% _7 |/ }
0 }1 _% R. N8 X7 M7 }: A#pragma once
" ]2 l5 D! P+ {$ U# u#pragma warning( disable: 4355 )

8 B- ]$ S5 {3 R3 C
#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
% Z0 W+ N! _4 v#include <comdef.h>
#include <winsvc.h>
$ P% v' m7 |9 g2 G
; v0 G9 R4 u  v, l6 X# n; k
/ I5 Y& I! X, t& \$ E#include <vector>
#include <exception>
. Y6 z- P1 @. ^( f  {#include <functional>



2 b6 N% q# \! R- o- g; [( n* g
0 u  Q5 E7 i8 L  k$ C, Gtypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
+ t2 Y% b, }/ T7 l, e" Z; d( X" D6 Mtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
/ H2 t  d5 e2 [9 n4 U% @; qtypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
9 M! {, q3 r. o' ^typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
2 l* B, I: w: S; ~( j9 y( @

typedef DWORD (WINAPI* TGetBestInterface) (
' V+ M! U' }5 v+ K4 \$ o  d+ c2 T  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
6 x! F0 ^: Z) E# |) ~! k);

. k! W  m+ Y9 T, [
typedef DWORD (WINAPI* TGetIpAddrTable) (
1 \/ l$ |9 r3 f7 A& g. J, a  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
+ }: s8 o7 n- X1 `9 ]);

/ @' i; [* a: I
, n! l, L7 t8 R3 m( Y5 f0 S4 Jtypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);

2 ?: ~: V* w, i8 p0 i
CString translateUPnPResult(HRESULT hr);
1 i/ n. ~. g$ T/ |3 z/ ^HRESULT UPnPMessage(HRESULT hr);
, Z6 [5 E+ T/ W+ d* b: h
# d* |4 o5 u9 X& ?6 G7 i( P
class CUPnPImplWinServ: public CUPnPImpl
# h$ O8 K9 m% j7 W4 }{
) ~# i; X0 @# O& a1 B3 W        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
8 o0 D$ X' ~- `. j; O$ \' Npublic:
( F5 y& h" ]9 _6 I- Q0 K" x1 }4 N        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


, o1 u  z: I2 X' F& d, n1 c) y4 T/ n) h1 m        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
1 O6 c9 Y& M# T: P8 Z& l        virtual bool        IsReady();
+ f( G* @) [. }! l9 h7 s2 }        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
- X8 [/ A% f9 [6 K+ f1 V
  |: P+ M4 U/ \/ v( v
2 i% u: g; _7 u* t7 E% y: d        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
3 C" w2 |, C( H/ ]' d* w; C        virtual bool        CheckAndRefresh()                                                                                { return false; };
& q9 S) s2 O5 k" v9 S  H* h  v4 o

  Z* N: N; b; h8 l5 H3 C+ O% K5 b. p+ _protected:
: t1 m" G' r0 m# S& I7 J; i0 f        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
4 d7 G6 \* G/ l" u        bool        OnSearchComplete();
        void        Init();
" y' u6 ]* s3 m$ X8 A6 f

% H- m9 m0 P4 P' ?2 f2 F0 K4 k        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
" U( s+ g$ D. {+ G$ X* t. A. v, V                        m_bAsyncFindRunning = false;
  H) o* X2 R9 S1 u                }
                MSG msg;
) _3 f! W; S& o$ h                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
& H7 `+ t9 F: F9 W" l' }                {
& n! A. l9 g% f# Q6 Z0 M7 ~                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }

9 }; j. P; l' t0 B& r* R. ~- A) @: Q
  O* Z) h9 y  U4 U- A        TRISTATE                        m_bUPnPDeviceConnected;

6 M. j$ r9 w! K' x7 H
// Implementation
/ \% Q, j% y; s; G- H8 [  L        // API functions
9 k2 E  Q8 I2 R8 Y7 d1 x$ ]        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
# I0 v# A" B* w1 v, g4 w+ K        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
1 D5 H# ]5 O9 v/ }) N        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

7 N1 s1 v% h& |8 O% h& J
0 X* y5 }  W8 a) j        TGetBestInterface                m_pfGetBestInterface;
3 ?. e4 B$ ^8 q% i7 |  q        TGetIpAddrTable                        m_pfGetIpAddrTable;
# H, S6 ^  m) G! q) H$ J        TGetIfEntry                                m_pfGetIfEntry;


5 k- T+ _+ P# v, I- x; l        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
5 Z; D3 {0 G% M; j                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
. _: ~. f8 K$ f2 |; w, m                result_type operator()(argument_type device) const
$ m6 n7 E6 z4 O: o/ T1 c$ V                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
' P3 T1 x2 H! D8 d" ~

                        if ( FAILED( hr ) )
; X* w3 u% j( G- X# Q$ D/ }. j                                return UPnPMessage( hr ), false;
9 o- K4 t3 J& Z6 G. ~+ |4 b) n( f

9 r+ R+ X) |/ B2 u" i) v                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
& O% W7 I1 f: q* R# O        };
$ G# W) z) o4 r0 I! h4 H       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
3 v: @7 S  R9 J& i# F/ j( g        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
  k! g" z) W% _' x9 R        void        DeleteExistingPortMappings(ServicePointer pService);
! J: q1 L( }  Z* x        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
; @; b. `( u. @. l                LPCTSTR pszInArgString, CString& strResult);
9 v5 y6 e6 T) N. ~% J        void        StopUPnPService();

; h5 N3 E( j8 O* }
3 O; y  S% q  e/ i) s( F6 k        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);


// Private members
private:
  H' q' H0 W# b6 K6 n8 X        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
/ [5 j0 _) j. u& p) [1 c# h, \        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
6 ^: M" d3 a# D        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

- N3 A& E' P. d6 J6 u
& _1 w: U/ Z4 W8 H0 F        LONG        m_nAsyncFindHandle;
4 K5 b0 K' g" r2 ^, [6 w/ `        bool        m_bCOM;
* S; c- r- \9 j9 B' f& ~* i* N        bool        m_bPortIsFree;
9 Z5 n1 x' B3 F* I        CString m_sLocalIP;
        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
8 H. g1 s" \* O9 E* i- k        bool        m_bAsyncFindRunning;
2 ]6 B: _) }  A+ v, t5 f        HMODULE m_hADVAPI32_DLL;
- A# U+ ]1 D) o& Y0 f        HMODULE        m_hIPHLPAPI_DLL;
9 B% u5 L) N, o% V# T$ o        bool        m_bSecondTry;
! E# f6 n+ h' V( V8 h        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;


4 S5 L' K4 A7 Y7 R9 e. n};
1 G4 I% H5 W  J, c. J+ J" F: f
0 D0 j% O; W) O# [1 Y( {5 I4 i: K# O% @
; Y6 ^. D/ O  W! x9 o% s. r0 r1 U// DeviceFinder Callback
" l7 e( J, d& @; o8 o$ Xclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
! B/ J( |. C( D8 D+ c5 @( O+ `9 k{
  ^& }: i( C& G; _2 M( h5 n( C& Wpublic:
& F# ?) \" c% Y5 X' Q( W        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
/ j& Q. O: r# m4 J: ]        { m_lRefCount = 0; }
& x8 U& `4 O0 O1 V& |

   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
, j: M* n; b' _+ e; H$ F# h0 y   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
5 f( ~# ?) @& }
, y" L0 t5 z$ j8 B
0 d' b" \" h. \$ j% q. ]  P; R7 @// implementation
$ n7 d- O3 X1 n+ [8 d$ cprivate:
- p$ @8 I- u; \+ F4 A& b, ]        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
$ s& J; }4 ?& k& R        HRESULT __stdcall SearchComplete(LONG nFindData);
; `- G1 d. n+ j$ D

private:
! R4 y$ n- l* Q  P" }2 E: V        CUPnPImplWinServ& m_instance;
8 T. w1 G! m9 E" m1 [* Z        LONG m_lRefCount;
+ f$ a  d# n' O$ S# d6 b7 q0 f};
$ p7 s0 f- H3 O9 \; W

1 L" Y. V- J; o+ u// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
9 o5 v) o. p& O0 y8 g' ]% Z                : m_instance( instance )
4 e* [" Z5 }, z) P        { m_lRefCount = 0; }
   
' m! ?8 h+ P8 Y, w! n  ]( e* D   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
7 T, o1 J6 u' H   STDMETHODIMP_(ULONG) AddRef();
: F# c/ {& O( E1 n9 T* |( m$ Z& R   STDMETHODIMP_(ULONG) Release();
0 }5 x$ T& d: S4 U' B- H
& v( `) e: ~# K, U. d
// implementation
private:
  G4 |; b  Q& N1 U& t, B        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

$ K7 @8 P) g' R$ A; @
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
1 W% G" ]4 y  {* S};
, I) f, d! B3 \
  c' R- {; U8 y* [; e) b+ `7 a
- U2 J' x1 H' H+ k/////////////////////////////////////////////////
- @9 C; `+ h! y. i( H5 V  G" K- B
- h/ h& a( W4 g, S+ _
使用时只需要使用抽象类的接口。
  J" _" P7 w5 V( l$ XCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
  x& K( {% V* U- G4 x4 o0 BCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.