UPnP

天云上人

/*uPnP.h*/

1. 
   ) h; O4 A4 p7 J; Y/ I
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   
5. 
   " p% C* k8 u, X0 b& o! ?) M5 h) Y
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   # R* K; t4 M& M* d% N
9. {
   
10. public:
    * C  y: l  K) Q; [; P7 I! G
11. typedef   enum{
    , h( q, A* g- {8 p
12. UNAT_OK, //   Successfull
    * x( V& v" H) S4 F2 M; g. s6 Z
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
    # O( \9 S7 O( t4 X, ~4 Z8 \
17. }   UPNPNAT_RETURN;
    6 |: f! ~% w3 N' N
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    : P* U7 G: j4 U! u! T% s; |
22. }   UPNPNAT_PROTOCOL;
    * ]7 n- z- b9 K: `
23. 
    : l! k3 ~2 @% j/ N2 ~
24. typedef   struct{
    4 d0 H1 r" J* G& ^, R! ~; N" s9 ]
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    2 ^! Z! E2 p5 B
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    " Y$ J; m+ s1 N6 e4 T1 ~) y: ~
28. CString   description; //   Port   mapping   description
    8 V4 ^- q/ w9 }1 \& W
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    9 b7 ?6 O: B  b# h( p
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    # y# l; {2 t6 y) z4 u! I
36. void   clearNATPortMapping();
    
37. 
    : D$ W  b  i+ o' m
38. CString GetLastError();
    - o9 z1 ^6 g" W. O3 E& o
39. CString GetLocalIPStr();
    8 n: [: v' S& z
40. WORD GetLocalIP();
    " {! j% Z2 I+ A4 A' K
41. bool IsLANIP(WORD   nIP);
    4 J6 o- f6 S$ x! c1 T+ N
42. 
    
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    * f1 H& z4 x+ M8 ~( l
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    8 y7 b3 \. _! s; N! \) B
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    : R" _: m2 z! D" V* H) U
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    3 ?" D' [7 Y2 P- G; U2 b
52. 
    * R% S2 P: p* o5 d) }3 f
53. bool Search(int   version=1);
    
54. bool GetDescription();
    ; f9 O$ D1 i5 m& T! ]- X
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    $ Z5 i$ W3 k& E/ ]; ~9 m
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    9 o) I* w( \' N1 r+ w
60. CString m_devicename;
    , C- H% Q) L  ^* u2 P* k! Q# @
61. CString m_name;
    4 O& S! R7 N: }/ A! D1 Q4 A: n
62. CString m_description;
    9 H  u" A- v7 @$ K7 M- C8 c
63. CString m_baseurl;
    - o4 x( t2 m' m9 i
64. CString m_controlurl;
    
65. CString m_friendlyname;
    & S5 H- m2 H& A
66. CString m_modelname;
    - ~6 q& `& _. D! Q# ^
67. int m_version;
    0 s% [$ u1 I8 y" h: x. x
68. 
    2 a, r# [; Z6 m' x& Q
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    , T( k4 _& M: q* j0 D% p
71. 
    . |* n* |8 g' x& d* w
72. CString m_slocalIP;
    2 E: J* \9 E. h
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    4 [0 g, ^1 q- F: F  {9 F
75. 
    # U- U' L  h- C4 i
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   9 m- {2 C& f# ?$ D* p& i$ H% P4 f
2. #include   "stdafx.h "
   4 G( C4 K! ^- B  ^
3. 
   ; Y( r0 V5 c0 K/ k" d
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   ( B0 R8 ]7 L8 M" o3 J
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   7 m) L( W  |. k' T% Y$ W% V4 e
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   ! {& ]8 v; W7 z
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    9 B- s" ~, t8 X# p' g* k! m7 x3 ~
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    7 m( _  f: E0 J) ~: M
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    ' D5 W1 |9 v2 B2 U1 `
16. const   CString   getString(int   i)
    
17. {
    7 v8 c; T' a2 M) Q( d
18. CString   s;
    . F+ c* c  ?0 F. c- a  G) G; U1 N0 [
19. 
    ! k$ X% d( Q0 a. _: ], F1 X
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    1 E% C) [* c6 v& i$ R
23. }
    
24. 
    , n& Z4 l* t5 j! J; E4 `. I
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    . z3 w/ @2 ^3 X  c9 L1 q% ]
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    3 _5 j0 X3 u% i( I
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    6 m* s$ ]) A3 _/ n
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    6 F1 V9 v" ^* M
37. char   buffer[10240];
    . J. E- o& Q$ C9 j- D
38. 
    
39. const   CStringA   sa(request);
    * r+ p" N6 q; s+ @' A
40. int   length   =   sa.GetLength();
    ( Z7 y: X: Z- r( `3 ]6 ~5 ]
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    6 x* `# ]% x$ N6 l0 c: T! j9 h
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    & Y9 I0 p7 Y0 k
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
      q9 O7 e: U7 b2 d; c: j- K
50. u_long   lv   =   1;
    7 W( U/ a$ k4 o/ D1 T
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    1 m5 L+ V  m, P
53. Sleep(20);
    # M# e2 P7 a( s2 \  E
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    / m- L8 |# M# r
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    3 {% |, ~, @$ s3 b" Y. K0 l5 ?$ B
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    
64. }
    3 O0 g1 `8 D$ H6 g/ N7 e, B
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    % A( I9 ~: |) E/ Y. s. [* r5 ?) \
67. {
    - x1 q% J, b  Y. t1 X
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    % U8 {3 {7 L; j
72. strcpy(buffer,   (const   char*)sa);
    % Z3 L& ~4 D8 e
73. 
    
74. struct   sockaddr_in   sockaddr;
    : k9 k( Z5 \% K; L  k4 w8 X
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    , I7 X$ ^9 o* _& ^# n5 l
76. sockaddr.sin_family   =   AF_INET;
    ) G2 B, y* g! P! f! p
77. sockaddr.sin_port   =   htons(port);
    ( i# B+ ]" M& m! g# P  n
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    ! C. i- x/ U9 ^# u' X5 L7 K
82. 
    7 @7 V8 {' y1 J4 S& X' f
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
      U  ]$ \! @6 W  Y) f) _
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    ) v  H- ]4 N% S. f4 b' c- [4 L
88. 
    9 y8 f+ ?& H- C- W# {5 C
89. result   =   response;
    
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;
    6 y% M' R( w) b; p2 a1 e
96. return   true;
    
97. }
    7 q2 q* M9 D; A9 I0 f% p5 Q
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    + w5 x% Z, L5 q% `- i, J" i
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     6 l+ L& i- _+ h8 D
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     1 K! V2 u/ p6 A, ]: @
108. int   posEnd   =   all.Find(endTag,   posStart);
     $ f. e6 L3 Z+ ^+ q
109. if   (posStart> =posEnd)   return   CString();
     " `& |, g& z( |3 `0 |9 Q  r
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     % G' g* Y  C+ o9 n7 l
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     3 K- J! x1 R  Q/ }- n6 b/ Z
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     " k8 N0 U+ o# F  `1 B1 S
119. }
     - d% J4 `5 f! M8 C' I' f6 `, T
120. 
     + `: D7 ~1 N7 h" g- P( C& d
121. MyUPnP::~MyUPnP()
     
122. {
     / @6 z5 ]& d, a1 F! c5 l
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     2 b- F6 ^5 H, w) D1 B
126. search   =   m_Mappings.GetNext(pos);
     ; `, ]5 l: N1 }! `" g$ o, w
127. RemoveNATPortMapping(search,   false);
     
128. }
     ) d3 [9 ~% h# e$ f
129. 
       O' L1 C8 _, W5 |6 g
130. m_Mappings.RemoveAll();
     ( C, c/ @# t- n; H2 A
131. }
     8 x0 D/ X! I3 I5 w
132. 
     ; [6 T6 X0 {$ D7 y2 y6 U: X1 ?
133. 
     : f+ a8 O3 p  n4 y8 {
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     5 `% ~: `5 i- e! t( ?: M
140. CString   devices[][2]   =   {
       K+ `; w5 r1 ]6 S
141. {UPNPPORTMAP1,   _T( "service ")},
     + Z4 p! x- n8 Y  \* S$ y: G9 A
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     - H6 L3 v: n( k6 t
145. 
     + D, _1 C( V& t1 a. Q6 e+ R
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     : x* @+ R% T/ r9 R. Z
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     4 o: |# X. o6 ?; K- T5 Q
150. int   rlen   =   0;
     7 X: i5 @5 o. T+ _4 m
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     3 P  x9 u8 v! g  [% c- f
152. if   (!(i%100))   {
     & x+ R9 F# w8 X" h, C2 N! q
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     - Q  B9 `" w" A$ b
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
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);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     & z$ I) y$ ]: g4 B
159. }
     
160. }
     
161. 
     
162. Sleep(10);
     
163. 
     ; v8 H& x% U/ b
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     - `  y3 V, H1 t
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     $ n: ~6 R7 o3 n, m! d: ~9 k9 r
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     : [$ N1 v2 [  J5 N  D
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);
     3 G/ H1 o, @6 a3 H
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     $ L) y9 x' ~0 d6 q
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     0 a# \8 G0 h2 i# U$ s
178. if   (line.IsEmpty())   return   false;
     9 |" y) I7 D5 h" a7 c6 b
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     - S, ]& A. t% Q' \; y
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     8 U0 d9 P4 r6 a: X7 V
186. }
     
187. }
     3 a! v2 ]0 v4 W. f! y6 H
188. }
     5 w% o/ d. M6 ~* x/ B
189. }
     
190. }
     
191. closesocket(s);
     
192. 
     7 \6 @2 z) @1 x- e
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
' J/ M5 x1 k6 t% f7 ^. G4 @

* D* X7 Y2 Z% u0 h/ O; F" |///////////////////////////////////////////
2 {9 k, v8 H; Y5 d* l//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
# L2 r. m$ @$ r$ X2 t$ Z

#pragma once
#include <exception>
7 o) |2 `0 ~! c, X
! K% ?0 B  A6 t3 Z
4 {) u- j& V* y6 C0 r8 I/ j' I  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
% {9 Y/ m0 b5 r6 Z# I        TRIS_TRUE
. E; r% n: m- @3 d};

& C( u# T* o5 o! E
enum UPNP_IMPLEMENTATION{
/ B  W0 N4 O- i4 J% h% n# t4 b        UPNP_IMPL_WINDOWSERVICE = 0,
7 V- q- x. Z, j$ y        UPNP_IMPL_MINIUPNPLIB,
. H) Z8 k) }& X$ `8 H        UPNP_IMPL_NONE /*last*/
  R4 ]% @, {8 N( C};

0 S% }2 E+ u. {8 I. S
2 @' G; ]1 M& o6 \; N
+ B$ {) ^! J4 [
class CUPnPImpl
. ~6 e3 ]& M6 J. s' s4 q{
public:
3 C- S9 H, V$ f. }% {! F        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
/ {! C+ ~6 a' u9 k+ u5 A                UPNP_OK,
+ M9 X! [0 T( D. M3 a                UPNP_FAILED,
                UPNP_TIMEOUT
  h, r4 U' n3 y% N6 N/ x7 ?* F        };


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
  m& W, G6 ^. r! Q0 R, y4 f; y% |        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
& |  f5 d- [6 S0 l: D, [7 F        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
3 E; g+ }& A; Y4 N       
, P6 w' Q0 G& g' ?/ @        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
& i# {$ X0 e# k) _& ~4 a4 Z
# D3 q! M. R% U  U; x% |
- T# h1 y! b* P; x        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
) j( x" r, ?* Q) J4 _; h3 }& z        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
+ ]  o8 K- m9 ?& a. A5 p        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
1 d: i, g4 g3 ~3 s) N
6 {+ z4 J! [7 J( G0 w/ c* T. w
// Implementation
protected:
& P" n: v, p- ]9 k        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
; a( ^3 v; T8 y. E6 x, \3 T- J        uint16                                m_nUDPPort;
1 S# \" b& k6 q* ?+ W5 {        uint16                                m_nTCPPort;
( `9 q/ [* K) m        uint16                                m_nTCPWebPort;
/ M* ?0 l0 J6 n& e) ]9 F5 [( a        bool                                m_bCheckAndRefresh;
5 d0 Y7 f2 c0 H  E3 I1 {: w
& R$ s% ?! ^) K: ?1 R' h
$ c1 Z3 L/ G$ X8 b) _private:
( z$ v0 ]+ }! ~6 j+ j& B        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
5 Q; E( B) B' w9 J* t! p4 P3 r
: a7 y6 _# h5 @: B( }, ~
};

& X: y# E4 b3 G( V: `: ^% q8 J
/ C8 `! _  S6 ~3 ~// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
public:
; B* N: `! D" T        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
# j/ j) U( x" v/ S        virtual bool        CheckAndRefresh()                                                                                { return false; }
1 [5 p' U; d" X6 }+ O, B& ^1 L        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
* ^; O& ^- ~( T: c: P. J! Y        virtual bool        IsReady()                                                                                                { return false; }
, ?3 Y# Z' V, Y! K3 l        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
7 N$ {0 a$ l7 O' g8 }0 r8 k};

. g5 u% b1 a' ]% N) H. `) o
, J9 a% l; y# S/ F8 T, u" X& g! ^/////////////////////////////////////
  w( K' k# y6 x0 L% ?//下面是使用windows操作系统自带的UPNP功能的子类
& Y- l% O8 J) U
  U% D( s4 P: S3 m, M/ C, T
- ~, v& @8 E* [9 B  ]0 o+ [# }#pragma once
#pragma warning( disable: 4355 )
" `$ n+ f) L* }6 [' _+ `6 L+ |" T

( w+ K# J9 Q# z8 Q#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
3 h0 `* W0 d: g+ p& x2 i( A
1 z2 M3 ]$ g! G2 W1 z& a
* q/ v( U8 Z! x5 Q# p! P#include <vector>
#include <exception>
#include <functional>
( ]+ s- T. |& a1 F* z
. K$ c: ~! }3 y7 `
- k  j" y$ r* e' _8 Z

0 _9 N3 X. h! _& L4 h/ ]typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
* d' j! k$ @" [/ i  j: ftypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

" k( ?3 {2 Y5 [
typedef DWORD (WINAPI* TGetBestInterface) (
8 c3 s3 z; q5 {1 p4 N  IPAddr dwDestAddr,
# t* q7 X7 ~* i5 ^1 h6 b- H  PDWORD pdwBestIfIndex
);
8 |! E$ z& ]4 h

+ S0 Q) G- }2 g% r' Gtypedef DWORD (WINAPI* TGetIpAddrTable) (
" B8 i* g- }6 [- @  PMIB_IPADDRTABLE pIpAddrTable,
4 e6 M; F* ^9 q4 u+ r$ h; |  PULONG pdwSize,
  BOOL bOrder
);
  c+ W" q6 X$ K" S7 k) M
# |9 e* K$ q3 }2 b
. w& y5 {" H1 s  V7 Z' ~typedef DWORD (WINAPI* TGetIfEntry) (
. _+ J# }9 ?/ B3 H  PMIB_IFROW pIfRow
);
& \! c; N$ D& T; g0 {* U

1 V: m3 f, A! ACString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);

6 J4 Y6 B: l3 g: a- ]7 b& o8 P
# x* O# b3 g2 W' X% p; }class CUPnPImplWinServ: public CUPnPImpl
{
9 c( n$ f' }) a8 m% [) e. f        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
: a! d, w% ]9 v  w& T// Construction
public:
        virtual ~CUPnPImplWinServ();
. r% \6 T# c7 P$ ~4 m1 ~' R3 q        CUPnPImplWinServ();
! q, z2 P( |, D  C1 I/ _
/ Z( G0 k, |3 U2 [  a, r
3 F: O  k4 {( D2 V5 r% D$ A" N        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
" ^; w4 h& b- G! _6 f2 h        virtual void        StopAsyncFind();
8 D' u* g3 o* A* T9 @        virtual void        DeletePorts();
, E# F  I, u& ^1 B) ~7 H) C$ c        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

# Q1 [2 D4 y" U! {/ j2 C2 ^
- o* R* }# d: b/ n2 z6 g        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
. S; C2 K4 s1 j, v, u( o  {: f2 T        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
8 f, {3 T: F5 Y; c( @* T  e- |3 k        virtual bool        CheckAndRefresh()                                                                                { return false; };
* c. H! x5 ~# ]! x5 y. B
% S% ?, ?9 T$ D* G" {7 n* A
protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
4 \. g' ~/ f. V$ j* c& ]        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
+ s( F2 n  e- o2 l1 ^0 Y0 ?; Z        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();
7 j% t& `1 `* {' G1 C1 M
2 f8 b+ z' b* ]" j* K
        inline bool IsAsyncFindRunning()
4 q$ |/ j+ m6 \7 C5 q# w        {
$ O2 w6 U. H& h' ]& {                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
4 b. S# M* ~* V4 j                        m_bAsyncFindRunning = false;
/ l0 ?( o1 o; E8 @# ]. r                }
9 w( `( f% B: \' e                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
: C1 |" H) k- d+ E                {
# z4 ~# u& o7 M9 Q: }: o0 l! h                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
; _- E& X3 }/ t1 B- M& g                return m_bAsyncFindRunning;
        }

" Z$ A1 `% J$ f' j: _) X' k; X
. j$ e: ]* `: ~6 X& ^9 R9 o5 b        TRISTATE                        m_bUPnPDeviceConnected;


/ \" f' F3 a7 c+ P8 v// Implementation
8 R  a) L, R3 h4 ^  H2 N$ _+ h        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
4 K! {1 d) y4 G. G: }( J( l% I  ^2 {        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
# s, U* F' R7 E3 s        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*);
4 m7 [1 r; k+ F        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
9 n/ M+ y3 b0 {( n; P2 [! W. Q

        TGetBestInterface                m_pfGetBestInterface;
* P, n* T7 T* B& N/ l0 `        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;
. c$ m/ O; P2 Q
$ S4 j6 e1 K) M* I$ v
        static FinderPointer CreateFinderInstance();
: z+ B8 x. f* h" x( |; Y! ~        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
2 v# C! P( N. l/ f& A                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
% r) F$ w7 o% A1 t9 Y( l$ y                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
9 X4 C. t- ]0 ~: Y% i
/ E* Z& f- O7 r4 [: ]+ c, p
3 A5 n% F3 l# P) M/ ~3 b% I9 O                        if ( FAILED( hr ) )
5 G! ~$ n. ^  \9 O9 t/ z5 N                                return UPnPMessage( hr ), false;
& M! |0 J9 l  h! |
4 S4 [, Z  Y/ S0 O: Z
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
2 _  e* ?& v  F1 `' @                }
                CComBSTR m_udn;
# w/ j1 r0 p  t' R: M$ u        };
2 h' {$ J$ z4 I6 Y- `7 t- L       
7 H% T+ E7 w( _" R, U- c; @        void        ProcessAsyncFind(CComBSTR bsSearchType);
  o3 _3 u: i( N/ |        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
6 a: _, a! }, Y8 K        HRESULT        MapPort(const ServicePointer& service);
- \* p/ }  E$ G3 K" g        void        DeleteExistingPortMappings(ServicePointer pService);
/ F' T3 ~( P. I- K- H& n& B        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
, @8 p8 ?# |* m" @                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
1 t; A! M& _# k
& u; A& d) I+ J% H+ L4 c% m) J
4 M. \) {$ ?1 a: O7 Y$ Q4 t        // Utility functions
1 v; z/ t2 A' k# B; m& ?# E3 M        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);
$ A3 @  l7 I# q, ?        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
% J0 i3 O4 _: J" L. o) j  ]        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
3 }* V" j  g% L6 `- ?7 n, V( u        CString        GetLocalRoutableIP(ServicePointer pService);
3 d& l6 n$ q0 t' U! p0 f, d, h% u) _

// Private members
private:
9 D8 v2 b3 m7 ?1 W9 y) y4 K. e        DWORD        m_tLastEvent;        // When the last event was received?
" m) R7 L9 V  E$ ~6 x. a: i6 p        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;


9 @2 M! N. c) S' j0 {( d        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
6 n. ?7 Q2 s! L  I$ T        bool        m_bInited;
        bool        m_bAsyncFindRunning;
4 J: G/ [% U' G1 ^        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
" k! h1 g4 [" j0 N* l9 [! y  X        bool        m_bServiceStartedByEmule;
, G2 F4 k- z% O* L; \7 y) F- t        bool        m_bDisableWANIPSetup;
& z% d# g- Y- T9 O        bool        m_bDisableWANPPPSetup;

2 a! l6 Z' k; M& @# Y
};
" H0 Z! t7 {$ E# K' t

// DeviceFinder Callback
class CDeviceFinderCallback
; e& f) P8 y# B" H" C7 Q        : public IUPnPDeviceFinderCallback
. r, N$ l8 v6 E1 N- v{
# H, R  a+ }4 |7 F% ^( Spublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }


: M( Z* I/ }6 W) e5 q2 e8 q* C- h   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
4 e/ L* }" T: q   STDMETHODIMP_(ULONG) AddRef();
: a  r) e1 N" K0 H   STDMETHODIMP_(ULONG) Release();
$ z8 _4 w2 O6 y

// implementation
private:
: n6 J) d, p1 H* O$ n! \; @        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);


! _! l" ?8 f, b" `6 j5 O$ Hprivate:
; @1 w/ u$ o8 u& x5 K        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};

8 d/ C  K) z5 e8 A
// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
* G7 A$ E9 k: n7 X+ T{
public:
; R; Q* w2 N& w5 K1 K  u8 W        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
+ F; E" _8 O% h        { m_lRefCount = 0; }
. m8 o! g) u% H4 Q2 K   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
, `& J5 ~$ ?7 j2 e, F& m# z4 W   STDMETHODIMP_(ULONG) AddRef();
( f# z- U7 M8 e8 Y- p+ v   STDMETHODIMP_(ULONG) Release();
4 w, m: M2 N+ T: i6 n

( D. v2 H  f! y6 N* m$ f3 S// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
/ V% v1 ~3 A! c
% d: d5 ]; p9 o
private:
2 w0 v& B& F. }8 n' L' D        CUPnPImplWinServ& m_instance;
4 d4 Z9 m% N. N, C8 G! M( O        LONG m_lRefCount;
};


" s8 O# m6 X9 O( j3 b: a( D/////////////////////////////////////////////////
1 P  O( }+ y1 d2 ^( M9 [
/ d, R- f! @* s- Y% w$ h
使用时只需要使用抽象类的接口。
& Z8 j: M8 \+ G/ L& S( P" @CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
% N( Q5 D7 m$ c" k+ HCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
) e, k* }+ q0 z6 M5 n; L( YCUPnPImpl::StopAsyncFind停止设备查找.
0 q6 [- g8 T- H- x7 l! ~4 e9 yCUPnPImpl::DeletePorts删除端口映射.