UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   ' U& m' w) R5 R' S; b% v
5. 
   
6. typedef   unsigned   long   ulong;
   , ], d9 e* r' `8 Z0 s1 c
7. 
   2 u/ f, f9 X$ J% F& C& t) v) E' ^
8. class   MyUPnP
   
9. {
   5 i* p, ~" y- G6 X( e
10. public:
    ( o- l% _6 u5 e6 r
11. typedef   enum{
    0 }- v+ D- |" X
12. UNAT_OK, //   Successfull
    
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    5 Q3 y7 Q( w4 |% ^
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
    1 f- v8 d& T: X  o5 X! ~7 f
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    
18. 
    * |+ c7 Q1 A- }( P; }
19. typedef   enum{
    $ q. e) K  B+ C
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    ) b# t( _4 t4 [( {
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    5 Z# ]1 q3 d# j' C# A% c& k4 W' F
26. WORD   externalPort; //   Port   mapping   external   port
    ! N3 R( P3 W* P4 V! L
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    & S2 l; w  a7 {6 \% ~* w# i
29. }   UPNPNAT_MAPPING;
    # g& Y2 [0 a/ p; \/ J$ u
30. 
    
31. MyUPnP();
    ) E' Y) p3 m# D5 `8 c* Y
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    $ b4 F! C+ y5 r3 G
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    # U' [, _9 H" o6 C9 }
41. bool IsLANIP(WORD   nIP);
    
42. 
    / `0 N' t' [& |- y9 m( A: }0 S: R
43. protected:
    + S2 L- @0 X& K& w
44. void InitLocalIP();
    ! r; s' O+ r4 f) v0 D0 i) o
45. void SetLastError(CString   error);
    ( y5 I2 Y" s2 O/ G* ?9 \8 v
46. 
    7 A# o6 ~5 d; {4 e. ], w+ m
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    * u2 M" K% E1 u) P6 G6 n
48.       const   CString&   descri,   const   CString&   type);
      k# N: u7 Z8 l% p
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    7 y' m( G9 G/ X. q2 U8 i- |
52. 
    # ^6 s8 V# q; X( B
53. bool Search(int   version=1);
    : m8 a3 |) V$ z3 X( ~
54. bool GetDescription();
    8 ~8 F7 n( e, Z( T" z" U3 r: W
55. CString GetProperty(const   CString&   name,   CString&   response);
    " @& p" m: N, ?/ v
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    7 F. g; k3 ?9 R
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    2 Z- f( a1 Q+ y( U6 W2 s4 H! z; K9 `
59. bool InternalSearch(int   version);
    % n+ w. {+ w3 ~8 P0 z) _
60. CString m_devicename;
    
61. CString m_name;
      u) c+ s4 g* c" |6 h
62. CString m_description;
    4 y& b% B9 C. H6 G) ]
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    0 u6 F. c2 _- X9 @, T* b% I8 G
66. CString m_modelname;
    9 s" g. x" g8 P9 S, D
67. int m_version;
    
68. 
    / I2 ^& ^) [3 r9 J2 U
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    $ D) C% n* {+ N1 H0 h
71. 
    0 g0 j% M& p. H& h
72. CString m_slocalIP;
    3 q- {5 Q' J9 l) p9 _
73. CString m_slastError;
    ! N# B, @& Z! j( w' J
74. WORD m_uLocalIP;
    - i# Z3 ]+ f, J: ^' p5 U
75. 
    # n8 s* X1 o- P" Q' C7 ?; d
76. bool isSearched;
    6 q; g9 c7 ~4 p0 N: r8 F% J
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
     R9 r$ Y8 H$ u
2. #include   "stdafx.h "
   
3. 
   1 H2 M3 j# P% k5 z2 D+ r
4. #include   "upnp.h "
   ) u* n5 ~  d2 g% H5 |  _' Y  C
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   ; U' w# S8 y8 F
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    : N1 k2 T/ Z/ R3 z4 n% g
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    # c" q; E/ b% {2 X7 U! V3 q
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    # v. d. O3 ~1 j
16. const   CString   getString(int   i)
    
17. {
    ( O: A! j  S* C$ _1 W* M; Y
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    : i2 l1 @& R. ~$ Z& d. Q' ^
24. 
    + q, s: s$ f/ \: r! s
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    7 G3 w* G9 Z, Y+ m, T
26. {
    - H' p1 M" N' P" v
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    / ?0 l5 ^; q3 J& k& O2 n
28. }
    / r; [: t! s6 G+ {
29. 
    5 _) E7 \' s6 w0 _) C7 `
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    * L+ E, \1 r& l$ R
36. {
    
37. char   buffer[10240];
    
38. 
    & A9 E0 Y& t- t+ G
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    ( R6 Q, U% A, r: f. Q; \+ e. D# r
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    6 U3 \/ u- G+ d& r' x
44. struct   sockaddr_in   sockaddr;
    + k% W7 c8 g  m: Y+ |  h0 o' A$ R
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    9 t) H3 q0 {. y; l9 K% V
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    2 H1 M' q9 H! {. x& L
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ; q# B! o0 b0 V! \1 b% x
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    7 W1 f, o0 l) {
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    + x- b6 R( Z6 V6 O6 r
54. int   n   =   send(s,   buffer,   length,   0);
    0 l) l% t8 b0 h! D. d' Y
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    - h+ B* d: i2 M$ d5 y
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    ! B) p# w6 F' @6 ?3 N
59. if   (!rlen)   return   false;
    
60. 
      S9 O' `* W9 T! Z" x
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
      X9 `4 e% Q: d4 a* V3 y
63. return   true;
    7 y$ K# H8 W8 [. ]% O4 E  M+ o3 }
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    - _" N, E0 t$ D, i
68. char   buffer[10240];
    
69. 
    & G! S' W; a2 |
70. const   CStringA   sa(request);
    7 m# {+ q( I( h& r! c- w; h, r
71. int   length   =   sa.GetLength();
    # e0 n7 B( h3 E# `4 Q
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    3 F$ r: ?' D. a$ U  t( E
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    0 d, b: ?0 I; H
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    5 @9 _; F. b. F' k
79. 
    ) u  g/ }) Q$ u. I8 y" ]
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ' w& m4 L' n1 {9 {6 J
81. }
    ( j$ x. B  x! i- a* O3 c- o+ q
82. 
    - F/ C2 G% {* v, L/ }. |4 ]5 v! |
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    . ^6 E8 ~/ R8 C0 d
84. {
    * O, ^% E7 O; J+ h2 W
85. int   pos   =   0;
    ! {* Y7 e" K/ ?: c
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    * Z2 X( d& v0 R
93. status.Tokenize(_T( "   "),   pos);
    ! m) K) w" o( O, O
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    , A( B& y# a1 P! v/ d( i+ T
96. return   true;
    ( `( V& s- t( E8 v
97. }
    
98. 
    : q5 r0 ^: {; g- F: |$ T
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    $ \6 f+ {' _( B7 s& W# |
100. {
     2 I; x( l0 y$ _& _0 ]6 p
101. CString   startTag   =   ' < '   +   name   +   '> ';
     " u: ?5 ^9 a2 d( y
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     0 b9 C& `; f2 i  A3 ^* D
103. CString   property;
     5 n& E. Y" O& S9 {5 A9 Q. C9 y; F
104. 
     # x4 ?( e9 m! Y  O: k' o2 L1 y. ?
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     ; W4 z+ i+ ^3 ^, d- _
107. 
     3 o: I6 m0 k: k9 H
108. int   posEnd   =   all.Find(endTag,   posStart);
     " ]% E& r3 d2 m# O" D4 S
109. if   (posStart> =posEnd)   return   CString();
     ; m: H% ^# q) R
110. 
     7 K) p( x1 [: \$ v
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     0 {" C+ r) k# u$ C$ n" O% t1 D* y0 \
113. 
     : W- t( K' R* B" i$ r: k
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     ( d' I: z- t+ B( I1 K7 X
116. {
     
117. m_uLocalIP   =   0;
     8 S' y& z) o! O* D: i
118. isSearched   =   false;
     ' N& T2 W4 {4 _- w' ~
119. }
     
120. 
     3 F+ \8 X2 p4 a4 U; |2 O& g) }& Q
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     ( J1 K& _! k8 L# a- @& h# y9 r
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     , m/ F6 g  Y5 c
127. RemoveNATPortMapping(search,   false);
     
128. }
     ( L) s) C; R* p8 }9 p
129. 
     6 }8 x3 N, u5 [" u/ D
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     
133. 
     1 H( J# f) q" n! E2 a" n# T9 r- Q% e1 O
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     " N$ B5 N& F' x4 {
136. if(version <=0)version   =   1;
     1 V& b9 x- b  i- C
137. m_version   =   version;
     
138. 
     " I* b& `1 s, E  V: J; \  D: k
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     * A) O  k: g/ S. W6 M' S
142. {UPNPPORTMAP0,   _T( "service ")},
     2 i5 r$ d* {$ T; F
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     9 H! \( B, W6 u7 E9 y
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     # C' U: d" L4 u9 R" M( t$ _
149. 
     ' V; W' K7 R. t1 u5 z1 m6 F+ E
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     " r. J- [( u& x' S( ]
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     ) T1 p0 h' v& x7 t+ M
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     . V0 E! s  j* K- V4 T. s
155. CString   request;
     : e  l. |# i/ Y+ @* @
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);
     0 W! x8 l6 p2 A( H' M. M1 A" C
159. }
     5 N3 u+ P: Z/ O1 T6 L
160. }
     . s! B& t6 m* f) X2 @; ~9 e! q$ l
161. 
     
162. Sleep(10);
     % }  E, ?( w% h, r* M' j
163. 
     
164. char   buffer[10240];
     " \% o+ t+ p' ]% n
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     + Z$ s1 t3 n1 p1 ~2 K, m. ]7 \7 n
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     / u& z2 }$ h" Q% e
169. CString   response   =   CString(CStringA(buffer,   rlen));
     5 b7 P( g- C( `# \4 j  e
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     ) {- p3 W' d6 f, g' i% _+ J6 ^
172. 
     6 \. y: C1 r! Z9 I7 y* K5 ]2 l
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)   {
     ; V: w! M5 {7 z7 g4 o6 D* c3 c
176. for   (int   pos   =   0;;)   {
     6 Y1 Q1 G  X: ~+ F
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     ) f) `! V+ e7 d5 ^2 P# Q
178. if   (line.IsEmpty())   return   false;
     6 }7 c: S  d/ K4 ]
179. CString   name   =   line.Mid(0,   9);
     & l  I' l$ G9 h; c
180. name.MakeUpper();
     + P4 }* }( n8 e: x
181. if   (name   ==   _T( "LOCATION: "))   {
     0 Y5 I5 C# I4 c2 w) Y
182. line.Delete(0,   9);
     3 s9 r3 O. a% r; u. p. i: W
183. m_description   =   line;
     0 Y# A$ k, k& |
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     " [. R& ?# C& \& N
189. }
     $ w* u$ M* t' P% D! m6 v- M# v
190. }
     3 b1 p( F# E# J6 v* _0 \
191. closesocket(s);
     
192. 
     3 q3 |3 i9 ?" M( T5 G
193. return   false;
     
194. }
     $ u! V1 r6 j# L, p6 j9 p& u6 k

复制代码

天云上人

以下有关upnp的接口来自emule，
; U: f( ]; |+ {6 y# ]
2 E) \! |( ]' R: e- {- @
6 x0 p8 Y% _0 m( P' t///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
0 n+ R8 e% _8 ?  z4 U0 R
# z% v- j  k1 \) ?/ @3 R9 k
#pragma once
: i- ^. ^# r4 a: q+ A3 _3 E0 {#include <exception>
3 N- o9 c3 T1 f) r: R& ]  n1 B' @
5 p+ L/ k. \2 ~
  enum TRISTATE{
# `( S: P' F" ^: R9 h9 Q        TRIS_FALSE,
6 u9 V! h6 y% C% e# I% [: V        TRIS_UNKNOWN,
        TRIS_TRUE
' m) `! q5 E4 v( }+ L$ O};
) n6 k) K7 U8 c8 x! r9 s/ T
7 ]) S5 I2 p/ p4 Z+ m$ ]+ {
9 \: b" E- T! p1 H3 K$ T& Cenum UPNP_IMPLEMENTATION{
) T, r/ S9 K, A! x3 W0 L( U        UPNP_IMPL_WINDOWSERVICE = 0,
& k) R/ b5 [& a; J" w1 O        UPNP_IMPL_MINIUPNPLIB,
$ r9 ^( K# M& b7 h        UPNP_IMPL_NONE /*last*/
3 T  J) V  g% Y7 Z) l+ W/ V) J) X. @};

5 N9 M: [1 N9 R% L7 K, h6 O9 n# p

6 G* o+ V/ f! Y7 J0 y
& B% Q1 E! k. u9 ^% Cclass CUPnPImpl
{
( `! Q  n2 o# x$ X% q/ bpublic:
        CUPnPImpl();
6 W# O" }! v- o( @( I, `9 ^5 ^        virtual ~CUPnPImpl();
1 O( p7 c; a$ [8 ~3 j2 T# w3 i        struct UPnPError : std::exception {};
- G2 Z) d* |1 k% g        enum {
: r  @' p: O7 E5 u) i! B: F                UPNP_OK,
" q" p5 \. s2 ?2 m/ I* S3 N9 A0 g# r                UPNP_FAILED,
                UPNP_TIMEOUT
. l- V) c3 i9 B; d        };

. f! h! s9 |+ M4 o" q
" a/ f8 {4 @3 y0 s* h8 Z  k        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
$ k2 L& x/ ?7 `3 O, m        virtual bool        CheckAndRefresh() = 0;
" C* H# A( ?9 {        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
" |: O- n7 l. t, O        virtual bool        IsReady() = 0;
# W* L( O2 e" N* T/ E        virtual int                GetImplementationID() = 0;
       
. @+ n7 r/ ~& R' C2 J) c( C7 T2 i        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

- r* v, K( X. T2 ^- m
8 M6 C; p! n1 q0 N% O3 o        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
- r" k4 H  d" b/ Z        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
; [# [' {, n8 k. e        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


8 V) a. P: N' A// Implementation
0 W4 x1 I5 k  R1 M2 L! O* N( H% E; Dprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
: z  n% Z$ f: N7 a4 p. p# j        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
- z3 O3 f2 D0 J        uint16                                m_nTCPWebPort;
( z+ T! g7 ~* {9 n/ x( z  A: g: H4 z        bool                                m_bCheckAndRefresh;
, v7 x8 a* T$ Y4 {6 Y# C

) y" G+ b' B4 a3 oprivate:
  _& b  Q4 q( n* L! H" ?) d        HWND        m_hResultMessageWindow;
+ |9 v, {: W, M        UINT        m_nResultMessageID;
" m. e. x- i; [# z. ^

4 p: E2 s" e, M# {. Z! ]8 m};
) I0 B9 ], u$ e, a

0 ?0 A( e. b7 [1 E// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
5 @: }9 Q5 a( W& g" E1 b# z) |: M{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
9 f; k7 U  n& x( L, L        virtual void        StopAsyncFind()                                                                                        { }
  |! i# W8 O! ~" k4 W0 Z  k        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
7 V- [' n9 @; w2 R( o        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

0 b. |3 _5 H; j+ B( v8 `
, \& l# h" B- c$ ?$ ~/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
- {5 u/ R# ]. U# X, i/ n& `7 e

#pragma once
#pragma warning( disable: 4355 )
: z' B% y9 g4 ^  `" N3 M
7 C1 l" c6 D% o4 P1 ^; `) V
& ^$ V6 v$ n  s! C% p#include "UPnPImpl.h"
6 x4 S$ ?! L- e. z1 H4 ^- \' u+ U; t#include <upnp.h>
  i9 e0 ^! z* r7 D. g/ I. {#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
" o9 N- |* p0 n0 ^- x$ |

" H# c% {8 R$ ?  R+ c, a1 b#include <vector>
#include <exception>
#include <functional>




typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
# v0 H5 p5 U0 U; t$ Utypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
) x! t2 A" W7 w& e, {2 Ctypedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
& ~) z# C, i9 _- [! }typedef        _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;


5 q; j! J+ k( e% Ptypedef DWORD (WINAPI* TGetBestInterface) (
/ C5 w' y# [  ^% n  IPAddr dwDestAddr,
3 Q) G0 P$ C" ~2 z  PDWORD pdwBestIfIndex
( ~- O: Y+ g) {5 j7 `);
' {# g( I' W9 O& G$ ^

typedef DWORD (WINAPI* TGetIpAddrTable) (
- ]# M# c( M$ q5 Y4 m! A5 w  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
, v' T. h$ a8 X% K) r, f5 r& P( M  BOOL bOrder
);

  F/ a# }( F7 e$ t1 f
typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
6 k3 u2 ?6 R, ?! i6 F4 l& U

( h# k# r% P: P: X8 b/ X- WCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);

- ~3 k$ B/ m- S+ _) |. ?( k. S
, B3 f# i5 @' N' ~class CUPnPImplWinServ: public CUPnPImpl
{
0 A8 g& N& J7 I9 k3 c  F1 ]        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
; Q! W; k4 H0 Lpublic:
        virtual ~CUPnPImplWinServ();
* }/ k1 J+ Z- p( W" z$ ^; s        CUPnPImplWinServ();

7 S! v& n8 P8 p) P9 e* }5 o
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
& Y! T" G& O" n# F$ s, m        virtual bool        IsReady();
" w: F" E+ p, h$ {$ m        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
* d# ^; ^" Z, ~5 @% X& P/ T/ r

        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
( {: g9 H7 v) ^8 n        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
0 ]8 m: I: |2 P9 g8 s
6 c5 i0 T. W8 X  D
protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
* R+ [; I) o* E5 P/ M1 j        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
6 u  m: f2 |% F" D/ j& k        void        RemoveDevice(CComBSTR bsUDN);
! |6 `3 S* v1 e2 \4 y1 p        bool        OnSearchComplete();
6 R: s( t+ A; h! @0 F0 x- n( R+ o        void        Init();


        inline bool IsAsyncFindRunning()
/ `) X9 T  O  |) T* F        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
# x( N# {# y+ ~1 {                        m_bAsyncFindRunning = false;
& \) H3 }4 X' `$ V                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
' M* L8 n, ^2 g: o" q6 E' e                }
3 e. a: r5 |9 s# o/ c5 R* n                return m_bAsyncFindRunning;
        }
4 t* s9 M% Z' o" N7 S. Y0 b
; ]0 M& _3 X% g
( z6 Q# B" r; D        TRISTATE                        m_bUPnPDeviceConnected;
! K- w4 F5 N( s  {( z

- `/ l1 y+ e: c; E( y4 N5 }5 i// Implementation
9 Q  h7 ~1 ]; f. v4 U0 P% j        // API functions
# [! Z( @3 }& N        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);
: y" B: x4 @" |8 W( v        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

/ h1 ~+ z; G$ u. F0 t
/ w: K+ X1 O% R9 f# ?: V0 M        TGetBestInterface                m_pfGetBestInterface;
( W$ P. S& j& I  B+ X' F+ N        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
: K! H! y1 N8 N, a1 T3 |        struct FindDevice : std::unary_function< DevicePointer, bool >
7 m$ ]) O; `4 ^        {
" Y" P* y6 N, W" E) G: m* i                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
" `4 L2 f5 J2 f7 ^- @                result_type operator()(argument_type device) const
                {
3 z1 ?# v3 x) n8 O8 X- s/ v                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
  I$ S9 R4 j2 o: r* n$ j2 B6 r

8 G$ Y1 y1 T) a/ _6 d$ \. J                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

1 Y7 E5 @9 ^) {. {3 j
9 Z( }, `' T; {, L2 Q                        return wcscmp( deviceName.m_str, m_udn ) == 0;
# I- b9 s" h/ P8 ]                }
                CComBSTR m_udn;
        };
       
2 f& E. p" \4 t+ ?, O/ i  C& M        void        ProcessAsyncFind(CComBSTR bsSearchType);
. F5 W) N( A% h2 @- ~        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
5 \$ n! O" C0 \9 G; D- g, s' x        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
& X- S. p; B, L5 l4 U        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
6 ]$ l4 ~8 T- W2 s- w        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();


        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
0 A7 b- \, S. Y- @& E. u8 h  E        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
2 g5 S* l  M4 m* P) N        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
' B" G: R& P  P+ I$ s& y' m$ L        CString        GetLocalRoutableIP(ServicePointer pService);

; w  U) b( a: x4 m' O! U; q  _0 `* h8 T
6 |( T/ V" g( s& n// Private members
private:
4 m5 e% e: {6 ~( x        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
( B% A$ q& ?0 u: x, X        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
% c6 B+ ?) `! Z

9 v9 P% p- [$ j1 {% g        LONG        m_nAsyncFindHandle;
7 ]" s, z( W) |# l& w; a' F' L0 E        bool        m_bCOM;
        bool        m_bPortIsFree;
# i9 E0 H4 o8 w! O: D        CString m_sLocalIP;
, [. s1 s$ `) S$ P5 ?- o        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
& i  b% _0 P6 A+ M( E+ U5 U        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
+ b% ^" U7 ?) u+ Y        bool        m_bInited;
        bool        m_bAsyncFindRunning;
% P5 ~8 m( y2 a# k5 n& M        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
, Y* q: R* G& j5 m        bool        m_bSecondTry;
  T8 Z/ j# ]- n% V" C( @) e2 B        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
" k7 A. o4 O& V4 B* A        bool        m_bDisableWANPPPSetup;

5 ?( l& Z+ [& ]. c, b6 S
- p3 q4 i3 J, D# M};

% {3 Y9 V  e& Y! F
) s: F+ p- m  b7 D0 _' B// DeviceFinder Callback
& Z, E* n" v' d$ ?# g" Bclass CDeviceFinderCallback
5 J: _! o$ N! M: J) v        : public IUPnPDeviceFinderCallback
{
" l+ g1 s4 N/ p' z) [0 S  l! xpublic:
7 e0 O1 b3 O/ D8 s* {9 b+ T; ^: P, o% ^        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }


5 s1 _* Q3 G/ P1 i$ ?# L& X   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
% \+ j/ f6 v- _( v4 g) O& U& [   STDMETHODIMP_(ULONG) Release();
2 r& X. b4 m# R/ K) T

7 R; R8 h& x- Q8 z/ c// implementation
6 b" w! ?. Y* b2 I* g( L, }private:
3 Q, ?4 e6 X+ z0 G7 S        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
$ G7 W) }& r" d        HRESULT __stdcall SearchComplete(LONG nFindData);
5 r/ Q" J- P: q' k) h8 y

  b) L5 v: I8 Z6 `1 \0 cprivate:
        CUPnPImplWinServ& m_instance;
5 ^# [/ p! t7 T. d/ m# P0 t% S( R        LONG m_lRefCount;
0 t+ c) r! [2 k) k2 [};
  |0 c5 M" y0 ~2 }- E

; y$ z5 [8 M/ p' J// Service Callback
" G( Z: u' ?! W" S1 Iclass CServiceCallback
& Q) M4 j- J& g  Y: w( D, w        : public IUPnPServiceCallback
{
  X$ @. r+ y1 y% Spublic:
5 d- D+ |2 X5 ^8 W: b* C& C( w- E* p        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
. a; _% m; Y' V' k, Y, V$ K( e   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
* o) y$ j% n5 m$ v   STDMETHODIMP_(ULONG) AddRef();
$ Q  O! N0 G' R6 Z   STDMETHODIMP_(ULONG) Release();


5 y& ]& I% G* D$ v  f// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
' O4 R$ m: Q- q9 V2 W2 H* t7 s* M
) J& a' m6 Q9 e+ ]" `0 W
+ b. ^) q! K$ S1 M0 q8 M7 |private:
; t9 c( Q9 f6 {        CUPnPImplWinServ& m_instance;
8 |. {$ ?( X4 T        LONG m_lRefCount;
};

' l* W+ P! ~7 K
/////////////////////////////////////////////////
# @3 r; ~# y8 B! O  Z

使用时只需要使用抽象类的接口。
# O8 g5 M" s' v9 d6 q' QCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
. S: _7 W- @- A, xCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.