UPnP

天云上人

/*uPnP.h*/

1. 
   $ R  X* Y/ U& Z# Y8 o: b3 R
2. #ifndef   MYUPNP_H_
   / Y% o# l" p% |. d& B
3. 
   5 v3 W- P) S0 e. w4 n
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   ! ^- E4 S+ ]2 A) s5 y
8. class   MyUPnP
   ' B* N) {; ^! R
9. {
   
10. public:
    2 `1 }" d" {0 z! |3 v1 C
11. typedef   enum{
    / h# A7 S. h& e- T: x% L8 O: I
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
    9 h9 |" ^: y& I) ?( ]- m5 k
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 h. ~, x8 \8 F  n3 g
17. }   UPNPNAT_RETURN;
    8 o2 k) m0 ^' b5 H8 R
18. 
    & ^0 |* i) T. F; Y8 c; {; o+ F, W
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    $ m8 G) l/ v! h) ^& {$ j
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    : K  K7 j2 I$ t
23. 
    
24. typedef   struct{
    6 w/ l* L- r6 m: y0 ^4 f
25. WORD   internalPort; //   Port   mapping   internal   port
    ) G+ h# i" f2 G( o! t% H0 h3 J7 M
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    $ f( [$ f( W1 F$ X9 m. H
28. CString   description; //   Port   mapping   description
    - n5 T3 c/ ?! Z8 a2 d% a5 |
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    5 v) Q0 e5 w- I" N/ u& n
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    7 \! J( K" E; V& K' B
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    5 Z, r1 T! x: @8 \$ S
40. WORD GetLocalIP();
    * [( t4 ?; X0 o, J9 R/ G! i
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    
44. void InitLocalIP();
    8 [# d3 n5 |( {. H) t2 J* \8 `4 R
45. void SetLastError(CString   error);
    8 T! {( S6 {5 O* m
46. 
    $ m4 h6 V9 T* B! F6 d
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
      Q4 @/ d4 k5 G5 Y  M
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    . M/ h1 v* E( _% K
52. 
    $ d, r/ c# E0 n. t
53. bool Search(int   version=1);
    ( J8 e+ @: N& a& r
54. bool GetDescription();
    & \+ A8 R( \* U1 |' `. v0 f
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    ) z$ r) ^" A; r; r9 V$ j2 a+ b
60. CString m_devicename;
    
61. CString m_name;
    / s6 f4 f' @& \- ]1 P" [3 K
62. CString m_description;
    & B. v' {& e" Z- P1 w! I& H
63. CString m_baseurl;
    ( e$ L* s4 r+ R$ o& u& Q
64. CString m_controlurl;
    9 C. x0 V' B; ^  Z7 R
65. CString m_friendlyname;
    ; h: W6 T5 f/ X/ q0 Y2 \3 i
66. CString m_modelname;
    , l4 ]$ m7 `6 v) e# w9 }! O
67. int m_version;
    7 d; Z* G# {+ [! d* q0 t
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    ' i. C& t, ?; s4 l* h* S
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    : d4 `, H7 v4 T$ J( h+ r
74. WORD m_uLocalIP;
    & S; d" \+ H# c3 O$ m8 o; i
75. 
    
76. bool isSearched;
    
77. };
    0 n* T0 D  U' c' v6 [* ?# J! m5 c3 j
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   + p  Q! Z, T+ \( z
2. #include   "stdafx.h "
   , k) B  q/ z: ^6 R
3. 
   - A3 \( p4 M' }
4. #include   "upnp.h "
   ; P& U0 y* }3 `3 O. B
5. 
   * a" v) z' ~0 c$ R. _& |$ s
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   & K3 v7 s( `8 l& G' I' j" e( k
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    $ N1 o, s" J( N. H
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    , i' N5 u) R+ n- n1 z: A: K4 E
13. static   const   int UPNPPORT   =   1900;
    9 D, Q4 C, J& c) j2 x4 o. t( ^# @6 x
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    - ~: A. n7 f5 m3 H# W! q% f: Q
15. 
    
16. const   CString   getString(int   i)
    
17. {
      o4 C+ j! [6 v* w& |* f3 x8 }: j# c
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    ) @  Y& \- n3 }) p9 V9 x
22. return   s;
    
23. }
    8 b* H: C/ l7 r; O. v1 l$ q6 B
24. 
    4 N, J1 Q9 F" ?
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    9 c+ n# A! S: w$ J5 [
26. {
    $ H% h: F1 D& t
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    2 L- L  V# ~! S, ]( }
28. }
      e1 R$ C1 J6 I( }( D# W4 C
29. 
    7 y( I+ O- j5 e% z
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    $ G8 x: p' w! F* R0 \0 q3 Z# m
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    % E- ]% \# a0 ?& E% Z; i. [
33. }
    
34. 
    3 |! E' K* P1 N4 [' S
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    # L2 Q* G7 n& a% V. v5 B0 E- D! A
36. {
    
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    - v! r3 I$ M! T, M/ N* K# ]/ d5 S
42. 
    ( d5 ?& q/ E$ |) Z
43. uint32   ip   =   inet_addr(CStringA(addr));
    & c! `) I& b$ S) m" V4 d. S+ p) V
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    & _$ ~% d9 C' N
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    9 J, h* g8 ]0 ]1 ?% H! Y
50. u_long   lv   =   1;
    2 H% q' n! E7 x! K
51. ioctlsocket(s,   FIONBIO,   &lv);
    ( @9 @5 Y1 \' ~! U" ~
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    $ n3 t$ F1 }8 z/ X% s* t. P
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    / F* ^- @; r, V" t8 D
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    ) I( a- K/ W- I# ~8 F9 t
59. if   (!rlen)   return   false;
    . F, }3 |3 i' Q/ X0 ?2 ?
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    8 {: M; u7 s% q8 R. p" P
62. 
    9 q9 d! j" G: {; a1 O4 Y! O
63. return   true;
    & R7 }7 ]) W$ C: S4 P) n
64. }
    
65. 
    ( U. w4 d% C3 p5 R% b' ]1 n
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    2 W% t/ T5 N5 f; ~' `2 f
68. char   buffer[10240];
    ) ~8 u& n; H) d5 C
69. 
    9 C: A1 c7 _4 K8 f
70. const   CStringA   sa(request);
    9 |7 j3 V: z6 b$ o
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    " f7 Q# S8 ~+ x, C& z. R
73. 
    ' x) J- D% Z5 s& G- h% K8 Z
74. struct   sockaddr_in   sockaddr;
    & o9 O/ N1 {' r' f+ q
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    3 b* X6 ^( f1 m
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    7 m6 G& ?( H+ E' A
81. }
      F* h# W% i  J; i
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    * N9 P6 K0 N, K5 V: |; |& O
84. {
    
85. int   pos   =   0;
    
86. 
    0 d8 _, O$ R, V' L1 [
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    ! b  c4 q3 K& A& W( X
89. result   =   response;
    
90. result.Delete(0,   pos);
    9 c3 ~9 x4 S4 d* N( v- o# x
91. 
    2 d& y0 C) R6 k( v9 R5 ]: C
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    , q9 Z7 d, j4 f% X! V9 }7 Z; T
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    7 i( r) v7 o7 R6 z$ ?
96. return   true;
    
97. }
    / v1 B$ b! _8 I8 {6 X; y! y* ?
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    % k2 q& o7 F# k# d
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     6 _* E- N/ B; N) R" Y" r% J
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     7 ^4 q% M4 P* w/ w
103. CString   property;
     
104. 
     - Z9 \0 @' m5 m. N& h' D
105. int   posStart   =   all.Find(startTag);
     7 D4 w+ r$ C. t3 [% J
106. if   (posStart <0)   return   CString();
     
107. 
     + r* ]) k9 h  W1 _6 l
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     0 z) |# l; t0 _9 q1 w" U- [
110. 
     1 G6 Z" N  W! N3 V& m  @
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     : V: U" g1 Q7 @  s2 ?) g) s
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     * G3 |2 h  }$ {5 ^
122. {
     1 J. v4 }# i  V! R) N" t; n
123. UPNPNAT_MAPPING   search;
     % ]4 F& V  ?: v/ @& n3 T
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     * \7 Y! w# I1 K* Y$ R
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     2 o0 N" }& {2 s8 \1 t
128. }
     + n& [' V9 p: O2 ~7 Q- t( C. k
129. 
     3 x" r: J( P0 x( Y3 U4 G0 E9 [0 k
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     
133. 
     0 L- ?' d+ Z7 w4 g( n
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     ' H! h; ?4 ~6 S% s/ j
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     6 d  C* k0 ~  I' j' Y
141. {UPNPPORTMAP1,   _T( "service ")},
     4 l/ A! v* Y+ I$ u" w
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     3 s6 d0 f+ p$ o! C- t* L1 R" r! p
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     $ ~% H% p: w  _  [
147. u_long   lv   =   1;
     8 u/ e5 n) W- e! Y8 R) z
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     & t8 z7 h- s; o6 o, A5 e, B
152. if   (!(i%100))   {
     & w  K% ]  T2 o6 W1 f7 P) \9 H0 i
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     - @# G( A4 H) m; X/ A
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 "),
     9 ~6 ]2 q1 O- ^  p* }  W# l. k
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     , S1 {# D, m( B& J4 n, V0 ^* _
161. 
     
162. Sleep(10);
     ( @5 {# T+ F% a; _- W0 w
163. 
     $ _$ Q$ ?) _; z$ `, |
164. char   buffer[10240];
       {; `) X. U, y9 a0 i/ W
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     . w9 c. c& d/ j. `* U) W
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     , w" u" V0 \" e; ]* L
170. CString   result;
     * L7 M: Z0 p4 l5 Y/ U
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     + s' x3 \+ ~$ U* Y0 U3 }, |' n6 I
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);
     4 W6 j+ m6 L) m; C- O# g% f
175. if   (result.Find(m_name)   > =   0)   {
     * t% w" a0 B- o( I3 H3 O
176. for   (int   pos   =   0;;)   {
     0 K9 k, v4 N; l) ?& g* K7 R8 ~% w9 ]
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     4 U+ L' E% d) U
180. name.MakeUpper();
     ( k5 i- V3 E/ ]5 W# c/ a# Y
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     ; y- d. R0 l. G' ?- G
183. m_description   =   line;
     5 g3 I& {+ M. h9 L- d
184. m_description.Trim();
     3 p) t. i* m9 K& v: r  q3 f6 @
185. return   GetDescription();
     / `$ M' i. n. x3 k% x6 u
186. }
     
187. }
     
188. }
     6 \' F9 r+ G4 M) k: u; g6 s
189. }
     
190. }
     
191. closesocket(s);
     
192. 
     ( }8 ~9 T5 a8 d, |1 o  ^
193. return   false;
     
194. }
     , L0 }4 M) z4 V7 P" q* U

复制代码

天云上人

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

  p0 t. O  e8 s
( s1 \1 R4 t4 h8 x( x- X$ B' u///////////////////////////////////////////
/ P/ k/ n" r8 n& b2 s7 L- p//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.

! l  k# u  ~" {* V6 H
' Y3 \0 ~- N7 v" `& f0 O#pragma once
9 K6 Q9 R# y7 C; D: Q8 C' x#include <exception>
/ H9 `% R' t1 K) Y# c4 h4 ?
, v* S5 t( d" U) P. K6 j* g; F
8 i! B) Q) ]  R! Y! `" k  enum TRISTATE{
; O! j" d& z1 ]! _: f) }7 Y        TRIS_FALSE,
6 f. ]/ L; s, \3 v6 A1 M! f        TRIS_UNKNOWN,
# w% L/ ~. z; Z% [; r        TRIS_TRUE
};

% \% J9 k% Q# {) o# x3 E9 E% n( ]# ?
enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
6 k7 H+ \& k% k" N  D( u        UPNP_IMPL_MINIUPNPLIB,
5 K7 y! q% p- H) b) B, i3 |' T        UPNP_IMPL_NONE /*last*/
};




class CUPnPImpl
- s8 j* O0 F, s% h, Y' P* m. `1 B, p. W{
public:
. N$ z* `6 c& F$ g3 b. G% W3 t) [- q        CUPnPImpl();
% D- m# h# i: c4 j; m        virtual ~CUPnPImpl();
% D# S- w( O( ]( N: d& s        struct UPnPError : std::exception {};
        enum {
) Y2 }4 @- {' a: Q                UPNP_OK,
! D, P6 D. x( C+ h                UPNP_FAILED,
% F: W* x' G8 s  w                UPNP_TIMEOUT
# h) X; ^- `3 q/ Y        };
3 a, z) d  Z% E# \6 M& ^" R; o1 \  h

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
( U# c6 x3 G! ]/ M8 |: O        virtual bool        CheckAndRefresh() = 0;
+ u( p: ~  ~) e) v* L( j* z        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
, l: q6 q/ W1 d, {- s        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
1 W9 T+ o' E- [! x
; s4 }; N' s, x8 j! ]/ t
& p, y' G* k3 B- a. k0 ]        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
8 m4 ]5 A6 }) o& Y# J        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

- R+ D! K4 s/ a. i0 j3 W
5 ?/ F# X4 q; j4 t5 F* p5 q8 o// Implementation
protected:
  k1 \. a2 |! F9 r1 \# Z+ s        volatile TRISTATE        m_bUPnPPortsForwarded;
: Z- F6 S7 u0 b        void                                SendResultMessage();
% A  C  n) B2 j$ j        uint16                                m_nUDPPort;
6 Z  p% l4 W! R- v6 A' i1 ^  s        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
- a, O0 [/ @+ V& {, V        bool                                m_bCheckAndRefresh;
1 I, g8 e0 |- u# \. }  i) t* K% p( p
3 H$ ?! h/ {/ v- k
private:
& k7 }* l- I  R. p9 m& M% u; R$ L        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
" O4 j# ^) v4 W+ f: O% L6 V: H
9 Q- w/ [/ h/ h1 X/ j& [) m/ z
};

# U, d1 _$ y1 b8 p: @
// Dummy Implementation to be used when no other implementation is available
7 z+ P. U7 j$ M$ ]& Aclass CUPnPImplNone: public CUPnPImpl
{
+ o6 x" e! y9 {$ _) ppublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
0 ~/ I3 U( x; X3 z$ m        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
& H! V  m$ M/ ^2 n# u0 g6 e& z: |        virtual bool        IsReady()                                                                                                { return false; }
/ H6 j# H* L- [, b$ f  k/ G* J        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
  n3 H( [. M4 B  |7 ~};

$ P7 |- B' R* k+ k3 ]
/////////////////////////////////////
/ `5 @; w& o- X; t- h//下面是使用windows操作系统自带的UPNP功能的子类


3 p( j; ~' T' E$ K  J#pragma once
# T: H* V% k5 v#pragma warning( disable: 4355 )

' L8 ?; y3 P; |' x7 M& F
#include "UPnPImpl.h"
2 s! J: v4 E. p- K6 W. ^4 G#include <upnp.h>
% F2 T; a# G/ ?+ c0 Q  \7 T% }% x#include <iphlpapi.h>
( J4 \: C3 l# H4 p% U9 H#include <comdef.h>
5 e1 Z8 q7 D0 I5 R# Y: A#include <winsvc.h>


5 y* B2 A+ M( c0 j- W#include <vector>
& w# C: S' s& Y8 ^7 \#include <exception>
#include <functional>

( H' a6 H+ e" S" N
2 d6 ?5 s1 I) w
% l) C8 r& c6 y5 a& P- [3 e5 r. y1 z
8 k# g3 `  t. ?3 f" ^- b7 k7 utypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
. L% K3 H2 r) W& g: u+ ctypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
' p4 Y+ P/ T& ^- i$ L: q( `2 q; Ntypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
- S' u" X( m$ j, T% ]! d0 f3 itypedef        _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;
2 j* F* ?7 b( U9 B% j1 g2 H
: c+ J& U: o% b0 l
typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
2 S  {/ r- b: I" l0 x

typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
3 }/ F! U5 |" M2 c  BOOL bOrder
);
% y: e4 x9 B) h4 I0 {/ `& e
, |$ x- }0 H! X
typedef DWORD (WINAPI* TGetIfEntry) (
6 m% N" _/ A; F0 L  PMIB_IFROW pIfRow
);
0 Q+ O$ L, P( s( L; B/ G

CString translateUPnPResult(HRESULT hr);
7 s( ~- t5 u( Y$ m+ M! DHRESULT UPnPMessage(HRESULT hr);
  f& g5 H7 q% r
: P# s9 s+ w+ R3 Y2 t! ]9 `
class CUPnPImplWinServ: public CUPnPImpl
2 Z1 N0 y4 S& G7 T1 R{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
public:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
1 C2 w' Y4 U* _2 s/ N

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
4 K/ Z. v% ~, e, ]        virtual void        StopAsyncFind();
4 t: V5 N& s/ d1 H0 D6 k+ y        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }


        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
  d' F+ ]. G& {  k. R# Q4 R* }  w        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
% B# v8 u6 B4 X3 k4 i, b- I        virtual bool        CheckAndRefresh()                                                                                { return false; };
: x0 r' m7 A6 g9 B, R3 H/ D8 _
7 }7 u' u/ ]  Z  f+ s
9 Q/ M9 w) G0 C% _, w+ ?) oprotected:
* j- g2 ?4 z; x, b        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
; m6 f9 h0 P( t' Q        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
2 C3 u; n% W6 K7 e0 A        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();
! W0 |3 H/ _+ e+ J: D
. L- p3 @( T, K) P7 G7 f
2 m7 @1 J$ r+ S. L5 R; \: \        inline bool IsAsyncFindRunning()
- x* V. ?  ^4 F# N% v  B        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
7 p* _& O6 q, z% ]* y# h                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
( ]$ v! H" d5 N  k9 v                        m_bAsyncFindRunning = false;
# U. L1 ~( Y& C0 Z2 M                }
! Y# q9 c# s4 J5 y1 a4 R! c  ^1 P                MSG msg;
. D  [. e- {4 H+ A4 S" ^6 r$ G9 q  |  ?. b                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
) u+ d# s% ]  @5 D# X% Q                {
/ m( |: |( B0 ~/ J, Q: y' ^                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
. d% s* ]2 ?. E+ e) y! A! k8 ~" \                return m_bAsyncFindRunning;
        }

. d( `9 g7 O; ]$ ^% ]
        TRISTATE                        m_bUPnPDeviceConnected;

) _9 f  b7 p4 c$ t
// Implementation
( X* z) r1 k9 H1 l' b" B        // API functions
/ q) s" G  P) X- l  i  B$ t        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
. H# B0 N" y, V+ g        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
' n9 E* m0 n% H4 X3 G& A( t        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
: C- C- `$ k& i9 T8 i( `        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
( E2 y. d. ?6 \8 d3 t

: o3 m) }3 k' H: J) T, C' e        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;
$ ?/ B2 Q7 \3 g) f# B& g

        static FinderPointer CreateFinderInstance();
; ~8 b: W4 b  E        struct FindDevice : std::unary_function< DevicePointer, bool >
6 P# Z( T8 h" v9 o5 E        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
1 \: ^5 c+ o  I7 b$ n                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
7 N0 _) @6 D; `& Z1 \# G: l2 N                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

2 z( q" S% Z6 |
4 x* `2 d+ w. ^, Z6 E- D. u7 c+ @                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
8 x8 Z0 f6 I7 n        };
  Q3 }7 }% F2 `+ J6 ]% u       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
, J% w, H( W9 w8 X1 s3 _+ H        HRESULT        GetDeviceServices(DevicePointer pDevice);
- E2 ]8 T* M! R7 M/ u' f        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
8 w& J6 _% F) [9 R        void        DeleteExistingPortMappings(ServicePointer pService);
# c9 T' z0 _1 n& A% f3 k2 Y# H        void        CreatePortMappings(ServicePointer pService);
, N# m: l4 k$ d3 A        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
; N, k7 I$ M, F7 Q        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
2 l5 M. s3 j& |( i$ k" g8 b                LPCTSTR pszInArgString, CString& strResult);
! m% _% P* p, G8 j2 t) B( _        void        StopUPnPService();
; ~3 r8 N5 N4 C, S* H+ m
5 m+ U4 @; P' u" l6 j6 w( x
  l" \1 `3 a( N: q        // Utility functions
0 }. }; ~/ I7 V6 N! b        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
/ p2 d; N0 g0 O/ U2 z. V' r7 x# a4 `, v        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
! Y/ f, e7 m% y. U: G7 _        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
; V$ P0 q+ r; u5 c- G        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
, U3 l6 J( z3 y' {, I4 x        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
  |/ J) r* k# v3 q7 h. T        CString        GetLocalRoutableIP(ServicePointer pService);
  L0 ]6 v1 L& ~1 Q+ ?: J

// Private members
private:
, {# ?4 i( ?% M# P* R        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
/ l- V# l# e4 A3 K* X4 N8 a1 t
# q2 R1 P# b. R: u& z3 e
        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
' Z, R! O; p- U        CString m_sLocalIP;
        CString m_sExternalIP;
  Y9 _2 R9 @; K        bool        m_bADSL;                // Is the device ADSL?
6 Q3 C8 _) o; E  o9 ?+ ~5 N# O        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
5 J' d6 W" n: }3 B, J        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
; g/ k: L8 w* a) X' c2 P        HMODULE        m_hIPHLPAPI_DLL;
! C- [" K% M! }3 T4 G3 d        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
/ |9 L% f+ g$ _: @        bool        m_bDisableWANIPSetup;
0 @; u) R* ]7 o& Y        bool        m_bDisableWANPPPSetup;
6 D" z; O0 H9 {/ o. k2 F) `) T, x
5 n& @$ c/ M# V; q
};


// DeviceFinder Callback
& W0 c& [6 `# {' c5 H3 f; `class CDeviceFinderCallback
. X4 k& u6 x# R0 t0 C        : public IUPnPDeviceFinderCallback
3 `: W4 G* x0 t! G5 P{
% t7 I! E8 J5 \# ~$ Npublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
+ Z! O; Z3 Y8 J2 |        { m_lRefCount = 0; }
" p7 W5 b; X% Y3 A3 ]
7 b' C! s( N1 z9 h8 K8 b9 p( C) {
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
7 N3 w0 L  E; p9 T# K3 X# n! W   STDMETHODIMP_(ULONG) Release();

4 L1 L& C$ n3 R$ W
// implementation
( a/ l- v4 }. M' I0 u! q5 G9 {, Q. zprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
! @# g$ \8 [6 f' k( c        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);

8 G4 v( q1 L1 E2 v" }
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
  ^0 H3 l+ k# s% ^$ n

) O# ~$ n7 H  Y; S// Service Callback
1 l# g! F. i& E! B3 rclass CServiceCallback
        : public IUPnPServiceCallback
$ u! c. g" `0 ~  E' N' I9 |1 K{
7 O/ `4 k5 _: ]; G4 ]  Ipublic:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
8 L" l* c! e  `# _; u: p        { m_lRefCount = 0; }
6 b4 R, x3 I$ o- ~/ Y% u   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
$ T. L3 E: y! X1 A1 \2 D   STDMETHODIMP_(ULONG) Release();
$ l5 u4 j7 |& x% Z2 i2 m! W
' O" k; ~0 q" w6 {
4 T/ s7 e/ {) n" O6 @// implementation
private:
- P. }% j! T  R) Q9 U3 o        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


7 n; O- @# s2 _( Zprivate:
1 f% G' u% y9 x) D        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
6 I3 ~+ t) c) K$ Z; b* m};


) I! v& `9 I4 o- Y. A/////////////////////////////////////////////////
' H9 m, U5 W- p  ~
; e4 z% }  y# W" K
* l% i8 z3 c; H  `9 `  A0 J* s使用时只需要使用抽象类的接口。
' G& Y: @2 |. l. XCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
* T, B% F; Y7 L  h4 z4 m, DCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
% O- M: p; z' L9 {( _% gCUPnPImpl::DeletePorts删除端口映射.