UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   1 o4 S3 c! ]- [# R
4. #pragma   once
   " w, K) w/ V. {4 k+ R5 k2 ?
5. 
   
6. typedef   unsigned   long   ulong;
   , n) G: p3 H% J4 U
7. 
   ! `. f+ W% A2 e. H
8. class   MyUPnP
   - \7 |& B4 w8 G
9. {
   
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    & G, }) ]2 _7 \
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    7 y6 p5 T$ h: r
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    0 u6 U) {7 \  S  D
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
    ' z$ m- D; d* P8 |
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    5 Q% @  ^* u9 n9 U" C) k/ ^: ~5 G
22. }   UPNPNAT_PROTOCOL;
    % Y; r( ^( K9 I3 O3 Z
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    1 _2 J% V2 |* k" r5 C* z8 t$ l* K
26. WORD   externalPort; //   Port   mapping   external   port
    # _3 T$ r5 @! ?  x7 `
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    7 R3 A- K; o9 V$ H& W* l2 s4 g4 @; H
30. 
    " r( S! b6 P0 D6 W! \; ?. i
31. MyUPnP();
    : ]: S- U2 E% v9 K! f+ d, ~8 {9 w; T- @
32. ~MyUPnP();
    
33. 
    : I# H6 F% G0 S' I) H2 A
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    * \6 y6 [3 S: n# p
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    / t5 R/ D6 v1 b* b* I. n( ?) a
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    , Z7 m/ `! Y( u/ u; p
42. 
    : k6 G% X" d( j' }0 N
43. protected:
    4 x% M4 A) x; B
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    4 H3 |% ?0 E% m
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    % n  l1 m: Y1 i+ i' j% `6 }# j+ ?  Y
49. bool   deletePortmap(int   eport,   const   CString&   type);
    8 ]# ]4 Q0 b% L
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    " E: w7 v$ X1 T
52. 
    4 w# N4 j5 z- R9 [& j
53. bool Search(int   version=1);
    
54. bool GetDescription();
    6 q; j$ M' E" ?( }( ~
55. CString GetProperty(const   CString&   name,   CString&   response);
    4 b: p5 S6 f; |- J9 @- T# \- ?! i
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);
    5 D, T4 l7 S# E) V
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    ) U  o. Q/ K; z! T+ _
65. CString m_friendlyname;
    + k' X2 ]4 }! ?% X9 c% v, r
66. CString m_modelname;
    
67. int m_version;
    ( U3 o- t6 o# F
68. 
    / y! P5 ^- t$ o: l: e
69. private:
    ) E1 G$ n& m& r5 J
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    & O/ e  E8 V8 V% O( z( j
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    * B$ d" n8 M) x+ p, o" ~6 e
75. 
    
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   3 b0 w4 k9 c4 i3 P8 v
3. 
   
4. #include   "upnp.h "
   ' p2 G! U8 F! C' j
5. 
   3 I( p+ K2 @* `- b6 |
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   . V. o+ n9 F( C, f
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    3 d( I$ {5 _1 P- e; s3 N
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    ; }) g4 j; p8 o  x, @% \' {$ b
19. 
    9 j9 }$ c. x5 s: s( |. Z
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    4 H4 E0 B) P+ i8 s2 D, c  t& {* r/ j
28. }
    
29. 
      z0 T8 s3 R* [) [/ c. M6 h, G
30. const   CString   GetArgString(const   CString&   name,   int   value)
    . [; a( s" d' e  \
31. {
    % V$ e2 i4 b8 @5 T) a  n7 D
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    5 R% Y* Z$ i2 Y7 p- c3 @
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    ; ?- [  }4 i5 R4 @) X2 q- I' r
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    , }7 W; i+ n( [$ l# l/ K" v2 G, Y6 e; W& o
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    ! u: l1 a# P( Q' A5 z0 P: f4 w
43. uint32   ip   =   inet_addr(CStringA(addr));
    ! x) f! ?2 v: Y; |+ m
44. struct   sockaddr_in   sockaddr;
    % X2 q8 Y) Z* ]& Q
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    % A$ g. L! V  q5 b8 o- ]! q% R3 K
46. sockaddr.sin_family   =   AF_INET;
    ! \; O4 |$ X; k  N6 x6 m. o
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    * l0 e! B6 R7 M/ f/ S/ g! i
50. u_long   lv   =   1;
    1 |/ C8 K& x0 I. s' P* @& {7 ^% v
51. ioctlsocket(s,   FIONBIO,   &lv);
      l0 B, s' e  k+ O0 O  J7 ^% l% G
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    2 T+ A2 e* Z7 ?) e7 N
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    ! _0 |+ K" p- a" V  ~7 V  W
55. Sleep(100);
    % z# v! H* G4 Q- M
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
      v# F2 p% h0 h1 j* x$ D
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    6 ]7 E! Q  L- @: {" v: h
59. if   (!rlen)   return   false;
    
60. 
    5 ^. ]# l$ c- O% k
61. response   =   CString(CStringA(buffer,   rlen));
    $ |1 I) J& P. T* w/ }8 c  o
62. 
    
63. return   true;
    
64. }
    - b* {4 Y6 n( s- ~; y) r8 l
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    - c* e* ?" Y# c$ U5 ?! Y* ^( S
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    9 a" b+ `# q0 l- Q+ X) y; o% ]
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    , h7 G! R3 P" g8 j% ]0 U! W
76. sockaddr.sin_family   =   AF_INET;
    6 z; T& i! D8 W9 J5 @- X1 O
77. sockaddr.sin_port   =   htons(port);
      z$ ~8 R( E. u" V
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    + n: K( p/ q9 t
79. 
    . a; P/ Z% I$ I3 k* Q4 k! H
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    4 |7 @/ O  Z; ?6 _! t; u
85. int   pos   =   0;
    
86. 
    ) \  \; ^9 j( }3 v0 r: ]: _4 W
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    ' t" [7 o3 @3 c& s, j
88. 
    . H$ h6 r# o( D0 C$ T( k5 _
89. result   =   response;
    
90. result.Delete(0,   pos);
    ) J) {* C8 N* W0 l7 x
91. 
    
92. pos   =   0;
    + ?2 K1 N& H9 R2 N7 w/ |
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    ; J, }4 ?& A( |" S" a- n- |0 x
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
      @4 I3 M/ ~, A" K' `% k9 D0 ~
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    - M3 j* p; d' y9 O0 ]+ \
100. {
     + l; }$ y" f# j; Z. H$ e9 K( n6 g
101. CString   startTag   =   ' < '   +   name   +   '> ';
     5 \; Y; l4 O' K- ^% K
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     * Q4 X- n3 u8 S% Z& C( V. n! c
103. CString   property;
     1 _" V) }) T  m  A
104. 
     
105. int   posStart   =   all.Find(startTag);
     0 W. w7 o7 k' h8 E! e' G- R, `
106. if   (posStart <0)   return   CString();
     . I5 e) y# C4 q' c* b
107. 
     2 s  H% W2 }. L8 }
108. int   posEnd   =   all.Find(endTag,   posStart);
     1 I" t, W$ i/ }, z
109. if   (posStart> =posEnd)   return   CString();
     0 M$ n- l( F1 X  s7 T- c
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     * R5 u) _1 W" D
114. MyUPnP::MyUPnP()
     7 m" N1 J1 y. ]% g) c0 N
115. :   m_version(1)
     
116. {
     $ [. ~  [  V' f7 W
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     : \0 s. ^; q( k: Z: R+ _$ N  u
119. }
     , G7 h1 [' c4 C7 b
120. 
     
121. MyUPnP::~MyUPnP()
     ( w2 i2 q! B. i/ g# q/ B! ?5 k
122. {
     
123. UPNPNAT_MAPPING   search;
     $ R4 @. q1 O6 r0 J2 ]
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     + D% a: X9 n. l6 h: B( y
125. while(pos){
     " D4 g# h  A3 t0 Z8 j) v+ n% j
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     $ i. m2 L8 c9 K/ t, ~
129. 
     
130. m_Mappings.RemoveAll();
     - _5 ?( G# a( r$ y0 e+ i
131. }
     % Y/ h$ r9 O1 b: A$ c
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     8 O# @  e  X. y- I0 S3 ?( G  _
141. {UPNPPORTMAP1,   _T( "service ")},
     2 ?- O. u# d) i0 L1 q$ n1 s+ V
142. {UPNPPORTMAP0,   _T( "service ")},
     - q  m" R7 z! M/ i. l3 G
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     . \2 q9 E, b7 U  T& `
144. };
       [. w7 F) w$ u0 `' f
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     9 G, l+ o+ `. n/ F9 Y& A
147. u_long   lv   =   1;
     * X9 m! E' K1 u) s2 o
148. ioctlsocket(s,   FIONBIO,   &lv);
     + v9 @9 h/ A, w' @2 ~5 t
149. 
     
150. int   rlen   =   0;
     " j" N" U# z- ~& B7 b
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     3 H& c+ I! V( t: {' T9 {$ a
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     + Q! q8 |+ B$ Z' p5 F( r
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     8 U* Q& A3 ]( y# o
155. CString   request;
     ' E) x, i8 V7 M$ ~( O0 |
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     , A5 n- G) {$ Y2 d2 h9 B
159. }
     
160. }
     , C6 L& U1 v! A. c# l9 H& ]8 g
161. 
     
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     , F* ]2 u! b" q, ^- ^: P" g/ P
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     0 h, F* S% @; k9 S! C
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     1 |% |. [, E& A9 W8 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);
     3 C# s' v" T9 M2 Z# L
175. if   (result.Find(m_name)   > =   0)   {
     6 O) ~6 r2 j  Y/ w$ P
176. for   (int   pos   =   0;;)   {
     / P2 c$ R) U; w2 B' o' T
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     # i- j3 o3 l0 |
180. name.MakeUpper();
     - K2 W( F! s( w+ A: G" B
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     ; q  l  K7 a/ \& D6 l
186. }
     
187. }
     # c9 ~( d! X2 Y3 _# e
188. }
     
189. }
     
190. }
     
191. closesocket(s);
     
192. 
       m0 ~) ^" M' A6 C& V7 z
193. return   false;
     ( F. V, M" _8 p/ o3 o3 s
194. }
     ) S3 d0 S# \: p8 E  q, L9 r( @

复制代码

天云上人

以下有关upnp的接口来自emule，
+ L$ l, k: }6 |4 M
. a, U; g4 g' w2 Q4 I9 j( |
0 t! h/ U4 ?1 L+ p///////////////////////////////////////////
; y' Y0 `$ m( ~* X! E  a+ V/ @//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
' d' X1 L9 G9 G9 q3 j% ?
5 `+ ?# J) z( l8 P
' @1 e) {4 m/ g" ~5 f' u#pragma once
  C/ E2 Z2 V' S& n, E#include <exception>
! y7 n0 ?8 k( H% [
# d3 }& S1 R$ c6 d$ o8 ~
  enum TRISTATE{
( m; F6 R7 h# k& h        TRIS_FALSE,
        TRIS_UNKNOWN,
7 `4 F9 Z2 [: s6 e8 E/ j        TRIS_TRUE
) n2 ~. f7 s4 k# C. g9 z' U};

1 R3 S& G" g8 q% _: s; F( G, A
  F0 Z0 Z- O2 Q  w8 J3 Eenum UPNP_IMPLEMENTATION{
5 q8 p2 {9 z  [) A2 a* L& |! R5 b        UPNP_IMPL_WINDOWSERVICE = 0,
+ e4 Y% C# B" }        UPNP_IMPL_MINIUPNPLIB,
, x& [, c1 N6 ^        UPNP_IMPL_NONE /*last*/
};


( k! P6 B# R3 J: K

class CUPnPImpl
4 v5 M" U5 y3 P8 h2 n{
$ Q6 e& z) r2 N, r- ~7 epublic:
        CUPnPImpl();
+ N# V9 h; ]- V' _/ b        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
7 B* f' K" N( B% C" F, Q6 z                UPNP_OK,
+ x. h. R3 D1 F7 J4 N5 |' _                UPNP_FAILED,
                UPNP_TIMEOUT
        };

7 o; ^; [4 |' n* g# |6 g4 z5 w
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
5 h: h, I% I3 Z1 r3 H  p' ~6 e        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
3 Z$ _6 s: n: A0 e- ~        virtual void        DeletePorts() = 0;
5 W- V) K  Y6 O2 _# n) m7 x' P        virtual bool        IsReady() = 0;
$ v' ]7 y' b: I; u' g, X) a        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
8 b( h3 B& z/ m        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
- f& u! M: V& X1 M# b" W        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
8 A5 c& x3 Q) B$ ?2 }# P3 {- i

// Implementation
% O$ p+ F( \- H6 `* }5 uprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
& Y, }# {9 K8 w5 K9 z5 w  N        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
7 O  U" H2 {3 Y6 o: @" K2 ^

& O8 V! z6 a  H! D' k+ s6 zprivate:
        HWND        m_hResultMessageWindow;
" w" _" V9 Z9 T7 G2 H+ _        UINT        m_nResultMessageID;
% J# V* ?" X# n! X) k

3 a" c2 s& g  c! H! ?9 M};

& U: M5 O/ k# {  ?4 a) y. ~: R
// Dummy Implementation to be used when no other implementation is available
$ l* H$ ~  F' N8 {5 ~0 Aclass CUPnPImplNone: public CUPnPImpl
{
0 T& J3 e3 v0 v- c" u, lpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
; H# n- O! ?1 {5 Y) C        virtual void        DeletePorts()                                                                                        { }
$ @: t9 K8 X3 ]        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
7 {" ~& h' f) }! q6 P( o! u};


9 n$ E  {# K+ l& ~# V8 d" l$ h! R/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
3 o8 I( u$ g9 Q1 s1 z9 r: \
0 Q( d& C7 g& M7 C$ R0 k
( `& l0 G0 o; J8 o  B  Z#pragma once
# _. t8 c& L! ]. a#pragma warning( disable: 4355 )
* ~+ m) Q" r+ k0 P: x
& |) \8 G+ ^* |0 J9 O5 e* R( b2 Z
#include "UPnPImpl.h"
( |8 f; {  E# y( C! l7 h9 T2 n' Q#include <upnp.h>
#include <iphlpapi.h>
* o: O, ?  O% e7 y, B5 q/ v9 W3 U#include <comdef.h>
6 y" V$ s$ D8 ?. J- F4 o8 e#include <winsvc.h>


#include <vector>
* V5 O% \3 _. ^5 D$ w#include <exception>
#include <functional>




typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
- t# o: C: y) Q2 X" _9 @- l5 Ptypedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
- M, t8 u, s; M& `9 g9 Wtypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
6 T& I5 ?) _0 u6 c$ Y$ m" Y& n

4 {4 Z2 U4 f# m9 J3 W7 D6 W% I) Otypedef DWORD (WINAPI* TGetBestInterface) (
/ _' [- ^1 d+ M! t* X: c+ \7 h  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);


" L/ E  c& e- I- h: s7 btypedef DWORD (WINAPI* TGetIpAddrTable) (
) g! J) F8 e( X2 _5 c" Q) h) O7 S  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
' o+ `$ Q. }8 V9 Q) _7 U, f' ~);
! F8 L& J5 U4 m4 Q

! C3 v- f" D) w% c3 Utypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
8 c- A6 C9 v+ t1 V* J* E* |

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

! \0 @* }, K3 p8 e
class CUPnPImplWinServ: public CUPnPImpl
8 \$ N: u8 z4 ?# `: N0 E{
        friend class CDeviceFinderCallback;
; I- H' U3 K+ J( T5 [; x        friend class CServiceCallback;
/ k, U5 G) B' Y; x) O. D! L// Construction
& O" S: c% T0 }1 I( V/ ]8 i, G+ hpublic:
, G. G7 [* d1 [  `. a        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
. Z6 W2 a2 J, l

& i5 I5 k' Y( w        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
' i" O: A6 }2 S& _3 l5 j: c+ ~4 }        virtual void        StopAsyncFind();
" G% j# r1 o  z1 m9 d        virtual void        DeletePorts();
# }% r; p- Y0 B1 S7 g/ h) R: A        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
. v, F0 ~2 e4 C, C4 ~& V
! V8 r* X4 m& R) ~$ P0 i+ V( ~
9 b% N& o- \" S# u( P        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
* }5 }/ f6 y2 v( {  j; @        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
  B" x, D  t# e9 |4 X( l* q        virtual bool        CheckAndRefresh()                                                                                { return false; };
6 h+ C* c$ Y) [2 Q, l

protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
& z" E" Y/ y4 m        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();

, d# L3 I0 _2 Q4 h7 i2 |' l
        inline bool IsAsyncFindRunning()
        {
  x/ y6 @' [$ a5 r" z: L& K( P                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
! r3 M3 B+ ~3 O! [                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
* B# N/ a% P) l4 T; ?                MSG msg;
+ D" q" G) o5 J5 g! R                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
! {3 n1 M! N: H" B: ?                {
7 K. \, L4 G& g5 |7 i/ H' H4 Z, ~                        TranslateMessage( &msg );
$ I2 j7 R. w8 c- h6 ]" C0 Q                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
7 S1 v& q2 t. y        }
# k8 Q% j9 ^0 b. ?  `( j
( N7 {/ {; u$ a4 [2 ?5 q
* f7 _- u, Q- [& W* `/ L        TRISTATE                        m_bUPnPDeviceConnected;

  A* M  J$ q4 S. {
( ~  Y; X1 L: p/ E; o4 n// Implementation
6 d+ E" j4 z8 J1 \        // API functions
( ^0 u* ?+ k  `4 i; L. p% i" ?% E5 ^        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
5 i; a* r* w/ i/ w/ Z1 `( _1 K1 j        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
2 j# f: \" k; T! P1 b        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
' A- L  c7 Q; ?3 u3 ]7 r        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

0 t: H9 O# k4 I5 p$ g4 P+ K
        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
$ q( n4 v" o9 m+ U$ {        TGetIfEntry                                m_pfGetIfEntry;

9 ^: Q) Y# c6 ?1 t+ |! \
        static FinderPointer CreateFinderInstance();
( D4 P" _$ r, H  O9 u' j        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
6 ]/ c9 A& U. E# l+ e                result_type operator()(argument_type device) const
                {
( e, _4 A' z6 z+ P  T! p/ L                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
( Q9 o$ u/ s) a, q

                        if ( FAILED( hr ) )
* Z8 C  P+ L8 D; }+ E0 ~1 x                                return UPnPMessage( hr ), false;

6 S4 V$ V% ~+ {9 K# \* f
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
+ D! w! c1 _4 R8 q* C                }
                CComBSTR m_udn;
        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
% Y* M/ h2 E( b$ `* V3 ~        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
- G7 w2 _3 p. x' m/ E5 R        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
7 X% U: |- h/ A: a+ {) L        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
  u/ U* B* ?' k. ?* L) v7 z        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
0 k7 T0 B$ |, G4 r
7 m# |/ M# b8 b. ^3 w" R0 q
6 V8 s0 @! Q2 [" |2 X# a        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
  `. f, A& w3 L0 q9 M        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
/ P  d* j3 N% \$ `# [! F        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
+ D* x" ]8 _/ ?# C3 U        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
  _! V6 K/ J  U        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
: {. O- m' P' L+ J$ B% b        CString        GetLocalRoutableIP(ServicePointer pService);

- }! t* {% E' y% g+ P
// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
  f' q2 ]# ~; N$ v- g        std::vector< ServicePointer > m_pServices;
. j  w  w  Y4 z0 n% y        FinderPointer                        m_pDeviceFinder;
$ |( D) c' n/ u        DeviceFinderCallback        m_pDeviceFinderCallback;
' f. C! ~# g0 ~: |8 ]4 U0 F, v        ServiceCallback                        m_pServiceCallback;

: B4 q% W4 Y6 K3 T+ w) ]5 n  q
  O! U. E0 W' c4 d. I$ V1 i- V: g( g        LONG        m_nAsyncFindHandle;
/ J# O1 J: r7 w/ {1 @        bool        m_bCOM;
# {# ?1 @+ Q4 C, V7 [3 ?2 Y) h        bool        m_bPortIsFree;
        CString m_sLocalIP;
; ~' I+ \4 V0 X        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
+ V3 j( z) F. h( L& [        bool        m_bInited;
; {( g5 A5 U& i( E# \- c7 j        bool        m_bAsyncFindRunning;
, }5 Z3 ]! Q1 P1 ^  b        HMODULE m_hADVAPI32_DLL;
) R2 q8 T3 F4 L& v( @$ ]" f        HMODULE        m_hIPHLPAPI_DLL;
( _7 n7 e9 I+ \5 n& y: {* z/ f1 t  C        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
4 x4 ~+ L8 i! H# `        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
5 ]1 A  D' D$ a4 @1 ?
2 U. u) X% K; H, s% O% J  X$ z
- I7 S- z" f, t8 l5 m- w* I" a" P$ k};
% q6 z2 Z  l/ d9 B1 x
* ^( T! w+ I, \3 h1 D5 [, C3 w  h6 K/ |
! B) x: N/ l! g) a// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
5 k4 |9 t7 @1 A& h9 Xpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }


, h! G9 c% l( t0 b   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
& c# I4 J4 l! W! ]: B   STDMETHODIMP_(ULONG) AddRef();
* T2 L- P0 M# n& Q" s   STDMETHODIMP_(ULONG) Release();
$ g) B. t2 L  Z8 n, X

// implementation
private:
/ N( I' U5 u. H$ h8 Q% D        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
& k- }; N2 m! n0 w& \$ H        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
' F7 d# h4 [8 Q% X4 [        HRESULT __stdcall SearchComplete(LONG nFindData);
# M8 g* E) i5 I
. ~6 X  a+ x9 b3 \
private:
7 R! q( Y. T  C0 u/ |9 w; i        CUPnPImplWinServ& m_instance;
3 R5 [2 c+ J, [$ v, x1 b        LONG m_lRefCount;
};
. y' H6 L, ?) \$ E: U6 j$ W, w

2 l6 p4 b6 V) ~0 r. T  c5 Q// Service Callback
class CServiceCallback
8 v4 S8 U+ Z# W3 G" o" F/ T        : public IUPnPServiceCallback
7 w% Z6 t/ j  |7 y6 ?/ i. \{
0 f7 l! v+ w* z6 `7 B+ c7 z3 Tpublic:
1 E* x+ s  ?: a% K: O: a        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
+ h  u3 ]" R7 M# _        { m_lRefCount = 0; }
   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
4 G- |" W3 B( y+ S& R  s, C- }) @   STDMETHODIMP_(ULONG) Release();

- @9 ^; H: ]/ O' m& g
// implementation
! V* T( {1 u3 Z& H$ D+ [9 Eprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
2 ?* T- h/ Y+ W        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

4 K# h4 B: d! J* J$ S
6 Y& P7 j* Y0 N6 k; hprivate:
( Y' }+ x3 N) C& h        CUPnPImplWinServ& m_instance;
9 d0 ?) v  z. p6 e+ [5 L4 \        LONG m_lRefCount;
0 U4 [& R+ c. U( G6 @};
6 Q: T# R  e( a3 I# \

/////////////////////////////////////////////////
" q. k( t! y  D# v/ Y

/ P1 g% Y' `3 G; Z. [$ z+ I/ \使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
. t; l8 h" M, |6 C: A; \' NCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
% m9 u. k; v! n/ H1 T, S9 {CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.