UPnP

天云上人

/*uPnP.h*/

1. 
   4 @1 h# G# a( \2 C7 ?
2. #ifndef   MYUPNP_H_
   , V! d, |% c0 E$ z
3. 
   
4. #pragma   once
   6 k4 ~( l. x" {% K( p* J
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   ) P) s+ P+ T" b" U. v+ j6 f
8. class   MyUPnP
   5 e  ^8 n) h+ ?3 F
9. {
   , m7 e+ v1 r* J7 @9 J
10. public:
    8 U( A0 T, U2 R6 J% I' B
11. typedef   enum{
    - x1 l# q( f2 @  X
12. UNAT_OK, //   Successfull
    1 k  g- n6 A5 ?4 A! X; Q' U
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
    " p  ~  a- k# ^) H* z
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    9 ^( T8 r# @7 T+ \! H* B6 x+ |* M& r7 |
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    : t9 m- T7 f% e5 D" `& S
17. }   UPNPNAT_RETURN;
    
18. 
    1 M' m# j; E$ |* s" i+ a
19. typedef   enum{
    % g  d9 W4 ^2 B3 D* F+ v
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    7 @: b- V% H& ?! ~  H' `$ y
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    % l3 b8 R$ Q+ G& \( h6 X, r% m
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    ! a: U! @& w# U7 n$ P( S( H
28. CString   description; //   Port   mapping   description
    1 A2 x7 Q- W. R' ?: f
29. }   UPNPNAT_MAPPING;
    : A9 r: C4 D+ L* h9 ^0 ?
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    / c6 w/ N/ R% `
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    # u8 `7 l7 D1 T! o
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    " l, E# N1 P/ R' j& B5 _* y# G
36. void   clearNATPortMapping();
    / j  v! U4 ?9 L6 C) T. a
37. 
    ; P& W) v' q/ E, h& l8 P
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    5 w$ Q& g, Z  ?% q% v- U
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    8 ?" i$ o% `$ t4 O; \
44. void InitLocalIP();
      K! [& j1 t8 N* o" e2 V
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    . v4 y/ G9 f! L: o
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    * D: U/ \& i: k: @
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);
    % i" X+ H' J9 x3 D+ d
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    2 A. c$ j) s2 y/ ?% e
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    # b  t6 a9 u4 _' z
60. CString m_devicename;
    4 ?- L+ l  k# y+ A& w- g
61. CString m_name;
    + r. z" m* c% S! E. u! V7 ^4 Q) |
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    & z- {4 o- h: n8 r+ i2 F) y5 }2 \
66. CString m_modelname;
    ( u, ^1 R$ Z, w
67. int m_version;
    
68. 
    3 q9 p( |' [+ h" W
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    + ^: T: f& x9 f0 ~  i$ g" P5 D
73. CString m_slastError;
    . i& |) W  H/ f
74. WORD m_uLocalIP;
    % w/ s" r$ K" E2 D( y; U2 m
75. 
    ( M( V  t$ h. u& ^
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   . B/ T* A$ K3 r9 _
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   : d/ B" ^. D2 s8 L  O
5. 
   1 M) P% t- G# S2 _) v0 |
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   + R5 @! ]  x. Y% j& k. F" M
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   % [- f. g, |) ]! h5 U& e% O
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    6 h' Z( a- }/ g7 ]" F" g9 ]
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    : Y& H5 q) n5 P& I2 {1 J# }
15. 
    
16. const   CString   getString(int   i)
    9 ^" l) W3 N; ~, ]2 X" v, n
17. {
    8 I! {& _( J3 W  }& P
18. CString   s;
    
19. 
    7 g: }0 i1 w" y, v( e! H
20. s.Format(_T( "%d "),   i);
    1 M4 z. p4 G3 p" Q
21. 
    ) y2 u  X6 L8 b) d9 I
22. return   s;
    8 ^. Z8 X" U/ Z4 W) ]& k
23. }
    
24. 
    1 ~( X  W$ h0 S9 a
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    8 e4 P: j! C% I
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    % S. u2 l1 D9 U" k/ }
28. }
    
29. 
    % \: R4 |) @9 @9 z% S8 X
30. const   CString   GetArgString(const   CString&   name,   int   value)
    % m/ q* D8 x( g1 w
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    1 D) x* P- Q7 l: Q- D* X, y( \
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    3 G: ?2 M- p$ r! a) U6 X
36. {
    
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    1 ~' S  d% f. z( _) f& B
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    4 K. j1 Z; C2 E+ ?
46. sockaddr.sin_family   =   AF_INET;
    9 s& T# B! L: F) W  _% s
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ) R1 B* L1 o$ ~; V
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    # _, e' a7 s0 m6 U6 r- V
53. Sleep(20);
    , H3 W- Y& A9 L- e3 f$ [7 K/ U
54. int   n   =   send(s,   buffer,   length,   0);
    4 e* e2 B( Q4 s: h( A  h7 W
55. Sleep(100);
    : b) h+ y% v% T0 I8 _
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    - v/ {5 w* R1 n- ^* m( o
57. closesocket(s);
    1 \- d; c# j4 l" P; u0 t' A
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    & R7 T3 q' |* y" I9 ~" x, e9 }, G% C/ ]
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    , J" `9 P( j2 s, q, x: B
62. 
    
63. return   true;
    
64. }
    
65. 
    6 \! [, s7 ~& v( v% v8 R" C, s4 D2 C
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    . n7 f* t0 v  L# j( O
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    . J& Z% ?  r1 I* n4 R5 I; Z
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    $ S4 y* l# Q' z: O
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    4 M& M$ |- q8 Q7 e& w3 U" O
82. 
    , A( C6 i8 X7 K1 }( E$ U: }
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    / V  `) J* ]+ t2 y1 x3 a! ^  E
84. {
    
85. int   pos   =   0;
    ' ?! L: V! d  \8 W0 g) F
86. 
    4 }) D( I/ w2 L1 y/ ~
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    8 |( R2 z( {  D. v( {' n
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    2 M- n5 n% S* Y% {
96. return   true;
    
97. }
    
98. 
      b' k7 n6 R; K( m0 l# A' a7 W
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    4 g7 l5 c% x5 A0 b5 D+ [" i
100. {
     4 {' G, ]$ }5 Z, o: P
101. CString   startTag   =   ' < '   +   name   +   '> ';
     ( O8 G* B1 z% I
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     2 e( x$ x# b8 H4 B! R2 y! B$ }
103. CString   property;
     / R0 t$ F; h3 {$ k
104. 
     ' F' x* T0 H, a# D( Q# N% T
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     * a4 T& U4 I, g( z0 o1 F
108. int   posEnd   =   all.Find(endTag,   posStart);
     ( a8 D3 H% u9 Y4 a1 ~- V  `
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     2 d2 ~0 ^4 H) z" ]
112. }
     , r- m9 u0 ~8 ~% G4 Y
113. 
     
114. MyUPnP::MyUPnP()
     / t- j, ?2 M" O( [8 C/ v+ s! p; u4 O
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     + n5 Q6 g8 u" k( g. m7 b: U- s
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     ( Q- ~( C- T5 Q* D4 ^1 l
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ( Y; _6 U( ^0 |2 K6 R
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     # m' w2 f" P6 o  }
129. 
     0 p. n  g" C4 l' c& U% V- t# V+ n
130. m_Mappings.RemoveAll();
     / x2 f2 w- |  y: A
131. }
     9 I3 c$ [" I- H6 [
132. 
     
133. 
     4 P5 m# P6 a* N
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     " ?! {4 w0 m  {0 A% P
138. 
     
139. #define   NUMBEROFDEVICES 2
     7 C& M8 R3 S6 f" N, R/ h
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     5 m; e  e! x( x5 h
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     , e0 |, y( [  Q+ S
144. };
       C4 ~7 A/ `! ?5 G  K) f2 e# C
145. 
     1 p& n9 L1 e6 {5 s( W8 E
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     9 H- A3 E2 p. P( q" b* d
147. u_long   lv   =   1;
     9 H9 ?  a  Z) f  x5 y
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
       c% a0 }5 r) o! x
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     $ F/ m1 ]# c* h5 m' E2 I% M
152. if   (!(i%100))   {
     : a/ i% H9 m) I+ S* G# l# t  W
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;
     ) N' f( I9 K0 s  {& ?
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 "),
     ! \# J! S. }9 \3 F# L- g
157. 6,   m_name);
     8 [- l& ^: o9 y: w; Y" `
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     1 `& D1 |0 ?7 E. m# ~5 B' }
161. 
     
162. Sleep(10);
     9 H. M7 o$ `% J3 h7 }
163. 
     0 V/ W6 p$ ]* [2 Z
164. char   buffer[10240];
     ) w  U& c# @5 T3 c
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     ) }4 `. F9 D. F2 g6 s' t* V
166. if   (rlen   <=   0)   continue;
     / r/ R& k0 S" i4 B0 l1 ]
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     - m7 ]7 z& Z( k( d
171. if   (!parseHTTPResponse(response,   result))   return   false;
     0 c* a9 }" @+ ^$ H0 [1 ^& _% z6 _
172. 
     2 Y6 ]9 }  L; A- z. G
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     7 S$ b' S& a( `' X
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     . E* E7 F0 T4 M/ @: C
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     2 z# J8 u3 S+ B3 r. w8 {
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     9 g* \& K8 U% m
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     0 h+ w8 ?7 d4 |
183. m_description   =   line;
     7 V: |: l) r4 k+ d2 b
184. m_description.Trim();
     
185. return   GetDescription();
     4 A9 W- z7 k; i! {
186. }
     
187. }
     ! C2 h& U- v3 O/ x
188. }
     . \- [: F. y- i+ ]1 X7 W2 @+ M6 _
189. }
     
190. }
     / [7 V. P+ A, X6 Y( {
191. closesocket(s);
     / I0 S- s7 C9 C. f5 G9 j
192. 
     
193. return   false;
     ( r- s: u# Z2 [; H* I' s
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
$ e1 L' d& ?& s$ M" z
+ U( v: W/ p! b: u/ v5 F
6 x* d( Z7 T( T* x# _# M" M///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
, w  X! C* l' e

#pragma once
- c: |+ I3 G1 f#include <exception>

. P$ @7 t) B" K7 O! W0 J7 r$ V
1 w- L3 g6 s- R$ A: b' Z  enum TRISTATE{
& e6 P4 M0 N2 E1 l+ X$ B4 t+ j        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
};
6 G4 l5 s$ U2 A! E
8 G9 P; B5 N2 ^
enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
) {6 X) G3 p9 g% g( Y. K        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};



& N4 l9 k% F2 u6 b& E
$ v( I$ _% U$ s. V) ]$ n* sclass CUPnPImpl
' ?9 c: j& d5 y0 M! @+ E" U$ q{
* `( M% H0 z- E& [" Y4 a; Ppublic:
4 J" E1 h1 B% r! z. ?+ M: U) @        CUPnPImpl();
        virtual ~CUPnPImpl();
7 X7 ~4 J$ L: \2 m9 Y. Y        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
( ^: Z5 t; W$ N/ ^) C6 J5 p                UPNP_FAILED,
                UPNP_TIMEOUT
        };
  x$ [2 |- e$ q' D4 e+ j# l  y9 P

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
/ G( `- K3 J) q0 `        virtual bool        CheckAndRefresh() = 0;
5 g; F" b9 B5 l4 _( w  H6 b  z        virtual void        StopAsyncFind() = 0;
' r6 E' I6 h; b7 ~4 I5 S        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
7 }  \) |( ]0 e: M  v1 C        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
: B% j0 S4 }. l4 A4 K
0 n4 J( t6 _/ [% Z. P5 q
$ k9 {- g; o  L9 A- L        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

) i3 S* t8 Y8 J5 t& u& ]9 w6 c
// Implementation
7 z3 J* T+ e' r& l; D& _protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
- q( q# D4 J: j; h  F5 R7 m3 f8 ]        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
& l0 }, ^( W  u$ S% O% z        bool                                m_bCheckAndRefresh;
  w: S: G5 ^) e# r# w, g2 F

6 o( ]7 u4 l& M9 C, @private:
) c4 n* j4 ^& h- |        HWND        m_hResultMessageWindow;
# L+ ?" a  i( i        UINT        m_nResultMessageID;
: Y; p! s6 G, f1 `" q7 z6 y, I
8 l4 ~' C$ ]) U; q4 V0 E& [; X
};
& L& d8 D; u1 z1 a( o: @' _
: K# J5 y1 S! N) H# k" d
6 Y& m* `! `: B- b  ?$ q) |( S// Dummy Implementation to be used when no other implementation is available
+ l) W% F4 m3 {2 i2 \7 sclass CUPnPImplNone: public CUPnPImpl
% T5 S8 d' A9 ^& ^7 O5 d" |, h{
$ }& N; Y8 y5 ?public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
2 q3 l1 @- }/ b        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

2 |" a$ w" b5 w( {1 @
/////////////////////////////////////
( O( o- u+ r# _) @, D//下面是使用windows操作系统自带的UPNP功能的子类


, f* _& s. N. r' x* f. t8 c#pragma once
#pragma warning( disable: 4355 )

5 v0 n- L$ g. u4 C  C
#include "UPnPImpl.h"
#include <upnp.h>
% h' k( C$ X5 y  P/ ]: G#include <iphlpapi.h>
3 V; c- n: `9 g9 t4 J# s#include <comdef.h>
* x& V: H3 p4 Z0 P, m: s+ H- o4 W  P#include <winsvc.h>
& g/ a8 s" z  e" j( r
" [- h% j1 G1 g8 G+ ]8 X( W
#include <vector>
#include <exception>
" I3 ~- S! u) j# N4 D#include <functional>

( b+ ^& ~1 I% A3 I# x


, F4 \1 E4 |( d  E$ O$ o& u  Gtypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
: s# V+ r# _" Y$ T7 Rtypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
3 k% ^/ j+ |; u7 m1 o! i/ }* Ltypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
# |% i% X+ u% ]typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
% Z5 c' i% |" j" u! ytypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

# U# y" U1 S" c) v- a5 `+ V2 _
. J1 H3 }* I9 X1 o& D$ I9 }typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
2 R5 E& k% z' E7 x9 i) b

typedef DWORD (WINAPI* TGetIpAddrTable) (
" E; w) ~% N( S( w  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
8 z) K' l7 @8 L- I( q  BOOL bOrder
* W4 ^# J7 K# R) T* H);


typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
5 k% O4 X# l3 {+ P6 e/ K! B  {

CString translateUPnPResult(HRESULT hr);
( M. Y: d" i2 k  c  Z' f8 tHRESULT UPnPMessage(HRESULT hr);
% U% b0 M: z$ j% g) V
, M4 n: \" n1 c4 a7 s6 [, A" ^
6 j8 r8 U* _* W- ?5 }class CUPnPImplWinServ: public CUPnPImpl
( _! R; f+ w( h4 k+ d  M{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
/ u6 l! q5 @0 f: l) T// Construction
* b" @: x3 S" q, L, `# @7 @9 dpublic:
        virtual ~CUPnPImplWinServ();
5 F* V* j4 W, F% I1 z8 k$ ?        CUPnPImplWinServ();


6 f5 }' m* H; c8 e( G0 q7 c. q: O        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
. i6 t2 V* h" L( P& `        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
# V; |/ R2 F2 e2 f* N

        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
1 i9 I2 V' _; a. D: w( c6 @' s        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
( [' O- ]# U+ `1 s0 b        virtual bool        CheckAndRefresh()                                                                                { return false; };

& }* g2 |  v# J+ |$ K( Y0 A4 X
protected:
; h/ @2 l3 r: n' O4 K        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
% B5 _  H1 z% V% I; G% Z        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();
4 i: ?* P/ j3 n' \
3 m  b# c4 Y$ D2 E! S8 o
        inline bool IsAsyncFindRunning()
        {
, D3 {$ C5 i- k# V5 t/ A, x                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
* H/ ^& K5 v; Q% c% e! [3 t                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
  s% M+ L; i7 m" m% ]) m                {
                        TranslateMessage( &msg );
* E4 |" s! |& t: n3 Q                        DispatchMessage( &msg );
# w' h: u+ v5 I                }
/ Q5 l0 m5 Z0 A                return m_bAsyncFindRunning;
! l# q" b' u/ J3 l( a( O, u        }
+ b. Y! [3 H- q6 a, l/ E
/ Q0 [8 q3 Z, @# }  \
$ B7 F8 a" d' H2 _" U3 Y        TRISTATE                        m_bUPnPDeviceConnected;

! G1 q4 A3 {2 l% [2 `
// Implementation
        // API functions
& R& H2 `: ^/ x: w, M1 m        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
1 B8 @1 N0 F* P        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
0 @0 E7 {' [6 ]% U4 V/ w        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
8 }7 ~$ m& e& f3 {- X- r        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
& J2 K5 |/ }' w8 e1 n' X6 b/ j        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
7 r! O. k0 Y9 I( P/ h0 \' c
  f$ H  G9 n  c9 g! Y( m5 ^
6 q; h% B$ t# N  t  q        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
  x- q1 X9 }! k5 ~( i4 o; S8 v4 |4 U  S        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
; f6 T1 y( ]  C7 X0 F                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
' v2 b5 m9 i( G( w1 s3 b5 `                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


- l* d- h! x" y  g: u/ H                        if ( FAILED( hr ) )
! _4 q0 [0 }' A( q. @( X2 Y  v                                return UPnPMessage( hr ), false;

3 m' S! e# B0 y
6 [5 ?8 S4 @; U' X                        return wcscmp( deviceName.m_str, m_udn ) == 0;
. j  R% P, u. Z                }
) L' T5 A1 x2 `                CComBSTR m_udn;
! S& g# p$ y/ G  R( n* Z9 F) W0 Q        };
& _! R) K- z5 G       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
. S9 o- _9 b+ j$ v0 M/ L; L: v        HRESULT        GetDeviceServices(DevicePointer pDevice);
' c, y$ h6 ]  S2 V+ H+ D+ _        void        StartPortMapping();
/ C% p, z/ j" P8 X/ t7 G/ q7 k        HRESULT        MapPort(const ServicePointer& service);
! d+ g2 j1 ^* D& V4 T( K( n) X/ V( f- N        void        DeleteExistingPortMappings(ServicePointer pService);
; \4 b. l1 y# q6 d        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();


8 R. ^7 C6 |  s9 i        // Utility functions
        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);
9 Z2 h) e& a3 j& O" C8 ?        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
6 y. a; z  v! h& q& K8 @        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
. d) c* h, E9 r        CString        GetLocalRoutableIP(ServicePointer pService);
+ Z9 t; x" g. a) q% w/ X' F
9 Q$ _7 _" k* `
// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
6 V( Q  G- Z# \- \, P% k        std::vector< ServicePointer > m_pServices;
' L9 U) f, r# y  a( i! \  Y8 [        FinderPointer                        m_pDeviceFinder;
5 F# g  G; [. z9 ?        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;


6 ^4 k. D( ?4 d5 c. ]        LONG        m_nAsyncFindHandle;
8 L; U- Y! a& w( N5 j        bool        m_bCOM;
        bool        m_bPortIsFree;
+ `5 F) B7 `  Z' Y1 E! k# H        CString m_sLocalIP;
        CString m_sExternalIP;
! u1 A- [8 w9 k" w$ R4 I        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
0 J8 H9 n( A& c2 D        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
. a# V- h( ~. T+ B( B9 z5 P        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
# @$ w# e( j" U1 b! c$ `, y1 f/ P: f0 w        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;


};
! L4 G7 S7 y+ c# f/ ?
' M7 `" v5 v, _5 Q6 @1 Y
// DeviceFinder Callback
* j7 D1 ^2 o% i8 `$ `, Iclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
0 i0 U0 i+ f: E# J! P" i$ h) L8 C1 `8 p( ~{
; C; y- p) n6 k5 l6 xpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
$ O8 C5 r; T3 _8 c4 L. v                : m_instance( instance )
        { m_lRefCount = 0; }
) S; H7 ]( B9 g

' x4 H4 g" t! [9 h   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
: |" v. b; d, Z   STDMETHODIMP_(ULONG) AddRef();
. ^8 T/ r; v. N3 B7 g* m& x3 Q   STDMETHODIMP_(ULONG) Release();
. K0 L2 M5 ~  B  K/ t

// implementation
. \) A4 b4 Y' \8 Oprivate:
" ~( f. \+ H9 S9 B8 H% s        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
) T* b: N7 W3 G+ m8 y8 w# v' f9 N        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
' ]6 j) |9 c) S3 ]

private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
) Z. @4 x' V2 v: t0 M2 k7 e" V
, a* F' j% h7 w$ m# o/ P
* `2 ~2 ?. u$ n! @) `7 m$ u5 }* F// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
6 [2 ]1 |4 W2 ]4 ]" z; C{
public:
1 [5 u) b) p/ ^8 ~        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
7 ?" Y- P5 z4 @4 Q$ C   
4 V1 Y$ f( g( l- @   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

: b- a: ~6 D& ^2 s* {  j
; {( p* M2 P" Q! m// implementation
private:
7 Q( `) H% F& e' F/ b8 v: x: p2 f3 Z        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
2 y5 ?$ s7 p+ O! `" Q

private:
        CUPnPImplWinServ& m_instance;
4 O( x# {2 C, T        LONG m_lRefCount;
7 g7 u! f, C* G/ o};


& C( m0 G- h8 _" L$ H+ M% L/////////////////////////////////////////////////

" R; i% t4 _. c3 T: y
4 O/ T, T& d( _# O5 d& ^4 N使用时只需要使用抽象类的接口。
( m% B6 {  h3 |* N: y9 ]CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.