UPnP

天云上人

/*uPnP.h*/

1. 
   + a: J, @# V* t/ g
2. #ifndef   MYUPNP_H_
   * E9 ?' ?5 O3 M8 R0 a* u6 }
3. 
   
4. #pragma   once
   ! B; g# z7 }& D  R" C# V/ u
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   3 P6 Q0 U2 F: p6 V
9. {
   
10. public:
    ( Q: S+ h% k) e" k# i
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
    ! o$ u" c3 ~. v, y$ k" A; z
17. }   UPNPNAT_RETURN;
    
18. 
    / }; K$ x9 }/ M  b% q
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    9 e& w# h3 N" o* J6 f
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    # n- X4 F# ^! Y  i1 S( i6 t
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    2 j4 Q4 T! @' f4 T; A
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    1 @2 C# q6 P2 ~- y0 F( T
32. ~MyUPnP();
    ! N: G' r, c2 a
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    ; ]! L( T4 a, D  {4 N  S+ [
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    % ^  J, m* X( }1 G, Z
37. 
    
38. CString GetLastError();
    3 d9 o7 }5 Z6 A0 j
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    ; |) c- O( c) [6 {4 b$ s
41. bool IsLANIP(WORD   nIP);
    2 l7 b, N. X6 \
42. 
    
43. protected:
    
44. void InitLocalIP();
    , M) V/ ?0 J9 Z$ g' X" U8 G
45. void SetLastError(CString   error);
    
46. 
    5 ]8 F9 [) _6 @. X: e
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    1 E3 S4 q+ t$ ?3 R# F, M
48.       const   CString&   descri,   const   CString&   type);
    8 _7 |& n6 E' g
49. bool   deletePortmap(int   eport,   const   CString&   type);
    ! n# d  ^. u7 z6 b0 M# Z6 k
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    : C6 o: @" `, ~. i* |& ~) d$ B7 c
53. bool Search(int   version=1);
    & g7 x. @0 w; m
54. bool GetDescription();
    9 t  I, I8 ?; P% w
55. CString GetProperty(const   CString&   name,   CString&   response);
    ) L* u8 b- E  v6 ~
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    3 }2 u4 C& N3 d  H
57. 
    0 B% {1 H7 Z- V8 R
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    : @6 Y2 |+ j9 u7 p, X8 p
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    : d, a/ Q# U7 e* w
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    + b  I; w; c! V: w3 g, e# F1 P7 U- m
65. CString m_friendlyname;
    : i- d" k" Q6 X  X7 }0 f
66. CString m_modelname;
    0 t; V( ?. J1 [3 I0 @% z
67. int m_version;
    % ]" R* A& j, a2 e
68. 
    
69. private:
    % u+ H4 ~" c. U% |8 [
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    3 n. N' @4 m7 y0 a1 g6 A( G
71. 
    ; c, }' N% N$ q
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    " j+ B7 t7 c2 ]9 A
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   , {! _) _* b" H! F6 n2 u6 \
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   $ ~! Q7 C2 _8 [$ x/ [
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   & e( A' }% d0 W  v, E
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   , O( b* ]' B4 ?  Y$ w4 k& \; l0 \
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    * e  b7 X" h; h0 w% {: P2 ~
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    : R1 \- B$ S3 t$ F! r* r
15. 
    . J" A: X5 @& ~8 c5 m, H
16. const   CString   getString(int   i)
    
17. {
    2 `( R' O- [! [, S0 w2 D
18. CString   s;
    ( s' m' }) r3 ~. j7 a
19. 
    
20. s.Format(_T( "%d "),   i);
    1 R- j7 ^1 K- _$ a1 t
21. 
    
22. return   s;
    4 u* H* f( Q. f- @% o! |7 m
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    ' _1 D9 n5 j5 P7 n
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    % l. Z9 ]7 u' x" b% r: a1 e, T7 E' D
29. 
    ) g7 [0 m9 X  H
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    5 v0 }( P/ b" i
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    ( K% E. V" e7 P* b( H* R; O8 d% r
34. 
    , `+ ~. E9 i) E: h' ^
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    ; y9 g5 A$ [% _# x. k9 t
37. char   buffer[10240];
    . E3 G* c% l/ O' l: ]) a8 V
38. 
    : u. V/ p8 E: S9 _8 s; R
39. const   CStringA   sa(request);
    * y% e$ C" n- g8 B+ i
40. int   length   =   sa.GetLength();
    # |6 M/ K& i0 v8 r- w; R$ T
41. strcpy(buffer,   (const   char*)sa);
    3 A7 L) P& q4 }2 N3 a& q
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    
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;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    ' T5 s) D; b6 ~2 J& M
55. Sleep(100);
    5 r# f# \& B: ]( O5 w
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    & q3 e0 Z( g; f& D, p! L
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    - x0 n- l$ j9 m! v0 o. r( E4 x4 g
62. 
    ( h: G7 N6 Q1 v( z# f( X) i
63. return   true;
    
64. }
    7 N7 K' T7 g( D0 E: ~0 S/ I, o
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    : \* _7 @$ W# f% ]
67. {
    & H8 y% `% ?" N3 ]9 y
68. char   buffer[10240];
    ; a- }" p# N4 e9 I# j- ~0 R
69. 
    
70. const   CStringA   sa(request);
    . r- s5 R* Z. d3 N6 R" O
71. int   length   =   sa.GetLength();
      p: O" i. n) \* d/ h; M# M% p
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    1 I7 Y8 e: r) l0 n. [8 t: I& P
74. struct   sockaddr_in   sockaddr;
    ) ~6 h1 d! x) O/ v0 J1 ]4 h
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;
    , ~1 B1 q5 \7 h/ p( @8 Y
79. 
    ' N3 C; L4 h# ?2 v7 }
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    
86. 
    ( d5 s1 Q5 V$ W' a
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    ) z; q3 K5 R; C8 d( Q7 P2 t5 J. v
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    7 n0 R: J* t& {/ ?; a! Y
91. 
    ' H+ a( u8 }) P+ a9 B
92. pos   =   0;
    5 T) J0 {. B  i3 {
93. status.Tokenize(_T( "   "),   pos);
    1 ~" N( {& i9 @
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    7 x) `" u5 j8 z7 B
96. return   true;
    
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     + m. V3 m$ O' W: n- k
101. CString   startTag   =   ' < '   +   name   +   '> ';
     ! D' f- ^6 S0 \  S7 {) b+ p
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     % s) [: G! [* Q. W/ z( y
104. 
     : y* l$ B$ p+ D+ @7 `6 S, k
105. int   posStart   =   all.Find(startTag);
     * q- L/ f9 s  h
106. if   (posStart <0)   return   CString();
     & l- V$ W# m; y+ X! l0 g
107. 
     6 O8 f% j5 ~) @  W. Q
108. int   posEnd   =   all.Find(endTag,   posStart);
     . g* v$ u! V; W# ~$ g& I
109. if   (posStart> =posEnd)   return   CString();
     & E% \0 e" x* A
110. 
     9 V: R) X' c1 P1 `
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     5 ^, T9 v* R9 q$ l- a
113. 
     , c- n5 g8 I2 i
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     ! h9 D) h' @9 w" P
118. isSearched   =   false;
     
119. }
     
120. 
     ) R6 k- I& q+ \* o4 b
121. MyUPnP::~MyUPnP()
     % g% H! U* i% d" D& H
122. {
     3 Q/ \1 h& F' O2 i3 {  @
123. UPNPNAT_MAPPING   search;
     2 H6 D9 k7 k$ |9 o# G: r2 |7 O
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     6 [% V/ E2 ^/ u  B
127. RemoveNATPortMapping(search,   false);
     
128. }
     % Z6 b( e$ U: w: ?9 Y6 a) b, O
129. 
     
130. m_Mappings.RemoveAll();
     + O. B; H7 i( i* b( l. v
131. }
     
132. 
     
133. 
     5 G. r1 h: |0 n2 L# s
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]   =   {
     & Q3 B4 T* _9 T) M3 ^
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     8 J4 R+ o1 @/ j
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     ( ], Q0 Z9 O$ W3 {5 q; v7 E7 i
144. };
     % a0 {- M, W8 g, j8 m1 a$ L3 E
145. 
     5 Z$ `- W$ t7 W% ~% T; t) o
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     $ F# M' i( p/ L! V# n7 M
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     9 P, x' d* J% O
150. int   rlen   =   0;
       Z# z" |# y3 I
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     , u/ d5 e2 @) G5 U# G
152. if   (!(i%100))   {
     " |0 H3 s; l) k: M: ]
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     / u* I+ f) E3 c: b6 x- c
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     3 s% Y; N& v5 |, A
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 "),
     # I5 h& V; X; ~) h, g2 j
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     
161. 
     
162. Sleep(10);
     
163. 
     : l) K2 X7 B" N7 ^
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     1 C% j$ a" F: Y3 D+ I$ p; G: K
166. if   (rlen   <=   0)   continue;
     , E% G. @9 h) v4 K  m1 [* V+ {
167. closesocket(s);
     ; S( l) K' G* q
168. 
     / g1 z6 g+ s( e
169. CString   response   =   CString(CStringA(buffer,   rlen));
     7 K; ~  M6 N1 |1 t3 _. z+ M$ o" U
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     ' V1 G2 [$ Y, D" H% l, r9 ]( E
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);
     5 s# `* K+ k. ^' c0 `  y# u- @- |
175. if   (result.Find(m_name)   > =   0)   {
     ; W& M' e  `$ c3 D1 l9 l
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     2 L# X4 S2 m, q& A" V+ L
178. if   (line.IsEmpty())   return   false;
     4 M  q  ~2 \- T; L  ?; b- n
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     ( w, W8 |5 S. M2 _5 i
186. }
     * N& K$ q4 Q6 C' ?  o
187. }
     
188. }
     
189. }
     0 e+ O1 ^; l/ p* G
190. }
     
191. closesocket(s);
     + M7 O3 X! T$ Z
192. 
     / R7 B  p  x- G3 g6 j& @+ C  C
193. return   false;
     
194. }
     

复制代码

天云上人

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

7 J' N- R: ~" w# L
4 E, G* u. k5 ~///////////////////////////////////////////
1 ^& Y* `& w4 T3 j, H( S* Z. }: }//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
% d6 k8 t- f- m/ X
  f- I) ~- z: |) H  d5 F2 P
' O) L! h- W2 w; O) R) Y8 ]#pragma once
- b2 j, X* R' p+ F9 o+ \4 ?4 [#include <exception>
# L1 _9 S- `8 {: i% P

  enum TRISTATE{
        TRIS_FALSE,
" J# X# |0 x% }( S: ^4 y        TRIS_UNKNOWN,
! v6 u1 a) c; L2 z* e' z1 I        TRIS_TRUE
};
1 L% X7 n3 {6 I& n4 o
+ ?: l6 V/ @1 |3 @- Y1 O5 P9 B6 s
enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
3 Q" m: s. y8 z: V7 N" ~        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};

' `. x7 X9 r5 E8 F9 o1 ~

% W6 I( t0 _( a! f
class CUPnPImpl
{
public:
        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
        };


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
# r! P1 |. f: F' F        virtual void        DeletePorts() = 0;
8 l& r! @3 k7 H- }# M! v        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
9 V$ E) w2 K" x& c! e       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

& w( V, F2 S( w; T
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
1 ]$ ?1 }% u3 h, i# U        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
+ z9 L/ C6 F- `% D0 b7 ~- I! @0 V        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
8 `5 O4 Y9 l( u1 I        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

' B& ^8 h+ `4 ]/ s4 A
. O* L. L9 ~. Y7 X; t: s// Implementation
protected:
/ n( B4 ~* j& M        volatile TRISTATE        m_bUPnPPortsForwarded;
7 b; [3 L6 S6 D8 ?# G2 ?        void                                SendResultMessage();
! H4 C0 r" {9 n/ M        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
9 ~9 Y" D, {( U6 E/ h, m

5 S$ V2 A, f4 b# C7 v' kprivate:
        HWND        m_hResultMessageWindow;
4 R+ {7 A0 |9 `  a        UINT        m_nResultMessageID;
9 @  d1 I8 V* ~, W/ F# S; O

};

  j* O/ t8 v% N
// Dummy Implementation to be used when no other implementation is available
4 Q0 l1 A8 F6 z4 O' jclass CUPnPImplNone: public CUPnPImpl
{
' ?! m6 V# p- p8 o( rpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
. A! X0 h% R# e' v  x* c9 x6 u9 q  ~, V) y        virtual void        DeletePorts()                                                                                        { }
: M) `* e. y' }! t        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
( d1 h. C$ J' ?; }3 x' v};
5 i- t4 E9 j/ [2 S
) p% t9 n/ `5 o$ k; c4 ]
* r- o8 t" {' e( G/////////////////////////////////////
0 E0 m; s. Y  y2 P* g, V7 ^//下面是使用windows操作系统自带的UPNP功能的子类


: n/ l: ?# \  t' F#pragma once
#pragma warning( disable: 4355 )


#include "UPnPImpl.h"
) j, L& [% L  Y* J#include <upnp.h>
#include <iphlpapi.h>
! T' c: C; z) q/ V9 g#include <comdef.h>
4 X/ F& `  I2 C/ y' I#include <winsvc.h>
8 _/ Y  k) ]" W3 V. `. K+ v
! _7 @% \& l% A8 B2 z# _
1 I- {$ E+ f8 n( w#include <vector>
% p4 C0 I6 |, z7 S6 T5 o% Z5 h  k#include <exception>
8 g. v0 t1 x1 F- [#include <functional>
! Z# b7 j. f0 d  `7 i( |; i$ `
0 e" `! I( ]# ^


typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
3 C# B+ q" I( Y& dtypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
! {# y' G- T4 v% i) g3 Ttypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
, V) R0 a+ O; U/ ~typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
2 Y8 O2 `3 ]$ c0 ]" O. G6 Mtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
: i* m* J: H" }- g* d  PDWORD pdwBestIfIndex
$ o: K% ]( ^% i8 M6 G- Z: [( V+ W& O);


typedef DWORD (WINAPI* TGetIpAddrTable) (
- H7 ?+ f% L8 D6 r4 D: i; ]2 y9 h  PMIB_IPADDRTABLE pIpAddrTable,
8 k4 f8 M" t; H4 k4 U% h# Q  PULONG pdwSize,
  BOOL bOrder
9 U% v# @4 ]- p* ~);
! Q3 Z% M6 U% ?. ^  L# v& m; u+ R

typedef DWORD (WINAPI* TGetIfEntry) (
* Y2 N) T6 s- _- q" X% L; S  PMIB_IFROW pIfRow
  D0 N, ~! M! i8 A$ R7 h);
8 w8 A3 c* i9 \
6 R9 {0 X& j# c5 G) [
CString translateUPnPResult(HRESULT hr);
- }& }# D- ~- B& t: E' U; b! PHRESULT UPnPMessage(HRESULT hr);


class CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
) x) b7 m9 o& C  `- r6 rpublic:
9 a6 i  W* @! H" U' |; [/ I& _        virtual ~CUPnPImplWinServ();
/ P7 K: }% p( f9 T; R% Z        CUPnPImplWinServ();
3 s! r- ^' Q5 \/ _( K; @' @8 u  A
: A9 `  l0 d+ H" T
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
$ ?( S3 Q/ A: h  z9 F        virtual void        StopAsyncFind();
9 Z# v3 P7 w' ?9 x8 N        virtual void        DeletePorts();
        virtual bool        IsReady();
  ~! I; [6 r$ g2 P        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
3 l$ Z! K& S5 r& ?5 _
% s. n' T# ]4 z) d: U0 p" {5 ]( D
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
$ t5 U. ?0 o; [0 ~2 h4 w% T        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
. ?# o# {0 Y" j/ X9 F        virtual bool        CheckAndRefresh()                                                                                { return false; };
, m) d! i  W  _4 [

5 Q) D3 j7 U: S8 [2 S3 L* Zprotected:
        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();
        void        Init();


        inline bool IsAsyncFindRunning()
8 Z9 M* o& z" e) J1 Z. |        {
3 N* B, |* d7 x  G0 |" O/ T. I: v" |                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
# Y8 A: U4 ?2 R$ {) b) t0 s( n                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
- b. p* U6 d, s/ b4 ]. ~4 I                MSG msg;
/ f% A2 B3 O$ P                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
: X. N7 J6 d% d4 }                }
                return m_bAsyncFindRunning;
        }
' b0 y4 o6 H* r6 H. m

3 }1 F% E, a9 [2 n        TRISTATE                        m_bUPnPDeviceConnected;


& [* s( c: S/ L5 k// Implementation
4 W0 N: z2 a. ^" |; t9 N        // API functions
' j* ^6 I# d$ ^% u9 @4 P' E        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
/ k$ X8 C$ X; Z/ m2 h6 U. H        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
7 q" _! P! h) _; e! \        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


, ~- x( E3 X( n        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
  i- m; K  t' J! D6 {        TGetIfEntry                                m_pfGetIfEntry;
  M$ s- l9 J' S5 E0 z+ d# {

        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
, f! Y1 U# |# q        {
  [7 ~5 S; y( L6 o                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
; c0 m, \* f; \) x0 |/ i                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

4 B6 z4 M& f; X! c  L! m% v
1 ^, J5 \/ v* H% `9 l9 g                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
4 e+ M) C9 d6 I

                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
. Y% Y" Z- Z+ v' O: P                CComBSTR m_udn;
2 v  @' B/ |7 m% ]        };
5 K+ ]& J/ {$ b       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
) @( R3 T% h9 S& a. ~- z# w        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
4 X  V5 Z" A: ]3 E        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
, F5 s' ]9 F" G( L% c5 P2 ]                LPCTSTR pszInArgString, CString& strResult);
' T$ F5 l3 l! N% j        void        StopUPnPService();


$ z* G/ e- _& j. C& P- U  s6 \        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
" H5 Q6 f. b- c- @$ h# \        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
/ _1 I4 w1 R9 p+ Q; O        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
: P% q  ~4 i! J( J        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
9 ]: b: @1 [, J( y/ f6 @% g' P' ^        CString        GetLocalRoutableIP(ServicePointer pService);
' ?; W5 u: y; L  Q" ^) C* S2 [4 I4 u

5 S- o6 z9 S: C+ _9 v// Private members
/ r9 A1 h! L: i3 P- I/ Xprivate:
" I7 F# J( O+ A9 L1 A        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
" m5 g1 A- S6 t1 q: m, W        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
" O/ t0 J0 w  N7 E        ServiceCallback                        m_pServiceCallback;
: l1 d; P+ R# p- `& n
2 M3 E2 v9 H4 j" K- N: @5 D
- ^4 q1 H! \6 T5 w  c' V8 [        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
+ v, o# z/ l- I$ p* w1 e: T        bool        m_bPortIsFree;
4 k' O% c1 P; r% g        CString m_sLocalIP;
        CString m_sExternalIP;
* i) J0 a) u: a' @& `        bool        m_bADSL;                // Is the device ADSL?
" W; G, U) ?( B8 \2 ^  ~( j        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
$ q7 l! t2 b% M) `. s) B        bool        m_bInited;
2 s+ z8 y1 T+ [; V- |+ I$ z1 K6 q! t        bool        m_bAsyncFindRunning;
& W+ m0 Q) X' H! P& |        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
8 r# ?# [: o1 i  [4 c        bool        m_bSecondTry;
8 S2 I3 D, r0 d7 a0 A        bool        m_bServiceStartedByEmule;
1 _$ F6 j; i% S# z& L- q        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;


' W: i) _" e( J' E};
# Y- B: f2 W+ E5 d/ y( c6 E

// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
: X9 M. ?& U, @! [        { m_lRefCount = 0; }


   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

3 R0 v% O2 U* n, s; x2 _
// implementation
" Q/ A0 v8 i8 o" }, J; q' Kprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);


private:
  t0 O) i* V' @7 h2 R$ Z        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};

( D- i  R% ]& ^4 s+ G! J/ F  S
5 P, ?. Z  \7 m// Service Callback
$ [( s" w% H! A: x7 J% w3 Xclass CServiceCallback
  T) ^. m" D, |6 T4 r        : public IUPnPServiceCallback
{
public:
$ j8 j5 q2 [, l6 D  B, p( k        CServiceCallback(CUPnPImplWinServ& instance)
9 c# K4 M; O: Z7 ?/ M                : m_instance( instance )
( v( B8 ~$ [# J3 g* @+ q        { m_lRefCount = 0; }
8 F" s  x! L- U1 O2 i6 G5 F   
  t8 ]* g* }& g# M* V: X6 @   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
, \# U% k: W7 m; z( O0 Z   STDMETHODIMP_(ULONG) AddRef();
+ a* _$ T% I# u( b: \   STDMETHODIMP_(ULONG) Release();


+ H& o0 ]1 u/ {3 i6 y" g/ ^// implementation
" K% w/ c. z) L& C4 Fprivate:
  c. X' ]' u9 D0 D        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
! {, p9 d9 g- u7 y: e" C' ]5 I( s3 p# ?        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
% M) `$ c1 s7 R, @  r& \) |. T. Z1 m4 l, D
2 l1 `+ Q1 Y* d, n
, `2 U/ B* j, U; X0 l, Y9 ^; s9 Oprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};


$ @+ a, Z+ D9 B; m7 v3 ^0 o/////////////////////////////////////////////////

- Q6 h; B* \, S& |3 e% d2 d
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
! y- d' K& z  L" C/ d  ZCUPnPImpl::StopAsyncFind停止设备查找.
  @* W& J) ~7 o$ @( ?+ \) |CUPnPImpl::DeletePorts删除端口映射.