UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   % I. D2 i7 G/ C" d, Z" {
5. 
   7 U' f9 v7 V2 n% q$ e3 i
6. typedef   unsigned   long   ulong;
   ! N5 m) m5 _' ]& z- z8 C5 {
7. 
   % B. t4 ?7 @3 y: }& X3 j, E8 n
8. class   MyUPnP
   
9. {
   : T. ]# r$ N- y  D- L; ~' H
10. public:
    
11. typedef   enum{
    ! X4 C  w4 H6 K9 b7 N9 V5 @' I: O$ z
12. UNAT_OK, //   Successfull
    
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;
    4 w6 t$ @  N: d" o  }
18. 
    
19. typedef   enum{
    $ \+ S% R+ k( r  ~9 w! m& n
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    ) n/ W, c  Q5 u- u" a* }$ n
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    & J+ q7 d' q! G+ ~( z! B% B  d
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
    2 @5 N( f  m. ]1 ^6 j; B* t
29. }   UPNPNAT_MAPPING;
    : p" k4 r- J! k& b. j
30. 
    
31. MyUPnP();
    # `8 \5 h! ?$ g! b! L- \
32. ~MyUPnP();
    . W) j5 J: W" b' U( V9 ^9 `
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    6 d& }' w4 d" f0 {& l1 }! `
36. void   clearNATPortMapping();
    ; p$ _* [3 g; M4 A6 f0 o$ y1 d
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
      ^2 L  d/ C/ G
41. bool IsLANIP(WORD   nIP);
    ( }3 a$ [/ r  f; L
42. 
      y* S, `) }) x& w  I' N, |
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    / w, f" J9 D: Z
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    . C, O8 }4 F3 {, B
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    ; O: Y! a/ U; E# a0 d
54. bool GetDescription();
      E7 b# e2 A2 p; B2 E- l6 _
55. CString GetProperty(const   CString&   name,   CString&   response);
    % [# E( n. R8 j0 b0 D, D
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);
    
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    ' A' J0 f: B/ K2 R& H7 O6 w2 H, `% i
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    9 L7 Z; A; F4 K) @1 q+ G+ s
66. CString m_modelname;
    ! U, d' M9 ~) [: l- d: n5 q
67. int m_version;
    0 u2 C9 D. }) h3 Z
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    8 a! K6 m& N7 n9 j1 e
72. CString m_slocalIP;
    
73. CString m_slastError;
    ( o* K: m" Z8 k4 S$ K
74. WORD m_uLocalIP;
    
75. 
    $ D1 s& Z! q) b9 t( N
76. bool isSearched;
    1 |2 V6 v  z: r1 a6 Y5 f* j7 M' M
77. };
    2 e% @# o( i: K. v& ?" g
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   1 W4 ~7 p8 V* K' N/ `0 t% Y
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   0 d- C# d1 P! ~' r
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   : ?- ~' j1 U1 w9 C# l  ^
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    2 R; c* |; A; O. y+ @* Y& e
11. 
    : p8 t  n3 [2 i
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ' j. m: V& T( R* x
13. static   const   int UPNPPORT   =   1900;
    " }0 _7 s; i. v9 g: q
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    4 [8 v+ H3 ~3 h4 u+ [
17. {
    , u6 Y$ m$ E: t" [
18. CString   s;
    
19. 
    6 w9 R, O# j* ~! W
20. s.Format(_T( "%d "),   i);
    8 \: K1 c& l. F( ?3 G3 O1 J
21. 
    : q3 v" F- _4 O+ e+ ?. }9 S! {# u
22. return   s;
    . ^2 V  w6 W/ K9 W8 o2 [# k+ a
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    ( y" w3 A4 l) [1 E
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    6 @2 G/ G% |) W' U6 p# A
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    ( y& B0 l+ |/ C. W
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    * A+ Q( r8 K3 a4 A
33. }
    / v6 I& K$ r; I. U  o- A5 }
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    
38. 
    ( N3 I1 S5 w; r+ n9 p+ }2 A: O, t
39. const   CStringA   sa(request);
    * n& M8 T5 C2 g4 J( F
40. int   length   =   sa.GetLength();
    6 q0 k# B. X6 p( w
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    2 h$ D; V5 Q1 @( ]0 ~8 X; o0 e" |
44. struct   sockaddr_in   sockaddr;
    $ U, p" M( x: P
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    % ]0 N, U# }5 V' O: M$ w: _
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    & q. q4 s( e8 L- @1 S: k" H
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    7 s* [. t2 a$ ~* x$ L* M( A
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    - b, A9 c: \& E/ u
53. Sleep(20);
    4 g, ?4 K, i# k/ u5 }
54. int   n   =   send(s,   buffer,   length,   0);
    ) Y: A6 L1 \5 d1 i% i, D) p7 w# A3 S7 V
55. Sleep(100);
    + ]" \& S% l) ]' p. W/ Z
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    ! e( k4 b& a1 Y+ R9 I$ p
59. if   (!rlen)   return   false;
    4 G7 r  [# T8 S8 F: f& X/ F
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    0 L( Q0 C( M8 z/ s
62. 
    
63. return   true;
    
64. }
    2 X/ h4 s" i$ {9 }$ Z* q5 z3 ~
65. 
    - P8 b1 x; A+ K/ R- I( [0 @8 A; p6 h
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    : ?: l% M% c' u) _) ]1 d6 a
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    , I3 }: S( C8 ?( }
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
      F- r% C% e1 J1 c! _5 S. q2 o* u" _  K
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    6 K/ B0 B9 B; Y& J0 u
84. {
    
85. int   pos   =   0;
    ! U% v- q: R- u" P
86. 
    8 ]* f5 V0 K# t% E& e
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    - w' r+ L! O! X
88. 
    ! d3 @* K" s* b
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    3 r% C) ?: [+ j0 U
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    $ i4 s! Q7 M% K) O9 ~* t3 E, F
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    3 u, y( R3 ]1 f. f9 C* n
97. }
    
98. 
    . a+ z9 A+ d7 y; _
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    ; g* L8 L  K/ L8 P
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     . \' A" H- T) ]' |7 T
103. CString   property;
     
104. 
     ( e% O# I" Z. g$ l$ v. O3 [
105. int   posStart   =   all.Find(startTag);
     5 k$ B1 R6 t/ n: m
106. if   (posStart <0)   return   CString();
     ( r8 x" z6 h1 G) W. g9 w
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     0 \& k/ V; [" v8 ^! {
109. if   (posStart> =posEnd)   return   CString();
     3 @. b& D' E  I6 K7 r7 _# X) O
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     * y! Y0 B- K7 ]  ?
112. }
     , I2 V+ i8 V. y% b4 Z' T
113. 
     ( t6 z4 A. C3 @$ T, S
114. MyUPnP::MyUPnP()
     & a# A, I, x- X" @/ L# @1 i. {
115. :   m_version(1)
     ' e" J+ _$ N) V6 V* m% C) H
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     2 l5 z7 C2 B$ n
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     * M3 m. w/ a- `/ q
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     7 J' d7 a3 V" G9 K8 X
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     . z2 c$ ^3 P  ^2 ]
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     $ L. |# x( D% a# s. i, V7 g
130. m_Mappings.RemoveAll();
     
131. }
     3 n1 T9 v7 {/ c, V1 K5 {
132. 
     1 {, w! A/ O3 K
133. 
     ( j# @- s1 l* q# O! }9 D- j- `1 F, I
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     8 P  e) R* O& z
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     7 D' ~5 ?7 T) B
138. 
     
139. #define   NUMBEROFDEVICES 2
     * H1 |# t7 N+ m& g3 S# N- T
140. CString   devices[][2]   =   {
     + G$ z: Q! ?# w" N& _5 I3 v' \- Q
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     4 @  d* R- P3 X3 }6 x. n1 D+ N
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     3 @6 W, Z1 {7 h$ M6 `
148. ioctlsocket(s,   FIONBIO,   &lv);
     ) h4 T; z; {7 K! w' e; ?# v2 t
149. 
     
150. int   rlen   =   0;
     6 T  i* ^5 y+ W5 w: a, R: `% d2 e' W
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;
     ; b- l( w$ M6 T) X* H8 z
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);
     3 X8 K5 ^! k/ d, @! R! ]
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     ) H/ L- h& c! C- n7 \; g
161. 
     : E3 Q+ L) z8 i7 a
162. Sleep(10);
     ( R) a0 g: `1 a( x- I
163. 
     
164. char   buffer[10240];
     5 _! C) K2 H* D: `% Z9 }
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     " [4 o! b3 F) l: Q: W
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     0 |1 K% o1 s; S+ B4 M2 @
172. 
     - ^. N% O; G7 m( D
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     ' ?* d5 f* k) D3 R6 ]" b; i- v
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     6 ~8 C7 I5 Z1 L# U+ Q) z5 Y3 S
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     7 G# J) r$ _: f
181. if   (name   ==   _T( "LOCATION: "))   {
     5 b/ w2 T% b' K. R
182. line.Delete(0,   9);
     
183. m_description   =   line;
     & e* S! T4 x& E  Q
184. m_description.Trim();
     # N- A. ^9 ?7 ^/ p3 S/ O; I
185. return   GetDescription();
     ! ?) |+ c8 e0 C0 [/ V9 C
186. }
     ) r  l# F3 I* t7 l
187. }
     
188. }
     ! X& o5 y1 F4 I- w+ P
189. }
     
190. }
     
191. closesocket(s);
     ( M$ a; D7 g2 G
192. 
     
193. return   false;
     / Z: Y0 a+ N! s8 J* V( D4 M
194. }
     

复制代码

天云上人

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

/ I3 R& g- k; T8 b8 j
! f# B! f1 X9 \  V0 W///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
- [* \- s5 u% H! f0 ^! \3 y1 a8 L+ @
* @6 j5 d% U( s) }5 }
+ O* R% u: \. Z/ @* s' ]5 y' f7 |; @#pragma once
#include <exception>
( c; U! w7 E' k) S+ ~8 j

$ ^4 F: A  c/ W3 B2 j( F  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
3 T) @9 p( H" R' ~        TRIS_TRUE
; Q% t, U% P' E};

( S  M" T" h5 A: A- V
enum UPNP_IMPLEMENTATION{
1 u% g/ c4 Z) F# L        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};



& r) H; Y/ d7 L& {( m$ H* t
5 R) Z" o  V: T4 n) T+ zclass CUPnPImpl
{
public:
        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
6 ~$ L. W* Q- q. ~- I                UPNP_FAILED,
                UPNP_TIMEOUT
        };
; L% D* {: N0 k

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
& X2 }9 V- o1 J/ @( _. ]5 O* W8 T: V        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
: \  L, E; z; K  ~) e        virtual bool        IsReady() = 0;
        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; }
. I& d3 N' x. P5 l+ t/ X        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


+ U% {; S+ m4 C// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
3 T0 X0 b$ U( N: L; f5 j        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
. `/ o4 J# p' g3 s        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;

2 u" U+ h" C% n" y$ p9 N- ]. M
private:
        HWND        m_hResultMessageWindow;
- w) J" ^3 l( I& S& `2 D2 A: Q2 A        UINT        m_nResultMessageID;
$ \8 O: \- D+ ?
* Y0 |, c; B0 |
};
5 B$ q: G6 \: F

// Dummy Implementation to be used when no other implementation is available
( H+ j  b# S7 k" c6 Y( ^( N% @/ [class CUPnPImplNone: public CUPnPImpl
& C( |( k" S: V- l  w1 g9 Q9 _- k{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
: x8 c/ |- y3 q7 O# L# \        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
& c; z% S# z% o        virtual bool        IsReady()                                                                                                { return false; }
5 h6 U  x9 y% y% \        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
7 K3 }6 V2 B  |5 R" K
$ g+ i2 ^( A- d. g5 x% {/ }4 Z
9 ?( k% a- B: f! M. J- T! A/////////////////////////////////////
( j) a8 c6 n1 d9 T5 T4 y4 L3 B//下面是使用windows操作系统自带的UPNP功能的子类
6 [& k7 ~/ F; W/ J! ?

+ M9 X3 L  `% l+ |) A9 f#pragma once
/ q% T, F# Y2 y$ N3 \#pragma warning( disable: 4355 )
' h/ Y+ j$ A+ P

% c; b& W/ p- c6 L$ ]#include "UPnPImpl.h"
- ~- h' ^& n& o: q( \#include <upnp.h>
  D7 t* R- V$ A$ k' K& T# T#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>


#include <vector>
#include <exception>
  ^, R" F3 H. X" w#include <functional>



$ B# z" u8 j7 g/ E6 O  K9 ]; }- G
7 I- h5 A8 V5 b8 x$ I- qtypedef _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;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
; ~4 R" z; ?/ m1 D$ _& ytypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
2 d5 E: v7 @9 w  PDWORD pdwBestIfIndex
);
, C- K" f! d) M3 O2 N* N
/ g" ~1 F: u, [
( Q2 T& m  H. J  |" T. Q! ?. a& \typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
$ T. ~" L5 A- b7 x9 r: z' W9 J);
$ T. f% ~6 O# D- u6 H) z* z

0 Y" m2 S- @8 R1 W/ S& Z$ itypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);


CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
0 P: _! r5 S! T1 T! p

class CUPnPImplWinServ: public CUPnPImpl
& q/ h$ ]# y: \, R* x3 D{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
8 t, e3 r/ L+ ]8 y& a- S" ^// Construction
& S) Q; @. d' R5 U/ _# vpublic:
, ]+ d0 D5 l. s5 u4 n& P7 y        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();

4 {: W8 ]$ R" \" {" s# J. p
9 Q6 T; i4 D; f6 w4 C$ D        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
# K7 _& o2 w3 @* G, M" p! t/ h        virtual void        StopAsyncFind();
( Z/ R- Q) \' ^/ G& t3 k3 X( Z        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }


        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
% o: K# ~" \; r% _9 m; `* q! v- ~        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };


protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
0 h! d- Y# a8 i% v- q' H4 J) i        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
0 `* b3 A, r$ q6 u7 G( q3 w5 E        void        RemoveDevice(CComBSTR bsUDN);
# p: o' I$ F, X6 V        bool        OnSearchComplete();
) {. I9 }6 M% F2 N$ J        void        Init();
' z7 I0 w" L! {9 c3 z, t+ {+ R# K
* z, C( F3 ]1 ~$ [5 h3 W& ~: P/ C: ~) x
% J  ^$ B' e! e2 {+ j: M; u9 N1 i& [/ F        inline bool IsAsyncFindRunning()
  d$ i% r- A( ~        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
0 p$ ^  _0 T2 P) P3 S                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
. G; |+ R6 p; z% `# T                        DispatchMessage( &msg );
4 }6 t( r* B/ o$ \' W$ g                }
: S* P; _: e5 l7 R                return m_bAsyncFindRunning;
. z& Z5 J- r4 \- C        }
+ `- L) g" n1 G4 T3 M, O0 y+ ?$ T

        TRISTATE                        m_bUPnPDeviceConnected;
- A7 r" K: l' d7 m3 u3 [
; B  d! j6 n' K. K
// Implementation
        // API functions
* V- U- f( w' y% Y+ j        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
( t  E! B2 K6 m6 N4 O+ ?- q  E9 X. c5 i        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
8 U, y* f$ U4 P! g- N        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
; p5 m  d$ a7 E$ M4 ~2 g        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
9 K. z$ a$ |2 n: {( g        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
( e; _6 h% y8 y. S

        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
7 o" B) G% X* U' Q6 L        TGetIfEntry                                m_pfGetIfEntry;

3 a2 C* N& N! k! T/ o+ ?
! P1 Q: c, f  c0 S9 b! n5 l9 y        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
4 m6 u. x7 r8 q* ?                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
) N7 }4 l# O7 B" x; Y                {
                        CComBSTR deviceName;
  @# A/ G" m- r) x- ]! {                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

% v2 Z" l8 Y# {+ F$ Q5 C5 s) N
                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
8 @. G' S2 F+ G% U, K  ]
0 b8 b- ]  p7 P  ]( n, ?
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
/ T4 C$ W2 w1 J# f                }
                CComBSTR m_udn;
' M) s* [& a' x8 m        };
" K: l& y& E% d3 R* h7 p1 j       
  O/ i" n2 `; ]6 i        void        ProcessAsyncFind(CComBSTR bsSearchType);
  q; h" z% E  D* i; A0 R        HRESULT        GetDeviceServices(DevicePointer pDevice);
/ f) q2 h- C6 P5 {3 T/ I2 r        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
" \  |: R; y8 m5 x: P; b        void        DeleteExistingPortMappings(ServicePointer pService);
; h5 Q. [  {* u& J  Q: \        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
# e$ d1 l. ^7 B+ W7 ^        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
4 P& K& I6 \" ]- K; r% h- K$ `        void        StopUPnPService();


        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
- n7 w0 m2 z" K: B" S$ E# w& G        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
+ `/ M/ x* v- t) ?8 \7 @0 w        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
* G8 X( }* _; V% V  }- M        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
: V5 e) `' j5 W5 R; \/ D# _( Q3 `( F        CString        GetLocalRoutableIP(ServicePointer pService);

0 c& N: S9 a+ L1 H, ]- Z
// Private members
private:
0 y  y# \  _0 T( n        DWORD        m_tLastEvent;        // When the last event was received?
, |) o) ~( T) g: m. D, t        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
* m8 K% |' b) N3 \7 r) ]        FinderPointer                        m_pDeviceFinder;
/ a- e5 L8 ~" p& V        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;


        LONG        m_nAsyncFindHandle;
  t2 g9 f1 f& o+ x9 _, P; U$ m        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
9 @7 d3 N5 W$ y, }        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
3 {6 `1 {" M% w        bool        m_bAsyncFindRunning;
+ J. t2 `+ x2 A" o# ?3 L        HMODULE m_hADVAPI32_DLL;
& u& @' ~* @2 l( n        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
+ v1 X( t! Z; x/ [$ Z9 h* l' @: W0 b        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;


};

/ ^% M' J) V4 |+ ]; |% r9 _
// DeviceFinder Callback
- h. H; ~5 R% gclass CDeviceFinderCallback
  x% Q) U5 u2 I6 c; h: S5 q        : public IUPnPDeviceFinderCallback
; V9 w1 Z, {3 ]2 e$ T3 R$ a" E{
public:
6 k* R7 J) ^" N' [- ?        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
" b* G5 P5 Z( g- a        { m_lRefCount = 0; }

# w  l" z# D9 C) ?
& q% a5 c/ j* r) n   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
! B- V1 P/ ^6 t, V  c   STDMETHODIMP_(ULONG) Release();
( z6 t1 O8 i0 @% `' q% k
% r+ \/ k1 S) j& T
8 F: m/ c% k. j: b+ l  ?7 C// implementation
private:
/ n9 b' n# y9 Y6 F% F+ m        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
+ v1 F& f$ c. G7 a7 h        HRESULT __stdcall SearchComplete(LONG nFindData);

4 ^  a' u7 N7 M6 g2 g7 d
private:
  M% k, p% t6 b        CUPnPImplWinServ& m_instance;
% v8 m; z2 a! h% |        LONG m_lRefCount;
};

. y; `$ W4 Y2 @
; m% D7 o6 S  Q8 u) ~' Y// Service Callback
9 d7 I1 }' q  }2 ?! A- g/ z* hclass CServiceCallback
        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
( Q0 ~$ c8 c# M, `$ Q                : m_instance( instance )
+ o$ [  |; s  A# V7 E  \8 X        { m_lRefCount = 0; }
/ P7 J' W8 r' h1 h6 k) T   
& X2 ]/ J5 s, b   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
5 ?. x3 \. W4 p# v! p   STDMETHODIMP_(ULONG) AddRef();
  z3 g% F* [# ]! w* a% l   STDMETHODIMP_(ULONG) Release();
/ |3 w( U2 @: J7 W4 c

// implementation
" |1 F& g+ [  U# v; x; Qprivate:
; m4 ^8 X4 \' E; |        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
* u2 ?2 T) H, g/ r% g/ {8 l
8 A# b1 P' `) D5 d% t
3 g6 q; N0 a& vprivate:
$ w9 [  X/ L$ S8 j2 e        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
$ ?/ i* C- _  ~  q};
" y6 Y* r% Y  @1 i  W0 z- h
* P; V0 O6 |# F/ M  E4 U
/////////////////////////////////////////////////


. n/ |+ R/ t5 y2 O) C( d  a使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
; \3 G+ B3 W: J' ]9 d2 N8 XCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
% s3 p/ P! ?" c/ ICUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.