UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
     Y& X; R4 Z/ A& w- n6 P+ a
5. 
   / B( p/ u5 G+ E6 \4 Y( {
6. typedef   unsigned   long   ulong;
   0 |& b: L3 Z$ A0 `. K
7. 
   
8. class   MyUPnP
   / U0 ?* E9 E/ z$ t. V2 P4 B! C  f. K
9. {
   5 a: U2 d# t0 a, F2 s3 O6 V
10. public:
    
11. typedef   enum{
    ( R- b- ]& F7 I  I8 f
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
    
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    # b# u4 K& A6 {6 i0 t8 ]8 c
18. 
    & u# A  M! h% {* u/ f7 ^: h
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    ! W% W; E0 w$ j* t$ E
25. WORD   internalPort; //   Port   mapping   internal   port
    4 a# F3 @; y/ {# D7 g* s0 s! ?
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    7 ^- f* s7 J2 @0 h8 v. E! G' u
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    ' Y0 I$ i  U( W# U+ O% A
32. ~MyUPnP();
    
33. 
    ' X7 U$ Y% @" m6 l1 H: U7 n
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();
    1 u: ], X2 N8 K# T
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    - A9 ?0 W$ a& j- O! E" z+ m
41. bool IsLANIP(WORD   nIP);
    
42. 
    # k( Y; L8 o; ^1 V* M6 a
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
      `9 F" K; t4 E) G8 Z2 \; E
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);
    8 u) w7 L3 M5 U, ~
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    1 O# B2 T1 _. ~4 h: a
54. bool GetDescription();
    - S; l1 j' z$ l6 |
55. CString GetProperty(const   CString&   name,   CString&   response);
    + v6 m( Z. I! C
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    0 e. Q* d! [- B$ V7 d2 A% O
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    ; N! n' e- T( m9 n; I
59. bool InternalSearch(int   version);
    / t8 [5 n, ?) t7 ~- k  w! ]
60. CString m_devicename;
    : {( W" I; |8 P7 S" l
61. CString m_name;
    
62. CString m_description;
    " \3 l: g, U- I  J( F" f- g  K
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    : s6 e) c- ]4 v' T
68. 
    7 a# v0 j' x  R
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    9 g! d6 z% D: W
71. 
    1 w; T8 i0 a$ a
72. CString m_slocalIP;
    
73. CString m_slastError;
    ! ]! w: ]8 n2 F1 p: A2 l
74. WORD m_uLocalIP;
    
75. 
    ' O# R, T0 u7 {' i
76. bool isSearched;
    / L! D# j) Y6 o' w) p5 }$ O
77. };
    ( r/ D/ |, X" f, e
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   ! }( ]! {+ j9 v8 L
3. 
   , X; O1 O. b; G+ Y3 V
4. #include   "upnp.h "
   & H9 n7 a3 K, e# d8 B9 k5 n
5. 
   : l( [/ r& A/ K1 U
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   6 x8 H1 l( p( K, M! r2 n
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   . w' @  X) Y- M& W& c$ K9 U$ u
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    5 c( U* M; r) Q9 b$ S8 A. [3 |% {2 i* u) a
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    2 _$ o) X" M4 F1 R: Q: u
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    7 E, a$ }: s" b) A, F: Z4 o/ U
15. 
    
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    / U, c8 L8 X# \! c' k. g4 i
19. 
    7 Y: c; `1 s  g7 d8 A; \
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    % B0 E# b- {% A0 Q
23. }
    # s4 X# E7 v. i( K7 A* E+ n
24. 
    & u2 \5 P) _2 g) ?* E# m! _
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    + [$ h0 y  A! B! n
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    . a7 R& O* b% B- e2 K
29. 
    # ~2 x8 Z' Q0 V0 P4 w
30. const   CString   GetArgString(const   CString&   name,   int   value)
    ( l- [1 x$ c  q
31. {
    5 K. c- o, F" Y3 b$ u, X
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    6 S6 C; M+ X- v6 y7 Y$ {8 L
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    ) m8 N+ b3 B4 t/ Z
36. {
    
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    + R" L- [, ~. L4 m& {
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
      i7 B* J; i) X. C7 l! i0 a' P
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    / h0 t% u5 s# D; z+ c! f
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
      a: R6 R- }  N  `% |1 F4 C2 b
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    7 X6 V4 b7 B4 c
50. u_long   lv   =   1;
    1 x0 e& n  i( [7 I! i5 y
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    , G2 C; E8 ~* _- H
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    " n9 r; A7 ~; \( W
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    " c9 ]" C; O0 K7 l3 t
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    , V3 n2 H1 C+ t- J
62. 
    
63. return   true;
    9 I8 d( b4 @4 ^; a) O+ p
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
      X8 R3 Q2 O! b1 @
67. {
    
68. char   buffer[10240];
    , r8 m$ s7 m2 E
69. 
    3 c' A% |( U: B% P- ~; I
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    1 [) ?1 A/ ~4 q/ O* L6 z* ^
72. strcpy(buffer,   (const   char*)sa);
    5 o  N, p7 N* w5 H2 y5 m
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    7 T. k& S4 c% L) W8 U
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    # t# y: z& Y8 ^2 P6 o! Y
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    5 u( U, H' a7 |& _/ E4 ^% z0 P
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    + E' @) t! z% E3 i# ?4 A
84. {
    " a6 l/ v! R1 a* P
85. int   pos   =   0;
    
86. 
    8 U1 a0 ^% ?$ g; E- k; Q
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    % w5 A2 [6 ^- j" @( x
88. 
    
89. result   =   response;
    ) u( ]' u) Q5 E
90. result.Delete(0,   pos);
    
91. 
    + C+ D: e. u0 d& ~2 }
92. pos   =   0;
    " c- B9 n4 n  |* I- {
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    + S9 [5 h0 X; v/ ]# \
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    1 Y, @8 }+ v3 h4 T" a3 O
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    0 n2 j! B7 @7 D- v- m
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     ) H# G3 `# X  `' T4 R
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     7 X9 U1 @) x' I( `- N3 i8 G: s+ G
107. 
     & |9 l! [/ ^% j% W6 E
108. int   posEnd   =   all.Find(endTag,   posStart);
     : M" [9 k# q1 K, I4 J
109. if   (posStart> =posEnd)   return   CString();
     5 [$ X, c" w) p1 D( A, }
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     4 Z0 g& M7 k" c  h
113. 
     $ g* X( r$ ~3 F8 d, ?
114. MyUPnP::MyUPnP()
     + _2 x; T4 d+ y. U  G0 j- ^
115. :   m_version(1)
     
116. {
     4 B) A& M5 G- o! _4 \7 p
117. m_uLocalIP   =   0;
     ) Q6 S0 f3 [# w# D
118. isSearched   =   false;
     
119. }
     5 O. I: r$ y7 Q4 y+ h. N$ W
120. 
     : X  J2 f$ W- p. F$ h) d- x
121. MyUPnP::~MyUPnP()
     8 N- X  T. K( r( ~* G5 S
122. {
     ' x, T& E* F0 ^: w6 |+ c+ G
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ! S% G4 Z) R$ f/ k: M' R- q
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     % V! G6 k! r9 O+ W3 W( d* M
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     ) _* u1 v" |  K- m$ E
131. }
     3 q, X$ Q2 P7 Y
132. 
     / L4 s, {4 o* O
133. 
     - d* A; N$ Y- G2 S" `3 U
134. bool   MyUPnP::InternalSearch(int   version)
     ! l- V2 {; A$ w
135. {
     / U/ {5 {4 N# r4 s* r
136. if(version <=0)version   =   1;
     ' N3 B# ~6 ~/ w* I) f
137. m_version   =   version;
     2 n* _7 Z; J3 W3 p
138. 
     
139. #define   NUMBEROFDEVICES 2
     4 g- y6 v: Z. g
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     % T: U0 }! w, @* `8 |
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     6 h5 {9 O+ C0 C! ~1 d& l
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     + e1 R3 T; f% F5 C! G
152. if   (!(i%100))   {
     2 U+ C7 R5 @2 M3 J+ {& m, j
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;
     / W: E. y$ V/ j" [; R. ^
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. 
     : \& {3 N5 S+ r1 P, _3 O' v
162. Sleep(10);
     * D0 o5 `6 A% }1 i, j. q
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     " g" x* t( P; e/ Q
166. if   (rlen   <=   0)   continue;
     5 Z0 B. Y0 E' J' o! j. X
167. closesocket(s);
     
168. 
     3 j8 b9 i1 ]" j: ]
169. CString   response   =   CString(CStringA(buffer,   rlen));
     $ n( p0 T: @, w
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     4 |, V" {+ q+ A$ _1 O
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     7 N/ \/ {8 o9 e  N3 ?
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     9 u/ L3 S1 t4 F5 W) v* B
175. if   (result.Find(m_name)   > =   0)   {
     5 ?, y( G  S0 T% j! m
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     7 B8 Z! u( \9 f. s. _! G
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     # K1 u0 {1 C5 a
180. name.MakeUpper();
     - w9 b, z6 ?3 J; p/ m/ W
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     9 h7 q$ I9 y/ c9 _( `* a1 B' K
185. return   GetDescription();
     
186. }
     
187. }
     6 E& f3 y6 Q' Y0 N: J3 A
188. }
     7 g4 J+ A9 p. f, _
189. }
     
190. }
     8 K7 Y. x' G6 G# P7 P
191. closesocket(s);
     
192. 
     
193. return   false;
     
194. }
     9 |- O0 O9 i" ^- I+ U" o9 O( h: O

复制代码

天云上人

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


5 e6 b# N2 Q8 @) t+ F4 w- r* N- i///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.

$ a) c3 [4 `  `" Q* f
# ]! X) }* F# v4 V  z% j#pragma once
8 y; X; P+ q' A#include <exception>

# |! B# M$ m$ X, C6 \% V! W/ H
  enum TRISTATE{
7 C+ \4 k4 V$ G0 l" [0 j        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
};

, Z6 W8 P( ~* Z+ D. V
+ {0 |* W8 I/ b  s0 Fenum UPNP_IMPLEMENTATION{
; L; F# ]1 n) c* `% ]7 k. }6 _        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};
( o: t/ K" I6 R. Q+ Y5 N8 G

6 J% O  N; b. v, Y6 X
+ J% Y0 B1 M- h1 ^( b" ?. l
0 F5 l3 v$ F- s7 }0 F/ Eclass CUPnPImpl
' t$ {- }( g5 X4 _' N{
# Y9 s7 |! J+ r8 V! \( s9 g6 |, ]  qpublic:
7 B/ J# m8 P7 a1 H) ]        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
+ _' Z1 {7 i+ ~9 B# P' O9 B# D                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
        };


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
3 ~; a; K" p+ c' h) G, l% R2 n        virtual void        DeletePorts() = 0;
) t( ~0 O% C% G3 ^3 S5 H* ?        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
* p3 _. F( Q' H8 Q        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
0 s. }1 _& L3 E
1 ?0 U- [/ V3 A) |& x$ s
0 p) Y' T+ A8 p9 `        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
# {: X9 |- p- J9 ~6 e( o        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
. u2 h2 H  @- S        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

% Y2 q* h: ]2 f2 I& k: Z6 I
8 |  f0 H/ @. _7 a' a$ C// Implementation
protected:
% |3 n% P0 G, h" \( B+ a        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
. I+ i  t4 E3 d2 z9 K, e- K" }        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
6 C9 V4 V* I' G# Y8 Y$ W. ^        uint16                                m_nTCPWebPort;
( g) h$ n# T. E0 R' \3 u        bool                                m_bCheckAndRefresh;

5 E1 z# p5 }% N) T' x1 Y
  q  z! G; X6 y1 B9 H% Uprivate:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
- D. w( M  s3 I* K* m
% p5 y% V4 U7 B3 C) Z
};
2 ]& {& W3 Q7 a# q: {

$ L0 f3 V8 d; V8 \5 P" o& \8 h5 d. H3 W// Dummy Implementation to be used when no other implementation is available
# z4 N! w. }3 {2 }. f+ A! P, u0 fclass CUPnPImplNone: public CUPnPImpl
{
public:
( C1 A1 c" i7 c& u6 [$ c        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
# g8 K1 O: ^! Z. d' ~7 Q, k        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
, u; F- j, Z, t/ M};

) s5 ^9 _  ?; p
; |4 _" i* \- ?3 M# ~* _) n, j. \) R5 G/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
: D% Y. ~! v/ B# S- s3 |- I
  g/ \$ @! ?" X
* A% e9 ~- U2 h/ P' r% t2 x: h#pragma once
#pragma warning( disable: 4355 )


3 u6 f. @! s  ~: o$ ]+ T4 Q! T3 J#include "UPnPImpl.h"
1 |( E  W' S' B/ y, }' k- {#include <upnp.h>
#include <iphlpapi.h>
5 d9 K3 z+ E. d3 p& J/ j3 Y- H#include <comdef.h>
) d' u9 X$ [5 o$ e9 x1 y2 z; [% m: ?  |#include <winsvc.h>

& F7 R8 J& M. H" Z% \
$ F" E$ U2 |* `#include <vector>
( u  s5 }8 @5 j& ~#include <exception>
#include <functional>

  z" u! G& M! Z( n5 q1 x+ P


( |; w+ ]$ \3 ~typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
7 {% e! [8 ^$ u4 ktypedef _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;


typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
7 _; B; g/ |+ w% _8 o. H

typedef DWORD (WINAPI* TGetIpAddrTable) (
; g6 l* N) e+ G: T  PMIB_IPADDRTABLE pIpAddrTable,
% D4 ?5 E+ X) c8 q1 p  PULONG pdwSize,
; j: _- F# {, o6 B3 N( a  BOOL bOrder
8 d8 v7 u8 ~* ]" ~2 H5 f. w4 G);


0 |' U( k- C9 stypedef DWORD (WINAPI* TGetIfEntry) (
1 ~1 e) N) V2 p; h( v+ T  PMIB_IFROW pIfRow
  H5 V# P" X$ N4 w' A);


CString translateUPnPResult(HRESULT hr);
2 O, Z. p2 w. O: b  PHRESULT UPnPMessage(HRESULT hr);
8 y) X+ f  m  E2 m) Y& ^* A
: D3 h! z" G& N0 w
class CUPnPImplWinServ: public CUPnPImpl
{
. J4 @% B' d9 g) G+ i0 ^, L        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
9 m2 y+ z- l* q; ]3 Upublic:
/ e( C6 i. s5 l! ?9 K  T/ U2 c        virtual ~CUPnPImplWinServ();
' \0 a4 H2 R0 @( M- t& O        CUPnPImplWinServ();


' h# L, Z8 H* M        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
% u2 g3 I3 B) b# V) b        virtual void        StopAsyncFind();
( C/ b- \4 F& q: l7 y        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
3 i. V' |  l, 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; };
; A0 |" g8 x& T* A2 U

4 F3 ?' h" G3 Y7 f8 }protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
9 u/ Q( `/ }& R/ ~% f5 X        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
1 \& g" {; w$ m9 Z9 j        void        Init();

$ F% z7 T9 E) m9 ]6 r3 h1 r) W3 m( C
        inline bool IsAsyncFindRunning()
        {
0 [9 C; C# c/ J% q! N/ o3 v                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
4 Q" i* P+ @. \4 H4 {                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
3 ^0 |* F* Z5 A' y" C                MSG msg;
6 Q+ {, V: Q2 d( K                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
; B6 e: S! a" Q                }
                return m_bAsyncFindRunning;
        }
7 v4 O) Z$ `: |3 D; \! U

. P$ [. D4 k" E4 Z8 y* N        TRISTATE                        m_bUPnPDeviceConnected;
$ k2 u& a% ?6 N. U# l0 J

5 }% {3 S1 Q& |+ }, M4 Q5 b4 ~/ q% v// Implementation
8 ?- {$ {7 f% I8 `2 C4 E5 K        // API functions
* B, g- X3 O, ]/ @5 {        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
9 }" P; `6 m2 f" f3 C. C+ t) i; X! |2 \        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);
4 d1 j, e* L+ x        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
7 F9 J3 M9 @: b8 \        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
. M( X+ O3 p1 U% V- O1 k3 E
* I1 X" Y3 g$ H- s% G5 y. @3 j
2 m( C+ B% A5 L2 |/ f3 E) V% a        TGetBestInterface                m_pfGetBestInterface;
! b" j2 {/ Z$ @5 O2 z+ p        TGetIpAddrTable                        m_pfGetIpAddrTable;
5 O* j$ g, F. F0 J0 \7 U' g        TGetIfEntry                                m_pfGetIfEntry;


: v: E% N3 H! n3 l: s        static FinderPointer CreateFinderInstance();
% ?" d" ~* Y7 a9 m" W3 E3 V        struct FindDevice : std::unary_function< DevicePointer, bool >
0 t& n8 m0 H- B' y: a: a; _        {
# J. l; v" R7 [& m                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
+ K& ^" D5 {9 E9 l+ G7 ^$ C8 p8 p- q( G                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
" [4 t0 h- ?" \9 J

; J1 W; z* }' z                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
6 A* L$ P5 Y, E3 @        };
       
0 h" X" D' }9 ^/ ?9 N& ?& Q        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
' ?: U2 e( R0 `7 i( j5 r; l        void        StartPortMapping();
3 b3 E" M, A, }        HRESULT        MapPort(const ServicePointer& service);
! O5 X6 S: j5 ?1 k5 G        void        DeleteExistingPortMappings(ServicePointer pService);
8 H* I) l. T: t+ `) S; ^, z        void        CreatePortMappings(ServicePointer pService);
: m0 o- `! ~' c! y2 b" ?  l        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
0 ?5 [% z6 j, y+ e3 ?- o6 u- I        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
# n8 }( M. b' Y! c  U" f) h3 H                LPCTSTR pszInArgString, CString& strResult);
9 z' y* @( e1 Y7 }) y        void        StopUPnPService();
6 B% ]# S7 a; x  `2 N( \

, |& x* ~7 D9 R        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
8 w# I" G% V# v: I5 j- G) \; |        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
! F. Q0 i+ w6 q+ s$ F: ~        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);


0 B+ y) b! V" m$ D# a// Private members
& U+ _* l/ s% q4 e% C8 J- @" c. N9 [& {private:
; x, O! M  r% C. M        DWORD        m_tLastEvent;        // When the last event was received?
: Z5 B) [! v1 X3 G        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
5 N2 g9 ^- {' j6 D2 r
' _9 b; y6 Z# P, q+ l6 f3 n
, t7 Q& m! T  l        LONG        m_nAsyncFindHandle;
* ~4 Y) D/ r, O8 {! T# t/ u: V        bool        m_bCOM;
1 T: B, S0 \4 i. G/ @; P* h        bool        m_bPortIsFree;
7 I0 ~4 H) A' D. w4 `% O        CString m_sLocalIP;
/ g) D% r9 W4 r        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
; A* z. W/ c: N1 u2 q$ p; B. ?        bool        m_bInited;
2 t. U- S( `+ V9 w        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
5 w5 ]0 N$ ]0 Z  a/ U1 A: \        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
9 |0 q% n6 I1 V) v) H/ t; R        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
: A2 Z3 L) P/ ~        bool        m_bDisableWANPPPSetup;

5 e7 b8 y% z$ W- {0 w4 J# {( u& F
};
( j' `8 r0 I# [3 o

9 D  _- f% O/ e: z// DeviceFinder Callback
/ i! N% j& H0 j& T9 \1 qclass CDeviceFinderCallback
8 H! v! H1 R# a& Y5 @        : public IUPnPDeviceFinderCallback
{
public:
- L' i  f) I) ?8 O! K! L; P' N        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
2 X/ Q. z( D! G! Z
8 b; K. b3 `- p6 o
3 J. K: f3 i1 z   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
1 K) F" J/ y& [, Q$ z2 D  [/ w   STDMETHODIMP_(ULONG) AddRef();
# g# o, e; m/ e( o9 U+ ^2 R   STDMETHODIMP_(ULONG) Release();
3 r$ Q/ y) ?: ~% i7 g# X

// implementation
private:
! Z4 \; M; a) j0 V; j$ N8 {        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
7 C) o" Y# x8 \0 ~) |/ q  |        HRESULT __stdcall SearchComplete(LONG nFindData);

( Q/ B; v' i% {9 K7 w
private:
* R' ]: U) T8 N        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
2 N. H7 P' q: L- T};
  ?" Q2 c% d: X9 q4 w0 L6 {2 G
+ ?* N; |( y/ d
& D  D, E0 }1 T& }3 i// Service Callback
: j- h- O" n7 P7 Q2 Y% ?" Hclass CServiceCallback
& h; O% Q" a# q5 u4 U! s8 j* Q  e        : public IUPnPServiceCallback
) y5 b5 T: g' |8 H) r0 T+ ^{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
/ {$ @- h; Y3 _, X                : m_instance( instance )
        { m_lRefCount = 0; }
/ A# K& O+ M- g: L) @$ D   
: s$ a! B, Q; p- z) R0 ?   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
) f/ i4 t2 n3 C5 K; w   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
# A; ?  E' M! }) q1 a
0 W) P8 I" R- y/ K- ~
// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
. H: k* q5 U/ |3 e' y  @! A        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
, E% C! _8 W$ d! g7 z

private:
' h1 J$ G# Z# L3 C3 h! Q        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
$ Z9 d6 X: G1 r};


/////////////////////////////////////////////////
" Y0 e; o1 p% H7 X5 M1 r# S
% V( j7 j2 E/ d' }9 d7 ^
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
  {% {- H, {& w2 x7 c4 K7 jCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
4 J: I9 S" O; r$ `3 s- S" U# aCUPnPImpl::StopAsyncFind停止设备查找.
4 @* ^9 W. [, R1 z. t( c' J% Q- b6 l% D+ oCUPnPImpl::DeletePorts删除端口映射.