UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   ) y1 G  j9 W( f; d2 T' h! {! q
4. #pragma   once
   
5. 
   5 N, T( e3 S8 N8 o! P
6. typedef   unsigned   long   ulong;
   6 Q0 O8 \8 S) Z; K. b
7. 
   # U7 `5 ~+ Z7 ^$ s
8. class   MyUPnP
   0 e+ Z5 z  u; x, u& N4 j
9. {
   6 F6 E7 h3 r6 O7 L' x
10. public:
    " C9 g/ P$ C6 z& r$ B% F. i% w
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    8 M- g+ o1 z) q
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    ( S$ S3 e9 a7 \! D
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
    # X3 n+ G2 n$ N: c
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    . u6 z/ o! E8 J8 b3 }
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    + ^; Y7 m. Z& f" x: v# R; [; I4 ^
25. WORD   internalPort; //   Port   mapping   internal   port
    & K+ J! S+ M2 u9 z8 s# z
26. WORD   externalPort; //   Port   mapping   external   port
    " h* _, m5 Q" `" v7 s8 p9 y
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    6 i9 b; T! {0 G  ?1 Y3 i1 J
28. CString   description; //   Port   mapping   description
    6 {. ^0 u1 p" J# D; o- e
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    , u0 u' o  v, r( V0 C- `/ q# K
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    1 i8 T+ z# `; W2 k- \4 N5 e
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    9 u- o% V( z9 N$ G7 f" G: b
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    7 k! ]. q- A1 P2 f7 h
41. bool IsLANIP(WORD   nIP);
    7 h. k  _$ w4 D* J# ], q
42. 
    + Q5 |. }! ?  v  e1 Y5 [
43. protected:
      p9 \6 x) {1 o% S# |- @7 K
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    / y) q  z% E5 ~# Z5 g
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    3 ?* r1 J% a/ N, v8 O/ Q" f
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    3 _7 F+ C* t1 V0 S7 @! }) R1 m) y
52. 
      |5 ]0 A4 X8 ^( s4 c
53. bool Search(int   version=1);
    : G/ z) |" _6 m' b8 J+ U8 n' o
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    + ~$ U* f- s6 m' u: m, n
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    ! B- a5 f" x; ]5 l& `9 h4 [0 q" x- S, \
59. bool InternalSearch(int   version);
    ' k* U3 U0 s; T, h
60. CString m_devicename;
    / n  Z3 C. |5 y. `# J: K5 y( s
61. CString m_name;
    1 Y- X7 I7 P. a7 Q4 {  O: O
62. CString m_description;
    2 m  c) L, B9 q: W1 ^0 b
63. CString m_baseurl;
    - q7 x6 u: X. J! U1 E7 c# v
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    9 |+ H" p; x0 j$ E* S
67. int m_version;
    6 S( p5 h" R/ D6 M% ]
68. 
    " K1 [8 ]8 p3 z: h
69. private:
    & j* k7 f1 {0 u1 T/ v
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    8 P+ T) h, `$ Z; [2 k
72. CString m_slocalIP;
    
73. CString m_slastError;
    " Z) S  S: }2 i9 a# J
74. WORD m_uLocalIP;
    
75. 
    
76. bool isSearched;
    : [+ T/ y* Y( T" H  V+ R9 c" b
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   4 x& P# I( Y" \; A
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   / f8 N  x8 A- |5 c! s. K
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   . p  B7 N  U) Z/ X. b- i: `+ j
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   / m* M; n% B# L: _$ T! L4 p
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    * H3 |- W8 r3 d2 _+ Y
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    # Q! ]2 k$ `' n! T! G
17. {
    
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    . C, i/ j( D( X( l9 E" b5 w
21. 
    & R) F1 o! y" u5 M  |0 T
22. return   s;
    
23. }
    
24. 
    5 M- D+ x# c) m+ ~
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    8 d$ q+ J: m1 O1 V# c; Z
28. }
    * W; B5 r9 [* k7 E' L4 I
29. 
    6 y1 J3 t6 u, u1 l* s: c$ C  D
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    6 M% B3 ~2 @, o; P3 h2 X
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    ! s+ f7 z) ]! q: [  G; n6 l, j
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    ( H% |+ ~( \$ P( s
37. char   buffer[10240];
    
38. 
    5 k. b! R8 `. q) C- l+ t
39. const   CStringA   sa(request);
    ! w. K! `8 G' L* {% l
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    7 W- |) Q! X+ h! m8 j
43. uint32   ip   =   inet_addr(CStringA(addr));
    + I4 S, j6 R/ P& Y8 V! R
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    0 ~# {  S. W# Y( Z9 _, p$ M) t
46. sockaddr.sin_family   =   AF_INET;
    " s; a5 I2 y- _! \2 J0 v
47. sockaddr.sin_port   =   htons(port);
    0 [; U' ?2 r1 v/ M5 {
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    2 X. d( i1 d/ F9 ?/ d
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    1 l" h9 h$ E0 Z1 I0 s4 p# M7 M. k
50. u_long   lv   =   1;
    # D9 H0 a( l7 c. |, V
51. ioctlsocket(s,   FIONBIO,   &lv);
    $ r; I9 H8 ^( X5 X3 M
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    / ^( [: q4 U5 d: X; v
53. Sleep(20);
    8 [9 F$ z. v% H
54. int   n   =   send(s,   buffer,   length,   0);
    : @" B) |- c/ |* ^/ u
55. Sleep(100);
    1 F, T2 @9 j. h* V& j
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    " i( f3 T* W2 S; E
57. closesocket(s);
    3 c5 _7 B2 e* p/ K; N0 U
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    8 l) M- N2 [) Z: N& x( O7 n8 v
59. if   (!rlen)   return   false;
    % |6 h; F: h: g( t8 `" ^. ]
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    ! B7 x2 h- o) [+ x, k  k
62. 
    % W) m- p; W: U  @+ h
63. return   true;
    
64. }
    + o. c) f% R" z. T$ T3 s" l( A
65. 
    / X* ?0 m$ f4 s5 c
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ; j* R. j% _! A- `: O8 P, K
67. {
    
68. char   buffer[10240];
    / y) e9 k- W# v) G
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    % \2 V7 j  d8 U3 U) F6 z, H
76. sockaddr.sin_family   =   AF_INET;
    4 b* g0 a" a# w1 T: f
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    , e8 R4 r/ ~/ g5 `* d. M% ?
79. 
    $ V( R% |7 @# T$ e
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ( v5 e  P' i, Y. I# f
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    ' v. Y' Y9 R0 v6 ]+ m  ?% H
85. int   pos   =   0;
      i! u* m6 s6 m) t3 W' J2 I- h) b
86. 
    . x) k- ~3 k8 Z' b2 [+ X
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    4 H; c" ~: R3 q* Q
90. result.Delete(0,   pos);
    " s7 `2 e8 ^! M$ H1 Z7 o
91. 
    
92. pos   =   0;
    $ {9 i( O7 f, |% R! i9 n, R
93. status.Tokenize(_T( "   "),   pos);
    - n* y, \( d0 }, Q* n3 K
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    ; `6 b$ u* G6 h+ k4 o% |8 ~
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    8 Q5 ^! @5 ~2 K$ x7 s
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     1 M0 T& a. f* p/ k) ^
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     ) a6 q: m( ^' [% _( L3 s" d
109. if   (posStart> =posEnd)   return   CString();
     * h$ \6 c: `( v# j8 M1 O' w7 E
110. 
     8 }$ `; d0 j8 x4 z; k! F
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     * q; W5 h9 q. H3 I% m
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     - O" x+ K3 a# X0 n- b: }0 [
116. {
     
117. m_uLocalIP   =   0;
     1 J; s6 ]. p5 f
118. isSearched   =   false;
     ; {1 A% B' a$ W4 P" t
119. }
     . E; E& I2 C/ n5 {# Y1 N
120. 
     2 k6 V+ F0 V% P
121. MyUPnP::~MyUPnP()
     0 v" u, L, Z& a: j
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     ; U% t- H& ~4 h
126. search   =   m_Mappings.GetNext(pos);
     $ X, S' ?: S: a; k' }  _
127. RemoveNATPortMapping(search,   false);
     
128. }
     ! H- d' Z% r! n2 ?
129. 
     - W/ k. C7 }" m) |
130. m_Mappings.RemoveAll();
     8 j+ O1 [. J* {6 l, _/ b  i/ Q
131. }
     
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     & L% j& o9 W. C9 u1 t) G
135. {
     7 k. Y, n% @! R' _
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     6 x$ H: p& q' @3 p! r
138. 
     . y& f. L4 ^* D; P. m" N
139. #define   NUMBEROFDEVICES 2
     9 S( H# h5 \: c- s& j/ c% Y
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     6 E/ Q1 h; \4 j9 U! u* G9 n) s; L3 r' `
142. {UPNPPORTMAP0,   _T( "service ")},
     , a6 W, D/ k/ ~+ b3 D3 }4 A' O
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     1 V" L( E5 W) _. k4 _
144. };
     
145. 
     9 T- q- E; t5 q: l( P: O/ U- I
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     3 f, n! J4 j8 [% Y: |8 `/ q
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     - [! J  f1 }" \, k  v
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);
     + Y0 g' j4 X1 n" b4 t+ u
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     ' ?" x- h1 D* x+ t( _: ^
159. }
     ) F# h7 E1 \* s. E3 ^
160. }
     
161. 
     : F$ b9 [/ ?/ W3 u
162. Sleep(10);
     7 ^. w: m: o) w. U% @
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     + Z4 c/ R2 H0 d( D# b
167. closesocket(s);
     
168. 
     . T. w+ S2 X* Q" M& m0 a. t
169. CString   response   =   CString(CStringA(buffer,   rlen));
     ! v/ r5 N: B1 @7 X9 z8 i
170. CString   result;
     4 @8 I4 w: B8 W& m
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     8 b1 \+ d, m* \9 b* Q" F
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     + Y+ U0 t8 x; e  x1 w3 G5 q
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     / ~+ v5 ]% ~' N- C9 P
182. line.Delete(0,   9);
     
183. m_description   =   line;
     , z) h! m3 n* z  L/ _* L2 {5 l
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     ' n% o$ V0 W& L! c/ o# \: [
187. }
     
188. }
     ! G3 G/ u# ^6 h2 H1 y' M
189. }
     
190. }
     5 u" z' U  U5 Q4 W* M
191. closesocket(s);
     3 r- n" K& |9 @0 W6 N: g
192. 
     
193. return   false;
     - Y/ Z: u$ ~+ i# V9 G* _: o5 E% Y
194. }
     6 K) E5 t+ Q0 M& \

复制代码

天云上人

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


/ y& t- w& f+ J* ^///////////////////////////////////////////
* R0 K5 ]! A! w+ e9 g+ R4 r//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
" f8 P# Q0 {/ k; o! z
. R0 S0 R! W/ ?+ Y" V+ s! j
* K2 O) P# R; Z9 r' F( V$ I; l#pragma once
#include <exception>
1 I$ N, r; O" z7 G6 T% b

0 T! o& g1 F6 O6 z; Y  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
};


% k" O# R, W$ F, n' P1 v; B# y  ~enum UPNP_IMPLEMENTATION{
  z% B6 v; s, F8 _) ]' G5 a        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
4 A; h% b! m* E) [        UPNP_IMPL_NONE /*last*/
5 G. k: V/ E& W};
: l- W4 j5 K4 L1 n) a0 W
: u% _& u" Z1 C4 y/ b% y. I


- u) ~0 |1 n$ [! z. t8 ~/ wclass CUPnPImpl
/ i* u8 ^" U; B* W+ s: |4 }+ L# v1 B{
public:
        CUPnPImpl();
- S0 g( _! w3 d' Y. ^' u6 E        virtual ~CUPnPImpl();
+ p/ I. X3 v' x7 z$ O  Q8 z' x        struct UPnPError : std::exception {};
2 ^0 P6 J: ]/ X  E7 J0 v; b) C        enum {
                UPNP_OK,
3 z5 ^6 h2 k, c  i                UPNP_FAILED,
                UPNP_TIMEOUT
        };

7 V" h3 k9 [/ K5 d9 P
! ]1 D2 u% Q' @4 x        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
* Q  }7 x' c: N        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
$ `6 V( z( h+ x" v        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
: F9 P1 o+ S1 z4 K. d# d8 j# W; B; {
/ l3 [  c: q% c' c7 G9 X
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

- U1 z5 l. o: P: w5 ~9 [
// Implementation
3 E2 J: G; R# T& Q1 Gprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
$ y! i) C' u9 u; T        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
9 x5 {. H/ q! N, T        uint16                                m_nTCPWebPort;
3 y+ ~" ^- _. V& R. z; H        bool                                m_bCheckAndRefresh;

: Q: I" d" p  H+ H7 I, U5 W0 u' m
private:
0 i* R0 m/ y6 j; {        HWND        m_hResultMessageWindow;
( [9 l4 @8 v) v2 a. u        UINT        m_nResultMessageID;

+ Q6 [1 _9 Z$ ^/ s
6 m5 f) v7 S' Y; }! ]5 Z8 x};


& H' q; ?4 c  _# k" I// Dummy Implementation to be used when no other implementation is available
* z8 e8 a3 O/ @# j" L4 eclass CUPnPImplNone: public CUPnPImpl
% S) h$ V/ X3 r{
public:
( C6 C" v* R/ F9 G. v( w5 v) w6 Q        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
% i3 W$ \) o7 B3 R) Z        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
. ^5 ?. {  m  G        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

0 {% \8 ?& w* V2 f
' Q- p0 g; I/ \2 s1 f- q/////////////////////////////////////
3 g, Q& Y1 x* C' J3 x1 `; F5 n. M//下面是使用windows操作系统自带的UPNP功能的子类

. T" Y1 f" Z" W" |# y; o- f5 j0 G9 \
#pragma once
" G. z" F9 H1 [$ _, e#pragma warning( disable: 4355 )
' S) W, |( p0 B; N3 l" r+ W
! [8 V: q2 @# l* I6 }, n
, v; x: W' p* f" a, A7 d+ m#include "UPnPImpl.h"
#include <upnp.h>
8 X& A- l) U/ @( m5 v" h1 b+ t! V- r#include <iphlpapi.h>
7 }. @. L+ S: l/ [8 w#include <comdef.h>
- n3 M2 j# L- a& D9 M* ?#include <winsvc.h>


#include <vector>
#include <exception>
% t2 n# {8 \) W; U5 _1 ~#include <functional>


) l& q/ B& f+ w
% C7 r* ], m" h
9 p' P! `: s# p4 r- L4 F# a; e1 \# etypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
6 u  y0 Y5 C; Q: y0 b8 qtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
7 ^: n, C- l; ^4 W. @% D; `9 Utypedef _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;
) M; k6 G9 q7 s* s" Y' Otypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


- _: W: G* q- g9 Xtypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
1 T- s# n: m2 s. L' ]+ K$ k);
: ]# k1 o! [, o* H
4 `" z- |, N9 }
typedef DWORD (WINAPI* TGetIpAddrTable) (
! n8 O( R+ ^# H$ Y0 s! ~( B' w: R: o  PMIB_IPADDRTABLE pIpAddrTable,
1 }. j9 T9 k) q- W8 Q0 ]  PULONG pdwSize,
' _) ~0 M! w/ a$ D! S2 Y  BOOL bOrder
);
/ ~* A. t3 ^. m7 k1 G; ^" ^
1 B# x: S8 I/ J. p' [: V
typedef DWORD (WINAPI* TGetIfEntry) (
, R9 h& n( g6 }% _% x  ?$ R  PMIB_IFROW pIfRow
);


1 E/ n" C3 ]) d+ u2 t2 o; a  DCString translateUPnPResult(HRESULT hr);
6 e& I0 p6 v3 k9 x$ Z. yHRESULT UPnPMessage(HRESULT hr);


6 q$ \" ?: C2 F- a! p& `) Iclass CUPnPImplWinServ: public CUPnPImpl
{
8 Q% s" s; W  t3 O. w% U( p" M3 q        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
" o. k$ v2 L$ O" {; A2 epublic:
( a. H% V) F% x) J/ t3 Y; |! @3 v        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


. H9 q0 S7 @- j% A        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
& i( U7 C& G: u9 \! `& Q& D' L        virtual void        StopAsyncFind();
: R9 \1 D- b+ g  z6 M2 k- Q        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
- o9 ^1 {1 N. R" T/ m
6 P4 C2 }, U3 \/ N; C) ~
8 R+ {' }$ G$ a/ k; R% u        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
  C% W. u1 {7 x' b/ H8 u0 [) `        virtual bool        CheckAndRefresh()                                                                                { return false; };

6 m4 b4 c2 w/ M8 o4 B& V, g6 l& v3 X8 Z
, N8 n% s  |; |& w- Nprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
  q) M0 h; _  I* s        void        RemoveDevice(CComBSTR bsUDN);
2 y/ l% @' }# t% ^- ~        bool        OnSearchComplete();
! d* X5 i/ j& M+ K2 ^+ b        void        Init();

0 |# |. e1 b" E# ]: h7 t
; X! m8 f) o+ F3 i9 a2 R        inline bool IsAsyncFindRunning()
        {
! h" {3 _" D5 E# S4 U. S* F1 i                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
# r2 ~. B# ]3 G1 ?2 A- p$ _2 a                {
' ]4 `# b3 T4 q0 `% ~: F4 @6 o& I8 N                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
/ p( x% f; x" H; F& N/ _9 g: Q                        m_bAsyncFindRunning = false;
5 \+ V; p% ?& F2 s' J" M$ ]8 a3 X                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
& \' F/ b- H/ c' D                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }
: \! E! u; |2 y
  `) f0 U" J2 s# r& t" D4 m. F5 X
& r! i2 n9 B( b  c        TRISTATE                        m_bUPnPDeviceConnected;


  E* r+ b# a# p0 _// Implementation
2 q' u5 T, H5 D        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
/ R8 j: J' i2 L5 T1 i& _: k        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*);
5 d' R- x- [' o+ t# B        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
7 c" u' m( X: S2 [, n) t        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
0 G( Q$ t& ^3 J- V( a/ _$ ]! b                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
% @- j& E6 p% W  W  Y4 g                {
/ e/ |, v3 T0 _/ {# w) w" `                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

" n. h# t4 H6 y& s, G# f
* }6 Y1 D$ {) r( |9 \3 |( r0 ]& H; M; ]                        if ( FAILED( hr ) )
# d; m; U; A. [2 O                                return UPnPMessage( hr ), false;


4 B4 |% q4 \( u  I0 v                        return wcscmp( deviceName.m_str, m_udn ) == 0;
, @4 G5 ^, H7 D! w) w) R                }
                CComBSTR m_udn;
! G3 M, p1 A4 J; ]! J! w8 o, g, m        };
9 O6 |! J8 y, z& z# C" B* A- b       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
8 f' E+ n2 O+ P  C8 s) w        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
' B/ \/ [; c# Q( A        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
/ Y+ S6 ]# V. C9 }2 m5 D& M        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
7 G4 u) G! P4 B4 c  b: z0 l                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

# p* N- M9 w' t- p& C4 |
$ X0 }( X/ }0 m$ d7 g$ @' N        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
1 U3 A( J( g' s2 ~% }" u/ \5 E        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
; |5 a0 s9 @* Q- S        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
& i1 u: ]1 Q7 z: ?1 A& s4 x* D+ [/ k$ Y        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
' x8 |7 j2 g7 a4 b/ a  n  S8 K

// Private members
+ N0 b9 W0 b% P' }2 v8 lprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
7 k8 v- Q- T# \) _2 K, I+ W        std::vector< ServicePointer > m_pServices;
% b% `, x6 u: g8 [        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
* L9 V) X  [; j' S        ServiceCallback                        m_pServiceCallback;

0 v" [! G1 g) k, Y) t; B0 Y9 y
        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
6 w+ w) i5 [5 |5 M: t7 E$ @        bool        m_bPortIsFree;
) n6 f5 W) y; G0 W* g* a. W        CString m_sLocalIP;
        CString m_sExternalIP;
& t. R6 {# c$ X+ a        bool        m_bADSL;                // Is the device ADSL?
. H% j& m4 h+ h0 F* N        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
  m. q) x( m9 v' \2 d        bool        m_bInited;
        bool        m_bAsyncFindRunning;
% b7 H8 ]. f+ T' e: D        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
3 \( Y9 d4 Q7 e+ M% R        bool        m_bServiceStartedByEmule;
( k" z* a1 {0 P( ?        bool        m_bDisableWANIPSetup;
  u" s  Z4 F. |5 R5 g  t        bool        m_bDisableWANPPPSetup;
' y; z+ Z! [# O4 M

};
1 ^/ {. u, z% X+ e  ~) O" e( u

// DeviceFinder Callback
9 ~0 A3 N, R- [. ~. P" ?( Aclass CDeviceFinderCallback
6 N5 [: y& Q3 @% i5 _- ~9 i. g        : public IUPnPDeviceFinderCallback
{
8 N5 L' j8 \% j0 f( Rpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }


2 g5 m4 g0 S: S& A% D   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
2 ~$ @" U: b$ Q9 Q   STDMETHODIMP_(ULONG) Release();


1 N1 e2 @: Y5 C0 g  I' x% j9 C// implementation
private:
( A( X  ~9 m$ A0 w        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
8 _0 r$ f8 K; Q- {        HRESULT __stdcall SearchComplete(LONG nFindData);
& C9 z' C5 |8 e/ Q( W

. M) O% o0 y* j* g. q5 Lprivate:
8 j: C- s7 U. t) S( ?  |        CUPnPImplWinServ& m_instance;
9 e5 t0 |- v2 }# }( J1 w3 a4 E) E        LONG m_lRefCount;
9 \4 d/ A& B7 {' q; W0 [};
  Q+ c5 p- M4 m/ X9 P+ Y$ c/ M
( C. H  z' X4 ?( Q. z
" F; {6 o6 b0 V+ o2 }' h& u// Service Callback
3 m, e) i! j# q/ Sclass CServiceCallback
        : public IUPnPServiceCallback
{
  n& l, M: K) e' K2 Ipublic:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
+ [) ]9 r  e: r) Q5 i: M- |3 `        { m_lRefCount = 0; }
$ E3 }) }! c6 k; I" c; j   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
' p. i2 L$ M8 d$ o% h" b- mprivate:
& N: f: z9 Y+ N/ C        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
- D; f7 M  n/ O& z1 E        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
. D! _$ u3 j' l7 }

private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};


/////////////////////////////////////////////////
/ I& c; J" {% o; x- A
% }1 D4 u1 A) A) E- O" p4 W$ o7 `0 J
使用时只需要使用抽象类的接口。
' E, o; K2 @% M2 v) pCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
+ Q& C; y$ K7 }. l' I% nCUPnPImpl::StopAsyncFind停止设备查找.
' _9 d5 C+ Y9 g6 X0 U* B7 U4 O# E, yCUPnPImpl::DeletePorts删除端口映射.