UPnP

天云上人

/*uPnP.h*/

1. 
   ! k6 A% d* [& \$ A6 D+ |
2. #ifndef   MYUPNP_H_
   
3. 
   9 F, A/ B1 r. {0 s2 \/ ^
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   
9. {
   
10. public:
    . f3 p' P' m$ w8 W' s3 o! R- c( I$ u
11. typedef   enum{
    
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
    
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    ( ?- c7 F+ v$ {& V1 F
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    6 D# F9 |+ H' \* @6 L  S8 b& w
20. UNAT_TCP, //   TCP   Protocol
    ' D' |8 n5 m/ u8 G+ b6 I
21. UNAT_UDP //   UDP   Protocol
    ) r$ c( R$ H" {
22. }   UPNPNAT_PROTOCOL;
    
23. 
      A! l+ J# R7 G0 l! P% I; C$ o
24. typedef   struct{
    $ |) j6 r9 A' X! y- q
25. WORD   internalPort; //   Port   mapping   internal   port
    ' G2 w. A8 K( R( b* j( u+ u
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    4 J* o3 e# x4 y! r5 x+ x. N# i
28. CString   description; //   Port   mapping   description
    ) ]  `1 E/ ~! z' ~  |$ i
29. }   UPNPNAT_MAPPING;
    
30. 
    " j5 T9 R/ L" ~) ?0 _
31. MyUPnP();
    
32. ~MyUPnP();
    0 Y: Y: c- M6 l0 H& M/ v1 G% m
33. 
    & Y2 L8 i3 }# J
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    8 C3 z+ g9 C; N+ W0 E
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    $ m4 c* y( R# M8 Y" c) G
37. 
    
38. CString GetLastError();
    , f  l8 @+ n6 ?9 N" Q
39. CString GetLocalIPStr();
    ! j  `( L9 _, K+ r7 c
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    : x1 f$ n5 Q2 d7 x4 p1 s( U
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    5 `* z6 {7 P8 U! t1 E! ]4 r6 k
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    9 N9 ]* y2 }* X1 t
50. 
    $ b$ f: \$ m: o7 @' p+ k
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    : f8 D4 h6 h/ q# i
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    - U8 M* f% L4 p) H# R* B
57. 
    0 s/ _, q1 }2 I- t5 t8 s  X
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
      R! c5 Q) H$ g( U9 g/ `
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    1 r  m1 c/ \' v+ I5 o: R
66. CString m_modelname;
    9 h" |1 A# {' {& V9 p
67. int m_version;
    ( [- \0 w4 V5 t
68. 
    
69. private:
      |. |+ a3 q9 Z0 b  i- q
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    , \: Q6 o) ?) R0 d% h( P- _+ N. K
71. 
    2 O6 u7 E2 V) i% a# v5 C4 q
72. CString m_slocalIP;
    
73. CString m_slastError;
    5 j" k) b  e; F" w& g
74. WORD m_uLocalIP;
    , `, M) H. O0 |. o( d, |
75. 
    : X0 I: M5 {, q9 d+ f( U/ q
76. bool isSearched;
    $ N: Z, y  }0 Q/ v! m
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   5 ?/ q. @9 Q' ?4 I
2. #include   "stdafx.h "
   4 W+ Q( \) A1 P" ^3 t8 p- m
3. 
   
4. #include   "upnp.h "
   - N6 f* H9 s, j1 C# |( k* g5 B$ w
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   2 M+ `- V# R) G0 B1 S7 L; {
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   ; l6 p! X9 {% g2 j
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   + \8 H8 ~. `2 q- j0 w
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    5 N. [# c1 @& c, ~/ J' V' `. o# D
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    % R7 d) A8 Q" K1 g$ y
16. const   CString   getString(int   i)
    
17. {
    * h8 o. P7 @0 ?1 c% @1 }# m
18. CString   s;
    
19. 
    4 D% y( V: G+ s$ T8 n% x
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    
24. 
    3 E% i3 w0 n; h. ^3 O2 e. e/ m
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    6 x: V$ `6 Y; ]0 z  m
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    3 b$ |* A7 t% e# S6 u2 b( v
28. }
    6 g4 L8 f  s2 t# ^( _
29. 
    # A: H  ~2 |$ K2 X' Y* M
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    - P- h* A: \& \. q7 I' N
33. }
    
34. 
      h* P7 Z9 [7 F- E
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    4 [0 P2 A# w$ J0 N, Z7 P7 L
37. char   buffer[10240];
    1 d+ C& Q+ ^9 d% E
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    ) q. e( I: Q( s: g& A; A
41. strcpy(buffer,   (const   char*)sa);
    + k- \  G6 Z% j/ }  g
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    ( M2 C9 U- n. |" e( m8 ^- K( E( A# x
44. struct   sockaddr_in   sockaddr;
    2 L8 z- }: H8 t
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    ) X8 E+ l; ~: ~9 p) s
51. ioctlsocket(s,   FIONBIO,   &lv);
    9 C9 m1 ]1 ^! J* H' G/ s2 w* g, f
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    * u4 w+ [/ d- _5 q0 O0 ~
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    ; N4 q- K% J3 M& W" e9 m9 F
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    ; O2 r' r( R% H% U( ~. ^) O
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    5 H5 i) G! @& r% Z. Z8 n0 Q  I
60. 
    2 a' {4 _, ^; Z- u0 K
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    2 B- r3 v) n$ k3 h5 @% ?
63. return   true;
    + P$ W! y: z2 T2 L
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    2 S! _" Z8 o( U
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    1 x/ Z$ C7 n0 Y* h( i: ]& a4 _& C
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    5 E; @: z& s8 ]) d  s; i9 @& B
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    + b, U5 ~5 P4 E5 B3 ?' @
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    8 Y0 ?* `0 z6 |+ i
79. 
    8 T! h  s% P" s6 W7 j5 i
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    : x" O* c9 f7 P1 e! ]
81. }
    & ?1 B5 L. v8 H# M0 o, L8 A& M0 d
82. 
    6 X( k3 b  ~" @+ U
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    6 N2 b, G& Q( _2 h# c3 `
88. 
    , J- a  I$ d3 n
89. result   =   response;
    ( s8 }. O  V# P  ], G( i  a% b6 v6 g
90. result.Delete(0,   pos);
    
91. 
    6 W# R9 F; C% m& E" @3 \
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    2 z8 R  c' M$ W6 [
94. status   =   status.Tokenize(_T( "   "),   pos);
    + F; V3 Z" P8 ]8 L* y' t
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    . S+ k1 o! H8 l. [0 f1 B$ q
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    + m9 U- u+ L8 ]& a# k
100. {
     % \3 e7 Q# B/ T1 O( B8 V" z
101. CString   startTag   =   ' < '   +   name   +   '> ';
     0 J" b  T$ o/ S9 ]" ~
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     & r4 K1 y& Y0 p$ l4 {; H/ W
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
       c( D7 c1 [& B; L- q
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     - V4 Y9 k4 `3 T
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     # g! K0 Y" C: O* x" x. d  K
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     & K2 V& a( ^- c
119. }
     5 P. ?) K- f2 S8 D# N1 Z$ ^
120. 
     . T1 L: a+ w8 @' [
121. MyUPnP::~MyUPnP()
     
122. {
     1 i  r5 a9 N5 l8 A; T7 q1 |
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     5 V& ]+ }, \: j2 L
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
       a. i% k; r- I( y
127. RemoveNATPortMapping(search,   false);
     
128. }
     8 K( F+ ?" b6 V- S" M. x! k
129. 
     $ I3 l; T5 u( z5 K9 P$ u7 b7 m
130. m_Mappings.RemoveAll();
     2 J1 c$ W- H( H2 s4 i% S& j
131. }
     ' `( i0 G4 x2 x
132. 
     ( \" k8 s. K# g; K
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     ; \( |! i- f1 \6 P2 F
137. m_version   =   version;
     7 w' B/ g+ f4 S& p
138. 
     # j( V! u9 |* M7 E8 x6 B& c% T
139. #define   NUMBEROFDEVICES 2
     / y7 g$ G" @5 ~5 w- B9 t
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     0 p6 u. |$ h1 b+ p
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     % j1 d- ^3 ?! d9 _3 L. p
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     , {# x4 C1 k9 H* }; W
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     9 F2 p' F6 `8 B. g2 |: m8 u
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);
     7 M) M/ b+ {% Q, S6 K( [. T
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 "),
     ) B0 ]$ h2 @& _6 _' |
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     ; G1 h, B8 Q9 `3 e
161. 
     ! E# D3 j" T& L6 Y
162. Sleep(10);
     8 K; y# s8 B, b) _9 x+ c, A
163. 
     
164. char   buffer[10240];
     ! g4 ^5 W# q0 o2 `, m. z
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     ! R) O; ^5 t. i! D$ Q  }
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     # t% i, }6 y. V
169. CString   response   =   CString(CStringA(buffer,   rlen));
     # m) a% `' s0 f
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     9 {- ?) [5 ^5 T4 ^; ?% ^+ ~3 l
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     # s' C* q# X; d' u8 B% Q5 Q
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
       n. S7 q+ }2 X4 Y$ o: r# H
175. if   (result.Find(m_name)   > =   0)   {
     * a( G# f7 M+ N3 W
176. for   (int   pos   =   0;;)   {
     - p/ p  u8 R8 p# {5 |* ^4 O- J
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     $ D! A3 {. N* A) V, C" `# _
178. if   (line.IsEmpty())   return   false;
     . ?0 J6 y/ i. O( E6 [3 X
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     2 a" o% a+ Z: N) i; R2 x
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     2 f# A' e* k2 n# E
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     7 D& H' U: \* ~- t. S" m2 J. \3 C
189. }
     
190. }
     
191. closesocket(s);
     
192. 
     7 U* P( }4 \+ l6 o4 B
193. return   false;
     ) J% r* e  z! C$ Q5 J. ?3 b; m( ]
194. }
     

复制代码

天云上人

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


% `$ {0 k7 j) Z9 L# \///////////////////////////////////////////
, q- s5 B+ X! ]2 G' R3 W7 e5 U8 R( l//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


#pragma once
#include <exception>


2 w5 ]& C$ e/ U( @* P  enum TRISTATE{
; m1 M! [6 K6 q9 [) z1 \% O  z  J        TRIS_FALSE,
2 Q& G9 ~" i, A2 T! y* ?0 U        TRIS_UNKNOWN,
- `% z" f% j& r; c        TRIS_TRUE
* X& c4 O2 F, \' S3 r2 L0 ~};
# M$ r5 |4 `  n9 x* A) K
, E7 u6 V3 o2 S4 x
enum UPNP_IMPLEMENTATION{
6 g; [4 U. }! L        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
$ j5 _4 @, l4 r        UPNP_IMPL_NONE /*last*/
};

, ~$ \; Y- v6 t& m, F8 H
, g, E! E3 {: G) A
6 C; m1 `  v$ h5 T1 l
class CUPnPImpl
4 a; Z" W, x" v: q{
4 T( A% [3 H: G: o& O. n+ O6 gpublic:
( H$ @  [6 c3 v! B7 T$ _/ n        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
" i% X6 {' z/ G' Z        };
$ ^) |! s% ?9 E+ @% |4 m1 H
8 x( r  e% p8 ^; D4 ]: W# }9 h
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
- U0 s  _* V- T3 u0 f# I) A        virtual void        DeletePorts() = 0;
$ L/ ]1 }! r" L) ^7 ~% F5 V" c        virtual bool        IsReady() = 0;
; w* q* q+ C. o2 ], |        virtual int                GetImplementationID() = 0;
       
& O& a6 x) R2 _% s6 d- O        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


; \1 M6 \8 g- q5 F/ A# p( T( C$ B7 F        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
1 g  Q+ ]0 y+ C' W        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

  h# {5 g7 A( U
" {! `2 d7 y) v+ Y4 p1 q$ m/ N" `// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
" g8 H- p; X% {/ F( J

private:
- R* \% n1 H! l( Y        HWND        m_hResultMessageWindow;
: v1 W2 _8 z) S$ z        UINT        m_nResultMessageID;
8 U2 t" E" j. P9 W  i% y; {, z
0 H: _/ ^4 {+ b) C. z& w) _
};
0 u+ I2 ^- l) @8 Z6 i* j2 u
  c) e! g4 c3 X! m4 K/ s
. I* _" l3 ]0 v- ?0 I// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
public:
2 d! K% D1 R1 W. E! X        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
) y; W' D2 ], d7 d: H4 U. L7 D6 _9 m        virtual bool        CheckAndRefresh()                                                                                { return false; }
1 v& n8 z3 T; p" Z( h$ c! w        virtual void        StopAsyncFind()                                                                                        { }
7 G8 U7 l# E- z; ^7 \% N        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
1 m( v7 j7 r2 h* h0 l  t        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
8 g( ]; |( P) }9 C' K};

) z& q1 M* V3 G: Z7 B4 X/ H
: _4 U$ i( [6 c8 d& ?4 C2 s- {/////////////////////////////////////
0 S9 {0 K0 v7 O  h2 ?1 ]4 [//下面是使用windows操作系统自带的UPNP功能的子类
8 R1 d- Q5 M) r) T/ D* a& M
& x2 @8 S/ s9 M4 G
#pragma once
$ n7 o- M& Z0 g0 @, l. `#pragma warning( disable: 4355 )
' k" C5 ]5 f  g. Z
# t( M* Z; d0 G- f2 `
" M, }3 D8 M0 y; J* E#include "UPnPImpl.h"
( x1 T6 s. s; B$ G+ c#include <upnp.h>
$ @* {2 s" D1 l6 d9 _4 r  H#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>


' Y$ K: W4 l$ U0 ?3 p#include <vector>
/ w5 h2 L% B" b' F1 C#include <exception>
#include <functional>

2 O" b& p- j" b2 d, e. i: |1 X" \

0 o$ p$ b2 {2 Z- {7 e" @, Y' W
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
/ k: F2 z& `- \0 R* Mtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
2 {& l, p+ J& I, Wtypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
, x# t) ?3 s, L  `) N* {typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
. z& H8 d! J; ~; s: l6 dtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
& R; B" b, G' f0 [! q

typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);

2 j; v% h; K. @. C* p
typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
3 N  @7 _( M, G* C1 g2 u  PULONG pdwSize,
5 x" l. V! w4 i8 u) A6 N  BOOL bOrder
8 e' ~, X' p: w8 S  w);
, i- }. ^5 y0 i' g0 x( w0 B

typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);

( ~6 n$ |! {4 a0 \) l+ m. @$ A
CString translateUPnPResult(HRESULT hr);
1 c! o) w/ j& A0 THRESULT UPnPMessage(HRESULT hr);


/ s5 H  e$ s2 c* X' Sclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
" l7 Z, S2 B; E8 [; L! o4 Y! y// Construction
4 D, y4 O' X1 Z6 J2 l" f2 l! Upublic:
! \1 E# {' ?+ {; C3 A        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
8 Z1 B$ S9 }/ A' V5 C! W1 a% M/ B. W
' z0 Y) E& q: R8 f  Q3 I; s
6 _! B  k2 F$ i1 L5 |7 S  O7 F        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
. Q( @& W1 k- H) ]% s; _        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
4 V) S0 [, f+ g. S5 z

        // 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; };
, i! z" F( G4 I- z+ R% \

( H1 N& B. @% o  [$ Fprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
( v" n- @& R1 a5 _' I2 [        void        Init();
. `' y- W; M) @
7 a' u+ g) Z+ O6 u$ f8 t
        inline bool IsAsyncFindRunning()
6 b" {& X) a! E; \) H' ]# p: q        {
, f0 m' z$ ^" V% A5 @2 d. R* N( u                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
$ `$ S* L6 R8 k5 w4 M                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
$ A9 n9 ]# H0 I8 |$ a6 a                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
( c8 d' o; Y$ u. J- l' t                        TranslateMessage( &msg );
+ f) ^8 a" P% g/ X( ]4 H                        DispatchMessage( &msg );
1 Q" L2 O5 f! a, s7 j                }
# I$ D. G2 {' F) z8 L                return m_bAsyncFindRunning;
0 I0 y+ A4 }. b' ?! R        }

* r+ @% E5 {* ~: E# h7 |3 y) Y# v
        TRISTATE                        m_bUPnPDeviceConnected;
- ]/ J7 r% [4 [& {( J8 B
2 W0 k* C7 ^  Z  w: G0 c- }
// Implementation
7 i% ?/ E% {% k' I  F( ~/ T        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
$ ]6 x- y/ @8 E, O        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
+ I" X* @) v% w. |2 j' P: k        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
) Q" h: N+ v/ F* N        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
; j, E" M! }( b$ T- s        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

1 H; h+ o0 }& Z" K7 p
        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
5 t$ h) [. H7 T0 d        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
& {6 l' [! r* k6 \+ H7 C        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
: O, n. z4 _( h2 T$ f9 B5 @( B                result_type operator()(argument_type device) const
' i1 y3 T: P5 v3 W                {
7 Y: D$ D4 P8 D; g  h# w                        CComBSTR deviceName;
/ p, G. j3 @9 k( A, {: H                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
  ]1 M2 h5 C) B
6 s9 i, R3 l! ^2 W7 j# l: T0 \8 K
                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
" s5 \8 }# ^  u

6 {7 s4 m6 {% e                        return wcscmp( deviceName.m_str, m_udn ) == 0;
6 F* ?; X: q, f2 _  r3 ^                }
" T, J, E. x4 Q& B, n/ N8 G                CComBSTR m_udn;
        };
* D# y7 g) w6 H: o       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
/ b9 d' q  s7 ~$ e; [. o        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
. n2 h7 k4 G3 A4 e' [" P# X, W" e        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
5 y3 f; t& w% k% D& ?3 A                LPCTSTR pszInArgString, CString& strResult);
+ `% ^+ m+ [% r4 t( }/ o& L( ~# g# f        void        StopUPnPService();


( @. _! ?! ~2 W* D" J        // Utility functions
# {2 a* ]% G7 z7 b& A% ?: w        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
' n8 t1 n  u* d' R" A        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
. R. ^- `: ^3 s        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
; T* v/ h/ }" S( ~' d        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);

7 Y4 q4 M% z3 ~
2 p& \# M& ?% F// Private members
: M& W8 K2 x9 @  u! U% j, a' Z0 r  Lprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
" I1 {5 g5 m( a3 x$ K) m        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
4 K4 D6 ~! x, L: x* K# w

) s+ ^2 _; B8 n+ @/ I$ d" p6 O! M; _        LONG        m_nAsyncFindHandle;
& p, c1 W8 r0 v) u        bool        m_bCOM;
; e/ a* y6 x) C        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?
        bool        m_bInited;
( e7 e6 e$ p2 [& x4 @# x        bool        m_bAsyncFindRunning;
2 v+ F6 s$ C) m' T+ [        HMODULE m_hADVAPI32_DLL;
2 |. e4 L* j8 X- x" Y        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
6 ?. Q6 m, }% L4 ^% h( {# \- x        bool        m_bServiceStartedByEmule;
9 y9 x3 K5 H/ ^9 L4 m7 O        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

1 T3 O" {* E* o8 W# e
8 D( J  k' \& t: a$ L7 F, n6 ~};
; Y* c8 ?. F. T( u( A
% T" D3 r. L5 J, v5 _
: t& E! N+ b1 x- c" g// DeviceFinder Callback
# H/ H: S- E7 Z- G# uclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
5 }) G5 B  M5 I* P) x+ c5 M: A& Q1 |* A/ npublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }


   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
; A0 ]) c" {9 o4 f   STDMETHODIMP_(ULONG) AddRef();
3 w9 H" H- V9 n) S9 [  Z   STDMETHODIMP_(ULONG) Release();


// implementation
; w" T5 C3 I) i/ K- v" G% d" nprivate:
, s. m- `+ _, S1 k0 c' ~9 `        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
+ U6 _: T+ i7 x$ U, z+ T        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
% a7 T# X- k/ Z' w3 K/ S$ P        HRESULT __stdcall SearchComplete(LONG nFindData);
/ X6 Q0 T1 k8 l3 ]
. d8 }* v2 J) _; }; Y& b1 {$ v* n
* X* R" s# H5 b; l- t9 V: [# Jprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
) W" d$ g$ p% w( D};
$ B, Q4 V5 S/ q6 S, B
$ x7 m  X0 T3 S9 ]7 \% V
! y* A6 v0 ^) D) o$ L// Service Callback
0 n$ e' E6 b# r' J  ?& O. vclass CServiceCallback
( n0 A7 {9 B+ y9 R" B5 D        : public IUPnPServiceCallback
{
$ J( [/ H! [9 k0 opublic:
+ a$ i0 j! m2 ^) Z" w        CServiceCallback(CUPnPImplWinServ& instance)
: X- V3 }0 K( a3 }8 ^4 m! M4 X# j                : m_instance( instance )
        { m_lRefCount = 0; }
6 C9 v+ z) X  g, E9 H! j2 c7 A' Z   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
5 N3 E7 J/ j  K/ r5 S0 u
! n+ s0 A3 N% b$ {
// implementation
( c% ?7 d6 T- N% Q/ y* ^  Cprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
  s% C0 c( c6 u3 [  T        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

/ ~! Q9 R3 {6 x, ?5 p# W, \
( B9 A- q  b& Cprivate:
        CUPnPImplWinServ& m_instance;
1 f' U/ [( |5 `        LONG m_lRefCount;
& s, C6 t+ d) C, m4 P};

' c2 J7 t9 S2 v' J$ O
4 e$ b/ t" I3 q9 r/////////////////////////////////////////////////
& N5 g1 s. Q' k' [' R& U0 m

使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
6 P% b, v( ~  B- b3 nCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
8 y1 R6 x+ |' P* N/ C# ?8 V, DCUPnPImpl::StopAsyncFind停止设备查找.
/ M: S  @7 F$ x2 Y# r1 p8 i3 P0 BCUPnPImpl::DeletePorts删除端口映射.