UPnP

天云上人

/*uPnP.h*/

1. 
   + b1 f2 n/ r, l) ~8 D$ g& c
2. #ifndef   MYUPNP_H_
   ) g  b3 h5 G% I* f/ F
3. 
   
4. #pragma   once
   $ f1 @- Q. A( z# I
5. 
   
6. typedef   unsigned   long   ulong;
   7 n2 @: X& x* T3 {8 L6 s0 _
7. 
   6 ^9 M& b7 y, z9 l
8. class   MyUPnP
   
9. {
   8 A7 U4 _# |4 O, G; W; h
10. public:
    % ~0 ?' w  w* N( u! I0 H! X+ I) Q
11. typedef   enum{
    0 c  z6 l8 S8 o) M
12. UNAT_OK, //   Successfull
      j/ c' f) G' b0 X
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
    / B+ e# v( O, `6 ^. p$ U" {
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    2 g" J! l1 o. `% ~* F% _8 z) r
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    6 k4 u; ?$ u: T; P7 O) I
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    3 v6 V: Y# k  c) d; D
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    " b# t% m4 B8 b; k  K
28. CString   description; //   Port   mapping   description
    % l& p; G+ k$ Q9 c0 p* F( K7 q
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    0 W. X) H9 y( r" M3 i& T
33. 
    / G2 X& d/ X8 J; C
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    1 K- O( q) u) K0 A; M- y
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    4 a! a8 ~5 n9 M
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    4 G5 y$ Y  h; `3 V' x
40. WORD GetLocalIP();
    ) V8 d' ]0 |2 U
41. bool IsLANIP(WORD   nIP);
    1 U( n3 B9 E! a  R3 T& u. V- I3 ~
42. 
    * I7 f7 `; L. {2 K+ b5 g  O
43. protected:
      R4 g  q, Z+ W
44. void InitLocalIP();
    ' _2 f+ ~& K8 W* W& ]. K5 R4 B, {
45. void SetLastError(CString   error);
    - b" [% |# q1 i  _. ?$ K/ \
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    , }, K8 R% a( X) |* M
49. bool   deletePortmap(int   eport,   const   CString&   type);
    . q5 d1 H' Q% B4 W+ i
50. 
    / Y" t0 ^* T- }- C8 I
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    , B+ C* }, a9 A4 [0 B2 e) U
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    * L' T, X5 g6 Q. Y- Q
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    ' E) ^: r* e4 u" Z* f1 [
63. CString m_baseurl;
    
64. CString m_controlurl;
    3 N& v$ V. Y  Q7 x/ v
65. CString m_friendlyname;
    % n" D; U# O0 ?/ e; l" G
66. CString m_modelname;
    
67. int m_version;
    * O* E- ^/ c. e$ `+ \
68. 
    
69. private:
    1 w* O! r0 f/ l) B2 }8 \. n  C+ ]
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    ! Y0 T( a# `8 F6 I
73. CString m_slastError;
    ; `# ]1 ~/ B) u0 \6 @& R+ ]
74. WORD m_uLocalIP;
    3 n; }) N! b: C+ f
75. 
    * O) i" t  i5 ?# h, Q. t' l" X
76. bool isSearched;
    : I6 b3 y  L9 F% R3 L  I
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   7 x% v5 r% W2 d- R& S
4. #include   "upnp.h "
   9 W! ~& E  R" F" J1 ]& r2 Y
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   3 H. p4 c' m5 a/ Y
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   # \* v) n: Y6 G% h4 d! }
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   ) j. w  h- j' v/ c
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   ; R$ \$ [4 m, r' g: M$ ^
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    " \: g3 W2 Z  E  a8 [! P
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    3 O% e, j: C* H: w
16. const   CString   getString(int   i)
    . k" C$ R6 q! _. H& c. p" _7 H9 S: k: T
17. {
    # R# s9 x# n% b- T% o! F$ ?2 V
18. CString   s;
    ( o' [, U- X0 l5 t. l
19. 
    
20. s.Format(_T( "%d "),   i);
    ' G' x7 f0 Y4 A/ P; d. M
21. 
    7 z0 r5 u  l2 Z
22. return   s;
    
23. }
    
24. 
    0 ^7 k9 M1 h& t. E4 |
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    4 [8 [# Z3 E. X( `/ Y
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    2 c' o5 O, \( K
33. }
    / I% Q, t( q$ l3 f  O
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    3 ?9 G2 m2 [, |$ `) a6 J* \. |
36. {
    & P1 W0 \7 q. }0 m3 b% H3 {+ _
37. char   buffer[10240];
    
38. 
    2 a$ l/ f2 L0 o9 s7 q$ n! z
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    7 Z: k8 d, X5 p+ R
44. struct   sockaddr_in   sockaddr;
    0 p3 e1 C* ]3 `8 s
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    % T: ?* v# C7 Q. `4 T( b
47. sockaddr.sin_port   =   htons(port);
    1 ]) }% s0 c. y# [/ L
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    " g+ @  R0 g: A1 a, G# L6 G
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    " j6 c  Y8 }4 l
50. u_long   lv   =   1;
    + I8 S% C* D7 s1 @
51. ioctlsocket(s,   FIONBIO,   &lv);
    " x, G9 M& S0 N, s' [- q
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    6 k6 N, H. z' W$ X/ v
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    3 W& |( M8 J- }, n9 w
57. closesocket(s);
    ' `1 i! c& k4 R# d
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    5 R5 j. t. _8 e, }4 A/ c! m+ R, e
59. if   (!rlen)   return   false;
    
60. 
    2 W6 e$ o. E: T
61. response   =   CString(CStringA(buffer,   rlen));
    " }) A3 Y6 T' u1 u
62. 
    0 Y# Y' R5 f$ c' z$ @0 i
63. return   true;
    
64. }
    ' J* H; {$ x1 n$ V1 j4 f, A  h* s
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    6 Z7 V! v4 Y) d. p" ~/ L
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    & w+ A+ N( d" K/ e. I( J8 V8 c
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    # H& A. B  j! c- z( v
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    ) L9 ~. m: b2 V) I) e' l- D
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
      p% d* I4 w$ j* |
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    1 n  Y' s/ d+ @  W7 N
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    , ^% A2 V6 J/ \1 i! P
85. int   pos   =   0;
    ' l$ i- x5 b% Y0 ?( v. Z2 Q
86. 
    & P! X  O$ n+ g- V7 [% y6 B
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    . G+ r- m9 d  l! `+ A4 j
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    0 Q8 m7 s8 ]' H% E9 v0 z+ C
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;
    ; K# @. E6 n. o* Z8 T0 e
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    & A6 c0 j. E0 N9 @0 f6 }
100. {
     8 p0 {# P- c7 w5 J0 i
101. CString   startTag   =   ' < '   +   name   +   '> ';
     - |+ P; v; v0 X
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     9 r# M) f1 f8 C& D2 G  m+ I
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     1 ]- h- l7 x# I1 l
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     : \2 r" L; y9 a: l$ [
109. if   (posStart> =posEnd)   return   CString();
     2 G5 B4 u$ Y7 x" E! R" Y
110. 
     4 A( d' u& \# u7 G
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     + K4 ~: N' k2 @
112. }
     4 f9 V1 O/ C2 R; b+ E
113. 
     5 I+ i8 }, N* \! f1 Q/ U6 d
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     $ O8 C6 e8 y3 ^- R
116. {
     
117. m_uLocalIP   =   0;
     8 N+ Q! @, E. Y+ [0 V' \4 v5 j
118. isSearched   =   false;
     8 U" l/ W) |9 Y
119. }
     + ^# ?+ O2 ?0 O& u4 d5 e
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     7 V% i, w  S: p: s4 a
123. UPNPNAT_MAPPING   search;
     + h( Z+ N2 {8 S9 y3 i
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     $ e4 C) v- F# Q! q! @
128. }
     7 \5 S, z$ L7 e: F, _- E
129. 
     # n' L( p. \2 e5 l' a/ S6 X
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     : Q8 l  e/ k( C1 @4 O# ^
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     8 @  h& V% @& }3 |
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     6 G$ Z0 [3 x3 j( W( w
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     , x* y) t- s' f# P: ~
141. {UPNPPORTMAP1,   _T( "service ")},
     : B3 ]( d5 y$ g
142. {UPNPPORTMAP0,   _T( "service ")},
     $ G; ^5 |, S; ~
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     4 a: k/ g8 V4 e$ x6 Q- }1 I0 u, r
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     8 B! V6 D+ ]2 n6 Z5 n' I
148. ioctlsocket(s,   FIONBIO,   &lv);
     % v5 y  D* q3 c5 Q' L
149. 
     
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++)   {
     " Q% E$ _2 \+ s
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     - a7 ^8 y0 L6 f* A; l- g* }
157. 6,   m_name);
     . G$ |- n% f' M7 T, n% g9 S
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     " o! c- O& R# G; Z" |
161. 
     
162. Sleep(10);
     
163. 
     ( T& d- Z* v2 n3 v
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     ! h) X) N+ d, [  p
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     + f0 n7 F& T+ D5 p/ F
171. if   (!parseHTTPResponse(response,   result))   return   false;
     + d5 p( s( v, Y6 x$ D& e
172. 
     ; {2 L3 b6 e, L. a6 O
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)   {
     4 h6 t: I) k" c
176. for   (int   pos   =   0;;)   {
     / N9 J7 g8 c. ?0 d3 _. h! j! m- Z
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     1 E' d5 z" d; j9 ?9 |2 g6 I
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     ( e, P, \$ M" v/ B  l2 r  D! s8 [
182. line.Delete(0,   9);
     
183. m_description   =   line;
     " d6 e0 o; T9 y  T9 i6 u/ T7 h
184. m_description.Trim();
     # r2 f* v# I3 G' m! r' r
185. return   GetDescription();
     * |" M# @/ M; l  `$ r
186. }
     
187. }
     / ~8 S( ?" h( D
188. }
     
189. }
     
190. }
     
191. closesocket(s);
     
192. 
     8 S8 m* i7 A2 A7 c3 u( _  K6 q7 @
193. return   false;
     / p0 }* p! K3 W# b( s. W
194. }
     

复制代码

天云上人

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


) R/ {7 l! ?: E; _' G1 T7 R* @0 f///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


! {$ s' w. E& x5 l5 @& I#pragma once
#include <exception>

1 O9 S( Z. _4 @+ `. B
* {' ~$ M) K# Z, g3 P" o, A  enum TRISTATE{
' E" ?; u- R8 x" c2 O        TRIS_FALSE,
! Y  p* b& a* N& E        TRIS_UNKNOWN,
* P) ^) i6 k. G( V6 J- X        TRIS_TRUE
};
. x1 b, R" ^: I3 M

$ h+ Y) {' V+ I4 }8 penum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
* J" m3 E6 Q' K% o$ ^' {0 d* f" _        UPNP_IMPL_NONE /*last*/
};
0 O0 D: X: [- \! u' z


, X9 C  q6 y* N/ Y- W# P% j
class CUPnPImpl
2 [; K& W. V$ `2 t6 v2 Z{
" r; N0 Q+ x) R9 ~/ G, gpublic:
% X/ ~; I" e  q! s+ M7 L& ]        CUPnPImpl();
; l; ]$ l! k2 P! T9 G        virtual ~CUPnPImpl();
; z( n5 N7 i2 |        struct UPnPError : std::exception {};
. x5 ?; w$ ^; K/ J: o        enum {
6 c$ }# S+ S. y  @' }9 M0 g                UPNP_OK,
                UPNP_FAILED,
* q; ^* M8 |; v: v) p4 z8 U% o. w                UPNP_TIMEOUT
7 h2 F! G) m# P) I/ C        };

- ]" K9 p3 k* e9 i1 c, c; }7 s6 M
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
5 |  `* c) r. f5 z+ W8 H: N5 s        virtual void        StopAsyncFind() = 0;
2 q# }) T# t# Q9 }0 D# T& I        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
2 `$ Y8 V/ ]1 e) z8 `        virtual int                GetImplementationID() = 0;
& _; P/ H) Z/ m& U  H0 t       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
( B4 a5 E& J- V, h& L+ B9 A        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
, R& r, H% W8 p( a+ b0 s        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
, H% \/ I* F8 f# h        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


  d9 Y$ h1 [6 ?. ?6 ]7 `// Implementation
% y" z, p3 U" h1 j' Q$ C* s6 x) v6 fprotected:
0 c7 M! i) a1 x. l        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
* @! r6 u& S9 i9 F- {        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
) b- g, A( ?# I. b" _        uint16                                m_nTCPWebPort;
  m' w4 ?# i0 F        bool                                m_bCheckAndRefresh;

$ t8 J8 n% E1 }4 Q2 U
private:
        HWND        m_hResultMessageWindow;
8 P1 l2 C( b  q7 F" k& B        UINT        m_nResultMessageID;
) _2 I1 m: r. M$ @! B" f7 m9 u
: Q7 b+ y: y/ q) s$ A- E/ \6 e, W
};
( i( w6 i" b9 V- T5 c  j

// Dummy Implementation to be used when no other implementation is available
9 ^3 c0 B' O) e0 o$ ?1 r4 rclass CUPnPImplNone: public CUPnPImpl
7 @9 L# M9 k7 y, z- I, L/ L{
public:
/ K- S0 R( p2 T1 t6 C        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
7 {  Y7 r4 c* Y* T1 j+ `; V        virtual bool        IsReady()                                                                                                { return false; }
& S/ M* ]! Y- Q9 Q  S- o: f" p- e        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

! ~/ D* P! E6 o  s+ M
/////////////////////////////////////
" e+ M( L* a6 @% |2 g+ @6 c//下面是使用windows操作系统自带的UPNP功能的子类

4 H& p. f$ D6 D- r2 f
#pragma once
#pragma warning( disable: 4355 )
# ?/ Q/ Y% ^# n$ \$ E# R2 A

#include "UPnPImpl.h"
8 y  K0 z: \& r- [0 d#include <upnp.h>
4 }0 C; s, S7 L$ Z3 k#include <iphlpapi.h>
#include <comdef.h>
& J" o5 ]6 N$ R+ l& ^+ o; f#include <winsvc.h>
  Q1 y" }! |- @0 _5 o$ o% B, ], z& I; S

. i) z* X1 U5 T+ W! O; }+ G#include <vector>
0 l' z3 J. A# ?7 j0 [! s' Z#include <exception>
#include <functional>
0 j# h6 Q) B' ~9 S0 }; q
: r2 k7 l: N) W! u" a5 W& q
/ t2 A; w# f5 X9 \
7 L# t. c- ?4 }- |: j6 D" [6 M( A2 F
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
$ L/ P+ B" p% }  L) V2 u- ftypedef _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;
! m3 f5 T" |$ [% v' e8 ~. Rtypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
( w0 _; J) Y% `! Ntypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
- t: Z8 }  u( T) O! }2 Y$ Q

typedef DWORD (WINAPI* TGetBestInterface) (
' y" |# a6 I0 o  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
7 C' s) A0 b* k6 ?, B! n4 I: P);
; v/ @( E! R/ p. b
: N# N1 j) M7 r5 k3 _* F8 o; m
typedef DWORD (WINAPI* TGetIpAddrTable) (
$ x% R/ U8 u  C  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
);
. p6 ^0 u& c2 q3 C, K; U) T" s9 v
, z" g: p2 O" E5 x: U
typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);


CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);


7 }" a3 N4 N  z$ Mclass CUPnPImplWinServ: public CUPnPImpl
8 t& l* Y8 s$ z5 N{
        friend class CDeviceFinderCallback;
, V% j$ N; a; n; p- m6 C        friend class CServiceCallback;
! y, g9 V9 v4 t* }9 x' @, z// Construction
  x( j; m: {4 h5 kpublic:
" h4 K8 f- u; I: E, u  Z6 h        virtual ~CUPnPImplWinServ();
8 k) t( W$ N4 i* S( N) n        CUPnPImplWinServ();


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
4 N) |8 \) Z+ w8 b( N5 q        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
0 K- G: w' u; y) e# v4 b        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }


+ b) H" u7 j* {' }$ a        // 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
" N  K) M  A6 j9 t) O        virtual bool        CheckAndRefresh()                                                                                { return false; };
( W$ ^6 |- Y6 u+ Y/ c, L

7 Z' _; v$ U, A2 Iprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
( Y. r5 B/ |8 Q        void        RemoveDevice(CComBSTR bsUDN);
5 g  F; A0 G( X* r' y        bool        OnSearchComplete();
2 _% h* h! P% {* k  O        void        Init();
6 [' r$ D% z+ o7 ]
& l3 [5 W3 Y- I  P4 g8 k( R# ~2 ?
        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
& W/ A7 V7 b4 C5 X. M6 j# }$ r                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
5 ~  D, e7 {8 h7 ?, j+ b+ N                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
6 {* o* l0 `: @: `9 v4 D5 k. p! a                {
9 p/ @* V( \+ I( T                        TranslateMessage( &msg );
& z( X6 n1 P8 R  n                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
& j( t3 e1 s" W        }


7 }5 O' m5 N6 `' b: s# Y9 _        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
        // API functions
: R3 w, Q( Z# Q  o& V6 m3 ~0 n* D# H        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
* h+ ~. o. A/ y& I        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
; U- S6 X( ?4 X# I) {. @5 \        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
! H( X( D0 g. }5 u8 B7 B  N; i5 _        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
: C. t: U3 b, b& n/ C" D7 _8 z+ k9 Z        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

6 X! Y# W/ h( S
- J- ~! L! G9 b" G        TGetBestInterface                m_pfGetBestInterface;
) ?! M! t3 f6 @" f; C7 P: R        TGetIpAddrTable                        m_pfGetIpAddrTable;
! |* C. I: G) |4 x; f; A        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
* c( e& `* n, C2 T+ t3 N        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
5 Y9 Z( o6 k( h  Q/ N                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
  M! u/ B- n+ R" m7 w                {
                        CComBSTR deviceName;
1 d( G; D& ]9 l1 X& d  U                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


' u, Y1 |# [3 }  l                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
+ \9 }& i8 l+ H+ O* K8 D/ L" Y: i3 y

  [3 P9 B' J- r% \( x                        return wcscmp( deviceName.m_str, m_udn ) == 0;
, ~$ h* v" l, r- d! @2 N                }
8 M1 ]) c! s4 a& Y" X; N& i* Z                CComBSTR m_udn;
        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
# G# D# R8 |* R8 P: t4 |) u        HRESULT        MapPort(const ServicePointer& service);
2 P7 ?- G, b" o/ _& o        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
) b4 \+ D% r  s& s1 T) ]/ J( `        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
7 E+ H0 a* S( Q6 N2 n. P

; y' m$ m& h) W$ G' o        // Utility functions
" q: \: G. R1 Q        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);
3 b: a; @( J. |. Y9 x& S        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
4 t6 G& |: K# ^$ D1 x9 X& L        CString        GetLocalRoutableIP(ServicePointer pService);

' E3 F. B6 `2 F+ a7 P! I+ l
( B; x+ n" l7 g( y+ E# q4 P1 z1 {2 i// Private members
private:
( [8 ?4 H4 I0 ?$ W0 r- ?5 u        DWORD        m_tLastEvent;        // When the last event was received?
. N8 E9 ]) `9 D! \        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

" L) f5 V2 k- Q& D2 y  X4 Y
        LONG        m_nAsyncFindHandle;
, A5 T' {% b+ Z$ B0 m        bool        m_bCOM;
" W3 F7 @: g$ v3 N$ h        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
' y0 @0 v1 T+ t& ~. C& g% @+ B, e# X% `        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
  K$ L9 O4 y) r3 Y2 @        bool        m_bInited;
* L( @1 x) n9 J) b' V: U        bool        m_bAsyncFindRunning;
. \" \; [/ f0 @/ ?* U5 ^) N        HMODULE m_hADVAPI32_DLL;
7 R% q4 `0 n: d8 |+ d. U' a  G1 a        HMODULE        m_hIPHLPAPI_DLL;
3 a; W+ e9 ^* v$ U        bool        m_bSecondTry;
$ D' f: [! j( G" k        bool        m_bServiceStartedByEmule;
$ ~, i; a3 A# R( _        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

1 n* @3 Z5 ?7 ^- l# H
};

0 f" _! X  ?; \: n. G
// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
9 h) |% _$ f5 F5 N4 A9 S( Y/ j2 @

* |/ R; }. Z! }$ Q3 L   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
# q  P  G  ?6 w% s   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
4 C' N+ Q, W8 I5 P3 A7 J- e

// implementation
+ l/ r# I# C+ q; [' I! Q( m  Iprivate:
/ y9 W% b1 _4 N$ ~  M# U; S& V0 E$ W        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
- }3 E, h: A; y0 L
, `* H8 ~, n$ q: b
private:
: N0 S% N% c3 n9 p9 T. j% [7 V        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
8 X, C6 ?7 n# v+ u" T2 ~0 c};
5 q( K6 d9 f, Q* u
" y9 z0 e5 w7 n3 B4 r
// Service Callback
class CServiceCallback
# v& A. H2 ^) H3 U7 |' T7 n        : public IUPnPServiceCallback
. o# d5 p4 q5 |  K{
/ ^. \/ K7 h; J! E# Q0 c) U( \6 J$ Ipublic:
" z& Y" U9 B* l  y        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
' {' |* ^# x& W) {: Q9 Z) Z0 a        { m_lRefCount = 0; }
   
2 A% |+ p2 S1 |  E+ s   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
, u3 F0 D( \/ ]7 \/ P3 ^- A   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

; V" ?+ a0 c8 a
. {8 @$ ^# x' s, a9 F3 y# k9 a, {# B* m// implementation
( F' V$ h* x" s" B" Jprivate:
7 t% r, F% N6 i+ p4 m/ P        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

4 f% N/ K/ e! S1 U5 Z" F, K. h6 W9 I
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
' J; p! _1 H" k* o& E, l( Y2 \};
' b' n+ _6 K# z+ B
1 v8 H8 W" ]* `$ _
/////////////////////////////////////////////////
! V+ k, p. ?; w2 {# O* V% j2 S  N
4 U7 V; x4 K+ q; k5 C
使用时只需要使用抽象类的接口。
  d) ~% Z$ E6 s( M! j0 mCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
% U! {5 h& K; o) o: o; Y/ d' J& U- MCUPnPImpl::StopAsyncFind停止设备查找.
/ W7 u# j& _+ V3 z7 mCUPnPImpl::DeletePorts删除端口映射.