UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   2 ^  O' w9 S! _) K8 s
3. 
   $ v( g! v4 p8 A; P, u+ ]$ Q
4. #pragma   once
     L! I/ H+ }7 G4 b
5. 
   5 `, g. K/ _4 C& {% T4 O
6. typedef   unsigned   long   ulong;
   
7. 
   3 h# X1 ~6 y# N; \) k, J& Q9 |' y
8. class   MyUPnP
   
9. {
   2 r: y8 F7 u! j, n, h& O
10. public:
    / `7 x5 E! n0 W6 a3 o% |! }( o
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    - T) r4 o9 v4 e" i& Y  g( P
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    ' q/ w2 ~: U$ b9 {6 t8 W$ L* ^
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    + e' ~/ {6 [5 w" }3 c
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    + c6 C  s) b( b. P
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    2 b# y9 L. `  V& [% z2 T
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    " p7 i8 A- S, r
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    5 ~( _# V2 ?' n
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    ) r) a5 a* @$ Q8 A
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    / W* e! J% w! z2 e7 e2 h
28. CString   description; //   Port   mapping   description
    5 ~# l5 O9 m6 J! I; J
29. }   UPNPNAT_MAPPING;
    # I9 S/ _! x4 O' T' }
30. 
    
31. MyUPnP();
    / `) q6 x2 X" Z1 K* Z* f7 o# A
32. ~MyUPnP();
    % O0 j( b6 e/ |, u8 {5 j& S
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    + n* k  y2 O3 o, l& t2 w( Z) m
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    7 m' u4 u* w% j/ l
36. void   clearNATPortMapping();
    $ Y) s0 i% \! L3 y9 ~, C4 O
37. 
    4 F# Z# g! W/ s1 H' m! }
38. CString GetLastError();
    & b0 l/ W; o! O" X# B9 t  F
39. CString GetLocalIPStr();
    : L9 o: ?5 `$ b! p& D
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    2 [) D& H$ x6 N9 _, E. w( ^5 W
42. 
    0 C$ d$ R  h2 H/ H4 d. [: w: }
43. protected:
    
44. void InitLocalIP();
    + X6 m+ v) F4 ~* o
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    6 c* G& H- m6 E1 [& W) ~7 |! k
48.       const   CString&   descri,   const   CString&   type);
    ; F& P/ W; W3 f( X# H% r/ s: `
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
      {  I- _! d7 m" s
53. bool Search(int   version=1);
    % x+ m  @" A% E# t6 O5 o
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    ; @0 k2 f1 d) w9 x8 @
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    3 S) L: h$ e& _; ]7 M9 [2 \
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    % b- v- M( |' l
66. CString m_modelname;
    
67. int m_version;
    
68. 
    * G5 w- R5 Z8 ~$ A9 a5 O9 y
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    : Z4 S' D: }" B+ y, Z9 C" e
72. CString m_slocalIP;
    ; A9 O9 }; _  M1 h+ ^! Q
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    9 F$ k0 T3 [; {
76. bool isSearched;
    
77. };
    % Q, F6 P: j4 J1 v# j) C
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   " v/ h) p4 o  a) a+ V& u
2. #include   "stdafx.h "
   ( A( T) a1 k$ q; N/ [* ?* q* I
3. 
   
4. #include   "upnp.h "
   
5. 
   + i/ V7 ]& F3 ^- b/ P; T, F
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   ) Y+ [9 v3 c! z/ H$ g" k7 F5 z
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    . U- T6 t: {& t& U
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    8 t4 [. K3 d! ^$ _0 a! J4 a( w
15. 
    2 S" l4 e: m8 }5 B9 }* z
16. const   CString   getString(int   i)
    : a1 x3 `8 Z0 ?' t# }! T4 Z5 a
17. {
    9 _4 S2 f: D+ T# S
18. CString   s;
      Y/ Z3 C& [( q% h3 a
19. 
    
20. s.Format(_T( "%d "),   i);
    1 p. N+ T* C; s" Z/ j8 ]
21. 
    
22. return   s;
    
23. }
    
24. 
    ! |5 L# u2 y1 A. b4 w$ {1 U, s
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    # z' E$ w* A& W/ ]( c  W
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    4 i8 c5 _4 u; o
30. const   CString   GetArgString(const   CString&   name,   int   value)
    " K7 a8 \0 z  @$ P3 V) W
31. {
    ' d% |4 I& E. }0 G4 ]: }1 E
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    " D  U% T, X8 m; f! d
33. }
    
34. 
    ; w3 c/ u0 Z/ b* ~# h) V
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    ; G$ [& j8 g' L8 M
36. {
    , Z) ]5 Q% o" E( H% x  T9 J; h
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    + f3 u" Y8 c) |. N% Z
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    $ q" n$ |( J3 N1 o9 {0 Y
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    % @/ p+ x5 }2 r0 h! H
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    " F" t7 v3 O0 Q- P* r0 s. s
50. u_long   lv   =   1;
    / _" _+ ^' U! J  y. \/ n$ z/ L+ H
51. ioctlsocket(s,   FIONBIO,   &lv);
    8 p" ?  |4 f' J  l! {2 y2 v$ H
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ! U! L$ g% d' ?8 R* Q
53. Sleep(20);
    1 p/ q* C0 k" r: w+ N* O
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
      a. \5 B# J# ~* k3 A: d& U
57. closesocket(s);
    ; X# _0 s' ~- c# U) l
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    & j; M( y1 C$ k0 B1 t' `; `$ h
59. if   (!rlen)   return   false;
    3 _/ D9 D# k3 R+ O2 n7 T5 m
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    7 {) f5 h; I, ?6 p9 v
64. }
    * b! D; l- o: _2 ^7 p
65. 
    ) I& m+ Q& k+ Z
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    $ l( D' D& q, E7 j1 s( d# h0 |+ C- N
68. char   buffer[10240];
    
69. 
    * k1 m' Q& ?. g  |  G  \
70. const   CStringA   sa(request);
    4 V, {! f" h; J# G/ X
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    ( P% l5 U/ n0 ^: w# A- R$ X2 O
73. 
    
74. struct   sockaddr_in   sockaddr;
    " u2 P. e- w, ]1 Z$ I
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    3 _: _( _9 j# y  {5 K
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    8 j& l+ l: o( e5 d7 D
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    / T6 Z/ i& B% @; I3 t$ A9 R
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
      X& e( h" Y% O5 @5 Y
84. {
    
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    $ o$ g0 a" l" J5 i/ f
88. 
    & r" d! a7 P3 g* A' A1 f; |
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    $ O: {, L; [" r: o" b/ L
96. return   true;
    
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    4 Z0 b; o$ A3 l/ Y. {8 m% n
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     0 P: w, q4 g4 J4 D
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     , n) ^+ Q, B1 b. B! h
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     2 B6 C0 k  g4 H  Z8 f3 r  h
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     2 S+ B7 w" v! D: j
110. 
     / n: p2 q& C3 U, a
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     7 I+ n/ s7 ]- S* L
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     ' J+ \1 }8 |7 u: t- d5 B5 y
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     : O. B* G, c6 t& b
120. 
     3 f( E0 m% S. O8 d! f2 B& |/ C" p
121. MyUPnP::~MyUPnP()
     
122. {
     : K5 B4 x4 j/ ]4 X
123. UPNPNAT_MAPPING   search;
     / s! e0 E' I2 C, T: _
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     6 _6 O+ ]& M' A( w* ^
125. while(pos){
     % A' w7 R  }$ ?( d1 V
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     ( w# |" C) \! |7 x0 }! s
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     & d5 H0 x) Y8 c9 ~& V& k2 b
135. {
     
136. if(version <=0)version   =   1;
     ! t( O7 z4 h" x: C4 i, T7 y
137. m_version   =   version;
     5 e% p( n: j1 z  r' e5 s
138. 
     / ?$ W; r- }. S0 R1 j& ~
139. #define   NUMBEROFDEVICES 2
     5 J& g; _! O- Y9 H
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     # Y% w: p% O  U, z3 l! C
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     8 \) F4 L. O. S6 q9 C8 ]
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     4 [0 \; e0 U* m3 t6 r8 f7 V
150. int   rlen   =   0;
     % Y# h4 J8 `& e) `7 k5 a
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     " G7 o/ N  E% q0 G; Y- ]
152. if   (!(i%100))   {
     8 E7 P$ a7 r5 M0 |
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;
     8 K' g" X, Q. u' {4 K; x
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 "),
     % N* w6 d" ~; A, P4 w
157. 6,   m_name);
     8 t( {( t" ~1 {3 o( N! f: B
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     ; n$ s; K1 `/ v% M" W; U
159. }
     ! d4 Q9 Z5 P. B* j% H/ k$ S& r
160. }
     " \* ~4 a: w' P$ N
161. 
     
162. Sleep(10);
       |! Q  g  d7 Z! p* P4 S3 U
163. 
     
164. char   buffer[10240];
     4 H& l/ c/ y. P" d" `
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     5 _# y! y( S* T- W
167. closesocket(s);
     - D2 X7 ?, o( B
168. 
     : z+ Z6 J* q2 H* {4 f; _5 J1 G" _
169. CString   response   =   CString(CStringA(buffer,   rlen));
     7 ]4 G; e$ U; ]; A* Y& B7 T
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     + m4 c, Q2 d' I5 x" |6 B
172. 
     : e  B+ M/ W% T+ U, _1 I
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);
     # m7 \# w$ p" e; n8 d
175. if   (result.Find(m_name)   > =   0)   {
     ! f. h: R* u& r7 ^: x. o
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     5 o5 P7 r1 H5 G: ~
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     9 w2 P4 C6 _( \0 B1 C' e2 t9 A3 P
182. line.Delete(0,   9);
     
183. m_description   =   line;
     # e+ I$ r$ T! C# ^% s
184. m_description.Trim();
     0 L  U  V3 {1 R$ C, P. ^
185. return   GetDescription();
     9 d0 X5 C0 F& c' R
186. }
     
187. }
     
188. }
     # S7 S4 ]6 W6 O( t- U* H! m
189. }
     
190. }
     $ d6 B+ Y; F$ L: G: _' a
191. closesocket(s);
     
192. 
     
193. return   false;
     $ Y: x) Y; u8 K4 L
194. }
     4 |; J7 A3 ^3 |8 I2 a3 X% y8 E& d

复制代码

天云上人

以下有关upnp的接口来自emule，
0 g) K3 _( B; f) l; ~0 Q" i- T  B

# c8 Q  x: {3 |( {- E5 P///////////////////////////////////////////
5 D4 t& C1 y2 m( q+ E//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
1 H. U8 {! C6 u7 x# B9 |
; T$ R2 X+ S; Y8 O3 D8 h% _
#pragma once
#include <exception>
2 g6 u3 V( X* f

  enum TRISTATE{
        TRIS_FALSE,
# j6 D2 B+ u; W: N        TRIS_UNKNOWN,
        TRIS_TRUE
% y3 R& m. M. D};


enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
; o. A/ t5 c% H# I' m4 T0 t        UPNP_IMPL_MINIUPNPLIB,
, [# \3 w) \+ Q( O: P0 u5 n        UPNP_IMPL_NONE /*last*/
};




class CUPnPImpl
* V% }! h( A0 q/ t, m0 J1 `{
( e8 v6 `3 l7 L; W$ wpublic:
( C: h3 d9 F3 U        CUPnPImpl();
% ?% t4 _5 k3 t+ V6 t& E        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
8 |  |4 e1 p! q; d7 Q                UPNP_OK,
                UPNP_FAILED,
! V' Y" q8 L; K$ o4 s& F0 n$ D                UPNP_TIMEOUT
        };
+ F/ g, A6 `* o4 H

1 x5 K8 p4 J9 @' }" I% g( B        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
. j& [, D! |* m# o# L% h" ^# Q        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
: x, f. `& F  v9 ^. A$ E+ }        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
0 w7 g  @; Z1 W& `, M0 u        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
, S/ p- x" A/ |( ^3 R

        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
4 Z) w$ O7 g7 R7 B; `3 C        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
! G! O  N& k" \; j/ }7 x3 S0 B        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
! ^5 {5 r# [# E( d2 M        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


// Implementation
- u* G1 }1 y$ Aprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
9 e9 s- u1 D* P2 d3 |6 k        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
/ ?1 b: Q$ D; W7 S
6 \4 l. k9 Y* j7 F! F
5 g# \+ z6 Y7 I' k* xprivate:
) L  p6 j* N% j  I  k        HWND        m_hResultMessageWindow;
9 S; Y4 w& P& X$ k        UINT        m_nResultMessageID;

4 {9 D- ~' a& D/ D
};


# Z* T, F  U8 f/ R8 v: X; b1 y9 X3 Y// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
public:
2 x6 C$ i" M! `. j% Z6 q) \        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
: ~3 F8 ~1 l0 O/ Z        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
8 h: E. `( C. ~) D2 s/ q  [        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
7 r+ w9 P1 m1 _% O! X4 \
8 l: e3 S8 y! G) p  Y
/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
1 m4 d6 g* z5 O5 J
. ^& T! S& k, U! Q
#pragma once
5 t8 N; M% p3 W: `" A( x1 W#pragma warning( disable: 4355 )
* C7 ]% u0 Q; i/ a" s) ?
. s0 p# _; p: i. x' o3 n- ?9 }9 Q
/ e% Y3 X  q2 l3 B3 i! h. z; O#include "UPnPImpl.h"
#include <upnp.h>
$ q2 K  ]5 F+ p. s6 a/ d6 c1 @+ u#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
5 l' u5 \* d; F' r, r9 |* G  H- ?1 p
! P! }& x+ a5 ?, y% h
5 _+ Q  l2 q! i9 T. P#include <vector>
, Q) T9 o- }/ U- H# r+ S  }6 r  q#include <exception>
" g: V& m! V9 w9 g7 r& I#include <functional>




6 b' e+ z+ G/ x: h! N7 R$ b& Stypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
' p/ d& o1 \  ?& n. i9 b! \6 utypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


" l  Y6 Q+ _: E* u& [$ Stypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);

4 W, r$ k8 o' s' m  Y6 d. d
typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
);
& P: r( g) H$ W7 x! j$ P( l

8 n0 c8 S. i$ Y3 x( t. Y5 Z6 ]8 qtypedef DWORD (WINAPI* TGetIfEntry) (
$ a$ ~# h: n  E, h/ C' [  PMIB_IFROW pIfRow
; C) [) E: e: j8 p7 V9 m);
. n2 p! \. m, L/ }, c( e

& \& q* V& j( e. O$ `, qCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
' Y2 ^$ n: g9 i: Q/ \# F- G

$ f) c/ G* J5 ~5 K# X2 aclass CUPnPImplWinServ: public CUPnPImpl
4 D  }* a1 I# `  [. N- K0 ?0 {; M{
' p, _& ~6 t& [6 z  c        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
public:
6 M# x2 _) j" M$ D. f% ~5 E4 C        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();

+ O: j% R1 ?2 B! g3 t. k
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
$ p) z$ j# E( N0 I. W8 ^: E        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
        virtual bool        IsReady();
8 V! p; t! b$ G, M$ e# _7 q# M        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
/ m3 [4 q. L3 i1 e# j9 ~) C3 b
8 ?* C& M7 e& C
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
2 g4 {5 T" [& L( l; Q        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
, Y1 l! m7 v' O- J
9 L) `' x6 M& ]0 \* Y! T
protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
8 o9 p8 C# R$ g        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
" W& v+ f2 _4 Q% W  C# h        void        Init();
' J$ H% Y: q+ o+ z
$ F! o& B% M3 H( S0 p
" f9 N# M- H: Z- q        inline bool IsAsyncFindRunning()
        {
1 P- g+ m( V+ n4 V/ A/ O- @                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
5 y' u3 Q) n3 w; v# n                {
( w8 J$ J; C  Z+ c1 F/ B; K. k                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
) w) a% L; v0 t4 A                }
6 ~; r& y* j% s+ V                MSG msg;
) t  e! z6 ~3 l: s0 k                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
+ I- W' h: D' ^+ o+ |% N                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
+ d3 r( p: P4 D( W, i, Q0 `                }
$ X0 L. E* Y( l                return m_bAsyncFindRunning;
        }

+ o( t' b! g5 p5 b; b- W3 X' R
        TRISTATE                        m_bUPnPDeviceConnected;
# N/ z2 p5 R$ p) l

& A1 n$ T8 ~4 f5 [// Implementation
( `8 N$ G$ k7 {0 ~% ?        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
, O" E6 |+ K* |2 O5 T$ 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);
) x1 A$ ?7 b7 z. h$ b! V        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
! ^6 T; v% z' H9 x        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

: m/ i0 q$ u7 W) W- U( P  m
        TGetBestInterface                m_pfGetBestInterface;
0 Y. r! Z/ E/ a8 Z. X        TGetIpAddrTable                        m_pfGetIpAddrTable;
0 g9 M: k) K" o+ {- p1 z- l        TGetIfEntry                                m_pfGetIfEntry;
+ s: E8 ~, E/ g, i
1 s7 q6 {, |, h/ k. K0 q
2 A: C, X$ ~) p  w9 O' G8 w        static FinderPointer CreateFinderInstance();
  }! \3 G# J2 J3 x- a        struct FindDevice : std::unary_function< DevicePointer, bool >
* M) K: q# d4 c# {% u" i* b        {
( u. a+ f- |( Z* y7 O, M: u9 m6 m3 r                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
; p% p+ _9 V9 a/ r; ]5 D2 ^7 G' V                result_type operator()(argument_type device) const
                {
4 \, H* M) M& g, h2 D& J                        CComBSTR deviceName;
* a. n5 N" P2 K+ \' u% t                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
' B- g8 E$ ^7 ]; j% D& }
2 {: O- x! O% U
0 E7 [. ]& X7 M3 F6 {$ \/ h5 C1 J                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

6 P% o' S, V( p/ m) \' b% c% F
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
' |$ Z& F4 e  x6 w7 u8 t7 _                }
8 ?# w" E" T' @+ ^+ w" x                CComBSTR m_udn;
$ T  y- Z: R. C! D' V  d        };
; j; C& }( z% O) [( }* l       
  V  s+ G6 m5 t3 K        void        ProcessAsyncFind(CComBSTR bsSearchType);
7 ?- ^4 z6 ^; }3 J# C        HRESULT        GetDeviceServices(DevicePointer pDevice);
* \  Y5 C1 L. q6 N! o: `! O        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
- Q& E2 l. g! B/ V        void        CreatePortMappings(ServicePointer pService);
8 S0 Z. Z3 F/ b$ z$ P) l        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
0 \7 }. A0 E$ t" H7 K( C        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
$ d; S* v0 U! f& V                LPCTSTR pszInArgString, CString& strResult);
5 N, D) N! s# K/ Z        void        StopUPnPService();
7 N3 [* J! d( y" ^
1 U% T' `" s8 j4 g% L. m1 D
        // Utility functions
4 }. n3 d' D% a: e2 z3 B0 ?        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
3 P6 ]9 _% a' y9 A# Z        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
9 |+ K, p' j$ i. ^! m8 S2 c& c        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
4 F% u+ {5 _/ U1 ?' V        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
& Q3 s( j- i7 p+ {3 Y        CString        GetLocalRoutableIP(ServicePointer pService);


! F( l" [6 {! g// Private members
- B: @1 `8 W% L2 y% Qprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
1 Y4 ]3 E( ^2 W9 m! Q/ Z8 \        std::vector< DevicePointer >  m_pDevices;
, A' P8 I: [/ \8 t' L+ N7 |2 \        std::vector< ServicePointer > m_pServices;
2 `/ v! L) ^. l& i& w4 Y5 v5 D4 I- t        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
/ p& A8 s" f. i$ q" U  c1 P        ServiceCallback                        m_pServiceCallback;

7 s3 [) ~" T) P% a$ y% @5 a/ |
        LONG        m_nAsyncFindHandle;
$ l" N" B* Y% ^- L0 |% m/ m        bool        m_bCOM;
& h! Y# s/ B' Q* |1 s        bool        m_bPortIsFree;
8 a7 t- Z' U/ T0 K1 M: p        CString m_sLocalIP;
3 q* Q9 E, y4 V! ^$ ~3 d9 q        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
4 d5 E0 p) S, s        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
/ s) W# U; b5 E) V8 b5 R8 x+ T, w        bool        m_bInited;
+ V7 b- r0 p; G( s3 r9 p# t        bool        m_bAsyncFindRunning;
; o& f# `5 ^) U2 e, L        HMODULE m_hADVAPI32_DLL;
9 [* j$ N# S. \1 q; g        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
; C7 t" R2 {9 s" o" Q! v9 S        bool        m_bDisableWANPPPSetup;

2 X- @$ M+ M8 \7 _/ y- ^2 L
};


// DeviceFinder Callback
class CDeviceFinderCallback
- I$ e- ]6 j( o8 ^. l; T; o        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
1 H" G6 v! H- w1 r8 z& E; m$ g" G: `        { m_lRefCount = 0; }
' ~# K. q0 F3 |, V& `: `+ ]
$ o0 K  C9 a5 ]6 j
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
- s8 K6 Q3 }& `6 W7 Y& E+ q7 H+ p   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

7 T6 s# p. a" l1 J
// implementation
0 ?. w; y- b! ]0 Q" W% K+ N7 q, l0 ?private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
' L( j/ ?8 U# ^' G! R) {6 p        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
# K8 g, D: ^& c1 Q9 R        HRESULT __stdcall SearchComplete(LONG nFindData);
/ @8 e3 C" b1 O

4 w: h5 x% e0 mprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
9 c' [& e# n/ b0 ?! ?  C
. L6 l5 L& a, V9 x( {
// Service Callback
class CServiceCallback
7 ]5 @, q4 j+ u1 `% V" k* j& Y9 ?        : public IUPnPServiceCallback
2 A& b, X8 K  z; T. b0 v: p; ?{
3 _7 k8 r3 V, e2 Q( _/ m  S9 B# xpublic:
( x* X3 Y! E! X: e. Y; I        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
+ g# ]0 c) e& m8 ?9 ]4 U   
5 [9 V8 y" s7 I5 Z: C* q   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
% q' Q0 |+ N$ j& W2 f, y   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


  M. f, G3 }  R3 z) ?2 c// implementation
2 _: K5 |% ?! K- `2 A0 q1 y- W9 Eprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

  n/ H$ ]- x0 s4 a) Y0 |. \8 M+ F
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
# n& u! N5 Q, [  A! z( i2 R};

) g3 O! q, H0 u2 h$ t' D
! l0 h' {2 f6 T) i, x+ _/////////////////////////////////////////////////

- F& w$ T$ @1 j  q
5 U% l0 [& z5 u6 ~使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
$ s; J% C4 c0 s: F$ N% u1 k5 L. m; XCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
5 K. \3 y- B4 {! d. ICUPnPImpl::StopAsyncFind停止设备查找.
1 d% I: }* ?$ I5 O( |6 A# U" hCUPnPImpl::DeletePorts删除端口映射.