UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   2 ]6 w$ b2 U# g2 _2 \0 e- ?
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   % w- d; i' f5 d+ z, w* c2 T- U
8. class   MyUPnP
   
9. {
   2 X  z4 _2 d: z
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    1 w9 _4 E! K4 g1 \3 H# X3 v
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
    / l, a2 w/ [) H! e% D
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    / _) g. {% n7 c+ {4 K* t; L
17. }   UPNPNAT_RETURN;
    
18. 
    + x1 R( w7 H* @. A1 p5 r& j4 }- [
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    3 v! N: l! u0 }2 s
22. }   UPNPNAT_PROTOCOL;
    # U# I! D" D( X+ q# @; r/ V# Y) P: J
23. 
    
24. typedef   struct{
    " ^  O2 c6 b, q. f
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    6 ^1 }2 i% ~8 z8 M0 P
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    / t$ n: Y0 V# y2 C- I
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    8 b+ a6 S/ L/ F, [1 T
36. void   clearNATPortMapping();
    7 ?+ ~( Z/ Z. d9 k1 n# j2 |+ ]3 r9 O5 v
37. 
    3 B/ M8 G. s6 P# H( X7 k
38. CString GetLastError();
    % `$ B: R5 [8 W  i! [
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    " L5 U4 k- {; R% ]0 S* K
41. bool IsLANIP(WORD   nIP);
    
42. 
    9 t4 h+ j6 j, g5 }
43. protected:
    / F7 H) ~- m& T. \6 F9 {
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    + a+ I, f2 y3 p; W# D
48.       const   CString&   descri,   const   CString&   type);
    , m& A! X7 j: B) i/ D
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    ; Z" Z( ^9 ?- E
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    - g$ ]3 `; J2 i
52. 
    
53. bool Search(int   version=1);
    - g5 L& U4 `8 {( j" b  |) ?" Z4 u
54. bool GetDescription();
    8 x+ a) S. a" o
55. CString GetProperty(const   CString&   name,   CString&   response);
    2 r. a  W$ K( C, c8 w' i
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    - z, H; t- z% g/ r2 L' E$ s
60. CString m_devicename;
    4 ]" i, a  a* g' ~" \
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    ) ?/ z0 M2 Q3 g" B
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
      _/ U6 m( p1 @+ {
68. 
    0 x: l5 F3 j+ @' y0 U& A2 O; [
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    2 }- V4 U1 |; u& F
71. 
    & Q* R$ j1 J$ P, I7 a
72. CString m_slocalIP;
    $ Q+ K5 E% ?1 u0 r
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    
76. bool isSearched;
    2 h2 y& z4 ^% [
77. };
    # \/ @9 c+ d* A% }! ~# t8 A) Q
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   * U9 N6 V; R$ R' c" n* ^
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   . g: y/ v! U! Q/ P3 t
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    5 ]6 V3 q4 ?/ k9 T! Z9 V6 j+ u
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    - n/ e' ^$ U! J6 S
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    7 y: j7 y. E$ S7 o3 r: R/ S
19. 
    
20. s.Format(_T( "%d "),   i);
    & I& G5 Y, W  G6 y% c
21. 
    % U: R3 _) M$ q. i: F. O& z
22. return   s;
    * p. M+ Y+ g# s. d+ R
23. }
    4 G- g8 q& @, `' W7 v- o. m- ?
24. 
    9 T2 j, Y' l6 e
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    ( V. p* j  u' g4 L( t( B4 B: {) \
26. {
    : y* L; H8 S( J/ Y/ P
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    . O- R/ V3 f" D) l
28. }
    6 G$ t) t+ D- K4 |( [: P
29. 
    * C2 H; a( ]* w/ X
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    0 Z9 ]5 L1 M+ p2 L5 P% i
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    ) i  _* s7 D6 h8 q. Y
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    * r; H+ M5 S! v
38. 
    
39. const   CStringA   sa(request);
    1 q0 J. }: E, v0 c. k! H% x+ x) k
40. int   length   =   sa.GetLength();
    9 J1 @! _6 Z3 L$ R1 @' _) y# V
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    / ~4 w! n! T3 y7 R# @
43. uint32   ip   =   inet_addr(CStringA(addr));
    , E; X3 V) w+ I; p( I
44. struct   sockaddr_in   sockaddr;
    & k& _) q% e% R
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    : S2 h$ ?$ O8 M$ Y, u
47. sockaddr.sin_port   =   htons(port);
    ! M- g' ?2 ]! @
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    & p! H4 r  f7 M# Y
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    5 G* I" ]$ i2 w( M
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    4 D" N5 j+ x! z- P
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    2 p, C' {* }1 j, t1 t/ _
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    9 U+ }# q, G! v. z# s
59. if   (!rlen)   return   false;
    & p2 ^: R: N  ?9 O0 G$ T% w
60. 
    8 V! A5 _0 S2 t- v; W
61. response   =   CString(CStringA(buffer,   rlen));
    ) F8 k$ p: L; N
62. 
    
63. return   true;
    6 v- c" F( ]4 l+ ^
64. }
    
65. 
    $ ?. B9 v6 j* W6 F" S
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    " E$ _2 h: b( D+ \3 f" D4 D7 H
68. char   buffer[10240];
    ! D$ L4 }" [8 U8 ~7 B
69. 
    
70. const   CStringA   sa(request);
    : U9 z6 N& u) s: O0 z
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    9 n! J- p& J# u+ X* C4 \  |2 ^
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    % K& I" j9 T$ }
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    7 Z0 Y9 s8 r  Z% \! E2 v
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    0 C4 [/ Y6 A9 r: O: @9 _  Z
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    0 W0 ^  b3 O7 I% u# Q
84. {
      v& j9 z& V3 ~
85. int   pos   =   0;
    
86. 
    ; U9 j$ D; m9 f* e0 U
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    . p; q4 d8 r6 F2 r9 c! @
89. result   =   response;
    - Q& F- f5 o( o
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    2 h; j( ]4 W, T
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. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     6 L4 a- M9 F# V2 |" h2 R, ^* ]
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     7 x& [# H% \) R
110. 
     ( R; z( `1 X( |/ p% b
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     4 B4 b) ^# B7 z+ x1 q
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     - D# H) ^2 Y/ Y% a& v3 V0 ]1 H
119. }
     ) v8 ?( F% a+ J& x6 f: y  ^
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     1 w5 M! U  B: P- T% Z
125. while(pos){
     / T; D3 D6 @9 F4 D( }
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     
133. 
     7 n4 y! ?# A" _( M
134. bool   MyUPnP::InternalSearch(int   version)
     2 Y5 Z+ Y& p, {4 b1 w3 a( E; J
135. {
     
136. if(version <=0)version   =   1;
     : p; o; u! j  Q" H8 b( s8 }
137. m_version   =   version;
     8 W1 P% X4 I/ J$ g8 R5 W" u4 O% j
138. 
     
139. #define   NUMBEROFDEVICES 2
     ' N2 f$ B9 a* K- \2 o% S
140. CString   devices[][2]   =   {
     ' c" R8 i6 D& N, h1 d" a8 D
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     # t$ T3 b7 j% N8 j) \
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     5 u( x  ]2 b: r: O4 b
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
150. int   rlen   =   0;
     . D1 J3 B# y$ g1 v0 w! c
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     , r3 z3 H$ W0 L" [6 H+ I
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     ' G' U/ o7 Y7 p  o; s1 j1 [8 f
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     & P9 q! ^3 H' }4 o
155. CString   request;
     
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     
157. 6,   m_name);
     . D, {9 P& R# k! V
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     " U% ^3 r1 r1 d
159. }
     
160. }
     7 O% h2 Z. R" A) T/ I
161. 
     $ T# Z6 C, v( o& g) K9 @& d  E+ O; A
162. Sleep(10);
     
163. 
     / P5 K3 Q% V- r: j! V. g, j* y
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     ; c( q) I% @& I* l
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     " d. t( c+ y& ~: t8 }& B
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     / N" @9 C0 q' c- T5 `' ?
176. for   (int   pos   =   0;;)   {
     4 z+ A' D) R+ U
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     . A0 ?+ c) w) B1 S' u
179. CString   name   =   line.Mid(0,   9);
       |+ G$ T* F+ G! m7 a$ L" E
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     ( U% ?, i- G$ D5 `6 e
183. m_description   =   line;
     
184. m_description.Trim();
     / r- V: f. Q' j  h3 d5 C
185. return   GetDescription();
     
186. }
     6 N7 L4 J1 P* M# B. q
187. }
     
188. }
     
189. }
     , a! m' U, X- r, n, N8 W6 _
190. }
     
191. closesocket(s);
     
192. 
     
193. return   false;
     
194. }
     9 d5 C, O/ @1 g9 J! e  w

复制代码

天云上人

以下有关upnp的接口来自emule，
* ?8 t$ ?; y* O1 K
' X- D/ p: S  N1 G* u
///////////////////////////////////////////
" T" f' O" P1 F- n4 k//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
! j# ~5 D/ I/ h$ A2 P5 n2 K

#pragma once
( d% u. s2 B/ b" |#include <exception>
) [/ W' A! e6 K: \, \' W

  enum TRISTATE{
        TRIS_FALSE,
. K" \2 g1 v+ f/ H$ A" d- e  {* b; m        TRIS_UNKNOWN,
1 F7 I* g! D* N5 k+ P        TRIS_TRUE
};


enum UPNP_IMPLEMENTATION{
+ F% U1 D+ C& a' v* C2 R" ]        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
- \! d$ V3 Q( p+ V        UPNP_IMPL_NONE /*last*/
: _" ?7 Z9 R% \};


6 @7 v% L! l0 _( J$ s) H* ^

class CUPnPImpl
{
public:
        CUPnPImpl();
8 R9 V. j- `; q- B' K  I, z        virtual ~CUPnPImpl();
0 v" m4 F9 l5 c5 x        struct UPnPError : std::exception {};
        enum {
" C$ O* l2 ?+ t( m9 X                UPNP_OK,
                UPNP_FAILED,
1 u- x; |; f% c( B                UPNP_TIMEOUT
! O% X( j& p" ^/ I7 T0 L        };

; d/ ^) g7 f% [- V/ H" C
/ A1 i( L2 {, `' R7 W2 u- B/ o        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
; u! H. j( C. q0 L, |        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
! y8 S9 X# I  `5 e- |- U7 D        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

' @/ }) A# B2 v7 A( _
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
3 A6 ?2 m1 _8 S        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
# ?; K- a# r0 e+ d        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
/ J5 E* ]3 Z. L
' M# y- e% n4 D3 \( X9 B2 c
& {0 z5 `+ Q6 ]$ }; }5 Y// Implementation
  d. c/ T0 S% S# B) h0 p+ aprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
# C7 L' J, u0 O5 }        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
5 {* K6 P  C* F

" Q% `# P1 u' E% k8 T4 Wprivate:
8 c  n+ U2 W: \4 h7 l; [        HWND        m_hResultMessageWindow;
; Y0 ^& @) i* M* V1 F' D% V4 v        UINT        m_nResultMessageID;

/ v4 B9 E( a! D* \' L6 B7 _8 @
};


5 s; o& _1 K8 x6 Y* [  _8 J& T// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
9 W. Y- M" M7 f+ |2 `* {+ ~, N' p1 g& lpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
. H8 B0 Q! H- k. R        virtual void        StopAsyncFind()                                                                                        { }
- E  J/ `+ F& |5 B        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
0 y- K2 Y& z/ r0 x};
5 }* t& H5 u6 ]
7 Q# S% m3 H, q9 @
/////////////////////////////////////
5 C8 t9 j. u# e& C- e2 ^; \//下面是使用windows操作系统自带的UPNP功能的子类


- G# l1 g- _0 R#pragma once
#pragma warning( disable: 4355 )

3 v* ^, O8 _! z( N; M
#include "UPnPImpl.h"
( P( o' d/ O( l# ], E#include <upnp.h>
% x( Z: p, Y" N: t; W#include <iphlpapi.h>
  w: f$ P0 R: j% M# [+ Q* s- S/ W#include <comdef.h>
' e0 ^1 w1 a7 e8 |! E#include <winsvc.h>


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



% I% R: Y. [$ |9 l
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
$ ]- E$ J" r# {# Y) U, J% htypedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
( v: N- p% z* \8 S7 @typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
3 Z/ y; I) N! h% [) b, Rtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
" B, J( g1 k1 }+ ctypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
* v- t+ x0 U( W% r/ {) _/ ~0 i0 A

typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
. k' C7 y" G5 s0 }& R  PDWORD pdwBestIfIndex
);

) z6 x' m2 e7 N8 k+ U1 g
: t6 m) q, }) ctypedef DWORD (WINAPI* TGetIpAddrTable) (
2 N, N) p) m4 x* ~! @5 t6 X! k  PMIB_IPADDRTABLE pIpAddrTable,
! z' T. M7 x  v9 ~  PULONG pdwSize,
  BOOL bOrder
% w( ?- P1 t; O1 _);
# K0 k6 F. p' \( q2 n
6 d: d7 q; e$ J/ c- a
/ f. W, I6 [) ]: G. A# Q2 ~' ]typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
: |9 z0 R5 p7 o1 l7 Q$ y! K);


4 X  p( z( i7 V; X0 I) Z/ Y* i, FCString translateUPnPResult(HRESULT hr);
' h; j" a/ k* p! M7 e  S- J) v& V2 UHRESULT UPnPMessage(HRESULT hr);


class CUPnPImplWinServ: public CUPnPImpl
; j4 I7 l3 O3 W{
1 o9 B: T3 U* J7 D& {: Q9 Y8 z        friend class CDeviceFinderCallback;
- E6 F0 L& V- z+ p        friend class CServiceCallback;
0 V8 ~! T2 s; C0 @/ V// Construction
public:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();

$ Y3 A" C4 G$ B
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
; T- H: z8 R7 s  _$ ]" @9 l. T, h# [        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
- J2 h6 A. U* v* |/ _/ c

$ L% ^- X: L8 }# ^2 B) z        // 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
6 G; [7 S) _. p        virtual bool        CheckAndRefresh()                                                                                { return false; };


protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
) A; q# |% x; O3 U  }0 J0 l- h        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
+ |& L- H3 g" G: Q, y3 S* C        void        Init();


        inline bool IsAsyncFindRunning()
# j4 [7 x. a4 P/ z        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
. R3 s* O: Y6 k, {. o" g: K                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
; W; g- i' a; }; B1 m. j. v9 ~% b& W0 e                        m_bAsyncFindRunning = false;
                }
                MSG msg;
6 U' Q/ n+ ]) i( k& h                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
$ {4 x+ J3 t- s! M$ F$ L7 I: |/ v. v" j                }
2 f+ E0 J; o4 d6 S( J2 C& L% {' j7 t                return m_bAsyncFindRunning;
8 G* N# P: a2 {1 F        }
: j9 t& d& J% u% N# |# @7 k) ^) `

        TRISTATE                        m_bUPnPDeviceConnected;


# j* @/ z, G; K/ e4 H// Implementation
5 n8 G( N: k; V# g2 S. _" K8 {8 P        // API functions
( _% Y9 f! L6 x5 l        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
3 `$ n- N, a) k) i& J        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);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
, v6 T+ W% r/ f: S

        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
; K( Q$ X  u  j+ z  w        struct FindDevice : std::unary_function< DevicePointer, bool >
4 P7 ]6 P3 R. T, M        {
& ]' M- u9 q' |% f( X                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
$ |6 ]! D- \5 m                {
& t+ v  o; x4 q: F9 L5 ~: c# w                        CComBSTR deviceName;
! R7 b: ^6 g( T) @! ?' T                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

- `, I# H8 i- K+ n
                        if ( FAILED( hr ) )
! R' R( l2 I* v6 {; V9 Q                                return UPnPMessage( hr ), false;

' [6 R. W: ?9 D1 g: f9 {
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
# K3 m6 ?9 i) w5 W0 J                }
                CComBSTR m_udn;
& }; k$ d! K8 w2 a* v4 Z        };
       
* V, ?; \! N: M. F/ v9 M+ k        void        ProcessAsyncFind(CComBSTR bsSearchType);
; R+ ~2 t& l" [        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
$ h$ [* {" l, R        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
4 o7 C  G; O5 ?5 w3 k5 s        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
( l, A0 f1 u2 T& X4 S                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
' I5 i& l" c* r3 i; N

& o& s/ [3 z$ m2 O# A2 A8 u        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        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);


// Private members
private:
; b- n# `) f- t4 c  Z        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
: B5 W' y8 Z6 A        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
. {) A# B( k9 |  f# U# m

        LONG        m_nAsyncFindHandle;
3 J) P" K1 D* y* [/ c) E* O        bool        m_bCOM;
+ h3 I0 u" e1 P' s7 e        bool        m_bPortIsFree;
        CString m_sLocalIP;
* S* l* B/ N" ^8 Z+ V, x4 k) H, U        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
- a2 R$ x6 a. e' }0 I        bool        m_bSecondTry;
; H; J2 ~9 s% h0 I- n        bool        m_bServiceStartedByEmule;
. ]% q$ S/ S2 Z; V        bool        m_bDisableWANIPSetup;
6 _3 W  L3 V3 ^, w+ \1 o        bool        m_bDisableWANPPPSetup;

) {( `; A# ?* H
# Q4 T; [3 [- c9 [; }: G};
+ b- i+ Y! ^* L1 ?, ]( t
8 Z% d; |( y. m
+ r6 ]% H/ g3 ]# k- G' {) _( f6 z// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
8 Z5 a! i& u! C6 wpublic:
/ j9 a$ [; V& `. J  R# @% {" m. }        CDeviceFinderCallback(CUPnPImplWinServ& instance)
* ^3 G" V7 U6 K3 ^8 e                : m_instance( instance )
        { m_lRefCount = 0; }
' \1 ]7 n6 N4 H& g' i

   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
7 x& V9 Z: _+ Z0 ]   STDMETHODIMP_(ULONG) Release();
& H  K& _9 ^* {, D

7 N, }* m0 F+ Z1 w// implementation
, k! {& z! w) S( g' d* u+ `private:
, k- ?2 @0 T5 F        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
0 T1 T' R' S5 k8 m5 G. ?" @        HRESULT __stdcall SearchComplete(LONG nFindData);


( V  `$ P$ @& [& E5 a" Fprivate:
        CUPnPImplWinServ& m_instance;
. u6 W" o8 [6 E4 I$ U6 k$ H        LONG m_lRefCount;
};
' H+ N& ^: z* R& Q8 v4 g# r
/ Y$ d/ s! R7 {+ b
// Service Callback
6 _/ R1 |  D$ a0 h2 f8 V$ P. Qclass CServiceCallback
& g; S$ y/ `" X  P        : public IUPnPServiceCallback
{
% R6 q) B2 [( Jpublic:
. }/ }, J4 r0 `        CServiceCallback(CUPnPImplWinServ& instance)
' [5 n' O) e, ^2 j* o                : m_instance( instance )
/ e( ^% w$ I" r$ S% C/ _        { m_lRefCount = 0; }
: j' t5 q1 D/ F! D   
9 F8 T- N8 p& z+ q3 ]2 c; }- ~5 Y   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
$ K/ ]* T  n' N6 @$ m   STDMETHODIMP_(ULONG) Release();
, D# `0 G" K2 b8 Y3 L- \

& I! C5 a& m, G: h! I. y2 `: O// implementation
private:
9 A& A8 [: R9 z" y, w2 F        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
" r) I3 H; n% L- m+ G/ t) e        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
' k0 Q# e- [: k$ Q' ]+ ?$ I

+ w* I4 N% ^- t/ F6 Z2 ~private:
" k' {& [8 A4 G4 s        CUPnPImplWinServ& m_instance;
% S1 f5 f. S5 t0 l3 _% D- q        LONG m_lRefCount;
8 d, Q2 F& H* Q/ F$ w5 ?};

  \, v4 m9 D7 S$ ]/ ?, ~
/////////////////////////////////////////////////


) j7 `. q8 Q! T: f' c$ [使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.