UPnP

天云上人

/*uPnP.h*/

1. 
   . P- r; i2 O! P4 q8 b
2. #ifndef   MYUPNP_H_
   
3. 
   9 ~! N6 S, j* j, Q0 l+ E8 u
4. #pragma   once
   * C' b: ]" Z7 B( i( E, ^
5. 
   " z) S- v- B- }
6. typedef   unsigned   long   ulong;
   
7. 
   1 ?1 a7 ?" u3 Y& p) U8 P
8. class   MyUPnP
   
9. {
     V2 H2 I- ^/ B* r0 e4 O% ?! n- q
10. public:
    - D  v3 M$ w# g6 e& D9 R( q* `
11. typedef   enum{
    & h& V# [$ Y7 `+ n5 S2 a2 t# O
12. UNAT_OK, //   Successfull
    ( C3 A% u  T8 V8 W' `
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
    0 }% [9 c% v* z3 N* h& [' K; L5 I; Q
17. }   UPNPNAT_RETURN;
    ) k0 a; r: E. K: ~- ~0 y
18. 
    * T4 g9 I7 a1 D# D: r3 D! N' }
19. typedef   enum{
    8 u" c- Q+ |3 ^& f- l" V
20. UNAT_TCP, //   TCP   Protocol
    3 n3 q' Y5 R( ^4 l, S
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    . ^2 e" T0 p; O' _2 o
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    ) W& s: f, ]) M7 P$ B: O
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    1 v2 g/ Z+ U: O; K3 ~; M, J; e
29. }   UPNPNAT_MAPPING;
    / K. ^' \9 ^3 N% E4 i+ b+ S; i
30. 
    - Z9 `1 j; B2 @
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    7 M: e' ]4 R4 C# j& c) f
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    4 ^: G0 ?2 S* a
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    4 r, k' s. c2 f, n8 I8 G
39. CString GetLocalIPStr();
    ' m* x  K# g3 P7 j9 b
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    % {4 d; i4 J. H. W, c8 u
42. 
    
43. protected:
    & l! }' A* K  S9 i! H
44. void InitLocalIP();
    ! w$ J) F0 ~# ]6 o( |
45. void SetLastError(CString   error);
    - @0 R" j  g- \
46. 
    : k; T5 A: E' ^4 g% }
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    , l  l) V, W" r: ^  L* C1 k" k; c
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    * F" `& S# n  t0 [6 s
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    ! u$ I6 ]9 p5 j/ ]0 e
53. bool Search(int   version=1);
    * q4 d8 U* U; o$ w7 W$ U$ Z/ u
54. bool GetDescription();
    5 B2 p( x+ j% N
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    8 J' j5 k: ?5 X$ M6 U5 J* U$ C( s! ^
57. 
    8 j2 j% N6 C' @' _
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    " |" j' H( m3 k' T) R5 Q
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    0 y; X4 p6 v6 F. v& x
67. int m_version;
    
68. 
    0 R8 u+ Z  v5 }3 H( h
69. private:
    / j- P( V  ~/ R) r. ]  S6 M- q
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    6 j2 U( ~$ X! x( }1 W+ A; E/ L4 `8 H
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    : \; g. k- _& r( S& g6 q+ w9 @
75. 
    
76. bool isSearched;
    
77. };
    ! I+ d. ]/ C+ N2 P0 R
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   - ~& m& l  F  O  S  o$ X
2. #include   "stdafx.h "
   0 R4 h8 y$ p0 i
3. 
   4 K7 L; p- S% V; K- T+ C  t7 J  ^
4. #include   "upnp.h "
   
5. 
   $ e, Y1 B# t' c" }9 g; ?) d
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   ' D) _1 ]. a) ~- d- V
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   , Z" h+ D6 m+ K# D! y8 O/ [
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    9 y& u, q2 b. y
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    
17. {
    & A; c3 C4 Q/ [
18. CString   s;
    - X% X3 p% b$ Y0 Q" g. S1 u: ]
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    / m6 u& O5 J! A' `8 a
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    & A9 o  u; Q6 K$ W
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    ! _5 e4 ?2 \' N8 h. }. `; d
30. const   CString   GetArgString(const   CString&   name,   int   value)
    . W, z9 v: Z. y
31. {
    8 O3 U/ e1 ?6 B3 B
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    ; m& f! O  [8 s" P! }7 d- M
33. }
      Y( }  ]" u. ]' V3 T
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    : ~7 ^0 I1 A; S0 U1 o0 V
36. {
    8 D) U6 o7 r7 t4 ^6 F
37. char   buffer[10240];
    2 Y/ J8 \- A2 m9 v: M  v
38. 
    
39. const   CStringA   sa(request);
    ' E0 R. Y+ o  ~% P$ H3 j
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    ; F; T/ Z& J! _" ]  ~
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    & o* B2 k2 n. V" k6 d
44. struct   sockaddr_in   sockaddr;
      p1 g7 z  R; j
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    ! ?- u# D6 I9 a# H
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    % @+ a5 e% k& u6 W2 }
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    8 x  x3 y. Z9 |7 v2 m  g* Y1 E
53. Sleep(20);
    / h# l8 N8 M- h+ e' A
54. int   n   =   send(s,   buffer,   length,   0);
    , u, z) [. x0 Z+ m5 D' i
55. Sleep(100);
    ; p# C2 D% b8 x- N% h
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    0 ^, m  J3 h8 ~& p
59. if   (!rlen)   return   false;
    " `2 P4 F/ E# T' P# s& e$ \
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    5 A' `6 c4 j+ Q4 F$ x! [% O
62. 
    
63. return   true;
    
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    7 r3 Q* T4 L! s4 p
67. {
    " i% W, R  {: Z" h* m" A
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    # y% x6 H+ W# r$ d8 ~& u
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    " j# e, w0 B+ j1 [2 _
74. struct   sockaddr_in   sockaddr;
    : |- W$ ?6 t5 ~  d( t, e. l
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. }
    9 M6 F( R3 N( m) K* q# Q$ M% O: @
82. 
    8 X( D& w- V+ b( N2 U
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    % W" p( T! q, _  K0 T* V, i
86. 
    ! A: O  [" b1 I
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    4 Z& \- x8 G8 w8 |! z0 w# Y
93. status.Tokenize(_T( "   "),   pos);
    $ R, K9 i; y" r) o
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    & m3 ~; ^! m+ O% x* s' U! p
96. return   true;
    9 W  l8 Y& f4 u! M1 V3 ?! d
97. }
    + M2 Z" ]7 |7 x  L6 ?' d/ ^0 d
98. 
    " A0 J! J/ R2 T, I, O
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     / k8 U$ Y: D! s) w$ H- s$ N2 w
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     * ~% h7 n! h* M8 C1 A( F0 i
106. if   (posStart <0)   return   CString();
     
107. 
     * z0 P8 [5 ?: b
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     . R1 A* c5 E3 K) d# y9 o
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     , H# p, y% y& N
113. 
     9 `- b; H$ l! ?+ q) t2 D. C" n
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     # Q4 C; j) [& f  g% G3 F
120. 
     # q& G4 F5 x9 V) x$ S' z" k$ D# }
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     / K8 o0 x, [: Y% ]& y
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     ; }' [$ _) b6 `7 W( P
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     5 t, Z* M/ m  f- S+ t' A0 e0 W) r+ O
128. }
     
129. 
     ; A& j6 h3 i# }# z# y0 A- B
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     . Z$ U+ v2 B; b. c- N
135. {
     # p) p3 r2 P8 I8 F7 W5 l
136. if(version <=0)version   =   1;
     4 R  B' {) y! h2 l
137. m_version   =   version;
     : M& O$ k9 _, _0 W9 w5 N. z( A" O$ H
138. 
     ) R* Y* C6 F5 e9 G
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     : \# i# h9 w3 {* V! Y$ V
144. };
     
145. 
     " W+ S2 f) y% }2 R6 `
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     + }. f/ q! ]5 K
147. u_long   lv   =   1;
     4 s3 Y/ X, K/ v. s
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     ) ?/ r2 P' [# r! X6 V
150. int   rlen   =   0;
     : W8 I! t; }& ]! Z! u
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     1 A) m* B* a7 R2 @9 k* r
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     4 V* e1 V, _( w1 e
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     $ D7 i' h6 ^& D$ e
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);
     ! l6 J  u" n5 V; \
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     3 E/ z) M. m/ A; V
159. }
     ' Q! x0 g% g: r% j* }7 I
160. }
     : y3 d; ?+ i5 T& y
161. 
     8 Y4 J3 _9 `* ^
162. Sleep(10);
     . T, {1 y6 x1 R9 q  Z0 S
163. 
     ( `) W) m4 R1 x
164. char   buffer[10240];
     ' ^6 E% I# S# h6 U9 w" \
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     - N. {6 m8 d  e' w2 M
166. if   (rlen   <=   0)   continue;
     : h; |: e. H  p% Q' K: _4 `; f% t
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     / o9 T% B, p! x
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     + _2 a! B7 q) W$ O6 N
172. 
     7 ], \5 i. r9 L
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);
     5 _5 f( N, \6 n, w# `- p0 ?3 c
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     4 U) w+ F( a* |. f
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     - M1 w, r6 `5 C) F% y/ a
178. if   (line.IsEmpty())   return   false;
     4 i" g$ o  z3 R7 \2 d
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     ! B8 e  ?7 e% a, v
182. line.Delete(0,   9);
     % N+ G) g& m. N2 {. S
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     5 G* h, P' E; ~
189. }
     
190. }
     0 ^" U3 d6 o, t& D$ T
191. closesocket(s);
     4 G) ?( ^! s" H
192. 
     - `0 l8 q1 W$ W0 e: t( f
193. return   false;
     1 {: C2 b/ z% W: O+ U
194. }
     " C: q1 u9 y' O+ T1 e

复制代码

天云上人

以下有关upnp的接口来自emule，
  a* S$ {( y9 `! V4 I' L
  q; ]# P- S* W+ \0 B  r% x
///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


9 D7 z* V; a. y/ F+ H# F4 z1 u#pragma once
#include <exception>
9 }7 D1 k; G. @* B6 n
3 K0 `3 R) u# q6 `3 ~
% W0 ^: \' `  W$ r- |) J  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
2 Y" n& Z- _. g5 e};

8 u- G5 ~2 |1 E# x! e
enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
+ f+ G2 a% n2 G6 [# D  T        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
+ a) }# `6 R- Z+ M+ R' e, U3 G7 r};
2 h! V( e: P; ~. Q& K
2 l% }. V% Q4 `0 k0 z
0 v# B  l; d/ v" m
  ?) `, e# w2 ~* C0 ^
5 J/ M" T- z5 s2 l# }6 Gclass CUPnPImpl
' B* C8 _$ B8 ^: I/ @{
public:
* L6 c. k  O9 F        CUPnPImpl();
        virtual ~CUPnPImpl();
1 |0 w0 w1 K; E6 }        struct UPnPError : std::exception {};
% }. T3 _9 h0 B* s  ?) P8 K* _        enum {
                UPNP_OK,
                UPNP_FAILED,
' V; |  c' B, H0 z+ _                UPNP_TIMEOUT
        };
0 _8 i: @( n  x. C( Z
& [: g: q+ Y$ Q# J* ]
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
  V$ _* {& ~: Q" N        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
0 |0 B  T6 M7 c: n* y- }/ N        virtual void        DeletePorts() = 0;
+ q; u( W/ C& U; s, h+ K) \        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
* _1 H7 P% N, }  o$ ~; _

        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
+ K  q) c. t3 s) p/ T% _; I: p        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
- b, n. {( ]( s% }        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

: T/ \+ |) o; u- H
6 }" X# G8 N9 y9 Q// Implementation
" f( ?9 |2 I; a( ~/ ^/ Q" @. p4 fprotected:
$ G& c' `2 L  O5 d& C# [2 k        volatile TRISTATE        m_bUPnPPortsForwarded;
6 K) L) S! a' L$ q" Q# V        void                                SendResultMessage();
) T' k8 l0 U2 _. ]& U! j        uint16                                m_nUDPPort;
# C) d$ I. I( t3 x        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
" k! ~( i7 e; l) S/ k  J: j

private:
; c$ }4 n, V2 s2 R1 L- p        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;


};
0 J" \4 |: _5 M( j7 V# E* L
+ a8 r% x; i) _! b- B
// Dummy Implementation to be used when no other implementation is available
% e% L& T; V: n2 P/ uclass CUPnPImplNone: public CUPnPImpl
{
public:
' L# Y( L: k1 B. T        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
' N" T1 ^( y' G5 q        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
* `, m! y+ c& E1 n- W        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};


6 {+ ]4 Y) Q" B, ]1 z; F( Y/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
) J0 g7 s6 f- G" J' S

6 w+ `% Q" I& x) U, D#pragma once
#pragma warning( disable: 4355 )

9 |% U5 k0 C  p, A1 e2 K6 H3 G
; B$ P  O; N' R* t, G# ^#include "UPnPImpl.h"
+ x8 t" |, u- j, L$ `+ F; k#include <upnp.h>
0 s' ^" H" ^1 X' B5 l#include <iphlpapi.h>
#include <comdef.h>
+ P& i" z4 }2 A$ B: E8 q#include <winsvc.h>
6 g, N2 [4 S6 b1 C
& p2 p6 ]! g# w9 {2 x
/ e8 J$ |! `  K. {# l4 b#include <vector>
2 |1 ?4 H% k3 [7 Z- s8 A( W! H#include <exception>
#include <functional>

. j( a& Z7 h& ]0 a1 J6 l
; U; w/ v. Y/ P" K# Y( {

" i% t; ^6 U; rtypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
2 K% O, i7 C% A2 Htypedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
: d3 M3 }" i1 X( x8 v/ {2 p+ Wtypedef        _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;
; N' x9 @- f: P! {typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
( |& y) A: H( r" [& Y$ E, w( h) X
- Z) u" U, `; l
typedef DWORD (WINAPI* TGetBestInterface) (
$ p8 I& t, A/ O8 L, W0 m! |# P8 I  IPAddr dwDestAddr,
9 V6 s3 q' w' \5 X  PDWORD pdwBestIfIndex
6 s: v  P; I  K: e);
2 ?8 \' R0 _2 d/ \# F. f% o- r/ h

typedef DWORD (WINAPI* TGetIpAddrTable) (
4 l; v$ U6 }3 D3 Z' e* n  PMIB_IPADDRTABLE pIpAddrTable,
1 h5 u( S  U0 ^( e# F  PULONG pdwSize,
  BOOL bOrder
, x$ f5 s& r; L. A$ c, f);
% h( J- g8 w) ]' V( {

9 }2 r% Y* T; i8 s8 x4 Itypedef DWORD (WINAPI* TGetIfEntry) (
. N4 B+ E& Q8 S# B% U) I  PMIB_IFROW pIfRow
);
$ ]9 s) N( X# j0 g) o1 E* d" B+ I
& U3 ^; N- W4 c' O
& b" v; [, k3 r3 _$ SCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);

0 p3 W: \4 }! H. }) b# i
class CUPnPImplWinServ: public CUPnPImpl
3 R5 o: a& x9 E{
2 C* O; M& K- l        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
" Y( [+ b  I% _% o9 b; Kpublic:
        virtual ~CUPnPImplWinServ();
( k: A* V' Z1 L6 J: c7 [3 ]' n6 C        CUPnPImplWinServ();
- K+ B- l3 h, Z+ R% P- g
" ^. L5 _' e1 @* ~, b4 M8 ]
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
. s2 E) C4 G2 v/ I6 _+ D        virtual void        DeletePorts();
9 K  ^" A% n8 F! k! j        virtual bool        IsReady();
0 ^* `- ^0 ]) ?5 ?2 ]" K0 Y        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
  @) R/ j2 I( o- o7 z" ~1 t6 B" \

        // 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
& p# `9 X& e" u% l: l' Z3 i% D: [2 w$ O        virtual bool        CheckAndRefresh()                                                                                { return false; };

$ }! w& m# @! I' e
  O; V1 n; w0 k! {protected:
  e) R( |2 P& K' k0 N  J# N9 X; U        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
. A# b* r. E* U6 A        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
! g  M  f6 ~0 D: d0 X: U        void        Init();
! h  B0 l: x3 J- }

        inline bool IsAsyncFindRunning()
4 k5 k. ?2 `! F8 \# Y        {
# y3 u- \. i+ L; Y- K' F4 w& r                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
! h1 y! y7 }8 N+ i6 h- o                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
% `; K5 t( X0 E! T" q                        m_bAsyncFindRunning = false;
- m2 T) h3 F5 Z( N( _2 H2 d7 C$ D  H                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
3 K9 n3 \0 L3 N9 [  Q* S" p# t2 X                        TranslateMessage( &msg );
7 N+ _. }4 q) `7 x                        DispatchMessage( &msg );
                }
  V" X2 o# C; B) G                return m_bAsyncFindRunning;
        }
0 u: \. l9 O- d

        TRISTATE                        m_bUPnPDeviceConnected;
. |0 s0 r$ u* L3 X. I3 d5 |
3 s- O8 ~* |; J. f. A3 T/ C
" f2 w7 K+ a: ~7 t% d9 I6 M' `// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
! k% }6 r: z: E        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
1 b0 V  T' e0 Q2 `) \1 D! l* [        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
2 l1 H; A' @, ]% N" r        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
0 e4 i2 q# z& D2 A/ r        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

! p9 H. m1 P: @' K
2 `1 ~. w& A2 R, d: _# y+ U9 m        TGetBestInterface                m_pfGetBestInterface;
; J* p1 g) v* b; }        TGetIpAddrTable                        m_pfGetIpAddrTable;
2 [+ e1 Y# o% @0 E" Z        TGetIfEntry                                m_pfGetIfEntry;
( z4 j( I! i/ z% p9 g, A
1 l0 o  I( j. b/ M8 @
        static FinderPointer CreateFinderInstance();
& k3 n' X" b; V/ a1 X- H/ H3 @        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
4 B2 p# r0 c* M1 [$ |; y& y                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
+ T% \- L  ]5 N4 n+ c' X6 R$ |                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

! _5 D) z( M, B2 s. R# I& O
( Q, w3 e) {+ z- Q                        if ( FAILED( hr ) )
" k) X$ S2 e) k! L                                return UPnPMessage( hr ), false;


                        return wcscmp( deviceName.m_str, m_udn ) == 0;
3 w- t1 D. b" O- R: l1 h0 ]8 N* `                }
                CComBSTR m_udn;
/ T4 l+ D. n3 z        };
0 A# V! s: i9 I5 P  [" Z( p4 ]+ |% ^; w       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
: s' a3 M5 ]' H4 G        void        StopUPnPService();


* b6 b( }5 B& X  G: w& M' m5 b        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
: \9 s- W) r( H( ~: }        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
! e0 u) c% F" A. W# F        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
5 e8 \, K/ h( P# B) C        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
$ g/ f) {( n( r! h0 d" Z        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
! i3 u3 N1 e5 c        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
' s( L2 }3 a$ V/ u        CString        GetLocalRoutableIP(ServicePointer pService);

$ v% E) u2 N# f% I) g5 N
// Private members
. Y9 G; Y0 |2 g" K# gprivate:
" w0 ?1 Z0 g, \" s- @6 e* z7 a        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
$ l, C' ]: o) B5 {" G% C0 Z# |8 i, |        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
; |% e( x9 I) p0 V: W+ X3 L! S        ServiceCallback                        m_pServiceCallback;
4 E$ M" i& a0 t
) l6 f: `$ ~4 a# Y2 l4 n3 z
' z0 {3 ?4 h1 ], g  R        LONG        m_nAsyncFindHandle;
& K% y9 D7 a, v- C' M2 T' m  K- `        bool        m_bCOM;
+ R. ]1 [9 e  V0 v        bool        m_bPortIsFree;
        CString m_sLocalIP;
. n& T2 U. d* M3 A9 ?2 O0 G6 u3 k$ M        CString m_sExternalIP;
- l% g5 F' i* j- T        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
7 y  a1 a, k+ Z% G3 w        bool        m_bInited;
2 C6 e2 O' ~  x4 B. P8 ]        bool        m_bAsyncFindRunning;
2 x7 j& Y( B- l4 T( |        HMODULE m_hADVAPI32_DLL;
. o! x7 X0 V( E) E* d        HMODULE        m_hIPHLPAPI_DLL;
& V+ g$ t. _5 k' K. h        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
( o7 F6 A, ^1 i! L& ?* }$ F        bool        m_bDisableWANIPSetup;
1 q. @# b* U; Q  h' n" o1 H        bool        m_bDisableWANPPPSetup;
1 ~# E0 P8 @3 V# J) L2 p, S" v
& b  t5 t0 Z) q
# L0 j$ }% Z0 T};
% W$ ]2 G. v+ R+ a9 V8 X! `
7 p$ N8 T) O' I8 g: G& V
9 G0 s( G5 \/ }// DeviceFinder Callback
- \, T; O# n6 h6 }: ^: zclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
2 `% U, S+ q9 n, X- b& V) fpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
! I8 c. j& D. k% f, j0 @                : m_instance( instance )
+ x. R+ g1 R: f- E6 e1 I# y        { m_lRefCount = 0; }

9 F& N) y) ~- B9 n; L$ j9 K; F6 i
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
6 f1 H: w& @* t8 ^   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

4 n$ h+ j1 A5 D. O% [7 t5 e* a
+ F+ d: i/ `+ @( ~2 r// implementation
8 R2 W- `- ^5 r5 F+ X1 j" Y( Uprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
% i# N0 O) n- V0 l* }5 c) j; g8 x        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
8 n4 r( i7 c% W& c3 `5 ?9 ^' |+ l        HRESULT __stdcall SearchComplete(LONG nFindData);
9 i! S5 G/ e! x

2 c) F  Y6 P$ E* L6 }6 Kprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
+ w( D8 Q! O. @9 v2 f0 }};
4 U3 q) g0 v  l4 l& i5 R
, N8 H- A6 l: N7 J1 H
) s! j8 l2 m5 v2 Z3 [// Service Callback
class CServiceCallback
9 W2 X, F) p2 q1 C        : public IUPnPServiceCallback
{
! K; r6 w. E4 X% k* d1 q4 lpublic:
- {% E5 O7 }  E/ Q) E3 K) q        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
   
9 H( n& E  c5 ]( ?/ i   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
4 V7 I& v% c. m* X   STDMETHODIMP_(ULONG) Release();
/ d4 t9 A& `! B# @. x& j: p

// implementation
$ Z8 d4 F2 {' j+ e, yprivate:
3 u( y. o5 T4 |3 d  Y1 _: G4 @        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
1 ^# p6 H( N, a" p9 M4 v};
) m7 O% y, A3 J( M. @! i
8 h3 ]( F' ^6 x* ?8 J
3 @2 _; ]  i1 g) k6 k# ?/////////////////////////////////////////////////

9 z1 k; Z' d) Z
使用时只需要使用抽象类的接口。
& c1 c: Q) S8 W' VCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
2 b/ X0 a1 o8 WCUPnPImpl::StopAsyncFind停止设备查找.
4 V4 [. Z; x5 A; h4 b8 z2 ACUPnPImpl::DeletePorts删除端口映射.