UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   # B6 \, I" O& k2 B5 G  e
3. 
   2 `" _4 b3 b+ I' |# z7 A5 Y8 b
4. #pragma   once
   
5. 
   4 n- X" o5 w$ \+ c  Z+ Y; p8 @9 R
6. typedef   unsigned   long   ulong;
   4 L" K. r3 r- L/ m' X( y9 }
7. 
   
8. class   MyUPnP
   
9. {
   
10. public:
    : p; \7 s1 z: T: e; w& L  k
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
    % e6 x* t. H& o; y% p3 c/ |
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
    4 O9 Z9 m$ {# t" @& B0 e6 c- @
17. }   UPNPNAT_RETURN;
    0 u5 D3 m' b+ d- I1 ?9 ]
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    0 W$ H& b4 u, @8 u2 z. |1 D
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    ; V* {/ r* _* C0 X9 L- P  `# J
26. WORD   externalPort; //   Port   mapping   external   port
    1 W% \  x/ j0 a4 k  j7 t* N
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    ; h! e- E8 m& o5 K. ~
29. }   UPNPNAT_MAPPING;
    8 C* _1 G% i+ K5 B, z5 [
30. 
    % y/ G& |- ~7 V+ W) P+ N  M
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    ; i" `1 e. C1 d) O, j$ j# t1 q+ D+ b
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    8 ]+ u! m$ q) A) G0 e$ W
38. CString GetLastError();
    8 A# o5 n3 ?; J/ z" m- Z
39. CString GetLocalIPStr();
    2 X* v+ B" e1 }* Q9 X7 N/ y& Y6 P7 `
40. WORD GetLocalIP();
    5 v; T# \8 H5 x. j3 i* p' j
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    $ x5 i. l* J( j& \
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    % `5 Y3 u/ c' k: C5 _  P
46. 
    ) u* D  T- j/ \; ]4 W7 K. \) P
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    2 q, d" m) V4 M
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    1 h  Y4 R1 x3 H1 ]+ R
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    6 R' i$ n4 P; V" Z5 @
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    0 j2 _! t6 d- w9 o
57. 
    0 h8 \: K! a8 t* l# N8 C
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    6 q2 Z& F8 j" O- ]. `: e
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    8 G5 r! G, c% o# }& J( S
61. CString m_name;
    
62. CString m_description;
    4 ^1 h$ i, T" Z5 X3 S
63. CString m_baseurl;
    . U1 w4 M5 V+ {& W! p# ^/ o
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    5 O6 x$ j$ r/ Y( I. c
67. int m_version;
    
68. 
    ( Q- ?+ v! A: s  D5 F" ~4 F9 D
69. private:
    3 M8 p7 I( _: B, ^7 T
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    6 \3 j6 t; s, q/ t0 P, q3 y1 L
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    . F. t8 J6 e7 q  Y5 L6 W
75. 
    9 U: {0 d0 t* `; ?6 \
76. bool isSearched;
    0 o: ~' d) t; N3 a3 u# h
77. };
    : z1 T. Y6 ~/ B8 Y5 F8 k  |
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   : D. V( p5 u) v# {. r7 T5 t9 p9 W
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   4 L0 U! L9 i& Q- z
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   6 _0 R3 U7 `9 }1 T, N
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   ( ^/ E) k2 I7 _
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
     c! X- C3 c$ Z+ E
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    5 o6 F4 e1 Y( q! _0 x
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    . O2 y9 N& _, B& ^8 V
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    + D4 Y- d4 C! Y/ g6 T
15. 
    2 d: H4 m- P6 t& A% N
16. const   CString   getString(int   i)
    / T3 {$ s9 x, ?5 L1 [
17. {
    
18. CString   s;
    ( P: a$ V2 [0 ^& t; @# G' r
19. 
    ( p- L! g' x3 j- ?$ |0 ~$ Q) C
20. s.Format(_T( "%d "),   i);
    
21. 
    $ ?$ \+ g0 C$ O
22. return   s;
    / W/ G9 w9 {5 h( r
23. }
    
24. 
    ) u  m9 }5 l: O/ L& J: v
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    + e" f* ~; W2 ?6 y1 T( C* z" O& I5 E
26. {
    0 D. X2 V4 s# u2 \+ d
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
      K- J2 ]8 H; d: y$ K
30. const   CString   GetArgString(const   CString&   name,   int   value)
    : ]( f5 ~: ?" @" ~
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    9 r& n; Y3 |* H7 d2 W* v
36. {
    ) ?% e/ f- L! [/ _; ]+ f' ?
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    - G  O+ M0 j: R4 K0 ^; c
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    6 X, o8 ?; h5 d* {  {
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    - R1 A* d  r! {# `6 y7 O( d. s* Z+ g
45. memset(&sockaddr,   0,   sizeof(sockaddr));
      I4 \( F' E  I) I( ?
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    ! o. G: \+ _( _$ n7 r
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ; @1 m* x, }; Q& j" d2 q5 o2 {
50. u_long   lv   =   1;
    4 s$ p, U% L, M0 B; g2 m
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    % _. }% A7 R) x) E( D0 \
53. Sleep(20);
    ! u) K. n. |- ~3 Y
54. int   n   =   send(s,   buffer,   length,   0);
    ; c" l2 Z0 d9 P# M: X
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    5 w4 f6 ^- D2 a2 q
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    ( Y. o* P, E# y; q% s! _+ H
59. if   (!rlen)   return   false;
    + y$ [% x* C9 w$ _
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    . f. Y" v, P. h5 C3 B
62. 
    . m8 f. E! b- o
63. return   true;
    
64. }
    7 i, ^5 Z7 g3 `3 t) G
65. 
    % S( v; E* H  T; E" F
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    3 x7 }2 j; A" K* p% i; |3 }, F
69. 
    ( d) o# F  o5 f
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    ( `& v6 K% b; a! ^- Y
73. 
    
74. struct   sockaddr_in   sockaddr;
    - o$ i' @, k" Q7 W- L1 C
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    2 ]2 K% L1 Z! w# [% G7 J
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ) @0 J, }& j& r5 r0 m
79. 
    - J' ^- M! D, u* f% |1 M! n
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    / L4 q% g1 r0 j3 W
81. }
    ! q# N, o! a& Z4 J% y' Q
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    & d8 }  X1 [- J8 }
85. int   pos   =   0;
    3 \3 C& S1 w. @0 V
86. 
      L  d! c4 F" d' h- m% b# o9 S
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    4 J1 m& _& V0 F/ b6 T
88. 
    4 l6 }. {' x) Y) ^/ b) |; Z
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    $ r( d" q4 \- D) u' U2 G" C  Y+ q* `
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     ! w8 F# ]. X0 N0 ?/ r# |: H
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     4 C# N2 K1 W+ C! Q! _2 ]- l
103. CString   property;
     
104. 
     ) B- y$ q( z# W
105. int   posStart   =   all.Find(startTag);
       x8 v5 G, Z% [
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     6 W% }/ n( A5 C: E/ T' S; `. Z/ o, d3 t
114. MyUPnP::MyUPnP()
     ; i2 M$ J7 W4 \9 Y  v& k8 X6 `& A: g
115. :   m_version(1)
     1 [( H4 \7 i: `7 P) d$ B2 e
116. {
     : C8 ]0 r1 k7 _( o
117. m_uLocalIP   =   0;
     . i0 V! Z* d2 Q! L3 v& O! O+ u& G
118. isSearched   =   false;
     
119. }
     
120. 
     . l$ U2 E: k- i, h4 o
121. MyUPnP::~MyUPnP()
     4 j, A5 M* q3 o. X5 G% \, V
122. {
     & `  F. ~* w5 |4 V& c2 U
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     * C5 n5 b. X) C2 {1 S# J
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     
133. 
     7 `  o; _6 t+ ?$ _7 N2 F
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     + U% v+ N* k; E1 f7 N
136. if(version <=0)version   =   1;
     ) R# L( o/ N4 R2 L2 P% [# g+ y$ E
137. m_version   =   version;
     8 ^9 y. C: [, z% G
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     / Y% C, b: M" F, Q
141. {UPNPPORTMAP1,   _T( "service ")},
     " i# I0 V( U7 V0 F) j
142. {UPNPPORTMAP0,   _T( "service ")},
     , l% v6 G- m9 {, R& l1 a) d
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     ( ~( A2 M# s+ w
144. };
     6 e$ N6 E) i3 h2 T  @0 a' h
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     , t; F& y3 H& f8 n; B9 s* Y
147. u_long   lv   =   1;
     0 G7 b+ ]5 b1 A5 E+ N. y
148. ioctlsocket(s,   FIONBIO,   &lv);
     ' y& B6 _/ G5 o% n8 n: c. }6 c
149. 
     
150. int   rlen   =   0;
     / f+ [) r5 `& Y1 Q
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     $ G% k% I& E8 z' q) W8 R8 `
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     . p1 Q) v5 |6 E$ q5 e' ]# ^
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
       n+ B: h  I% U
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);
     5 N: J# f; W+ |7 s, w
159. }
     
160. }
     9 G6 \- T, a/ E! g, P4 h+ |4 `5 f
161. 
     
162. Sleep(10);
     
163. 
       r! L0 r* X5 g0 \. N
164. char   buffer[10240];
     ! O) X$ _8 [% q+ Q
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     " ~! o* U- X: L8 y+ t9 ~
169. CString   response   =   CString(CStringA(buffer,   rlen));
     5 C5 O& r5 \9 A) ~: T8 I# b! ]
170. CString   result;
     7 _( Y! I( ?/ E! X2 L6 S+ m
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     8 m& \! J% b9 M% W" t4 i' 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);
     7 V$ c* h% w9 ?
175. if   (result.Find(m_name)   > =   0)   {
     & W8 j" [* a) z4 G8 J# [
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     8 S7 }4 l- q0 c! B  {
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     7 P. j, t2 n' F7 s
183. m_description   =   line;
     
184. m_description.Trim();
     5 K- a9 z7 D% n+ S
185. return   GetDescription();
     
186. }
     6 x0 z0 Z. e3 a/ z8 W+ k; o
187. }
     
188. }
     - u3 @: T; x+ F$ s, n1 a
189. }
     
190. }
     , v- I$ h" w5 r. }' X( x
191. closesocket(s);
     ! i  v$ i! _) b7 Y" P
192. 
     
193. return   false;
     8 e- c, J; Y2 [# v6 n( w# E
194. }
     6 W7 r/ r! F7 U7 Z( w6 H

复制代码

天云上人

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


///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


& }8 q- A2 n3 w#pragma once
#include <exception>

& {; V# Q7 m4 w8 q4 L
  enum TRISTATE{
        TRIS_FALSE,
- T6 P+ L5 ?3 `* _        TRIS_UNKNOWN,
8 r, A4 O* w9 R5 I+ B; s9 }. }        TRIS_TRUE
};

. N' H0 X% U7 r3 L$ E
8 w7 T. T, T0 L2 I/ h2 O; y5 Henum UPNP_IMPLEMENTATION{
! W, Z& r6 U1 t: L9 o$ `6 G* [& R        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
* {4 H% d; t& @7 v4 W        UPNP_IMPL_NONE /*last*/
4 z6 ]* A! ]! G' o  z6 x};
* t4 K- x* w) M: |9 F0 l) P0 b
, ^8 y2 @1 Q1 l  U8 Y
" d9 }8 z% w1 [9 h; s, s. S( T
! O; \  E) ?, t9 n+ n
* i+ R' D1 l' V( k5 S: iclass CUPnPImpl
{
! T0 p" H& a) vpublic:
/ u3 ], J3 A) s        CUPnPImpl();
        virtual ~CUPnPImpl();
& F$ f! h+ V# v! Y        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
9 c7 b5 |! d. u; h. i$ P                UPNP_FAILED,
                UPNP_TIMEOUT
        };


4 ^: K1 x% M, L' B' i' e        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
9 p$ K) ?2 k! O8 ^& W# }  N        virtual void        StopAsyncFind() = 0;
0 _4 e% p! E" ^& H        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
! M7 v  |. {' F) v& Y. S% c        virtual int                GetImplementationID() = 0;
       
5 ^3 x$ N/ q' T) F2 o* o. E4 n        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


4 }4 Z0 ~# Q8 j        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
6 c7 o3 M. {8 t" g) g) q4 G' d3 n4 [        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

/ D% v& e+ i9 D1 `& N: D
// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
3 e: o) f( m+ I" d        void                                SendResultMessage();
5 x- U. _; |5 T& `/ I        uint16                                m_nUDPPort;
+ s, `4 t$ a* {4 D& H        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
; e0 G' B" E( a3 x+ a2 Y

private:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
9 N% K; Z9 e& u4 [
$ ^8 Y  [! H. E3 y9 m
};
, p. _* R* b" R( q
! v1 \; H, O& a5 {
// Dummy Implementation to be used when no other implementation is available
/ ~+ \3 `, ?+ O# i: Gclass CUPnPImplNone: public CUPnPImpl
  L  A* j0 e& f6 L0 Z! y: J0 L{
0 f( s0 ^7 v) ^public:
7 Q6 @  L! F3 t1 Z. j$ O8 _% m        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
& e1 ^) V" K0 A$ L& k: |. t6 U7 n        virtual void        StopAsyncFind()                                                                                        { }
9 W* W$ X0 S# v        virtual void        DeletePorts()                                                                                        { }
, o, e4 |7 Q3 k6 j6 @5 k- R: R) F        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
3 R; f$ e( l  I1 C& I  G};
: V+ M6 n: Q& }+ F: P

; _8 I6 _, Y$ r; e) s/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类

: @9 p/ ]# P1 Z/ z# |
2 ]7 K: d2 y9 U6 p) g#pragma once
#pragma warning( disable: 4355 )


#include "UPnPImpl.h"
#include <upnp.h>
$ {' p" W' l4 r6 C6 H#include <iphlpapi.h>
6 B6 R8 @* Y/ |+ n5 T# V: S#include <comdef.h>
#include <winsvc.h>

( G; O/ I+ n8 O: Q  I/ m$ F
#include <vector>
#include <exception>
/ `, Q0 l" F6 [7 q  e# i; G#include <functional>



/ X3 B1 G. h4 s- u% c
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
& U+ K. Y' I* p; Ytypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
, C: A" H7 C1 v8 v! e' x4 w8 etypedef _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;
' c8 l1 ^- f; d- Z8 Q+ z  ktypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

% {1 Q- ]' b* t* S
typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
; C( ?+ y" s5 v2 o* }9 T% h  b2 x: e  PDWORD pdwBestIfIndex
);

+ J' k* x1 ^# N1 L  y" e! f* U
/ q9 P" t; |" l3 J9 ^8 ?/ Ytypedef DWORD (WINAPI* TGetIpAddrTable) (
  c% X- T; O2 U  C- Z  PMIB_IPADDRTABLE pIpAddrTable,
9 m  T$ |& l- C& c. b  PULONG pdwSize,
0 Q; [! {/ H: x2 h  BOOL bOrder
);

1 j! r: N& |" _! ^
typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);

+ Y: q! M7 B7 t  C
CString translateUPnPResult(HRESULT hr);
7 ~* R3 t, n$ \8 y' T3 dHRESULT UPnPMessage(HRESULT hr);


class CUPnPImplWinServ: public CUPnPImpl
0 z* r* o; k  E  n+ ~' w: o{
+ ~2 v: \% }2 K        friend class CDeviceFinderCallback;
0 N9 }+ P* Z; i1 Y/ R        friend class CServiceCallback;
; h7 `. |5 O. z, O7 o' \// Construction
* R# M! m' R/ l: A7 ]public:
1 J, M. |; H4 c9 l0 D        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


5 o/ n4 \& C: R9 }        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
% ^+ K7 j. o+ f; l" c        virtual void        StopAsyncFind();
; F% G* P7 y) N( L8 T( \. s        virtual void        DeletePorts();
        virtual bool        IsReady();
* t  r7 y# e6 K% F4 C  s4 I- D3 y. _7 E% n        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

4 s. d2 x- d% h# w$ W& g/ p
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
6 @) R9 w: ^6 C, ]        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
# Y3 ^9 B6 \9 S- w6 E        virtual bool        CheckAndRefresh()                                                                                { return false; };


: v) d" d4 F2 Y' V# c$ i+ Bprotected:
" S. }4 X/ }' M8 A3 K        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
" ~! G2 t7 E3 L4 g* R        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
7 Y  `  ~, p+ K' b6 L        bool        OnSearchComplete();
        void        Init();

. n4 E- \6 i: B+ ~0 A  C
+ {, X1 n& h+ g+ u' h        inline bool IsAsyncFindRunning()
$ l6 o' B4 Z4 I. n        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
( E* K. }: A' h8 j# g  S8 Z                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
3 V5 i% p- \2 O1 q/ ]; G                }
! ~' z+ O) [6 m" K0 P9 v                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
; ^( u( P% O/ A& _. `5 G                {
                        TranslateMessage( &msg );
& g2 G, v1 N- c6 @. }- w                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
! q4 E1 E8 V! g) N2 O: ~5 l        }
" C7 ?+ M" E$ U9 F5 b

        TRISTATE                        m_bUPnPDeviceConnected;

! [: c2 E" J" M% `& S+ }; D' m3 J# l
// Implementation
        // API functions
& k2 s4 c: V  a3 e! ~+ u        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
) ~& T, b" W( V# G% I* @8 i        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
. H3 J' E- t$ T5 X: X8 r1 Y; Q        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
% }0 }# v- @: _! T        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


+ L( `- j7 F4 P' y9 t' h        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
2 Q& o# W# o( k( }1 Y        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
7 z8 I0 d4 a" b' D5 m        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
! s" B  e2 B) ]+ [5 ^                {
1 s5 |  U$ w, x                        CComBSTR deviceName;
+ N" h+ V$ D, f+ w! w$ w( L                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


! T' A  a0 b& i4 n$ R: Z: {                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;


                        return wcscmp( deviceName.m_str, m_udn ) == 0;
& h# \/ c! \: A8 L8 R: M* _) f* q  D                }
                CComBSTR m_udn;
        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
3 x1 Q5 q1 [; G: X8 I        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
9 F3 N. ?, r" V        void        DeleteExistingPortMappings(ServicePointer pService);
- G: H! s7 [3 B4 F, W& I# C8 F        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
; S8 W2 L# H$ k/ B        void        StopUPnPService();


        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
, l; }* i$ z: A& @  }        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
2 X( O& L8 C% v# M, Q- \& U8 E        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
' w/ ?. p% d! e5 q( I3 P        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
. U6 j0 l4 H9 O: s# a, V        CString        GetLocalRoutableIP(ServicePointer pService);


// Private members
2 w0 M- D% C9 w8 xprivate:
) \) X9 x& ~& j4 K" {        DWORD        m_tLastEvent;        // When the last event was received?
  E: Z/ u. G. _  G& u2 L        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
* L0 X* y1 V3 X! }0 D# L        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

; J$ T* D: @& _, a* k0 x
        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
& }  W. F0 G2 b+ w" T* |        CString m_sLocalIP;
        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
/ l+ j. Q1 S' v2 @1 a        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
) c0 c3 {+ v2 @$ u3 b0 c# u3 o% T# z2 M8 C        bool        m_bInited;
        bool        m_bAsyncFindRunning;
3 V5 f" Q5 I8 N" U        HMODULE m_hADVAPI32_DLL;
8 p0 c1 |' j7 E& [& \+ m        HMODULE        m_hIPHLPAPI_DLL;
3 O! K) u1 k9 I$ o        bool        m_bSecondTry;
% T$ c# W; U" s9 u8 v4 R! v        bool        m_bServiceStartedByEmule;
6 U# m  |5 @1 L+ }6 |& J# ~        bool        m_bDisableWANIPSetup;
, X2 p: T/ A" p: `8 P; @% \        bool        m_bDisableWANPPPSetup;
2 k% {/ {, u5 j3 l. v: i( m4 g# t: W
9 j5 q- L% ]: G4 K
};

8 _8 v) c4 w# V/ V6 [
// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
& I+ Z1 `3 {8 t& o1 D/ o4 e                : m_instance( instance )
4 l' U  N) N  k. T( X3 \/ B        { m_lRefCount = 0; }
) `% J( c4 X7 _& G" |3 w- R+ Y# J
# @1 ?& h1 |4 D  j8 W9 ]4 f
# w. y1 L9 L7 w2 z4 N' r   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
1 G' y; r, r: j* n   STDMETHODIMP_(ULONG) Release();

. a3 |$ q- ]6 k( }+ H) c/ U0 W
$ u0 @. ?$ w' |+ o// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);

* @/ q8 b: r( t/ i* a* m
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};


  |7 i, o6 y* L5 i2 A" {// Service Callback
; ^$ _4 t! l/ P. E, xclass CServiceCallback
' C7 T& f/ J! b' L. Q0 l        : public IUPnPServiceCallback
7 s" @) c) Z* \, q{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
- ?4 }( [# A$ G  ^8 \9 n# [        { m_lRefCount = 0; }
   
  [! v# U0 F" m% E   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

5 B  D6 o+ W9 L0 f, G5 j  q
// implementation
3 w) o: \5 a* W% E: |) Q2 W: z7 j: Vprivate:
( b5 D. ]& m8 k1 q# y8 e0 s        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
3 t6 l6 P8 k; E4 [2 C        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
2 f( X9 f' j, i& u6 o
, l0 U1 ^) G  p; ?) f
5 s/ C* G$ x) }0 o* ]* N' Xprivate:
        CUPnPImplWinServ& m_instance;
$ N0 g; o% C9 `3 b: W        LONG m_lRefCount;
$ \4 j) G* ^) p6 c};

  B# n; b8 r0 Y' e' P2 W& M
8 |! A+ f6 `$ o  t/////////////////////////////////////////////////


使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.