UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   $ d7 ]7 Q4 O( i5 T  X: k2 J/ U' Y
4. #pragma   once
   ' f8 C5 I! Z2 r5 [
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   
9. {
   ! h& R4 M& P5 w+ }  r2 [
10. public:
    
11. typedef   enum{
    3 _; W% O& ]; Q0 ~$ u9 p
12. UNAT_OK, //   Successfull
    ) u  t: j8 |8 v  Z' T3 w1 ~$ X: L
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
    4 M6 p' h& S; H/ R& q
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    6 `- w# }8 y8 Y% y4 V- \
17. }   UPNPNAT_RETURN;
    3 o; m& d! v& I9 t8 H
18. 
    
19. typedef   enum{
    + F. I/ O$ r4 P% X; R* k
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    ; _* Y8 I( k3 |  n
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    - e+ `: ?$ ~. t0 x2 v& L, E0 j
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    . a! b8 |2 ~3 l" h) g5 s: {3 R9 n
28. CString   description; //   Port   mapping   description
    : u" E  U. K& D' n$ x+ i
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    2 c$ e- g' |0 j  _5 r- Q
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    0 z1 P  I8 p- V
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    2 ?- f6 ~" G( `
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    * z0 c+ w0 _7 n2 ?* E/ `9 H: J
44. void InitLocalIP();
    8 R+ L: w) z$ |  h
45. void SetLastError(CString   error);
    + n/ F2 e. {" U- q3 U, R5 x* N, U
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    ; @* N! y' D4 i* ?1 c0 U
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    0 N5 [9 d1 a+ Y
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    ; ]& g" V) C! z7 |5 K
52. 
    
53. bool Search(int   version=1);
    + g9 J7 U! X4 a! v
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    5 a2 }, S- O# L/ [3 ~+ z
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    6 v8 _% R7 f% L" I
60. CString m_devicename;
    ' X  n' i# C+ x  X/ D: d$ B' \$ y$ j$ k
61. CString m_name;
    ; S7 F2 S9 c: {$ n9 x, n6 w
62. CString m_description;
    0 B) ?8 j4 P0 B' }+ j! s0 U. @6 P$ |
63. CString m_baseurl;
    5 o. }& _! V6 @0 c
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    7 M9 W* H$ _& Z& z- v% s: q& C9 \
68. 
    
69. private:
    5 ?' ]- b+ g1 @6 u8 t1 B4 n
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    2 O0 e/ E9 W+ Z6 D7 b
72. CString m_slocalIP;
    6 O9 j" D: l, Q
73. CString m_slastError;
    2 o, B+ c! C2 b4 X
74. WORD m_uLocalIP;
    ; A4 ~) O/ n2 L7 Z: v  G, ~
75. 
    9 \$ g* D- ]9 \/ i" `
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   / z- Z5 E5 U; W+ j
3. 
   ) H5 r! n% N% X' Z
4. #include   "upnp.h "
   * Q  D9 q( R: n% O/ @% r
5. 
   5 g) I0 e3 M. H( @  c
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
     R9 k  C+ k! I( \$ i. V9 ^! \
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   % {# C: e" s* W
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    9 E4 M7 j) O# l; D
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    1 |2 V  h8 z# P" k" w
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    ' }7 h( U5 q6 t# S7 S
16. const   CString   getString(int   i)
    
17. {
    / h8 o7 e  Y9 P# Q' j( e
18. CString   s;
    1 g% p& w- _$ ^3 {6 N% s# k$ \5 d
19. 
    ( X6 D+ V) Z) E; j$ t: ~" P
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    9 V6 |( m. t( u1 c
26. {
    0 c9 x/ c# i, x2 M
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    * c; z4 B: T6 F& \$ @4 S9 X
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    9 I1 a! A7 \7 `' Y: b
31. {
    0 e- ]1 v9 o/ e1 f, I( [
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. {
    
37. char   buffer[10240];
    0 }2 E/ p  F. ~' T
38. 
    ) r# Y# Z- z4 P: z4 C
39. const   CStringA   sa(request);
    & d! h$ D8 E8 P# I' G$ \6 g
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    8 m3 L2 E9 }7 y* c/ o3 k' i/ y) P
42. 
      l7 g* l# i/ t1 U" Z
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    2 u- d- \! k& L! n4 `+ [
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    : t, ^  c" ?- n2 X0 C3 i1 h
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ) R  H$ j. v9 @; [) u! O# p$ v) f7 x
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ) l$ R  `  Z& Z7 q& r
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    . K; N1 h; Z0 O3 M& N& o
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    $ n4 E! m( N" m) L' D8 K) A
53. Sleep(20);
    ; E% _$ c0 }$ r& D7 A# B% |1 N: r
54. int   n   =   send(s,   buffer,   length,   0);
    ; K9 P# R  k) O1 _9 T! U
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
      c& E: Z" T9 v  U9 J3 F. z
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    7 S+ e; W: n! P
59. if   (!rlen)   return   false;
    
60. 
    # Q* v6 H8 ]! j2 c
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    ) Z3 Z2 L. I+ _" Q
63. return   true;
    . D8 P- G9 `) t' w1 M& @
64. }
    
65. 
    % t! y4 R5 @( G& e0 E
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    + `" f$ M5 n$ K1 q
67. {
    
68. char   buffer[10240];
    
69. 
    + l" U; T& K+ h% I% i
70. const   CStringA   sa(request);
    ; ?  R# ?- y7 _; W$ t2 q( S
71. int   length   =   sa.GetLength();
    & y2 F; E/ A% M4 L- {
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    4 U( d7 n9 v2 W6 y
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    0 P0 m  c( F( B6 b
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    ' `# j/ n4 X, |0 o
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    0 c" M# y& j9 O% g, c
79. 
    ! R$ E! _- F2 s, }
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
      S2 P% D1 v3 B& E
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    ( D# V! |/ D7 ^( U8 ^5 X
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    # T$ Y' m6 g  a  a
88. 
    ; b7 f$ r: J1 \* Z
89. result   =   response;
    
90. result.Delete(0,   pos);
    $ W& ^) }6 ?) h4 y2 B
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    ' d" [7 J' q" B& [4 c. E
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    1 x) Z9 w& I2 m
97. }
    4 E- x3 z0 _: D1 D
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    8 B3 p# x! O: N! f5 c
100. {
     * B& g2 K) j" f& u+ i
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     % v' y5 V" z" l2 B1 k+ R
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     3 H- w- S4 o4 K8 f
107. 
     ; W' Y3 y7 y) u8 M1 V1 ?: r- r
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     - X5 f! @  a% R  T& v7 {
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     $ {+ L6 {0 g$ ]0 o- x! ^% l% K
112. }
     6 q+ Z; W2 ]7 D* I0 @" E& f
113. 
     
114. MyUPnP::MyUPnP()
     " j' k3 l5 p" Q; i2 n
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     8 W0 ?$ @  I3 ]: y# W: T
118. isSearched   =   false;
     4 v5 z/ j2 }8 X
119. }
     $ J# P! t( f$ l
120. 
     
121. MyUPnP::~MyUPnP()
     6 m% i( [0 C8 a( s
122. {
     ) I$ g$ ?: T  F0 x9 D3 l3 l/ U$ m
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ' A3 S! p: J3 t3 ?
125. while(pos){
     8 V0 @! }6 v: M! s
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     2 Z) l3 b, o# f' W2 E" J7 ?& m3 Z
130. m_Mappings.RemoveAll();
     / s* C: Z4 K# X' n( P+ ^
131. }
     8 ?# c- }8 o" C! U. ^) J3 N
132. 
     * C. s( q& A3 T/ F( E. g
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     # Z4 U, m; j. C# a
135. {
     6 `/ I9 M$ o4 T1 Z1 i7 N
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     2 _: {& K2 B8 E2 h. i  G8 s
139. #define   NUMBEROFDEVICES 2
     * F0 ]  f5 m, N5 A5 m! y
140. CString   devices[][2]   =   {
     ( G; y5 I( E2 |6 m8 H8 N
141. {UPNPPORTMAP1,   _T( "service ")},
     ) O+ ?8 N! q/ T3 K' r
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     4 X: k0 V. H1 a9 L
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     0 S# V* Y4 o% P, b
148. ioctlsocket(s,   FIONBIO,   &lv);
     . w$ z  l2 J- A3 C. O: \4 Y+ s
149. 
     / o: v( ^/ y& b
150. int   rlen   =   0;
     8 ^) z3 E7 Z) m3 Q# J, |# g* _
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     5 {& Y- n0 X1 k& l
152. if   (!(i%100))   {
     " w5 s6 T8 E9 i
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     2 D& }' i# ]& N$ E4 a- E9 @
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. }
     # ]% D& j$ U; S# M/ p$ B5 a
161. 
     
162. Sleep(10);
     
163. 
     , Z. F; D9 m) @. a& n0 y
164. char   buffer[10240];
     $ m1 i* g! }! ]5 p
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     7 ?$ Z8 H; n2 u7 }+ u  p) D: D
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     . d1 R$ ]$ G+ d8 q- z# h/ c
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
       f9 ?& a; r# Y# C6 ]0 A
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     7 @5 v9 u! H, j  C3 |1 d
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     # }2 U7 _8 I9 b: A0 m
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     ' y* J5 L9 c' I& s& @% ^5 g8 X
175. if   (result.Find(m_name)   > =   0)   {
     . M' E6 M# K' L9 R7 b* w
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     + p" h% @/ F* c0 f, j1 Z  {
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     4 v- W. C% N, D$ k, Q* j
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     1 G0 A3 _/ ]' |
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     
189. }
     $ M6 _7 h9 q4 p/ z
190. }
     
191. closesocket(s);
     
192. 
     
193. return   false;
     
194. }
     + Y; T4 ^0 {6 c# K4 ~) z

复制代码

天云上人

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

* Q/ ~$ M" N6 A- l
4 v2 O) K: D* O& @3 w- e///////////////////////////////////////////
  P  ]2 I9 V2 Z% N( m" J//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
, @+ q* Q3 g: I7 l6 j" M
" k7 I/ m7 ]4 M' c$ l" b( p
#pragma once
#include <exception>
/ K& |( `  r3 q" ]5 t! l& D
2 r% b1 \/ a9 ^- {. z
: \5 z% m) t- G# ^9 G  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
  |. ]" Y. ~/ h5 a0 \% ?3 I, y        TRIS_TRUE
1 n. S+ G- ]; _7 }: X+ i};


enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
$ M$ \: }1 j* i' w; t& z};
6 y8 o/ K! N/ E& _; ~8 Y
$ A! I2 R# m! l! E! J6 B
( j2 H& T2 @; u/ `5 \
) _. g8 f) a% Z, _5 Y8 t
class CUPnPImpl
{
public:
& `" p1 w1 f& O/ s% H        CUPnPImpl();
4 n* m+ r  Z# K: m4 z# T4 n4 U7 _        virtual ~CUPnPImpl();
* @. S- G. G. |3 V        struct UPnPError : std::exception {};
- h% H9 T" r8 q; F        enum {
                UPNP_OK,
, H9 u% l, @4 j# C& a' l# |2 ~0 L                UPNP_FAILED,
- m+ j- S4 `* J8 e' {( e                UPNP_TIMEOUT
& V' [, G9 G& \  E7 Z        };


, U, U( r4 D! z1 ?( }        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
! @* ?- p% M! G7 c        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
! _3 b! E& A) k2 i        virtual int                GetImplementationID() = 0;
' t: Z4 c4 y7 d3 V" V       
3 Y4 p0 F" Y$ l        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
/ Y! ]5 f& I( X# n" A* j. q" Q9 F; z
5 ~4 t' H' e4 b% E" w: a8 e
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
: I; `2 p4 u; t4 o3 o

// Implementation
1 S/ P% N# g1 Q9 ^" P6 Vprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
5 q: D1 H! H% i7 N0 ^+ g        void                                SendResultMessage();
: R4 w. \( Z5 W0 |9 d        uint16                                m_nUDPPort;
% M8 D6 G8 K0 s5 s# k- M2 x        uint16                                m_nTCPPort;
* o' P  c5 W& X4 a        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;


private:
5 f$ s; x* V% n* W& M  r, p        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
. [5 t( ^5 @4 t( y" J. @2 p: e- l* k' V

% I3 w9 g: ?* }& P& p0 q};
. I9 W# u- G! u1 p" Z2 `

9 I+ @6 L4 g& O9 E& |! c. H// Dummy Implementation to be used when no other implementation is available
3 S4 l) i$ a% O6 f; L- m& v0 L  Hclass CUPnPImplNone: public CUPnPImpl
{
" P. T' D  L2 I0 q, V# \+ l, c* Cpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
  [. i' ^5 q+ p* a+ X( U/ C6 Z$ f        virtual bool        IsReady()                                                                                                { return false; }
+ B$ N; K& S9 `- p! c4 _        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
: N( B0 ^. L. }# e};
; ~7 l3 l, R: T3 J$ t, ~
% y0 Z% \0 a) ]" ?6 _  n
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类

* W3 \& V& O  f- W
#pragma once
#pragma warning( disable: 4355 )
' R/ N* t9 B* ^, f2 S1 l0 `: H5 t

#include "UPnPImpl.h"
  [% h6 ^1 U, O, S" Q#include <upnp.h>
#include <iphlpapi.h>
  S. w0 @( f% q5 s- b#include <comdef.h>
#include <winsvc.h>
( H) C. X' K8 O* X* }7 O
: U3 U* p& I- y
' q" P: ?* V& U+ m0 I/ z#include <vector>
/ x* o  a0 y/ g, X* r+ F: x#include <exception>
) L+ ~9 G8 R# J* v+ e8 U; l#include <functional>

) g5 r; w# f4 M) |/ ~. j
; @) N9 G3 O3 J; @7 x( ~/ Y3 _
. X6 s/ Y6 `+ X
* f/ {9 g) L& P3 L# P' jtypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
; h% g, u7 F1 v' utypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
# C9 D( a, T! ~. I9 l: @- ^" Xtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

9 [3 o- t, p6 S! z2 }* w) W
- T5 {7 k. y$ o- }typedef DWORD (WINAPI* TGetBestInterface) (
/ b; o: L* s+ K% j! d: u  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);

9 |! [! a* O0 I' ~0 c
typedef DWORD (WINAPI* TGetIpAddrTable) (
3 k/ |: ]) J5 r0 U4 |$ l, X  PMIB_IPADDRTABLE pIpAddrTable,
6 M2 _5 ^0 k+ V5 E) m' D  PULONG pdwSize,
  BOOL bOrder
);
# o  |7 [6 Y2 T# [

# |% t7 c  f, g" etypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
. }' M( {8 C7 R1 N; G);


* f: c# R8 u( s/ t' b* I2 hCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);


8 s% j. A/ l+ Q1 X' O0 Tclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
0 T6 S) E4 b$ X) [4 l, wpublic:
8 e$ n/ ?2 @  [- E/ v  U8 [        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();

  q3 j- v5 H. y9 C
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
. m" o* c5 K) h! o4 B# F        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
& s9 Q& j& K9 p* d9 K
. t8 a( }+ u- g2 u3 n0 c5 r! B
: P- k3 F7 i; y0 l- \        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
: n: P8 i5 W6 q        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
0 T1 R: x! j- w' n

protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
( G3 G7 F- J+ s+ y        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
+ L* I" J7 a& f        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
  C/ F6 u4 r7 D+ h) P        void        Init();


        inline bool IsAsyncFindRunning()
        {
) V9 \/ Q4 M8 u: G  D8 b. U+ C5 v                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
5 l; [$ ^; H( I6 M                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
1 `2 c" k( l  f$ \+ N% v9 H                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
$ u9 f0 q! f3 j5 q9 h                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }


; [4 |7 ?$ r# B1 g        TRISTATE                        m_bUPnPDeviceConnected;
. o% A: B2 w# |9 d( V

// Implementation
% l1 J. k* r' G+ b/ R& T) u        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
9 a) T3 y: s7 y- {( _' G        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);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
) R2 b8 m  w! r+ o+ Q: B

        TGetBestInterface                m_pfGetBestInterface;
) ], z7 p) F5 r) }        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
2 N/ C1 y. i9 A+ F& v+ e        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
$ a' z; h( a( u8 a& T2 P                result_type operator()(argument_type device) const
1 a7 g7 @( u9 y( r                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
- R3 V0 }! [/ G: S6 E

                        if ( FAILED( hr ) )
( ]7 R/ F5 |. I  H, Z2 {" Z, r  c                                return UPnPMessage( hr ), false;


" v) g* }! ?; G, F, y5 d* [                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
. _% |9 l) Z9 X8 o# \                CComBSTR m_udn;
. @7 A9 M0 W& u% y. O; |, c# I$ K/ m5 |        };
' s# J( u5 _6 ^7 E5 \" v! j       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
; }% @+ D+ V& O3 P# j& \        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
1 S7 V, T6 ]" S( P& \5 N        void        CreatePortMappings(ServicePointer pService);
" v& o& X9 x' P0 Y9 ^* m2 Y        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
2 w' a* P' O7 l9 W3 a# q$ F( t                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

1 ]% ~" c& h+ H3 A
        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
& i% ^$ E4 K# i/ N2 s        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);
; W: K# o% }# h* e. R! `        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
1 K! t$ }4 g* p; ]) M' ^        CString        GetLocalRoutableIP(ServicePointer pService);
- N# T; J" F# ~  a6 D, `, o, h

// Private members
0 T) Y- z$ ]5 B4 x- bprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
2 A$ n4 C/ c+ w6 n' z$ h* G  e        std::vector< DevicePointer >  m_pDevices;
$ G# F% Z0 }$ M0 H" M        std::vector< ServicePointer > m_pServices;
0 M* S  t4 H( D; j        FinderPointer                        m_pDeviceFinder;
1 B4 f# W3 J& ]+ j0 B9 H7 N' f        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;


        LONG        m_nAsyncFindHandle;
, W4 |/ e: F* V5 p5 W, f& D9 m        bool        m_bCOM;
! V+ A! G+ z. A3 s1 D        bool        m_bPortIsFree;
& Y/ n* z- ^) e: T! p        CString m_sLocalIP;
: p3 }( h# T' g7 _; _        CString m_sExternalIP;
+ P3 t* F. Q' ?! K        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
0 u. Q& E+ B( F1 y1 c        bool        m_bServiceStartedByEmule;
; u* v& n2 W; }( n) o        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;


};
) u) V9 }3 b9 Y+ Z# W0 L& e: N' U/ K

% K0 I9 Y7 ?% r// DeviceFinder Callback
: W" i$ d- |) _1 M2 w% V7 R' t# wclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
# T4 S- |9 U( A) q5 [* Dpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }

, c1 E" c6 d8 N: E$ t' |
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
3 ]0 P" o3 m2 k   STDMETHODIMP_(ULONG) Release();
7 K/ k  o# H/ Y0 Y. ?  I2 o
; T* r) Q4 _! j8 G
// implementation
private:
9 a% U5 u/ C: W* _; Y  \$ C        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);

  l+ b0 J1 M* Y
private:
        CUPnPImplWinServ& m_instance;
: Q' g* {; |8 Y: g) T( {8 r        LONG m_lRefCount;
};
3 ~  q, |8 g9 z* M  u

# T7 q; ^8 P$ x6 B' s1 U5 C. ~// Service Callback
4 S) z4 W  a; X% v$ p) T. bclass CServiceCallback
( w; S! ]: N5 F( d1 N. m0 X- ]        : public IUPnPServiceCallback
{
public:
3 V, ~% m: Z) J. ^/ m        CServiceCallback(CUPnPImplWinServ& instance)
% ?! J  N$ _9 Y4 W0 J- W9 C6 i& t                : m_instance( instance )
        { m_lRefCount = 0; }
5 o+ m0 \) A& W6 {, j   
& q* \5 ]$ R/ a) F) m7 G7 V7 _   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
5 ^, I$ _7 G# a7 Z   STDMETHODIMP_(ULONG) Release();
! ?. Z4 U: y# W9 C& U
2 t% _# \9 K8 ~; d- _
// implementation
private:
0 o7 f1 \1 Q# A" I4 G4 S        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
& t1 ~- w3 u5 W) `3 V        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

- @/ Y. m: p" G  f. q+ E* O) t" M" b
private:
2 U: t& r- N: L9 |, W  _        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
- `/ i# V! j( y- b: W( v};


/////////////////////////////////////////////////


使用时只需要使用抽象类的接口。
* G9 |  Y7 L  ?2 I, ^9 VCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
0 @2 N5 e; y% y( z6 z1 YCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
7 ^9 @9 Z1 ^3 @4 t$ J; VCUPnPImpl::StopAsyncFind停止设备查找.
' m7 n! F- |' I2 K/ y9 A* S2 i6 oCUPnPImpl::DeletePorts删除端口映射.