UPnP

天云上人

/*uPnP.h*/

1. 
   6 D2 }* b% {4 u* M! f
2. #ifndef   MYUPNP_H_
   $ [2 p  b+ C, N9 H3 b* Z( \* b
3. 
   1 x* |: N6 P$ _5 h1 E
4. #pragma   once
   $ {# b& N" X, V3 L' J
5. 
   ) l8 e; j* q7 J* S
6. typedef   unsigned   long   ulong;
   # u5 j: j9 y% @/ L6 ^! u  o
7. 
   
8. class   MyUPnP
   ) i, P! N# O7 X
9. {
   ; x1 q) u0 j9 h/ S: d/ w  s
10. public:
    % H, E3 b4 o! N
11. typedef   enum{
    " G* R1 M# v! a9 S; k/ G4 `
12. UNAT_OK, //   Successfull
    2 g5 m" \' G0 _' ?% A: R4 J
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
    
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    ; ]& ]/ m8 E# }* @0 y* V
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    3 t: v. n5 p4 Q0 [
22. }   UPNPNAT_PROTOCOL;
    
23. 
    " p- t3 ]! v" E4 r+ f3 v, O
24. typedef   struct{
    / C4 @) O* |7 ?: Z0 t0 u  k
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    7 Q. \8 e/ L) N+ A
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    3 V: `/ Z) d6 z8 u
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    ( @' ~# m8 U: D, y+ g3 L$ G4 @
31. MyUPnP();
    9 y* ^4 O. {4 j
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    $ v" H3 ]; n* ?( J2 z$ _" X
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    7 L8 V/ y( z) J8 L
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    
44. void InitLocalIP();
    3 `- a' C+ h+ R, K# D/ I1 L
45. void SetLastError(CString   error);
    * [/ w3 H8 {" x# ]
46. 
    & r$ `8 v! [2 u( {5 I, y1 Y3 \
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
      K& C! q; Q0 X
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    & [- Z* u2 h2 ]6 ^- j/ R9 y& H
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
      t1 u6 P. d2 Z3 D
52. 
    9 g0 ~6 Z9 ]' u
53. bool Search(int   version=1);
    ; g3 x7 }3 H( N  K
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    ; `7 E- S" y& {! E3 w
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    % J) p5 x# g# k# E5 I
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    6 ^4 c6 s0 ^8 B0 J3 y+ h9 L
59. bool InternalSearch(int   version);
    1 u: O$ b" D# T, W3 c. B" b( q
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    7 j6 [6 W3 K9 X2 u0 g
65. CString m_friendlyname;
    
66. CString m_modelname;
    # U, E( B7 {6 b2 u# J9 x
67. int m_version;
    
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    . z0 U3 X. R' X) L
71. 
    " G! \7 e' t7 _% y( |1 A% v' Q* t
72. CString m_slocalIP;
    - i- `' r9 H+ r# j% W* L4 n
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    & @9 q! r- f. `' E- u
76. bool isSearched;
    
77. };
    % O% s1 @5 {4 E( d
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   : v- n5 j0 ^2 j* ], @- C) n3 l
3. 
   
4. #include   "upnp.h "
   : O3 {  ^8 W4 B  @: L
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   : x" ^4 v$ ~+ @( B2 g& T
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    ; d2 ~6 O* ~, e: v/ a
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    : [4 J- t' U. A; X# ]& d* R; t
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    
19. 
    6 _' O. m8 J5 Y1 f* F+ ?
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    ( j% H7 a+ Q3 L' }+ k/ b. U
23. }
    + X4 l6 c5 g& E& z
24. 
    " ]7 y) {) c' I3 T% q1 ~/ A' C
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    + Z/ Z" \2 L) p5 X$ E
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    ( Q& j4 y6 z) S- d; V, _
28. }
    
29. 
    % r& H" C6 F# k( P  E
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    " L" @5 F% I( J! M9 y
33. }
    0 g3 x- ^$ @+ {9 R$ _4 y
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    % Z6 o6 h/ A5 G. e
36. {
    . h0 z% C( `: V! d5 p7 T& L
37. char   buffer[10240];
    
38. 
    ' n& G; C$ w, X" _: s
39. const   CStringA   sa(request);
    ! N$ [, m# D+ E1 g
40. int   length   =   sa.GetLength();
    6 Z6 v4 p  g& z6 y! H
41. strcpy(buffer,   (const   char*)sa);
    ; J; [4 C, A' p+ R' a
42. 
    7 n/ s8 w; j5 l3 E
43. uint32   ip   =   inet_addr(CStringA(addr));
    - S6 J" ?( h& r2 _. _
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ; i8 }7 _% V6 ]3 g3 H5 z
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    % g! e+ i, k* Q. H
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    0 M6 j, B  c% {$ O
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    4 x2 r: l( ^5 S8 y/ ?
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    : n6 [2 l. m! Z% j
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    0 s. Q' I, D! ], i  ?! L
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    0 _& P+ v' {& K6 I- ]) S
59. if   (!rlen)   return   false;
    
60. 
    2 D. d. }# T' K+ z( I" W' N. a1 e
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    2 Z. H; g7 v) Y. O7 t
64. }
    5 N( B- L7 v% m) J3 r% {3 k; t* @
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    6 K! O, @* t. V8 W, r4 V
68. char   buffer[10240];
    
69. 
    ; \+ ^' ?" a1 E3 g6 d
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    6 M( D  Y/ T, h1 Q
73. 
    : G' b! R1 y* f) t! G
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    " o0 M3 [6 m" C3 g' U& O( r: X/ C: ~
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    ' E. n9 c' l, a- z1 T" ]9 _* E6 r
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    # N3 r3 X( S4 H) M# p
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    ' o! D# d4 S/ N
82. 
    - N4 t; @) s# J# O! b' V8 h! S
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    * R, b0 A% H8 M
84. {
    & k' a/ Q1 d- _6 V1 R; r0 N/ r7 M4 I
85. int   pos   =   0;
    
86. 
    + i* k5 W* Q, |! m! x7 `
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    0 j6 E. O- g) J. @
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    ' j. h' R4 K! u6 m. x9 I! f5 a, U
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    % `" j; H$ D; ?
96. return   true;
    
97. }
    & Z) c  v! k) m* t
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     $ B( W1 K+ Q& h! M- q5 q  N" M6 [' e
101. CString   startTag   =   ' < '   +   name   +   '> ';
     * z, g  \. b/ N+ G9 K; X
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     + j8 x8 d3 l8 e) M
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     & \5 a7 Q) ^% `9 q8 z# G# {0 z
109. if   (posStart> =posEnd)   return   CString();
     , u+ [9 e7 }* K4 l
110. 
     / I( t* l. S; G. T; A! M9 K
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     * ~; Z$ u- g# N6 t' |- W- Y% w! B
112. }
     " x) N5 |, C6 x3 l. C
113. 
     % `' w' i  r1 e7 O! F, ]8 I+ B
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     7 R3 d$ E+ E; Q$ @4 ]
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     ; `/ f, T: R3 V
119. }
     - f( g1 i" Q; i
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     9 w3 c! E# i' ~% S' Z& f* P- @/ m$ B
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     * d5 r$ A9 @2 X9 ?
129. 
     3 n- ?: E: S. j3 P& ?
130. m_Mappings.RemoveAll();
     9 ]7 t- k, z: `
131. }
     
132. 
     
133. 
     % ~8 @/ `/ M. }0 \) c7 S
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     6 I4 N$ m3 I* ]) U4 `2 d8 J6 l
136. if(version <=0)version   =   1;
     3 R' n: q$ I4 P7 K6 W6 c
137. m_version   =   version;
     $ W2 T& ?* b! ^. H! T
138. 
     1 A1 |6 x6 M$ b
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     5 \5 v: k$ B: G' V/ S
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     ( O7 `/ a1 P9 f0 \' K7 o' T
144. };
     % a& d$ g( q( p. b' N5 E( b
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     . F" J$ ^' O' i# c& D+ v0 J
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     4 Y9 r' k" M, n; Y2 [
150. int   rlen   =   0;
     " W- J* x" i& n0 R* e
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     9 y( y  B' S! k% y
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);
     9 d7 m* b/ W- E4 G6 X" l% }2 i
155. CString   request;
     / e' p2 t$ Y0 H0 S3 n
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);
     2 d1 p; L+ A5 [# Q
159. }
     
160. }
     
161. 
     ) M6 B/ F! {1 F8 _: s* v
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     & o: W! C& f* n: v/ @+ c
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     . W% q- y2 {% ?$ ~( `) j; l
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     4 l. ?' g! E  u2 `+ J. `
170. CString   result;
     / I! ?8 h0 i8 j) H+ [
171. if   (!parseHTTPResponse(response,   result))   return   false;
     5 m, W8 s# z) S9 S/ R0 {, d8 S
172. 
     ; j. V+ T8 L+ B7 _1 @
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)   {
     ! N% U) L8 q3 K& ?
176. for   (int   pos   =   0;;)   {
     ) w* `( ^& m8 n0 K% k$ ]$ f+ \1 k: w
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     - Q! F# n# @7 E2 `! X/ `7 }. ~
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     3 s. H4 Z0 p  f# q# k0 @
180. name.MakeUpper();
     ' s" W6 t: f4 s; x$ K2 ?( g
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     3 F+ E  w# h# u$ u# T1 R9 [
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     1 e+ A$ s) V8 s" Z- c* f  f$ P
189. }
     
190. }
     $ |& q) T0 O1 W, [, v' E6 [2 \6 z% U
191. closesocket(s);
     
192. 
     
193. return   false;
     # w4 q' s# y$ Y- q- A' q
194. }
     ; K/ E8 X5 m/ v% p1 i. b6 F

复制代码

天云上人

以下有关upnp的接口来自emule，
" p5 {3 N7 {- D/ |
; S9 ]/ l9 _6 a' ^. {2 h/ d
///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
4 @+ Y! w! q$ p0 s0 g4 V0 C3 R/ N
/ F$ Z. F* w* ?7 y, b
% v$ P5 ]( r) k) v" D" r1 A! u#pragma once
#include <exception>
+ {) s) E% |* A1 f
9 ^& R  e6 d6 D1 s( T
  enum TRISTATE{
. m' D6 P% l% i! K# f+ c# y( E        TRIS_FALSE,
        TRIS_UNKNOWN,
2 n9 }9 c0 B5 ^& }7 Q/ `        TRIS_TRUE
};


; S  f% }4 x$ A9 e% I% E5 Y% g5 C& ienum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
, z* r/ l8 Q3 v! S        UPNP_IMPL_NONE /*last*/
( u- \3 a7 h. t4 i2 x" H3 D2 _};

& P+ v; ]7 B  R5 S2 v+ h7 O

, N1 P6 k3 z8 U( U# t( ^; D# b( r$ Q
class CUPnPImpl
{
public:
% G1 G# {8 Q+ h1 u        CUPnPImpl();
        virtual ~CUPnPImpl();
/ I% R. `' W6 T        struct UPnPError : std::exception {};
% z7 w& |7 A  s2 z# n, F        enum {
, y# ]8 q2 ~' U( S* i                UPNP_OK,
/ m+ b* m' D" y' f  K& `9 b; M6 e% o                UPNP_FAILED,
+ U( V& G# T' ~4 e! U                UPNP_TIMEOUT
2 y) F( M1 i7 M. n4 T        };

" ^! F0 Y0 ?6 B
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
4 z* d% h, ^6 G. M* w        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
4 A$ v2 {4 H0 k1 {' M        virtual bool        IsReady() = 0;
! K+ ~5 f) L: c* o, X- ^" \/ r        virtual int                GetImplementationID() = 0;
# `, @& S" H& H  N6 Y8 a7 _       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
8 _; w$ g6 p0 o; `' i( ?

. j8 ?. j; P- W: U  d: l2 p        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
4 P* a- c5 N+ _' g3 V        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
8 v* K/ J. ?2 {1 X! @# _, ]/ R        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
# y# \' V2 P3 _* Z. b
1 }2 g5 @. ^  ]7 H9 p
! U8 s1 a1 }7 f! e( b! P$ H// Implementation
5 `" _' U' _- Bprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
3 S& M# E" q1 O3 l$ B& j( U/ ^        uint16                                m_nTCPPort;
/ F4 }" H/ E8 C5 N% T        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
' a2 r9 p. T! a2 O, Y

private:
7 G  `9 ^2 D& T" s: W3 l5 g        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
% p4 ]" }, t. H, d; f0 S' O& y9 W

};
6 c/ r3 I: y6 b5 U7 {; b+ }/ K
( ~1 x- H8 W) o$ g, ^# z
+ Y& s8 u( ?: ^' s) p( Y5 O4 ]// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
# f2 l& o; Z4 {7 s9 S# b; O{
/ l* y! }+ t6 t7 [+ Q3 y+ |5 Qpublic:
) p& u7 _, L7 U        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
0 a6 c, h+ U; j! L; @5 }        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
3 T" A* m& ]% s1 D: J* g( N" V        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
! Z0 g* }  e' g) c+ F
9 t% O2 b) @8 V! Z6 O) a6 R
$ ]3 p: z# t# P5 F3 k/////////////////////////////////////
( F' |# E# V8 {0 G* h//下面是使用windows操作系统自带的UPNP功能的子类
3 N  j* T6 m2 ?2 t, b/ H5 \/ ?
: F% o) L# ]  R1 q! h$ k( Z- Z7 F. W
#pragma once
#pragma warning( disable: 4355 )
1 ?$ B% b) h  b# ~9 [

3 S1 I/ n4 ^) h: S# f7 J1 d* u' g#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
: Z4 }: B# R1 ~: p7 f#include <comdef.h>
7 {5 \2 y  r/ v' y#include <winsvc.h>


#include <vector>
#include <exception>
#include <functional>

! x8 H* T1 B8 w, T# P/ k$ p8 j1 V


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;
6 U9 j2 z0 W0 }' p! I+ O! g: otypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
& D/ a- h# d% |6 @; |' {% G# I& btypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
: y/ h4 q+ W* I* k2 K  x; Ztypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


typedef DWORD (WINAPI* TGetBestInterface) (
* y6 {& D9 J- S* O* V, i  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
% g. `+ |: A" J);


! ^( q# j* y3 W2 b. Mtypedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  }! W, u* S  W% p$ d  c! ^4 Y  z( T  PULONG pdwSize,
( |% w6 E4 W4 k; i  BOOL bOrder
! [6 K2 Q8 |0 ~8 A3 d; i, K) j$ p6 x);

8 d: r9 o; N! P! C
8 f: L  n  O) }typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
3 ~" X% a8 H4 w/ i, \);

3 \8 V. I5 H" q4 o
CString translateUPnPResult(HRESULT hr);
# m6 V5 c  ~) ]' |% Z3 ]6 }HRESULT UPnPMessage(HRESULT hr);
8 `% R: N& `% N6 E
% X* f- v4 o$ N4 o
class CUPnPImplWinServ: public CUPnPImpl
3 c. l) W! j. u! ^4 t4 W; z{
, X, k3 M* e- ~$ R9 e        friend class CDeviceFinderCallback;
! v# _" \/ }! _# Y; ?, [6 n2 @+ J        friend class CServiceCallback;
// Construction
public:
- @/ A+ X0 h% }  S+ [        virtual ~CUPnPImplWinServ();
1 k: e* o9 h5 F7 n        CUPnPImplWinServ();
+ }- v0 N9 d# N' J
; v$ w/ v5 K' r: ]
- k& J' H. {2 p( ~        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
5 t' _. B6 x" u7 R3 F  R, ?        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

" M! L' ?  v! e- i5 y" ?
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
1 I- I& U4 m# ^$ r- s  t' H+ ^        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
$ d8 m% `; f3 U        virtual bool        CheckAndRefresh()                                                                                { return false; };


protected:
: F5 K% X% R- P, J        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
5 _! A) R& X4 `& {  @4 }        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
/ F: t, M, [- T) \# G        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
8 Z8 q/ C( K; K" e, Q& k# h; h+ a+ l        void        Init();

& A; Q, z" f; g6 M: g6 i
' x0 E# a( `1 _+ D        inline bool IsAsyncFindRunning()
% G" U8 Q" z  {! c2 C) N        {
5 `6 n5 i: w" m0 S7 X! B                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
                MSG msg;
. i/ w- l) j1 \9 }- Q4 O- `                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
4 {. y0 U) e3 b) U3 X; ?                {
                        TranslateMessage( &msg );
+ n+ G2 u8 |2 ^; S* i7 }7 N3 w: g3 S9 I                        DispatchMessage( &msg );
                }
4 [; g! o) m# {0 L                return m_bAsyncFindRunning;
        }
) t" h0 e3 A/ v5 c
% W7 [. O5 H) E6 {5 ]
        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
/ t7 P3 |# ^2 Y. z        // API functions
0 i2 ?/ m% B' F& T% n( s" J        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
# C: @8 x' Y& j' ]% e) k4 p) F, ?        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
2 s! s9 r5 y; k7 m+ _) S        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
" P. |- O* e4 n5 Q  r& d0 G+ D        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
4 H& k# z, X# l+ u6 C        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
! M. }& O! x& X3 O! D# o- ^* h6 g

' m% ~+ F3 R1 m  l+ d% z5 w8 }; g        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;
7 K% Z  |# O4 K0 \
" s+ |5 d: x, E" {8 k4 M
' _( |- A1 B8 @' J& r* a        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
8 U! f* |4 m+ t                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
2 s+ [' U8 ?; s                {
0 @* a+ P) W1 a- {  {& g7 p                        CComBSTR deviceName;
. E6 J& K0 i- f# k( r& ?                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
; e( D" s* Q  K" C) b! I

& q3 B' J7 B. Q& O! ?% s                        if ( FAILED( hr ) )
4 T$ Q8 l# L+ S) X: ^8 D4 K# G                                return UPnPMessage( hr ), false;


1 w- q/ H, ~4 z; V                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
        };
, v- d' d: s7 G/ ]- C% O       
- V0 T) W9 [& B3 C' ^1 S) w        void        ProcessAsyncFind(CComBSTR bsSearchType);
' n* d7 H, ^+ G        HRESULT        GetDeviceServices(DevicePointer pDevice);
3 Y/ O% \8 Z& a2 Q        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
( g4 f& A3 D7 ]1 S3 C; g        void        CreatePortMappings(ServicePointer pService);
& v" H$ L' x4 E        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
9 q" E6 q4 d8 |+ _; H        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
! K; U/ `/ h7 a9 w) K/ B                LPCTSTR pszInArgString, CString& strResult);
9 {3 I( \" g- v3 @- _        void        StopUPnPService();
- q( a2 ~& g' }2 Q6 m# @) W
' j, x6 m1 n4 O! S( K/ \: d
) w6 F( @# |1 l; H        // Utility functions
/ @" ~& m6 h8 u* t9 C2 C        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
$ L" L, C. F5 ^+ S        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);


6 j: i" y: n+ R. B& g// Private members
+ G' K6 X4 d! U$ O& p! U$ iprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
! t: b# p# ^! y# X        std::vector< DevicePointer >  m_pDevices;
( |  P0 D+ `9 o: u+ x        std::vector< ServicePointer > m_pServices;
6 Z  p' O- R- g5 C2 ^        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;


  E: p0 a! Z7 B5 k3 t# p        LONG        m_nAsyncFindHandle;
) v9 b3 P: G. p6 D' `( X" d        bool        m_bCOM;
4 l, [$ y! k2 e: J% N0 V        bool        m_bPortIsFree;
        CString m_sLocalIP;
9 y5 \2 W8 `: r" I- M% R: ?0 |8 w3 L        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
* d3 w1 v7 \3 S7 i        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
8 h) E! e* e' h8 E, y        HMODULE        m_hIPHLPAPI_DLL;
" f. K* |" D. U) F3 \% x        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
( X8 O' ~! d, C6 l. U        bool        m_bDisableWANPPPSetup;

$ |4 B) w: F; x3 a
};

6 U- e+ Z( n  {7 s' ^# t
, ]# W# U! {% n+ T2 r. I' b// DeviceFinder Callback
+ y! D7 ~$ A) T$ s2 ?class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
* |1 B. B$ t6 E0 N2 I8 B0 M6 X        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
* H$ ]! S% A* I8 \7 S( w0 C2 k        { m_lRefCount = 0; }
1 v! f& W2 P  A! P
/ O* M+ N* v" U; E/ q* a4 T
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
* @7 l. H$ a4 Q
" g6 U3 u" B# _) S
// implementation
private:
9 P2 ]$ b1 B+ U4 |* p; e4 a. Z! Y2 H        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
; A; D$ I0 J, s+ {

private:
) z& n" Q2 ?9 J! b" i        CUPnPImplWinServ& m_instance;
$ N  q0 V4 h2 k        LONG m_lRefCount;
, y3 |, |% P) a. q3 \; j+ W4 H2 L};
3 q: h0 Q3 y6 a, k* u6 T& T

) h4 _9 D* N& ?9 K% X. C// Service Callback
; }  y. m0 V; Dclass CServiceCallback
        : public IUPnPServiceCallback
{
public:
" q7 g+ \1 X: F* m        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
  w6 C& E% b; W: v   
9 |) s1 i4 D% d, G% x   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
9 o; d. f) {/ ]! b$ u2 |; S   STDMETHODIMP_(ULONG) Release();
) ]6 i# S7 i2 m
' t9 ?7 v9 M9 E# l+ M
// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
2 l: Y& u9 `" B. ?/ C: Q9 N        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
/ D, X8 a4 Z& I5 r- H+ [  r

private:
( @4 o9 c* f# k2 n& |        CUPnPImplWinServ& m_instance;
# y" X( f, C: C$ l( F7 \2 f        LONG m_lRefCount;
2 F/ ], ?, }2 ?};

$ d5 w8 z  U' j7 F2 {1 }
/ j; b/ v% r! e' N/ M# o* t/////////////////////////////////////////////////


+ D  g5 [- l7 P使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
. w9 s7 U/ U4 f/ ^5 u/ i- NCUPnPImpl::DeletePorts删除端口映射.