UPnP

天云上人

/*uPnP.h*/

1. 
   / q$ |* e' @. p! q6 ?
2. #ifndef   MYUPNP_H_
   6 H. k% D9 {1 L" {) a
3. 
   / I/ D+ _! h! J" w" `0 K5 S
4. #pragma   once
   * S9 M; N) S" ]2 n
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   , M  x( j4 |1 c2 b1 Q! Z
9. {
   
10. public:
    
11. typedef   enum{
    8 e5 P% ~9 f0 p3 {) l; p3 e3 p: q
12. UNAT_OK, //   Successfull
    
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    * e% z" e4 z# f2 s$ ?& O
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    * p! C  G/ ~, z0 H4 p" ~
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
    : x: ~/ i  E- |  B) K6 _
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    ' i) f# X3 _! |0 |% j$ U* b
20. UNAT_TCP, //   TCP   Protocol
    ; {6 d) ^& R/ J( z
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    9 u6 O5 h$ c/ Y- S. g3 W
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    0 p' [) C4 s2 W+ U
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    ) U& p# V, ^- i( \* U
28. CString   description; //   Port   mapping   description
    7 {1 v/ Y9 L" E
29. }   UPNPNAT_MAPPING;
    8 h9 Q' u" b! }( ]
30. 
    : I8 V; D9 h5 c# g( G
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    ! {% F" U2 g: z) u
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    2 q# g7 j7 Z% I* Z: q
36. void   clearNATPortMapping();
    5 D% R. u( D6 n& c/ v
37. 
    : u2 \( D$ e1 d
38. CString GetLastError();
    ' t5 |+ {: F0 h5 _: m5 s. [
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    2 I0 {( R' f4 f6 I# R) s3 w( e
41. bool IsLANIP(WORD   nIP);
    
42. 
    , M$ G5 }2 N3 ^; h& [8 Y$ m7 h
43. protected:
    
44. void InitLocalIP();
    3 i5 e  S- t, ?# k
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    0 H0 X% c' R! \8 C. f8 [) I8 c4 Q% ?
48.       const   CString&   descri,   const   CString&   type);
    7 U/ R0 j: |' N2 ^& J4 l1 M" H4 H
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    % _* h1 y# ?/ U, N
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    ! T6 B& M) P- y
52. 
    $ k, M* x. \6 c& H) e
53. bool Search(int   version=1);
    
54. bool GetDescription();
    . f6 S2 e  r2 g: f: ~+ w" z$ X+ g
55. CString GetProperty(const   CString&   name,   CString&   response);
    7 ?% l, f8 r; w: ]4 \9 B
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    7 O! H$ c. @# Z+ U  R, p. _
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    . }! }- }6 y3 x& s' F
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    4 k+ l" y$ v1 @1 M/ @( f6 l
64. CString m_controlurl;
    5 E% C3 Q, R( [1 x  _9 i6 D
65. CString m_friendlyname;
    5 \" u1 t& G$ l4 N/ t$ h: F. w
66. CString m_modelname;
    3 G/ `0 V$ |6 P# \
67. int m_version;
    
68. 
    ( p7 c, M/ h' ?7 c  r) Q" P
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    ' O: @. e( p1 G8 N  D" i
72. CString m_slocalIP;
    / L( W  F3 Z4 k$ L) X& U
73. CString m_slastError;
    / `/ z' r7 k7 K( E) Y$ [1 H( L
74. WORD m_uLocalIP;
    3 z- ^6 {* H; z
75. 
    ) x: y! Q1 i( D, A8 K& G
76. bool isSearched;
    : n0 }" L- N  ?
77. };
    5 ^& [5 d3 h$ D  \/ u& p( }, r+ d
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   / a. }, R) P- B2 ^1 |+ ?& U8 H
3. 
   
4. #include   "upnp.h "
   3 t. r) g7 A7 @+ M
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   9 O% B; I" a& j
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    $ C; `3 y  |, L8 m
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    9 c5 `# W" Q! d' N. Q7 Q' e
13. static   const   int UPNPPORT   =   1900;
    7 ^8 L0 ?7 k, S
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    8 r$ g- }  ?% `: v- }* k) u
15. 
    
16. const   CString   getString(int   i)
    
17. {
    7 V9 D5 |) j0 \& m# m2 N
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    1 [, x: R2 i% s, U. F. ^
21. 
    
22. return   s;
    * p$ a7 B( ~# }3 N* G2 C8 P4 W4 g/ F
23. }
    % K+ f/ g# G8 C6 z- j$ n
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    ' @) K* a+ J( u, |9 L( e/ n0 R
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    % t( U4 \: X) W! Q
28. }
    2 `( r. y; U7 @/ Y, o
29. 
    & C4 e% m; E5 I& {
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    1 y) i* u0 n$ X; I7 b! n
34. 
    " M) v" _; Q3 l# v. O; H
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    * Q* p  W0 I+ M
36. {
    
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    # ]' H* R- J4 \' N, Q6 g
40. int   length   =   sa.GetLength();
    ) w0 ]$ i% k* V! I9 ]: G4 ]
41. strcpy(buffer,   (const   char*)sa);
    $ ^- |; g7 X9 r, b2 z$ u
42. 
      X! r6 ^: E7 V' m- v2 s
43. uint32   ip   =   inet_addr(CStringA(addr));
    ! W7 c" h/ _* g' G; _0 ~! w# H
44. struct   sockaddr_in   sockaddr;
    + x4 C8 M) E- j9 i
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    ; q5 a6 I: V6 L: X
46. sockaddr.sin_family   =   AF_INET;
    8 }! z+ C' z0 W" p( }- t
47. sockaddr.sin_port   =   htons(port);
    4 D; @, U0 ^4 l4 I
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    5 a# x* J4 V' z
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    % m' J8 W5 ~2 I$ a6 t6 j
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
      a6 S& W/ I- K+ T' r, G; d
55. Sleep(100);
    - F% T9 Y1 s4 o: f% u
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    $ m6 w- [1 `; o, Y, }( T7 q
57. closesocket(s);
    # [/ `& @. f$ i. \1 D+ M% t
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    6 O7 h% {. s. _% L' x# O
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    ; ~% d+ P$ J2 @0 M
62. 
    
63. return   true;
    8 T& y; K" l2 F8 r% f. b, j
64. }
    3 g/ V9 S& S) m/ [$ @  ]
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    8 H) W2 y& W4 |5 {6 ?
67. {
    
68. char   buffer[10240];
    
69. 
    3 E3 L2 L4 G) w3 `& E3 B
70. const   CStringA   sa(request);
    ( Q" d: t' @( l( o5 J( G
71. int   length   =   sa.GetLength();
    + S( Y) ?6 q8 i+ r% C
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    0 a2 E6 \, d3 U8 R$ l
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    4 d6 [+ I6 n# R
76. sockaddr.sin_family   =   AF_INET;
    1 ]  v* A! `% u9 a( @
77. sockaddr.sin_port   =   htons(port);
    0 |3 P4 C) N3 _
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ( H7 a6 a* o3 _3 u$ d
81. }
    3 X/ p& i& q2 v! O# P
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    + {0 p6 N5 m! y( ~4 X; O- K, h2 F
84. {
    3 _" S4 W( R- {( v
85. int   pos   =   0;
    
86. 
    6 f0 N! \. [- z, K) ]+ O
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
      Y9 {; E& x+ J
89. result   =   response;
    
90. result.Delete(0,   pos);
    : _* ^6 Q3 i2 d  v) i; \4 b0 x
91. 
    + `. M2 c" ?+ ^
92. pos   =   0;
    + Z& q% D0 U7 P% }
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    ( w3 j% }# K: R5 V% w
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    2 E; Y1 Z: F- |, f$ C$ i+ Z3 P
96. return   true;
    % X: ^8 o9 a+ h: |
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     6 K( k+ v& M3 n# I& p
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     . h6 r: E: ~4 R. Q4 b
103. CString   property;
     ) ~; w! n& o$ I: k' G
104. 
     
105. int   posStart   =   all.Find(startTag);
       S/ L% N; B! _$ u
106. if   (posStart <0)   return   CString();
     ! U/ \& j% M+ w# \1 q
107. 
     , _. s6 @3 l  C' |( Q, z$ L  ?
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     0 x$ U0 n. D5 G6 J  L
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     9 r8 @/ s' o# E. t" ?6 B& A4 b6 Y) |
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     0 |; Y$ l% m3 ?6 {! U
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     / @5 e' l7 |( G$ r
126. search   =   m_Mappings.GetNext(pos);
     . g* Q' k. J( [% g9 I6 E7 t
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     4 h$ x8 G3 ^6 k1 g* |8 B; c
130. m_Mappings.RemoveAll();
     . }2 I* x! |9 s) R
131. }
     
132. 
     / X- s$ R+ q$ z$ K5 d8 j
133. 
     : M  W% z+ s2 p; E6 F% n
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     0 A* d5 ?- K' B! g- W2 K0 l% `
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     ; e' d' o' I, Y) E  ]) g* _
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     2 p' c8 W& h' o3 q! i
145. 
     : Z: \& Q: [3 P( [% r2 t
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     ' c3 F' g! D) L: i
148. ioctlsocket(s,   FIONBIO,   &lv);
     5 P' C( [% W* |& e. J" T
149. 
     
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++)   {
     
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
       [6 [; [- S8 m2 h' Z) Z: C$ p/ J
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);
     - _: Q% Q. h" i0 {0 _
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     - E, o0 X6 ^/ N
159. }
     
160. }
     
161. 
     
162. Sleep(10);
     ; Y5 B5 w5 _9 U9 n  B. I
163. 
     
164. char   buffer[10240];
     & @! y7 B4 R4 x6 [9 A7 ^5 C4 V
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     5 F# O2 S' w2 f2 c% ^: _& w
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
       M9 g5 f3 A! t5 J
171. if   (!parseHTTPResponse(response,   result))   return   false;
     & C6 i( L; ^3 G- R) r$ G" m
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     * b; z4 |/ m6 A+ V% T
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     " e3 }4 G+ v4 t. ]
175. if   (result.Find(m_name)   > =   0)   {
     3 d- Z4 O( Y- r
176. for   (int   pos   =   0;;)   {
     ( J0 W2 ^& a+ o0 @4 T. [0 J
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     6 z+ Q6 O- d1 K3 ~! T5 j
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
       {8 L5 q. B: [' z+ i& w
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     * H: a6 z/ @* Y9 J* M
185. return   GetDescription();
     + r' f. s2 e4 p# `; ^8 M
186. }
     
187. }
     
188. }
     
189. }
       s0 L, ]! Q4 d8 C# w
190. }
     3 b- Z. G; d/ d0 {
191. closesocket(s);
     $ n# N7 l$ b: x
192. 
     
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
( k6 v$ u" X* ^# |9 F
, ], N) i! t% |+ X1 O9 P
  z, |) Z% E* H6 T///////////////////////////////////////////
  W1 t* C: l- H5 `( o//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
! R0 w! L) r: K$ g, O1 Y$ k

! w3 e- e$ t6 c4 W. h8 x#pragma once
#include <exception>


  enum TRISTATE{
/ b" ^* z# f/ |0 G( f4 H        TRIS_FALSE,
        TRIS_UNKNOWN,
0 y- q6 H' t! v* e& a8 k, B        TRIS_TRUE
};


enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
* k- ~4 b; n; k1 z5 s5 I' C        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};
2 {, X' W2 |6 |  F5 b! T8 T. O. p  h
$ b) D. U7 A& {  i& L# m) |
" e% t8 o# M4 w/ s* H3 T
" i& K, R! o$ ^% C! c" V% y7 ~
6 p& m4 |7 Z- V7 E1 D! g5 e- uclass CUPnPImpl
{
) E) @- z* n: g' i' N% g+ K* [( [public:
( o. Z( v' Y' q4 y+ P& ]        CUPnPImpl();
/ S$ ]7 _1 W2 ^, H4 }7 s2 X        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
9 D  `3 [6 i4 h, U; D9 f        enum {
                UPNP_OK,
                UPNP_FAILED,
$ l, v& Y3 u% o                UPNP_TIMEOUT
        };
+ c9 |: D8 }* d: f0 G

' t  l  p2 Q1 W' ?  d  o        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
1 k4 d  b3 B$ ~% U        virtual void        StopAsyncFind() = 0;
8 r3 y! B# ~% l5 \' F% n* m        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
5 b7 {2 I0 h2 R8 o        virtual int                GetImplementationID() = 0;
       
0 J& f3 E! Z* \) E% {3 l        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

% y$ ]% C# G9 U5 m  r+ K0 Q5 Q
1 R3 ]: `; u- k* x        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
% G2 r/ }" ^  V1 i. S0 |+ y        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
* z  E; Y$ ?, [! n+ F- `        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
6 `5 P4 J: ~- u4 E' F        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
, ~* f+ _1 {" T8 n0 ~9 I" e: [/ f

// Implementation
6 `1 P/ l4 {# ], _protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
4 w) h, {1 q6 k& u1 L+ i        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
5 {4 y, F% `. c8 Q: L$ ~% S& ?        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
& Q. t! P) `9 `. d
0 [: n' e0 A, s+ X
8 S6 c5 C9 U* c) m8 ~private:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;


};
' u$ f% ^( J/ t
6 P+ J, B5 _* ~- G  q) D' T
// Dummy Implementation to be used when no other implementation is available
6 i! n8 I8 }" m) t1 a- Q3 |4 hclass CUPnPImplNone: public CUPnPImpl
{
; m9 p9 q! l. v# zpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
' r" k: \  F1 v8 E0 q6 m        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
/ h+ M1 z6 i+ x2 S4 t3 `+ T        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};


/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
0 A# G$ p6 @1 k- A7 k

3 C) q" S1 y9 E#pragma once
#pragma warning( disable: 4355 )
/ ?: v# K, q5 r
) H, c1 C# s8 ]7 y" ^& `& U8 e. s
#include "UPnPImpl.h"
#include <upnp.h>
! S7 |( Z" a, {* J9 N#include <iphlpapi.h>
4 F8 b3 @' z0 m; `/ c#include <comdef.h>
#include <winsvc.h>
: }, A1 m8 |2 j
' g, c+ J" g& |9 J
3 h6 P5 P: C8 [) T( j7 r, }#include <vector>
#include <exception>
#include <functional>

( b3 Y6 i- a& a  j; ^

/ |+ u8 h0 t. _
0 Y$ o) v! ]9 }0 z1 D: x+ |3 ~% w' ptypedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
  k* E2 g2 K5 j* ^/ mtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
9 Q: ^, N: Y( k9 V1 s+ D; wtypedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
* ]+ l7 y- m# o9 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;


typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
3 L* k4 }, c6 h+ E% `8 r  PDWORD pdwBestIfIndex
);
1 Z( P, j. D( n4 v4 V3 y# H

8 e' R. ^$ K8 I. Mtypedef DWORD (WINAPI* TGetIpAddrTable) (
9 M' r0 j9 Z/ S) m$ \% A* q) F  PMIB_IPADDRTABLE pIpAddrTable,
- |" g5 {; h* r6 ]  PULONG pdwSize,
6 k* u! P' n+ `  BOOL bOrder
% t3 G, i+ d6 o* D( ^);


typedef DWORD (WINAPI* TGetIfEntry) (
' ^8 ?) y/ G5 U: @4 {  PMIB_IFROW pIfRow
" R: A0 V0 K% B1 W8 v);


) K2 H3 r& O$ \CString translateUPnPResult(HRESULT hr);
! v  o  y8 @9 E; B  yHRESULT UPnPMessage(HRESULT hr);
' g' ^' V/ ^- G8 h  b
& {7 W/ [3 Z* Y
class CUPnPImplWinServ: public CUPnPImpl
5 p7 `- k, _/ ]2 U5 O- |! R: ~) M{
5 {4 W; r4 J( b        friend class CDeviceFinderCallback;
2 l& B- ^; O* N) \8 E! J$ V        friend class CServiceCallback;
// Construction
$ u$ p/ a3 E$ U8 jpublic:
/ f7 @4 r2 D2 B        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


8 d- w% w7 N( ]: H% K, P/ A+ n        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
% t9 F' `9 S$ j6 p, I; n% ^1 m        virtual void        DeletePorts();
8 T! O7 k. @0 @9 H+ L        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
4 B2 a' S2 A7 m5 h8 R% J

& A0 D4 ?% K7 \9 x2 y' h; O        // 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
        virtual bool        CheckAndRefresh()                                                                                { return false; };
8 S" v9 c: m+ J( @  d- q
6 o8 J0 y+ }2 D, f& u% M$ V% W8 ^
protected:
& P0 s" A8 @1 T( H* p& R        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
! K$ V+ D; `! b5 ]$ l% ?1 B        bool        OnSearchComplete();
        void        Init();


        inline bool IsAsyncFindRunning()
( [7 F2 }+ f4 I3 {! Y4 o6 ^        {
+ [/ K  y0 [2 f" v- t! F                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
  w) }$ a1 |5 O                        m_bAsyncFindRunning = false;
; l9 Z9 z* J4 f( K3 |/ }                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
: T7 X8 v6 ?  Y2 ]  ~; }                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
; A0 j, o0 z" ^3 {" d                }
                return m_bAsyncFindRunning;
' h( v- _2 X( W% R* _! `# {7 G6 |( L        }
" n+ y4 }1 \0 |. U+ F2 k4 d

        TRISTATE                        m_bUPnPDeviceConnected;

: b" D; \2 n& e+ W  d( U& A
$ E0 _/ m( K0 g+ @3 U; T9 g// Implementation
        // API functions
( R6 q/ |: d4 a% J" W; [        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
6 y  B$ }0 c4 n5 |) k7 m6 Z8 l        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
. p( t3 [) ]9 i4 j! p' y0 q9 h        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
$ {4 }, h& I  D1 I7 Y

        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;
7 _8 r& |7 I  k6 u
; |+ Q* o' i+ k% C; ?! h3 K! }
        static FinderPointer CreateFinderInstance();
* J: [# y; K8 y4 m: R5 L        struct FindDevice : std::unary_function< DevicePointer, bool >
% }  R& p4 E3 i6 y9 E$ K$ }2 S        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
0 Y0 i/ _- L: N7 @2 @6 y/ s                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
+ R" q0 X4 x/ ~- U0 M7 @

6 Y& p0 S) |9 _) f9 J* D                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
7 U% c" Q8 D5 R3 z/ f' m8 L) O

                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
- |6 ?; f" Q9 r* C% \% W6 z                CComBSTR m_udn;
        };
       
/ S- _6 h" \. v! k. I) f& o        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
! G/ f7 q8 z5 P# g( i6 {3 ?/ `+ G        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
) S4 {# X, |9 E& j        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
5 P& _: ?. \3 w: L( M  [( Y- F/ U        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
' l' l. I9 C: j4 j; X
. i# H3 m  F" |2 K+ H" W: y
        // Utility functions
& @1 O7 t& L  o: o9 ?7 I        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
$ _9 Q5 @9 r$ F3 A! Z        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
9 |9 L1 t$ t- j/ q        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
% P2 ]4 x+ a2 w1 [- @! h4 E        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
  ~. i1 E: I+ A5 [# N3 ]        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
" N9 n+ \: Y  v
7 t4 i. U' `) B; [& a
// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
$ x7 F8 E' S, Y) {. S2 a        std::vector< DevicePointer >  m_pDevices;
8 ?$ z7 J0 v" G# e        std::vector< ServicePointer > m_pServices;
6 u2 q, R& L1 K0 t) B        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

8 R! h" j$ u0 A0 |, D
3 u- A2 @3 _; {7 e. c3 w2 @4 e& {        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
. `* b8 ?, y# G. X        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
+ f) k. g6 w3 X8 o* F' d" H        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
; V) t2 W8 g: V( i3 Z# L- v9 n        bool        m_bServiceStartedByEmule;
7 I( H- H7 w3 f# E9 J2 c        bool        m_bDisableWANIPSetup;
2 W1 H4 f. Z5 o4 |7 n        bool        m_bDisableWANPPPSetup;
" H1 l% U1 A7 f/ M9 p" ?

};
7 m/ _; T: F1 l, {0 R( f6 @

// DeviceFinder Callback
4 V6 ~' P0 O, U! Sclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
3 E( ]8 h# Z7 F{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
# v7 G- z) C2 m# S* B4 v        { m_lRefCount = 0; }
  {* V& G( ]6 `) x( j. O, g

- d; P; N2 R5 ]3 y) W# P0 k0 u" Q   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
# ?) C: _2 E7 C# @5 A   STDMETHODIMP_(ULONG) AddRef();
# y% C$ h: ]! l6 Q   STDMETHODIMP_(ULONG) Release();
+ M! P4 t! w% x4 C. Q9 g4 b% A5 Y+ d

// implementation
private:
( x  v2 m& k* E% L( @6 D        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
* z/ T$ h7 _4 ^        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
" i1 l4 A& c% l. @- z$ ^        HRESULT __stdcall SearchComplete(LONG nFindData);


private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
" L6 D" ?0 ]! n- Q) L; f- G8 o

) V3 j& |+ A+ q1 z; X' a/ c7 e3 ?5 w/ @// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
8 [3 k- G7 _3 r- _8 i& ^' ]% w& Y                : m_instance( instance )
        { m_lRefCount = 0; }
   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
6 h3 l8 h- k. F   STDMETHODIMP_(ULONG) Release();

2 D: E% Q+ w- T+ l! `) f
! Z# V% Q- W3 W  g% \6 B/ B// implementation
& j4 q* y7 m/ I% W/ \$ n& |private:
4 N7 x% I3 ?% A9 z        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
4 z3 L9 m# s) A* G- d) h        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

. f5 G, \7 |2 c2 L- m! {3 J
+ a) J3 p- X, Iprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
1 M5 {2 X) f9 W1 P& H) ?- ?};

1 J/ [" z( `- h& }0 d% x. j
/////////////////////////////////////////////////


7 A( T1 T' B6 {% H使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
% D& x( m1 i/ z4 e8 XCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.