UPnP

天云上人

/*uPnP.h*/

1. 
   ) ^6 J- `  Y9 p" M5 M) ^
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   " L" r2 Z: E( @: n, u
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   + \" c! z. c* g0 e4 o
9. {
   
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    6 a6 u- ^$ t4 u( o2 U
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    & D# ^) o: `- A8 g# _' {" D0 a- {
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
    2 r6 M% @( [8 M* A% ]
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    - C8 H9 a0 f* q& W6 ?5 |% j
17. }   UPNPNAT_RETURN;
    4 w2 }. y1 X4 I" a9 X
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    8 e/ R' Y, {; v- A: C
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    $ b5 G4 n) u1 M" x- \. I. |
24. typedef   struct{
    / U# y+ f. D! Q
25. WORD   internalPort; //   Port   mapping   internal   port
    0 C+ f+ ?+ G2 p6 s
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    : j6 k  w7 L' Z4 u7 H* w$ L& Y
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    ! ?( [( i+ |2 G" @. D
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();
    
37. 
    
38. CString GetLastError();
    ; a7 }6 v9 ~+ [& @5 ~
39. CString GetLocalIPStr();
    8 O' ~" ?9 T& y2 h( p
40. WORD GetLocalIP();
    " b! \! y; E; {
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    $ p$ ~& o3 D, r$ r
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    : u$ j' c! n8 I+ J0 n; x0 }
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    # @; F% Z3 e# w+ _5 q# X' L4 a
52. 
    1 J1 _* J8 h. ^  c) `
53. bool Search(int   version=1);
    : \) D+ T% y5 m& x- }
54. bool GetDescription();
    2 e: l2 Q3 P( r) h
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    3 H! j* d0 X% @9 H; n% \5 L: M
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    4 W& H7 T* V3 e% {' h8 r" B
59. bool InternalSearch(int   version);
      R. l- d8 O1 f/ m0 O+ F5 a
60. CString m_devicename;
    - n  ?: ]% j& x$ `
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    , u7 k1 L" Z% n
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    
68. 
    ' d* Y! ?6 Z$ a& _8 q/ Y
69. private:
    & ^* ]3 ]: V7 ~3 O% F
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    9 e- ~' f6 ^, U1 ]: ~1 t
72. CString m_slocalIP;
    0 {! K' E7 t, K' G  H" X
73. CString m_slastError;
    ( @; N8 I0 w4 p6 y( {% U3 h- X
74. WORD m_uLocalIP;
    
75. 
    
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   3 R& \* D1 f) B' c* p1 S( `, x
2. #include   "stdafx.h "
   7 P3 m0 U; \2 R- ?. T. Y
3. 
   . f; J1 ]7 v+ h* C& t" l. \
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   " L. ]5 Y# U" N0 S: S) b0 b
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   3 P7 F0 Y. Y& c! n: O( }0 z% Q) _
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   9 i* L! e9 g& X2 l
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   1 N" f# Y) ?7 H' v3 N+ ~  ~+ ]  W
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    - v, Y/ r' W& t, l
11. 
    0 d/ e4 f# J% J: x1 a
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    0 j4 s; U' t- P) G* I4 h( \$ E# A
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    
17. {
    8 `  d, F. C5 `4 x: O2 q" O
18. CString   s;
    
19. 
      h; d# Q: d7 a. p" C
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    $ \3 b& G7 H3 T3 T+ ~5 C1 x! n: b
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    2 a& R% }7 t' L
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    : ~8 W8 X& j4 M/ h! a$ y' t
29. 
    5 V8 X* i& ^4 T0 A* x
30. const   CString   GetArgString(const   CString&   name,   int   value)
    ( X0 y; k' P% |7 [/ x) T
31. {
    ) n9 {6 R. ~  ?; B
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    % M2 V5 B9 r& f2 P2 s
33. }
    , h: _/ k- S& Y# b3 Z# v
34. 
    + y* M$ ^$ G0 f7 ~
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    . S' h7 l! j3 `! C0 Z: p1 ?
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    2 S4 n. e( p$ f" d) }. g, `
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    7 J! r+ `- ^- W6 t- p+ N
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);
    , Y2 Q8 j. [- Z4 [6 H' ^
50. u_long   lv   =   1;
    7 ]: f& b9 @+ @+ t% v8 }8 t
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    / @. H0 U* x. ?  }
55. Sleep(100);
    5 _5 ^, N7 j1 B6 x3 e& d. s9 B6 a
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    # T1 ~# ?+ s: A. W+ h4 e
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    % z) w% K" ~6 @8 [
62. 
    
63. return   true;
    ' B: I& C* b  o' o: m( U' l
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    4 k3 p: M2 M  y4 v/ ~
67. {
    
68. char   buffer[10240];
    ( y. I5 V5 x! K  b
69. 
    
70. const   CStringA   sa(request);
    : b$ B! }4 U1 b6 X& L
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    $ g/ o7 u8 U/ t3 p# `3 z
73. 
    8 }) {  o, |3 m6 q
74. struct   sockaddr_in   sockaddr;
    
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;
    . {1 x' W& P* I2 y
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    . u: L. I3 a1 C7 D! b
81. }
    
82. 
      q% K7 R6 C( P# Q. d$ [! v) i! L
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    1 d+ i( S+ h) T! Q, m) f- ?
84. {
    3 M: b2 ^* y) c$ G0 F  V6 E/ F2 T
85. int   pos   =   0;
    
86. 
    8 A6 y+ U& W$ G1 h+ m& @# Q3 G: m
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    ' |6 z9 |( Y+ c  _3 z- z
90. result.Delete(0,   pos);
    8 s5 L* T+ R( m! t
91. 
    7 }8 A, i" s2 m
92. pos   =   0;
    # Q3 v% K  T! o9 r
93. status.Tokenize(_T( "   "),   pos);
    - X- R; E' |$ k' O0 B, D
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    - H& c. O" W. r
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     7 w% u9 H' K/ L* v7 H
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     - k" V+ k! ^0 e( P* X
103. CString   property;
     
104. 
     0 z/ D3 T% ]$ \4 _! O
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     ' U. q1 [3 n2 }9 S
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     0 c+ l: w7 R# E
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     5 x7 Z8 E: ]+ h& `% C# V
119. }
     
120. 
     9 b0 W1 m3 F4 Y- W& D+ i- W
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     3 O: o5 S# P8 \$ n0 q0 x
128. }
     ) ?6 y1 C5 i3 j) t8 n0 Z* D
129. 
     " T4 `* W4 \* W! f4 a
130. m_Mappings.RemoveAll();
     6 }1 u8 M' F  Z' X
131. }
     
132. 
     
133. 
     ( U! d5 L4 B6 r+ m  S: A
134. bool   MyUPnP::InternalSearch(int   version)
     4 [0 @' i# L( }/ G1 Z+ C* z* @
135. {
     
136. if(version <=0)version   =   1;
     ' a! i; Y& J  N" O# _: [( u% r
137. m_version   =   version;
     0 \. _; f. M2 A' k# k7 o: x
138. 
     
139. #define   NUMBEROFDEVICES 2
     ' _  h( s) k- d
140. CString   devices[][2]   =   {
     7 Y/ ]8 B1 ^* H7 m) g% j
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     6 i2 E. k$ B& _  k5 `: u% i
144. };
     # ?8 `% ~9 X9 `6 V
145. 
     + p8 D% I; ^6 X1 b! w
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     % o. c5 u+ h; H; F
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     ; c* F$ m/ j) N4 O
152. if   (!(i%100))   {
     0 F# r2 h+ @8 r% b& u7 C4 C7 A( l
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     % s" Z/ G# p; e! _
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     7 w- w8 q: B* @2 j
155. CString   request;
     
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     
161. 
     
162. Sleep(10);
     ' N% T. r7 B( I
163. 
     3 y- [* O  u: _+ y! m
164. char   buffer[10240];
     ) J( p: j9 p! d+ y! H; m
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     " O6 m4 Z* M2 f+ h+ `
167. closesocket(s);
     " n( t+ D! r# W- I/ |9 V# [  V
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     4 t: E7 F& O7 g9 ?: ~; T
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);
     . u, U  a4 z7 M/ F
175. if   (result.Find(m_name)   > =   0)   {
     : g8 \/ r0 H8 X
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     " S9 [5 R0 m/ q
178. if   (line.IsEmpty())   return   false;
     - ]5 B# b( D" J( @! m  L% G0 {: A8 f7 G
179. CString   name   =   line.Mid(0,   9);
     ( }$ L; W  ], |
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     # n1 C* Y7 w& y0 w, h; `
182. line.Delete(0,   9);
     + U; f1 [7 Y# a. j. Y
183. m_description   =   line;
       n* e% d  [& L, u" G3 C
184. m_description.Trim();
     $ M( Z* t5 H6 b& D3 v. z+ H
185. return   GetDescription();
       e0 x- I" N8 Z/ V1 Y
186. }
     
187. }
     ! {+ p; U6 N# b" p
188. }
     3 q" u/ e9 g8 ?
189. }
     1 ~% F+ Z. R0 B
190. }
     
191. closesocket(s);
     % N% h, M' n) m3 L; f
192. 
     
193. return   false;
     " d  M. H  u5 l5 N9 S. L6 C
194. }
     8 p' V) v# [8 B" }% w

复制代码

天云上人

以下有关upnp的接口来自emule，
! f2 B: Z3 p! X" {, n5 @
8 @6 u* r; K" }2 K* B4 L* K9 T1 v
( B5 C  ], [- o" `3 Z+ {///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
1 [  g2 w, f( C* y& H7 u4 F+ t

9 N3 f; n' p/ R5 F6 b) R#pragma once
+ ~% K% w! H7 U  k  u#include <exception>
; u. _: g% ]- n) U- O2 ]
) j3 c) k" a0 @( L. ^9 x; Z
' m% L, k  C: b2 x" J$ r& p  enum TRISTATE{
- i8 s/ E1 V6 q, i9 P6 t% j        TRIS_FALSE,
        TRIS_UNKNOWN,
8 W+ E9 m* e) J* ~0 w        TRIS_TRUE
};
5 Z1 O7 j& r+ ^5 g! J5 t8 }

enum UPNP_IMPLEMENTATION{
  F8 m, I& k& L, P# v1 `) b        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
- Q) V3 z9 s9 N7 k8 T* I        UPNP_IMPL_NONE /*last*/
};

5 w3 ~/ `1 @% i3 V6 i" o
" ^+ l4 c  y% D5 h

% w: p1 p* {: Q! eclass CUPnPImpl
{
public:
        CUPnPImpl();
5 O' j# K# X0 p) D+ Y; U" F        virtual ~CUPnPImpl();
3 G4 n# [7 Y7 N+ O        struct UPnPError : std::exception {};
5 l& W. t% M# x6 o5 X& l* x8 K! @        enum {
                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
" ^9 e/ s# t/ v3 ?4 P' ^        };


& {, w# C6 q+ F6 n: U! Q3 @3 N: L        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
2 c$ ]% M7 x6 m9 z, {0 _        virtual void        StopAsyncFind() = 0;
) v1 f& F  g* f5 Y. g6 y; c  F        virtual void        DeletePorts() = 0;
7 s7 i2 D, @0 J% L; g) _" e* ^' W        virtual bool        IsReady() = 0;
: S  T) O0 q: Q9 z- u  c        virtual int                GetImplementationID() = 0;
" e3 }# ~7 q* b5 d       
: s; v: f% ?, w1 n3 H1 \+ S        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

# s3 C  Q: \  [6 V9 t# ^
1 C3 S8 w; f, e" j        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


4 _( L2 q; R/ w0 q// Implementation
- ]: |8 |$ w% a8 [" ~protected:
. Y) r% E0 J8 F  Y        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
3 U# _  s0 V% ?. g9 z( C2 b        uint16                                m_nUDPPort;
: H3 F9 j% f; b' h# M        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
3 b) A4 c+ O, ]) h9 \8 @7 y6 }        bool                                m_bCheckAndRefresh;
3 Z5 m& H) w7 ~$ i" x
* u2 `9 P( v3 p: R  C" K
* A' E- p3 n- K4 ^/ M/ eprivate:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;


/ ~0 b7 }+ O& Z/ b0 x& b) x* M$ _& c};


: h  V( e4 |- m/ |8 n# g. T; f0 W// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
. C8 i) I4 r6 v( Q        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
1 H" n' s1 q& N. z" }. I# `};

( F2 V# F& J& R1 f; m, s+ F
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
- a* ^1 [: N' V
# z; E: F. S- O7 R. y9 B+ q
2 P( T6 }+ K! L* s0 b) i+ G$ ~2 j#pragma once
* R5 o- ?" m/ r' c' s$ o#pragma warning( disable: 4355 )
0 o& _; j0 k5 [+ g

#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
, A8 q8 I2 f( d# C4 I% h#include <winsvc.h>
7 ^  U5 m& O" n5 _

( A" \- z( b1 |* E' Z* w#include <vector>
#include <exception>
#include <functional>
  Y3 ^, e0 q3 P% |) A; A/ B

' U. S) V8 A* H9 B3 D# I8 W
  b/ Z- ^: \* p- m/ L1 ]1 ~
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
$ i+ E, F1 t+ R9 Xtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
' l' `. D+ j+ I6 V3 Gtypedef _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;
3 m+ H1 y$ k  {0 @; I+ n: Btypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
0 x2 |( @( y/ s
8 d* z: R& ?9 f5 |% j6 y
% W6 H. V$ u& C/ A# Itypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
& h% J( X0 X$ P" w, W);
+ C- j& V! D! ^/ I4 `

typedef DWORD (WINAPI* TGetIpAddrTable) (
2 p2 X' L4 [! I, p, C  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
: N+ x# y0 E- n, u. k7 O  BOOL bOrder
);

. l8 u8 `1 R/ O- [9 g0 d& l
typedef DWORD (WINAPI* TGetIfEntry) (
# W' b/ H. {4 G9 x  PMIB_IFROW pIfRow
, q  a0 ~7 ~& l3 W);
8 L' `9 b& n# @/ o

CString translateUPnPResult(HRESULT hr);
+ V. l. M8 x' N+ k) Z! d# rHRESULT UPnPMessage(HRESULT hr);
$ ?$ Q' Y. Y1 S, _0 P0 O8 f
4 w; t/ {" X) z. z
class CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
' w+ A+ L3 F7 r7 V+ F! o) Z* ~public:
% H' K3 F3 ?7 x" G6 Y/ H4 ^' r4 R2 l        virtual ~CUPnPImplWinServ();
2 l) @0 q9 `6 I0 Q4 H) T4 V* n        CUPnPImplWinServ();
# N0 e; q" W* z) i. s# |2 ~5 X

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
( Y* k. g5 ~) d        virtual void        StopAsyncFind();
8 ^' s1 p; c  a& B1 ]        virtual void        DeletePorts();
8 ~0 g* r" Y* C7 t" v: @        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

. E' R+ X" R% ?: I5 [- b; K4 g$ Z: O
        // 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; };
/ Z! Z0 w' K9 P
4 P+ J2 @3 J4 `9 P) ?
8 h( R7 Q# L( t, n- C6 p/ bprotected:
2 `9 V0 |' t3 v( q4 K        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
$ q! F9 l* X3 O. E/ y        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
  {0 V& S0 P' t4 q+ c6 Z! d        void        RemoveDevice(CComBSTR bsUDN);
. n/ L# x; T; V/ n! K% T8 Z- y' t        bool        OnSearchComplete();
2 C5 s8 d( m0 m  B/ g, v$ o' A        void        Init();


        inline bool IsAsyncFindRunning()
; b' p2 ~2 A- f3 V        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
9 V8 e/ M1 @1 b                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
                MSG msg;
9 ^% U  e. R. s$ i+ P2 {! F                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
' {7 S# q# Y3 ]1 V9 \                {
5 O( t0 D% H6 m: x/ S9 H0 X                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
  e$ m8 @4 @0 d" M" U# i2 P                return m_bAsyncFindRunning;
. w8 W" ~5 ~% p0 m& _        }
0 b% A1 M9 T% z1 q, Z) `

        TRISTATE                        m_bUPnPDeviceConnected;

: a. e* H: S! p5 T2 H, O
// Implementation
3 v6 A7 y4 o% d6 I" q- Z* j        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
; O% `* o  I% g: R4 D$ L3 Q- x        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
+ w6 J, k) a- i- b0 y; b        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
  p2 e, w" q. `/ O) o        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
0 X8 T6 F3 _% d        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

9 T7 x6 ?+ f5 _2 e
        TGetBestInterface                m_pfGetBestInterface;
# k- ?) s6 U* a        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
8 V, \' r- r1 _/ B) ?5 b8 L: l* ?                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
' D$ O3 x0 `: t. ?                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

2 R$ ]; Z* F# c
$ Q: z  N9 y& I8 F                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

. T5 j6 Y' d- }3 B6 g3 M/ o0 G
' @1 v. i, }9 A1 F# i! |                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
8 z8 F& k, F8 a! F7 S+ d        };
' r$ @& u0 Q+ i5 f3 U/ v       
5 Z& v7 d: _+ z; |" O" `' T: T        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
# r# L3 \6 h# g* x: b" N        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
; u6 A: L6 |2 b5 U        void        StopUPnPService();
3 f  O3 A+ o. k+ V
( Z. z0 n! A9 S$ Z$ d. D6 s6 r9 w
        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
/ @* i2 }3 E% x/ N' {, w+ R8 `/ n        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
, I& x4 r3 ?' ?        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
) I9 T& H( u5 E8 f% o. c/ V; l        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
+ o# K0 e! \% L2 @' K9 H        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
% k; r/ L( K; k( v8 L- V  `        CString        GetLocalRoutableIP(ServicePointer pService);
  Q( l! n4 y1 U, d, d2 G+ B
$ D+ m* x" }* c" k" Z8 [
// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
8 R9 r8 S/ M9 ~8 ]6 m4 e3 K( Y/ I        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
8 W" \' l! O$ S" P* d        FinderPointer                        m_pDeviceFinder;
2 `/ R% E+ y' Z) v% t' S        DeviceFinderCallback        m_pDeviceFinderCallback;
$ P3 B) C4 U- L- K' l2 D        ServiceCallback                        m_pServiceCallback;
+ P& k1 W/ X% ~5 ^* e- l
3 v0 n$ ~1 D: V8 L. ?
; r+ V" n% a- h) s2 E        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
' E2 L1 s/ p8 ?9 K1 n+ b: H        CString m_sExternalIP;
2 U' B2 t, I* q$ D! @        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
7 b0 B, [( V* u" m3 U) g, W        bool        m_bInited;
2 s6 L  Y6 K/ x! w  r/ X        bool        m_bAsyncFindRunning;
; c6 Q5 R9 w" t5 `        HMODULE m_hADVAPI32_DLL;
9 G1 E1 s$ r7 L. u6 O& q        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
9 |* i* i  r5 F6 _7 D8 }        bool        m_bServiceStartedByEmule;
. t) }6 Y; H; g* c5 Q. X( B3 q8 a        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
& A$ n1 e$ e! }8 T6 \- P! m# ]

! m4 Z9 A3 s/ e};


// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
6 Z2 |4 w) }; @public:
6 G- ~6 ?' M, F1 T0 J) \" W        CDeviceFinderCallback(CUPnPImplWinServ& instance)
4 `/ N" D! ]! P. h5 Z2 M  @; k                : m_instance( instance )
2 L) ~0 r( V% h  I        { m_lRefCount = 0; }

' p2 ^' N9 i. K* f
/ J) O1 N6 s/ ?% ?) h3 K2 P% h& y' [   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
. G: f! J7 e( a, O/ o   STDMETHODIMP_(ULONG) AddRef();
4 O* B0 A) [9 x5 P' U7 ^. O   STDMETHODIMP_(ULONG) Release();
6 \  v( }  B; s$ c% y
( M4 X6 r5 W7 M
// implementation
* u+ v$ |7 x3 Hprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
# c. O4 f3 B$ t2 ~, a7 q: b% D        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
* ?$ j# X, h: H5 c: _0 A: `% _! L        HRESULT __stdcall SearchComplete(LONG nFindData);
4 u& R3 v$ w" H4 n7 W  w$ F$ {

+ |$ ]3 D" c& e* \" Wprivate:
" t/ `0 }0 I0 Z6 ~9 P/ l4 k        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
( {, T5 Q0 s1 ]3 i};
5 D1 p. A5 a6 W9 o
9 m* a/ f  F( v5 {
// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
{
public:
, `, `3 d- X1 X% O        CServiceCallback(CUPnPImplWinServ& instance)
* U; v# ^) {; Q* T                : m_instance( instance )
        { m_lRefCount = 0; }
( e: G) W$ U, \& l9 ^   
# H; y2 u. z8 p1 R   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
9 G9 C6 H, q2 _& W/ C   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
$ ?2 @% g: H. f* d. Y+ A

+ }6 ?  P  r6 V3 ?  zprivate:
0 l) i) O: y) [3 l1 y1 j        CUPnPImplWinServ& m_instance;
- a2 ^1 E0 J6 t; l( Y1 w        LONG m_lRefCount;
9 u6 ]3 K3 P  Y- Z$ E4 E};


3 c$ T3 ?' y  m5 c" |7 Y& _; M+ ]/////////////////////////////////////////////////
7 A9 X: g$ N! e# ~* _7 j2 E

使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
7 L8 C0 }, G( _$ u0 d! q1 [! {CUPnPImpl::StopAsyncFind停止设备查找.
  C' m& h; o' W3 zCUPnPImpl::DeletePorts删除端口映射.