UPnP

天云上人

/*uPnP.h*/

1. 
   2 s) r" {$ l. S
2. #ifndef   MYUPNP_H_
   
3. 
   ; v- a2 S' R! s) E4 q2 d
4. #pragma   once
   8 j8 }) L) m. [: s5 W8 H
5. 
   # H( q: ~- a/ q% [0 @' \
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   
9. {
   
10. public:
    + C4 r1 D: X0 x, _0 J/ I6 ?
11. typedef   enum{
    / M0 I* I% M8 r1 p" E' O
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
    # R4 h6 ]1 c. D6 U) Z. z3 P$ z
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    , H2 w; X+ O" Z+ D$ l: S
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    ( s& T8 z3 t# \) p
17. }   UPNPNAT_RETURN;
    , ~7 ]; c7 J! _
18. 
    : O* y4 Z( J6 ]& [
19. typedef   enum{
    ! D) i1 `1 z9 a9 N& r* U# w) l
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    8 F; S/ w* O& w$ R: g
24. typedef   struct{
    ' r4 v( V( P* q8 E, D
25. WORD   internalPort; //   Port   mapping   internal   port
    $ u: B, K, x7 S! L( _  Z  I
26. WORD   externalPort; //   Port   mapping   external   port
    ) ]% D+ @. [  }7 b2 m3 e2 ?7 J! U
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    8 v0 }# \' p. b: W% G8 \
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    ( ]7 c& @6 `; l! v) g- z
36. void   clearNATPortMapping();
    & @) a& T* u* n$ B# I. i
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    
44. void InitLocalIP();
    6 R. {- X: y$ W( n2 B
45. void SetLastError(CString   error);
    ! Z% p& T; \( `% d! Y3 U! T& C5 ]* [
46. 
    3 l: R. y! f$ \, f0 l5 n0 w* S
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    / p. _$ i) a" v9 @" U' `" G, o
48.       const   CString&   descri,   const   CString&   type);
    ! \0 k" g4 i8 B6 W7 L, b
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    - Z0 w: p' B) U% F% M) r
52. 
    - ~5 q7 Q" K2 o8 K: d8 A
53. bool Search(int   version=1);
    / z: T  ^# g0 d# ~
54. bool GetDescription();
    & `8 Q6 g" @6 `
55. CString GetProperty(const   CString&   name,   CString&   response);
    ' i9 l8 l, L# i8 L
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
      X1 l* Y# q# f& u. u; S( J) u7 |
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    / G  N+ ^9 I! q
59. bool InternalSearch(int   version);
    : a6 j' r) Z4 \
60. CString m_devicename;
    % c. d* U1 V- J9 e' V, O
61. CString m_name;
    9 O; E5 @$ Q0 \) o5 B
62. CString m_description;
    # }5 o6 t1 p4 e5 e5 g$ _  H8 S
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    / S% r' Z9 N2 A% E$ y1 I( x" J" ]
68. 
    
69. private:
    - \- `3 H  v9 |
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    1 M9 c2 _' B' U
71. 
    ( d" i9 F2 C3 q7 G$ A/ ~
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    3 }. ], K# ^& F6 s. d# R
75. 
    8 C2 f  ]8 k2 Z
76. bool isSearched;
    ) H% x  ~/ e4 W4 o6 W% r
77. };
    , b% }# B6 q  ?2 B2 `( C3 o
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   : N! r9 Q4 f& F( R0 H& v4 z
2. #include   "stdafx.h "
   
3. 
   ) p% B# j  P: F5 x
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   ! i- W  a9 i7 b
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   - ~) i2 M; s" ~3 q
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    ) V5 Y' A( |* ?0 i; O/ G
11. 
    $ x/ p8 C. e9 ]3 `
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    + x' t) i" z. E: {6 F$ l! ^* M% ]- J; _
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    ( I  D. j# D7 c; h: x- q; g
15. 
    
16. const   CString   getString(int   i)
    
17. {
    ) m# T& t- f- V# x( X, q
18. CString   s;
    + V1 N% b! q' Z% a$ n
19. 
    
20. s.Format(_T( "%d "),   i);
    2 Y# z( @& f. ~# u) X& H$ C  g8 v
21. 
    
22. return   s;
    ' |% }) C- h9 {- A5 H
23. }
    : a2 [8 O% ]. _. F
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    ' _$ m+ e8 M8 \/ y8 n: {
26. {
    ( ]9 I$ Q5 Z- `$ d, U, `
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    , o9 S$ ~) e; h- Y9 v9 |
28. }
    3 i# g1 A* w/ @% J
29. 
    ! K* s6 z6 R6 t+ m
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
      ]' t' X6 c0 |7 W
33. }
    0 Q% Z$ \  a, l# f- J, ?! ?: Y( T
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    ! F  t. S7 G# [/ V
36. {
    
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    : g6 \# }5 M, z- @8 z
41. strcpy(buffer,   (const   char*)sa);
    4 F. E1 [" ~* N7 ?+ F$ |
42. 
    3 C6 C0 C$ @8 j7 `3 e, A: r
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    ) N# b  X9 ], N1 `3 K0 |. Q
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    - ]7 ]: }$ r# A) A
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    $ J! Y% \, ^1 c1 S7 j) t0 C8 w, m
51. ioctlsocket(s,   FIONBIO,   &lv);
    8 a+ T0 E, O! g
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    ! I+ @# n( i) d, P, a6 x( k
54. int   n   =   send(s,   buffer,   length,   0);
    2 Z* j; H6 j  G9 I- L9 u) l% H
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    - k) a; r/ u" @' h
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    : ?, l& _, V" z  X7 s
59. if   (!rlen)   return   false;
    
60. 
    / i1 P* d! Y$ X5 l7 Q9 w
61. response   =   CString(CStringA(buffer,   rlen));
    * h7 L& {' w  S9 \
62. 
    7 t8 |# M: g" b; L% j: ~
63. return   true;
    5 s% I$ q5 s; o
64. }
    % v( M  j5 z; z* \/ X( G* _) X( H
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ( K2 ?0 v4 j7 c% j& m* K# t
67. {
    
68. char   buffer[10240];
    
69. 
    / z6 C. d' E8 U& @
70. const   CStringA   sa(request);
    6 z2 i/ u( f* [7 R
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    " U1 w3 y- D2 _* e. B0 l
73. 
    
74. struct   sockaddr_in   sockaddr;
    & q: L- z) T: Q8 Y. e  H+ X
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    6 j+ U% P, M: V- ^3 B
79. 
    & Y1 f0 i% |. C" ?4 J# D, ]
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    / i* p* R6 q# h. D' ~
82. 
    ; _! {- o/ ]1 f4 i3 ]2 Y6 A# X
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    - N3 G- g  J$ m0 j/ M* Z9 n
84. {
    " G+ \& _, X) x# j0 R
85. int   pos   =   0;
    
86. 
    8 w0 ?3 \  a5 z4 K
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    5 J( m# h( s6 ?: r
88. 
    2 c6 _! n) O6 \! D- k9 f4 w( o! U7 c
89. result   =   response;
    0 L  W7 ]/ E6 F4 W+ n9 [
90. result.Delete(0,   pos);
    5 h4 J  ]- G- \* r
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    ; _; ]: y8 J. o5 N( p
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    : I; S$ q# E8 G' Q  c! o+ x8 W
96. return   true;
    
97. }
    + [; w2 r8 F2 W, Y# |% ]
98. 
    / u7 w( h1 [" T7 j8 A! F! n: Z
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    2 n; w( P7 k: j! V: D
100. {
     ) n& u& C- e0 Q1 s. V" q
101. CString   startTag   =   ' < '   +   name   +   '> ';
     ; e# t% C& q8 t/ M) s5 L
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     # C8 \2 c) l1 B, b
104. 
     2 Q+ X4 Q7 W# V1 y
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     ' ?3 B/ y- p/ z- }6 b3 ?
108. int   posEnd   =   all.Find(endTag,   posStart);
     / w) Y9 z- E5 Q/ N# A  w! {
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     ( x) [6 i" ]/ ?; \: q
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     / S/ J5 z) b0 E( P/ A
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     / T' H' \+ e6 a/ ]
116. {
       w$ J( d! |4 ]$ W, J- g' l
117. m_uLocalIP   =   0;
     & u( j7 i; ~; i7 O, Z* u" G
118. isSearched   =   false;
     
119. }
     - ?& S0 f. `# r' z, X4 J
120. 
     1 l$ i$ W6 \9 j
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     % |; q: {, J& g& g7 k6 Z# t
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     0 y& `3 ?9 j" A* m2 F
129. 
     - J  U0 A' l% \+ V
130. m_Mappings.RemoveAll();
     ( g: X8 j9 a4 \4 [8 @% y" e* i
131. }
     7 v; B" {; z, G( X
132. 
     
133. 
     ' ~& J; }4 p8 Y1 g* W
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     ' d% e% h/ U- L( J2 o1 \' [* B
136. if(version <=0)version   =   1;
     3 M$ j8 N: f( s8 A5 R* U$ q$ F
137. m_version   =   version;
     ) v3 D3 o1 V! T$ l6 E
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     % S5 y2 c$ I, m2 K
141. {UPNPPORTMAP1,   _T( "service ")},
     ) G  @- ^5 R* l' @8 g( U6 x
142. {UPNPPORTMAP0,   _T( "service ")},
     * X/ Q; ^* y. S" I$ t
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     ) {! @8 }, |9 X6 V! F, A* F
145. 
     2 d& a0 b. W& Z8 }- ]( _
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     9 ~2 s! L/ ~; l5 t8 P. X+ [
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     * |" d+ c; d! s7 D/ J% x
149. 
     
150. int   rlen   =   0;
     / ^( L* }# |0 n, I! _8 K# Z# u
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     ! P( Z' W( d/ ~# y9 q- n  i: G
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     
157. 6,   m_name);
     3 D' J+ Q0 m2 H8 B) P! e/ w
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     0 \0 d8 P8 |' @5 |+ J& {3 L
161. 
     $ M# g% M; K! U2 A
162. Sleep(10);
     1 r+ ]6 f" ?$ ^  @6 g
163. 
     % w; k# N: K; m: o# q; n4 l. S
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     : |0 t6 x& N$ ?1 l. C
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     : }) V  ^2 q9 u7 y7 O( R/ D
171. if   (!parseHTTPResponse(response,   result))   return   false;
     0 j) S7 ~* O+ ?7 E  j* g) b
172. 
     ! c' w' I. }; c0 r! Y
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     ; k# O+ j  w. }2 {' a# G  o1 z
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     1 A7 q! d6 V3 P8 u. i" j5 @
175. if   (result.Find(m_name)   > =   0)   {
     . J3 _  t3 {( i
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     4 C/ P6 l# v& R& i  J1 c8 x; [
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     $ k8 F: {6 j* g/ n9 G! M
185. return   GetDescription();
     
186. }
     1 S" z6 q, P% t" w$ c5 O% R+ J
187. }
     " s2 U2 t( q0 Q6 B% H) [5 m
188. }
     
189. }
     + H6 Y" b; G$ L. l2 J
190. }
     1 i6 _# T+ u9 K; L2 a5 U
191. closesocket(s);
     9 _! h- m+ x5 ?2 V5 ?7 T+ |
192. 
     8 W& o3 }; S( t4 j) f% h( W
193. return   false;
     " I6 ?+ W, q- D7 @% ^& G
194. }
     5 g- h3 F& s+ x: D5 K$ o' U- i

复制代码

天云上人

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


///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
2 P( k$ u& f" q' |$ ?7 n' Y
& s0 u4 j2 j  l8 g9 [$ {- e5 l
% W% T; [% U% }5 H- ?$ n) w#pragma once
#include <exception>
2 t7 |: V# L. z6 ]& L1 Q( f  z

  enum TRISTATE{
8 l( \$ d: a* b$ m/ ]- @( n2 q        TRIS_FALSE,
# _  R, J+ z& b0 {; J1 K8 A* z1 a        TRIS_UNKNOWN,
( y1 c( y) C& R# @9 n        TRIS_TRUE
};

3 ]! M5 x* d5 A: ?) e: @
  ^% Z$ O( l! m6 v8 ^( Ienum UPNP_IMPLEMENTATION{
8 k5 C- l& G2 `4 s! ^) N$ m        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
. C1 o" t5 L$ G2 h5 u' u! i        UPNP_IMPL_NONE /*last*/
+ D4 o6 N% j$ ?/ G+ H( o};
6 ]! n' @: j+ \" Y
0 Q1 ?) F* _2 y1 x
& O' @' K' A" V! B1 U" i

6 c8 \1 C+ T3 d; F: `class CUPnPImpl
{
public:
6 y. J+ y% x2 U! r: P        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
+ Y- {, x+ G, R7 G" W        enum {
                UPNP_OK,
" k2 U, U, o9 u( y# H                UPNP_FAILED,
                UPNP_TIMEOUT
% Y5 S* v' y4 U% i# p+ K        };
+ {7 N6 w/ ^3 n+ o
4 S( p4 q, C, E( R+ A% a
5 X' v$ x& D& F        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
- W8 W/ U7 I$ A        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
5 q8 S+ g! f4 V9 K% M        virtual void        DeletePorts() = 0;
9 G5 h) j# X1 B! _1 B- G: R" n        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
9 X( @# x; t9 r. b' _        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

9 q* V$ d1 d1 U; c1 X: H
0 [3 Y5 S! Z" y& h+ \/ ^- p        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
; P3 Z7 I" Y0 j  O# d/ y+ |  D/ x        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
8 k3 `' j0 I) l6 v" f        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
3 n/ {  Z4 {% z8 K: ^: Q
; ]5 Q# ?! q; V* U& _" h- x6 z8 I! j
// Implementation
7 r& c" r! @* v% w6 }& Iprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
0 P2 g' V/ t- ^+ h        void                                SendResultMessage();
: F8 W8 f7 Z# A7 ?- B9 O        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
! V" g! j3 f9 V- u, h& c) N3 D, \        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
+ ]/ _& q' V  z. z+ E- h  e

$ s' J7 o1 y' K* m5 F6 U5 A  jprivate:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
- \# Q7 k1 n6 u4 Q3 R

# K0 B& |- ~. E7 |  |};
1 i8 t. G' U3 R; {! V) i( q
# e9 B0 t3 s# ]* _% B$ O8 S
// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
7 n7 z1 A) B% t$ ?+ r* b{
% |* d( f" n( C" e' H* D& b: zpublic:
. Q- p8 n. r5 f% M+ j  t        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
1 z' N+ B1 d, C/ Z  ^$ L% E6 Z        virtual void        StopAsyncFind()                                                                                        { }
/ `3 |: T8 l, W2 l0 `- c        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
1 [, C1 u5 g( M/ c/ k+ T};
, W: h. H& F0 V  f0 N6 ?$ t
. k+ X7 r9 v( [
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
1 D& z. x# t0 s! P6 T, Y
4 p  q8 E# H, b' S8 x7 Z
3 H  W) u. x+ N9 Z$ e5 c& n#pragma once
#pragma warning( disable: 4355 )


+ m- ]9 [5 u0 u/ a#include "UPnPImpl.h"
#include <upnp.h>
! |: p% W+ r# D7 s, r/ p#include <iphlpapi.h>
/ A; N# n" Y0 Z#include <comdef.h>
#include <winsvc.h>

: c- Q$ \; y% a
: @4 H- Q5 B+ E2 A. q#include <vector>
( ^, T/ I' _6 @$ C#include <exception>
( n0 E% o  d5 N% O. S* `# L$ i5 l#include <functional>
* {! L1 k8 N/ k5 t
  e% a/ h4 V2 s: i( S


typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
; z! B$ ^3 j$ i: Y) Ftypedef _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;
) \, r# W- e* Ztypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
4 f+ C8 C9 N; C% G$ D3 W

# c4 H8 J% O2 A, Itypedef DWORD (WINAPI* TGetBestInterface) (
( E- `+ E( W% R8 x0 A4 L+ a  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);


2 Y; C. w2 o/ O+ \- B8 rtypedef DWORD (WINAPI* TGetIpAddrTable) (
. e  a$ h  j9 ]% q8 X7 o6 `  PMIB_IPADDRTABLE pIpAddrTable,
) i0 f2 ~$ @! f+ _: C  PULONG pdwSize,
, X' d- ]7 s( K) L# N) T  BOOL bOrder
);


typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
& z+ Q  S& s* i# z8 L4 v2 a( @
: o- K- N" M: a( W' V- ?8 e- l+ R, c
CString translateUPnPResult(HRESULT hr);
) O9 v7 m: U/ D* }$ S  o* ~! y9 cHRESULT UPnPMessage(HRESULT hr);
. f5 m# y5 r$ D3 C; j: H
8 ?2 f+ H( _7 _5 s: x7 [: _1 q9 x: G
class CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
  A( A4 f% Y. [1 F+ s        friend class CServiceCallback;
$ t# z% [! n7 L9 l1 T/ W' f# |$ Y// Construction
public:
        virtual ~CUPnPImplWinServ();
) {5 a/ z' s% z( Z# U3 r        CUPnPImplWinServ();

! B7 x8 P% Q2 r
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
( f+ ]- `% x' W0 u; R        virtual void        DeletePorts();
        virtual bool        IsReady();
6 o6 N# f, Z" j4 ^$ ^9 d* P: ^5 V4 i        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

- b5 \) ~7 |: k
        // 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
        virtual bool        CheckAndRefresh()                                                                                { return false; };
# T9 y/ c! [7 N4 c% q$ b1 s

protected:
9 g: x0 d5 m; w* o        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
( n2 O6 a5 U. l4 y7 h5 [. D: a  @        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
8 p% Q" [7 k/ H7 Z5 k) U        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
7 u/ @0 I" g3 D$ A1 D        void        Init();
! a0 |! h+ ?5 i8 @5 K, m
( o7 y$ r, W& v' M
$ X$ z1 Z9 S! C0 o3 Q; _        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
& l+ |' j7 c0 I3 f) V/ ?) z                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
2 \( }4 t, C8 W                }
                MSG msg;
! ^( c, c1 \. F9 c                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
# m0 [! z8 {6 H' A& }' a& _                {
/ F1 T  D; ]' O% f! a0 Z7 }  g" e( r                        TranslateMessage( &msg );
; }- n/ n' P( }8 i4 A3 S. Q- q                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }
) \; o( |% i% s- k' V  @. @, J

        TRISTATE                        m_bUPnPDeviceConnected;
4 h( K! E- i: _# J- A

// Implementation
        // API functions
) t+ g6 R; j$ m+ \  \( J8 n0 b; L        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);
' O1 @( e) }, i2 c1 u3 I/ M3 P        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
" A1 R* v2 G. T( J1 H, M, O        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
: l. X" A$ k; Y5 k        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

' W, F; O& U3 X2 M! d# k0 P, W
        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
4 d7 p1 M- F. f        TGetIfEntry                                m_pfGetIfEntry;

/ _- ^6 L9 Q. e  Q  Z* |# C% e9 f" B
        static FinderPointer CreateFinderInstance();
- A* t1 S# X9 g3 x- s        struct FindDevice : std::unary_function< DevicePointer, bool >
' M8 \+ J5 F' N/ w+ g        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
  u, u5 P, d9 T* A  {                {
                        CComBSTR deviceName;
3 p. \( F9 `1 M                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

" O/ F6 C$ [6 l
                        if ( FAILED( hr ) )
( Q( F9 C1 n, p6 n; e% N8 H3 e                                return UPnPMessage( hr ), false;
+ x0 B% ^+ I+ \5 ]1 S, |& v
. t5 p- [% q( n+ @: c
- O1 t" ^- \4 D" G1 ^                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
8 n2 R. L. [/ U, ?- m& }                CComBSTR m_udn;
( @, D( D$ ^) S8 r8 T6 g3 v) h        };
2 ?; N% l/ Q8 o8 e       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
4 B  V1 H7 t1 C6 j$ J0 P5 y        void        DeleteExistingPortMappings(ServicePointer pService);
+ R7 r/ e& u, t8 g  v        void        CreatePortMappings(ServicePointer pService);
' o  P$ _7 j5 u1 h9 t3 ~        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();


        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
' O5 D* r4 T1 x- J- U# |5 d3 G0 \        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
) W. i& F5 Y! j% Z, U/ ^5 g2 d        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
  X. j$ W5 h1 Y( V9 V        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
# p' E) s+ O2 W9 f& \        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
' }) Q( H3 k# p* ~- k1 e        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);


' [, X7 C8 W) W; O: r! b// Private members
* ^2 X# C! v* R4 X9 K+ h/ Vprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
, ]3 c' l2 r, p) n* f- R( z        std::vector< DevicePointer >  m_pDevices;
8 S) f, L9 A. J7 [8 J        std::vector< ServicePointer > m_pServices;
$ n$ D( x+ A' N" m- \, S        FinderPointer                        m_pDeviceFinder;
. `5 X; t* b% G4 T        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

, H3 Q$ U5 O7 B/ m
; Z( F: t1 S2 u3 Y- l        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
5 L) w9 B: w* M, t. }        bool        m_bPortIsFree;
" B( x0 n2 {4 H5 q" ]6 N# j+ ?- N        CString m_sLocalIP;
        CString m_sExternalIP;
% c! B" b' C& X7 h9 t& d" }        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
& m4 ~/ j/ m0 U( ?        bool        m_bInited;
        bool        m_bAsyncFindRunning;
" Q% U% Y$ z5 x        HMODULE m_hADVAPI32_DLL;
* ~- G% Q+ D% k, g# Y8 l5 E5 }        HMODULE        m_hIPHLPAPI_DLL;
& {( j3 V. w4 o' Z% Z7 Z1 `        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
9 H) J7 `0 z/ c' N( p- V        bool        m_bDisableWANPPPSetup;
. |/ o8 K7 H; _8 `5 h

};
: W+ q$ V$ W$ c

/ s$ u, {7 J& {9 J// DeviceFinder Callback
' x  e" x0 R5 y' r1 rclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
* Y* L% `4 m+ }7 g8 `) E3 P        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
, p5 @* d+ ]% t; I& j        { m_lRefCount = 0; }
( z& b- [9 F$ `0 O1 ~3 V* y, b! i1 b

   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
/ a; _2 c) ^6 p2 S   STDMETHODIMP_(ULONG) Release();
- V" N  e+ F0 R, s. j  e/ p) ~% c: L
( e# ^% i- O" q# T# W! X
8 M2 V& R5 ]. r( u0 W// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);


9 ?+ Q$ x8 j" t. c" }private:
8 _- f/ }* R% \+ u: j3 g+ S: V        CUPnPImplWinServ& m_instance;
1 A& i" ^3 l! N. Y! v9 A        LONG m_lRefCount;
5 \' o: J6 e* l8 i};


// Service Callback
: n; c$ N4 x. w9 Fclass CServiceCallback
  x  G# i) i  R1 D        : public IUPnPServiceCallback
{
public:
) U4 e0 j; d. s. {6 I        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
9 R" k& E) ?1 @. W0 }3 a        { m_lRefCount = 0; }
   
2 G+ N" F2 d; W/ V* I   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

6 D  a9 h3 S- a* w, Z0 k
1 B1 ~" b+ J6 L+ j+ L( |2 g// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
7 R2 Y5 P  w$ a- j% U( B( x9 ^  f};
6 D) a0 L6 O) t! O
; D0 w2 s) Y* Q5 k5 I
% c3 ~  s( J" y1 e/////////////////////////////////////////////////

- p6 C3 z  s/ h
+ X3 v' F6 c7 p# a1 l2 u使用时只需要使用抽象类的接口。
  {2 h: K# @# b- G( G9 }9 g2 bCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
3 P: a4 F0 H* K) Q" eCUPnPImpl::DeletePorts删除端口映射.