UPnP

天云上人

/*uPnP.h*/

1. 
   5 y4 G0 I% p3 w
2. #ifndef   MYUPNP_H_
   & u) [# T, {1 a/ q2 h
3. 
   
4. #pragma   once
   / n# E9 `+ G* O
5. 
   9 R- V8 k8 y; c4 G1 w$ r
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   
9. {
   
10. public:
      y# M+ u3 q4 k+ {) h
11. typedef   enum{
    " X1 q% Q; N; J9 x, w
12. UNAT_OK, //   Successfull
    ) a; i5 _4 B, k# Z
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    ! ^2 M1 Q5 k7 u+ D$ Y1 P
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    $ U9 i( l+ h5 A0 s4 ~: h! [8 S
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    7 J7 B  y! t1 d1 m8 q# E% s% r
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    2 z) ]( J" q# i; h
17. }   UPNPNAT_RETURN;
    # |; @$ I& P& F; h
18. 
    
19. typedef   enum{
    3 H$ P% t6 ^$ b; u) U4 y: M
20. UNAT_TCP, //   TCP   Protocol
    : Y+ e; E! F/ [$ \" u# a7 {
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    8 N& t" K* f$ ^/ L9 f( r3 @7 ]
23. 
    * c% |  `$ w, C: @  u. r
24. typedef   struct{
    ( o5 U: Z1 z" c/ {" z
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)
    # |& d' [3 I  \" @. |8 p
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    * b2 W8 {7 Y1 r' h* A+ I' B+ E
31. MyUPnP();
    
32. ~MyUPnP();
    . e. I! O* l% ?7 }' Y
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    - A  N& M  a" |$ l
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    7 L' }" S! a4 D  t7 c
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    8 g. i- p! y. g$ a: @+ k( u
41. bool IsLANIP(WORD   nIP);
    
42. 
    0 F: ]1 }' P" u% z2 L
43. protected:
    7 U8 q& q1 a; x. F0 L+ p
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    0 n7 `+ d6 p3 G3 X4 l; B8 o+ v2 T
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    ! h& E5 E% _' ?/ |4 U+ o$ K  m7 U, Q, D
48.       const   CString&   descri,   const   CString&   type);
    6 t3 T. x) h6 }; |% U
49. bool   deletePortmap(int   eport,   const   CString&   type);
    7 d" |, a3 |3 P8 F3 @
50. 
    6 V- h( a" ]9 [
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    4 [& M1 ~* n8 t- m# Y
52. 
    ! f, k. e9 ]" ?1 }' R% H
53. bool Search(int   version=1);
    
54. bool GetDescription();
    $ J5 O. S9 U2 t! d/ ?, }! u
55. CString GetProperty(const   CString&   name,   CString&   response);
      R: E2 C3 v, y0 L6 w5 e# W
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    ) W3 C7 m4 ?1 f+ z! r* I
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    - I5 b. n' X$ M# s3 B8 z  k
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    - r( t- R9 \+ k& w
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    
68. 
    7 w2 U7 e7 r% t$ I
69. private:
    : o' g( s% W( c5 j- y4 r
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    7 Z, l7 |6 b. u) x7 `* C
71. 
    7 U/ m# O& D2 i3 g1 n. o
72. CString m_slocalIP;
    ! L+ E2 S+ P- |
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    - h: o1 {1 {2 W0 X
75. 
    1 ?  S- W: J! \( H$ y$ w- ~6 W
76. bool isSearched;
    
77. };
    3 I# J- o0 g/ i, ^9 K' x# h& }$ Y
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   & R* _. w1 {# e% w% r
2. #include   "stdafx.h "
   4 ~6 f1 @  m5 P! j' @4 T
3. 
   
4. #include   "upnp.h "
   $ g9 K! W$ {0 `; O2 R' J; p' I( o
5. 
   ) ~7 t- M0 M3 {5 O' e) n; h
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   9 m- X- \6 v3 U0 t8 u0 X
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   * T0 |# m2 l" S) ^# B; K3 m2 D' J- H, ^
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    ; s. x: J2 u% d* B% x
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    " P, s9 }! i0 h, }$ l
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    8 ~/ F! `7 [, @& H: I" l; O' M
15. 
    
16. const   CString   getString(int   i)
    
17. {
    & u0 N8 P0 m. G% l( s! P7 y; @7 U
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    9 x" U# \; _7 }
23. }
    " ?$ Y% m  C. K0 U
24. 
    ' _! k/ v, c" T: C. e( O
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    6 G& g. m+ x/ E4 f4 a
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    ' g8 U  A5 ]3 E4 h. t7 W+ d
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    " n" |5 b) f6 f& O
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    + b( F. x2 C3 B5 ^; }. b! |
36. {
    2 D8 u+ I$ c. D6 K6 @9 ^
37. char   buffer[10240];
    
38. 
    " q+ N! R; j% [. `4 d( [6 c, h6 z
39. const   CStringA   sa(request);
    9 ]; }% R. f0 @4 N; c" N4 a+ I
40. int   length   =   sa.GetLength();
    - U! M' d, z, p
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    - T7 K% e: _+ b3 p3 ?" D1 \/ s" w
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    : r7 M. P! f3 b# a: O/ d
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    7 P, ~9 x3 Q  \+ m* k" W' u1 V4 z
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    * I. i: \" @' C& M1 R- W
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    % p9 B, y( ]% g6 Q6 a
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    7 H/ ^' d* X! j
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    & H  g$ e0 `/ j+ h4 k
55. Sleep(100);
    $ C5 ?! Q2 y+ I! J! J
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    - [9 {6 ~' g$ r: ?  N
59. if   (!rlen)   return   false;
    
60. 
    - \/ ]" j, {( I. T+ @0 s$ h4 l. K
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    8 x) q. M$ F9 m
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    $ ?% e0 x7 T( U* E0 O
70. const   CStringA   sa(request);
    9 _# u3 s3 x0 n
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    1 c( F) ?2 t2 q
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    # H( D9 P* ^* L
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    ' {4 }; F! C% [4 x9 ?& A: B
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    * K# T+ O2 b+ i- F& U  E8 `$ N
79. 
    : V" V  l/ F/ [0 Q  ]0 b
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    / B( r0 K( y$ z) g
81. }
    * Z  \" y# c8 h4 O
82. 
    & `# ?4 P/ \, j
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    ' v/ Z  X7 x! r- A4 E( W- C
85. int   pos   =   0;
    
86. 
    % f5 v, V- O3 e9 U3 r2 \" S
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    $ v6 c+ Q0 {: N  D  I* u. j* }
90. result.Delete(0,   pos);
    8 x& f# f* q, j6 o( D
91. 
    
92. pos   =   0;
    ' t8 |: {2 w" H: c0 X  c
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    0 K! \0 z+ e2 T$ P3 x; x& `
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    0 E& D3 ?1 m: `
97. }
    % @6 p' W' X# z
98. 
    4 t6 f/ I! J' k) i7 h
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    " A& x8 d: Z- s4 h5 O
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     $ e2 z7 M/ Q, m$ h
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     / b% ~+ L2 I& L+ e, p. ]
103. CString   property;
     1 W4 i$ Q5 z  O6 p
104. 
     
105. int   posStart   =   all.Find(startTag);
     1 M  w5 D; U# z$ J3 }+ J
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     0 S- }/ c; M4 y' t
114. MyUPnP::MyUPnP()
     ( t0 `  N, J' |$ _, `0 E9 k1 n- P
115. :   m_version(1)
     3 k- m$ S5 W* A
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     # j& B) E( X2 s9 Q9 q
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     , P/ Z5 Z) a  l- I( u
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     5 ]% X+ a2 i' B- x1 h5 X9 ?
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     " h, q9 Q: M$ V: [$ k2 J4 U/ i
131. }
     
132. 
     
133. 
     2 q% X0 i* A6 Q" N4 o" V! N
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     * {8 m, k% H6 ~5 i. b9 r
139. #define   NUMBEROFDEVICES 2
     3 Z9 @3 c' n5 \' J
140. CString   devices[][2]   =   {
     / ^7 C, w% s) \: v6 |/ `9 z
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     - ^; c% x0 V( \
145. 
     8 Z! B+ B9 i* B, }5 Y. _: \
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
       v( H" \. x& u
149. 
     + L0 r9 G% z8 v* |+ b5 h9 t
150. int   rlen   =   0;
     4 L# W" T0 J  N$ [2 Z& ~
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     ) Y" Z. s3 T: A; B
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     1 E, Y2 v6 \) @6 L; F5 Q
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     3 z# v- x! ~8 P( F
159. }
     8 o9 n9 Z" [3 ~
160. }
     2 C% b* U7 e& ]7 H/ Z1 i! }
161. 
     
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     , U' t5 J2 K/ O1 R8 m; E, e! l6 ]4 h
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     2 |5 |- X/ M4 w( G  `; g3 \' P
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     9 {1 |/ ^" j$ {1 v+ `. P
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     & z/ n3 @2 \2 ~& ~9 z9 P( y0 d6 R; {
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);
     
175. if   (result.Find(m_name)   > =   0)   {
     3 I& e1 w% [' L6 r( D
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     / a: h; A3 [1 G- X
178. if   (line.IsEmpty())   return   false;
     & B8 r& D2 l2 F. B$ A
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     8 N9 i; R9 x! C' Q) x* i9 d
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     + O* a" y  f  z; a# O# @* t& p
185. return   GetDescription();
     
186. }
     : S1 f8 ~: p$ ~! u. c: K- n1 t" s
187. }
     
188. }
     
189. }
     ; i; {0 ^2 K# `
190. }
     7 Y! g+ m/ H/ P4 {
191. closesocket(s);
     
192. 
     
193. return   false;
     $ @. @; B9 w7 b9 R& Z
194. }
     

复制代码

天云上人

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


1 [4 ~/ D9 J, Y# L$ {/ f///////////////////////////////////////////
3 C6 E% r' y$ ^) B5 K//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
4 z: m) y( D; h. v! C5 X2 d

#pragma once
#include <exception>

/ L; q+ n6 \4 e$ ]& J
7 D3 J  [5 ~8 A; X) ~  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
};
7 P% B# u5 A. v7 ^
4 I5 I4 W2 f- O  p' m
enum UPNP_IMPLEMENTATION{
2 w7 `3 W$ ?% _8 `/ A% T        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
" g' X+ ^8 R; I4 @/ C        UPNP_IMPL_NONE /*last*/
};




6 D1 b; t# {' d2 ~5 q8 w. W2 zclass CUPnPImpl
{
  Z  t: q1 `0 y3 rpublic:
# c; t9 @3 E% Y        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
5 @' k' ]" {! {/ S( y                UPNP_FAILED,
                UPNP_TIMEOUT
  D- l9 U' L( I$ ~3 G- x2 A3 H        };


1 [1 s  D! n2 c" N. I8 m        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
2 b# z3 d% G! ]        virtual void        StopAsyncFind() = 0;
8 A- ]: g+ I, f0 s# u        virtual void        DeletePorts() = 0;
) Y. D4 N5 L% ~+ B        virtual bool        IsReady() = 0;
7 d1 {' ?. }5 [) P: `8 C& A2 P2 X4 |        virtual int                GetImplementationID() = 0;
       
/ D; C7 z9 b  ^        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

/ i; E  b, Y5 [4 w" m4 ^- J* z
4 R5 K2 X- s. A- _$ ~        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
/ x8 I- F8 v7 ~! B        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
# s4 \5 p. E3 F7 p! U  [, R
4 }/ [+ o% _( b: B. h
// Implementation
7 v! O) e- X) j' c# ^& W0 @protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
: e/ H- @6 _* B$ n: K# T        bool                                m_bCheckAndRefresh;
0 r2 ^' X! n1 e( O; e8 X' A

private:
7 N9 f/ [* @2 v0 c+ l0 b& r6 B        HWND        m_hResultMessageWindow;
# t9 k% ?. L; L4 B. G        UINT        m_nResultMessageID;


& ~5 Z4 c9 c7 D; k: H' I};
* H5 T$ l* {4 |% R

// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
( }4 w$ L9 j. S3 j( ?+ X3 O{
  X* e- C% V# c% ]$ N6 R4 I; lpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
0 k1 a+ M# t# N7 V( c        virtual bool        CheckAndRefresh()                                                                                { return false; }
) ?2 C& R( F, N        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
5 l" Y0 D( ^% `" I" ?% C8 {        virtual bool        IsReady()                                                                                                { return false; }
4 {( p5 z" `. v) B2 B% c& o' r        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

9 d, u3 Z, @) \+ W  p! c& d
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类

3 ?' T, m8 t: V3 R& }1 Z7 j
#pragma once
  J0 y7 v5 m% F+ E9 u#pragma warning( disable: 4355 )
$ I5 L1 C- @% D: T
- R4 B2 C- ~9 }  z; y
#include "UPnPImpl.h"
5 V  p0 c0 w( Y" q$ o#include <upnp.h>
: O$ ?4 T- r; C6 _: k#include <iphlpapi.h>
#include <comdef.h>
: @  c+ c5 v7 K#include <winsvc.h>

  c; p2 l0 @( ~) H9 X' r* c+ u, e
8 w7 D1 Z  K7 N#include <vector>
#include <exception>
#include <functional>
# {$ P$ |" m3 a$ e8 U

1 j2 f9 U  {- ^8 Z2 F, O4 \4 Z
, I7 r3 Q" Q$ e" V! Z8 R! }
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
) |2 e; J* L# b- ~typedef _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;
0 M( p' U9 Y& [- Gtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
! O) p6 R) \1 Z7 z6 Y

typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
" y$ n" a7 |) g, `8 F);

" ?' M: i: a. N& R7 w
3 l& n6 s" f( e  a/ Otypedef DWORD (WINAPI* TGetIpAddrTable) (
; o* U1 o3 _$ `0 ?  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
);
1 O6 P( ^9 \/ Z/ ^3 B

typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
6 a) S6 m3 C7 y2 ?' H- u7 r);


  @8 o0 ]. \1 F- t2 |% J9 XCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
8 N- C0 P7 O% _% @2 ^. i
& ?% K0 H2 B* z3 {
) r- D, `5 t( J& j3 J7 _8 M& Vclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
: x! f/ d  B; R2 E7 d: d// Construction
% ?$ _5 t) L2 j" _' {5 @' [public:
$ v. t) C" Z$ M; r( T0 F. ?        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();

3 N$ Q* P4 k* K" z0 }9 m
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
# ]7 N/ W, m, ~/ J! d        virtual void        StopAsyncFind();
2 x( }0 S, G( n, U        virtual void        DeletePorts();
        virtual bool        IsReady();
; ^3 z. u# l) w        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
+ Q/ ]# c4 S& b* L
& ^* d% {4 V4 X; n' `
        // 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
3 f9 ~. N& X) T" r8 N% e        virtual bool        CheckAndRefresh()                                                                                { return false; };
& B! R  d% ]5 \: w  b# R8 X2 `

4 Q: ^! S. I! T9 r6 s; eprotected:
: G1 d, }) M; r/ c        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
* \( ?8 \2 H" h/ _& S! v0 R        void        Init();

3 H$ Q! I9 }+ r$ h
        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
! h# i; P6 J* K3 J5 W6 D                        m_bAsyncFindRunning = false;
! x1 C3 S$ N! B% ~                }
                MSG msg;
  B/ {9 O# I- K                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
. {( u' R! c: K* `) O; c5 E        }

  N1 C  j4 {8 Q* t; v
2 L% b. A" Z/ E/ I. \0 v$ ^        TRISTATE                        m_bUPnPDeviceConnected;
) S) x! ^/ P; ]6 u

4 ~$ l! ]% v6 T// Implementation
        // API functions
/ E/ [& e+ Q3 n! ]! m8 s3 w        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
! c* t. q/ [- Q, |        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
; D# K2 h. h; K* M8 ]: _        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
- @5 X' v5 q1 J8 e7 Y, k        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
2 \; o; x' n0 s

        TGetBestInterface                m_pfGetBestInterface;
  n$ I9 L  t2 @0 A8 w: Z' H        TGetIpAddrTable                        m_pfGetIpAddrTable;
, w, Q; E; `$ ?# Z$ Z        TGetIfEntry                                m_pfGetIfEntry;
" w0 x7 e- x" e. L0 B. H8 x
. }( O6 W) y0 \' W" `, [  D; }
        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
% S8 C. v. L$ X8 L1 x7 y                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
$ J. m: D5 E, r5 t                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
& |3 Q. D8 Y& q

                        if ( FAILED( hr ) )
# Z7 `( X6 Q0 U. v' Q  B1 _2 b, I                                return UPnPMessage( hr ), false;


7 C& x# V+ t1 v. |! E                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
, _5 m& x7 @6 k/ m1 ]                CComBSTR m_udn;
        };
       
8 ^0 X3 m7 G" F6 }1 j& T4 [+ i        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
+ i2 i" X7 u, h' @8 _" _        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
/ e/ K9 X# N: s& u) y+ c2 Y/ Z        void        CreatePortMappings(ServicePointer pService);
0 g! w2 G# }# P* z$ e/ F* {, ^, P        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

, |. y+ K- D# p# r' Y' f+ D
% }1 R2 c& g/ f9 D  n  X        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
1 U9 ^. _% v8 o: L6 t+ H# C        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
- d! |* E$ M. C4 {+ q        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
$ T2 X! W7 o' d, e7 k        CString        GetLocalRoutableIP(ServicePointer pService);
' t' N3 T+ V6 Y! C7 O

" }! i) G% U# _) Y' q( y// Private members
! a7 i3 r; |/ `private:
: ~- p/ M: E8 k; s        DWORD        m_tLastEvent;        // When the last event was received?
. F; T1 K4 s6 @4 H1 R. q% |        std::vector< DevicePointer >  m_pDevices;
/ g/ N& Q" Z; D0 g        std::vector< ServicePointer > m_pServices;
2 o/ y1 [, r' Q, k. t$ w        FinderPointer                        m_pDeviceFinder;
- [, l+ t5 N& p$ Q" \  l% Q        DeviceFinderCallback        m_pDeviceFinderCallback;
1 i( v* W* a' K1 l) E: b, o        ServiceCallback                        m_pServiceCallback;


( k: U/ W: C1 o" \5 ~4 g, R1 f# {/ t        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
, O9 P5 Z' H+ e  l5 t        bool        m_bPortIsFree;
        CString m_sLocalIP;
9 w8 R$ Z. o, M# n) d( ^. W* V        CString m_sExternalIP;
+ i8 F& b& `/ R3 F        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
# x' A# p0 ^/ b7 f: {        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
; s6 M" |" z- G5 o  R8 o        HMODULE        m_hIPHLPAPI_DLL;
" _$ C6 n+ s# L; p  o& y        bool        m_bSecondTry;
0 g6 S; D+ W3 O) Y/ Y+ y' c& o        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
- _- |- T0 }. L$ x6 g% ~7 ?2 ~# V        bool        m_bDisableWANPPPSetup;


3 s$ R2 D. L$ G: H};
4 B) f, }5 v7 q- i- k7 N  o
6 x% F- R- \+ B/ U- _8 x
// DeviceFinder Callback
class CDeviceFinderCallback
  b2 d3 N% G3 u% X$ k        : public IUPnPDeviceFinderCallback
/ H) {' Y; }5 h5 ~{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
& j, r2 y+ q  p5 e( _        { m_lRefCount = 0; }
7 {/ e5 a/ M& q) ]# n; y
9 [2 x( g) {) I% O  |
- ^& T. P9 c& d/ M2 i   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
4 M5 Q" m- w$ [7 }   STDMETHODIMP_(ULONG) AddRef();
3 l" W: Q" P' L. I5 m   STDMETHODIMP_(ULONG) Release();
* L0 r4 P3 _; g$ s( C/ W
9 ~) p9 B# \1 |' q
6 i+ J% o  O1 _, A// implementation
private:
2 s8 M* `- F7 `, x  E% ]  s" }1 Z        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
. c& ^' z  C( J3 I* S* x8 Y# \) U        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
4 w# }" g2 Q8 ^2 F/ q        HRESULT __stdcall SearchComplete(LONG nFindData);


private:
7 H/ A  x$ J* C% h! C: D- i" L, u        CUPnPImplWinServ& m_instance;
- l) |  i6 T  \# t' {( d/ X( N        LONG m_lRefCount;
/ ?5 F0 {# `) w  Q) n- j};


// Service Callback
5 v/ L  K4 u& a" F& kclass CServiceCallback
        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
# F; ]/ N) U3 _) A8 \        { m_lRefCount = 0; }
   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

7 i) G: w* y$ Z) H- p
8 K1 g* P; j/ g% L9 r. W  M// implementation
- S5 [' F, t% ]2 H9 K6 o6 z4 _  Rprivate:
) _0 Y  h( @; p* f1 N+ ?4 l: @        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
8 Q& G# b% }3 c* o6 V' _8 Z- R; `        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
/ O* z. d+ S2 L- G* t$ Q
8 t2 Z  Q+ t( m  k
private:
( f" W0 b  Z; `' K        CUPnPImplWinServ& m_instance;
% V" m; m2 C4 {  S7 _        LONG m_lRefCount;
) O% V: @: ?$ [$ M  k8 d" |};
' S: R2 d- P( D; ?1 x
. Y. t9 E! T6 c
( X6 ^2 ?# m% L* E* b+ ?& a/////////////////////////////////////////////////


使用时只需要使用抽象类的接口。
- n6 Y! S" a! Z) j! k& H  C; mCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
% P4 w0 S. ?# N) s  }# H& MCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.