UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   7 S2 R1 V4 F4 U: W) L7 ^! I' N
5. 
   
6. typedef   unsigned   long   ulong;
   9 j* v. y: v8 `1 @; Y- U+ `/ |( y
7. 
   - S4 H6 q  ^& m
8. class   MyUPnP
   ; c. O  H# e2 Q$ o2 V& V
9. {
   ! {2 H. e# V4 j, G" \- i
10. public:
    
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
    
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
    3 J8 u# X7 `7 m$ y" B+ o6 Z& d
17. }   UPNPNAT_RETURN;
    7 P5 z  r/ F: k! Z% E3 s( N
18. 
    ' R2 e. }1 w5 R$ h$ u
19. typedef   enum{
    ( w8 p+ |7 \. R9 x
20. UNAT_TCP, //   TCP   Protocol
    # T$ `6 u$ E7 O; v
21. UNAT_UDP //   UDP   Protocol
    , ]9 O, w  U7 ?$ j- b5 B, {4 S
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    . T/ p% [3 B! K0 C
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    ( \4 R& a+ u, E; a: D- D% E
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    + ]* c! @' i& v% [' z+ p0 T
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    1 K, B4 n  O9 k: k/ p6 R2 f# V
38. CString GetLastError();
    9 [$ B4 g& k: n* o8 L; P' o
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    : Q3 X2 X7 f+ ?% i
42. 
    
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    4 X! T: \, \* g& U6 {! D3 U& h3 `
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    1 w9 L! i1 j1 U: E8 n% h
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    : m8 p% w" A/ E* f
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
      g3 o: p2 q/ k$ O* i( i& m4 n- p
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    ) r' P: q# y4 r3 {' P0 v% k1 l6 x
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    * `2 f( V0 u5 ^9 a
60. CString m_devicename;
    . K9 z4 p9 F2 d2 f' d
61. CString m_name;
    
62. CString m_description;
    9 p/ j2 a8 Y8 O! |3 q4 q
63. CString m_baseurl;
    ' K& q4 B0 Z3 f5 t8 o
64. CString m_controlurl;
    1 m! ~. ~# P9 H3 x9 X- m, v
65. CString m_friendlyname;
    
66. CString m_modelname;
    9 m1 B; g1 T8 I9 |% c! R
67. int m_version;
    , [% F  G, ~! D/ h
68. 
    + J7 ~) M& E- y. N! p. i: J5 J
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    7 L2 v1 w4 m% T- F
71. 
    # i& E0 X9 i4 o5 ?1 R+ {! p
72. CString m_slocalIP;
    2 `1 h! q" v6 V0 D0 O
73. CString m_slastError;
    ' R. u& P3 C9 `9 a
74. WORD m_uLocalIP;
    
75. 
    " d0 l+ S+ ]' Q. O. S# @* ^
76. bool isSearched;
    / g6 i, y' k! [& T: h
77. };
    $ W% J) y/ T$ [
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
     \& O( Q* i6 c! B) s( U% ~( w
2. #include   "stdafx.h "
   . f$ y' t6 F: q2 B
3. 
   
4. #include   "upnp.h "
   & B7 Y7 C3 V+ O! b
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   , Z4 \- f' M4 L9 u5 g7 w5 K
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   8 e. ^+ I: U' B- ~# x) C- w
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    7 ?, {8 y9 N% S$ ^8 k
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    5 V4 u: ?/ `2 C+ f& J& _$ f
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    ! z4 T& g) e% {1 a% @9 a0 r: D" L
16. const   CString   getString(int   i)
    
17. {
    . y) ?2 g7 ?! v/ T
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    : Z$ S9 U# T$ d3 T1 a0 K
21. 
    * R, g8 m+ a) M3 o7 t
22. return   s;
    
23. }
    
24. 
    - a7 d) v2 T, ?# X+ N  \& |
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
      ~. F- q; y6 [: w. x. b( p
26. {
    + m1 [1 d. L+ e6 S9 V! b* P& u
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
      f+ I" n5 F) k3 k" p2 ?6 ]: @
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    & n8 a8 S. b; P) Z
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    ! R/ g$ Q5 z2 g2 n. N5 K% ~
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    # p2 |: u- v8 H' C
38. 
    6 ?* k. K2 Z5 D2 {  e
39. const   CStringA   sa(request);
    - `. v" `+ \: r" \. X
40. int   length   =   sa.GetLength();
    % m+ x" x) P0 Q
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    % L( P3 b8 H; g0 J$ r
43. uint32   ip   =   inet_addr(CStringA(addr));
    ! Q7 B' }7 ]+ \+ b* @8 _
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    9 @) u9 E0 K/ D6 w+ |
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    4 U' L( o5 F! j0 w" q$ h- Q
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    9 m, {+ `& M" C7 S  c' w0 \! m( v5 l
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    $ ~) @  e  t$ n& ~8 F4 h2 f
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    6 D% K! `  Z% r2 [9 D$ [
57. closesocket(s);
    6 u9 {5 p0 o! m1 d. H/ o1 n
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    7 }  T4 Y4 S& X; w) ?. U
61. response   =   CString(CStringA(buffer,   rlen));
    # y% S1 h5 C. }, ~# x! X0 n& B3 f7 Z
62. 
    % i# F" s& ?& o( Y8 _/ a1 q
63. return   true;
    4 W8 y* F8 l. ]) [  w- k2 J5 b
64. }
    " p: b# Y1 F. |" L4 L# u: N
65. 
    6 v- x6 a4 J! S# b% e& y
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ( g4 \- D. U5 J2 F
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    7 k: I+ t- P* X" \! L4 U; m, B
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    $ i4 E3 u  g8 ~: r  g3 e8 C
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    3 p; \  ^1 v$ Q; k3 U" ~& L$ H' I
79. 
    ( N4 ^) S9 ^3 w+ d$ h2 S
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    ( ]/ r# U; v) A9 \
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    : \" D7 o0 T1 L0 ~
88. 
    - h8 i, J# k& I# V- C0 L/ C
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    2 b$ f) M( d) ~  e
94. status   =   status.Tokenize(_T( "   "),   pos);
    , f4 Q- r" g+ i. U* [* i
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    ; [; V% u* R: i/ m3 R+ D
96. return   true;
    
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     : e9 e* ?1 ]4 P) o  r4 x0 _
103. CString   property;
     
104. 
     6 [1 V; Z: m$ M9 U$ S, t
105. int   posStart   =   all.Find(startTag);
     ' \! \2 l6 q  R" A) ^% e3 }* Q3 O9 x
106. if   (posStart <0)   return   CString();
     ) n6 P; b. s  V6 H/ B, U
107. 
     ! i. f# x% `) F- S
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     5 V; K+ J: v8 A0 k7 L3 S; g" ^
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     3 ~7 R3 m; E2 A
112. }
     / T. F% H  M- U) g% M  t
113. 
     
114. MyUPnP::MyUPnP()
     5 b$ I$ ^& N/ g$ ]5 a6 ]
115. :   m_version(1)
     0 P' s  B( H/ i. |  W
116. {
     
117. m_uLocalIP   =   0;
     / g# n  U( b- c3 h; D0 r
118. isSearched   =   false;
     
119. }
     0 p, Q" h7 A' C0 _8 T# t6 A
120. 
     
121. MyUPnP::~MyUPnP()
     0 ^4 a& f6 ?" f, E5 w# o) D
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     * a1 K. i1 m) q$ A
125. while(pos){
     ! ~0 [7 R6 k* @: l
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     % F' c8 [2 r/ c/ l* S( ]2 e" n
129. 
     
130. m_Mappings.RemoveAll();
     ! G5 F4 h4 ?2 H5 f( N
131. }
     
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]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     0 K& |, ~7 g. T4 o9 u6 E
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     ; `1 @2 x# Y- e. `
145. 
     ( c3 g9 j- o- Y! H& Z
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     # |$ E) J% G4 [( F6 r
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     / K  X0 J, @. W6 t( h" h. H
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     - L+ {  }6 ~  V' H5 L
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     , T) ?% m6 K' Q) @8 _
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     1 d! G  s! G! B
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 i& C; L  V' I
157. 6,   m_name);
     5 T7 a9 S9 W! w  P
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     * v- G  q5 @0 h9 [* ?
159. }
     ; `: t# s; J7 O
160. }
     ! d: y5 ^) W7 q( o5 X  g7 O
161. 
     
162. Sleep(10);
     - J9 G- T2 O0 f
163. 
     : q+ Y' R# x! d9 s: r$ e+ f7 H7 ?
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     6 W  ?# _/ a2 ~5 T4 \  {
168. 
     $ X: q* y. t2 b  E4 U* I
169. CString   response   =   CString(CStringA(buffer,   rlen));
     ! ^) u/ N9 o! b$ e( V
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     9 {3 g) l: F1 G  ~, D! v
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     6 ~# x; |; S+ M; J
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     * J1 z* a0 Q3 u; ]) T; @5 J
176. for   (int   pos   =   0;;)   {
     5 }2 ?' G* E6 q* ?8 ^0 v0 A
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     % x0 O% y  S& |6 j- V1 s* o
179. CString   name   =   line.Mid(0,   9);
     0 I" R2 O; v: e( W
180. name.MakeUpper();
     6 o) J) d: a( J$ N
181. if   (name   ==   _T( "LOCATION: "))   {
     0 z. F* g# o. `( f0 k
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     8 U' @1 L; ~) K- }- E$ S0 h
185. return   GetDescription();
     3 o- f1 f7 ^8 g9 W  {
186. }
     - i; B, g( R0 S  F1 D
187. }
     . I7 f" h  z+ g8 f
188. }
     
189. }
     
190. }
     # {6 B6 o$ g, r* @. b2 R' [
191. closesocket(s);
     
192. 
     
193. return   false;
     ; U  ]  y" A. U5 |; E% z
194. }
     

复制代码

天云上人

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

2 U. ]7 t" s3 b
/ r, L+ z7 W. R$ G" y" b///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
4 {6 u, o/ b7 i1 i0 m3 |& i. `7 |
5 w- x; v7 @+ u7 T+ T% J. t4 N
#pragma once
#include <exception>
2 w4 w* j8 j! Y' E2 F7 e

: ^* v" P$ k9 Z! c7 k9 o+ `' {  enum TRISTATE{
1 ^; ~: H6 m: N" v        TRIS_FALSE,
7 F8 u, f- j& p' V' R& N5 G& N$ Q  j# z        TRIS_UNKNOWN,
        TRIS_TRUE
9 h/ ]3 ~, G5 \# B7 J# Z/ B( H! Z0 x};

' T, l8 r9 j. h$ x
) c' M; o. m: {# v/ V' venum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
9 f& I) u6 p, H1 ^        UPNP_IMPL_MINIUPNPLIB,
. p* ~+ Q( G6 N        UPNP_IMPL_NONE /*last*/
2 D9 b% i) h# V- g% `' w0 u};
6 g) x5 M4 P6 _8 }0 u
! I4 R0 t1 J+ G% R2 B" Y
9 T# U  j' D4 ^; r- n( k; U& _

class CUPnPImpl
{
public:
        CUPnPImpl();
        virtual ~CUPnPImpl();
) Q1 B& R# Q7 B4 a7 i! w& W6 X        struct UPnPError : std::exception {};
) h' l8 |7 b0 v% ]        enum {
, E( r6 L" W: y& L                UPNP_OK,
                UPNP_FAILED,
: F9 U8 `' A! ~8 b9 L+ R. \                UPNP_TIMEOUT
% }! n+ T) E* V4 d0 l        };

9 q$ I) K5 @5 o; `8 C5 x3 q
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
, i# v$ B1 v/ D        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
6 A9 O' X% h- `% ]9 g2 Z* Q6 @        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
9 K3 x% G1 ~. M* S* f        virtual int                GetImplementationID() = 0;
       
& h+ Y9 H, r0 q        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


& N! y, X1 N& G! i# i' c        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
) B6 _$ A5 C5 Z9 ]        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
/ W" }$ u- g3 D3 R+ X5 P; d# u) i
# K9 k2 o7 g3 q" |
6 F+ A; ~: h0 J8 S3 D// Implementation
. P' w& g! I9 fprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
3 w  s: ]* F. Q8 `) E# Z+ p- U1 s6 L! c

private:
! C) }1 h: ^; `2 {" V( A        HWND        m_hResultMessageWindow;
" m4 D: C- v4 p8 H        UINT        m_nResultMessageID;
  L" g0 O& o$ ?; V7 s8 n

};


: M! Z- R' O" ~9 I0 M// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
0 \  o$ C) y4 ~{
/ L1 \  W* Q' q& ?public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
6 w" A% V* z% d& _2 t5 `        virtual void        StopAsyncFind()                                                                                        { }
$ E1 f- L1 p2 a9 V        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
& g* T# g; g. z        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
3 R) _5 v1 f& _/ C& I% ?};
2 h. `. m2 H5 X0 b# V6 S

/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
. `6 k& V5 u6 T! I- R

#pragma once
#pragma warning( disable: 4355 )

+ k5 S; O$ ?) C5 G7 E
#include "UPnPImpl.h"
4 T5 [% I* F3 ^# W2 k#include <upnp.h>
# T' }( _0 r, r# E- F#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
! e/ W# h! X9 L) B) Z

+ ^$ y, J( Q) }8 e#include <vector>
#include <exception>
% T7 o! j' J9 J' }#include <functional>

: h' n; p+ M, M7 m% m
: {. H1 C7 u6 `5 R
6 O" L3 W  Q, _" [( |( O
9 k+ H5 j2 Z8 E3 vtypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
0 o: C. J/ x% G% \2 `: l, Otypedef _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;
$ G( A- T- ?6 Y  y& V$ Q' |$ ytypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

" U8 y  G0 Z' z1 W
& N# E* n5 {- m  i  U7 Ytypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
" Z1 M: d1 g; G) \# Q' A7 r  PDWORD pdwBestIfIndex
);

* ]9 u' u% k# U* o7 W
6 w+ V( P7 w) m  n9 y& ^typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
/ E0 ]7 Q) a& y  PULONG pdwSize,
' W1 q- M0 n$ \1 @0 J  BOOL bOrder
);

: G$ \9 ~8 P, W: j/ ?( l9 f9 I
typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
! h9 V$ B8 T9 m/ I5 j);

- H& p* L' U: b. b& c9 @8 {
/ j) A4 A; o0 F% [CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);

* R% n. [$ C* S' r& }4 v4 R
class CUPnPImplWinServ: public CUPnPImpl
1 q$ K# L0 z5 D: }+ s' H5 R" s' X{
% Y9 W( q* W6 O3 y1 v9 }        friend class CDeviceFinderCallback;
3 ^% M$ Q+ k2 E+ o) |( P        friend class CServiceCallback;
4 D, }4 ^$ r& g7 @  V; T- E// Construction
public:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
$ D$ Q. G- @; v2 d        virtual void        StopAsyncFind();
9 B7 w  O, d5 D" j% Q2 I( |8 }3 u        virtual void        DeletePorts();
9 |0 S* F/ m4 ?. j1 ]! c        virtual bool        IsReady();
% `( a% b, X$ U, U6 }/ \        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
' z) U2 Q+ w$ U  T& B+ ^

        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
+ F, Y$ j1 {4 J7 z7 Z        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
4 H& t. k: s) T! Y/ R$ a        virtual bool        CheckAndRefresh()                                                                                { return false; };


protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
. i: Z% p  w3 c5 T) r! u9 V7 |; x% k        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
! O" e2 K0 \7 W3 k6 c        void        RemoveDevice(CComBSTR bsUDN);
# T8 f& p' k# S* j! @        bool        OnSearchComplete();
* Y8 @& K5 G4 i9 e: O2 d        void        Init();


: P7 I" x: S; _3 ^4 m; {4 `* J        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
; Q, c9 x4 F4 X" x                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
1 a  A% ~  R3 ]* M8 \0 u                }
' L, f+ S1 S. Q' R                MSG msg;
# e) w* L" f- Q' o                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
9 e# G+ A/ d8 p  Q2 o) e. w- |                {
) l. e9 s' y& v& b6 B                        TranslateMessage( &msg );
  f/ [# [6 Q5 {9 ^/ x                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
% ~8 v2 y# a+ m' K        }

! c9 Q" `4 T: N- u$ X3 S; m
        TRISTATE                        m_bUPnPDeviceConnected;
8 ]4 X1 L  ]* e' X5 ]* w" n: f, o
+ l2 {% ^0 t% r4 l. H
// Implementation
        // API functions
; X6 N! l3 V& c        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
6 p$ ]% y, _: p        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
5 h; d! u3 p  a0 o4 Q6 h+ m

        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;
  N$ ]0 }7 v- C" h* m
, X: T* E; z1 K3 l; S1 W
/ e  H  d9 Y. z9 w2 P5 B        static FinderPointer CreateFinderInstance();
, U# G+ g9 P$ _* `        struct FindDevice : std::unary_function< DevicePointer, bool >
+ L% E6 O' y6 A- s        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
; p0 w# y, l# d, `                result_type operator()(argument_type device) const
                {
, J' w. ?+ t' G$ T2 A) G: y                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


- u+ Z  B) p) r0 I                        if ( FAILED( hr ) )
% |! g, N' B: |                                return UPnPMessage( hr ), false;
( q5 Y+ U  k  I3 S0 D# `7 d

3 L4 Y% W/ u5 |1 }; V  C                        return wcscmp( deviceName.m_str, m_udn ) == 0;
% c, w: O! M" }. U' W" ?                }
                CComBSTR m_udn;
        };
1 v: F( I1 a0 k  \% _  X       
- h+ k* G- t; e/ h; p        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
- H; Q* `8 C, O. E' i: z0 m        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
$ s9 {3 U) G5 e' K        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
% v1 e* c  v* b2 {" |2 Y" n        void        StopUPnPService();

$ _0 p# q5 e+ z" V6 I! ?- \# j
        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
& q( a5 k3 F9 A/ c: q% @6 f        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
# r. [) g* c4 z, ]0 O8 j* u5 C        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
" y( D) f; D$ E7 Z        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);

7 L6 v6 [% B( e6 ^# d! V) ]1 n
, P: S$ }: d( I3 |) C9 `1 Y: \& M. ]// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
9 @5 a% S% g# u0 p) t        FinderPointer                        m_pDeviceFinder;
# k% H" B8 d8 g" y: c        DeviceFinderCallback        m_pDeviceFinderCallback;
) h. W0 W  ~6 n( U3 b" @6 }4 ^3 i        ServiceCallback                        m_pServiceCallback;
2 b% ~( G# h6 b6 D, R( X. E
, W. P) U+ x/ Q9 h0 a
        LONG        m_nAsyncFindHandle;
2 \  y' E6 R0 s3 M        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
" P9 A+ z7 ]1 }% |0 l$ f        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
- ~" W6 [# |* A# R4 Z        HMODULE m_hADVAPI32_DLL;
9 f5 s2 [% f3 k! U/ R7 a; y        HMODULE        m_hIPHLPAPI_DLL;
9 ~; h% H* U6 R  T: B: E6 z        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
3 o- c: `' D- t7 W6 `- s
* F; K% i# k% ?5 _
};
8 s( `& S' f: [) e* r
) V% k) M. T9 h5 W4 B+ K
// DeviceFinder Callback
) ]2 X# b' j# s/ V* ?class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
6 E: Y+ C1 X6 u. Q                : m_instance( instance )
        { m_lRefCount = 0; }

/ X/ y+ r+ N3 R1 I
3 O! B% e+ q7 ]2 T# Q$ I! ~; s# G8 _   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
  r$ w3 h1 Y$ [% [4 N( r! M, F   STDMETHODIMP_(ULONG) Release();
0 A" B: d# [' E# F6 Z# {

, D# o. H" y. }+ M// implementation
; S5 s/ ^1 K1 {. d  V7 W: Eprivate:
  U% J( ]* i  Z' B. I: d        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);

$ ?0 O. S5 O& g1 n# v
private:
        CUPnPImplWinServ& m_instance;
: A3 N5 ]) b, q( R' v6 v7 c/ ?+ _7 l        LONG m_lRefCount;
5 r7 v2 O0 }. ], M1 K};
* ?+ l1 L# X2 r2 T  U+ V  }
7 h' p; X# }; g, Z1 ?( ?
// Service Callback
. I  T4 d' o; ^( T1 L' ^class CServiceCallback
& j$ l6 p' c) T9 }' n        : public IUPnPServiceCallback
2 ^6 `# w5 P5 v+ X0 c( ~9 c+ M: m{
: w! _! A1 e9 `1 _public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
" |* s+ B* X  h; ?. ~9 z4 [        { m_lRefCount = 0; }
  {+ a$ g1 d' f8 F8 U. ~   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
7 X" ^: A/ `+ i, O" D

// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
8 g5 [  V6 L, z) ]        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
/ C. y) a5 k) ~# q

private:
2 r, B' N- x7 u7 i. e  `6 f        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
$ \4 N; e/ h5 ^2 n, D! U, D/ i

2 O3 }' B; }' b/////////////////////////////////////////////////
* K- M: Z9 a5 |

9 e9 U2 Y+ ^( x4 q# d/ I使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
8 o* l" E) A: M) z  }6 TCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.