UPnP

天云上人

/*uPnP.h*/

1. 
   & U2 a  Q8 a# Z7 T
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   " l  j$ Y0 u# \$ \4 y3 z- z$ w
5. 
   
6. typedef   unsigned   long   ulong;
   1 m, B8 D0 T* c: n( u
7. 
   4 M# A* Q6 b4 V
8. class   MyUPnP
   
9. {
   
10. public:
    " Q" W, n1 ^" [1 }
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
    ! k/ b; L8 `, F* |4 |+ K
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    3 R2 O, {$ x/ z
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    * U# Y0 j$ m. ]/ F
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    + j% B  Z" P4 A5 M* `, i1 ~
24. typedef   struct{
    5 ^$ Y9 h. F8 {/ b1 v
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    3 B# O' P. U; Z1 k$ h  e& Q
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    7 i# b9 ?, n  O% \( M2 `( j
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    % J: a( j% ?# {+ _$ ~7 ^
31. MyUPnP();
    
32. ~MyUPnP();
    ' v% M& {) o% V. ]* Y/ ?8 y! L& x
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
      T. i* V% g7 M  ^# s: ]
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    9 L) R, B! j0 H: {$ [: ]  A
40. WORD GetLocalIP();
    & e* t% q1 H# F
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    : n4 e. p' Y2 \- s9 C
44. void InitLocalIP();
    1 R4 P* N" k9 l3 o8 n% Q
45. void SetLastError(CString   error);
    7 J, @7 H  J: d: ?5 ?6 a
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    * l; c2 B  d* T4 B
52. 
    + I6 R1 i9 j9 l8 X
53. bool Search(int   version=1);
    
54. bool GetDescription();
    2 ^2 r, d5 T* P3 i7 }! Z; J6 |
55. CString GetProperty(const   CString&   name,   CString&   response);
    7 U- k4 D' |. P% q) Q, O
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    $ y1 r2 J. x$ Z7 D4 Y
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    ! D- p  P$ [; `$ e: E- F
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    & \3 i' O- w; s
61. CString m_name;
    " v- M3 }( ^9 ]0 L  n+ |0 X
62. CString m_description;
    . G# w2 J) k0 h
63. CString m_baseurl;
    " Y9 u8 b! E) k" H+ n/ W3 Q# E
64. CString m_controlurl;
    + \1 r8 D4 v5 I1 c* ?8 T, m
65. CString m_friendlyname;
    : Y# ?$ h4 a! z4 ]" ^5 L
66. CString m_modelname;
    
67. int m_version;
    ; l+ I" _" Z8 i% d; s. ?, C
68. 
    / `: }. G2 M7 y3 x
69. private:
    ) G3 j9 D8 E+ S7 N' \* n9 ~' `2 k
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    0 Y+ d8 ]# G" a* y9 W
71. 
    7 X' D4 w$ q+ l% T, H) ~
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    $ r  t0 C3 g! R' a/ t
75. 
    ! H) b7 K( ^/ H2 Y! F1 B2 \8 Z
76. bool isSearched;
    & V7 b, n) v* ^4 l' u( ~
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   : {+ ?' P8 P% ~) N0 `& O3 ^! m& c. m
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   2 X9 y# F( q8 s% `
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   % I5 _& ?( N  L$ l
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    - o2 H* s- s! h8 P. j3 z
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ! P" ]3 e5 U, A' }: ?# V
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    9 u' P5 @' E6 m4 w
15. 
    9 Q: h6 {; i7 c2 U
16. const   CString   getString(int   i)
    , S- V( u# H' `: J9 F! r
17. {
    
18. CString   s;
    / J4 S+ H/ B" h
19. 
    ) d0 `' T2 n; m$ ?# T5 r
20. s.Format(_T( "%d "),   i);
    ! P( H  _" s3 S& [9 q' B6 A/ ^
21. 
    
22. return   s;
    
23. }
    : v; n5 T, Y, C% q. T! C
24. 
    " Q8 @0 a7 |& y/ [, s0 H0 p2 i% |
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    3 l' P& |) e9 F% e& R, l# D
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    ! C6 ]+ t+ v" ^$ E; W6 r
28. }
    0 D8 X6 b7 a3 `* z# c
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    ! [( s" n8 D- J# ~! g
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    , y* ]" F2 P' ~6 N3 M& P
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    : w, `7 a1 ^3 R
36. {
    0 C6 p, v$ t" Y5 X3 k9 O4 s' ?
37. char   buffer[10240];
    4 c+ V# q7 x* t2 O$ D: a
38. 
    0 L6 h  W9 n& W; S) w
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    5 c* |* Q( F; I- q' P
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    ! q! e; [, W- r7 {: X+ n7 {5 P$ S
44. struct   sockaddr_in   sockaddr;
    ( D+ S4 f- r) q, e( H( H
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    , c0 x' A, {1 B/ D6 f0 `* `
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    - e: n7 E  d% F+ |& j+ C
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ! Y$ w$ l$ S0 O1 R2 n. j' z
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    8 |3 a- `; X" T* f% D3 b
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    0 N9 \" f! k4 ]$ l
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    " s; w* d4 `  p. b" t) O1 n
59. if   (!rlen)   return   false;
    
60. 
    * r2 a! t; B3 {: T& l& B9 D
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    3 c" e* d4 T6 A% p  W
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    , P- n0 F' Z+ |; A
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    4 f# ~- j$ z# P! }' X' P
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    
86. 
    % ?+ n7 K6 Y$ `
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    ; K3 j2 |6 k5 Q( t9 z- j
90. result.Delete(0,   pos);
    
91. 
    ' R" [! ?7 F) c. w. e
92. pos   =   0;
    ; E! T" m3 ]- A+ ^6 [0 v* [# g
93. status.Tokenize(_T( "   "),   pos);
    3 ?% ^& d" v+ r/ b
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    ! P6 \9 B8 A- b  T
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     ! d6 `0 }3 i0 t
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     4 Q' Y9 I- f7 N  f
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     ' \; M' M, c; \
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     / q# E/ R$ X' k9 I1 c# T1 ]6 U
110. 
     " h* ^: }/ [9 {' ?1 n$ a
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     " U. `6 u: {" f& |* n' x" v
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     1 q$ h2 ]8 \5 _  @2 K
119. }
       i) m8 I: M( s& S$ d( Z
120. 
     
121. MyUPnP::~MyUPnP()
     9 E* i& o7 G2 i* T% M
122. {
     $ K- N# k# h9 U. T7 a9 o/ p" D
123. UPNPNAT_MAPPING   search;
     # M" e; k) x) Q# E! U
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     , ?) s8 f0 q: M) H3 H* H8 l
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     ' N4 V) y7 `( L" X
128. }
     
129. 
     1 F9 x/ @+ p% f/ S/ z* P8 g5 f1 h
130. m_Mappings.RemoveAll();
     1 A# o7 c2 c! q" w+ ]$ V, U
131. }
     
132. 
     
133. 
     9 n# Z3 u  p, E! @) g4 W, k
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     + ]# d, A/ K( B1 v+ C
139. #define   NUMBEROFDEVICES 2
     ! C! E% \5 w6 [
140. CString   devices[][2]   =   {
     0 D6 G: o  z  `# S* V: R
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     - i9 D9 i$ E# G1 p3 N! k- P( |
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     $ a9 d, I) _0 K# E- c. o
147. u_long   lv   =   1;
     ) S: ]5 M/ w2 S0 n( {5 m  J1 x
148. ioctlsocket(s,   FIONBIO,   &lv);
     ( S7 `, T; y( x( A; }3 ?! y
149. 
     / O2 i4 T- ~9 ]) D
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;
     / P$ B# b- v9 ]$ P) ^1 b1 h+ M
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 "),
     1 v4 V; A4 g3 `6 k( {" \% i
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     3 X4 s$ Q* d; T* s
161. 
     . i% Y" l3 u" r( n& v: S6 r
162. Sleep(10);
     8 N, Z6 J5 B' V7 C' N9 r/ U- k5 w
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     0 H" a, T9 m! I: o
169. CString   response   =   CString(CStringA(buffer,   rlen));
     4 n  f! r6 c4 _, n! B0 H1 S
170. CString   result;
     9 J) M" j: |3 v
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     ) @* M# V) G/ H3 Y0 j% B
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     ( B0 c* A) ?5 [' C0 P
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     4 w  x0 B: p: I* J  y; |
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     ; r% U, r$ N' e6 [3 S
178. if   (line.IsEmpty())   return   false;
     * ?  Q2 x4 T- w" G& ?1 H2 ]* Y- i
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     7 U* @( E; M( T5 a* ~) {
181. if   (name   ==   _T( "LOCATION: "))   {
     7 v4 @) E  A+ f. n
182. line.Delete(0,   9);
     ) X8 Q# o/ u7 a+ P% M' ~
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     6 T: S0 N0 `9 E3 D- |1 E0 f- p
187. }
     ' l* n% L5 I- q6 [: D, O8 b& a/ g  Q
188. }
     
189. }
     
190. }
     0 b- Z' x5 B+ D' ~! Y) G
191. closesocket(s);
     ; v5 c3 r3 a4 F1 C% y
192. 
     % j7 n9 r: T5 H# c5 ~6 ?! O
193. return   false;
     2 C0 l" q7 e# P- W
194. }
     

复制代码

天云上人

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

$ x( a% G/ C$ I( [# P& y5 _
+ H# Y* W3 Z* |7 b, P: f///////////////////////////////////////////
% O, w; ?# ?: D8 f! r//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
6 ^' p& e1 |2 O( |

- |" j* y- Y& w5 B3 N7 `+ w% U#pragma once
#include <exception>
; p& @8 R- K3 [. `6 U
( q4 m  F8 v* V: f# x& t* B3 c
. ~) L3 v/ A4 b9 j/ K6 _! q  @/ V  enum TRISTATE{
  i1 C1 f0 x, n! `; G        TRIS_FALSE,
        TRIS_UNKNOWN,
9 u& _- F9 v: Z/ m2 h6 u& c        TRIS_TRUE
" S8 ]9 d2 I0 q  F};

5 H7 c6 C0 E# T) {) O8 n% n! y8 j7 F
" S; I) c5 Z4 @$ I7 U9 h8 I6 R, Henum UPNP_IMPLEMENTATION{
4 j3 q& Z4 G- J' u* P5 X4 r        UPNP_IMPL_WINDOWSERVICE = 0,
" s' y0 e& P( l  F        UPNP_IMPL_MINIUPNPLIB,
5 z) D5 i% h! H" B& r; ~        UPNP_IMPL_NONE /*last*/
};

4 V4 |5 i% X, a# w! G7 h

/ C. b/ r/ o+ ]0 @
* G+ L5 J% J' N! J5 N% ?class CUPnPImpl
# d( P. ]. q" `. _8 e$ Q$ g{
public:
; k# d6 L1 P# i0 K* o! K6 i        CUPnPImpl();
        virtual ~CUPnPImpl();
, ^( d2 J- c/ }8 d/ m5 S        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
                UPNP_FAILED,
' v0 a: p+ B" q3 h( |: ~                UPNP_TIMEOUT
1 f' ~% ^, `* K0 d$ `        };
0 b1 x8 @1 u) M1 W2 @. D

5 t0 j# z& F* L  w        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
) X/ B% ?6 f+ G! l& J8 s        virtual bool        CheckAndRefresh() = 0;
3 W+ o8 q3 T5 Q" ^        virtual void        StopAsyncFind() = 0;
0 Y: v7 q. d5 a2 {( L' A        virtual void        DeletePorts() = 0;
( i1 h: ]' n! i% l- q        virtual bool        IsReady() = 0;
5 D4 ^$ U4 [8 i* y/ W& U7 Y        virtual int                GetImplementationID() = 0;
* ~1 [! ~/ n4 `. E# w: D# J* ~       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

- i: R9 k, ?4 `
" b9 k0 E/ F9 P! c        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
; N1 p; O2 J/ ^        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
0 Y4 ~3 @* ]6 @1 i$ `        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
4 [1 k7 ~6 G! L& N        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


' Q, O, T7 H0 ~- h// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
; W" r/ C4 U; X# [: d$ F        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
7 }- {3 W; G- O* @+ r        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;


. F1 N, d6 l) m" r5 gprivate:
$ q' M2 S9 x' L- n2 A5 |        HWND        m_hResultMessageWindow;
6 f* W1 N5 E* W  ]) A8 v! U        UINT        m_nResultMessageID;


0 C) @+ o3 ~, @+ j};
* i- \# E9 G( r

// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
  H4 l3 U. U& I, p# ^8 r! ~& Bpublic:
% Q0 Q( E; c( ?6 V( U. m        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
; O8 ?0 F8 _! O2 \4 f- K        virtual void        StopAsyncFind()                                                                                        { }
0 q" \! f+ R9 i/ l        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
% h9 O6 o( Y1 D8 r: Z0 N        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

# u* k1 r* T1 M7 }1 I
/////////////////////////////////////
) [6 |) S; S1 }* I2 X  U//下面是使用windows操作系统自带的UPNP功能的子类
; d4 A/ k7 b* I2 D5 e
- M# ^& j# G( ^: r( n* h9 ]4 a
#pragma once
. K# r6 ~/ a9 Z8 a& h#pragma warning( disable: 4355 )
  s4 w6 s' w) j- g- m
8 c+ k0 `4 H" m9 N" x1 o5 `8 o
; w7 e) C8 V3 U0 ]2 Y% b#include "UPnPImpl.h"
: `0 o' q% ]9 a# Q# G7 ]- R1 m#include <upnp.h>
" o: P1 L+ |$ H3 W. Z+ U& X3 E3 z#include <iphlpapi.h>
- ~3 D* `* s0 m+ N3 Q#include <comdef.h>
#include <winsvc.h>
+ H: L, }. f, ?* N- e

#include <vector>
#include <exception>
#include <functional>

$ y; ?& s! ?& H0 b

% r4 t9 q+ d0 w
# d0 U8 i5 V& A8 k5 P. X: itypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
6 d$ ^: v6 C: d  V  d  B9 itypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
5 n( u3 ]& h! Itypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
6 q% a) S8 d' [$ A5 Etypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
' ^  Z' g4 |5 x; O
. X6 M2 c1 k3 o$ i' C' J
typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
" \! D' H* }" n: [: U; h);


typedef DWORD (WINAPI* TGetIpAddrTable) (
' i- `3 z+ C( A$ E2 J  PMIB_IPADDRTABLE pIpAddrTable,
0 e) T. _. @1 ]4 c  p# g" m, h  PULONG pdwSize,
  BOOL bOrder
);

1 G' i' v( b  U: a  ?" N8 V  `
7 v3 e7 ]0 c$ g% Ctypedef DWORD (WINAPI* TGetIfEntry) (
* t1 A: v; Y9 @0 F  PMIB_IFROW pIfRow
);
5 [& O; v6 ?% W3 m) b$ ^

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

8 u- r# K6 m7 H
& k* r# @4 g$ t2 gclass CUPnPImplWinServ: public CUPnPImpl
{
# b& X- K; y5 u# D+ k        friend class CDeviceFinderCallback;
1 N' z5 p* e8 u! `& t# Z2 P        friend class CServiceCallback;
. j: }$ B% R/ Q% M// Construction
public:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


& Y4 G: @1 w( H1 u5 j4 t        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
: i" C, i7 x- T- ]% L4 f. k# D' a        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
" i7 C) o, a' c/ F1 J% f# h

        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
7 k8 E2 g! t/ t* y( `
0 D* s9 g( d" W; s2 N; B
protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
2 i+ O- P7 P( v& c) m, z        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
) {2 O9 y" Z& C; _        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
9 Y( S/ h1 d, A& b  K        void        Init();
0 s* {, j, V$ O+ \) k

        inline bool IsAsyncFindRunning()
        {
. O" V- `4 Y' Z- I: n; K                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
# l0 m, G# x5 l) Z                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
$ L6 j' |0 f: P9 I( \& E+ S                        m_bAsyncFindRunning = false;
                }
                MSG msg;
, o1 P+ y4 _" c* [* r                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
; `5 _" l; d& ]" ~                {
$ V0 Z4 @/ p% A                        TranslateMessage( &msg );
" B& `: a4 M  G& m# N" V! T                        DispatchMessage( &msg );
; g1 b8 k7 `3 E" d1 L, l3 B! L$ T( q                }
8 A! O3 h2 M& X/ U                return m_bAsyncFindRunning;
4 E6 D! A& [, X. s% Z: R6 `( z        }
1 a- [  y) k$ I( d& N
) U& o& u. @. x0 ?
$ M* [! ?! t# j. H. V        TRISTATE                        m_bUPnPDeviceConnected;
) c& M( s& ]; D5 X( U4 ?' h

// Implementation
# |6 d4 e0 y& m, E        // API functions
; N  s9 R) B6 a& J        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
3 J* S" h& s+ f4 p, ]6 I        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
- t2 X6 H# y1 Z  G        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
9 r, h1 x% M3 Z        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
: c5 l( j4 v' l( Z0 h6 z6 ]        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
' B( G0 B: V. ^/ h- m% [        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


        TGetBestInterface                m_pfGetBestInterface;
- Q" r* G* A; E7 q        TGetIpAddrTable                        m_pfGetIpAddrTable;
9 p3 G: u2 H" g6 p' [        TGetIfEntry                                m_pfGetIfEntry;
1 l* Y: D% U# n6 H, B2 s
( V( u. b; Y# a$ w8 ]& b( J) x
  U# R' S4 ]" |; |/ b2 p) p9 R        static FinderPointer CreateFinderInstance();
6 {$ e  z6 }( @  [        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
* r* ]% E$ W; f# u: I- N! {" x- {- X                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
, O) ^8 ?0 E8 Y# j/ Q- M3 w                result_type operator()(argument_type device) const
, l+ B* o- b6 [4 Y3 L8 O                {
                        CComBSTR deviceName;
, Q9 i4 X: ?8 \( x! O( S0 u                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
; {- O  M1 g1 w( ~% d
0 m0 D& f3 ?8 X# H; L/ _# r
& c. H5 i; v1 K- A0 }                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
# h; t& K2 V7 ~1 R
3 ^3 u: e# O( [# H
. a( W: f6 {5 Q  k' ?5 F$ [) A; \                        return wcscmp( deviceName.m_str, m_udn ) == 0;
5 K7 m( N1 |8 T7 _' y                }
                CComBSTR m_udn;
        };
1 ?) J) K& `+ T- l# \% l3 X       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
; v. J- ?$ ^% y3 U; D$ ]% t& F9 p# e1 b        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
% E- p% f* B1 G6 w7 ~. c7 w
, @# x7 W3 M' G; P9 f, D0 I- ]
2 e4 J+ m5 H. K' Q) Z+ F8 Z% B        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
9 i7 q6 A% s: n1 B        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
% Y/ A9 v- B1 y! O        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);

/ `- U# n5 ]5 D
// Private members
  f6 y1 [2 P$ C' I0 [' Q8 lprivate:
3 q: a' J. }4 Z8 E+ G, m" W9 B        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
3 S' T8 k$ D. f; q% x" V" X        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
# H( u" @9 S2 o  h' v" P) `% O( _

        LONG        m_nAsyncFindHandle;
; r% O7 d5 I8 p6 d0 f1 x# k        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
6 @& M' w. F! U; v$ `5 \7 a        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
( |- C3 D9 A& N0 s/ T% n8 X        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
% \+ p1 D1 x0 u; n# a1 Y" k  }        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
8 q& q! a) U7 x% {) Q; y. g( j        bool        m_bSecondTry;
1 g6 W' ^& J* y: I7 k, S        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
# `- M4 U- Q6 _3 Y

};
4 _+ [* w, `7 x) ?- Z% O% @* @' a
3 b5 L8 c6 M7 q+ @  _1 X0 B+ `- g( w
// DeviceFinder Callback
  L9 r" G- b+ p: ]4 T2 ^class CDeviceFinderCallback
. R4 p/ I6 Q$ z- P7 U        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
& z* R5 c$ C% M* M7 R  ^- g                : m_instance( instance )
        { m_lRefCount = 0; }
0 {& {+ a1 y1 S/ i0 u
- R5 g9 d- u. c
4 p) m! y/ }- b" v  q   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
  ]+ \; M  i! C' c   STDMETHODIMP_(ULONG) AddRef();
8 _# ]; i9 d$ l2 ~! `/ Q- M6 Y6 t   STDMETHODIMP_(ULONG) Release();
3 ~1 \! ?0 {( n! c
4 @8 r. s8 P, D/ t
& {; E9 g$ {$ }( z// implementation
1 f8 @, H: O1 V3 Lprivate:
( P, h7 {/ u2 a9 p8 F0 ]        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
1 T. C) T, N6 {8 q        HRESULT __stdcall SearchComplete(LONG nFindData);


" f3 l& A) P3 v0 Tprivate:
% A$ J  }2 n$ F) J0 h6 F        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
4 @- C- a1 S0 B

( f$ p$ J5 f3 h6 D7 z0 W// Service Callback
  r2 B6 ]9 U: p& o; P/ m5 c0 Mclass CServiceCallback
8 {1 G! l. Y9 h8 D' I; u3 A! l        : public IUPnPServiceCallback
4 D) X& p1 R0 l6 J9 O8 S. Q{
public:
& z6 {$ F- p" {/ w7 D        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
9 k' o- b9 D* X% n) e' e   
# v, x2 F' s4 Z' i   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

6 Z3 t: k# T) f( X* }  |
// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

$ w( Q& `+ x2 h# @3 i) U
& D: ^/ e6 g% Xprivate:
        CUPnPImplWinServ& m_instance;
" F9 s& r- R- A7 }+ u1 U! v        LONG m_lRefCount;
; W  [, d! f6 }1 \8 R};
% u4 h2 i  r% H6 |! L0 _6 i

9 Y' j& z( B8 `+ ]; X# [/////////////////////////////////////////////////
. C& D0 ]6 a4 I+ t' Q& ?9 F
, A: {9 q$ x1 f/ r1 v4 k
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
- q9 N# C8 |3 wCUPnPImpl::StopAsyncFind停止设备查找.
# g) f  M' ]( z! g* XCUPnPImpl::DeletePorts删除端口映射.