UPnP

天云上人

/*uPnP.h*/

1. 
   ( q  U; A) M3 v: b- a3 S
2. #ifndef   MYUPNP_H_
   ' _( g$ _# V/ O/ B+ ^
3. 
   
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   6 ], e; d2 A0 I* P7 K6 o
7. 
   & O5 T# X! j: m/ q9 N  A1 D5 o! X  F
8. class   MyUPnP
   8 f: l$ p; v2 U/ y
9. {
   . c2 Q0 s) s6 [. |, e
10. public:
    3 D: W+ @: _4 f
11. typedef   enum{
    . C: b4 |4 N6 [2 ?# J( g4 _! c
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
    & q8 a2 X2 J1 T" P
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    2 _9 L. s8 k8 Z( K& h+ s( ?
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
      J" m# t  y* k# ^5 d4 s
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    , Z) f. @8 i- b0 H3 X8 |
20. UNAT_TCP, //   TCP   Protocol
    $ K7 j, k, G$ L
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    7 U& Q8 Q/ Z; ^/ h
24. typedef   struct{
    # k, r/ N" ^1 ^; g/ h2 @) F! U
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    / ~; j, B8 h3 x
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    * d4 ]. F0 b# q2 n5 `6 j
28. CString   description; //   Port   mapping   description
    ! g5 r4 U8 B: H" o. X. X6 \; q& c& Z
29. }   UPNPNAT_MAPPING;
    ( \% ~3 C# b. q4 F" M% F# Z! Z
30. 
    
31. MyUPnP();
    + M4 H7 J: \. L* A5 A
32. ~MyUPnP();
    7 \# e. t& x2 K
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    2 d7 ~8 J% e* g8 k% E
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    # t, }+ H7 F" `7 b' i1 n' D/ _( L  c5 R
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    3 H; t$ u6 V5 A3 Y8 z
42. 
      D( n3 a3 ]$ R$ h+ b8 d4 o! w
43. protected:
    3 m8 p& |1 V- O  w, E! z4 ]
44. void InitLocalIP();
    3 I- E3 q' ?# x$ }+ ^, Z4 X
45. void SetLastError(CString   error);
    0 `, Y- W5 a% `$ g( e  a
46. 
    4 S. [6 H/ o# n; h8 p- ]
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);
    " Q5 f# ]5 x% R- `0 ^, k9 y% ]
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    0 Q/ ^0 C# }  s( f/ }6 K: F
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    
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);
    2 K; L! T# M6 Q. x" @; a4 y
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    # e# d  x- N$ W: j! v* n3 K9 g& Y
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    1 s, n/ f/ C& F0 Q! J
75. 
    7 D+ X9 k( |* \  ^5 [2 \
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   
5. 
   9 C6 k5 L" m- k. a- R- o
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   ' V' K8 _- N0 F% O! @8 M9 Q
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   ; g3 t/ k( W" ]9 T; L$ L) O# r
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
      d, h. G) |6 W1 ?+ u/ w8 g5 @1 l
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    , F9 C* \) [+ P" ]3 r
13. static   const   int UPNPPORT   =   1900;
    ! i( H7 H" Y9 G4 m
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    . a) p. q% X- e+ k. i# I2 H
16. const   CString   getString(int   i)
    # w0 O, {0 i$ a. ]/ Q+ j9 W
17. {
    
18. CString   s;
    * l7 j- x$ `2 O6 M8 ?4 d+ \/ i$ G
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    
24. 
    & o' e5 _  `5 N2 i! G8 N
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    7 c) v9 |- C( p7 r. {; K: j
30. const   CString   GetArgString(const   CString&   name,   int   value)
    / a- l& ]/ C$ Z% m! h. b8 u
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    2 @/ B0 ~  v% Y4 {: c
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    % D4 z, @- T# B) v- i
37. char   buffer[10240];
    
38. 
    $ G+ R1 G" p4 [' K3 u" f
39. const   CStringA   sa(request);
    ) ~- W; G  h' C% l7 e4 J
40. int   length   =   sa.GetLength();
    % t& o5 q8 h- [
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    ( k, }. L( W" ~8 c9 V! C* v5 M! S
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    " ?) h) l$ y9 J) ]0 ]7 d
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    # R- [  G0 m* v; B
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ; F# u4 _6 s  _; B4 f8 h8 b6 N* |
50. u_long   lv   =   1;
    7 ~$ x  {( n  T  L
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
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);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    # d, M! i' s( j$ o
59. if   (!rlen)   return   false;
    
60. 
      b8 U/ e% I* Z$ H$ }
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    
64. }
    * X& v) u  v9 {1 K% X; r3 J
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ; A, g/ D( ^6 j, K0 F
67. {
    " l; j; Z: V7 [' u
68. char   buffer[10240];
    " M+ j; o6 d0 m
69. 
    " W9 V& r: @6 F) H4 `. B% a6 X/ l
70. const   CStringA   sa(request);
    " R, o+ M" k( H% w' X  C
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    8 q  l! |# @- O& k( v( ^
73. 
    * L! A, O; j$ W4 _5 I
74. struct   sockaddr_in   sockaddr;
    1 ?" U5 p5 P0 _6 \( d7 O  `
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    / W7 [' b0 Z+ a; h; q* B/ W9 q
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
      R4 Y; s& I0 z" j6 D5 T2 y
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    - |- j% b7 d' S
84. {
    
85. int   pos   =   0;
    9 f' T  ~' V# p0 r5 N1 |
86. 
    1 l9 U* P1 d+ v7 D  U- n* q
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    ' K0 }1 h. |' }6 a% a" v
88. 
    
89. result   =   response;
    ( {5 p2 U! a- W
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;
    
96. return   true;
      a1 C5 U) s! r( F& e9 y( }
97. }
    
98. 
    2 K, s5 w" |! D8 Q: Q* O3 P- M
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    - v1 W  C! X1 i; E, U- b" P
100. {
     7 o0 w! _* a. y! P/ z  e# Z
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     4 `5 d  S2 g5 q7 d( L6 _- L
104. 
     + N1 n8 j$ Z, J! X) @8 L7 L
105. int   posStart   =   all.Find(startTag);
     : k5 v" d& b) p& [5 \
106. if   (posStart <0)   return   CString();
     & z: H$ K  O+ [5 h. s" T/ @. d
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     6 l2 S, i$ m3 `4 |) F$ x
109. if   (posStart> =posEnd)   return   CString();
     " @8 U9 u1 ]! @6 u$ g
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     # u( C: e5 ^7 R; H  Y* w5 W
114. MyUPnP::MyUPnP()
     $ C  }6 e5 l  Y7 Y; z0 q  j+ C3 m
115. :   m_version(1)
     0 p+ N  x# l4 E4 e; ?# V
116. {
     " P" _! c" H1 K9 p9 A+ f9 r
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     ) y1 w7 P1 Z: m3 R) ]
119. }
     
120. 
     7 w" X# T# Z) T
121. MyUPnP::~MyUPnP()
     4 {- a: o' C5 I/ v( u0 U
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     $ A2 e; \$ k. k* m+ @1 X2 b
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
       d- \+ O) ?, ~% u
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     ) E, b1 Y8 J% @' \% Z6 T
135. {
     & c! @% x+ f" w: h8 L" r* ~
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     # t/ ?; y/ y" ^! z
138. 
     
139. #define   NUMBEROFDEVICES 2
     : U# V1 `5 i- h7 f# G
140. CString   devices[][2]   =   {
     % u8 t, c5 I% D+ E3 T, M9 K& P% R0 k
141. {UPNPPORTMAP1,   _T( "service ")},
       J: E; K- _/ v$ [; l
142. {UPNPPORTMAP0,   _T( "service ")},
     0 @7 j) z) ]# r/ O) R
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     : c; I" T0 z- w9 \  R) @# _* M/ [
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     3 d* k" p" |. P3 s+ @9 `: x
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     2 m" y/ l3 Y+ ?# p7 i  l8 ^& S, u
152. if   (!(i%100))   {
     ; S' Q6 G0 E7 S& i& c1 h
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     + w' j0 }+ ^9 U2 S/ \  ~4 d
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     5 i- H( y+ n' @: |+ i3 w
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);
     7 s$ }5 g# q% [3 E6 u
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     
161. 
     
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
       p% v6 S$ G. }4 G! R7 E
166. if   (rlen   <=   0)   continue;
     # Y" f2 r0 v4 u9 z) V  g6 x. s
167. closesocket(s);
     . P$ x; f9 W5 t9 U3 v( u  o0 j3 X
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     4 B. R$ [7 r" c, F
170. CString   result;
     0 U4 k: O3 S- Y5 G0 d5 `- N
171. if   (!parseHTTPResponse(response,   result))   return   false;
     2 w' J  Z: K, V9 _
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     ( ]' x$ `& I4 A; A3 w3 x
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     9 T1 ~8 E" N  ]# @- i7 Y
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     " F) X4 \$ X: p, ~7 ?0 v
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     ( `" A' @+ a, R- A0 O
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     9 t3 y$ R7 R$ P
183. m_description   =   line;
     ' P: T: T! r$ M; a# u2 H3 z% A) F
184. m_description.Trim();
     + x% X: y- x: j. m+ A" y+ S% {8 u% U
185. return   GetDescription();
     9 l& y" t( K( p3 m2 A
186. }
     8 _2 U; j% ?! V6 C% F0 T5 |& @
187. }
     
188. }
     
189. }
     
190. }
     
191. closesocket(s);
     2 {, e$ h) p: A
192. 
     ' k& _: f/ h! u/ ~5 b
193. return   false;
     3 U  d/ x, @. N$ R2 ?6 P& \
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
1 o" x& A4 C0 n+ c( Z7 t6 p$ P  \
# X/ c2 Y! E# D/ n
///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
- f, \8 [! Z+ f8 `
: ^/ s( R& S# L- S
#pragma once
#include <exception>


  enum TRISTATE{
        TRIS_FALSE,
. G+ z1 n  {" t$ N0 s! J        TRIS_UNKNOWN,
        TRIS_TRUE
};

) T; D2 V: V1 |
2 }7 X( B- `% T% p/ xenum UPNP_IMPLEMENTATION{
$ v$ g3 ]5 R" D1 x8 [        UPNP_IMPL_WINDOWSERVICE = 0,
6 Q. \# S3 u5 @4 m; V& M        UPNP_IMPL_MINIUPNPLIB,
) l$ ^3 L" c% u3 ^2 ^' P        UPNP_IMPL_NONE /*last*/
};
9 Y9 A9 g5 k! I; |3 H& ?- J
6 {, l; R& ~+ Z$ w- w9 N
8 S3 I7 O" e# w- o& {; t

class CUPnPImpl
0 e( B' D6 C1 ?2 \( k  S- q: D, J{
public:
        CUPnPImpl();
& ~# Z: h, T: u        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
; b; G- a+ U4 |5 O) \/ g        enum {
$ l9 \6 ]+ \# i& l0 k: Z* K                UPNP_OK,
" r( i% K1 B+ v* A8 \) `9 K& D                UPNP_FAILED,
% P, N5 q: `  Z7 i9 f3 S: B. s5 P                UPNP_TIMEOUT
        };


+ U% I7 n! d. I- P        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
! Y6 ^5 `6 A9 P! [# W        virtual bool        CheckAndRefresh() = 0;
3 D) V' B8 V' K& I- ^. P8 i        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
! o( g" L0 v) J5 M' a( r$ w        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
& {& q; V- f3 r( I. _# L% z        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


1 c; _* ]  ]7 M9 ]8 @        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
' S5 R, J' G* C! d3 N        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
( f8 S, y* H1 W% g" \        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

: O9 g% Z+ V# U
// Implementation
protected:
+ t4 Y! O% y! g8 `        volatile TRISTATE        m_bUPnPPortsForwarded;
5 Z( O: d4 `5 U- Y3 _+ r" ?        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
. L0 g9 H- A2 f* s        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;

# J/ y4 f0 O  r& o" x* d/ f
private:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
* X$ h- p/ Y8 {7 M
. C2 _( D0 O7 e3 }& |7 `7 D
};


$ r2 ~6 m- n& S7 j/ y// Dummy Implementation to be used when no other implementation is available
; w" O1 P; y* W8 Z% g9 I) c" ]/ d- l. ]class CUPnPImplNone: public CUPnPImpl
{
% Q' i7 g+ P4 |public:
* N* {( R* E# Q. R1 Y* \        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
/ d4 D, W/ O! G- t! C  m        virtual void        StopAsyncFind()                                                                                        { }
* E: |, m$ m# K3 v( U3 h        virtual void        DeletePorts()                                                                                        { }
0 q; L5 B! c" v* X4 ]+ Z        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
' X6 N5 x" V9 c! a4 C; ^};
+ Y+ p$ [3 h) s# o+ N) z& w0 S
5 ], x. M, _9 r+ ?) S# d
) W3 h2 U/ {3 ~" a2 U( Y, t: `* X4 j* u/////////////////////////////////////
$ x& o; a0 O, M$ [4 u# @//下面是使用windows操作系统自带的UPNP功能的子类
5 H" P: K  G/ E( P
* U- k8 @. c9 o: Q" z( J4 _( l% @
" z8 P: B7 n: f  G& M#pragma once
#pragma warning( disable: 4355 )
. a# L. ^3 t) c' y, F5 k; X

#include "UPnPImpl.h"
" n: X& X: ~0 {& ?& X#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
. L- w" q! s6 B; I
* J/ X) e6 W! m9 S: l* D6 w0 N
#include <vector>
* z& f( O+ `1 s$ R5 q- V#include <exception>
! z( N7 t- f2 X+ U! E2 n( h#include <functional>

1 b! m/ {! t9 W9 Y& K+ I# R
& u* q% D, f2 V
& V( e6 k3 a# H  Y2 H4 ~1 ~
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
: u9 z( b+ O' a! F, O$ r* Xtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
0 `% y2 C1 Y8 Ctypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
- B* Z. H9 N" x$ Ytypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
0 `* F! u; B9 |! _) z# vtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
1 |5 n5 [: X. G& x- l

' a) a' `) D; O8 }# \  q* `5 ltypedef DWORD (WINAPI* TGetBestInterface) (
: C( f% w& W5 l  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);


typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
& v2 G. e3 R3 l! e3 ~/ n8 t);

# O' ]8 m9 ~* v
typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
' T+ m1 D% A9 j; O- |  k1 c0 T$ [2 _
9 J0 l0 O# x* a& Y! v
; Z0 b2 C( r! hCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);

9 G% @+ @; K1 C) b9 F" Z) G
class CUPnPImplWinServ: public CUPnPImpl
% [' R- B+ F5 U, v. n, I{
        friend class CDeviceFinderCallback;
1 D- i0 C3 p  P7 H        friend class CServiceCallback;
// Construction
public:
; f) }! G& b0 K9 r4 H7 a1 o        virtual ~CUPnPImplWinServ();
: F7 a% n. ^+ w        CUPnPImplWinServ();


7 G, @2 V2 s3 \$ q5 o7 ^        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
) J) Z3 A' ]9 l7 t; F        virtual void        DeletePorts();
        virtual bool        IsReady();
& H9 L) F0 V$ z3 Q3 V2 F        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)
        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
  A; c- m3 R/ y        virtual bool        CheckAndRefresh()                                                                                { return false; };


! ?# T) x! h2 Q; Mprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
# I- ~% I$ J! ^2 `' q4 T& F: U        void        RemoveDevice(CComBSTR bsUDN);
( J% R* l) F5 p# k+ \( ~        bool        OnSearchComplete();
        void        Init();
' k/ U6 o& t$ a

. I' a' ~; Y% ?        inline bool IsAsyncFindRunning()
; A* ?. {' ~5 e9 v$ d- J* M8 g  {0 F        {
- ]' L- ~& p9 w! W' h                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
0 J& g9 m  s0 a, U0 ?                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }
' V) d! A; x% p, m2 M8 h

& @! O. ~5 f. ?' m+ \        TRISTATE                        m_bUPnPDeviceConnected;
* |  w# h4 u3 w. Z8 z1 @7 K) p

// Implementation
        // API functions
' x$ M4 g6 H7 d. R4 m+ t3 d) B' J        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
8 k5 s5 Z  P) q        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
5 o: B  d# E5 r# c/ ], m

9 p+ s' X+ Y& N( Y8 e        TGetBestInterface                m_pfGetBestInterface;
, ~! a9 i% F0 Y# {        TGetIpAddrTable                        m_pfGetIpAddrTable;
% u& v5 f) N* E5 {; e% h        TGetIfEntry                                m_pfGetIfEntry;
7 }0 h/ j5 D, Y! V2 H

" Y+ k3 O) x6 H% c: [; l$ X, p        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
! q) O/ o. a8 ?) Z+ P                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
' D7 B& G1 [: h. C                result_type operator()(argument_type device) const
                {
5 G% V& q6 a. q7 G                        CComBSTR deviceName;
5 T: w6 C! A0 h  E) f  l/ ?                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
1 U/ ]7 B) d) p0 _( [

+ d0 Z/ X7 l# X$ k                        if ( FAILED( hr ) )
  e  e3 d$ A! c1 G                                return UPnPMessage( hr ), false;


                        return wcscmp( deviceName.m_str, m_udn ) == 0;
; M) s3 [5 j1 Y' n+ Z6 j                }
5 b$ x1 C- m2 s) w' P                CComBSTR m_udn;
        };
! b7 J! F. g4 H6 c! x9 }       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
. \) {0 O/ z6 ^; C0 B        HRESULT        GetDeviceServices(DevicePointer pDevice);
4 v3 ^  @1 F5 C        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
+ H, Q! Y; `  R- o  w! A        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
4 @9 p# B+ T$ Y6 j/ B' c3 ]) j* D                LPCTSTR pszInArgString, CString& strResult);
, K; D% T; }& E        void        StopUPnPService();
/ }. N+ n6 K( Q: \. e' g. q

) B/ K; C! h" y" o5 k        // Utility functions
: T9 c0 G- K  f        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);
( I: p. M) _9 j0 J* c8 x        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
/ S: F1 t1 q$ A3 U' X2 c- ?        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
0 l2 I3 j4 N) r5 E+ N6 n5 c( q7 ~  ?        CString        GetLocalRoutableIP(ServicePointer pService);


// Private members
6 D2 K* Y+ s' G, U9 Fprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
9 M9 a' r2 c, G# @; f( D$ N" D% [        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
3 }. c5 j. ?/ X6 L% J* O

2 x- A4 r3 @/ |        LONG        m_nAsyncFindHandle;
5 g; [4 }% B/ V        bool        m_bCOM;
" K' x4 K& P+ q        bool        m_bPortIsFree;
        CString m_sLocalIP;
# \$ H' B+ c: Z0 i) @* r; s! ]# N        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
* r  Y+ R* q, P3 C5 T4 d! J4 v& j        bool        m_bInited;
7 r! L2 M7 o4 i9 o8 g) n        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
9 ?# r8 `7 J7 v8 H3 b        HMODULE        m_hIPHLPAPI_DLL;
0 U; h" o' }5 L# ~4 U        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

9 Z/ W  y% i* C. }! m6 y8 o6 ]- G3 j
};

) {- Q5 \, t& y6 B  P$ g
& x% y2 ?6 Z% b/ [. b! L4 q& D3 [// DeviceFinder Callback
class CDeviceFinderCallback
& S5 H' b4 s- I9 d! B3 [        : public IUPnPDeviceFinderCallback
9 Q3 D( ]* C* g& y{
/ I* K) F7 H7 g) ~9 \. k/ ~public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }


   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
9 r) b) ?1 s4 c% K; X! @0 ^   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
, K6 @& X+ y; _1 U, A7 p4 L1 V. |+ S        HRESULT __stdcall SearchComplete(LONG nFindData);
2 y) M9 k" V& i" c; l
' k1 U3 F# k: f. g2 j3 p( D
' \( Z( y9 h3 Q3 B9 u+ cprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};


// Service Callback
4 u; r- s7 X6 o& ~: Fclass CServiceCallback
6 D( D! m7 b/ T/ b        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
6 G" {& t: e5 {: @, _                : m_instance( instance )
+ {- O2 X. P9 u7 B        { m_lRefCount = 0; }
   
. r7 P# G8 _  l- _7 j   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
2 w6 C' h% r) N2 \  q6 a$ t   STDMETHODIMP_(ULONG) AddRef();
1 w' n( h3 V2 {4 D' w2 n# G+ |. h   STDMETHODIMP_(ULONG) Release();
& r" I1 U8 G: S9 S! \
3 m! U5 K; |: l: s" ?: ^/ [
// implementation
. F) F& ?4 X5 J- G$ X8 }2 R& Sprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
9 B: _' v4 e" N% \2 u) {; K        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

$ E* u! C+ c: S% c; G1 ~7 K
8 N  @8 L: a( r1 z6 ~private:
9 X" H4 |" S4 t0 a        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
, w+ L: e8 u( q" C0 u, w6 O# R) Z};
: S6 B! Z5 c  H4 |
/ ^9 I$ V% c: ?( m$ D( X
/////////////////////////////////////////////////


9 M: ~# ^+ V2 h; |/ ]) I! S: c使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
2 g3 P) i! c% T4 mCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
1 r  ]' J: Q, E9 ?6 V9 Z6 g+ m: I/ WCUPnPImpl::DeletePorts删除端口映射.