UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   . j0 N/ u! e$ c; y7 n
3. 
   ! _$ Q1 \* G! m
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   , S4 E$ B( J7 G9 y
7. 
   ; b0 _9 j$ \! h* Z
8. class   MyUPnP
   , R0 q' d1 v$ |) L- ~3 E$ P4 a$ y
9. {
   4 v) J; k2 @4 n" a: j" H
10. public:
    6 g/ d1 y( A: K8 h
11. typedef   enum{
    1 I4 S- e& K/ e' t
12. UNAT_OK, //   Successfull
    ! u5 L) Z" f- \1 ?+ q# S- J1 T: k. }
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
    
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    " C8 Z7 Z4 L$ k4 T
17. }   UPNPNAT_RETURN;
    
18. 
    & I! T7 ^# U( s. V& h8 z2 V% F* Z
19. typedef   enum{
    ! ]/ \# d2 U* v2 ?" I- t2 s/ @# t7 i
20. UNAT_TCP, //   TCP   Protocol
    8 I# W0 i- }# @, w8 y) R8 B
21. UNAT_UDP //   UDP   Protocol
    9 U5 S% H  S' X+ G8 `- f
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    0 A3 A  E$ W: }5 o! `
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    " a- p7 z1 E, a+ J6 v
28. CString   description; //   Port   mapping   description
    2 l. j5 z' A' B; x7 |. T( E
29. }   UPNPNAT_MAPPING;
    : l& j, k: m) K# Q$ \7 l7 s
30. 
    . E1 J  l" |1 U
31. MyUPnP();
      F  \* d0 q/ A5 M) K' p9 D" v
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    0 J$ F5 B. c- y, k; U9 ~2 E
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    . r! p6 `( _. r$ V: \" q; ]
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    " h; n; J( z6 i( W
42. 
    . a3 K, a# M3 B0 _8 I* q
43. protected:
    ' b9 O- C  h* l. d
44. void InitLocalIP();
    ! G7 g1 Y7 c* A% @
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
      P& U4 ?( s0 a- a) B  q
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    : h2 T* ^  B- b& P
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());}
    ! g. m  T$ }+ T) }7 G
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    % v* t. ]7 m9 I% Q- j  l4 Q
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    % `# U8 H  H! \
65. CString m_friendlyname;
    % Z" }# X9 @7 ?  ^8 I6 d$ R
66. CString m_modelname;
    
67. int m_version;
    
68. 
    ; `: _/ T) k& c8 {& `
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    ! j; U% K7 H, Q. Q; ?/ ?& s/ @1 V
72. CString m_slocalIP;
    % U, ^3 o: p( D, O$ q5 n
73. CString m_slastError;
      |& D# j! m8 ?) f1 [
74. WORD m_uLocalIP;
    
75. 
    
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   % ^% ^8 ~) i/ Y2 j: @: d
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   9 k6 U7 o* M- }2 R) f" }, s/ r
5. 
   2 W, |1 ^: T, M" a4 I
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   & ~* [  ]* R/ y. _: c
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   ! Z; J1 z% r$ i! V+ u
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    2 A% B: l! y# d# k' I
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    5 V& j/ G2 a+ }8 q( c" X# H
15. 
    # g4 X& U  k1 t6 W2 X0 b
16. const   CString   getString(int   i)
    ! \* w6 h1 Z7 ]# k/ h6 q0 [3 n
17. {
    $ Z, `& h! V  E# Q0 |
18. CString   s;
    
19. 
    4 u4 a6 x! d$ B/ a
20. s.Format(_T( "%d "),   i);
    * t" p+ J+ Y. i9 U! P; c
21. 
    # y- W) ~0 x( O. T4 r1 ]0 H
22. return   s;
    
23. }
    ( [! }) H, u; b: [' J; Z
24. 
    8 ^4 c0 r& X# _
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    8 T2 R3 X$ F. {5 \  c" c, r
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    2 j8 f0 w9 w$ z% ^7 B3 U' D3 P
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    , ]9 A. A# k8 [4 t. a3 E
36. {
    1 x8 n, v% d7 [8 Y. q
37. char   buffer[10240];
    8 g, @8 V4 m) g. T( n
38. 
    ' b( V$ r7 {4 W+ Q4 \) x6 V- Z: _8 l
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    7 d& S% p/ o; t: C
41. strcpy(buffer,   (const   char*)sa);
    % S# ~( ~8 h9 N3 [& ~
42. 
    " B* P. c. Q+ F' C; Y( m/ _- ?- w
43. uint32   ip   =   inet_addr(CStringA(addr));
    3 G& Z' l3 f! ?* T  ~. R9 \9 {
44. struct   sockaddr_in   sockaddr;
    : u0 U$ V3 e( ^
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    4 ~4 Y" {, c! [  z" M) \$ T
46. sockaddr.sin_family   =   AF_INET;
    4 c9 F# _, o, G& A6 O7 q
47. sockaddr.sin_port   =   htons(port);
    " [: C& }. v8 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);
    5 E7 F: F( |. X% D
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    / }5 B, D0 W0 W9 c0 ^2 d" p
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    ; r  c+ G. I+ l! T% `& w6 d5 O7 d
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    5 E7 A" `5 B3 p# h7 ?% c
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    , c. l6 B: ~$ s- U1 l
62. 
    5 `& c2 s1 [8 w# W! |( A9 G
63. return   true;
    
64. }
    
65. 
    5 @1 v7 z7 Q% R5 h: ^& |
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    1 C) j% L  \7 H
67. {
    
68. char   buffer[10240];
    
69. 
    7 J, \' \; t, t1 v9 I
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    / z1 C& `8 d8 l, F9 f6 q
73. 
    
74. struct   sockaddr_in   sockaddr;
    8 p# a( F# q, j
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. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    1 j$ p3 w: |. l+ g, z
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    ; e$ k" X9 \% k
84. {
    ; c# ~* t/ T3 n
85. int   pos   =   0;
    1 T5 k2 O8 X& ?3 g0 C/ K- R
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    * j% o- h, y+ M2 I* F5 ]
88. 
    
89. result   =   response;
    : F. G' L2 j9 {% z
90. result.Delete(0,   pos);
    
91. 
    ! ~( r9 l0 R* o3 _5 ?2 ^- ]+ a8 ^1 d0 ?
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    5 r: M# f; {/ p6 O, M* q* G
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     9 {3 q- h% H  j; f4 r+ s( J
101. CString   startTag   =   ' < '   +   name   +   '> ';
     + g2 Y: c2 Z. u, f
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     " Z& n/ _: m, ?3 H
104. 
     8 G" q0 [9 e  K) I: E, x7 W/ p: X6 ?& k
105. int   posStart   =   all.Find(startTag);
     # _" r; d$ G% t" f
106. if   (posStart <0)   return   CString();
     
107. 
     : ]; w" k1 z% a+ }- E% z7 P; g
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     ) `, U7 Q1 i; }6 ~# e
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     & L& F! k) I  f6 C
112. }
     7 l; t7 g3 l6 k9 @7 a! G% g9 j
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     & U: c3 A  p3 W$ L+ A$ B
116. {
     ) f0 I/ F3 R, [; i. g7 Q6 c
117. m_uLocalIP   =   0;
     $ E+ z5 z2 w* l& S( C8 ]) ^
118. isSearched   =   false;
     
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     5 A) _/ l7 ]- w7 ^! X) s
131. }
     ' z* R* f. k& \  Q
132. 
     
133. 
     ' R( j" b$ r. K
134. bool   MyUPnP::InternalSearch(int   version)
     ) i# a( |4 L! _3 N2 G' M% m
135. {
     
136. if(version <=0)version   =   1;
     5 a( k1 F  ^* L& F# G
137. m_version   =   version;
     0 l( D  |( \: C1 Z, F
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     ; G  P0 s: B! l
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     & V8 ]+ U( ~/ @9 ~, v
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     1 c! b0 |7 H1 w; w) W2 S8 Q' u3 S
148. ioctlsocket(s,   FIONBIO,   &lv);
     ! L8 @$ S" Y* Q/ B( x/ Q$ X2 L
149. 
     7 M- P3 `% u+ x$ b8 a) ~# G0 g
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++)   {
     / c" m9 U6 S" F' I4 Z! ?; v3 T. j
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     , P2 R) r9 R3 n  b+ K- A3 y) Y
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 "),
     5 i8 h+ f4 [- H: m; U3 E, I
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     7 h/ V& e: [# V1 {/ S; p& D
159. }
     " q, B1 Q1 R& ^" ]( ]
160. }
     6 d1 o8 u/ Q. [' c$ r
161. 
     7 {% H( b7 e/ Q! a$ e& s. Z! b
162. Sleep(10);
     
163. 
     3 n  E0 Y$ e7 ?& _! K7 X( _
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     2 o, M; l, _% h4 f; g2 E  d+ S
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     7 X, S; ~0 B$ H2 V
171. if   (!parseHTTPResponse(response,   result))   return   false;
     9 m3 @5 p2 h% G# {
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     : Y; S% A. M9 T" @1 _7 g
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     8 |, v' `  L+ H6 q+ c, |
176. for   (int   pos   =   0;;)   {
     1 U- u& o5 F/ t# \6 |0 _5 |
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     8 v  `0 R1 k: O2 C; ~! [
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     2 J% h, i8 A/ F( u" w
181. if   (name   ==   _T( "LOCATION: "))   {
     8 E4 e# o+ z& C2 k" ~3 @
182. line.Delete(0,   9);
     : W# [; s# G- {, i; [
183. m_description   =   line;
     ! b$ ~& M& j. e$ I# F9 G5 E
184. m_description.Trim();
     ; ^7 h" a9 w8 {* a
185. return   GetDescription();
     ( `( D( l  H7 a2 w. X
186. }
     + H6 i" x# ], m, z' t6 s
187. }
     1 Q$ T) w8 J& Z
188. }
     5 v) V+ X+ w$ M/ J1 Z
189. }
     2 w  {: |" y) n) R9 y
190. }
     
191. closesocket(s);
     
192. 
     
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
" `; r: A4 c$ E$ U

///////////////////////////////////////////
0 q/ h# w; v& s2 S# n  _//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


#pragma once
#include <exception>


2 I  G1 n7 f- w2 N  enum TRISTATE{
7 x! J* a! _) Y* n* ]. A; A" W        TRIS_FALSE,
* y( s( |4 X' l. {& s5 M$ C        TRIS_UNKNOWN,
4 H$ }0 X* _7 s- k) ~        TRIS_TRUE
};
' L2 e6 Y# P4 v& ?

enum UPNP_IMPLEMENTATION{
! O) f+ Q# \3 Z        UPNP_IMPL_WINDOWSERVICE = 0,
7 C$ Q+ i1 ^% u' K        UPNP_IMPL_MINIUPNPLIB,
3 P$ z6 V. H! l# n2 @        UPNP_IMPL_NONE /*last*/
# E, d1 Z6 b# k: O};


$ Y7 T6 V& B; F9 r/ T
# W7 a" q# F; I8 W8 F& e
class CUPnPImpl
{
public:
0 O: d6 }, D" b, W/ ?$ g+ ?7 {        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
' m' b. h# m) L$ D& m! _1 i: _        enum {
, V+ ~; E3 C2 J! |                UPNP_OK,
7 {7 Z) Q/ u: v4 ?6 T" Q: I# x                UPNP_FAILED,
8 t( z+ m! N) e! K' b                UPNP_TIMEOUT
        };
" N6 ?  |4 I+ L5 R5 D

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
6 b# U" @. \  H; J        virtual int                GetImplementationID() = 0;
  u3 u( O# j3 S       
% G  h0 ]& w+ l( e        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
$ `$ u; Y$ ?  S/ P, Q  T# {

, J- D7 M) Z; r& X! l+ a8 T        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
1 J* [. J( w: j4 s0 A" Q        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
( J1 n; G( I- f8 g: L  n- y% A; L( A

// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
1 h+ s! G+ s# r" v        uint16                                m_nUDPPort;
! o, G! W0 A  G        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
* l9 q& _: g$ x) O0 y& s1 @        bool                                m_bCheckAndRefresh;

6 ]0 ~4 |+ D  t7 x  `% T3 V
private:
        HWND        m_hResultMessageWindow;
" V' g$ ?7 X% I- C7 R1 i! H' J# _        UINT        m_nResultMessageID;

1 a, s3 L6 d: x0 w  r% X: F+ G& ^
3 w# p: k. v' T1 a};


// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
7 a& n+ v, d6 W* w        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
# W+ a5 y( {. _$ S4 Z1 U        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
) G( Z( V" k( |( F, Y: V% e

/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
- i7 {0 {% }) }3 e- P( u; A
" q5 C) F$ ~9 C: N/ B/ b
#pragma once
#pragma warning( disable: 4355 )
0 F1 ]0 o! H  Y" G9 G- X
" O, K  S( i9 s( J
) q. b; U( e0 u; B#include "UPnPImpl.h"
$ j7 E6 ]4 d5 ~2 ~) p( g#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>

0 @( C; m6 S- k% Q# ~6 p" c+ e' Y
3 G2 `& t) _8 C  f8 W, u2 Z#include <vector>
#include <exception>
5 k! o% @) C" e. A* }- X+ e#include <functional>

: P. D* x+ I+ s. s3 w' @

; s: z6 \& l2 y* k8 x3 X# \& x
; k" l4 i4 R0 I  [9 ytypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
8 p$ Z! G  `% f& _$ V- [3 S: utypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
1 V) V  a$ B9 O- M/ j* m* ]typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
6 @& t/ ]* t  H% W' ^8 Y# i2 U, Ktypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
7 T6 q/ Y0 P5 y/ @typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
3 x( v2 l' s3 S. c. @typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
6 }5 y0 Z- P; u1 _
7 P/ I: U$ h3 s7 B0 X! v; w
( |8 {: v; ^  E" M) Xtypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
% J2 q/ C' }% t% @- P2 o7 j

typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
; A" d0 B  H" f, U" H; [) l* G  PULONG pdwSize,
  BOOL bOrder
7 i/ r9 G0 @6 l; E3 N1 ?);


3 w* T+ k% V* T: @typedef DWORD (WINAPI* TGetIfEntry) (
% w& f0 i3 n. E2 X  s! Y" x  PMIB_IFROW pIfRow
);
. L# T( e3 S5 O/ g9 e' c3 v/ Q

CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
. b1 d- N- \; u7 V1 y$ F
; O6 M9 H5 }. f: r/ s- A1 e0 d
class CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
public:
        virtual ~CUPnPImplWinServ();
- X5 L1 h- ?& S+ Z0 d- Z7 [        CUPnPImplWinServ();


  ^8 J4 W" B7 s8 ?" x3 W, \4 B        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
& g6 l& x; m0 |, Y9 l+ y& W        virtual void        StopAsyncFind();
9 h& b8 q' O4 D3 y% O  x& p( B        virtual void        DeletePorts();
& ~2 t" I6 g# y1 `        virtual bool        IsReady();
$ `' ~2 }; i9 f7 F9 N" c1 }        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
. _$ T' U' [7 f9 ]
+ f7 ?% b& y: I1 y: V1 j
& X7 G3 U: s* v4 j; ?' M8 G+ N        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
6 c0 O" R5 B1 @0 _' E+ d        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
, d+ o/ u. I" t' e/ ?; w4 m  f' T        virtual bool        CheckAndRefresh()                                                                                { return false; };

2 Y+ a) o- W2 d3 Y/ {0 Y$ a
protected:
$ K9 O' E8 J3 A0 A/ D( e        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
3 n+ b) e0 A# W9 v# t& b% M        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
5 e& M& V8 k/ c0 f        bool        OnSearchComplete();
4 @- O* B  C( I8 T  m4 n4 X        void        Init();

# z* ]) E# H" W' W. h4 b
        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
* f- ]/ z0 p$ G( t, E0 }                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
4 s$ v- b$ @+ j9 e* j3 e: m                        m_bAsyncFindRunning = false;
% \3 h1 J7 t6 |! j7 h0 R                }
; k, b6 m- y/ y& r) n                MSG msg;
3 k: i1 O/ R* x5 T2 C+ V* P                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
% F' R- G/ b0 i5 @                {
                        TranslateMessage( &msg );
( Y: m  e  F5 W* ?5 T$ x6 ]- H                        DispatchMessage( &msg );
                }
/ \' ]# }+ |* {                return m_bAsyncFindRunning;
        }

8 ~; d* H" P- I$ Y2 s/ c4 W2 d* {
        TRISTATE                        m_bUPnPDeviceConnected;


: g- ?8 b$ f% I" m' [, v! I// Implementation
2 q3 o3 ]2 ^! D        // API functions
) G; n9 a0 P' i* e        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
" _( j* q5 T$ B! C* ~6 c& b' d        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
( L- e) e9 E( U        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
( ?- Y6 F6 @: ^/ U* t+ i9 J        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
4 U8 v4 Q6 N7 b$ B! b( k0 e6 M
; v) d: r1 ^, Z$ r" Q9 Z+ y
        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
/ d5 d: u: `/ x+ j) C6 z        TGetIfEntry                                m_pfGetIfEntry;
# n: F" X* \9 l  y5 E" D% i
9 F( V3 X1 t. ~& f% J
1 E5 o9 ^" Y) Q0 O* w        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
1 M, E* O* k0 |7 ?- t9 k0 |                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
$ \) k5 G( K- B4 h1 z                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


6 `: Q% v0 U0 r                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
0 l1 n: u1 n1 a7 @8 v' h, }
9 @9 _0 e8 n1 I' F' p
- K* l3 M! m+ J- D5 B                        return wcscmp( deviceName.m_str, m_udn ) == 0;
3 g* w9 E% D: S* k+ a5 M) x                }
! t/ k8 g6 b& ^* Z' k6 X9 d                CComBSTR m_udn;
+ R+ @( }# `4 ~. k$ ^        };
8 f. ]: H1 M: A6 ~4 d# C1 X0 Q8 r: d       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
6 D! |3 W. \5 {5 B; o& R        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
$ r' B  |  \/ V! w4 u        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
) D3 E9 c( [6 G. v        void        CreatePortMappings(ServicePointer pService);
8 \7 O$ T8 ]. f! b( S6 ^: F+ I        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
# I  q/ [' I! ?, f        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
- B  v. G5 `1 ^9 a; _                LPCTSTR pszInArgString, CString& strResult);
5 S; x, L3 r8 V        void        StopUPnPService();
" K2 g. x' B$ Z8 N5 R, T8 Y& U* g
+ p3 S. B0 k% s, _
        // Utility functions
4 v& b6 `/ E1 r, _' c# J        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
5 l6 @( h# D5 S* O4 H! m" J0 h# Z        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
. O1 b! r) R' @& Y, U( f        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
; t2 x& d. H& u( e# C        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
6 [$ F; ?# ]# S- P# q$ ]* A+ G        CString        GetLocalRoutableIP(ServicePointer pService);


6 q3 |* ?$ J0 Q// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
/ n; q/ w5 i2 {7 M& V        std::vector< DevicePointer >  m_pDevices;
6 c5 Z9 h  w/ s! @        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
7 W. [2 ?" J0 t8 [9 _        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

/ q1 [6 l# [. U  i& F- w* x) z8 H
1 S, _9 C7 [, Y% A% U/ \# G        LONG        m_nAsyncFindHandle;
8 K# b+ Q- i9 a, c6 I8 O7 s        bool        m_bCOM;
        bool        m_bPortIsFree;
' U6 A! {( b+ h2 n) u. g2 E        CString m_sLocalIP;
5 c* E, K* ^" ^6 u- X. T7 r        CString m_sExternalIP;
1 [( K* O9 d, V6 o# C* ^4 V        bool        m_bADSL;                // Is the device ADSL?
" U  `2 a; \8 [        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
9 E5 X/ g. P3 X3 H: \! s        bool        m_bInited;
% y# E5 u5 F% K6 E# d        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
0 ~$ z' z3 e, W, U. f        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
( E8 O' h" Z7 {0 A        bool        m_bServiceStartedByEmule;
# ], c) J2 |/ B+ `9 ~2 F        bool        m_bDisableWANIPSetup;
0 H. S+ X/ ~1 J        bool        m_bDisableWANPPPSetup;
0 ~, r% E7 A, W1 t! r- T" ~# ^# H

/ B8 Q  m+ }* N& l0 W9 p};
- _& Q) D  B7 q
/ _- N( \0 L( g9 t/ r
// DeviceFinder Callback
class CDeviceFinderCallback
. m4 a* e6 R- i" q8 X" \; K        : public IUPnPDeviceFinderCallback
{
public:
% q2 v( P3 b! S" ~6 t( g. p- D        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
" B: r. M- c9 u3 Q3 Q9 h' _        { m_lRefCount = 0; }


2 C+ e2 G8 @/ Z+ N+ m   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
5 L4 g3 D0 ]3 H5 s1 {   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
. }* ?. ~, X0 I4 ~- n- j8 _& l! a& ^

8 T9 O6 z' k. }! M3 s. U4 Z4 f" e// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
. d4 h, K5 @) S; q        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
( ^  B4 |- \2 ^2 O' ]  t; m        HRESULT __stdcall SearchComplete(LONG nFindData);

; h! k7 T% \, J  v+ X2 l+ o$ w6 w
0 g0 n5 Q( B8 Z, Y# a% C' @private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
  X: @3 t0 @! M2 N' O* y& ^; S+ c
1 K/ J& l  ~1 C  p# \1 c
// Service Callback
; @7 x3 k0 x; jclass CServiceCallback
        : public IUPnPServiceCallback
$ S. f( H( F& W$ n6 `$ e, ~{
3 n+ S4 ~$ u+ Xpublic:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
+ k' Z) i* G6 G! V3 \  q        { m_lRefCount = 0; }
) @3 ?  o' L* h  c' Y   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
! W& y7 ^8 u  u3 ]0 i/ x6 Y   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
$ S' ^: _; R7 ~, L  T: A        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

% P, t2 ~! \7 R1 p/ l! }% i2 X
6 ~4 P2 K; T! B$ q% @( `* tprivate:
' Q9 G8 j+ ~+ O% o        CUPnPImplWinServ& m_instance;
1 R& D: V! p/ p9 P$ g        LONG m_lRefCount;
& x1 y8 P% x6 w  I};


; J- _2 R. Y3 {- v# a: k9 z# y: W- q/////////////////////////////////////////////////
$ s. t+ f( f: S( @: o

  L; S# b# {# _# f) {使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
% W( a. H, W7 j- O1 m; rCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
+ K9 i5 i5 j0 a9 _! |- KCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.