UPnP

天云上人

/*uPnP.h*/

1. 
   0 B4 ?0 [0 ]) f' [# H# ^, @# n. K( L/ P4 k
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   9 L( @2 J. j( l! Q7 ]! Z
5. 
   
6. typedef   unsigned   long   ulong;
   ! @" a* r% h  \$ ?2 |
7. 
   9 T1 J0 @- w  S  R  p
8. class   MyUPnP
   , {1 n6 W- p- }  o5 ^( M
9. {
   
10. public:
    
11. typedef   enum{
    ' X6 [' _5 M$ A6 ]* @4 K  H
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
    2 Z- G+ a6 L* W6 ~& |/ ^# ~- H6 a
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    8 ?2 t1 r1 {5 I! F* @
22. }   UPNPNAT_PROTOCOL;
    ; d, i) F9 l, F
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    1 i' l, q8 V& A+ x
26. WORD   externalPort; //   Port   mapping   external   port
    & ~$ x" _' T1 j1 L8 _
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    4 h: Q" n2 v) w4 g
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    . v% J, ]7 c. Y( i( R" `
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    3 n8 |) c8 }# ^& k1 q5 E3 [: O
36. void   clearNATPortMapping();
    * S9 ~5 T& ]7 V; n  c
37. 
    9 |) n7 V( n0 s
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    5 y* p7 x1 n( k/ l
40. WORD GetLocalIP();
    . ?3 m9 W5 E' G, ~8 l
41. bool IsLANIP(WORD   nIP);
    ) ?2 p8 S& H$ J( B: V& V) K
42. 
    / Y% A1 P1 N4 m! D5 f) J+ t; S
43. protected:
    
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    8 n% S( M: f9 \6 G6 i
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    5 x; J: Q! {) U% {& }
48.       const   CString&   descri,   const   CString&   type);
    + [2 `, W7 g  c; O& N0 y
49. bool   deletePortmap(int   eport,   const   CString&   type);
      O( ?& D' j" `' Q' K: Y7 }0 u
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    9 h5 y( t2 L- F. i
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
      \8 m7 k4 k$ g; A, R" O  R' u" Y
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    0 @7 N7 G0 b0 T/ {9 E) z
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    3 x/ V1 Z0 s6 l) K
61. CString m_name;
    
62. CString m_description;
    # D9 i& u: h) O6 e9 D' _& t
63. CString m_baseurl;
    . v- T/ y$ g+ m4 c) @# {  A9 |
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    & N8 o6 c  ?1 R5 b& Z8 Z
67. int m_version;
    
68. 
    
69. private:
    1 c  s# M! I: m. s2 V
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    * Y- |( T+ z- i) w: d$ O
71. 
    : _& p$ i; V' L& ]* D. E' y
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    & A7 t& F% e  d% W! r
75. 
    
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   : L: X- O: m- j2 h( L! V3 c
3. 
   
4. #include   "upnp.h "
   
5. 
   % O2 Z4 K7 u% S4 W$ f- l
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   9 u4 b( a7 @' F" e. t6 j" n
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   5 ^" @- b- j, f2 x+ ~4 V' Z* r
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   . Q3 v6 W9 ?7 d  t  I
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    ; u1 [' r3 X: v/ Y3 F0 m4 j8 Y
15. 
    
16. const   CString   getString(int   i)
    4 f' @+ o- k7 J- y, B, f
17. {
    
18. CString   s;
    / \! S% m1 B6 R/ ~/ J& u6 Z: s# {8 N
19. 
    : v( ]: T9 d/ O) G3 y* F/ e% ?2 Z
20. s.Format(_T( "%d "),   i);
    / w& e5 D5 r9 S" M
21. 
    
22. return   s;
    4 N9 G1 E6 p' O9 d. F  v% t, T5 N
23. }
    9 q; t( q* r2 [4 M$ q
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    - Z! U* L5 R  D# U9 n. K$ e
26. {
    ! Y2 M! Q% ~: @) g1 l
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    7 q( v. t- j- ^4 C- |+ {
28. }
    : d' y# T4 u0 @+ e% z* n
29. 
    5 U7 |/ A2 r& ]
30. const   CString   GetArgString(const   CString&   name,   int   value)
    - U! d' H4 O" a$ N/ ~8 \+ F
31. {
    , x, c+ A; ^$ |4 F# g7 B
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    " J# T6 \0 ]. n7 E; A) V
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    % q' C. F. m, i3 B0 t( u1 M# \: X
36. {
    / e1 a0 w, S7 B$ k7 o. Q
37. char   buffer[10240];
    # p5 K( L7 R' Q6 U0 Q( j! L, b% z
38. 
    7 Y9 {) g9 ]6 G& i; }" Y
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    ! X  D$ `9 ~. e# @, x: h- ?4 M
43. uint32   ip   =   inet_addr(CStringA(addr));
    1 w% U3 O  f* j
44. struct   sockaddr_in   sockaddr;
    + K; F/ ~# |  x/ w) N0 R* ]
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    " Y# k; G& w8 Q4 }; D
47. sockaddr.sin_port   =   htons(port);
    3 B4 A( M% H! }! k1 [5 ^
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ( x& S2 f8 p+ d3 R- `5 T/ \
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    7 n8 Q2 I# N- A, g# Y4 \, ]
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    * n- a$ e2 c, G& d' U7 l; w
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    5 f7 j$ K4 P/ }6 M6 j4 n! e
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    " ^1 |1 r7 q, J6 w0 N
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    ) W7 J* n' }' S& X" q1 w3 r; W5 x
60. 
      \' S; p- N. ?
61. response   =   CString(CStringA(buffer,   rlen));
    $ ?; t- W* z; C1 W
62. 
    6 f+ c9 l. H* M7 z) m/ j; u$ Q
63. return   true;
    
64. }
    % s9 x' M( t3 ^5 i& _- n
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    * T" j- A% c! a( z0 ?0 D; r* D
69. 
    * p5 r- ^: U, m$ b5 w* C& e6 ^
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
      T8 Q0 l& ]% W, ?5 M
73. 
    7 A! V8 Z- \; Q0 |6 J
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    1 ]" V: k6 @2 j$ d; T
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    ) o1 _- A! j* {4 n" q
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    1 q* n$ ]) O1 p: r
84. {
    
85. int   pos   =   0;
    
86. 
    , O0 J$ g' G+ j& l) l
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    9 ]. e0 s/ B, S) E7 s8 h
88. 
    " Q% v8 ?, W& c: j- l1 J* n! d. b
89. result   =   response;
    
90. result.Delete(0,   pos);
    5 ?& E; P" b6 u+ x6 i5 N( `" I
91. 
    
92. pos   =   0;
    " T  {& B) P) b  j8 E" g" \
93. status.Tokenize(_T( "   "),   pos);
    # x& w) a5 r' e0 E# b
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    % I$ \2 ?' \2 k7 q* C
96. return   true;
    
97. }
      R+ R" g- h' y
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    / i' H1 k% [" G' o) b! c
100. {
     5 |2 H* s  f& ~# ^1 {# D* e. P  D
101. CString   startTag   =   ' < '   +   name   +   '> ';
     6 b, K8 C* M; C$ e- F
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     3 b! r5 q6 o4 i; J
104. 
     
105. int   posStart   =   all.Find(startTag);
     , v% X/ [' f- O  O2 n. k  {5 ~) {% F# o
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     ! p# O' j5 G6 A1 m+ w
112. }
     % ]- R4 w1 i0 w- E" }  c$ T
113. 
       F. d/ X+ w: e% K  u7 P, i; A
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     1 X; y8 ^7 v6 R2 y3 D) A7 M
116. {
       h1 X0 o" S: m* p
117. m_uLocalIP   =   0;
     ) [: r2 h9 D5 N  D* C/ E7 Y! X8 f
118. isSearched   =   false;
     5 s% u5 L6 [% q0 w
119. }
     ( ]% n1 I$ A& s8 s
120. 
     
121. MyUPnP::~MyUPnP()
     8 m' n8 e# Q# o+ h: `- C
122. {
     * k) Q" P  a" ^7 [5 b5 M% K* S
123. UPNPNAT_MAPPING   search;
     - g3 r; m  ~* s5 j" w6 ^, M/ M7 ]
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     9 s& ]$ K: F3 }) _% z
125. while(pos){
     $ |6 E( ?7 C# I4 V
126. search   =   m_Mappings.GetNext(pos);
     8 \: V% S3 t4 |  `
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     ; R  C2 G$ y3 w) r
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
       w' ^' L" Z& _; L5 N! a+ Y
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     2 l$ R! F' U6 s$ s
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     + N, l% l7 A. d
138. 
     
139. #define   NUMBEROFDEVICES 2
     1 O+ N  g' b3 x" f; F
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     * x8 s8 M" m; _$ \3 ]
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     5 E2 G1 B  H& w: l/ k# Y
144. };
     
145. 
     & O7 X$ F) w1 ~4 c
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     $ F& G' _6 v, e' p& B3 l% G) o
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     " m/ ^1 `+ i" b) Z, X  M
149. 
     & D" w0 i: P! J8 D4 q2 Q
150. int   rlen   =   0;
     1 k) {- J* d. K
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     + Y  e2 K7 t4 ~% |4 S  Y, y
152. if   (!(i%100))   {
     + L: U7 o7 e  C) w6 a+ u  ]+ ^
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     ; u, `& |3 ^* I, Q
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     6 z' G" @" e+ k
155. CString   request;
     2 ?' W1 i8 g2 H3 m5 `
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 "),
     ( q+ B3 F2 v# u8 ]" Q
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     9 s+ X) c. }8 Y' i- ~
159. }
     
160. }
     7 r3 L9 ?) K6 S4 Z6 p7 Q3 Y# ?
161. 
     
162. Sleep(10);
     ! u) e$ F! K/ u& N. w+ x" C$ {9 H) m
163. 
     
164. char   buffer[10240];
     , z; W" h2 B4 r8 D, n0 `
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     " j) _, G# f, j2 b# S
167. closesocket(s);
     " \7 }' Y" K. U% v
168. 
     % s9 j( m: S' M8 U
169. CString   response   =   CString(CStringA(buffer,   rlen));
     4 f: a6 ~; d- Q3 G* J  F
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     9 b5 m3 F# r/ I( D+ p
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     6 x; o7 R8 P# U  a. j5 @  Q. ?
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     # u( h! R, T) X0 y4 o. O# K
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     2 Q9 J1 Y0 H3 p- D* s! x
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     / n( M! w; N; E
183. m_description   =   line;
     * }' n8 o" d3 O# t: O, Y" C6 n
184. m_description.Trim();
     , w" q$ K' h, K
185. return   GetDescription();
     5 E; g6 l2 k# [; C/ Y0 }" u
186. }
     9 H* |; ?+ q4 \$ ?& `1 M8 x+ O' j
187. }
     
188. }
     
189. }
     
190. }
     7 Z, Q7 `1 x) X/ F; P' w) K
191. closesocket(s);
     * q4 X  i8 [' L- M6 \! x
192. 
     
193. return   false;
     - E2 `/ ]. l+ v+ [. n/ @
194. }
     

复制代码

天云上人

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

# N0 j- z" |. `
///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


  X. L) T3 w/ S! t#pragma once
1 _& L  A! L  R2 `! R9 Z* y& P- T#include <exception>
, R  C% h1 V& W& e2 L
' |6 @1 }' A9 @3 Q
4 S% ^2 Y7 Y% S& t4 h( C  enum TRISTATE{
        TRIS_FALSE,
5 q/ e% c( V9 r! a8 w1 X        TRIS_UNKNOWN,
, e8 @0 [$ c2 ?9 U8 L        TRIS_TRUE
4 H& q) Z' W  T+ o, O4 `};
) Q8 a5 p) D0 \" F5 }) y

enum UPNP_IMPLEMENTATION{
- [) n0 \9 u6 L+ W3 w9 u        UPNP_IMPL_WINDOWSERVICE = 0,
. M0 a6 e" l2 r( D) k        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
! l( q3 y" S3 m+ ~" K};
- l! q# l( M( z3 E! r! t4 C6 \

0 H9 f0 K: H. h: Z$ T
9 i" _" }# G" y; S2 R; ~6 Z0 `9 R/ }
class CUPnPImpl
8 G5 L9 |, p; m8 X, J{
2 |2 M$ t8 m' ]1 L5 Tpublic:
% f! D7 F' a/ A) @. J        CUPnPImpl();
3 J0 W; H* r* I; b+ }: V; q: E- r        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
" `- n% ?% G7 t) F        enum {
+ ?' D: z6 y, w8 g1 E9 Q4 y                UPNP_OK,
                UPNP_FAILED,
/ z, A+ P/ j- G4 u7 P                UPNP_TIMEOUT
  p! j( t) m# O1 F/ M- K" w        };
; q8 Y8 \4 K# ?) B) N6 o

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
* I/ o: x% i* L2 a1 \& @- v4 k3 c- z        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
: l( j1 b3 c6 p" d' U* u       
* }0 n8 W) f3 Y7 G. a* r        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


9 N6 j5 t* A( o7 p        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
+ Y6 b' m+ g; U/ I        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
4 `1 [, U2 X9 s5 o+ B        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
% N5 k8 q, V5 |) D; A        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


$ m7 j: }1 O8 M' j// Implementation
protected:
5 h% L$ S& M' y9 s% A; `& u        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
) u7 j- }1 f% L  u# S# E7 m8 K        uint16                                m_nTCPWebPort;
3 g  _# X2 W; z( n) ?        bool                                m_bCheckAndRefresh;
, ]7 c! q1 E4 }* b
/ a/ d1 Q6 O! e* P1 g4 c
private:
" f2 B: r4 L8 x2 v3 f6 ^) F; N, G1 D        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
% C# L$ A- E2 I
- J5 X1 T4 W! j  T; q
};
6 h+ n7 ?& Z' l% h( P
* U. p; E+ X6 g: W% N  _4 d, c1 ~4 z
" ?1 l) I9 T1 b7 r5 y4 b& j! a// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
6 ^& J8 F1 Z- T5 h& [9 q& o- a* a{
public:
' x6 w0 T3 u: ]. M% g+ F        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
  M* x6 C. ]1 U% G: c        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
: v8 p  I6 v/ ~; j3 l% w};

: e7 j' o3 \0 r) P6 i
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
+ A/ c& Z1 o2 Y
+ p  Y& ]& b7 A
#pragma once
" A% u& O* T, q#pragma warning( disable: 4355 )
& \! U. R3 V5 }( H4 X* M
% T; k1 B4 b( u+ a
) f% C, ?/ K5 H- u  f! g6 r#include "UPnPImpl.h"
/ k" c# c4 J& n; j#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>

2 A, k# A5 J$ B- D; |: x- L/ e  X
#include <vector>
- g8 S7 W  j* x) O0 I/ M9 {#include <exception>
) }9 v9 r! t( N$ p% c. H6 l9 }4 K#include <functional>


* ^! N( @% _9 e0 f. w3 H) o1 m

9 U, q  f6 n8 Z. `* V! Dtypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
! o0 j5 {- u7 |: B* \typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
" l# B. ^! P' B$ k; p" Vtypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
6 S* @( W/ m% i5 q7 F. d3 x/ Jtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


0 x! ]" J- j& V! I; a) Y+ `typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
- T" U9 t: b, b4 @' ^6 ?  PDWORD pdwBestIfIndex
0 [: ]2 Y( G; @# x% c);


typedef DWORD (WINAPI* TGetIpAddrTable) (
! ^) J4 r6 ]6 E* E: V9 K2 f* ~4 m  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
3 i2 E" M$ `! |);
8 b4 e9 f3 k0 v- [) Q+ q) G

) ~" D1 I6 k/ F6 S$ H  ptypedef DWORD (WINAPI* TGetIfEntry) (
9 {5 m- y  E! x, h  PMIB_IFROW pIfRow
);


CString translateUPnPResult(HRESULT hr);
& D5 U8 f/ r2 d' y/ ^. L  GHRESULT UPnPMessage(HRESULT hr);

! @6 Q0 V; y# Y* z9 x
6 s3 P. q8 U% e3 @, I8 z# ]4 Wclass CUPnPImplWinServ: public CUPnPImpl
, r2 w. Z: ~% P5 m+ [( u. V{
/ n: E8 B/ @, @' {* V. c        friend class CDeviceFinderCallback;
1 ]1 m1 ^% Q! w6 s+ y        friend class CServiceCallback;
; ^' n3 @/ k3 `4 I' `. \5 r. j// Construction
! p& B+ p+ M- l4 L& K1 A; h# x3 ppublic:
2 s2 r& B" t+ ?        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
2 d# |) h, v: Y% Z2 v

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
" y/ \  N' `# j2 Z) ~( v        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
+ l* `& m# o& D; i- J! V: {: A        virtual bool        IsReady();
9 s7 U8 H' L- P6 ?        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
, Z& k0 p8 K5 y; |$ k
; q: @; E+ J* m" P: g8 r
$ D, }7 ]) M5 k        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
% x: W" n) b( X7 O        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
. M4 c& J; {  N! t+ Z6 [6 q0 G        virtual bool        CheckAndRefresh()                                                                                { return false; };

0 D6 N: A9 K& m) T/ G& c! W- x
protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
6 z7 C+ C) ^" d) h. A        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
9 f. P+ M) P1 s! }# R. ~7 y6 C        void        Init();


        inline bool IsAsyncFindRunning()
        {
& Z2 ^/ Y- K8 P) w/ ?                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
                MSG msg;
% q1 K3 {0 G9 }( a+ v3 z8 M7 W, l/ U3 O                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
7 U# c- m( y8 {+ u) V- D                {
$ ?; w: V3 p2 R                        TranslateMessage( &msg );
) _% u8 V" z5 q6 W6 k2 v                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }


        TRISTATE                        m_bUPnPDeviceConnected;
7 y: s1 p) H# w8 v0 z" x
5 i7 `; u) A2 s! S7 k" g& {
// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
' h1 u, P. K$ ~, I. r        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
3 Q7 d  G% L: _        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
1 D( Y2 r2 m$ p- {        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
0 `. P% J7 ?3 n2 Y4 }- h        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

4 U' p" T  u8 o2 J' j/ q& ]
* r6 I; a7 _( [  \6 ?0 @        TGetBestInterface                m_pfGetBestInterface;
4 A; ], ?9 z9 b        TGetIpAddrTable                        m_pfGetIpAddrTable;
+ L2 }  u+ N! [" [  g" c& D        TGetIfEntry                                m_pfGetIfEntry;
" O/ y$ _9 U; J
  F4 N6 b2 T' t" F' s9 }
        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
! ~% b, k- d- d                result_type operator()(argument_type device) const
                {
3 S! E# M3 }2 {' v/ [                        CComBSTR deviceName;
( N( p& m2 d4 r  n/ B1 ]/ `" s9 v                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


& M. G5 @" X) z, m                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

' c! m+ b( G% h8 v
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
% I2 j% n8 L( W) ]' _8 _                CComBSTR m_udn;
        };
7 i: E$ p  Z! d. ^# V       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
4 \* m9 _1 V, `$ d) B        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
% z4 V# n/ b7 C/ n1 M. M        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
: Y; w$ j6 }0 Z        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
( q) b; B9 \. Q                LPCTSTR pszInArgString, CString& strResult);
! u' j) {$ R# e4 V9 M        void        StopUPnPService();

9 T4 x0 [9 j0 @$ U
) a$ o' ?; R+ d' z/ Z        // Utility functions
. b7 A! ^+ i: o: Y' T, e* D% H! T        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
/ M  s( y7 b* B* g$ Z$ i8 W8 @6 }        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
# i6 d5 B' I' |* W5 U        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);


// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
  Y* l+ C& J) O5 T; L3 |
& W/ ~4 x) j9 k2 h8 u) T6 |/ G
        LONG        m_nAsyncFindHandle;
1 E! p" Q" Q  @' G9 I        bool        m_bCOM;
        bool        m_bPortIsFree;
7 Y4 S( n# |5 o& k        CString m_sLocalIP;
6 ~4 |! ^7 P) A9 D        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
1 j9 u8 n: R2 P2 ~2 c6 R        bool        m_bInited;
        bool        m_bAsyncFindRunning;
5 z4 i1 H. X: X        HMODULE m_hADVAPI32_DLL;
' I/ }+ t5 p4 I        HMODULE        m_hIPHLPAPI_DLL;
) u, ^: ~# E& g. T3 D        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
" z$ l. N8 F/ }/ ^1 F, N7 s6 U        bool        m_bDisableWANIPSetup;
3 J& [8 B" }0 j- T7 M        bool        m_bDisableWANPPPSetup;
( |2 y/ Z( f) E, Y

};

0 C3 p+ Q5 d( f
// DeviceFinder Callback
' C4 ]  t) M8 D, u5 Nclass CDeviceFinderCallback
3 O' ~) R# v1 ~8 o$ ^; k3 @% B        : public IUPnPDeviceFinderCallback
: k0 j7 Y% h4 o8 U{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
  w$ f9 |$ w0 W% F7 i; ^9 d                : m_instance( instance )
        { m_lRefCount = 0; }


0 V8 V' Q. u1 S' ~8 a$ ]   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


/ E" K& e5 F$ r# s3 t// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
2 ?* y% a, s% Z! C# }        HRESULT __stdcall SearchComplete(LONG nFindData);

; L; _4 Q* n, @" Q0 d
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
% n9 w4 k# m! u" `' \8 k& W};
- K6 F6 O8 ]' C8 x3 v2 {

// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
" _" @: [/ S9 Q{
7 N: x4 `8 H0 W9 N9 c, Spublic:
4 A& t+ O% b1 i        CServiceCallback(CUPnPImplWinServ& instance)
1 [9 E/ q% Z2 `, B( I, o6 g# I                : m_instance( instance )
& l' M- {4 S: r8 w4 F! H        { m_lRefCount = 0; }
   
# }% j  L; P8 O7 m$ j. ~   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
! t8 ^5 Z) a: B; i   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
6 |3 h2 b% m% {+ Dprivate:
9 f; v# O  \' X# K        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


. G- G: T, V; Kprivate:
( D1 j/ m8 c% v0 H% A        CUPnPImplWinServ& m_instance;
- F) A; T8 v& e, }" F        LONG m_lRefCount;
/ e7 ], M! S/ k2 t};

! S( ?7 F# f; L1 z
/////////////////////////////////////////////////
( Q5 {8 s1 x- E6 l1 Z
# a, C$ d' `9 X  A0 f) W
% A5 `# s( n! P* ]0 d; M, t5 m使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
/ R8 v5 a) f* w- rCUPnPImpl::DeletePorts删除端口映射.