UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
     Z3 ], \" J/ @7 J$ s- X3 X: z) S
3. 
   
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   ) P" F' p$ ?+ ?- C; P3 H$ V# \* ^
8. class   MyUPnP
   
9. {
   - m( ]1 ?/ w; u
10. public:
    
11. typedef   enum{
    7 @5 E( M* H- e# }$ H% H/ n% _5 H( M0 i
12. UNAT_OK, //   Successfull
    + P- f) f  t4 \  m# o. W- p
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    $ }6 _/ `5 J$ l; e
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
    . B3 ?' ^3 `2 ?6 U. p, H
17. }   UPNPNAT_RETURN;
    6 _& o0 m8 l) W% N( H  F
18. 
    ) d$ v; X! t1 d% W3 e
19. typedef   enum{
    , P# `. R5 M+ c' u4 l3 y
20. UNAT_TCP, //   TCP   Protocol
    $ n3 a  `; g4 T8 k- p; E7 M# V
21. UNAT_UDP //   UDP   Protocol
    3 R" t0 Q; |0 c) F" U/ _. ]
22. }   UPNPNAT_PROTOCOL;
    4 {* ?7 x  v0 }) `$ t
23. 
    8 l: P; F$ Y3 J1 u% @1 _
24. typedef   struct{
    # o1 D! D0 S; l6 C
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    , [1 a0 n& K1 W! w9 X! x1 m3 E
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    . |- {/ O( x$ B" _6 P
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    9 u7 E. @8 n0 q
36. void   clearNATPortMapping();
    8 A4 M, D2 U1 ^  e
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    9 E. u: ?1 A  v1 d: y+ \! d0 H
41. bool IsLANIP(WORD   nIP);
    ( U/ H$ H- d3 s6 n
42. 
    % O- e$ W" H! S* T# N6 b& f
43. protected:
    
44. void InitLocalIP();
    - h: N3 B7 y9 z% e
45. void SetLastError(CString   error);
    ; x, V& I0 F9 F5 q  M2 U
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    6 z* K" B& V+ s
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    ! n& v& L2 @2 _9 q7 i1 G  M
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    $ h! X2 f. b, J( S0 u& K% w
57. 
    9 r" H9 ~( f" P: O+ G' c
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    / v( e+ @- x  k( z" Q3 a% g" u9 y
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    ) `! g1 W5 F9 o" M- t6 u
61. CString m_name;
    8 j: y0 U, B  z6 N; R9 B
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    
68. 
    ( S. }) t. P, o5 Q/ w. b
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    8 v3 r+ t  ?) S. z  e' W$ o" J. t
74. WORD m_uLocalIP;
    ; S4 {- k* W/ U/ v7 _
75. 
    8 s- w$ v2 E! A0 Z* W- O+ T6 z
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   # x, f+ j: r& m9 P  A% ]! Y+ I  B
3. 
   # c6 a1 u  O7 `% o6 w9 `3 k
4. #include   "upnp.h "
   / y; P9 w% p4 c1 `/ X8 A% g  O/ k$ A
5. 
   9 e% v8 K& u6 U3 a; C: i
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    8 S+ U5 p, P" C5 `& I! h6 T
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    7 C* ~5 |0 q. }8 y% U
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    & J8 w6 @" D* [* [
21. 
    5 y1 d$ D. w2 V! m/ p+ ]& [% k( A
22. return   s;
    
23. }
    - h! P% h( V; ?) [! d& S+ G9 S
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    ( R# a% Z' K' F, @5 f; Q
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    # b* m9 D+ S/ d% {
37. char   buffer[10240];
    * f& f& v9 F) J% U5 `
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    4 D. k$ n- T4 u1 G
42. 
    : M# k, B, O5 v2 C
43. uint32   ip   =   inet_addr(CStringA(addr));
    5 s! T% w5 H. _5 G) q. \
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    ; M7 _( Z4 u; A6 W2 _
46. sockaddr.sin_family   =   AF_INET;
    6 ~; W6 G4 h4 a$ E# Y! h" Q4 ~1 [
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    % V9 ]+ ^4 b5 M* ]: R% D: ~
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    8 B3 P" C6 Y/ D" e3 V
50. u_long   lv   =   1;
    5 L" P# \' m6 b- n- P& d$ J6 C3 F
51. ioctlsocket(s,   FIONBIO,   &lv);
    3 U* N0 q0 M/ W$ d4 l1 X
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    . n1 \8 |/ D  v7 m
53. Sleep(20);
    4 X' P* \/ N/ L3 X
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    9 e  a. I* Q/ Y2 U& [% q) Z+ M
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    2 u1 H! z6 W! s$ l. d
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    . A$ Q( e0 w& V) m
63. return   true;
    # H* h' k, q& i: f
64. }
    % A' r( N; F6 a: f3 ?1 k- A
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ) o' E' W. g9 P& T8 ]
67. {
    
68. char   buffer[10240];
    $ Y- b# `$ `& v1 H
69. 
    
70. const   CStringA   sa(request);
    ( x. O3 w1 Z+ _. }& Y
71. int   length   =   sa.GetLength();
    6 ~! _; j% t0 v3 v5 V; f6 Q+ o6 b
72. strcpy(buffer,   (const   char*)sa);
    : X0 @5 K# i6 E; \' q
73. 
      Q* X7 C: u# k# _; C+ Y+ ?- b
74. struct   sockaddr_in   sockaddr;
    $ i$ n& t5 Y7 ?) t
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    , m% T/ I/ r! p7 k2 N
77. sockaddr.sin_port   =   htons(port);
    ; Z9 t  m7 ]5 H0 L5 {$ ~
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ) |7 D2 u$ c8 v2 T
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    . G" R4 [7 K/ x, [  x
81. }
    
82. 
    $ |$ i$ E: W4 L0 s3 s
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    7 v* \: m# }0 k$ y
84. {
    
85. int   pos   =   0;
    9 L2 `" T+ Z3 q
86. 
    8 m: l) e  F! ^6 }7 ?! g) m/ ]
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    5 C4 F1 U* w3 [2 F" b* A
88. 
    . h" p/ h, v( q; v
89. result   =   response;
    
90. result.Delete(0,   pos);
    , h; O) q. x6 f( j$ [# {/ |4 w
91. 
    % j9 Z  k: p, }% v1 Z' p, c
92. pos   =   0;
    & g" f- A; R1 M
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    ) D' X% D* s" J4 [4 U$ O' N
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    . A2 m. t8 |( z7 h, p5 z
97. }
    " g1 J- W1 B9 n
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    - c3 i1 C7 o0 N, O5 z% [  w- X
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     8 ^- K! m' U  ]7 O& V
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     ! L/ a: `  J. s
103. CString   property;
     ) x* V) r3 C2 g- F- C4 v6 V
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     % Q3 M2 P# N5 g) r$ R* i7 L
107. 
     ! }8 Q0 T' V/ n0 n9 q
108. int   posEnd   =   all.Find(endTag,   posStart);
     - {4 i/ ^* w7 l1 }4 d" b
109. if   (posStart> =posEnd)   return   CString();
     : s2 D* r' R( p
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     ! o  r: [# s# z1 Y8 W3 O
112. }
     3 `! w) F1 w+ P( E/ W8 a
113. 
     
114. MyUPnP::MyUPnP()
       `% J  L2 O. \* v8 Q9 Q& o7 b
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     ! c9 g+ f6 K' W
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     + ?1 ]2 i' n4 O2 m8 B
127. RemoveNATPortMapping(search,   false);
     
128. }
     7 k) Q% {- ^# z( j! i6 y
129. 
     
130. m_Mappings.RemoveAll();
     - {& n: k( h: ?+ A% s. H* I( |$ F3 N
131. }
     , t6 {4 W) A6 p
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     8 E+ \2 r3 C0 y* S5 Y, m6 |
136. if(version <=0)version   =   1;
       h& h2 l) |7 R) j) S4 E3 m) t
137. m_version   =   version;
     7 K  }! |  M, o5 j( i+ B
138. 
     7 S6 i6 o) u5 V3 r$ J, c& j; i
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     ' [& s$ v: ?6 n, }
141. {UPNPPORTMAP1,   _T( "service ")},
     - o: k; z+ L. {$ z
142. {UPNPPORTMAP0,   _T( "service ")},
     & u3 Y$ ^/ D( b; }5 a3 k& H
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     5 O* ^9 o/ D% x# d! O; f
144. };
     # F2 g3 K8 E8 v6 H5 [
145. 
       f, Z3 I8 b- N/ A- F$ N
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     - `; r# s$ L6 [. m1 C/ \3 w) t
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     3 ~& \4 E/ p  a; I! j5 U
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     - T: F: P! T3 i2 @
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     - L/ N, h0 J/ R2 K
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 "),
     # S1 s' J6 J6 s$ _3 i- J; K  H) z
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     ! f9 j6 M5 U5 S/ V0 z
159. }
     . W" d3 q! L! K5 W5 u
160. }
     . K5 y1 v/ v3 M2 ~6 A5 ]& X- B
161. 
     
162. Sleep(10);
     ( f- a: {+ W2 h
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     9 M: ~; T0 |/ h4 _
166. if   (rlen   <=   0)   continue;
     ; O0 f/ e$ ~8 R* K! T3 p& D: H
167. closesocket(s);
     + g( n! m3 g9 j) h) d$ M: T
168. 
     & u4 o9 y2 P3 V  H5 g
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     ! J6 a+ H* v5 b& V+ h# S
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);
     9 ?: E) b; z  h8 \" \# C
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
       {3 ~) S; A" R! `; e1 n9 [/ r+ X1 B
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     + b' \) P6 a  j
178. if   (line.IsEmpty())   return   false;
     0 d+ X! V7 X  j6 t, \3 i
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     7 t8 f% J( h+ U3 M, |
182. line.Delete(0,   9);
     " A) g) o: j8 v- R2 w/ B% Q
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     . x6 X8 U+ @2 k9 _! K0 j5 J' J
188. }
     0 X! e$ p, E0 b4 Y8 f+ p% m7 \! @
189. }
     7 h9 X6 ^+ a( ?* X
190. }
     " A' t# X' O/ U8 r* X7 {
191. closesocket(s);
     & p/ t# p( [$ w  P8 Q5 t$ u& m# s
192. 
     % d9 ~- H, p; `& y/ K  w, |
193. return   false;
     
194. }
     , W, `9 A# s1 }% R% N/ f

复制代码

天云上人

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


. N" p2 n8 B( F1 c& R///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


0 J( M4 N$ y& O3 P+ f! l. k0 |2 q0 h#pragma once
3 ^( E( m" O$ q( G6 y! Y2 Y#include <exception>
/ ^$ _  z. Y+ l- p

) y" d: H% {/ D7 `, U" T5 s  enum TRISTATE{
- ~* W  G* D+ L5 S7 A0 y        TRIS_FALSE,
        TRIS_UNKNOWN,
) B4 h7 o: M* i/ S# l" h6 \. I        TRIS_TRUE
& C' S+ ?$ |: M4 D# J  {2 d: [% M( H};
4 O, i1 M) ^" s9 S# ~# i% r
1 J3 p  Y: {- S+ j$ G
$ z1 G2 r( _2 `: Z3 C+ O: W' Y" f5 Zenum UPNP_IMPLEMENTATION{
- [" ^* T! W( C+ [- [        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
, F4 L& y+ g8 [5 I7 @};


5 d' K8 Q" h) R( u
' `& q: j- t' i: P: D5 T: |
class CUPnPImpl
{
public:
# X  {- T! {! k; S* K( W        CUPnPImpl();
8 K6 p/ G' z: T" @& Y5 T) W1 p        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
. h0 }2 Y9 y# M; z- y& j9 e                UPNP_OK,
                UPNP_FAILED,
6 \( u& o% _  k* W  E0 @9 t                UPNP_TIMEOUT
9 t! g- G4 \- e* a$ z        };

* w/ R& c- {' c9 C
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
7 W1 g0 j$ r8 l# h8 F5 v        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
3 i9 \' C6 V+ ?* v2 J* a0 g3 h
  Y% d% P, g% c8 a6 y
/ e, Z6 N9 j& e8 @; }        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
& y: M( y+ u8 r* W3 ^( i        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
, |5 {! h3 w4 p        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
1 D5 w) O, r! E        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
" @, I  p$ i+ B        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
5 D+ h* Y$ F& m* T) g/ c8 ^        bool                                m_bCheckAndRefresh;
0 _' X7 b4 h% x$ ?( g

8 s3 w6 ^6 X0 T" U% Rprivate:
        HWND        m_hResultMessageWindow;
$ ~+ \/ N! Z4 L# l        UINT        m_nResultMessageID;

$ g% ]) S) r; {
. J. b4 _* h2 q};


1 l2 G8 D# E4 G# J- l# l// Dummy Implementation to be used when no other implementation is available
$ I, }; l9 J- ?% aclass CUPnPImplNone: public CUPnPImpl
2 n5 p! ~. l1 w3 y0 l{
8 j4 W( e  H) \3 L/ `1 zpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
  a3 L; Y, P3 k6 F" l. p8 ~4 A        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
* n" i4 A2 l' e5 _* v        virtual void        DeletePorts()                                                                                        { }
% G+ p6 J) O+ _" |+ K/ v2 N        virtual bool        IsReady()                                                                                                { return false; }
  n* J7 }* L7 z+ W0 ~        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
  k" e  B9 D, H& H% ]+ ~) u$ I# \1 T};
9 l* d7 r' a  c- ?
/ ?( m& U( D4 a9 N! T
- H/ {0 x- @! |1 {' ?, U- N4 f/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
/ }9 O& `$ r# V4 D/ \

#pragma once
#pragma warning( disable: 4355 )
1 ~3 T9 }, Z* k1 U( S

% G; u5 l7 w6 H5 [#include "UPnPImpl.h"
#include <upnp.h>
3 @$ g0 T6 _+ s' ~#include <iphlpapi.h>
  s7 {+ m- h" W$ m, {/ i7 n3 j#include <comdef.h>
5 n0 t6 z7 A8 x; \6 [# X#include <winsvc.h>
$ ~" U4 F/ M4 L" Z
! y" Y! U$ D  c! J
#include <vector>
- G( Q4 }- O. L) p* J" s, d. R#include <exception>
#include <functional>
! W7 l0 ]1 X* i% a2 O9 X; R! J: P) J
; y; i" C0 h# f$ r0 O5 Z


typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
1 t# U) O$ Q9 l5 `* R6 F8 z! {typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
  n8 j# w* q( ~4 n) e/ U' K) etypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
/ ]5 d, j1 U8 \! f1 s4 Xtypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
" X- f' @( d: U& O) |5 T

typedef DWORD (WINAPI* TGetBestInterface) (
% Y) t: X# [0 P* d4 y  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
# B( |' l% K) u  N);
! y! i) x- R# K* ?# e7 G

/ |$ W  ?( ]3 G& @+ {8 mtypedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
8 o# i2 }$ d9 G" L  O) p6 u  BOOL bOrder
);

- z9 V* _3 q. r5 z3 c
typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
/ v: Z! b! U# l3 j* j* v
' g" F) U0 s& C5 @, ~# ]1 @4 }
& X6 Y( }" r' Z  h6 yCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
- G9 z. M# z7 R8 l' R/ Q, P
9 _. Q  c* @2 w" ]0 c9 ~) D% M) Z
class CUPnPImplWinServ: public CUPnPImpl
{
$ {/ m: R' G3 t# o/ o  S; |        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
9 @: [- V. V3 @" E// Construction
: {  @' R% l- n$ v7 a! i4 w( `! W0 z% Tpublic:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
3 ?  ]- I+ B0 Z- g1 V. Q# V
, f2 y, K5 c* B0 c6 v9 w
) p7 W; L* H/ v: Q' [        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
1 O$ E7 }7 W/ u, A        virtual bool        IsReady();
( R0 \  L  k' J: w7 ~        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
% O7 P. Y" f. Y; H7 [/ \

        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
3 Y! ~$ s; |: O( S: C8 ^        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
  N4 ^$ d" n+ i        virtual bool        CheckAndRefresh()                                                                                { return false; };

& t2 Q" \( m6 H, b$ L7 Y9 \
5 A) _' d* G+ p; L' j( X. rprotected:
8 ]' r& a' q  v+ T9 Z        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
& R0 {+ f5 o6 Y9 T: N& ~! ]: V        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
# Y* o8 }9 q* k2 `3 S        void        RemoveDevice(CComBSTR bsUDN);
+ c, d+ V. c% P% D0 k3 V1 r: _( G        bool        OnSearchComplete();
5 d- S+ V* m6 O) H4 F        void        Init();

( c. z5 h  g3 Q% S* ]: c2 f1 m
  |3 C4 a/ s: A. H        inline bool IsAsyncFindRunning()
" T' E# x- I, K" L  R" r        {
  p* _/ g0 J6 O1 h6 i                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
; B" c$ f8 F( e6 f. Z$ y' f8 C                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
9 F. I# q( F6 a' e- Y                }
2 Z, L# C/ G" u# F                MSG msg;
5 I5 R( q# p0 y% c. E                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
" H2 D* V, v. g% f# ]& O                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
/ f+ F+ o3 m( B) @        }

1 ^( K# ?( n+ i
        TRISTATE                        m_bUPnPDeviceConnected;
  F# q. b; B+ o2 Q% T$ ^' l

: v$ h3 C5 r: D: L: L# W// Implementation
& q$ a; h2 r4 v' |/ E$ O- V3 d0 y        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
, p% v5 ~& v- S; v- N9 R- m# i        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*);
0 z/ S# H4 y5 e& ^; S3 W! {& @7 i* R        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
$ ~% y9 \2 Y  `6 x# Z2 o9 u6 S

; U3 ^3 u# _/ x8 q, R        TGetBestInterface                m_pfGetBestInterface;
# c+ a8 M2 P  y6 i. X: a5 ]1 Q        TGetIpAddrTable                        m_pfGetIpAddrTable;
4 Z: }& Q+ F+ Q1 z4 S. \        TGetIfEntry                                m_pfGetIfEntry;

- v: x- X, J, G' F* F3 F
        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
! s) `" U0 z6 o, l3 f        {
9 `# J  i0 o. W& g, B, O; [+ G                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
& {% k; w% i6 O6 w8 ]) w% T/ ]                {
+ g  R- z$ A! a/ p1 w                        CComBSTR deviceName;
6 [% e7 W& X2 \- F! n7 `/ Z7 p                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

2 y. R' K' c, u, {* I
                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
2 O  k' u; \( f, P' g
3 N0 R0 b% E9 N
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
        };
% M( v/ @" Y' v       
' o. e  x0 L% Q" f1 H; C6 B- v$ h) a        void        ProcessAsyncFind(CComBSTR bsSearchType);
# W. \+ D' [) u. c* G# N( t        HRESULT        GetDeviceServices(DevicePointer pDevice);
0 T& b: Q5 ~, }( b3 T  t        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
  Q- u' h6 |3 H        void        DeleteExistingPortMappings(ServicePointer pService);
  {: l; S$ {3 v: \1 s/ T7 y        void        CreatePortMappings(ServicePointer pService);
1 K3 X3 o. M8 w# ]        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
4 U; b- ?2 x! u3 y6 m( i        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
" r4 ?+ }  r" b: S+ x        void        StopUPnPService();
" V4 m6 S0 p! @
- m  F( s: F* X2 W+ U9 f3 N1 E
        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
7 Y) X5 U7 W; {2 y$ f        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
; p1 G) D; |+ ?- ~" H        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
2 `6 \$ _7 s6 z+ i& s( J' A        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
$ }9 K% P7 l6 T: ]7 L. F* ]

' \% w! i2 C& B9 S4 J// Private members
  L  R, y+ p3 ^private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
" @$ v1 M) a; U% T2 D        std::vector< ServicePointer > m_pServices;
+ O! X4 P' z) q& Y        FinderPointer                        m_pDeviceFinder;
% ^# R8 b! q! Q2 s2 Z        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
; @2 o' y3 N6 J9 E
* S; S( z' J9 F6 j# A; d9 m
        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
" B5 S# _) W; I, X0 b4 n        bool        m_bPortIsFree;
        CString m_sLocalIP;
, X! @! [, B. z4 Q, r& r        CString m_sExternalIP;
, B; L7 T; r0 w. l7 F; D        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
* R, e5 b6 _! o  A6 S; M( R        bool        m_bAsyncFindRunning;
  |$ \+ P+ T$ Z5 w0 S  H        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
2 `4 @. {: [5 J        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
1 O6 w+ i% r5 p
% q9 h- p- [1 P8 i# ]5 v: R! o# P
};
+ K. l5 f0 q0 T
- |! Y& J) K7 l, E2 l9 L4 W
' ~( V. F* y5 `0 a9 F! d: W// DeviceFinder Callback
; z0 P- d9 o' Y8 `) qclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
* r4 {9 d' d, _# R+ }/ j{
7 o5 ^" w0 @! [9 X1 j" H; Rpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
0 X# z: r  |) e* C$ g& V                : m_instance( instance )
        { m_lRefCount = 0; }
* P) ^5 B* `% q. i3 e7 z5 y; _

- Y9 Y6 W  `4 W+ R   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
% |/ L8 ^) L+ R+ t3 }   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
' q% J$ m2 h; z) ]! M% o

  U& M7 H5 R& a4 c9 n) z" qprivate:
, ^- j' U. k9 |% [3 k  w        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
" Z8 U; t3 w8 F+ f1 C};
: `  p2 E3 i3 e3 Z$ x- X

// Service Callback
class CServiceCallback
" }+ m* B/ ]+ S+ d& W8 v, k6 s7 a        : public IUPnPServiceCallback
{
public:
+ D( F8 H9 F% d7 m+ H0 q3 ~        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
0 p& e4 V( |' u        { m_lRefCount = 0; }
  U' K8 S2 c* X. R$ I% K# T   
" @3 x+ W# W4 h- C0 a3 l   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
3 ~( d" O& a# d7 g6 M
: e. u( J( c$ }2 ^. V
// implementation
7 W4 d4 M$ P8 Fprivate:
! |+ V1 ^& N1 A" t' x        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
3 J! m% L; D6 b  @# i        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
        CUPnPImplWinServ& m_instance;
: ]6 U, q& K/ r0 h) q3 n        LONG m_lRefCount;
- d! s1 R! S; p};


/////////////////////////////////////////////////
6 W- m: Z3 h  F! K% ~0 Z" M* g6 S
8 W, ~5 @. }# E7 l4 w$ w7 E; A
使用时只需要使用抽象类的接口。
2 V, G& s0 S. |3 G4 V  PCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
' x9 Z) N; `+ iCUPnPImpl::StopAsyncFind停止设备查找.
: V  S+ e+ L8 }3 f' mCUPnPImpl::DeletePorts删除端口映射.