UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   0 f) [  u! |- T! l
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   ' K8 o1 s7 B) n( |4 f
7. 
   
8. class   MyUPnP
   7 ~% C9 K* D4 X$ `6 R
9. {
   4 q8 H# t7 A  k: D. M
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
      |7 t* Z0 ?7 N- f. v" k$ D
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    7 q. f0 S1 R: X' _0 P
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
    4 Q7 e, D+ R) M5 T
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    % t5 |. y/ i& c  F
18. 
    & D- O* d% J4 F: e2 e% Y
19. typedef   enum{
    ; m1 v' J2 V; y  S% G, A
20. UNAT_TCP, //   TCP   Protocol
    % S8 U: `! v' ?4 z
21. UNAT_UDP //   UDP   Protocol
    9 F3 G6 }& \0 t
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    1 T3 Z( |  B7 m( f* N
26. WORD   externalPort; //   Port   mapping   external   port
    # F: w) \7 C! \& p; {2 }
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    ( ]: U% b$ X. d. [! Q
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    , _) V  s# p, L: D3 b' z: b# r/ t
32. ~MyUPnP();
    5 J$ r  g; d4 G& |9 i+ M
33. 
    , y# |' m( U' L9 {6 Z
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    3 B, w% f$ |+ ]% P$ ?) v0 E
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    
44. void InitLocalIP();
    ) U. m. X* N6 n: [; ]* |9 W  y
45. void SetLastError(CString   error);
    0 G) C( t% I6 c
46. 
    & r" u; c' A/ w
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    ( P. c* D3 ^- e3 k3 m
48.       const   CString&   descri,   const   CString&   type);
    % x0 x( p, u" d7 }. h
49. bool   deletePortmap(int   eport,   const   CString&   type);
    $ V! P" o# _' I  i0 P
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    ' I) Y: {. W. {* U7 J6 \
52. 
    8 T: F4 A8 i- z( \
53. bool Search(int   version=1);
    ) m5 ]6 w3 @4 l2 ]) M  ]" J( o
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    * Q) V/ m) l0 a# e4 u$ k
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    % i! }! t6 v# \: T
59. bool InternalSearch(int   version);
    : _& G, j5 e8 D5 N
60. CString m_devicename;
    3 ~* p) ^: l1 V7 l3 U6 C1 @; l2 X
61. CString m_name;
    + L3 M: a2 H# }% J" }% u
62. CString m_description;
    & X  Z2 ^5 s& L: r
63. CString m_baseurl;
    
64. CString m_controlurl;
    6 u) E: P" J- y6 B; c+ _' l
65. CString m_friendlyname;
    $ d0 L% F) K/ R5 U6 U0 ]" P6 ^( Q
66. CString m_modelname;
    
67. int m_version;
    4 F" [; `5 T8 J* V, [
68. 
    4 g4 R9 J; x$ E4 ~. j: ^1 r
69. private:
    ' d- R) F: }* F. V( O
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    ; c1 s5 y( T; ]$ Q
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    : n3 s3 p6 I5 p2 c" u
75. 
    9 }7 m6 R5 r) k
76. bool isSearched;
    ) `$ W6 b" U  M3 E8 V' Y
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   % N" W$ b  ?  M: l; q
2. #include   "stdafx.h "
   
3. 
   0 R9 j: Q# z# x0 N' K
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
     l/ k8 [/ r/ w( P) y8 e) E
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    $ c* x7 u3 A# D9 \
13. static   const   int UPNPPORT   =   1900;
    , s' _8 N- ^9 K2 Q, ?; Y1 R+ f
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    ( O5 h0 P- Y9 j4 q7 D$ U, w. ?
15. 
    
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    
19. 
    / S2 e7 o6 c$ z. L  x
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    2 h0 ^. D- t+ w) o9 \
24. 
    8 ]5 m+ e: D% }# E8 ~! I" _1 i
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    * n% ]3 Q% {9 U9 r" B( u1 T, d: ~' {
26. {
    % K5 M) K8 V9 D; B% E7 ~/ R
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    0 c0 U/ e8 E" R/ T" H1 a
28. }
    & F* P, t" e. g9 Z: B7 f6 y& I
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    6 _) X6 j3 f5 w! k8 P8 A
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    4 @, i1 s! ^4 i. D
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
      ^& y1 j  F9 a6 t6 D3 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;
    " C+ {/ Q) x; Z' T, l+ v* `8 y/ V& Q
47. sockaddr.sin_port   =   htons(port);
    ) ?2 ]- f9 |# o
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    : b; R2 W' Y3 ^6 |. W! R8 `
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    * W7 z( s- g  P9 i4 \. d
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    " [' i2 r& S: a  c
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
      J9 a1 c$ }: I  }1 [
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    : S( D3 b2 E2 Z$ P
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    / P( b+ V0 G1 n! z
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    6 s/ t; G2 o. [) _$ o
62. 
    
63. return   true;
    5 g  w6 t4 p% `+ K
64. }
    4 Z  q$ g. S) d5 z+ r
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    6 u7 o, q  x8 ]. z  ?! D7 o
70. const   CStringA   sa(request);
      k; u$ t9 O1 P' ^- C
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    & k0 e+ o4 Y. B: L
73. 
    ) m" `' i2 D0 o$ `$ D( p! t& N% s
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    + N) V8 d3 t9 x/ t) l$ X. f
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));
    : w, Y6 B+ N' c$ ?  K/ L1 Q" r
81. }
    * @) n% R$ s3 X5 b" s4 u3 x' P2 ^
82. 
    $ o' m! \+ Y% f5 M
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    $ V* x2 ]# c& O* D5 X5 R: A
84. {
    & i& O! g8 `' v/ r, W" L$ [$ Z
85. int   pos   =   0;
    9 q3 K6 U4 U8 |' n0 _
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    6 S' a& C+ D% ]" B
88. 
    
89. result   =   response;
    1 [+ _( P. I: f! H+ R
90. result.Delete(0,   pos);
    ! O3 ^; s  U8 i, \+ K' h
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    # _' O8 e9 f( G  b% z6 }4 Z# W
96. return   true;
    8 [7 _3 l  V* {6 N& Y0 _* c
97. }
    2 Y# l4 v* F1 H6 g5 S7 L
98. 
      b3 ]" T5 d% Q% ?* G& f
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     ! x! m  f  Q* O6 X) s7 m
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     2 F+ u( T( _5 _* `+ G) R. S7 A
103. CString   property;
     9 t& q1 l6 ?: B1 _+ `
104. 
     
105. int   posStart   =   all.Find(startTag);
       [+ U8 ]& V+ m" |+ T
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     , A* f0 o8 u1 z8 o. Y* o
109. if   (posStart> =posEnd)   return   CString();
     6 w/ `: w9 }+ q8 o% R' g, P0 S
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     , w  H. Z' h$ Z* t$ T
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     , @) a! _  ~. M3 I! E
116. {
     ) I, _6 a! i0 p% i5 G, x1 Z5 V
117. m_uLocalIP   =   0;
     3 Q* v8 F' ], k8 |( G7 A5 R+ J
118. isSearched   =   false;
     8 z( |* O& ?# Z
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     5 K& U/ t+ ?& |! n, `3 t
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ; }! Y0 E% u) ]+ K/ H* P+ P3 \
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     2 X# r  j) r3 V1 D/ x  L$ @: \' z
127. RemoveNATPortMapping(search,   false);
     
128. }
     : I( c- B- U/ u
129. 
     , t- B- z7 W0 c# y+ r4 D% z2 m
130. m_Mappings.RemoveAll();
     ! h% h, O1 H! C* [* i3 \* `
131. }
     
132. 
     + h) E/ X- [! L/ k/ s
133. 
     0 ]# t7 O8 B2 _& \5 n( L" R* ~
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     ! E) X3 ~, _+ {2 f
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     6 i, M4 \! z  V9 |
140. CString   devices[][2]   =   {
     # w& k! Z! W& q# V# Z
141. {UPNPPORTMAP1,   _T( "service ")},
     2 r0 }7 [  m: i/ C2 f  o
142. {UPNPPORTMAP0,   _T( "service ")},
     ! |. I# Y/ f- K1 J
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     ! {' g( Z1 r% H3 ~
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     + |% G( K0 E) R0 V8 ^5 u* B
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
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++)   {
     
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     8 v9 B4 x' ?: Z! I
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);
       S: L7 B/ }( C# G- N, z( w9 O
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     ( X/ H, i, D! X& C7 H, l4 a0 q
159. }
     4 ~5 l. m8 v8 r# b8 }
160. }
     
161. 
     
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     " X: z; C# r8 `5 |# S
170. CString   result;
     1 w: V9 S" b3 n/ b5 J  ~5 i
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);
     ; g9 Z4 _) R. j$ w1 i
175. if   (result.Find(m_name)   > =   0)   {
     ; Y8 ?, ~5 X% W7 ]5 z' c/ a
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     ) P/ w+ n! B5 }3 p! o$ Y( c
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     % a. L, R+ F1 {  b& ~
184. m_description.Trim();
     " G5 {0 T4 |5 a, `6 ?2 I8 C
185. return   GetDescription();
     & f& A. p- w8 q
186. }
     
187. }
       M" v, k; M; |  ^9 ?8 h8 Y$ M
188. }
     : e  m% N2 O& b; F% a' ?) ~
189. }
     ' B0 ~/ f! x4 C) I/ Q4 C* r
190. }
     " G% Z- @7 Y9 f5 _7 C& r
191. closesocket(s);
     1 P9 ^; P- l6 t1 Z
192. 
     
193. return   false;
     
194. }
     

复制代码

天云上人

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


- @& z0 y3 }. ], f# b( ]3 b///////////////////////////////////////////
; z3 I8 B' }' g) f' u0 @//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


#pragma once
#include <exception>
" f5 K$ v) l3 ^4 x4 c" T

  enum TRISTATE{
" d# P2 }6 _. h' W        TRIS_FALSE,
        TRIS_UNKNOWN,
# Y4 w0 c1 Y% i        TRIS_TRUE
) H6 }4 M- |/ V' I7 A};
0 R5 @, o8 W! i. @/ v$ B9 W
& k( l$ J1 U- K0 `' i$ e! s
enum UPNP_IMPLEMENTATION{
* z# D" l  y# K6 s: n3 u! R        UPNP_IMPL_WINDOWSERVICE = 0,
% s4 [; P& |/ Z2 @0 S5 R        UPNP_IMPL_MINIUPNPLIB,
  _2 K4 ]! Y. S, K3 A/ a        UPNP_IMPL_NONE /*last*/
3 \/ E1 O7 w5 o2 U& Q};


/ J* [: r3 }; t- u8 F9 h  l

, g. U$ f0 ?2 b# p, V' xclass CUPnPImpl
{
public:
' ~4 q% e- L0 p2 q        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
+ [# l( s8 i7 s- R) ^/ X        enum {
                UPNP_OK,
& B+ g9 H' u0 H8 ~$ G' A                UPNP_FAILED,
) t/ v, F; `1 M5 m0 }. b7 ?% ]+ x* X                UPNP_TIMEOUT
) D/ N: `( G" r" B6 G        };
: @% z' p( z8 u) w
/ o7 q  _' n) ]% z) }
1 ?9 G* m/ T" W) O" j: {6 E        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
4 _9 t: J6 Q) R4 m' F& f$ P        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
( c# t: s& Z, R& Z4 a' m; i. _) L        virtual void        DeletePorts() = 0;
4 ^) _% z# B! N# N6 `# q2 i  t        virtual bool        IsReady() = 0;
2 P: J' {0 ]% {9 W; u: C        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
  I0 z( e5 _, M" t        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
0 x# \4 i) |+ z; v. E, L
3 m7 Z' B. V4 g7 S  D) v
// Implementation
protected:
- m/ A) O5 T5 ~1 q( ?# o        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
4 W9 M) B4 [# t        uint16                                m_nUDPPort;
( k, \$ R/ d5 H, |. T& u+ ]) x8 ~" F/ K        uint16                                m_nTCPPort;
. o) |) K. J5 E) ^9 z        uint16                                m_nTCPWebPort;
0 ~/ Z- I+ y. s+ \        bool                                m_bCheckAndRefresh;
+ L2 f# c/ c$ x! d
2 e" \$ n' D) e4 W% ^
private:
        HWND        m_hResultMessageWindow;
& D3 ]  J+ {9 V" _        UINT        m_nResultMessageID;


};
! r3 U  u; W4 ^
( z+ [- |4 S" ^# `9 Z) M# ^0 X
// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
  j1 s4 w' {7 A" |$ }" epublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
6 b1 Q+ y& T/ l( u! G$ h: I        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
4 ^/ D* i: k$ e$ c2 ^: H. g};


/////////////////////////////////////
3 b& S* u9 s' T  d( E# f//下面是使用windows操作系统自带的UPNP功能的子类
0 j" \& v2 b; q5 q* p
; C- W% t; ]) m/ P
#pragma once
6 w" g- v$ t& d7 O9 E2 M& `+ R#pragma warning( disable: 4355 )

& j! P5 F- A$ [2 x: T2 n' }/ m: |
#include "UPnPImpl.h"
( K8 d% M# P0 M3 @; W#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
7 N! ]" h* b9 i" r) G4 m- d7 F
% o$ k4 \$ C5 o7 g6 J% t; h
#include <vector>
7 S+ U% l2 A9 ^" `2 T, C#include <exception>
) N- Q3 l) F- o! |* D#include <functional>
9 c' p# J' x% B* r; v0 U



typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
9 S: g0 d' N# x0 a$ b* J$ Qtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
6 Y$ I; v1 x: y8 z% [* itypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
2 w) G! b+ M1 |7 l- ytypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
* K1 ~. [: \2 T) p- _9 ^typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
8 `& t1 H5 o$ o7 @; f% h7 W# }

4 C# i# I. V6 ktypedef DWORD (WINAPI* TGetBestInterface) (
6 ?6 A! B$ Z( V' n. |5 E# C5 B1 b  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);


typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  x( R& T; F. D8 r' K, T  [  PULONG pdwSize,
' P9 A* y. l3 _( F  BOOL bOrder
);
# `& v! g$ L* Q( }# K
" m0 e( E3 D4 j9 S$ H/ w
( l, e0 _2 g& b6 S- w4 ]5 s; `typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);


CString translateUPnPResult(HRESULT hr);
6 a7 K3 [5 j4 i! h2 o, {HRESULT UPnPMessage(HRESULT hr);


class CUPnPImplWinServ: public CUPnPImpl
6 ]9 B8 {& d' Q4 Y- Y6 M{
9 O) W, i! H; z  }/ r        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
- E; f. k. l- m7 Q& i5 K8 y- apublic:
        virtual ~CUPnPImplWinServ();
; A- _& P! y+ P& f; e7 u        CUPnPImplWinServ();


0 h% v8 e. R9 u# |# b2 b* I" R        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
        virtual bool        IsReady();
( J2 w  t4 v% f% d: y        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
, n& l6 J: Q; m

        // 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
        virtual bool        CheckAndRefresh()                                                                                { return false; };
7 o6 ~6 N5 f/ H6 P3 c
& Q$ B- z- y# L7 B" {
: G5 s3 V5 A9 T* b6 m; cprotected:
( j0 W+ p! m% N1 T+ d# {        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
; s. z* C1 s, d4 Q1 B0 E: `4 S4 `: i        bool        OnSearchComplete();
        void        Init();
+ p7 d" l4 i1 Z
7 v: [7 ~5 d8 k2 j1 G; R
2 m; V+ |; Y% n. [        inline bool IsAsyncFindRunning()
9 {# c: w9 n5 B' G9 T- e  v, h        {
. j8 {# v' y# |, D" h                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
  j( P- O6 ~2 G1 y1 J1 d( z. M                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
) J9 @9 g# C' ]+ L7 b                        m_bAsyncFindRunning = false;
                }
                MSG msg;
! T+ y; l$ T7 H' g/ y, {  v( m                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
9 H; N" _6 D+ R+ x                {
% c4 F) y; I* o8 ^; w                        TranslateMessage( &msg );
" H* G" }+ C$ k' x# S                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
0 g. j- O; {: l        }

+ L9 a, Z) |5 r. @
* U/ m8 r/ t$ I" B8 d0 K        TRISTATE                        m_bUPnPDeviceConnected;


/ F, q0 Z/ ^7 F6 K4 v, a" J// Implementation
: B2 r; R+ b; c5 i9 b; N0 v        // API functions
. l2 M$ W2 X6 j6 R/ A' h6 v        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);
( w& V! [" q6 @- d4 H. s/ I9 r* v9 S! m        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
2 n" K0 d0 p" [2 H" ?# c) g# M        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
9 b9 M* f2 b1 D; t" X. O. Z; t6 H  t
6 B. K5 c0 Z' E8 M, Z
        TGetBestInterface                m_pfGetBestInterface;
; z* G/ u2 j8 N/ K        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;
" z; Y' D( i5 D% `# o+ T( h

        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
: r3 f# T7 l% [, s* a        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
" J- w) X4 o( f                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

! l5 r' r# {- ^4 Z! B
. Z8 ~/ \5 b/ f0 H' U                        if ( FAILED( hr ) )
! c  L& M1 k- c% t, K                                return UPnPMessage( hr ), false;
. Y0 a3 ]. z6 e. G' [$ t- n+ l

$ r8 d: T9 w. \# w$ N1 S. S                        return wcscmp( deviceName.m_str, m_udn ) == 0;
+ R  k- `2 Q# v! R' @                }
( S" {4 q; Z* N1 S# m                CComBSTR m_udn;
, I/ W" S: L6 O! P        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
+ H0 [; r3 {9 R5 ~; j7 Z) a        HRESULT        GetDeviceServices(DevicePointer pDevice);
7 j9 ?; p. e5 S* L        void        StartPortMapping();
, m1 v% R+ x/ Z8 G7 H        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
/ U' r$ O5 A# Z8 l  {9 d; U        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
" v0 }5 B  `/ k5 l                LPCTSTR pszInArgString, CString& strResult);
7 _: ^) l0 N# S( K1 q' I/ I        void        StopUPnPService();

% h0 P5 u( S7 b% A/ ?9 O
% b. H; a, T8 \5 V" E! l        // Utility functions
# l4 ?5 L; E0 Z7 b) S" i        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
/ u3 ]4 J" q" o& }2 c$ L9 I        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
+ ?4 W# M: q1 K1 ?        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);

! P2 w8 a# ]& m6 u  G- d. G
// Private members
private:
7 M! d1 p% v: N; [/ U& x        DWORD        m_tLastEvent;        // When the last event was received?
6 k7 e% s$ Y+ d- k& n        std::vector< DevicePointer >  m_pDevices;
& Z+ G) Y- ]8 s4 `! ]) n        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
9 @& q0 c; N' f1 }; z7 }! L. Y        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
4 L& I1 @) C9 ^! ^5 o# x
. E5 m" l) ?9 U0 q
        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
7 ]# \% }! @  v1 ^        CString m_sLocalIP;
        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
9 Q* v% f+ d; J& Z# K        bool        m_bInited;
        bool        m_bAsyncFindRunning;
% }& @- F4 B0 n$ |0 [0 g' _+ j        HMODULE m_hADVAPI32_DLL;
5 ]8 }0 Z4 Y4 [+ B' N! d! c        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
0 n/ r( f7 f+ T* B        bool        m_bDisableWANIPSetup;
1 _3 T+ V$ _2 O9 n& u% p        bool        m_bDisableWANPPPSetup;
7 ~# o: R7 j/ c9 ?

4 O" V2 t% c6 S, U};


// DeviceFinder Callback
; J# l$ D5 @. Y5 T; H$ Lclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
9 m2 e, S* D9 T. r6 `4 q$ H+ ^

7 B7 `) c* y( ^. o   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
: t7 d* Q- E2 O6 m5 f6 w
. l. f, ?8 |  x& P! v( q" z
* D5 `3 a3 V! K* z& }// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
* ^$ |, ]  z- }1 ?& S+ P1 p        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);

% [" x  w3 a4 m; Q9 N; u. J2 N; F
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
6 y- f; B8 B2 l8 @6 }};
/ a! p) e% B! e! t/ D& N$ Q

// Service Callback
9 x' E: n4 p% ]class CServiceCallback
        : public IUPnPServiceCallback
) I6 `& ~3 {, V{
public:
4 e0 u  H" F6 w- }3 {" ^        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
. o# R/ j) D0 C1 w4 H$ C        { m_lRefCount = 0; }
( N1 R8 C1 _3 t  R* E8 t   
! |5 p. M2 _; s' b% g   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
0 [0 a. I' F/ L   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
; X" w7 D0 _3 l5 n7 G! [        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

( U% c3 L. Y, ~' Q+ S+ ^1 a: C. ^
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
" r) X$ }' o6 Y* w% {" ~
. Q* e: I, x! v; d
. k& }) h& U, i, J3 v/////////////////////////////////////////////////
2 H- R! g; Q" M: I% F2 W- T" r

, {9 O, r0 o- u& R5 F+ k使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
1 ]# y' l0 D* q2 |; O$ SCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
9 t6 U+ C5 k, F( ^/ uCUPnPImpl::StopAsyncFind停止设备查找.
: l. U! [2 O8 M1 `) J" zCUPnPImpl::DeletePorts删除端口映射.