UPnP

天云上人

/*uPnP.h*/

1. 
   ' }; K9 f) f; T/ y9 }% m5 W* K8 @" z
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   
5. 
   , t0 |( X7 G/ s0 [/ ^( ]1 b
6. typedef   unsigned   long   ulong;
   
7. 
   , o& U' c8 E  W, S- w
8. class   MyUPnP
   # ]- ^5 p" e# Z
9. {
   
10. public:
    + p" A9 D. s: c4 O
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    + q& e: f7 W9 H2 X) W4 r/ \( @
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
    5 _4 q! m& q7 g+ ?) P( V% R
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    ; E& y; Z# ^1 E+ _9 [+ O; n
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    * t* m% ^/ ]# r0 K- I
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    2 J+ d" M# A9 v( t! l; j2 p- S
21. UNAT_UDP //   UDP   Protocol
    8 T% E" X/ y  `: U+ Y% T9 ~, U
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    " g# v) T0 E6 q# w% F9 W- F+ V
25. WORD   internalPort; //   Port   mapping   internal   port
    , O1 d3 O2 \* g; y: q
26. WORD   externalPort; //   Port   mapping   external   port
    " r0 j  i5 ^, l+ L' t" P- S* y- {
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    8 K& e% k  w7 b+ M' o# p
28. CString   description; //   Port   mapping   description
    % K% l/ g/ k: b5 `- h5 G! _
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    2 M9 A7 Q' j* N7 m
32. ~MyUPnP();
    . H- q3 I7 A7 N9 Y4 N4 B6 v
33. 
    4 [: D' `6 Q. p) e" I' P& n  l( T
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    * w6 F1 w" \! Q: p# [, P3 A
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
      T1 _3 V, o. d
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    : F; `; r7 b1 }
41. bool IsLANIP(WORD   nIP);
    
42. 
    # e- v5 [5 m4 ^" h' O
43. protected:
    ' q$ T& W4 R+ d! Y2 f6 j2 g
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    % q" a) w. L8 q8 G7 X/ q
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    " v% X7 {7 z- {- ~" N
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    " Z& L) o# {7 N4 }
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    2 C# `8 E. j5 Z. u
52. 
    
53. bool Search(int   version=1);
    + X" D& X* K1 X$ }% [5 X
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    8 c/ P$ a9 [& E( K! {4 j
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    & |+ \) v. w$ ~
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    + x/ O! I& w5 a3 [0 b( p" K
62. CString m_description;
    
63. CString m_baseurl;
    + y! D0 L% [- G+ j5 X# ]2 {: d
64. CString m_controlurl;
    6 E9 L! H: j1 l) Q) g0 {1 U
65. CString m_friendlyname;
    
66. CString m_modelname;
    + |- S( m  e' h% F& P  F: d
67. int m_version;
    
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    9 N  A. y+ ?- a2 N: Y$ S9 r
71. 
    : D) ]1 U8 F- E& q* a
72. CString m_slocalIP;
    
73. CString m_slastError;
    ; z4 H- Z% L9 H8 U& \  h* q
74. WORD m_uLocalIP;
    # s; ^( X2 w! A
75. 
    
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   & `9 n1 X! W( o- U3 R% H% ?
2. #include   "stdafx.h "
   
3. 
   0 s& a% c- y3 j' N; O. m; Y
4. #include   "upnp.h "
   8 C' d  y! X, L& g: x
5. 
   4 @8 e: _! Z8 Z" j' n9 b
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   8 h3 `: O2 N9 y# Q+ U
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   ; p; x$ X) V* l3 g% @
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
     Y9 f# R6 n5 i, c& Y* Q
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    4 b1 m5 }8 \7 Q& S& H" P- o
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ' o1 [. V6 ~6 ^% t& _* {
13. static   const   int UPNPPORT   =   1900;
    # c; _( p$ S, ~6 G$ `
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    8 L1 M4 E0 V) B8 T
15. 
    
16. const   CString   getString(int   i)
    
17. {
    ; }4 I5 O2 L( y6 E& ~( |0 G* Z; [
18. CString   s;
    . h& q% g+ ?( `/ ~* H6 ^# W
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    3 f; N0 @# n7 c% d) K
22. return   s;
    " D3 t, B1 G/ S
23. }
    ' D( b2 j9 b- w4 ~5 @
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
      o# v" Y9 o2 s  n7 W- C
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    ( w' X( k$ X! T* _8 D8 J
31. {
    4 b, Z8 l1 I8 F, j
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    7 B1 z) ]- H( F
37. char   buffer[10240];
    % z8 d, b( V4 M& \) e
38. 
    # O1 h8 N( g; f( B) t* b2 l
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    " F# }! D- Z4 J  `7 V6 m2 j) P
42. 
    " W6 }5 X' R5 Q3 \; |5 Q8 q/ ?
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    " n; o: O( H* s. B
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    $ K% C9 O3 s' C3 z: W
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);
    
55. Sleep(100);
    / \  b: F% Q$ T: k) f
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    . {, ~- i+ m9 k
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    3 D9 J  ~! G2 q) Y
63. return   true;
    , E: A' \8 {. Y2 u7 Q) z7 P
64. }
    - k$ x5 v& }( m7 W0 J. l
65. 
    : F0 k/ v, b. U* q
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
      k8 ^1 w" m0 ^7 Y  F; x' P8 M
68. char   buffer[10240];
    
69. 
    7 V4 X$ Z/ V9 ^# C
70. const   CStringA   sa(request);
    ' F% x% C# M( q& M4 W: y0 A3 o
71. int   length   =   sa.GetLength();
    % q) {( T0 M4 a, a( v1 l  y9 b% q: E; x
72. strcpy(buffer,   (const   char*)sa);
    : |5 L7 H3 \0 v4 s8 i
73. 
    
74. struct   sockaddr_in   sockaddr;
      z: Z! e6 z$ \) w
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    & t* T* w7 B: E* q  G% h
76. sockaddr.sin_family   =   AF_INET;
    1 m' J/ K9 c9 @9 b9 H2 S
77. sockaddr.sin_port   =   htons(port);
    9 M, P- j; n! Y0 Q' P7 M
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    . }/ R9 }3 P: {1 T2 W& r
79. 
    , M' j% y/ k7 O4 ^( |. c" l' }
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    6 s3 H& M5 S' G  {9 ?
81. }
    
82. 
    ) R9 x0 F" u/ d# t# Z2 p/ g, {
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    0 Z* t9 r  q6 m" `/ }0 q% l$ a( s
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    ' ^5 [* L2 E# e" c
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     , a8 R, E* z- ~# \* k0 _6 ^
104. 
       B. L! D4 e7 M4 t6 @5 G' v
105. int   posStart   =   all.Find(startTag);
     4 g. b( f6 C* z/ {2 g( ?. A& N( }
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     * G% `3 }- R# r3 Y
109. if   (posStart> =posEnd)   return   CString();
     9 x. t( d- J2 A4 T2 z6 v
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     ) O  B  C' @% n. u' J/ A, j
113. 
     
114. MyUPnP::MyUPnP()
     0 [6 {  S; {' }5 Q" d, T& `& a
115. :   m_version(1)
     
116. {
     ! D/ K! |, D1 i  z" g
117. m_uLocalIP   =   0;
     ) ?- x4 c9 h# e7 \( b4 f6 ?/ G
118. isSearched   =   false;
     0 k. {8 p* T& k8 ?, l" N
119. }
     ! l- `$ O" b, ~* }4 f5 m; U
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     5 m) H" k+ _  K" Q$ P: N
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ' G' D2 d( x, P( W' S$ \
125. while(pos){
     + e. e9 y1 W) ~
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     ; s9 ^9 ?. Q( O/ ^- R, v
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
       t% f& o" K9 J% [' r0 y: [  b. `
135. {
     
136. if(version <=0)version   =   1;
     5 O* H4 h6 @7 J; T
137. m_version   =   version;
     
138. 
     1 X/ K  |/ R) }) [2 i
139. #define   NUMBEROFDEVICES 2
     " e7 o6 ]6 Y0 W) [. E1 N' M) E. h
140. CString   devices[][2]   =   {
     2 ^: }+ _% n0 p' a, M- j& z
141. {UPNPPORTMAP1,   _T( "service ")},
       s% H0 ^6 m/ k/ B
142. {UPNPPORTMAP0,   _T( "service ")},
     9 X+ t5 O" c/ B' N& x
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     : r3 T2 \( i- X' Z
144. };
     ' Q( o" U* h# t9 i/ O! c  Z* ?
145. 
     + Y9 t# U- g7 n9 a( |4 G% x
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     4 o/ }( y  o: Z& _5 ^
148. ioctlsocket(s,   FIONBIO,   &lv);
     & j3 v- \, K2 j3 \8 Y$ f
149. 
     
150. int   rlen   =   0;
     7 U9 M: P" p/ v$ d/ z# S
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     ; _5 O9 y7 w, m$ S
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     , K) `8 K! u0 s$ B- S
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 "),
     3 M- Q3 `! F% s
157. 6,   m_name);
     + \+ m( F2 v+ y; c
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     ! ^. A, x! Q; o+ @" B$ c
159. }
     
160. }
     ; I! U, ^: j3 |6 W
161. 
     1 D0 ^. B- @* x$ {3 W6 H( x2 ^
162. Sleep(10);
     9 E& d9 [) G3 b
163. 
     / n2 i* ]( \0 D
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     9 r. j& [, B* o9 R7 @% W. g% s
169. CString   response   =   CString(CStringA(buffer,   rlen));
     - ?0 Q7 B- _! V! c$ K5 H3 {
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     ( _. |/ @7 a: n" l# R
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);
     ) j$ ^% L- n& k( q3 ^
175. if   (result.Find(m_name)   > =   0)   {
     - W. e' b$ x: q% @3 ~9 @
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     8 L, O. T  @% w% L5 Q
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     1 L$ g( Z9 I- u! e5 H- Z
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     6 c8 V5 g+ a) Y0 c9 Z" d; C5 u
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     0 u2 _" S) C. D. w
185. return   GetDescription();
     4 ^8 v6 K. F' \* D1 |; Y% Q8 Y1 I
186. }
     
187. }
     
188. }
     9 Q7 ~% ]9 b' o' w( g) B/ P
189. }
     8 ^" N$ M$ y' {% U/ P+ X
190. }
     6 P$ B+ s& s2 o# n) L
191. closesocket(s);
     
192. 
     9 H0 n! u4 ]9 a# n& L) s6 D
193. return   false;
     * f6 I7 B: h: U0 ]# r
194. }
     & y3 ]: k# q! u0 m( j% b

复制代码

天云上人

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

' m: u: G# A2 B7 p" z8 S7 M+ B4 r
* J( ~% O* M. F" B///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.

: q( Y* i6 W: w  C
5 p5 |- C8 K7 j- K#pragma once
' v$ S6 Q( V! f5 L#include <exception>
! c4 e% u: n2 L1 O' ?9 W. v
6 y& l3 H* {4 b0 {% d
  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
7 n4 ~- k5 z" U2 A) G& D        TRIS_TRUE
- i+ x+ S% T; w# V. i};
9 z( B* x2 T3 @5 l* T& j" B
; h, Y" D. @0 A3 s( H0 _5 L
enum UPNP_IMPLEMENTATION{
. k( x7 @! N2 j# m9 v        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
/ q- f5 S+ H  l4 }        UPNP_IMPL_NONE /*last*/
& L& F. k5 i2 V8 n0 x0 {! e+ Q# ?};
  g, O  k; ]& q0 B) {' \
4 p! K1 [% D; c" d
+ E7 ?' w3 N) `5 i' B9 d! z

! V& l2 s# f1 ^5 a# h$ Mclass CUPnPImpl
{
public:
        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
# i  ]0 C8 b3 U+ F1 }, Y( [. I        enum {
                UPNP_OK,
                UPNP_FAILED,
" ~/ x2 M7 k8 [1 P* n# G                UPNP_TIMEOUT
        };
8 H( |" E0 X1 o- V

. B+ }+ i6 P3 a# @! J7 ]" X# ~: G        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
) R7 i% X' ?! [4 r& H1 z        virtual bool        CheckAndRefresh() = 0;
) a; F2 b5 q: q8 A( M! U( g3 V        virtual void        StopAsyncFind() = 0;
+ E+ g- f& ?( Q5 L/ c8 a3 W        virtual void        DeletePorts() = 0;
2 D, W  I) i$ }: a# g6 A: ?" W        virtual bool        IsReady() = 0;
8 Z4 k, B5 C+ H. P2 t% h/ w/ \        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
8 A, S- X6 o) m& o/ r  C; t
! S. V1 L% H0 l7 X$ s& Q
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
! b+ p0 E, Y* h+ O+ {* p        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
# D: l8 e1 x4 R! U3 s        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
( x  z) X! Q) [: G/ b. q3 y

// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
9 ~2 Y* D. C' i: V2 Y; g, M        void                                SendResultMessage();
. A% n3 x, Y# I: A1 @' [( x' Y        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
4 l( O* o: \) l4 d  ~        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
% P8 x2 Z, G; ^7 k! F. X
- [2 a1 q9 m2 z+ U+ T
  b, A+ e3 O& k6 sprivate:
        HWND        m_hResultMessageWindow;
" @; O8 x5 j* r5 T( o$ ]        UINT        m_nResultMessageID;


};
. y+ I  q4 w# A5 z7 w/ B
' _# C5 P9 p1 s
// Dummy Implementation to be used when no other implementation is available
, I3 T  u& U9 M% c# Z) qclass CUPnPImplNone: public CUPnPImpl
1 C( v' Z0 A: g: n$ V6 L{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
' V1 S! I9 s* \6 Q1 N( [1 {        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
7 i9 c( [; H! u/ ~, {) i};
) N) q  P& h& }$ T7 }
0 b1 b0 r8 j, U9 p
# {6 q' C7 m4 m- b8 W. x/////////////////////////////////////
7 J. p+ q' Z& N+ Z) |: a  L//下面是使用windows操作系统自带的UPNP功能的子类
5 U+ i8 Z# M4 @

7 A. V6 N1 L1 w! n- e1 s/ f#pragma once
#pragma warning( disable: 4355 )
. j( o- x4 z7 N7 W* M: e( t) c
( z2 L! Y. t+ U6 ~
#include "UPnPImpl.h"
/ b( g: X  d6 }4 H$ r$ d#include <upnp.h>
9 x9 X8 H0 \, }% G- q" r' ^; K  t3 d#include <iphlpapi.h>
/ Y$ x. h5 V( g; }8 ]* `. H: D#include <comdef.h>
0 Q7 q4 ~( i  a) f4 C2 b# \#include <winsvc.h>
+ r: P2 X! v7 `+ m- F# E" T# J% f

+ o+ a3 g. E& X# k* }. x0 v' b#include <vector>
- W8 ~( C, v2 u' L- R#include <exception>
#include <functional>
3 V9 i* F( I, S$ g



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;
$ n3 K8 D- _( ^, L- ~4 `typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
9 x* B/ s- s/ U) |2 Rtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
; W' {5 @, w9 m" {# `/ c: w8 qtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
& X2 ]& Z( U& R' ]$ r" E$ Q) a

9 V: l2 N4 c3 C  Ftypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
8 v! Y8 k% }- r; I0 Z5 z  PDWORD pdwBestIfIndex
);

. I! R8 o( K+ n
typedef DWORD (WINAPI* TGetIpAddrTable) (
) E5 U7 W! Q8 D  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
6 i1 \3 A& i$ V% m+ G% @5 Q% j  BOOL bOrder
* V* d9 ]( O% r0 r! s3 ^);


typedef DWORD (WINAPI* TGetIfEntry) (
% u9 j$ Q8 _7 F: u  PMIB_IFROW pIfRow
);
5 ?$ |4 j; _8 t7 k# O' }# y, N) E
2 a6 H; ~1 {; x" }
' K2 ~$ B8 T* G+ GCString translateUPnPResult(HRESULT hr);
" ]& b9 C9 e2 S- A& ]/ k6 l, M( cHRESULT UPnPMessage(HRESULT hr);


9 D% _- l7 b) U8 N& ^' j9 rclass CUPnPImplWinServ: public CUPnPImpl
8 i1 |' g6 S; d$ Y9 ]{
        friend class CDeviceFinderCallback;
! e, g8 \+ X- q/ J9 h/ ~        friend class CServiceCallback;
8 G0 N) h# D5 |// Construction
public:
" U5 }2 r. K( O# A6 H9 e% o        virtual ~CUPnPImplWinServ();
5 y- E/ z# j0 o/ a1 o        CUPnPImplWinServ();
8 F8 D: ~- x% x
# |7 R, v5 V! @
& ^: q0 J9 l. `% L" o& X7 k        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
% J' G! P/ o- q        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }


0 d5 f+ q$ B' a8 q+ C/ X0 P        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
7 K$ N* t: |/ `. n. p* E        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
* z$ }# g* Q- O" N

protected:
- }, [! r- N1 v        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
; J- e$ u# S& q        void        RemoveDevice(CComBSTR bsUDN);
$ ~( _0 `. d% j" d  Q        bool        OnSearchComplete();
0 [# t% K2 k  `+ Z: I        void        Init();

0 b; N7 p& v2 ^) P2 A! h1 E
        inline bool IsAsyncFindRunning()
: `: T# p0 Y' w- m& |; U        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
& T, O$ z6 m7 x) b                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
5 ]! F9 k8 j% ^6 ^* z$ g# k7 z                        m_bAsyncFindRunning = false;
2 i; Q! q( j, W6 M& R                }
0 r; V% u. F/ \                MSG msg;
- _! J2 N& S1 n: t8 w                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
: J' L7 T' R; z) j0 k$ z* j- X; S( u5 [                {
( _8 G+ k; L  m( A/ h2 D                        TranslateMessage( &msg );
# W' Q; F& H) J; ], ?1 F                        DispatchMessage( &msg );
                }
  r" m; ^' d8 A( H                return m_bAsyncFindRunning;
        }
/ s$ R' G, S# L$ W& n( F8 ]
0 `  c* f5 P) b0 G
) j* @. ?. d" M; g. Y$ G        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
6 i0 S+ x# t- e: w        // API functions
2 [0 W7 }  x* V        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
" T% j7 T# v* o1 ]        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
' x1 T5 b- W5 k" o2 j        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
0 N1 q4 X* H9 q. z" S1 j        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
4 _; j/ i# e2 Z$ g+ o# |' Q; L& C* Z! N
, d/ |9 L* m! Y% d" D+ r
        TGetBestInterface                m_pfGetBestInterface;
) n& f8 \( Y, u8 o) ^        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;

: k, G9 D: Y* ^0 L8 J
        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
3 q5 n. ]( b( a, |# k* I# n) Y                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
8 U9 V# G: z* p( w
1 W6 x6 Q: j* s& I$ s4 N0 D8 `% w
! a# s  G& S4 R8 d* t                        if ( FAILED( hr ) )
* T# f6 s& I$ u5 |8 M                                return UPnPMessage( hr ), false;
% N/ I! v, I3 L9 r/ r' W$ T, Y
/ T- }" O. ]0 p. T- l( ^
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
0 X3 E( [4 s1 t/ u$ L: E' f" h                CComBSTR m_udn;
        };
* }* H: m- i9 g& Q( j$ _       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
- r9 X" R  I8 _        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
8 ~- w7 o, |* O- H        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
7 }7 L/ b2 W7 P; g8 q3 b                LPCTSTR pszInArgString, CString& strResult);
6 T8 g  q+ n3 Q% ~- m( X# K5 E& P        void        StopUPnPService();
& v" m0 n# Q7 ]! S9 c" m; e# K
) a- \: }) A: n( \  B1 K  l) Q
        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
# p0 r% c) @' f: b        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
: S: S) l  r5 p. V+ T0 B6 I        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
; e0 t2 B, @4 A2 r1 L: ]( M' ^        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
- K7 d2 }9 \2 Z, Z6 H

8 l3 B6 b8 a. p: F# l// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
9 f" h7 x5 r5 {$ ?        std::vector< DevicePointer >  m_pDevices;
% j# C8 H; y9 n, r$ F        std::vector< ServicePointer > m_pServices;
! o1 W- u6 Z" k: U        FinderPointer                        m_pDeviceFinder;
$ _7 t8 M& m  f: g4 m) W        DeviceFinderCallback        m_pDeviceFinderCallback;
2 k0 q- R% {, a/ L/ l( Y- {, ^4 Q        ServiceCallback                        m_pServiceCallback;
5 k* ~$ X1 M) s) y  N/ \7 r% t( s& E
' k' @0 ^7 {3 Y( f6 Q7 T
        LONG        m_nAsyncFindHandle;
( V6 K$ C* P- T2 m! C9 K$ P1 J        bool        m_bCOM;
  Z8 k* y" Y- J8 L        bool        m_bPortIsFree;
        CString m_sLocalIP;
3 d* ]+ z# l4 T& |/ J        CString m_sExternalIP;
9 O1 Y; y; g3 }, G7 e0 @( J! p" O3 S        bool        m_bADSL;                // Is the device ADSL?
% O6 I# g/ Y! V& P& H8 X        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
2 t( j) \# P  _5 l7 T        bool        m_bInited;
6 u. `4 X6 U  `3 q" F( v        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
- ?4 \% A  G) ^- c        bool        m_bDisableWANIPSetup;
, y3 C! a- @) w0 k. t' c/ l        bool        m_bDisableWANPPPSetup;
" r8 o  _; `& E1 i% F$ f: q! [  k

};
4 |% X8 v4 Z( W9 c
  b) R  ~) N' V
// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
5 q1 e/ S; p0 R' c7 D5 v" _" l{
# U6 I$ ?+ M, q+ m4 \( Kpublic:
: q/ f1 F+ J. I) w        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
3 I) q9 m2 I9 Z% I
) w7 M( ^# S7 h0 v. T# c
7 U" ]- ~+ T7 {   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
9 E) b+ X/ U1 [- A7 K
6 a/ [8 y1 f% \- O4 _& \
// implementation
private:
8 F: ]7 K7 I  d* [4 I        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
$ [# I, }. _2 T8 x        HRESULT __stdcall SearchComplete(LONG nFindData);


1 G2 J1 [$ `3 p3 N& D, c2 \private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
7 o. C6 }7 g- s. ]8 y6 R% K& F! J};
% J' O3 f1 S6 \. ~  @1 N# j  T

// Service Callback
. Y' ^. U$ ~- S5 O) V' ?class CServiceCallback
) W8 f# n3 A$ |/ f3 d. O        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
  g& K3 z) m$ f8 g                : m_instance( instance )
7 Z. U- ^- z: k4 Z        { m_lRefCount = 0; }
   
2 \, X- @& W2 L% X( \   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
) C3 R* w" X" p; m5 _# j/ o: W' O( U   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
9 }* d: b8 ~# g, B& J" k7 o  Aprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
: S9 U: o% j; N* a, b  F        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
* w4 ?2 F6 ~7 ^9 M' G7 h* M
0 h3 G$ ^( ^3 x+ o
: G0 X: B( h: r, b7 [9 b% N: p( Hprivate:
9 f$ ~/ D, k5 K        CUPnPImplWinServ& m_instance;
8 T! x7 s5 W; E- W5 ?        LONG m_lRefCount;
# G: J7 T- x+ d+ X, P9 O};


: ~/ u% \( F7 q/////////////////////////////////////////////////
7 v& E, C, \0 J
6 S7 t$ C2 Y  [" i; \
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
! h9 p8 e' S: W3 K# x9 P" r+ GCUPnPImpl::DeletePorts删除端口映射.