UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   
5. 
   ! b- g/ s! Z+ n6 y2 P. o- A$ t' S
6. typedef   unsigned   long   ulong;
   ! ?' x- x9 \. \$ r. {( {/ m8 W
7. 
   ( Z. X/ }+ P* Y
8. class   MyUPnP
   
9. {
   
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    , m  m9 A6 r: O
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    $ O' O' b$ ?. @$ i' v# j
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
    - N/ A+ v/ d6 _
17. }   UPNPNAT_RETURN;
      D/ @% P2 b. F& W( f( b6 T" ?" t% R
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    2 E/ O3 A6 x3 u" [
24. typedef   struct{
    6 d2 ?; P3 C% W
25. WORD   internalPort; //   Port   mapping   internal   port
    ! J1 X; _4 W+ j0 @) `
26. WORD   externalPort; //   Port   mapping   external   port
    5 k; l$ Q. x& v, y" D
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    8 |* S$ |% q+ o3 p
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    . _) i( r8 v3 B4 p: M: B
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    , b3 A7 S8 x3 b1 {' C3 ?
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    
44. void InitLocalIP();
    ) k7 O! C- [  _' p) H8 i' F* u
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    ! @3 t  P% L- z$ ~' H5 K
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    5 r% K2 P/ W( m$ D6 N
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    * f- K" Y  O6 S+ T" t) ]
53. bool Search(int   version=1);
    / G1 r5 _. N, E7 Y# ~
54. bool GetDescription();
    4 u/ k0 d7 c3 q3 z$ {
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    / q) ^1 Q. [$ D7 x% F3 S( B# e$ t3 Z1 h
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    0 V) u2 r. f- i7 C" c) Q
59. bool InternalSearch(int   version);
    ) n+ r- e+ L' K8 S
60. CString m_devicename;
    - _* C0 O, e; ~' |! J2 f! Q0 `
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    2 y9 D+ `) \7 s" ?+ d
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    ! b4 {) S& F( t2 S
67. int m_version;
    
68. 
    # ~: L& b% w7 J5 K0 q
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    4 L, v' w. D3 |! P: M( l# M
71. 
    & A: r" k  m+ \6 Z- W) T% x3 ?
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    / x. P& j6 T8 U( K6 R! |
75. 
    
76. bool isSearched;
    
77. };
    6 c; g! p, [8 J( F7 {
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   ! y4 c% X( W; ^+ j
3. 
   
4. #include   "upnp.h "
   + g( A- F' [3 Y
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   + {  H. x% g* K' u* ^' E. `5 a: L
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   " J+ E$ S' F  P. D
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    9 G) S. g# c+ `' i
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    4 c$ P: @* b( a) l) X# H
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    - \0 s, z1 ~7 a( r
15. 
    
16. const   CString   getString(int   i)
    
17. {
    8 l6 J) `2 k; q" K* B$ J$ f
18. CString   s;
    & q3 I  d, J' z+ X8 q* d2 L9 G
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    ; t6 ]3 w/ M2 ?1 t% k! y
23. }
    0 }- k0 Y" @: ]: v6 V; y
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    6 t, a$ |% f; [) `! k
30. const   CString   GetArgString(const   CString&   name,   int   value)
    ' |9 R# d/ j0 K5 Q4 {; Y
31. {
    1 @$ Q! i' h/ l9 C% Y
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    7 B5 S8 ?& G- G8 L( z
33. }
    # [/ I7 J1 D9 \" O( u4 r
34. 
    " N* o" O0 K& y' p5 M, t; h. D
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    8 H1 r0 _$ |$ A
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    $ Y% R1 j4 {9 Q) q% O
41. strcpy(buffer,   (const   char*)sa);
    2 T% T+ D/ F+ B, i. N, {
42. 
    $ A2 a7 f5 i$ }+ x) Z9 k- o% D
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    $ |! g! ~' f! w( t
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    # E$ x- O7 {4 i' m% |
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    $ Z9 l8 s& E5 T
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    5 D2 i* x  g2 e
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    . H2 j6 S7 K0 Z) ]  w
62. 
    
63. return   true;
    ! _% i3 r' E( R4 T4 c7 N8 c
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    1 E. [+ ~( N/ p: K3 C
68. char   buffer[10240];
    
69. 
    / J3 F6 i  a3 P+ z2 Z9 R/ y  R) a
70. const   CStringA   sa(request);
    " [! u- F# b9 R) P( ^  I# U: w
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
      x7 v. X' Y4 _1 k+ \
73. 
    % U$ D' _5 f  t4 X& k# V$ X4 B
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    ' t, T# O6 u+ {. |, r
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    . m2 ]' m7 j7 S
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    * n# F4 v+ k$ h2 W# `  H' s. K
84. {
    
85. int   pos   =   0;
    
86. 
    ) T* A, h& C5 t' y  S" M) N' \5 ~: W
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    ; |+ r) f' |8 _+ i. d
88. 
    ) }7 t* X9 Z1 _. x* @
89. result   =   response;
    2 @( a) I/ k: q! _, T5 o) [
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    ' ~& s8 J+ `6 q2 ]! m, g" ?) |: }
96. return   true;
    
97. }
    
98. 
    5 w5 E3 J! a1 O- F
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     ' g2 o, V: A8 v
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     3 Y( r' @9 h6 A6 T
103. CString   property;
     , A# l" {3 V7 e8 B$ g$ G
104. 
     + H; E; i0 m3 o7 ?% c
105. int   posStart   =   all.Find(startTag);
     5 W- G- v. Y$ V% `4 s
106. if   (posStart <0)   return   CString();
     * N6 a" Q* U7 E/ p8 I
107. 
     / q5 h9 I- m; r; X) }7 O6 y
108. int   posEnd   =   all.Find(endTag,   posStart);
     0 a' P4 f4 U' K% x) ?7 A" u! v
109. if   (posStart> =posEnd)   return   CString();
     0 A5 t" `3 E3 `/ n2 ^
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     , q, h- F' y6 f& k5 b
115. :   m_version(1)
     
116. {
     : v" u. d4 w) |9 L1 Q2 K3 y. \
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     5 Z$ q) ~3 Y  i
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     : \5 A+ G, {! [
122. {
     8 E2 v4 L' O5 l
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     " I% W8 H7 q4 ~8 E
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     3 }! X; ?8 E7 Y. m, }
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     * J) l" P" G6 E; n- o
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     : a% P8 a9 W2 \8 V" G
136. if(version <=0)version   =   1;
     8 r; W: M# o3 q" a
137. m_version   =   version;
     / z: ^. m3 j# l4 R# ^2 g. B2 c: _
138. 
     
139. #define   NUMBEROFDEVICES 2
     $ Y" X! Z, `0 Y8 ?. D7 S
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     & B. D  G1 i1 ]4 A- R
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     ( C. q/ A- F0 c
145. 
     . E8 `* v" ?( ~) q0 K6 T
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     : K* j+ J2 e% N* p: P% d, n# _
148. ioctlsocket(s,   FIONBIO,   &lv);
     $ |$ |1 I  y# H, \
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     : e* Q) B$ O  C, z1 D! H
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     ; y3 x+ R  T, ?' k+ X
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     6 ]3 f2 U: i/ Z7 J
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);
     1 J( m4 m. C% f1 C$ b5 p
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     $ d. p9 f/ z) `$ c8 ?
160. }
     
161. 
     
162. Sleep(10);
     ; F) C. V4 m% G7 G, _; z$ k( g9 o
163. 
     . s0 R$ {$ N9 w& L* Q9 d# V3 h
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     . t" e! r. V# _& ^  A, L5 W1 `
166. if   (rlen   <=   0)   continue;
     % J: K! a4 X4 W* b
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     3 [0 l/ K1 W; H# Z" R
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     9 L0 j- a1 a2 M( c
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     0 H" O2 M% M1 z; Y8 G
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     & D6 L4 |& p+ ~' l0 X
176. for   (int   pos   =   0;;)   {
     % _. ^$ E4 i$ A4 ~
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     ! G! K) [% ~2 E# x
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     1 m% F5 D) W% j- r% B
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     1 M: G7 c1 k/ N2 L7 ^& d* N
183. m_description   =   line;
     
184. m_description.Trim();
     1 d5 B/ Y! d0 X6 a
185. return   GetDescription();
     
186. }
     
187. }
     ! V; B8 Z1 r- ^8 i' P5 Q/ V
188. }
     # z* J( @; y! I# p: x
189. }
     % C' E6 p9 [8 R2 c. a, N
190. }
     
191. closesocket(s);
     - A) J4 l' q0 d; j2 S7 o6 |5 M7 u) x# W
192. 
     
193. return   false;
     , e! ^5 A+ B. V
194. }
       ~# ^0 R9 @. m7 l7 A4 ^

复制代码

天云上人

以下有关upnp的接口来自emule，
4 W7 P( v+ ]9 L$ w# }9 q

8 S) m! E) |# g( h( n" z; w///////////////////////////////////////////
3 f, W$ ?* {& E//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.

% X% F6 f# t. W8 U
#pragma once
#include <exception>
0 j! u) @5 o* N  Q
. A& ?  w$ V3 ^
2 M1 `1 A. B0 }0 X  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
- f5 {; v+ Z# A0 i2 \        TRIS_TRUE
! H% k% C% }2 j/ v$ u1 Y};

# C1 Q) }1 y# M% _
* ^( s; n6 k0 j* `; L6 Z8 X# denum UPNP_IMPLEMENTATION{
2 M  P# ~+ K+ S: l/ V        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};


, K0 B# p) \7 R7 f- ^  w

. G! V% \5 }5 ~) ~/ Qclass CUPnPImpl
{
4 i6 i& i. ?# F) Rpublic:
1 l; \- _% y) ?8 I. W        CUPnPImpl();
        virtual ~CUPnPImpl();
; b0 s7 N9 a8 N& D; \* _: R, w- u. ~        struct UPnPError : std::exception {};
        enum {
/ c, H  t& q0 ^3 q; N5 g                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
! Y+ M" @$ [1 \8 d9 g! q( j        };
- H7 M' O+ _+ [# v

" P- I' L9 {. F4 H) W  q        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
9 s# T3 [& P6 Q2 h; L0 o2 N. E        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
( r, Z4 {. v& q4 _2 u' R        virtual void        DeletePorts() = 0;
4 }- J7 m* V# m/ f        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; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
( R# f& T  w3 m- l& `/ h2 S5 t        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

* ]% h. d8 n; s1 G6 J( a+ E
# C/ N0 K% I" P2 y6 l2 A& F% ?4 v// Implementation
protected:
( m! n8 g  T/ p7 |* v& `3 d5 l        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
8 W0 F* N9 ~% I) @- }! J        uint16                                m_nUDPPort;
8 I) g  S3 ~/ [" G, ?  W: L        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
* U+ t+ H8 O9 I
* l5 }& W3 Q! a$ I4 z6 w8 X& n
private:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
* i! {3 u% _1 {% T2 R; r9 C$ |
( [9 ~8 i9 d8 c! r
};
" D# k- I5 r6 F4 k9 d, G
/ f* J+ o* W, k+ n  ^7 a" l4 T! [. i
// Dummy Implementation to be used when no other implementation is available
$ [+ F- A% M( B4 _% K( @- Jclass CUPnPImplNone: public CUPnPImpl
# w8 k3 x; ~1 r; W6 s7 Z8 J( e{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
( Y, N  D& I5 R# P: _8 f- a2 s4 f' k        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
5 Y+ |( z9 ^/ [, }        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
/ {) B" q4 a3 p        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
# p1 B$ n0 c9 O6 Z- k- z+ ?9 Q

/////////////////////////////////////
; L( `5 v) e7 Q0 F- ]9 I//下面是使用windows操作系统自带的UPNP功能的子类
0 w; p8 v* ^) L2 L; e* T& q, X

' w; C0 j" r  P) j#pragma once
3 O  u' C) {, I+ q8 _( w#pragma warning( disable: 4355 )

! J# @7 R1 U. Z% |* v1 k
#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
& x1 Q% p/ D- ]: O7 L#include <winsvc.h>
8 A2 r7 w" V% [- C
  E: w+ G/ h, h0 o* t/ b5 G/ b
: [& t9 l' p) u1 Q3 G( {#include <vector>
#include <exception>
! E3 [% z5 d5 Y) z#include <functional>
* }! `6 N# [9 h6 P, X. |4 `

- p. V$ j( l$ {  L( w6 S+ H

typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
. ?# [, N6 [. k, |7 ktypedef _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;
% I  ]: N* ?; Q" etypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

3 ?- `2 {% @; h( y' \) l# T# _
typedef DWORD (WINAPI* TGetBestInterface) (
  h8 \, V4 f/ k( d+ c  IPAddr dwDestAddr,
0 p) |0 y7 C+ u. u  PDWORD pdwBestIfIndex
, \1 O  G0 i% ^, S);


6 u# J5 _, z' V. f! dtypedef DWORD (WINAPI* TGetIpAddrTable) (
% K$ B; F1 G1 [5 J' L* M  PMIB_IPADDRTABLE pIpAddrTable,
5 j' t& D8 C! [; E- c  PULONG pdwSize,
5 p! z2 u( k% y5 i: t% ]  BOOL bOrder
2 ^/ G) q; M; L* |8 p  O* l( J);
# S9 k1 y5 ?( |9 A$ B& b
3 J+ \' `5 {0 i% \, g. y
( P5 ]3 j4 t: A& k. z1 t# w2 ytypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
* ~, _( r+ x( O0 W);
8 Q+ c( x/ d# K/ I: v

CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);


7 k# i: \% c- k1 hclass CUPnPImplWinServ: public CUPnPImpl
{
+ B, n8 o$ V8 P& B3 [8 }        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
1 N% t* N4 X, Q) q0 Z3 h; Xpublic:
/ e. q' h* M5 g& a0 u5 K: ~1 L        virtual ~CUPnPImplWinServ();
* M4 E4 Z) Y* \1 U( Y: s        CUPnPImplWinServ();
0 N# D: I4 I8 |3 P* @/ t
/ r+ Y+ L9 g- ]
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
; M  ?. ?' i. e$ |! U* e" y- \        virtual void        StopAsyncFind();
. T3 E* I, J# {! o7 a; v( _- y        virtual void        DeletePorts();
+ f" f3 e" O& h; w        virtual bool        IsReady();
! A0 x- H/ P( k  l0 {5 H6 Y        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

6 D6 }8 H, v) l0 Q' `2 m
: N6 x9 ^% ^( L. `+ J8 M5 e, G1 s        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
2 o! N' Z! f, p3 N/ u        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
& E# O& ]$ f" R! ?        virtual bool        CheckAndRefresh()                                                                                { return false; };


protected:
/ m8 U! w9 y6 z# D        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
3 `. D9 s& s1 i2 d        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
: G2 ^- q# g6 ?/ c9 [        bool        OnSearchComplete();
' U, S8 q* X9 b        void        Init();


) h' I  _4 q& ]        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
: a' V" s$ j' P, x' b. O2 C) n                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
8 _0 U/ q' }2 Z1 Q                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
! g; U- G, P2 _& h                        DispatchMessage( &msg );
* G! k. A( L7 C0 H) U                }
                return m_bAsyncFindRunning;
' L' R) y3 u; ^3 Y) M0 G7 f( C2 O        }

1 Q/ ]0 u8 X3 g, A, S# i8 X
        TRISTATE                        m_bUPnPDeviceConnected;
7 [1 f+ Z$ v! G0 L; Z

( Z, g) `3 H1 J/ `0 K: U// Implementation
- s* E! b: f. ~+ g" ~        // API functions
/ F6 Z7 d5 [5 P        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
' m0 g  o) f, }$ }4 G        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*);
' {2 }* d. S, F# @        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
" y  w( z% z) k/ o  k) o
) k% p2 `/ l. w# Q; w/ J
" ]: Q& A" f5 ~' T0 ?% y1 u5 P        TGetBestInterface                m_pfGetBestInterface;
, m5 o$ [. z7 y2 G/ x" C8 N        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;

- r  L+ z2 V, ~- ]% T+ q8 I: z
/ X2 z* y1 q( V) t8 Y8 W4 ]  U        static FinderPointer CreateFinderInstance();
* U" I0 h! O: k# h+ T        struct FindDevice : std::unary_function< DevicePointer, bool >
( S+ m& M8 f) Y        {
+ t& j/ L: Q5 S& c0 z                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
8 a' }5 n8 z3 J2 R( x1 ^0 r                result_type operator()(argument_type device) const
                {
1 h7 p% Y: J8 q- E+ `                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
! |5 e, A% _- s1 l/ R: ?! t
2 h2 r8 O4 E' v1 q
                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
( X: Q5 P2 B1 g. n3 J: t1 E
$ s0 j% J, i0 g. f7 R( a5 `
0 x5 M( S: m5 U& V4 I  ]' A$ C                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
/ Z8 R; Q/ f/ ?2 v        };
3 s' R  |: g( H5 R! x4 h+ Z       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
: N% g" t: @7 S% i. k4 ?        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
# |6 d0 j. ~  b, Q        HRESULT        MapPort(const ServicePointer& service);
9 o9 I- C: t% S) ~  l* o        void        DeleteExistingPortMappings(ServicePointer pService);
7 }+ J$ Z: k4 P# t! \        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
  \- h6 B) P* U        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
( g4 b  t; Y& r8 q' O- q5 i* D4 N5 L9 z2 n
" c! e% A0 f2 O  T+ y0 p
. ^! w  _5 S0 I% m3 w2 O        // Utility functions
  A" J4 C0 i" e# {5 ^3 t        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
4 b4 Y7 `* Y. m  M        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
! }3 H% ?) N* r2 x! v( H* N& K2 L        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
' `3 L+ t: E9 D, L* P$ @        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
- W- _, y9 [' Q9 d        CString        GetLocalRoutableIP(ServicePointer pService);
! _* M5 K: b" W

/ v# g3 ~- g5 _2 c: P, D$ Q7 N// Private members
8 j5 c0 `4 c; {1 z) s( uprivate:
( l$ V7 D3 t% T& E( [1 _        DWORD        m_tLastEvent;        // When the last event was received?
$ H, ?8 _: ^2 L" u- h: x0 r        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
: A2 a) C- c! {6 V8 f        FinderPointer                        m_pDeviceFinder;
. }4 e4 V! z% g: m' w+ O        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
1 J% X* Y1 a5 J1 \1 o

3 y( n" A) C! V3 `4 C        LONG        m_nAsyncFindHandle;
" y! a- ]5 ^4 ^1 o9 _8 @3 S0 n" B+ U        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
/ a! M' N  E+ N! `. S' T' s        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
; Q) w5 ~+ D* A) G$ @3 }, P        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
3 Z$ g8 e# e* f  L  U        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
% r' q! Y! z( c; e& |1 P7 `        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
1 x6 `( A% O) a9 ~9 v) P        bool        m_bDisableWANPPPSetup;
4 o' y/ D+ f/ x
/ V# z: k- U2 w6 i* ?8 O
  G$ E' w6 h2 N4 W' L# |3 w6 Y- x};

6 u% ]( A1 w. v& O
) m6 c; h- B2 L, c// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
2 A5 X8 e) m8 x1 @{
public:
, b2 `* t: S3 ^$ O& J        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
' p1 K  Y, A  t, S        { m_lRefCount = 0; }
' w7 i# @& A+ A$ s* ]
" {! c. M* f2 O! D& U6 P
6 O) b9 t. g( h7 f* p9 H1 M   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

, o- Y/ n* H$ F+ g% I% o
// implementation
private:
% j) I2 |/ h( s1 r" i: B0 H        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
" `" w! G" Q, r  ~3 `6 D        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
7 p, Y8 E3 H9 K, Q. ?% z        HRESULT __stdcall SearchComplete(LONG nFindData);


$ n9 X& x5 @& i" H4 z% Iprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};

) R6 R2 z! ]4 D  B/ ~7 }; }2 K
& x: F  p. Q. |! q) H// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
) y  D) P& C  ]* |& c( [; ]& `{
! d# w' t: ?) @7 A! _& l  R- `public:
; i& b, Q$ x+ L' n" B+ B/ t        CServiceCallback(CUPnPImplWinServ& instance)
+ \6 g& s1 `: [2 H                : m_instance( instance )
        { m_lRefCount = 0; }
   
8 {& m+ K. ?' r5 C   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
$ _' J3 `6 L" s; D5 Q

6 I! K- L# x3 L6 |- Z8 ]0 ]// implementation
private:
/ d7 [! p0 C5 Y& E        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
5 u& ~( P: U! o. ^  |+ Z! W' f
* b+ ^2 [$ j" m( Q
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
7 r2 y0 w' p& b- s2 z};
9 v- t, G% |7 V  t2 k$ m( g+ P

/////////////////////////////////////////////////

: c6 \. u, c, O2 P4 T/ t1 e& F, w
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
! }/ g$ p. u5 m& F8 F1 d! I& ]CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
& g$ d  N& b8 J: @CUPnPImpl::StopAsyncFind停止设备查找.
' W' ]* I9 X6 S* m2 u. J4 QCUPnPImpl::DeletePorts删除端口映射.