UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   8 X& u) u  g# Q' I3 W
3. 
   " c7 E- s2 u3 @3 x& ]
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   # X; v8 ?0 q+ t" U! n$ R# p
7. 
   
8. class   MyUPnP
   7 s6 H5 s: r5 w( @5 ~( e/ O
9. {
   
10. public:
    5 b: E3 L4 q. B0 r( }
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    8 I% A  ~; t% V& Z) i' t) y0 v
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    4 }( M. B9 z! A
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    $ c1 e) P' t& u8 D& \4 l
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    : F. K+ l8 d1 ]  O$ D* n
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    - T1 o3 i; a" h( L0 K
28. CString   description; //   Port   mapping   description
    6 o# D. O2 j8 P. r# F' J; T
29. }   UPNPNAT_MAPPING;
    - `4 w- g# L( ~7 g4 r7 M4 P& q  ~* d4 t
30. 
    2 K$ ^  e+ L7 S6 Z
31. MyUPnP();
    9 _  J# B# E+ U. u% t
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    & W, w7 _, |7 x& D0 C8 [
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    . f+ G. L* _0 _/ U
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    6 k9 w, I3 c/ Y: n" X/ u, J- ?% w7 x" Q* o
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    & ~  Q" w' k2 [! W) I9 x* d
49. bool   deletePortmap(int   eport,   const   CString&   type);
    $ q$ z$ q8 |* R2 y" F
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    % Q* v7 D( z7 F6 n0 F1 d5 ]
52. 
    ! z/ k- @! G" Q8 {
53. bool Search(int   version=1);
    
54. bool GetDescription();
    / j9 t" ^9 s1 I6 K7 R# A3 Z
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    9 t* F3 u6 s0 q* K+ u% V$ Z& c" K
59. bool InternalSearch(int   version);
    ) E0 p$ L" n6 R9 ~' ^8 f( ]/ Z
60. CString m_devicename;
    
61. CString m_name;
    * r: U; ]$ D0 \. Q- P
62. CString m_description;
    
63. CString m_baseurl;
    & i7 \% P8 _  W) s- M# W6 F+ h
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    * ~) Z8 a" I# W* z/ e. v0 U
68. 
    " b9 ?0 b; T' j' m* G( l. C$ o
69. private:
    * e1 t. ]; {% C, v
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    2 ]) X% u+ p' j
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    ! r/ M4 y0 S& X) w( ^, d
75. 
    
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   3 k- L2 ~& A+ g6 O9 E& P( `
4. #include   "upnp.h "
   
5. 
   6 Z6 L: l5 n- t8 V
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   ' ]1 U5 p7 Y" I' L6 U0 }9 e. p
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    * j# D* ]3 r7 D$ ?6 u
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ; b3 M6 S. |# _4 `3 K- {  b
13. static   const   int UPNPPORT   =   1900;
    % {# q; B% H. `/ s! n
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    ! q6 J3 u' N- R
15. 
    3 i9 p  i# M% B; Y; @
16. const   CString   getString(int   i)
    0 r2 D& Z- _, v7 y- E; f( M9 Y
17. {
    6 G$ ^5 c$ f! ~* N( u$ K! ?
18. CString   s;
    
19. 
    5 X4 d8 N: }+ T4 S
20. s.Format(_T( "%d "),   i);
    
21. 
    9 ^3 y3 d) H0 N+ K$ @& B7 N+ P$ A( `4 t
22. return   s;
    : q" f4 ^3 u2 D8 r# B4 Y5 U1 O
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    " C2 a+ X! t+ f. j9 Z
26. {
    2 Z$ N: k$ J8 {3 |/ ~
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    # U/ K4 K: e- ~2 u+ D. c
31. {
    - ]1 W) D9 V0 C, B$ d! j
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)
    
36. {
    
37. char   buffer[10240];
    0 C" ]/ b! A+ b
38. 
    & d3 l7 O/ c. I8 f6 B& T
39. const   CStringA   sa(request);
    ; [: J( j7 ]1 o( x% U
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    7 _  D& u  l. A' ^" |3 q
42. 
    / Z8 A: y; U% v2 ~4 r9 h
43. uint32   ip   =   inet_addr(CStringA(addr));
    ( S' Y) k. k+ Z! @& u! [
44. struct   sockaddr_in   sockaddr;
    
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;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    * t6 B2 b8 A( `5 w6 O4 Z
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    * g9 v4 \* f7 @& E* ~3 l
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    3 n3 C: o& {5 W# j2 X
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    . A2 a. b& j( z
61. response   =   CString(CStringA(buffer,   rlen));
    / I8 b' T- t6 }. h, j
62. 
    
63. return   true;
    
64. }
    $ L8 R$ g5 S' |! @
65. 
    9 S8 b7 ]* J8 _& s/ t5 l
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    - F- h* R7 A4 |& k& |; ^7 ?
70. const   CStringA   sa(request);
    9 q( U0 A2 ^. y# s  g
71. int   length   =   sa.GetLength();
    8 \1 Y9 ~! E: d$ M2 c$ r+ v
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    5 m* u5 o/ E8 ?
74. struct   sockaddr_in   sockaddr;
    ( B! T4 T! N  g+ N; o# ]
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    8 [6 F$ p9 A7 X: ?) C/ {# ~
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    + z4 H% ?  I. ]
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ( w& V0 p+ J) \0 {  P) q' `
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ; c3 U9 K! M1 I; D/ z
81. }
    & \. N) S3 @, Y9 v* a  N
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    8 G! O* p" R5 h: W9 h
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    & b% T, l2 G7 X' z- e' [7 U
88. 
    
89. result   =   response;
    7 F+ H$ j2 R: j; M6 V$ {
90. result.Delete(0,   pos);
    : B# d/ o8 c1 F2 r
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    4 N/ g4 `" ~- w; h# y* \5 X
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    & `3 Y9 E' D3 [
96. return   true;
    
97. }
    
98. 
    ! D0 b* `7 n  [( Q+ t" G/ c4 d
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     + W$ b5 w% q1 @, \. \3 K9 f- u+ V: f  c
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     ' |# V, }2 I, g# I& F, r2 K4 ^
103. CString   property;
     * q" d' M: ^- @
104. 
     
105. int   posStart   =   all.Find(startTag);
     ! P$ Z3 @5 d3 E4 ^! @
106. if   (posStart <0)   return   CString();
     & |# R4 G& ?- R7 ]7 X% o6 `) `7 _
107. 
     9 P4 h# `; k. d- M1 r5 y( \
108. int   posEnd   =   all.Find(endTag,   posStart);
     - J' C3 F5 f: m
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     ! |9 s/ D; Y7 o
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     ' R, g1 Z/ d# l1 x: z* C+ C  X
115. :   m_version(1)
     * }- d6 G4 z8 v$ r& x( _: h6 l  g
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     ( k5 ^. {# P( u7 ]1 B9 Q+ N( H
119. }
     
120. 
     # M( |- B! t. p% x! {& M- p5 r
121. MyUPnP::~MyUPnP()
     ( o6 ~2 S& j: f( z  w
122. {
     
123. UPNPNAT_MAPPING   search;
     + E( _: q! z  U: `6 @/ l. _
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ) V( X8 k& A2 k2 {& N; E) \
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     1 ^  g3 C& c0 {" B
131. }
     
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     6 z7 M& o# w' I0 U9 D0 w- u- K
135. {
     7 a9 z7 l4 N' m! U& {
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     6 Z6 Z$ U$ o- v( T2 V
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     1 H3 F( S6 q2 v$ ?6 I8 i+ o
145. 
     : J" U  s0 n6 W# x
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     3 b1 K6 o7 ^8 w; c$ q  r& \5 a
147. u_long   lv   =   1;
     5 P, p4 G$ r1 [+ p( F9 S
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     . I$ {0 i. N" n" S2 O0 ]% P
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;
     
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 "),
     ( e' P$ {: E/ \; ^
157. 6,   m_name);
     2 p0 O1 F3 i6 z4 s
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     
161. 
     3 B& V2 o% |& o4 D1 Q$ n( e4 Q
162. Sleep(10);
     9 _1 ?3 x2 r  ~2 W  T2 f
163. 
     # T) R' U, y2 B! {: j" G2 h  f/ v. R
164. char   buffer[10240];
     " P: i3 w0 m, u5 f  \- {
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     , `- P, |- a) _6 f
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     ) q1 ?% k3 R7 C3 g
171. if   (!parseHTTPResponse(response,   result))   return   false;
     ) k; L: F3 l, W2 ~2 U6 _- D
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     " d. P& \6 ]: P" w6 n4 @: k
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);
       Z! b4 P& k' b/ T# c
178. if   (line.IsEmpty())   return   false;
     . J/ j: H! n5 N! \/ c( H
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     0 u' b( g' p+ _, {( _) V
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     2 @( J! t2 H" F
183. m_description   =   line;
     
184. m_description.Trim();
     $ q+ ?+ M: M* w5 H( B
185. return   GetDescription();
     
186. }
     ) L7 v8 R/ x* d; @0 G
187. }
     
188. }
     
189. }
     
190. }
     
191. closesocket(s);
     
192. 
     
193. return   false;
     2 J6 t8 W; S! t4 L
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
0 ?0 f/ z$ `2 T! Q( h0 O
" G5 p0 ]# N: r1 s) D% l! z
///////////////////////////////////////////
6 z. f9 L% [- @4 ?" c//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


#pragma once
3 @8 v+ M# c5 ]9 w  y& J2 O" Z#include <exception>


1 t" N9 M( }  A: y  enum TRISTATE{
- W1 M, l5 F0 Q' h( R* l) R        TRIS_FALSE,
        TRIS_UNKNOWN,
6 b# W9 d  ~- r! `7 c6 @) G$ h        TRIS_TRUE
0 V9 z8 Z8 {8 @( n4 i};


enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
+ n% ]; R, l2 J- Q3 _4 m: G* l        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
0 T" {, p- |9 Z- C7 ?};
9 A% [' I( E5 I. `" n
, F9 g" G5 {& O6 ~


0 i7 D) _% @/ f  v  H8 e% gclass CUPnPImpl
{
2 r5 \+ Q/ B5 e2 E) I6 _& Qpublic:
& S6 [$ t: n$ j4 s/ C) m        CUPnPImpl();
        virtual ~CUPnPImpl();
% N6 L% X; p% m  |( j, W+ A        struct UPnPError : std::exception {};
/ u% B; g1 \7 j: Z        enum {
                UPNP_OK,
3 u  }) k$ W+ X                UPNP_FAILED,
                UPNP_TIMEOUT
        };

+ p9 V* ?' R- H: z1 V( a
+ X! w) F: q& k6 T# D$ S' q! K3 S        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
) e0 }) L, I+ {/ @% Y+ r# y4 _        virtual void        DeletePorts() = 0;
) D5 x, }4 ?6 Z2 W0 u+ F        virtual bool        IsReady() = 0;
. Y' k3 E; F* j! g        virtual int                GetImplementationID() = 0;
       
% Q" M  {* q, }* P        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
- W, _: o5 v" s0 J  t9 V  ~+ U        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

4 Y, U. w: H# H7 T6 l
// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
  k6 ]' s8 n3 T        void                                SendResultMessage();
: x# _+ y# k1 W1 b: r2 c        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;

( ^# }% F& {% G4 g: ?! T
private:
        HWND        m_hResultMessageWindow;
8 Q7 [$ G0 Z/ b' C0 D$ u        UINT        m_nResultMessageID;


+ v9 h1 @% r5 ?1 m8 u# b# F6 ]};


) V" f- _8 H$ x9 \$ ?! Y# |// Dummy Implementation to be used when no other implementation is available
* M+ [8 @" W8 n8 X4 ?+ uclass CUPnPImplNone: public CUPnPImpl
{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
7 E! z  b9 W1 j9 |        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

( m: d8 Z& H  p! j+ L4 I
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
' w& D) }! L" o( `: X: c

8 ~% u3 Q/ m4 h, n! ^% T#pragma once
#pragma warning( disable: 4355 )

& w* x3 S7 M( S
#include "UPnPImpl.h"
$ w& [+ j2 p' J' [#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
- n( v, I! P3 K  w
- w7 I+ W' `8 E0 |; l
, M( F4 \, f+ o#include <vector>
#include <exception>
#include <functional>



0 C  D" S" P0 s/ `: j; j+ o
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
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;


% B0 H4 K5 Z  ptypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
/ M; t& u+ c9 @$ v

, N  M( o% _8 k/ O" n4 {7 @typedef DWORD (WINAPI* TGetIpAddrTable) (
; c/ _* Z' e- R/ S* f. @  PMIB_IPADDRTABLE pIpAddrTable,
! Q; f1 p3 E' Q0 ]! r$ b9 A/ R  PULONG pdwSize,
  BOOL bOrder
% v$ w( q/ y: i);
! x+ q2 b, r2 d* `: e. `
* N( W, C, L2 T  f* D
! N& R% o, C9 F$ X' K( Dtypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
1 H) O1 e# _0 P0 ^

CString translateUPnPResult(HRESULT hr);
+ o5 N" y; I% G9 I; W" J& Q$ a& M- gHRESULT UPnPMessage(HRESULT hr);

2 A' p" y& r' c" H
class CUPnPImplWinServ: public CUPnPImpl
9 Q8 t# d5 V3 o4 j1 a$ y1 L9 t" Q{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
0 q% {6 n& l9 Y# z/ A// Construction
& o% V& h$ Z! i) H! ^. A; Ypublic:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
4 D3 s  v) W9 ~
/ R  K% ^7 a& ?: P
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
9 T4 i( ^- z* c2 m- N$ l        virtual bool        IsReady();
& W* `9 r' {0 |/ j8 I# ?. q        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
  s/ B% x" S" x9 g3 x
1 i" K6 I9 v3 H! [9 z, H( c2 ]
        // 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; };


1 g2 v* k, ~2 D$ K( s; i# Uprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
$ Q& ]9 Z, W9 m; G7 V( T/ \        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
# w% k3 p5 d0 P  H+ w        void        Init();


, T% [$ N7 ]; R2 r1 w  g% S% g) u        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
- P9 R' a, P$ }0 T' m                {
# a* \, R: \: ?7 g. [                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
- ^" [6 c' I* f7 B                        m_bAsyncFindRunning = false;
# T0 K& N+ j+ z" [6 b                }
+ m# ?# s# i7 Y% m; b                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
/ n# s" q! D- s                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
" `. g  @9 W/ l" ?* N' V0 A" ~                }
$ `8 h+ n- K3 ~3 ~7 H+ r                return m_bAsyncFindRunning;
        }
" o  w. @" @6 X9 B1 w4 Z4 t" X

        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
0 I+ H$ B8 V' R# m; }        // API functions
& t' ^& V6 x9 @* a3 k        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
* Y9 V% g3 q1 d& ~; J! U        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
6 \3 ~5 h4 c4 T/ w' X        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
) n0 W3 b, C0 r5 q, V! j: N2 [3 I/ K        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


6 A2 W0 a( T+ [, j' d4 \        TGetBestInterface                m_pfGetBestInterface;
- _7 Y, ?2 q  \! M" K' c        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
$ v' J  C, `% l4 V        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
+ P6 i3 s- `6 R+ v                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
) s/ J8 C/ g) D$ Q) t5 a; P                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
8 r2 y9 ]( e; b* @! l
% ]" b4 o+ L# ?) e, I" A
# [3 x2 w! P/ O( [                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
6 y: K1 H2 J0 `* `
! T( g$ o, `3 e, x+ D$ G+ F
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
6 G7 j+ b! K5 p0 H        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
0 B. \* L6 {: ^        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
* n$ z# R4 y2 j6 X# `        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
( T6 }- @: M" L7 U0 k        void        StopUPnPService();


        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
4 C" y3 A% x* [( g/ ~4 U8 y' R        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
/ t8 ^9 s& @$ p. h8 S        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
8 n1 n3 Y6 h. t+ J        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
; o+ f  b) Q* a" p7 G0 e        CString        GetLocalRoutableIP(ServicePointer pService);


  ~- {" a- a9 V( H" Z' j( E8 t// Private members
' a& g$ M0 T& fprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
/ g. U; ~6 h/ M5 y        ServiceCallback                        m_pServiceCallback;

7 f7 p, r- W0 X/ Q  D, ?! X
+ ?, G( h3 C# J. Q" Y        LONG        m_nAsyncFindHandle;
: W. s8 H* @5 V4 v3 m! W        bool        m_bCOM;
) [5 Z" h5 h# k4 r0 R        bool        m_bPortIsFree;
- ~2 S; c( C* Y! a" g8 _7 Z        CString m_sLocalIP;
        CString m_sExternalIP;
; F0 l  c) }& L) M( m* T! u, E        bool        m_bADSL;                // Is the device ADSL?
) b1 Y$ y# _- [* N8 V4 _        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
, ?7 n  ]: R( u+ H        bool        m_bInited;
8 R& z$ ~1 I! j        bool        m_bAsyncFindRunning;
! |; N, b( z4 |  N$ k        HMODULE m_hADVAPI32_DLL;
5 z; }2 s* j8 F3 h        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
- y; G1 o/ k, h: e( i        bool        m_bDisableWANIPSetup;
7 u$ ?6 U! O. W0 s; c& n! X, @) R        bool        m_bDisableWANPPPSetup;
2 L) H* A1 U. ?! I/ q  A

};


: x6 g# \: E! D; N" V( e// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
; n1 }: [. n7 j) u; }{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
9 G. z8 Q  R" h/ j                : m_instance( instance )
        { m_lRefCount = 0; }
8 E7 |6 V: h5 G  v
* ?. v, ]# M; B" T" U# G5 W
( z! ^5 V' i* E. P8 x4 `   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
; {$ D& C% ]6 J, _) F

- t' z* Z6 ^# s6 W/ s// implementation
. P! L/ g( x9 F) uprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
/ [/ P; j- b- K' U! \
1 l) I9 m* q+ y- c. ~
0 V. H8 ~2 y& [4 L- Lprivate:
        CUPnPImplWinServ& m_instance;
+ q" X7 _8 A8 E6 Y2 a, N% E        LONG m_lRefCount;
4 \' Z" \) ~' A$ F3 P, s};

$ V5 D; b( z1 T  ?; E+ k! J$ B$ H
// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
( X$ O: H! j) f8 q{
, L( `* D8 }0 X, rpublic:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
1 k  n4 c& M1 k        { m_lRefCount = 0; }
   
4 A( [% l% s! @' U, u* w9 p0 u   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
* i! d3 w" v6 I$ j, Y) C6 n" K' F   STDMETHODIMP_(ULONG) Release();
7 t4 H" ^( ~3 F

// implementation
, ?! v$ m; @1 D! \* k0 o' k" ^' Zprivate:
# T5 ]3 S- ^6 |* A: E* T        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
        CUPnPImplWinServ& m_instance;
9 T6 F# k+ m. y) ?        LONG m_lRefCount;
};
1 d; t4 _6 |. F1 @

/ U4 e3 s$ ]+ A% o# t2 a* z9 i, V/////////////////////////////////////////////////


使用时只需要使用抽象类的接口。
7 z- h% f$ A1 V+ E  Z9 W- SCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
( k$ t* w! Z( d+ q& mCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
# s$ N! `' B' hCUPnPImpl::DeletePorts删除端口映射.