UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   / P' O* G+ t: a6 S
3. 
   : e" {8 Z+ R1 Q+ S
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   - s7 J$ r  C9 \* y1 Y; J9 v& y. e' D
7. 
   : h2 p, e& m) b! m4 ?, t% M
8. class   MyUPnP
   3 I: Y+ t; d  F0 ?2 S
9. {
   4 v7 Y1 ], [% x7 J% J5 Y
10. public:
    " F+ R, W% H& v
11. typedef   enum{
    3 o0 S, B3 F; w* \. l+ D, k; G9 F3 D
12. UNAT_OK, //   Successfull
    ' b: N1 x- ]; k' g9 A
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
    : q4 ~; e, l8 [6 A# g6 A3 R, K
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    " }& f' Z9 k/ P. |2 e6 h4 d, J
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    " B( T! F( V$ Z) F
17. }   UPNPNAT_RETURN;
    
18. 
    6 o6 k9 M( g7 u$ d  v9 W$ v
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    1 s$ O$ h9 [- |# W' s& z) }
21. UNAT_UDP //   UDP   Protocol
    & M% ^, W, l. D) k$ L
22. }   UPNPNAT_PROTOCOL;
    / \& E1 ?, w2 ^6 ]0 p3 ]! i
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    ; C: T) q: N9 @3 B0 X4 Z' t
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    # l6 m0 i) u" W1 n' I4 M
29. }   UPNPNAT_MAPPING;
    ; J( P& K0 {) a( f5 B% F
30. 
    
31. MyUPnP();
    8 J; z1 y4 @+ X7 w+ t* R# `2 b! I
32. ~MyUPnP();
    - R3 w8 O3 j; S9 n
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    ' r9 Z; L; B9 H3 [: r
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    / |9 O3 {( S' P
36. void   clearNATPortMapping();
    : W6 ^" ~6 R% {3 U
37. 
    1 `' p8 Z0 [2 t: }% u- _' d" X9 o
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    ) k$ @1 \0 r/ _
41. bool IsLANIP(WORD   nIP);
    , D) f8 P5 e9 k4 O2 n: c. t% g1 `
42. 
    3 w/ G- o& `5 o4 W6 Y: |
43. protected:
    & A; O! i- S. y8 n" P
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    5 \) i& T5 l: ]: J* Y
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);
    # |: a8 b7 t6 _+ U! G6 l, @/ ~& K
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    4 w* ?9 y9 o/ x5 s
52. 
    4 |) g. _6 {7 d# V) m) z
53. bool Search(int   version=1);
    7 _' A* f- C3 M. u' x8 u, J+ Y1 _. T
54. bool GetDescription();
    " x; J6 ]+ ~' S6 Y9 ~
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    * w  z% `+ v  y% [, k8 Q2 s' J
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    - K/ W* v" t/ v. N
60. CString m_devicename;
    7 x+ O& ]$ z( `" g- J  j/ c1 q
61. CString m_name;
    % Z: y, d/ r" y/ G" k5 {7 _6 J
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    2 Q* Z. r9 u0 Q1 l& p
66. CString m_modelname;
    
67. int m_version;
    $ k! k9 T. H/ p+ n  f
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    3 f2 I' S& n9 T6 I: m0 }4 a$ g; ~
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    : v# ]7 M2 z0 C. M& p( m
74. WORD m_uLocalIP;
    
75. 
    0 j' Z5 b" n  t7 Q+ M! U: W2 Z" q8 c
76. bool isSearched;
    0 P* ]0 @6 U5 F6 p; E/ u1 T' e
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   ' M) Q6 c1 L1 E- ~2 k% Z
3. 
   3 `# E& r( _/ f; z. H
4. #include   "upnp.h "
   , Y- Q) e& f* N& x8 y7 P2 ?
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   2 ~5 O5 o+ o- o/ X8 ^  U/ v& D
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    9 n& M- b( m2 T
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    1 P+ F& h+ j: K
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    9 `) K' a* O5 ~' e# P+ N
17. {
    
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    $ T' B' T# V+ }. `4 `
22. return   s;
    9 {3 E/ ~" T3 o
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    6 s/ I$ C. [) [  x
26. {
    4 h) B: N0 ~$ X* y  i, a) T- b8 C3 r
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    9 H3 I) j/ W$ m: B/ g
28. }
    9 |1 ~1 t/ X( U4 H; B
29. 
    6 ?5 [" ?! t0 C) z& ?0 a
30. const   CString   GetArgString(const   CString&   name,   int   value)
    3 B+ Q' X, [9 N6 ^
31. {
    % u' ]! \# W/ Z: Y9 [$ H4 \4 g
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    3 k" N7 Z; I+ z& e, q$ d
33. }
    : O* i3 y- [1 G
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    5 F# m4 F) _% q5 U+ M: w, W, F
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    1 M* F+ R7 B" @8 {9 {0 l
42. 
    4 Q# n  r0 j. v' r; P
43. uint32   ip   =   inet_addr(CStringA(addr));
    * {+ }/ q5 ?+ a5 w( ?8 }
44. struct   sockaddr_in   sockaddr;
    % k$ W2 n- P- Y1 v, ?1 H' E
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    0 G9 p& |6 a8 `( i
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    6 Q7 v! r( T: [, U$ X
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    4 e& Y7 y# _; _
50. u_long   lv   =   1;
    8 e8 Z' w- E8 _/ l
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    + \; h# A' }' M' o" Y- w; Z
54. int   n   =   send(s,   buffer,   length,   0);
    # j, U; l, Q! a% `
55. Sleep(100);
    8 T8 S6 t' J$ b2 j1 l9 g8 \
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    & P- l5 n" [# J- u- Q! h2 |
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    . k9 O. o. \6 i$ Z, C" u1 g' c- w
59. if   (!rlen)   return   false;
    9 K1 T$ Z$ p4 O0 s! f
60. 
    9 }) Z. q+ G4 p- T- _- K2 F& w3 J
61. response   =   CString(CStringA(buffer,   rlen));
    . Z) c: V% I) r7 D
62. 
    5 Y$ d; t0 s1 {, N- q% x
63. return   true;
    
64. }
    5 g7 P, |# W$ T/ P6 O' v
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    ; f* L2 I- M3 d0 G6 l
69. 
    
70. const   CStringA   sa(request);
    ; P5 {" m1 s% Q' |
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    - S# }& b3 ^" y9 Z  C6 o! E
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    8 |8 E1 c! c3 f7 r* q$ ?
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    4 B. C) A' J" \) Y7 e0 |
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    ! V7 T; z; M( z4 L% {' X- k, _/ _
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    ' s- R* W) R8 P) G& q9 j+ L$ M/ _7 _
86. 
    ; }3 K) [2 h: M* g$ j3 I/ W/ A
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    : N( D/ [0 O1 Q) Y! P* z8 b
88. 
    4 j0 |  S% f$ w: {6 I" q
89. result   =   response;
    3 y* L4 R1 e1 X" u
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    6 h+ U# ?; ?, n6 ~1 `
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    4 e6 J' t) q) `3 i, b
97. }
    : [' L8 R) j: s$ r
98. 
    5 b. B/ U2 Z/ w/ A: V( |6 W
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    8 v; D) J2 O% |
100. {
     ! ~3 B/ D$ `( ^# S2 l, @3 D
101. CString   startTag   =   ' < '   +   name   +   '> ';
     ! Z6 P+ s( }6 |' f( |
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     / O# @$ S& X$ e& [8 D6 h* R- Y% S! V
104. 
     & b* y' g* d) ?
105. int   posStart   =   all.Find(startTag);
     5 @) W9 |+ ]1 ]) T* g4 V+ `/ H
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     6 Z8 t6 i$ t% l$ b
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     / B! l# O5 S* U* w3 L+ s* C/ e
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     - v- l3 o$ Q$ `. y( R7 l
112. }
     ) {7 L+ X+ Q% c% |
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     4 ?2 M; ?' f1 J9 l! l: k/ Y# \
122. {
     
123. UPNPNAT_MAPPING   search;
     2 i5 T1 ^. l; q/ N9 C
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     $ E# k; R' K4 Z5 L. f5 r  e4 `
125. while(pos){
     8 x! h) X1 t/ i' ?: D
126. search   =   m_Mappings.GetNext(pos);
     4 c$ W" K4 E# B9 a& Z1 H" n/ Q
127. RemoveNATPortMapping(search,   false);
     
128. }
     , g1 E* D" M  _+ U& A# p
129. 
     
130. m_Mappings.RemoveAll();
     $ d9 J7 v+ `  q' u3 s
131. }
     
132. 
     * h  J' c; B: s) q
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     ' W, ?- S/ y. M  X; [
136. if(version <=0)version   =   1;
     2 I$ N. f- I7 j. |# j
137. m_version   =   version;
     / f& o. m% Y7 D
138. 
     
139. #define   NUMBEROFDEVICES 2
     5 P) Y; J: q0 W  S' i. b" {3 P
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     ) Q  ?; @" j& H) k
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     " ^* k' r9 f9 f9 r$ q  R
145. 
     8 H! C: l% [* F0 H
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     / i" r4 n' `# g5 u7 P9 l
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     ) t  F5 R; m: ?, x( \
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
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;
     # ^' D% y9 J& o1 y
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);
     + m* d! \4 l0 K9 f/ n3 V9 o
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     , c6 o$ S( X. b8 P% V- s9 X
160. }
     ( Q2 O& C, K9 h1 V6 {: j, a
161. 
     
162. Sleep(10);
     7 b$ _& f$ [# P9 J+ O/ w6 ]
163. 
     + P7 q7 B% t. E0 {+ \" T7 h
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     ' ?( p$ z, F& U
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     7 @( }8 L& X2 p* r
171. if   (!parseHTTPResponse(response,   result))   return   false;
     , @9 m. m" C! e+ N
172. 
     9 q; R2 U& `( G. V- i% X2 l
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);
     
175. if   (result.Find(m_name)   > =   0)   {
     
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);
     5 P. H$ k* |+ V
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     $ A8 x' w( D& i  ~3 R' p
183. m_description   =   line;
     - ^" Y; ~# ^: B& H% h3 K
184. m_description.Trim();
     6 a4 ?. `3 D4 s3 J& n5 C- o
185. return   GetDescription();
       E$ H1 d' O- V4 I# l
186. }
     
187. }
     
188. }
     
189. }
     0 }+ _& i+ f) F. ^
190. }
     
191. closesocket(s);
     
192. 
     
193. return   false;
     
194. }
     , `: r0 T& |1 S: I1 L, F

复制代码

天云上人

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

! w" o, b" Y& u9 e
///////////////////////////////////////////
# R* o" r: C3 {  P: R//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
) b. ^9 h9 x, o/ x8 H' b

; j* j5 L9 [4 B, \/ ?6 L) V6 Y#pragma once
#include <exception>


  enum TRISTATE{
! k9 N% J, z5 ?" }) _) f- u        TRIS_FALSE,
! W* L% e- u- ?! `9 ]        TRIS_UNKNOWN,
        TRIS_TRUE
3 D3 c  |  Q& ~};
: f( t3 P2 R8 T. a
# J) u1 ~+ x) e. v0 @
5 L# k9 H2 ]- U" W7 ]( f# Renum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
! g6 b4 l9 f& M3 J};

% q* q0 ]. x: B3 e0 E7 A


: h( C. K  t; C  p# x4 ]class CUPnPImpl
{
public:
3 u# U+ k" R3 a0 h/ G/ u+ v        CUPnPImpl();
5 Z7 ]: d- m# k7 ~4 Y! T$ h& P        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
$ ^. c8 H& ]* Q- Q( U7 w        enum {
                UPNP_OK,
. Z. S# ?+ |0 `5 [0 R9 B4 M                UPNP_FAILED,
  d9 D# X% l% w5 I. J                UPNP_TIMEOUT
        };
% u$ U( I( _6 J
3 u* Z$ j' N# `6 C
9 f4 M" \' i5 O# G8 Z. l- ?; W3 D        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
0 e8 @1 P+ w0 Q; r6 Z4 _        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
7 |7 a# N4 g/ b! ~        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
/ `- U' y( o9 `) @" |        virtual int                GetImplementationID() = 0;
2 C0 w+ H8 s- O" x+ y- X       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
& m) b' c# a- `% ^9 ]9 l+ F/ I
' V) k/ h: b  D; Y, S3 \! H" d
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
, f2 Q) j1 Y. W1 G  j- e) I: q        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
; N! N- U) h6 T3 M5 T2 P
1 g8 Q' h! u1 |6 n5 ?2 I1 ]  i! r" l
// Implementation
protected:
8 x6 A% h. w: l1 `0 P$ H. P        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;


1 n8 a3 `6 k) C* O! O  i6 Y- zprivate:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;


};


// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
; f& E+ }9 R- c( Xpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
8 u2 n  F+ @" \, {2 G# G5 B        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
0 Q* @/ W. \+ o: c! k, c3 d        virtual void        DeletePorts()                                                                                        { }
2 A' q& f4 u  b" w0 a        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
) j1 [4 D$ j: f7 l. R+ H};

$ o: {0 @* V  ^/ f! Q" V. p# h' P
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类

: Y" j4 q* w7 g" J# R
) g' `4 n9 ]" L( ]; Z2 Y#pragma once
+ X  q* L1 c! m9 N# h8 ^$ w#pragma warning( disable: 4355 )
9 L/ x/ ~" z# t# ^% P
$ o- ~9 A2 \3 z; V  ]
' ]$ Y; [9 r3 \8 S#include "UPnPImpl.h"
#include <upnp.h>
- C9 ~# S; y1 K3 j, [#include <iphlpapi.h>
#include <comdef.h>
7 r: z# D% R4 ~9 Z8 g#include <winsvc.h>


( j# y; I+ _% G8 P/ i1 T#include <vector>
8 s$ ]& U& D' ]7 ~& t* D#include <exception>
7 `( o2 ^* n! @& M5 c#include <functional>

7 g" K9 W* `) H4 s7 a
* \% `2 o3 Q' O- o/ }+ X9 g
; o  b& `# k* _5 b# A  j
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
* n- x+ f# ]1 L& dtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
+ u- w* o& f# t! o  i3 o% g+ F# |typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
8 J: c3 L% _/ x* Z, ]( ]9 ftypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
4 D# ?, X- r) g% @typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
( u* R% Y; _" ]; |$ J8 otypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
* u" P2 ]( |8 r! gtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

0 U: q  R+ v  C
typedef DWORD (WINAPI* TGetBestInterface) (
* R. O& |* ~: @  IPAddr dwDestAddr,
8 m% X; S( S" N& I  PDWORD pdwBestIfIndex
  P, X0 T: Z1 ~5 e);


typedef DWORD (WINAPI* TGetIpAddrTable) (
: r* ^0 m: F+ }& s) {  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
: P7 G+ t- B- }# v  BOOL bOrder
/ M3 C9 z0 ~) G4 a' ]);


8 K3 S+ H, Z% S0 {! ^, _* Otypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
% G1 H/ \# k+ o: \; P/ T+ V$ e);


CString translateUPnPResult(HRESULT hr);
( c8 S3 y6 d7 d6 a2 ^9 t* dHRESULT UPnPMessage(HRESULT hr);

& C5 w# y+ `  S1 P9 s( x# {
5 ^$ W8 r" @6 `" c' d! `3 Z( L( Zclass CUPnPImplWinServ: public CUPnPImpl
9 c3 j; F6 `% l  J4 U4 N{
# e2 k: }1 z$ q, V0 p8 V        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
public:
+ p/ }8 u1 ]8 W, ?8 R: }" e        virtual ~CUPnPImplWinServ();
% ]2 o( q7 w* R1 ?3 C        CUPnPImplWinServ();


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

. _9 T; k2 \( z
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
. P! F9 @- K  e3 T+ m. m7 j" ~        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
6 E2 ]  {! n- _: B; d/ O6 d

protected:
. L' M; }9 n2 E0 z0 \, Z, o        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
; u$ @, ?: a; ?) D# ^        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
' @2 f, i$ b9 N, _+ E% Z1 s$ A, |        void        RemoveDevice(CComBSTR bsUDN);
/ E! ^) E- d* S$ R  r& O) F8 u# Q4 W        bool        OnSearchComplete();
. H' L, I+ F# H        void        Init();

- i+ X" Q& l4 s7 ~
        inline bool IsAsyncFindRunning()
! L8 z1 E( e' {' T+ j& `& q3 q        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
' N9 x4 ~" c8 {; {( ?3 j                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
( o& N2 D0 n& x% t+ z8 Z. Z- C                        m_bAsyncFindRunning = false;
8 u4 J4 s: _4 P- Y- o+ U                }
                MSG msg;
! l4 f. v9 X7 h% O. m, Y8 I4 @- e/ N                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
# X3 A" W% t, e$ @6 j+ u8 n7 ?                        DispatchMessage( &msg );
                }
5 N9 w; M4 N$ e                return m_bAsyncFindRunning;
        }

" U& S& f# v! K( g' ^
        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
        // API functions
  n0 K9 c* I4 N1 Q" l        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
* q0 M3 Z, N8 m3 J: ]9 A4 `" U        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
& s% \* A4 W. B' o0 V- J! u        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
3 j" _* R* F+ t, a5 t. O

* R1 ]' V; c# V  t9 q  D2 M        TGetBestInterface                m_pfGetBestInterface;
. \" i/ L/ o6 Q* S* E# V6 A        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;
2 I' W( e4 \# y  Q0 P& y

% X( e, E5 K# ]& a! S% A3 {        static FinderPointer CreateFinderInstance();
! T6 W' G6 i5 F$ ^: u2 i        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
6 ]; O! `0 s$ D                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
' }$ t: k- Z$ Q: ^5 x9 i  x                {
                        CComBSTR deviceName;
7 b4 z8 R& k; \$ B                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

9 P& h7 R6 }6 I, Q% R0 v
4 n1 K& f& L% M5 H; O3 X( A& l                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
  `- n. I9 G9 k* s8 Q5 S
- t( r6 R2 J0 k
9 T# I1 a0 i! Y8 v0 n8 o+ |                        return wcscmp( deviceName.m_str, m_udn ) == 0;
# L) }/ r, S4 i0 g( G" v: j$ |                }
                CComBSTR m_udn;
% I. {! P  v% M' Z6 a        };
" n  H! @* W! k$ C       
, b" s( U+ [: F6 l+ a3 |$ Y5 q        void        ProcessAsyncFind(CComBSTR bsSearchType);
  ]$ K; G& g9 g( u& o        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
* E% n* W9 F0 `: I        void        DeleteExistingPortMappings(ServicePointer pService);
5 y& w6 W- N: `        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
$ P$ |, F- a. \- ~        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
3 {6 a7 C6 i1 K4 r% @) i                LPCTSTR pszInArgString, CString& strResult);
( f0 l5 B7 c$ I5 I( }        void        StopUPnPService();


$ z( x; V0 v6 j        // Utility functions
+ z# @6 S, ^, }  z" v$ p/ e        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
& c) t% `0 w* e; _+ B        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);

$ i' b: M' x. ~  B8 E2 m
// Private members
+ K4 j/ U. ~: d6 aprivate:
7 i8 h: G$ I: |& Q% H# ~+ e        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
$ V, L% B( ^( c& [# E/ E: m2 Y. |        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
# b, _8 p1 @! p        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;


        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
6 j8 i, _, N; h5 V. r: g7 P        CString m_sLocalIP;
        CString m_sExternalIP;
) e- m0 J* V2 a5 m, o# v* o2 q        bool        m_bADSL;                // Is the device ADSL?
& j0 j7 y/ I6 r        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
+ B3 p! F5 ^- V# Y        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
6 ^5 V9 S, p' L/ n        bool        m_bDisableWANIPSetup;
* m0 o/ A. X2 o9 W' k" n$ I        bool        m_bDisableWANPPPSetup;
$ T+ W0 n: P& `6 J
# J: T. m; J2 p8 a
};
! O9 k) F* b) k: X, V

// DeviceFinder Callback
class CDeviceFinderCallback
, h, V$ L% K& W$ j        : public IUPnPDeviceFinderCallback
{
0 h& w. V' W7 g0 ipublic:
( L& g& W1 ?/ E$ J1 m6 ]        CDeviceFinderCallback(CUPnPImplWinServ& instance)
; W9 }$ v$ b/ ~* D5 y6 I* Z                : m_instance( instance )
        { m_lRefCount = 0; }


   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
# w1 L  A- I1 c, \5 [# D

// implementation
private:
. m* p: `, |3 T# {5 k) V0 [* s* `        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
: I. p- `' J0 n; B# V

private:
/ p9 ]4 G: P9 \3 c  f        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
/ n0 l9 L9 d/ N};


// Service Callback
class CServiceCallback
4 q7 s' o/ d8 p; W! M* C" f# u        : public IUPnPServiceCallback
{
6 n9 l  n; Y1 y$ y0 j  tpublic:
" u+ o; d! K$ y  H1 \0 @6 P5 |        CServiceCallback(CUPnPImplWinServ& instance)
# e. b- i4 g) ]) J8 ?* a9 O6 C7 i' |* P                : m_instance( instance )
        { m_lRefCount = 0; }
   
& q$ C4 e  ]: a2 s# ~8 N   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
$ C/ V' D9 ]" s$ L* j8 q   STDMETHODIMP_(ULONG) AddRef();
7 L2 u6 Z) J3 E* y/ V7 i' |   STDMETHODIMP_(ULONG) Release();

1 Y+ e+ ~8 Z5 P' R
// implementation
! b$ U& \+ W! M& |: xprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
! i2 i. y% b6 l  Y; M2 Y        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
: Z% _- _) i  \0 I2 w3 s  @};
( `# v% E- M! G4 j4 g* a( F! i9 w

/////////////////////////////////////////////////

) B( @. {! d6 ], V% m; m  K
3 U7 T! ?2 E8 m' ?0 v使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
. B  f' D- t4 |& u! mCUPnPImpl::StopAsyncFind停止设备查找.
5 N7 R- z+ b0 d! a, n" Z$ Y+ ZCUPnPImpl::DeletePorts删除端口映射.