UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   5 y' \3 ?" \) `" R/ Z4 p; I
3. 
   
4. #pragma   once
   
5. 
   " C* A' O4 T: Q* D$ Q
6. typedef   unsigned   long   ulong;
   1 p5 `& ^' p. G' t
7. 
   # x5 F! X7 o2 B3 k8 E8 ^
8. class   MyUPnP
   
9. {
   8 f6 @2 g" O: g% O! f
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    9 D9 j# J& u2 p* H1 n5 \4 _
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
    
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    * `% v. _6 g- j) d! r* \: m
22. }   UPNPNAT_PROTOCOL;
    3 I" i3 c0 J1 z) [& M; p
23. 
    / b- ?& x4 O" P' G
24. typedef   struct{
    % j' l) n  y+ x
25. WORD   internalPort; //   Port   mapping   internal   port
    + s4 Y; U- L/ b0 x1 y; r
26. WORD   externalPort; //   Port   mapping   external   port
    ) K( P- W5 ~6 ?, f1 H) {% j
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    ) }6 R# a* J  h; J0 S5 B
30. 
    & ^! i3 r2 V; a: i5 m
31. MyUPnP();
    
32. ~MyUPnP();
    : D1 w4 \% e* W. h6 h$ u0 W" ]' a' R
33. 
    & {- ^) w/ F8 B$ a
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    / p( R- D7 U' o
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    % X9 a/ W5 @2 C5 p) c* |
37. 
    " Q3 W: u; \  P3 r
38. CString GetLastError();
    * n" Z8 q; k& p4 C; A
39. CString GetLocalIPStr();
    & _# E; O2 [$ \% F" l
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    ! s# y: s3 k8 ~3 }4 j
43. protected:
    # ?; f3 @6 f& r" J  I; t% e* J( o
44. void InitLocalIP();
    4 Q) g! J& L3 A. C; v' j- d- n9 q+ @
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    - |' Q; g1 }# A' |( n- Y
48.       const   CString&   descri,   const   CString&   type);
    7 X) q/ N7 D0 @# N- E
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    / \6 e% ]6 D3 z5 B0 u% ^1 A
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    ! e5 G% j4 L& e
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    $ e2 ]% {# w+ i
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
      _- I6 x; r% X
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    , f& }8 Y/ N; I4 X& y, I7 D! c. W
61. CString m_name;
    
62. CString m_description;
    3 O$ s& Z5 ]( v" p6 }
63. CString m_baseurl;
    " P# ^, Q/ Q& M% F8 x9 Q* v
64. CString m_controlurl;
    2 k5 e7 T* g* N; w9 j* k+ U$ Y
65. CString m_friendlyname;
    2 Z) X6 N" i& `, x: D8 Y7 J
66. CString m_modelname;
    
67. int m_version;
    
68. 
    4 c6 B7 E9 r0 F" Q
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    ' I! l8 U9 w/ h8 B; @( p
75. 
    
76. bool isSearched;
    # D# P) |% r0 y( j& d0 m% J/ P
77. };
      ^( v5 G" A7 @0 O
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   - z# {- f! Q; ^7 _6 G; a7 H
2. #include   "stdafx.h "
   
3. 
   8 j$ Z( s: I5 O. V; u
4. #include   "upnp.h "
   ( M& y8 M9 K# l' n. m% _" K
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   # G2 I# @) M6 @. n9 N$ a( x. X- g
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   2 c* L5 e! `+ X8 A6 p
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ' ~2 g6 Q- h( h2 E  z5 t5 L
13. static   const   int UPNPPORT   =   1900;
    # A& h8 `2 {8 o, i* q1 y
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    % K7 P* n! O- \1 I, Y# q
17. {
    & i. ]( u1 p! q0 C4 o* v9 a7 {
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    1 r8 E7 l: u8 |
21. 
    " L0 ^0 t. J* A' R  e. E
22. return   s;
    5 m) D8 J! f0 e' y
23. }
    - X0 Z3 g" F3 I9 E/ y
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    " K" ~3 e& R7 n- _1 t
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    * @; ^: k! n- q3 U9 {
33. }
    4 T  C% P/ o  J- v- x& O/ e
34. 
    0 e1 R$ u0 M6 i4 \: |1 f
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    ; {# u6 u5 v  l0 N2 i* w
36. {
    
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    6 K; T) U0 {: _0 v" ~0 p/ R2 u: [
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    7 J5 o0 i3 D6 K! e" L5 e: t' i$ X
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    # w: D( K4 d3 y. ~
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    % |( E. o# H  S: j
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    * P" W9 l# ^: w. g4 l
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    3 Z% G5 |& i  ?. j9 k9 C* S7 _$ @; _
53. Sleep(20);
    ! j# p1 S1 v6 J. L- |# k
54. int   n   =   send(s,   buffer,   length,   0);
    # n5 T  V0 A! U+ r
55. Sleep(100);
    ) c: A, q1 }8 H6 a3 c3 |
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    + m* z8 Z( c: o
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    
64. }
    ! I7 Y3 h2 a* b& k; ]8 v  H
65. 
    4 w* ]7 a/ n+ E  k
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    7 j8 M6 d6 c9 N. A  M" k$ }
67. {
    
68. char   buffer[10240];
    7 w, d2 P" y! f7 D0 ~  Y# e
69. 
    5 P6 S# G% ~( ?) \$ v" o- x% k
70. const   CStringA   sa(request);
    # p+ l  ?  n% _2 h  A* R. C
71. int   length   =   sa.GetLength();
    * ?7 U' W8 X) A- u+ B
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    ) O) s4 k: q% R! s
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    * r4 t3 }) h7 r+ y2 @/ T" y
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    7 j' o4 X/ g0 S' v  _1 p* }$ v
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    : i& S9 ?1 U, ~
84. {
    
85. int   pos   =   0;
    - d1 ], p' Y! r. |1 ^
86. 
    , D9 d2 d% o/ E, |- w: j
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    , e! S2 _- W1 b8 {5 U" u
88. 
    % U! {, e! M* s6 |' {% W
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    $ e/ ~  R& D( Y7 |- S
92. pos   =   0;
    7 {: B! y% N$ p4 m5 @9 j4 U
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    3 f3 s% V" ?$ H
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    1 m- u; N# \+ w' O
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     8 I  f$ ]( Y& v- j( M
103. CString   property;
     : q' U' n3 S2 S) `* S3 N0 @
104. 
     # K$ v0 ]0 S1 L) {: v8 Z$ J, i" M
105. int   posStart   =   all.Find(startTag);
     . x  r! @4 Q! I' k' {0 c
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     ; l- ?1 V+ O8 ^% ]4 S; _0 a, E+ n
110. 
     , Q8 h7 [9 J# ?8 X( d7 J# g
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
       n9 R. B9 z( R+ L' z, X8 K
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     ( ~2 u, {" m) m, X- }; T! m$ H
120. 
     
121. MyUPnP::~MyUPnP()
     7 E' M( q% S/ w  y1 h3 \
122. {
     6 J& b7 l, m0 R( b# Y3 [5 ?
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     ( [8 B4 b* @6 h. X
126. search   =   m_Mappings.GetNext(pos);
     + f. A. j/ A" a% V) C& h
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     6 i( s5 r1 X: ^
130. m_Mappings.RemoveAll();
     
131. }
     $ w: g9 X) G; F
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     & ]+ P: I: [2 ^& q3 E* M4 @/ q
136. if(version <=0)version   =   1;
     $ _: N- X/ i6 v0 C: N# O
137. m_version   =   version;
     3 w( ]' [' _3 O5 ~! G! d! p
138. 
     8 R# Q2 l2 f; L+ }3 X' X
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     4 _5 t* \7 r# x! u' m% p. x
144. };
     - f4 X0 R3 [' t; |& w8 K
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     ) Q/ @7 s4 n7 ^* i% T( d
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     * T: X# v) q7 ]6 |& ^/ t0 j" l. c9 a
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     ; H9 B& i5 @% y5 A. h
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);
     
159. }
     
160. }
     
161. 
     
162. Sleep(10);
     0 K* l& |8 h+ s3 S
163. 
     ) X# A) D, U  r
164. char   buffer[10240];
     ( Q" E- D9 a1 [: v1 X4 {
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     8 f+ _" W' U7 c" Z1 v! a
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     8 }3 j/ H, L) m% U+ D
168. 
     3 j# u+ `3 |: Y
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     6 ^: M& v/ k! \8 I  O6 i
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     * {( ~, B5 x6 x4 X" ?1 N
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     % s! O' g$ f) n& _4 _' k
180. name.MakeUpper();
     $ w/ R5 y2 X  \! K% C) t
181. if   (name   ==   _T( "LOCATION: "))   {
     # w. b. ?. g3 Z
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     7 H+ o3 h6 w1 n# k
185. return   GetDescription();
     
186. }
     2 U0 V5 `  i5 A1 O' f' B
187. }
     
188. }
     0 K+ m4 s% E  u& a. E: b; H
189. }
     - V; D  ?7 N$ X" F+ F, ^
190. }
     : a, V- \( Z% v, y
191. closesocket(s);
     
192. 
     ( H8 R; ]$ M( f; x$ T4 h# x
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
! }- |/ k7 [8 [8 p' z

4 f: C% g* l) f///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


- K- W3 _  j/ B+ B; S( C#pragma once
#include <exception>


" ?4 f1 i/ y2 m- Y( J+ {3 ?2 h  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
};

' u5 |  k( ~, h& d
enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
* P" I; b* Z- b1 J  e        UPNP_IMPL_NONE /*last*/
};
$ P* \+ _! j4 @6 M

$ ?# U8 Y( ^! ]$ ~( T6 ?
; O! R$ ?- F: R/ N+ n3 A( v
class CUPnPImpl
{
public:
2 N! ~0 h5 \/ k3 `4 Y* g        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
2 M5 b6 u$ Y) ~- s, R        enum {
# a( P- y) R# A/ @. @: ~: k4 q; T7 U. l                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
        };
0 a/ l( k/ y! C( y
$ A# n! J1 s) [% E; W9 v
1 ^( I" B, \% ], l# g+ N        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
5 S2 h. W4 X6 C' S' Y$ x        virtual bool        CheckAndRefresh() = 0;
& p0 F1 n1 K1 n/ d- r$ E5 f        virtual void        StopAsyncFind() = 0;
- c! t/ _: A' J/ }# s/ c& r- ]+ l        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
2 a# y6 ^6 y; h" k       
# m. f) K  U  f! c! E! j        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

* L; y8 E+ ]4 B. w( m" ]
! k" N, V" C7 A/ _0 M0 A        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
: C; @& ^  o# o$ _/ p        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


// Implementation
protected:
" N) L( P7 A. b4 b+ G        volatile TRISTATE        m_bUPnPPortsForwarded;
* c. Q8 F3 m+ [! M* ]6 u, e        void                                SendResultMessage();
& U: \& ?( E7 d        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
7 S7 F0 ^( X) p. Q$ R$ f        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;


private:
" D5 n1 F! [0 w$ i6 y" O        HWND        m_hResultMessageWindow;
2 ]+ J/ ^% s( p5 A        UINT        m_nResultMessageID;

3 j2 D2 B$ M" x+ q' R9 j
};

- m( b) ?4 O! v" w
// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
7 o9 b: X7 W* {: b3 A* ?7 k: t{
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; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};


/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类

1 R! x3 a& j  f# z% ]2 Q) [
#pragma once
3 ^" e: }; Q( B: j5 p, z9 M#pragma warning( disable: 4355 )
7 f' j  p1 E5 A: k# x: g3 J
. _2 {5 T+ t9 }7 f9 B+ v
#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
# @4 x' `5 `7 m2 X, f( ]9 _# K#include <comdef.h>
/ e) o/ m: Y) r#include <winsvc.h>

3 @. j! K+ c, q3 ^2 K& |# S1 k5 v
#include <vector>
#include <exception>
; R, G; M6 Q- ]/ h7 \+ y& @2 @#include <functional>
3 a. S3 d3 B( _1 x2 h. k0 Q

2 t: z$ d4 B& @: V8 @$ }5 l
. s0 q+ X4 W; M' A
" G7 k8 y2 f, W) Rtypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
3 q9 L& e$ x& q# x* W5 itypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
6 B, a& s3 O' n1 |typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
# \7 W' Y( [' g9 U# n. z' btypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

7 S/ _' F  N1 r" K
; H! @4 N! ?8 {) d( Y4 N6 c: Ptypedef DWORD (WINAPI* TGetBestInterface) (
' W+ x" x/ _& [  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
: s: k' `% X2 V( X! @. Y

- Q% {0 H; v$ ^5 S, wtypedef DWORD (WINAPI* TGetIpAddrTable) (
; K& _7 A5 S% Q* @  PMIB_IPADDRTABLE pIpAddrTable,
3 o+ Z% A  {9 |6 t  PULONG pdwSize,
  BOOL bOrder
  Y, ?3 E/ Q* J& A3 s);

4 j: w: j" V' \- }. R5 y
typedef DWORD (WINAPI* TGetIfEntry) (
- ~) f6 u, w! r6 a+ a  PMIB_IFROW pIfRow
);

6 D! x& B# A# k" E: x3 I
# b6 N" L. h+ Q$ B7 UCString translateUPnPResult(HRESULT hr);
( i4 ~4 U8 O& h& QHRESULT UPnPMessage(HRESULT hr);

; Q7 W9 [9 X% s! T$ A1 V+ N
4 z" Z( K7 F3 {6 {. n4 m1 Z; Iclass CUPnPImplWinServ: public CUPnPImpl
$ K+ t3 v5 T/ R{
* m( o0 T! I  u6 P6 c& Q        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
. Z& b& C5 R. D& A' p9 V* }// Construction
1 y$ z% O; ?3 v4 E2 p: G4 ?+ lpublic:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


. d" M! k, u* h( e6 H% }        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
. C. [" G9 a4 C6 l& r( d        virtual void        StopAsyncFind();
8 T8 f7 h7 J1 A        virtual void        DeletePorts();
        virtual bool        IsReady();
: @, U: e( u, g6 P  C$ c        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }


3 z( u- q4 O+ w7 t8 L9 g' |+ i8 w        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
7 v2 O0 ]2 U. m7 ~' j" j3 c        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };

) B/ b: S0 G: c& q7 o
protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
( s+ k, r" G2 z$ I        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
2 I/ d, o5 D' V+ G5 l  c4 Z        bool        OnSearchComplete();
9 U4 Z$ j1 a2 l        void        Init();
, v3 ~, u, W& j$ N% ]
) c' i2 H7 G4 d( b1 L9 B, |% K  N
        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
8 ^( X1 q& Y9 w0 K3 U7 K& ]                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
                MSG msg;
# a1 h! A2 h6 D  r                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }
0 N: X7 ]; t  n1 p$ i( G
$ s7 `0 b- [0 x! _. j
+ J! s( m6 l+ i+ k# q8 A8 z$ n6 x        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
4 B; S+ M: P0 M8 S( j9 ?        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
9 L6 }5 c" [4 \0 D        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
, K9 w/ e$ u/ w( o+ r        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
2 p2 o2 g. K7 A0 }8 g6 u3 Y8 ?        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
1 ]5 _% Y. t' m, J        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

' j, U3 e& v& u' Q1 S9 E0 ~
7 d. j* {5 [) [        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
  d. d, L6 _% |2 w        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
8 g" k! K7 D$ N4 _. M- H4 S, k                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
/ A9 }! K3 y/ a* s; W- I0 h3 u( ]                {
: z( R$ ]' r2 `1 V9 D                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
( o/ G/ d" Z& i( `4 [* c% [; [

                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
# ]3 u) U( X( K
, G0 C' u: ~6 E
( R: I6 Y2 o, u; d                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
        };
4 @4 G- I& {  Q3 O       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
7 N- p8 P3 y$ W' n  v        void        StartPortMapping();
8 x: M; _2 Z0 |+ v+ j        HRESULT        MapPort(const ServicePointer& service);
  I$ |, @( H6 g        void        DeleteExistingPortMappings(ServicePointer pService);
7 M" Z( D$ E. x9 G. |/ o3 L        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
: b3 N* D6 r4 S# @9 F& g# k- e                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

$ ^, s2 B% t: Y3 p. I
        // Utility functions
8 N1 b4 l. r% V        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
- h! t- j8 p2 V8 Q% X* j( C3 ?        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);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
- x, v! p1 R5 }. z        CString        GetLocalRoutableIP(ServicePointer pService);
# h; u. O9 w: C3 \

1 i, c* o1 |0 Y1 a! f// Private members
8 E" x1 Q8 d: ^- i( C- i3 Jprivate:
7 }9 D3 |$ j, _  E+ ^+ p& x        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
7 Z, R7 T( j; q$ _& v0 m. x. ~        DeviceFinderCallback        m_pDeviceFinderCallback;
" T# z+ F6 S0 x  v; m7 R9 c8 [        ServiceCallback                        m_pServiceCallback;
8 Y' b& ?2 }  S: A; p4 o: T/ M
0 g$ B5 N" m6 a
        LONG        m_nAsyncFindHandle;
/ n% s1 V" g4 V# |0 |        bool        m_bCOM;
5 P! J3 \3 y1 v% @' f; L6 a$ B        bool        m_bPortIsFree;
6 ~' u2 |- k$ V% G! {. E; i3 i1 ?        CString m_sLocalIP;
6 U0 B+ \4 \$ v/ P3 u* P        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
% l! E8 k8 e* W( v" a* U        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
3 H% D: t9 M  d% r$ Q5 ^+ G        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
, l1 X! ?: q6 Q3 X! S" s        bool        m_bServiceStartedByEmule;
" r  q' X# U# c$ T' x        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

2 q6 L  L4 H& ]; ?' S% S
};


1 I+ R0 v7 C: M% S3 t// DeviceFinder Callback
- v6 k9 Q0 Y) i# D2 d1 D, [6 |- Rclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
6 [" M( i3 `/ B1 xpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
4 {( B& u. n. k/ n6 W

+ r" N+ ]7 o( \& @' K( N   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
$ }  N* P3 F( O. q+ w+ l# p   STDMETHODIMP_(ULONG) Release();
4 z# m& b/ [4 G2 G6 l6 v3 o# p
% x+ Y. @- C$ y& g
// implementation
private:
/ q. q, w- J, k; W9 o        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);


% o1 a  R0 m5 fprivate:
  a9 b0 Y' K5 Z5 @        CUPnPImplWinServ& m_instance;
$ C/ M1 Y0 Y7 q& Y% G9 I        LONG m_lRefCount;
$ E6 V( B; m# N( o: O};
( m2 h2 Y5 K  g5 X  ~/ E

) ?) c) q% x7 M2 L& ^// Service Callback
class CServiceCallback
+ z/ o' a7 P4 s4 ~        : public IUPnPServiceCallback
& ^: ]2 F" v& H2 o( W: O# e! C, [{
( {2 t; e" R, k) j" Bpublic:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
   
$ _/ t6 [4 A; r2 i! q   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

. a2 E' y0 c0 P% E6 D
// implementation
  Q7 e6 c9 _0 o8 N7 M  Wprivate:
- ]# P5 _: [. A1 N/ @        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
% r" y. \# _6 {# @) j        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


9 F7 j, e5 n% b8 K9 [1 r, g8 R6 Rprivate:
        CUPnPImplWinServ& m_instance;
1 M- w2 W$ z% t. ]8 o        LONG m_lRefCount;
: P, B0 @6 k$ P& M' a% f* B  L};
' P, P; t9 O0 Q9 f
4 q; h/ n" M5 X  A; a, [8 `
/////////////////////////////////////////////////

! N6 u. V. v* `; P
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
1 W) W, i/ R& Y3 V, R8 R) {, j* s) MCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.