UPnP

天云上人

/*uPnP.h*/

1. 
   ( A  y% f1 q) n( N
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   
5. 
   ( q0 x# u$ S7 m, `8 s9 F4 @
6. typedef   unsigned   long   ulong;
   9 H/ e  C5 f, j& U
7. 
   , r3 ~7 P2 ^" t
8. class   MyUPnP
   
9. {
   5 n# L# e- O2 i; w4 @' U) }+ y
10. public:
    : {* Y+ Q7 A" j* O  J3 b
11. typedef   enum{
    + h+ x; h' u* A, @; V( p9 n
12. UNAT_OK, //   Successfull
    5 j- R7 q- y3 W: N" H
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
    1 ~3 z, _6 t: B8 a
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
    * O6 V+ c5 {$ S, ^
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    3 t# x4 t, I: o0 J1 u
20. UNAT_TCP, //   TCP   Protocol
    8 g( f, m) e$ }% a
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    2 f4 }9 f2 r/ {! h. x+ H; }" A
23. 
    # ~  I. [/ `/ n
24. typedef   struct{
    $ o0 S" m& u, T
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    7 e# W  k. t; P/ z' l' z
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    + H% W; Q: E7 ?
33. 
    ! [% v( {; C* P7 x
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    # P' `' W- r2 K  e4 F+ y/ G# T' [5 g& o
36. void   clearNATPortMapping();
    
37. 
    9 N( o5 c/ A2 H% L
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    * s( r" T/ V* s" m' q" j1 X2 m7 s/ X
41. bool IsLANIP(WORD   nIP);
    ; P: m) Z0 q& K" i* g) i
42. 
    
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    . i* G" B/ A( A1 R1 G
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    4 j2 b1 e, H6 ~% Y9 _
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    & R* i, k. W& u! R& f
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    8 a. d' q; }3 {; m- Z
52. 
    
53. bool Search(int   version=1);
    ' O  \% ]6 f9 \
54. bool GetDescription();
    , M: n  L' `& Y: b# v
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    7 v- B  R, j% r; O7 I
57. 
    ; N! ?( N: t1 Z) w3 i; `
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    * B) N% W9 g) `/ E8 M% Q
61. CString m_name;
    % b& f$ }1 Y9 j; r9 l0 R
62. CString m_description;
    : B9 N3 F# Z0 C6 G) r: R$ S
63. CString m_baseurl;
    5 I) O- d- t) m+ J2 F! |- T
64. CString m_controlurl;
    5 \8 Q1 J/ \4 O" [1 Y
65. CString m_friendlyname;
    
66. CString m_modelname;
    , `0 P+ ^( P: _( L  l
67. int m_version;
      i/ ^6 }. s. p3 U
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    ' [4 m2 ^6 X' F& ^9 s% W
71. 
    
72. CString m_slocalIP;
    + F8 I* D5 }  W+ I+ M$ X
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    ; A' `6 u+ x7 _( g) |$ V
75. 
    
76. bool isSearched;
    * [& D- A8 A+ G) s6 f
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   ; \$ q" {" G& H% R* h0 p
2. #include   "stdafx.h "
   5 {( Q1 }: y7 a9 X9 p
3. 
   2 o6 G& v9 q) N, r
4. #include   "upnp.h "
   ; ^0 u7 c7 l/ K, f; A- F- t5 H
5. 
   & v! R0 _9 M) P3 M* K
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   % |1 o" j* ?" n: ~# O6 i
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   ; U3 F/ I  j% P2 H5 U, A
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   5 C% D& _. Y3 S. C. C
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    " G8 I2 R( c" ~
11. 
    4 l$ p$ k0 {4 X* |
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    # @+ k  A4 Z( r5 J/ ?2 M/ [8 S/ r3 H
16. const   CString   getString(int   i)
    : s4 N6 s" o/ S$ |
17. {
    
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    5 ^, t" P% C7 v1 l) t; T$ B/ Q
22. return   s;
    : Q2 d5 K2 ]+ r/ u7 y
23. }
    7 \- W% s; R5 [2 s
24. 
    - b5 K8 A+ V6 E! w8 w7 a* S
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    6 `0 s$ [" ]" Y5 P+ I. Q
30. const   CString   GetArgString(const   CString&   name,   int   value)
    $ W+ {- Y5 q$ E/ q+ `+ g
31. {
    0 X5 H. G: |. x) s* W3 P, t+ x/ {  A
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    , V! l, R8 J, f( x" {4 ~+ v$ y% \
33. }
    
34. 
    " U. m, C* ?8 r5 F( z
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    
38. 
    $ H1 N5 Q3 v+ n) q7 N* F
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    . K5 G3 b! b+ p7 {' R
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    8 [8 m( n; d, q% B' A- I
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    $ `. x/ E/ ]4 X
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ; B% ^* Y; E/ Z8 C0 K8 b
50. u_long   lv   =   1;
    , z% E6 A3 L6 l3 t, q
51. ioctlsocket(s,   FIONBIO,   &lv);
    : n( S+ b# y1 K, X$ t
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    ; R/ P; f2 _* l# c
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
      R$ h5 F. z6 ^- f& g8 G
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    1 I' Y7 e6 m9 y
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    + B  H6 m+ ~8 I
62. 
    2 {+ h' z' e. v
63. return   true;
    " C4 o" u3 Y9 s" W2 W. O7 R: @
64. }
    - r2 [% y& c4 I* W: q
65. 
    + X4 A. w& H) y8 v6 U& @
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    9 U7 G' F( L2 X) n: ]% e+ C. n
67. {
    
68. char   buffer[10240];
    
69. 
    ' S& ?5 V3 B& }
70. const   CStringA   sa(request);
    * k4 D) w; v$ \4 ]1 X
71. int   length   =   sa.GetLength();
    4 G: ^/ e6 {! @! \# s/ @
72. strcpy(buffer,   (const   char*)sa);
    : `5 B8 L* x+ f4 M0 X( _
73. 
      |9 t/ Z3 m; n& u) V+ Z7 @
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    ( V6 p% O. h1 w
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    + x& o, j6 `( H0 v
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    5 e$ J5 ~9 d9 c5 _) \) D- k. N" c2 [! N9 B
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ! O3 Y1 g6 q: x0 H0 d# l
81. }
    ( `7 j' y8 p, c  d( ?0 a
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    , C) ?. T. M# G
84. {
    ( j! i# C: j: T1 z, b
85. int   pos   =   0;
    ) D4 g; s: F8 ]
86. 
    % W' O' ^3 y( r! c( Y
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    ( _) O6 P+ A9 ]' y
88. 
    ! V$ B+ T. u# K4 y4 H
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    , P: `) [6 l  P, K! K# u
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    / T/ \6 H0 |; I5 |4 ~( U
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    $ N7 ]7 M8 H0 w0 J* E
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    . Q4 F) S, h2 K9 e
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     9 E3 I- N4 G4 p+ @5 P8 W
104. 
     
105. int   posStart   =   all.Find(startTag);
     ; \( m4 C" V2 C/ J2 f9 h
106. if   (posStart <0)   return   CString();
     
107. 
     8 G1 J* N8 _: n5 x% `
108. int   posEnd   =   all.Find(endTag,   posStart);
     / [# ~! n# |. I( ^/ Q
109. if   (posStart> =posEnd)   return   CString();
     + c1 q" }, v6 R6 `& X
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     ) z  b$ a! K' U7 a5 h; [. J
112. }
     & x- c3 D& Q" r9 t' C- Y
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     6 U6 Q2 ?0 x3 A# W
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     ( t9 l0 d3 i2 F) ]8 X
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     : j6 T2 y" A4 A+ z
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ' K. y$ h2 F* i
125. while(pos){
     2 _$ v+ D1 k- l8 I
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     5 N, T; j; w. ^
129. 
     + j0 K1 @3 F2 u/ }6 ]
130. m_Mappings.RemoveAll();
     0 T. [$ e3 _0 c
131. }
     + J1 F+ d- u2 ?" a" w  x2 d  ?
132. 
     
133. 
     3 b3 r3 [; K4 d5 v* M6 U9 N+ C; n
134. bool   MyUPnP::InternalSearch(int   version)
     2 k9 m/ B6 E  H$ f0 u) ^) i
135. {
     & Z( [, }! i# y! Z' \' ?' \, H' {
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     $ Q& K3 ?3 a+ m5 q0 ^$ h( B
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     3 `( I9 A5 n2 E* ]4 j0 S
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     ! T+ x4 u) p5 d% }3 P2 y# s
144. };
     ' p5 I0 Q- D; L
145. 
     1 y" c) x2 t" D& O% t/ d
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     ' b7 a$ D9 \& Q( ^! q  q" c
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     9 [/ j9 q8 O  L  m
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     6 Z: `0 n/ K( b
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     + J% }" v9 ~+ U2 M5 V
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);
     ) {  T8 N) O4 D' w7 G5 u6 g4 Z
159. }
     - E6 R% S+ i3 }1 ?
160. }
     6 w. ]" c7 O& ~) n. F5 ]
161. 
     0 s" Y8 U* v( O9 Z  x% ]! O' ]
162. Sleep(10);
     4 p: e, O& {# ]( V9 u0 a2 d
163. 
     " l# M& I, y# @6 z2 w/ a* h
164. char   buffer[10240];
     - Q0 @5 I' ]' @5 a7 r* Y
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     4 }2 W& t' P; I6 R
166. if   (rlen   <=   0)   continue;
     0 w1 O9 M6 C4 x" \
167. closesocket(s);
     5 ^- H( m! T8 b* L
168. 
     . S+ T7 ~) ]8 J
169. CString   response   =   CString(CStringA(buffer,   rlen));
     9 q0 c* w9 q; p- B' n* V5 }
170. CString   result;
     : S5 b4 V& U5 J# `( t6 p
171. if   (!parseHTTPResponse(response,   result))   return   false;
     $ o' e, P+ a) P& T: i) f" J
172. 
     , h4 z" y: @8 f, [
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     ( Y+ ]0 n6 W+ K$ {
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     + V" S! N9 \; W
180. name.MakeUpper();
     9 P% g( s, m9 }$ z* J, ~
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     # D7 D$ Z% u: x7 x% A
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     + G( |4 G- S7 L
188. }
     * g1 \- z4 }, @/ ~/ I+ ?5 |# M
189. }
     + h4 q6 S1 t, p: ~
190. }
     2 P9 E! Z6 G* O" C) ]0 ^+ `
191. closesocket(s);
     - R1 R: n0 F* T7 W5 U& {' t) ~, b0 `* G
192. 
     
193. return   false;
     
194. }
     3 |- {+ Y4 G$ S$ Y) h; R

复制代码

天云上人

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

5 D% x3 P. {4 e2 K; O. o( k
///////////////////////////////////////////
% {3 [- ^. i: q; L) r" @$ J//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
# A. D9 ^' [$ I+ G; p, @& x* Z3 H

' M' C- L$ B9 X& M6 H0 t8 y#pragma once
# l: T5 C* j8 B1 V- x4 C#include <exception>

9 q4 h, f0 j6 p6 @6 h% M# D
  enum TRISTATE{
7 X) `- c! N! u! V4 ^* j* p" c        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
( C: ^7 T* U: M' L* G  \8 g};


enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
4 u' b: G" p$ `$ F! J6 k        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
' H8 k7 n+ v- O5 ]};

5 u, F( U  b6 h, D% ?- k2 }5 N

% b9 ]. q; _0 r) N0 W
class CUPnPImpl
{
public:
% H% A9 I# x4 G3 w2 B, m        CUPnPImpl();
0 l  o3 K7 p. d, I$ g1 k        virtual ~CUPnPImpl();
& Z6 B6 |0 C7 F; S1 q        struct UPnPError : std::exception {};
9 n, H, |6 f( o        enum {
                UPNP_OK,
3 F$ g5 }$ f: j7 Y# E: J" c                UPNP_FAILED,
                UPNP_TIMEOUT
2 s: v8 S9 i% P2 I: ^" N& I        };
8 A  V7 }5 A8 ]2 D4 C2 x# U

: @$ H& ^" M+ u0 M* X        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
! N, T3 ~6 m) Q9 y. E, X1 }$ r        virtual void        StopAsyncFind() = 0;
  B% v5 S; K, l3 R- p! M        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
8 g4 h3 F) J. Y9 u% ~1 J

        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
5 g7 f2 \: `$ H/ c8 m9 _        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
& n$ z7 \! ?; V  w4 e' ?        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
7 B9 m  u6 }8 t
3 P$ A! z: ~  H  B; H, h
// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
9 L0 [- D$ t4 ~1 D" _        bool                                m_bCheckAndRefresh;


private:
        HWND        m_hResultMessageWindow;
9 T: u! w3 L2 X% P5 r) ?- f$ H        UINT        m_nResultMessageID;
4 [6 L% C9 [2 w  ^& V. u* A: _
7 o& O4 J) f. V6 a- [& B
};

7 J8 B  D$ `7 @6 H) U+ ]
" K8 F. o+ c: T; h; I  |// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
( J8 D) {/ C) @, L, |{
public:
# J/ [/ g: x7 I        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
- \) D' ?( W/ t9 P- Q& s4 \/ d$ b        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
8 g7 N# o8 p9 Q/ A- H: E8 P4 T5 B        virtual void        DeletePorts()                                                                                        { }
3 a+ c1 Y8 S2 @7 a8 v        virtual bool        IsReady()                                                                                                { return false; }
! g1 E3 J( ?) q% M        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
, b# N' q+ z7 e$ d# }};
2 N6 f' v8 @$ q5 R

( k( w. e/ {. G/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
  p/ k9 W" j3 W# f6 c

#pragma once
5 t: |" e" h! W; l#pragma warning( disable: 4355 )
2 K: K; A' u) O  V( g
# O+ s5 h) S, Y4 i( z- Y) ?8 N+ }1 E
) v! s/ z7 w5 I4 J#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>

2 H/ z, W' ~7 G  q0 z! m! W' ]/ f
# p8 ?, Y* D: N5 ~: r#include <vector>
8 `" u, k5 l) H4 R9 ]+ Q4 u#include <exception>
#include <functional>
4 [' [8 ~& i& P7 S# w4 N
! O! q) |0 G! v" T; S

2 {' R$ d$ P' Y* s( S& x
& ]& X/ G0 b& q' @9 ^+ R1 }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;
; s. q. a8 e) ?7 t8 h) w9 A1 }" ~typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
! N* h7 {( d, f7 ^& {; ]. [& F: D$ htypedef        _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;
8 J  }2 Z% H$ H

: o, G1 I; i7 z! p. otypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
2 T0 h, I: l1 D! e: b  PDWORD pdwBestIfIndex
. ~% N2 f% T! R: ?);
- Q/ k0 e" r. K' M/ \" M. q

typedef DWORD (WINAPI* TGetIpAddrTable) (
3 X* o- F5 X4 b* S' `  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
" Z* e: [% m" B2 t3 a& A  BOOL bOrder
);
3 I, P. _9 B: ~# |: |

- E, R4 c7 B! F: Mtypedef DWORD (WINAPI* TGetIfEntry) (
1 I5 Q* S+ r4 X5 t4 _: j; ^8 W  PMIB_IFROW pIfRow
2 y2 X, G6 N2 p' O);


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

) R6 R% n! ?' O/ \& G+ w4 F
: C7 h+ [2 V, Tclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
/ V" T8 \2 J' @! C        friend class CServiceCallback;
1 u: m1 y2 ]5 h: E" E// Construction
5 i) [3 e$ i% N# A1 Qpublic:
        virtual ~CUPnPImplWinServ();
0 ~$ {" Z6 ~6 c/ i( T* a' |$ j: J. D        CUPnPImplWinServ();


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
% a7 o+ u1 Q; z9 ]$ \9 \        virtual void        StopAsyncFind();
8 k  V  |3 C! [% \7 W        virtual void        DeletePorts();
* u& S( q  x0 m- i8 }        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
8 v5 o* E. S8 R" F" d
7 F7 i9 M+ Y# A: Y) {  x2 x. q
1 d; w( Z, V& E1 I        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
$ O. f- ~8 ^0 H! e$ g6 h0 L" K        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
/ x8 E6 O7 i1 w# \8 O! a        virtual bool        CheckAndRefresh()                                                                                { return false; };


/ J6 b* s$ [8 t" d  M7 vprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
5 u+ L5 q/ ~7 P& j0 N        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
8 e; S/ ?. n7 P2 z% b        void        Init();

( x1 g* ]& s* Q* a0 k: X
        inline bool IsAsyncFindRunning()
        {
* `7 ?5 ^) l, B8 b/ a! {; f                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
) o3 b) Z  P! s: ~6 v- }% B9 ?8 k                {
5 c8 F- h. z- {3 ?1 y( j                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
3 b/ b9 M& ]4 c) x                }
                MSG msg;
, p/ d( |5 q: b- _' C) m                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
% E, |: {! p6 V0 b+ x                }
3 I1 K  Y7 s3 l8 e: R0 F  c3 k                return m_bAsyncFindRunning;
6 r) D! h! z+ X" ]  \3 [" C        }
# @6 f3 b& P+ c9 w: p5 m% d

) M4 e) `  R0 v4 [) Z        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
        // API functions
6 T1 T' J/ i0 p2 z+ g        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);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

+ W- c% L. G; i3 G; ]0 [- s" e
# G& T1 f0 d0 k- T7 \: n        TGetBestInterface                m_pfGetBestInterface;
' {) E" b6 ^* g: W        TGetIpAddrTable                        m_pfGetIpAddrTable;
9 s9 t1 m  e0 t! Z, f        TGetIfEntry                                m_pfGetIfEntry;
. S9 g. \% C) |' Y1 w' h

  }' {: x. O4 N        static FinderPointer CreateFinderInstance();
/ W2 l( P0 p) p% U5 b0 o        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
+ M2 t/ H. ?' a  G1 [                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
7 `2 n$ e4 \, F" V. s( [                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
" D9 [# I  Z# L( u* g9 @8 [# p                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
- N2 ^6 b* p" B. y, r" ~

                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;


                        return wcscmp( deviceName.m_str, m_udn ) == 0;
& ~# l# r" i- i( T! h7 z0 o                }
) B, r/ j+ n+ S, W' X; J8 O7 O                CComBSTR m_udn;
/ D6 g' S$ M/ c1 L        };
       
4 U  S; _( C) A& w        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
3 D0 V& B" F% ]* z        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
+ p- f1 T! n' g* b        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
) n' u$ i( {4 N) b        void        StopUPnPService();

0 R8 _3 P/ X" X2 A
        // Utility functions
+ M9 P9 Q& N; y+ p, W3 d7 i. U+ x        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
; ?: y' L( H+ S( I5 d- h  H; I        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
3 B5 j  q8 c) p' I7 e        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
) x9 S  w7 U% F6 D        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
7 v5 t% N4 W  h        CString        GetLocalRoutableIP(ServicePointer pService);

/ g8 o! w; P1 R6 \
// Private members
# r7 k. s1 \4 _' n5 b5 v8 X! V' uprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
& b( Q) a+ \6 S% m/ `        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
$ I- Q( q$ D0 b9 F$ p4 s, P1 R        FinderPointer                        m_pDeviceFinder;
0 @0 m; E- x2 O3 ~/ b$ m" k        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

1 y9 v# g4 q4 a' G4 D7 Y) @% S
3 |, V( y# o) @! W: h+ |        LONG        m_nAsyncFindHandle;
5 {& |, B4 {- B3 r        bool        m_bCOM;
# }$ ], i1 R4 B" J/ d        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
, r, L8 B6 M# p1 Y- t& U; b        bool        m_bADSL;                // Is the device ADSL?
0 x: C& J. C3 q( y- o. Y        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
- o/ r4 P. k) K* P0 s& P        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
: H0 f6 `" x  Y        bool        m_bSecondTry;
9 E' ]: \/ k! `        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
' ^8 ^1 t* N. L        bool        m_bDisableWANPPPSetup;

8 G' D5 L0 _  R. n$ ]2 U
5 P1 R/ q% E4 [3 \  |% s, P};
$ C; }, p  P( Y1 \6 H' H+ h6 Z
( r8 y- `7 r! B! }
4 x! m1 B0 n$ v) {+ ]& Q// DeviceFinder Callback
. `$ @; ~' I* R# t! E* j* }class CDeviceFinderCallback
0 V6 X, Y9 u  U$ `) V2 T        : public IUPnPDeviceFinderCallback
{
+ D' ?; e1 Y4 S+ o$ C0 H, }5 \- bpublic:
0 ~  E& m& R" p/ x( v4 c        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }

# s" H0 I. k- p# W8 d. h' S  S7 Y
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
# }$ W& K0 D; e# S( u1 {   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
6 \  M! X# R1 F/ t8 H& U
* k" O& Q4 t+ X( H% K
// implementation
private:
3 _' A5 F" c9 q! D. D) @        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
" {4 i7 o" n' @! }5 Y2 M. n        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
+ Y9 |" C# _4 ?6 P5 T+ h4 ?9 ~        HRESULT __stdcall SearchComplete(LONG nFindData);
% K5 `$ r6 X9 |9 Q

9 ^* W7 q+ @: d. G" A$ |private:
6 v: H2 n! v( g6 |        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
, X" @1 L; q( Z9 g# r# u' Z! a};


// Service Callback
- l# d: E) Y, r! N( Z) Nclass CServiceCallback
& _! x- J6 k6 m+ U. W5 _/ v$ F) f        : public IUPnPServiceCallback
% ]: r% m+ Y% l! W8 v  v{
; Z6 W7 C6 Z7 opublic:
        CServiceCallback(CUPnPImplWinServ& instance)
, D# U/ r7 ^* L- V) R& I                : m_instance( instance )
        { m_lRefCount = 0; }
$ B1 Q$ F, B9 `2 C9 T& F   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
" y' L( z5 R: U- c   STDMETHODIMP_(ULONG) AddRef();
3 ^0 p& B6 s' V( W& A. i   STDMETHODIMP_(ULONG) Release();


// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


! C' z' J7 q7 o2 f7 c$ I, ^7 }private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};


( l' M% W9 V7 l1 s6 t/////////////////////////////////////////////////
# I  J& T) _+ O) G

: }. L6 W, G! Y. x, ]" Q! n使用时只需要使用抽象类的接口。
4 V/ V6 v& Q$ ]0 \) b$ ACUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
3 N2 I0 |' s" w5 P& R9 s) VCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.