UPnP

天云上人

/*uPnP.h*/

1. 
   ' k, L" ]7 }  j) a! q
2. #ifndef   MYUPNP_H_
   $ `$ E" d; j( U2 z+ s; z
3. 
   
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   , Q) I) e( N0 `- a
7. 
   
8. class   MyUPnP
     V+ g: J( U! l. A; l
9. {
   
10. public:
    ; g- F% q: l. t& ?% i/ `
11. typedef   enum{
    ) x0 b- ]2 L0 j$ ]4 x9 ?% U
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
    ( x. D9 v! j) t- ~' {
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    9 d; B3 V9 ~: t, b
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    ) h- C0 i1 T. `( T% M- s
17. }   UPNPNAT_RETURN;
    6 B' {( l0 M6 \, g+ M
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    ( T1 i  u+ V5 i. z) G! f
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    " g$ n5 |, _6 u2 [
23. 
    ) Q3 N' A! m/ S! {  E  i  m
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    , j( z) K8 ]8 e% [0 h2 B* {
26. WORD   externalPort; //   Port   mapping   external   port
    " C3 ]" B* `! _$ C! g
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    " e( q3 w) j& X# Q
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    : J+ l2 r4 w" ^$ J% Y& j2 e
31. MyUPnP();
    
32. ~MyUPnP();
    2 C* l7 w. O) Z
33. 
    " p2 ]2 k/ A8 z5 a3 R% \( _
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    - N5 L1 W, f" m
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    / M3 u/ Z0 F0 P+ E2 {% p
40. WORD GetLocalIP();
    % Q& E2 u. O3 F; p: Q; m
41. bool IsLANIP(WORD   nIP);
    1 c7 K! r7 \2 }. i) y4 V
42. 
    
43. protected:
    
44. void InitLocalIP();
    0 F9 H8 z9 w. ?; [" c& V: e
45. void SetLastError(CString   error);
    , n# U* I  Z! x8 M' p$ r
46. 
    ) W* r! s+ i+ d
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    ( t$ B0 ~; a: o: d; Y3 ~# E* }
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    / F1 e4 w3 e, K! \% y! {
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    : X8 `. G* o/ q* S) N* |
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. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    ( W, G% O% R2 d- n! p7 B
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    1 d, }2 Q" _( A; Y
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    4 G/ T* v6 E0 X# J; E* K
64. CString m_controlurl;
    + t& w' K" E; \3 L$ z2 O* g4 m, x$ ?
65. CString m_friendlyname;
    
66. CString m_modelname;
    4 q) A6 }1 Q: ^3 ?$ r3 X
67. int m_version;
    
68. 
    
69. private:
    & A" ?# |8 N  A7 `% X/ a
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    2 g9 ]* I: h$ B$ d
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    ( b, K! ?+ l+ K) O! i. N
74. WORD m_uLocalIP;
    # D* A9 d7 [+ G; V2 R
75. 
    
76. bool isSearched;
    4 w: y7 e6 ]2 Y; R, H* e' E
77. };
    / t5 u) a) F: i
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   / Q4 K' m3 `* Z  s% j% v% z  y; |
4. #include   "upnp.h "
   . @' w6 m2 |4 s' q2 `+ A7 c
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   8 L5 N$ [  q5 ^5 z* I
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   5 |+ {, X. R# i% U$ ]" M
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   $ ^6 p- P8 r& G, R- _' h
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   # F7 I8 c2 w( `6 z
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    * g" v+ @3 E4 Z. F) d( y( {
13. static   const   int UPNPPORT   =   1900;
    ' l& e4 L& m- K$ \' a- g: W
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    + L8 ~% c- h. T+ ^
15. 
    1 I, X* j5 ]- ?) g/ R% O
16. const   CString   getString(int   i)
    
17. {
    3 i% i. j9 N- C( P/ N% j
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    6 `. S* \$ |! f7 \
23. }
    % }& }! `/ ^% f1 i) Y* s! o1 K
24. 
    % {7 `6 u2 X( r" R$ M
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    : e$ r; k5 t- z
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    + a3 y2 n: U9 n- G0 N* `
28. }
    7 H: o  t6 e( I* n
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    6 a( V' \/ D% z: n. z
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    : A  L1 w$ }7 T6 u" O8 j7 p
33. }
    * f( Y. k# }( A# R$ f6 d
34. 
    4 |" l6 v# C) Y' w
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    $ @+ N+ h* g5 \* n; M" m
36. {
    
37. char   buffer[10240];
    
38. 
    2 K9 |% w6 s2 ~2 b
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
      m6 \! @- i, p/ n
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
      l8 a5 f4 N4 Z9 w* d$ u1 o
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ( a, s& b; X$ T/ J+ r4 I
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ; w0 C8 m4 P7 K' O3 Q  _
50. u_long   lv   =   1;
    6 W$ Z+ }. _" J
51. ioctlsocket(s,   FIONBIO,   &lv);
    + i# w3 y0 P3 j  {+ G8 ~0 M
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    + B( i0 m# ^. {5 _& j' H" P
53. Sleep(20);
    + B9 t' h; t/ }5 ]2 c; n$ e- F
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    8 n+ }* ~/ S8 C6 ]
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    8 l. Z! s* }+ h3 A) r0 _( |
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    " s( d( k, |- ?; F! Z+ F( r
62. 
    $ y  t4 X, B  W" `* e
63. return   true;
    5 L* l( C6 O6 s& t
64. }
    6 w, ?6 |8 r' W4 Y
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    . F! S; f. @! R2 i. ?9 _1 J" D
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    ' b9 A" U' w4 T5 C8 y
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    - G$ `, e* K, ]* W- \0 ]3 K; B
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    0 e( K  O: L( i2 N" p4 y) \
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ! z4 x# }! a& f
79. 
    6 H8 Q$ L9 H+ ]
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    7 A4 p- Y' Z5 ^5 B" X9 R
81. }
    ; c; a9 H' G9 w7 ?
82. 
    6 d3 O1 |, c7 O) {9 L3 e0 n$ p
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
      u5 x" F5 K" {! a
84. {
    
85. int   pos   =   0;
    2 c; [- Q& D& t+ ]5 W
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    2 |5 n, H+ i' n- t
89. result   =   response;
    8 l1 N3 k' {0 w1 p$ q6 y  G0 j7 o
90. result.Delete(0,   pos);
    
91. 
    ' d$ ~! A) T2 g# s1 B3 B2 q, L
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    / c  ?$ k2 i5 X# M6 ~
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    . `2 {+ m. H, Q$ q, E! ^  S- e  R
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     2 c/ Q1 T. S8 H
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     # U2 f! S+ z1 y9 @4 L- G9 L) O
104. 
     5 g$ r, T2 l3 {( q& F: K
105. int   posStart   =   all.Find(startTag);
     % L- g& d7 J6 W2 @( h- H
106. if   (posStart <0)   return   CString();
     
107. 
     9 J0 p) p: G6 m/ a+ v* a+ e2 s
108. int   posEnd   =   all.Find(endTag,   posStart);
     1 o2 X: d- d; r9 G" G
109. if   (posStart> =posEnd)   return   CString();
     & S. f7 F, w+ ^
110. 
     3 c3 e1 V( D- m" Q. |, V+ ?  z# |
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     4 h% _; h& M6 A
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
       v& q- U4 d2 C1 u  ^' M: v
120. 
     
121. MyUPnP::~MyUPnP()
     : N1 i* P& l$ V$ u6 o0 Z5 x3 }( x
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     4 ^+ ~( k4 V: L% u/ i
126. search   =   m_Mappings.GetNext(pos);
     4 o0 W. ]( Q1 P; G3 d! W8 D3 A1 [
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     2 f* }5 @! F! k4 p
132. 
     
133. 
     , @8 p' t) y  s2 r' X5 M/ \- C
134. bool   MyUPnP::InternalSearch(int   version)
     7 K5 U/ g2 h2 m9 j
135. {
     : p6 A) ^( f6 B2 S4 b4 P) v
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     1 Y7 e/ B8 C! P
138. 
     . p+ h0 W  Q# P! k8 I; V+ [& s
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     & }% j3 R# R+ k# t' b
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     5 Z3 i2 |& O2 [0 i1 z
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     8 o& W( X# m0 b1 c3 Z% O; L
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     1 X7 b+ j" m* C: I  N( h! c# z4 S
152. if   (!(i%100))   {
     ; B/ B- n6 ?+ C" g
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);
     ; c1 S/ J  C+ ]6 M/ x( A9 _# `
155. CString   request;
     ( K" _  k2 K. P3 `0 i5 M
156. request.Format(_T( "M-SEARCH   *   HTTP/1.1\r\nHOST:   239.255.255.250:1900\r\nMAN:   \ "ssdp:discover\ "\r\nMX:   %d\r\nST:   %s\r\n\r\n "),
     
157. 6,   m_name);
     7 {3 B4 F8 f' _1 U7 b
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     + W! p& Y9 ^* t* v
160. }
     
161. 
       k8 a& \& S' E9 y$ j' i: o
162. Sleep(10);
     
163. 
       S7 l- e$ A8 [5 e
164. char   buffer[10240];
     7 }$ G. t. y% u& {0 x
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     5 L% }1 k0 U5 v8 D6 d4 x
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     ! U, A8 e: Q  C& N# F" _7 w! A
172. 
     
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);
     ! u2 h8 \. c  c6 u# B" ^
175. if   (result.Find(m_name)   > =   0)   {
     1 ]# W) s" v2 ^: \
176. for   (int   pos   =   0;;)   {
     ! i+ c% L; V% X% [
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     6 J! @: e4 g8 \  L
178. if   (line.IsEmpty())   return   false;
     ! @, O* h( N7 V* E7 T+ `% N
179. CString   name   =   line.Mid(0,   9);
     8 t: {8 s$ }' T) q
180. name.MakeUpper();
     ! p6 v) Q- m# a5 K/ H# t
181. if   (name   ==   _T( "LOCATION: "))   {
     7 s/ Q% o  L; k2 N
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     ' I; w0 H/ P! D8 k
189. }
     
190. }
     / G7 X7 ?4 P, S; g
191. closesocket(s);
     
192. 
     
193. return   false;
     9 x( w2 `7 s1 Z; x3 k- p/ O
194. }
     . I+ i9 ]0 w# l/ O1 N+ ^( A5 i

复制代码

天云上人

以下有关upnp的接口来自emule，
' @# t7 h4 D, e

: c$ C7 h- ]# j  K. l, D9 K" {7 O: {///////////////////////////////////////////
5 y' T. K+ j" ~8 B+ t. \, {//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


$ A$ p6 u# s& T) V" |- B#pragma once
1 \; r  i8 A0 n8 G4 x, Z- ~#include <exception>


  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
+ `' [' C1 a% C        TRIS_TRUE
};


enum UPNP_IMPLEMENTATION{
2 ?9 y# c. K: c; N        UPNP_IMPL_WINDOWSERVICE = 0,
  M( `9 J8 N% x4 D! s        UPNP_IMPL_MINIUPNPLIB,
, T' a1 i8 b+ }) N2 p$ _) r- T        UPNP_IMPL_NONE /*last*/
};
, I$ K- S# \" G% K  `" ?
7 S; `  `7 J9 w% ?% S" n2 @- x. \
  j  g( |! v9 r) V$ c* |, {
& i) C( t$ e: f1 O; g. {6 R7 X6 D( q
class CUPnPImpl
{
' R; I( M* O$ A3 ?+ spublic:
        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
' x/ Q0 x) m0 y( F: X6 k8 T2 N9 E                UPNP_FAILED,
                UPNP_TIMEOUT
% x7 K! _4 o5 t0 s        };


7 ]% {2 N3 t" _0 r) q        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
6 r5 o7 q4 |! p5 @0 u5 J0 O, o+ m        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
) a: I, K! D' k* x' O# l) R: t9 k        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
# w- h! F1 B! J) `+ n       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
/ J7 A7 C; t9 o2 U7 X
$ _+ w7 }# |, V+ }
" T. d, L+ x0 ~) [9 V* F. W: W        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
9 X9 ]- U/ ?* ?7 I' }6 |0 r" u        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
1 y8 S+ i# _3 G, |# C, H( v% O        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

" ?5 a3 H! Y5 \; v( T, F
// Implementation
protected:
6 d" h) B7 W3 {! Y6 b3 l2 D        volatile TRISTATE        m_bUPnPPortsForwarded;
5 @& Z" t# d3 X" m" M0 x        void                                SendResultMessage();
7 K! |* K! N  e% c0 R        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
( U. r/ m: l3 H3 |* R5 [9 }

9 T! j& T4 a' ?2 N: w! fprivate:
$ U' U8 b3 Z% [* y8 j7 s& B* K% q# ]        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
: e$ Y; {1 c# Q, c/ I3 O, r0 H
% c7 [9 U/ n$ _, x0 N
};


// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
* y" A1 y$ ~3 x0 x5 C# u" qpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
% e4 J1 O9 M/ A. t) }- N. N6 G" O        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
$ s; {$ D3 F; ]2 i! _, ?- v        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
2 q+ G, {1 |  w( l& E$ W6 J
% i$ E* v1 R7 s9 |5 F" a& R* i0 {
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
* G' r: x1 Q7 n, {$ g
1 k! i$ b0 ]# g( Q. x+ a& s
#pragma once
$ ]$ p! J- q8 v6 j- O#pragma warning( disable: 4355 )

3 l' Z& c! H# B
( E3 K% \- K0 @' \#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
" C; d) U3 ?  j) x

: ]4 j4 I& @9 K" T! v#include <vector>
/ U$ T9 I' h; g. F#include <exception>
#include <functional>




typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
: z: D- F3 }, G# F; j2 G& [7 Wtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
' U! W; S8 f6 F# W0 E* Ytypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
0 P1 Q/ d+ T8 m$ `6 q( Dtypedef        _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;


( h1 m6 I# t4 ?% otypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);

4 w* v2 r& k. P; E3 ?
typedef DWORD (WINAPI* TGetIpAddrTable) (
/ C: ^! b* G# T/ ~2 a' Z, ~3 @  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
);
6 p/ W$ `& J4 d5 O; i* ?

: Y' _4 K/ [6 {typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
1 w! N3 o0 @' d5 S! T$ e: h
8 A! J3 O9 T* x
CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);

" G$ p' {" q; {( U
class CUPnPImplWinServ: public CUPnPImpl
/ M7 t' A& _. }7 V8 V' j% A: k  M$ P{
9 }8 U4 l- @% Y3 ~/ z        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
! v1 u+ o/ T1 h& V% R" E// Construction
2 G5 k5 T, o  |0 |3 ypublic:
9 X& m/ H* K4 d, Q' a        virtual ~CUPnPImplWinServ();
4 d% \+ V4 O5 S7 x# u2 B! P        CUPnPImplWinServ();
0 a2 c$ w: a0 ~" D# b

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
& C: p) n, Q& [        virtual void        StopAsyncFind();
( k- T5 S. L. s' ^- T3 f; J  O3 G; y3 f* ~        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
, Z5 e! W: p% m7 y4 C; j. P
( t# v+ [5 E5 B2 H+ N* i
+ k0 _% T4 p' k        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
: P, ?$ B# ]" S, w

protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
7 i6 y1 t; G6 V6 l+ m: d        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();
3 L$ Q+ ^* V" i' y; b3 M# U- B
, K3 @* m& X2 w. [2 s
7 @6 O! _6 T  ^- K: ^) ^        inline bool IsAsyncFindRunning()
        {
& h2 e5 Z5 j2 ]' ?                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
: R" ~0 y- R/ i! {                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
  l3 G" B1 s$ z% l' ^( S% a                }
2 w& H. n* z% O                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
; e. t( Q1 I( {4 d! M                return m_bAsyncFindRunning;
        }
9 c0 _% F$ M( Q0 w" E

  f1 e6 r. A. D% i. k) q  B; g        TRISTATE                        m_bUPnPDeviceConnected;
; [) o4 y, h. |# u

: c/ U% B4 N& ~0 m// Implementation
" Y: Y6 i4 Q& i5 Q- A- _7 Z- p        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
( @9 Q- f. U5 d% b( `6 Q3 C* G9 p        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
5 ^* ]+ q; k" |8 @2 n$ q' W        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
! O, W4 {' Z8 l        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


        TGetBestInterface                m_pfGetBestInterface;
, x1 D; [# d7 x. W1 ~! W        TGetIpAddrTable                        m_pfGetIpAddrTable;
. E" L' _& v9 e$ J        TGetIfEntry                                m_pfGetIfEntry;
- r$ w6 X- j( P# z+ B

        static FinderPointer CreateFinderInstance();
5 i: x3 A+ e( v! R        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
& B/ {! L9 p: Z- Q8 n5 `                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
8 m0 [+ E& p, K# _  \) p
# [/ B. B# k4 P3 R+ m3 `4 m- x
                        if ( FAILED( hr ) )
3 O( k& k7 ^2 y) c, q. O                                return UPnPMessage( hr ), false;

4 }! b6 \' j5 U
+ W) _. [$ d. H; H, h$ P                        return wcscmp( deviceName.m_str, m_udn ) == 0;
7 u4 v/ x& `% {4 Z* P  B4 {                }
6 I$ x- q% `  `" Y1 l; m, E                CComBSTR m_udn;
2 j& K2 Q3 T: W. i        };
       
, f1 j( U& l9 W* O1 N; H        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
3 F, s9 ?* l- L1 }8 u4 W- l& ^        HRESULT        MapPort(const ServicePointer& service);
/ N9 h* X3 y- M' W7 r+ ?. s        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
: {" a5 J# y1 l4 i& o0 L                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
7 ]- M' s) [& ~: k' i
9 B  d$ a& Y+ e7 e" Z
1 k( I) s8 w, E9 C9 d2 w# \- F        // Utility functions
  y2 T2 P4 V$ s0 |/ @        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);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
( g% O6 x+ i4 e4 I. _        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
- Z! J: s( h: j

// Private members
, ~' y  c' V* E: hprivate:
6 B! n4 h4 t6 W        DWORD        m_tLastEvent;        // When the last event was received?
; `" T1 J' E( @1 L; _. |2 h5 D5 D        std::vector< DevicePointer >  m_pDevices;
! U9 x2 d5 [7 B  I' M* u& g        std::vector< ServicePointer > m_pServices;
: [, r3 K2 j" n6 ]' D% x- P1 p        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
8 {4 W$ `; Z, p        ServiceCallback                        m_pServiceCallback;
; x2 C7 k4 l- h5 {
: R' L4 g5 _. e) t  H) [4 f% W
        LONG        m_nAsyncFindHandle;
$ B5 ]; Y2 q% u  P1 Q( K3 x        bool        m_bCOM;
- e6 \8 w5 D, z" {/ B5 l        bool        m_bPortIsFree;
0 u& _# z  y# ?! L3 d        CString m_sLocalIP;
        CString m_sExternalIP;
6 ]) U! `: T( F/ h- ~0 h        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
1 h3 \2 |$ F; W$ V) ?! R        bool        m_bInited;
( ~' _$ C/ s' c( A8 ?        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
+ u/ N6 @: Z$ b- A% s, D        bool        m_bServiceStartedByEmule;
# i+ ^3 }0 c. G$ o        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

& X5 i3 I* T+ C* Q5 `
};

( Z  [, [( Y4 {" q4 _6 }5 V4 ~6 t
// DeviceFinder Callback
class CDeviceFinderCallback
( o6 u( p( ?- ~  w) x' N( ?: a        : public IUPnPDeviceFinderCallback
1 d8 T) Z' f" q$ k3 [( b{
public:
% ?9 _% y7 c4 q& D- x! Y9 X        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
4 L% K9 E+ ^+ n1 ]3 Y: M        { m_lRefCount = 0; }

* m8 c# W2 K$ y- B$ G
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
! q( Z. p( W8 D! J1 I   STDMETHODIMP_(ULONG) Release();
' d/ T( H, T) f! E8 `& X
2 d8 C- }4 U6 a3 u
  B7 x) q2 R% {& O3 l8 I// implementation
! W5 J' J: F7 X- v, y2 zprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
0 ?; n7 {7 e9 S# y7 a        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
& ^0 ?$ X( ^- n) \: `
2 |9 N) ]0 J' A9 ~
, c9 w. Q2 m. L& G8 v8 zprivate:
8 C- B; c4 E$ W- y, g) E6 t) e* E; v        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
! p1 k7 _0 o% C8 B};
; c) _+ u6 s2 O+ W+ o$ \. C0 o) c
9 K6 M, D& `1 p
3 x" R* l% ^, L: O6 i' m" h// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
{
) Q( |$ n2 l& ~) F5 _# F) y! U) {public:
' a3 r# e" h0 {9 ^6 _        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
   
% Q& j- D$ t/ y" I. \   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
7 z" \8 w4 j  `   STDMETHODIMP_(ULONG) AddRef();
* t; n, X, |' M/ c   STDMETHODIMP_(ULONG) Release();
# ^. t( Y- `# h7 |' k! z4 n- W

" t9 K0 `+ y9 V// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
4 ]+ c$ _6 e0 ^" e' W, A        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
" J- @( X  k/ W5 o; p8 Q# I6 Y- Z7 @- T
: J; N0 D  L7 G( W6 G1 J- _8 N$ J6 e
private:
        CUPnPImplWinServ& m_instance;
2 i$ }6 f0 C2 o0 U2 w. u% o7 w        LONG m_lRefCount;
};
1 b0 p4 s, K! H! r

/////////////////////////////////////////////////
2 Y5 }' t6 p5 ]

2 L" p8 ]. w3 v& D/ q$ p" i* b0 c+ |使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
8 y1 b3 i) ]/ `* k0 Y7 a5 L! QCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.