UPnP

天云上人

/*uPnP.h*/

1. 
   * n: \! _+ v) T& g) B* ^9 ~
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   , o" |& `. m  x1 }" L) e
5. 
   ) ?0 F- r3 \5 V
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   * Y$ t( p# D& D7 v. Q8 N
9. {
   
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    / h& i2 N6 D3 [3 L) C. I9 V- }
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    ( I3 t0 B  h# ?' y, C$ R
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    $ w  d- j& K+ I! `: w: c
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    
18. 
    / J/ y3 D+ p4 H
19. typedef   enum{
    # t2 O$ H2 M, `: j, w: ?6 P: e2 l; h/ |
20. UNAT_TCP, //   TCP   Protocol
    ( i& N/ K( l/ |$ e! X# I2 f
21. UNAT_UDP //   UDP   Protocol
    2 h4 @2 K% F+ _9 J; D9 s
22. }   UPNPNAT_PROTOCOL;
    
23. 
    8 h, ~. ~" _1 Z1 d4 H5 F
24. typedef   struct{
    " |8 ~. Q) ]% h/ t& A! E6 f
25. WORD   internalPort; //   Port   mapping   internal   port
    + D$ O' W/ r+ v' k; x" J6 Z% L
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    + C5 Z8 t) e. F
28. CString   description; //   Port   mapping   description
    2 z* l3 p4 |( A2 `& F* ?
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    & U/ ]+ t& c$ K2 ~
36. void   clearNATPortMapping();
    5 S& s7 P  k6 f2 C  t1 c8 @$ }7 N
37. 
      I# j. j4 B: y8 n; D8 e# x
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    ! S' f. W# q. s* p5 V( o
41. bool IsLANIP(WORD   nIP);
    5 G0 r+ D$ F& A& U5 x8 m
42. 
    ) {7 H0 Q8 [% B3 @
43. protected:
    ; N& a1 Q! I7 a' I6 E( ?& Z9 @) L
44. void InitLocalIP();
    0 g$ ^- a9 O' ]
45. void SetLastError(CString   error);
    % F$ ^/ {- O: \5 y" H- P6 S
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    $ r1 K+ s1 s% f) _% M
49. bool   deletePortmap(int   eport,   const   CString&   type);
    ' x& k$ ~2 c2 f( b8 g
50. 
    & T( M. t1 Q: t# O/ H
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    & t* p9 a2 D. O7 s  C; O) k4 f
53. bool Search(int   version=1);
    5 |3 A( B9 F5 N0 Z
54. bool GetDescription();
    
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());}
    + S8 W3 q1 L; T6 k9 b5 g3 i# s
59. bool InternalSearch(int   version);
    ! a- x6 b5 g% y. o, L! c
60. CString m_devicename;
    9 K8 m0 N; ]" Z2 f
61. CString m_name;
    
62. CString m_description;
    9 G$ n* l( t3 t- f/ Y
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    / _5 a% I, @9 O  ~( V
67. int m_version;
    
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    # H- H0 }; x/ e6 t( m
73. CString m_slastError;
    ( _6 ~4 G* k) _; P6 L
74. WORD m_uLocalIP;
    
75. 
    7 X! B7 g0 U& J$ s2 x3 C( j
76. bool isSearched;
    3 W1 H: {7 J" Y
77. };
    5 ^5 r* C( \  {9 F$ y5 L' u
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   ' k9 @0 x. L) {' g# L9 U9 [
3. 
   
4. #include   "upnp.h "
   + ?/ D% b9 B- J- O, z
5. 
   / y5 T1 m  J) R1 R
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   7 t& d) |5 ~7 Q" I# l* r. i, T$ T9 p
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   ) O0 h5 V* [) d3 w( Y
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    ) k$ A& |5 i+ p- m/ d$ `# b
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ) y2 v+ D0 d7 m% s
13. static   const   int UPNPPORT   =   1900;
    1 X2 }+ Y) F: Y) e- g$ M. b8 F
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    + ^; E6 S& g4 Q4 x/ _; A6 h% v
16. const   CString   getString(int   i)
    
17. {
    8 l) N8 Z8 ]4 ~( E5 L" M+ @
18. CString   s;
    6 ]' z4 B; Q7 F3 M# w" i, M
19. 
    * w0 }" |' J! C% u
20. s.Format(_T( "%d "),   i);
    
21. 
    4 C" ~1 z4 n* n# O) f* w! y- q
22. return   s;
    % d% }. [; T1 V( P
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    : S1 o% a' |" J( _2 H6 W4 C
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    2 _7 Z3 v$ ?& v: @) S
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    ( D' A, r5 t# x2 ?! c8 G% r
38. 
    & p" `% n) b+ K2 {
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    9 _" d% P4 ~7 `: }+ ], ?8 E. t
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    9 i; p: O* X& s5 e+ K: s- _4 R
47. sockaddr.sin_port   =   htons(port);
    * k' Y" u8 M1 k. L
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    5 i/ Y, Y! W  W1 G$ D
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    . C- A+ L" B2 Z. P. b2 v0 V
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    6 c! x. s) y$ ^+ E6 k
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    " e  }4 S8 x" \# U9 {
59. if   (!rlen)   return   false;
    
60. 
    / ~0 r1 b4 I+ T0 L. o% l
61. response   =   CString(CStringA(buffer,   rlen));
    8 X0 Z6 X& n1 F6 h) Q( M
62. 
    % S7 K* u, c, d0 r4 W# e, `
63. return   true;
    
64. }
    
65. 
    7 x1 ]' z2 [$ b  c! N( F' w6 k2 S
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    * H, e/ h( l% r
67. {
    
68. char   buffer[10240];
    8 r( {( U9 [5 p# j
69. 
    1 }. ^( F# m* @  u9 ^
70. const   CStringA   sa(request);
    / ^! Y  c2 G  K2 \
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    : O8 o! S& ?3 S# J+ {
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
      x6 B- i' m5 D5 R9 o" D& V% E
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    # t" T1 ~  ~' T8 m8 r' u
81. }
    , P: x( I' |1 X2 Q/ g  Y
82. 
    4 k; q- N' }; a1 q8 G
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    ; f5 x/ P/ n) J" S/ r3 E# f
86. 
    1 |4 H; F6 i% x: h9 l
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    - D" W1 p3 }/ p+ E" T* J4 G6 N
89. result   =   response;
    
90. result.Delete(0,   pos);
    4 h7 p1 B3 H* {' Q: S: q
91. 
    ! R4 E+ N  D3 D/ E
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    . e& b7 F7 Q4 Z) K/ S  M
94. status   =   status.Tokenize(_T( "   "),   pos);
    6 y* U9 }+ Z1 @; n3 f' S
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    ' Q  F+ a5 l+ B5 h# L
97. }
    7 s2 I. I$ n1 W+ Y0 s9 c
98. 
    ' g5 K) l5 ]. x( E, u
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     5 G, P" m6 V9 c" k5 k/ f8 h: ?0 M
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     % a, f: [2 u6 ~" K0 l% E4 U
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     , s4 v  A# B! w) b' L
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     4 K9 I( |5 N, w- Z1 t
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     ' v% ?  O7 Y: v5 j4 c
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     $ w/ w3 v& N4 P. g" y8 O# g1 M
112. }
     & y1 G; m8 t" Y7 Q: s+ b
113. 
     9 Y, z+ M7 P: |  Y
114. MyUPnP::MyUPnP()
     & ?6 _/ b* z: T
115. :   m_version(1)
     & M4 R( Q, i# B  K
116. {
     $ Z- Y& M% T4 P& h" y* T
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     ( }' m8 e; r3 W7 T$ |/ y, `
119. }
     4 ?& O$ ~. X. A# T
120. 
     
121. MyUPnP::~MyUPnP()
     5 V5 H! @3 |- n3 ]# o0 }+ D
122. {
     
123. UPNPNAT_MAPPING   search;
     ) P- m7 Z, P9 _
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     0 ^% A# y6 J6 T: u; r$ `
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     0 R, I- J3 b+ V& z! a
130. m_Mappings.RemoveAll();
     ' l; H- h) Z1 q, t) j6 Z- _
131. }
     " m8 n  J% K6 r0 x) G- O& |
132. 
     
133. 
     + m2 }  F* I& v8 L
134. bool   MyUPnP::InternalSearch(int   version)
     8 ]! a8 [1 i8 `6 e
135. {
     
136. if(version <=0)version   =   1;
     " g+ T7 F% G1 P6 [
137. m_version   =   version;
     7 T& L, Y( `, X/ y5 c# c
138. 
     0 M% l: f- y7 t3 i/ I
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     : ^8 y/ P' J; L- g% u
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     $ }( v9 L+ C# r4 Q3 g
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     , W: V$ f/ d8 N# P7 B7 S7 t. p
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     : c& L' M2 x- ~7 j1 q8 |
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     $ G3 H* E$ F1 [$ t8 s( t0 b. q
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     5 l1 M2 \$ I) u2 a# a, Z
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);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     - n! f2 j9 q8 D
160. }
     ' h; e0 I# I9 G  T, I2 z
161. 
     7 m; g7 S- Y) K/ R6 B  [
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     - w+ G, m* I0 `
166. if   (rlen   <=   0)   continue;
     , {& ]; B# Y2 n7 W
167. closesocket(s);
     
168. 
     + s: I) Q. b+ S" y+ g3 t
169. CString   response   =   CString(CStringA(buffer,   rlen));
     - i, j) [) m8 g* z$ M
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     " ]5 [$ l% Y1 I
176. for   (int   pos   =   0;;)   {
     1 r5 {# H# G& s5 t9 B
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     3 E9 T' S: P6 ?! r( b
178. if   (line.IsEmpty())   return   false;
     ) y2 ?" n' ]$ P( o
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     7 y3 O$ u9 T6 I# w' C
181. if   (name   ==   _T( "LOCATION: "))   {
     " N$ K7 q# y6 J: \; ~
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     ( c# S5 }2 Y( D) g. _: D( P1 f
186. }
     - t6 r4 J. \# p, }
187. }
     3 V6 W) n& c1 H& i0 F6 O7 ~( ~7 [
188. }
     % i+ d4 @2 b3 T
189. }
     5 M  p' k+ C, F% h9 y
190. }
     
191. closesocket(s);
     , T% R' F; p' {+ }& s% x
192. 
     
193. return   false;
     
194. }
     - d0 }& h* r: ^2 c0 o

复制代码

天云上人

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

% d" T3 E0 _. O( u2 j
///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


#pragma once
. [: Q& T2 P) g#include <exception>

9 X- G. E( \7 Y1 w5 w+ A
; j+ Y6 q- G3 N: o# f  enum TRISTATE{
) l  x5 \- e) A0 V- \) o        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
& l$ \7 W3 B, A};
1 a5 k; M) y0 b! @0 `+ ~3 \5 V

enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
3 k' u. l  E" |  E};
2 F& K) S" X2 U7 l- ^
& U$ i$ V1 O3 `4 p. b0 t
/ x8 S" M% H" S/ S6 ~) h5 T5 J, K% z
: t8 B$ _; D( {
class CUPnPImpl
{
$ J( ?+ X8 V# @" p& Opublic:
4 B0 _: @0 y! N& E        CUPnPImpl();
7 C3 J& g7 O2 o  C0 S        virtual ~CUPnPImpl();
. q+ H1 V  e5 N1 x2 N        struct UPnPError : std::exception {};
) d* I# U  {/ C$ j        enum {
9 q, c! p' R7 G                UPNP_OK,
                UPNP_FAILED,
$ h$ z" T2 _( p  I7 H7 F* j% e9 e                UPNP_TIMEOUT
        };
. V8 ]& ]4 d/ H" k. q% S
7 B- n& L/ ^0 ]3 C
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
% L6 V0 d9 W/ g7 W% V6 \4 t        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
4 \; l, X) K, q6 d        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
" T# W8 F" r+ r4 ]0 O+ l/ |9 c: H
  b/ [* L4 A& t2 m) I2 G  U
4 X' r& `/ o7 {3 n; d' ?$ ?% W        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
( y2 T- q0 Q0 H% P# Y  Y0 p        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
" x+ X: X' G8 y6 g. y5 g, J        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


// Implementation
' B! ?6 l: @; x! _- Nprotected:
+ i5 A0 N- l1 b$ J        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
4 P. d8 v+ R# c0 f9 G3 s5 D        bool                                m_bCheckAndRefresh;


, D0 J$ a/ s" yprivate:
5 X3 a1 F6 R/ l; r6 |( E2 I        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;


};


// Dummy Implementation to be used when no other implementation is available
( ^, `4 t9 {, vclass CUPnPImplNone: public CUPnPImpl
( S1 t$ O4 [8 K4 E{
. T4 T9 B, M' `- l2 D) I$ Wpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
& f3 j+ b& b% w$ ~+ G' B        virtual void        DeletePorts()                                                                                        { }
- o: _8 ~( r) }& I        virtual bool        IsReady()                                                                                                { return false; }
& i$ w8 S" P, k& q/ R3 @, v! W5 Z        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
' i) F- J# X# ?) s/ }};
; g* g' Z# ^) T% W

/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
% B5 D8 f* g/ }
2 D" M' ?9 E/ v9 R( X# P4 E
#pragma once
#pragma warning( disable: 4355 )
7 z' T4 \$ Q: O; L* b+ q/ C
. M) M; J* `' x, N5 R
#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
, I+ w% ]/ p, V: @#include <comdef.h>
/ E/ D+ O# A  S3 J7 c#include <winsvc.h>

7 ^7 U) ^. h' P& \
#include <vector>
#include <exception>
- M3 b3 a6 a* s1 j- e! j#include <functional>




typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
3 t7 R% k# Z1 N  E! ^0 gtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
; g+ u1 `; j6 f0 Q2 p: k" H& E

  H6 r  O5 }& s, Ctypedef DWORD (WINAPI* TGetBestInterface) (
) x" ^7 C( ]# M2 @# d5 m  IPAddr dwDestAddr,
# j! [9 h+ i1 s6 S/ z1 Y) A  PDWORD pdwBestIfIndex
. G. Z# _( K$ F: s$ {+ t; F);
. x1 p9 L) Z, @0 H! c) v
# v9 U7 {0 @2 s) k+ C
typedef DWORD (WINAPI* TGetIpAddrTable) (
# A& b+ N% l* M  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
# }5 h7 I4 ?7 N) Q# c% r4 u& n  BOOL bOrder
);


typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
( N. N/ q2 l6 u0 S
" z$ s2 m  r9 H5 G* t, _9 {
CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);


class CUPnPImplWinServ: public CUPnPImpl
{
) G6 J. S5 Y% k3 Z$ F+ y+ X; N+ ]        friend class CDeviceFinderCallback;
1 f1 Y% }" E, a* E- G        friend class CServiceCallback;
// Construction
- j8 G5 n4 V& a9 Qpublic:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
4 \* i  ]9 l" N. D8 w( i
* k6 E; c: b1 I; q
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
  s+ Q7 Y, t6 k- D        virtual void        DeletePorts();
& b9 [2 @5 q: E2 C        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
6 e; C. K1 X/ N) n

        // 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
9 X& g  A* B  P, U        virtual bool        CheckAndRefresh()                                                                                { return false; };
& v7 e3 }8 K/ A9 J; y
# |! z' I0 b0 i2 V- w. F/ @3 t! O
; N) z5 }& Z4 h0 R2 G. ?protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
( t" Q  Q, h% x0 V/ {        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
  d" Q: E* _7 I0 m        bool        OnSearchComplete();
        void        Init();


" e$ C- X; ?, R9 O2 i6 p5 A        inline bool IsAsyncFindRunning()
8 u8 x* `$ f% A9 t, s7 m/ b        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
3 d# X+ A( k4 p                        m_bAsyncFindRunning = false;
                }
" G" k! Y' w0 G  R" v                MSG msg;
. W  P; `+ O" P! k6 N                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
2 u6 }  R" b7 S+ Q- j) s                {
  L% R+ C$ D3 Y6 L' O6 u                        TranslateMessage( &msg );
4 x# H( L5 I, M- B8 [! a- H                        DispatchMessage( &msg );
8 u) ?' t* x' t                }
5 C/ U! k( ?# p8 m                return m_bAsyncFindRunning;
5 r  X* N# l' e+ u! a5 E8 f: b. v        }


        TRISTATE                        m_bUPnPDeviceConnected;
; g0 k8 q3 X& N  Z. R
0 c. q0 t$ ]: [5 _8 m9 y
; u/ c' q# c) ]6 d9 _// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
# p; G# U1 Z; |5 [2 ?        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
0 O- q, c/ d" ]9 z( p0 r0 m4 L

9 w2 h' V6 _# \+ a! I        TGetBestInterface                m_pfGetBestInterface;
2 r: s" g# X) @8 u+ \4 Y: P        TGetIpAddrTable                        m_pfGetIpAddrTable;
% f) g& P; V! Q        TGetIfEntry                                m_pfGetIfEntry;
: D/ ?6 v) c, k6 a; z/ ~0 a" U
' q9 a$ W1 W6 J1 I1 e' P
        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
) }3 g# ?- p  x# R% [7 V                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
' C1 Q. y& q5 d* A* m3 M4 u                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


                        if ( FAILED( hr ) )
3 b* w9 O& c! G) G: R                                return UPnPMessage( hr ), false;
2 ?0 c5 b* C; Q/ \' k% i8 E
- z- |% R1 \1 d( Z  s( I' z
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
+ S) N' b/ `* q6 i. O        HRESULT        MapPort(const ServicePointer& service);
4 [0 Y+ g) D6 f3 G) R        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
* a% Z% ?1 I* S, `& E9 |        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
) ^4 v1 ?" b+ W. v% X        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
, c. S- Q; V" |2 m5 l. h                LPCTSTR pszInArgString, CString& strResult);
4 J6 V) v; x( B' U# f* g4 V        void        StopUPnPService();


: d' e+ a6 f+ K$ X" R7 J$ B9 Y        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
8 E. s% l- U8 z* Q; @( k* E0 Y6 \, _        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
1 Z: {8 H- `' D        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);

! x2 T! S) |; m% J5 N. F
$ c  t/ \6 ?5 G* e5 T' y! }6 t// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
+ H2 c; H- j9 U- v        FinderPointer                        m_pDeviceFinder;
& V- S" T. y4 J7 e, X* Z        DeviceFinderCallback        m_pDeviceFinderCallback;
" {8 y3 N% X+ j# Z/ e9 v& N        ServiceCallback                        m_pServiceCallback;
  W& C" @: U$ y) X, b) K8 }9 J9 p4 z! ^

        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
( ?' i3 t* Q8 ^# z2 V; O) g2 p$ W5 \        bool        m_bPortIsFree;
        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;
5 c0 c4 q7 |/ x6 P7 t5 E        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
/ U3 H5 b; i2 U% ?) V: H* ~        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

0 q4 \7 N9 p. p4 t  k
};


// DeviceFinder Callback
* l7 j# P/ L0 U4 e- V. [+ \0 eclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
, _" b* @; z: T: |. |2 x3 J* `{
7 H) ?# H6 y4 g/ k* u5 Opublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }

3 |, @  l1 ?; e+ e( q+ b3 {, E
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
- A: C5 c; o: a' A) f; ^" q: s

$ ~& S4 \, C+ s. x// implementation
$ f7 ^( ]7 u4 Kprivate:
/ \) K: I- F9 n! x+ p        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
' F2 ~) U1 G! b) w# R7 A$ C# K        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);

. E- Y5 E1 m4 b4 Z/ J! t7 K
private:
        CUPnPImplWinServ& m_instance;
3 g) b. W5 k/ x* n. ^        LONG m_lRefCount;
};

" K7 g! V: [; S
// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
; ^# p# ?) s& s$ T! n- f   STDMETHODIMP_(ULONG) Release();

6 |0 i# I- s3 F2 I, s
, t" F0 i$ s" r3 k0 c+ X% p// implementation
/ w3 A, g1 e# B5 jprivate:
* m: V: h8 [+ s! h        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
' g6 _: U! `& E8 {/ i5 _        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
4 Z* e1 V: R# a% `9 H
# B! d2 v$ p; U& C  c
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};

$ J9 i" Q9 I, P1 p. v, d& Z8 x
/////////////////////////////////////////////////

: h$ }$ W: e0 P  X8 s% ^3 W
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
, y9 {/ h/ O  b9 O' A" {$ f! c8 K7 ?CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
# W! E4 Q1 _$ k$ u+ GCUPnPImpl::DeletePorts删除端口映射.