UPnP

天云上人

/*uPnP.h*/

1. 
   7 B( t7 g7 R' h
2. #ifndef   MYUPNP_H_
   
3. 
   6 V2 W0 T* S; @/ x/ i1 B7 |
4. #pragma   once
   ! E# h: W" g+ j6 l' m
5. 
   6 n; o5 J8 s4 e' t4 ^  C* {  M
6. typedef   unsigned   long   ulong;
   0 P( k8 h/ [: }
7. 
   $ m: `, X5 z+ J% ?7 b5 A
8. class   MyUPnP
   
9. {
   
10. public:
    
11. typedef   enum{
    + F  F9 v7 d( C8 Y- B
12. UNAT_OK, //   Successfull
    3 X! C! I* R, h: o- ]( c
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
      }% s! x3 ?1 ^9 X. O
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    & t; F5 a4 z; j& Z9 u
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    ) u, s! K  F+ q( z! U$ B( t; G
23. 
    ; h, e7 ~# N$ a  @, x
24. typedef   struct{
    & I% x" A& T4 \" ~) `
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)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    5 |& o7 `/ c& n2 l$ m# d: V
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
      _, B. j! B0 s0 L1 U0 U
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    ' b; q$ w# W2 O- F
37. 
      f) x: v) m4 \; x: m! ~
38. CString GetLastError();
    , E( u( D0 Z* {6 a; C
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    2 M: n( v. M4 Z9 I7 n3 {
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    $ H( i8 {5 }* q# R5 h1 \
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    9 K( m: L- \7 X! }; {
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. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    9 V4 D! Z2 A$ B7 o, R8 X
53. bool Search(int   version=1);
    
54. bool GetDescription();
    " I; {! `/ H  A5 x
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    . K) _0 x# }9 L. B( ^& L3 W( z
57. 
    2 d+ [6 h" |0 |  J  _! Z9 f
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    + Y7 X+ B) S9 b
60. CString m_devicename;
    
61. CString m_name;
    . Z: l' h- [, l' n& J7 Z" u
62. CString m_description;
    # @, T/ o# {, `$ B2 N1 b; m
63. CString m_baseurl;
    / T  {! q$ o( [$ A1 F: m
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    5 R9 b  `0 C6 I& `. T
67. int m_version;
    2 f8 |) |( N3 O: Q, \0 h1 Q. Q; J
68. 
    4 r; e; D: Y/ w/ b1 f9 H  R
69. private:
    $ a. `" `0 V% V
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
      D9 Q' ~, ?% C1 J. x
71. 
    
72. CString m_slocalIP;
    7 `! L9 b' d# y( u+ F4 p
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    
76. bool isSearched;
    5 [9 @6 O( |7 n
77. };
    . g. P! F0 p* A. `- }# p+ p8 j$ n
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   1 d4 f! i- b* P$ R0 V8 X; i; B
2. #include   "stdafx.h "
   
3. 
   7 [: r9 p# V) o, Q* b( \4 o
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   * G1 w$ l4 ]7 ^& T
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   $ _& U5 ?) C+ N6 U' t1 \
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    9 ^+ r) X( @0 x
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    & w) O% }( E, }/ d2 h4 M1 \
13. static   const   int UPNPPORT   =   1900;
    $ g. Z: D1 \  d# m) v' Q: X
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    / ^3 Q* `6 z) B7 B
15. 
    
16. const   CString   getString(int   i)
    2 s# ]. l, H& G8 {9 U# c3 l8 n
17. {
    ' D* P( @( N5 m+ f% }# p+ f
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    
24. 
    3 E4 U( u8 r" `+ Q, H0 {- o% @  a+ c
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    & R# w" O0 Q+ V8 T3 R7 i- X+ v/ a
26. {
    & `) \9 y9 i3 u$ r
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    + z* M3 ^0 i2 R2 j! i* J
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    0 {( k: C, H3 L, e  `
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    ) f# n' H. {9 I; S0 {1 `
36. {
    
37. char   buffer[10240];
    5 i9 A! Q+ o1 ~- U* n: T5 S# }% |
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    / U) A( [" X9 i& L2 D2 H1 d. u
42. 
    5 l) L; Q0 q# ]" N/ d
43. uint32   ip   =   inet_addr(CStringA(addr));
    - Q& [! K+ J+ X$ h/ |
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    . ?9 j7 y3 O( p1 J
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    / p' q) [' y: `9 V+ Q. V
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    5 [6 A2 X; V5 m" `6 G* g
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ; n- R- [2 m5 u! `2 Y
53. Sleep(20);
    9 P5 J+ _& f% W' c! O/ j
54. int   n   =   send(s,   buffer,   length,   0);
    - Z* `( `0 m7 D9 N9 w
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
      C. Q3 B  G! _& W$ \
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    , v7 ~: |0 M1 k7 y
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    * c) l$ J% j5 C; E) C; k
62. 
    
63. return   true;
    
64. }
    
65. 
    ' T$ N/ N) a3 Q# y
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    # A6 k+ k0 F, n9 E. d) E, P
69. 
    ! W- F5 m( m* p+ _9 ?, x, C& s
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    7 |% L+ l8 e  w* ]
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    ( H* q2 d/ M( J1 y* Z
74. struct   sockaddr_in   sockaddr;
    $ V; A+ q  a3 ^. b, R
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    5 m2 v3 C5 q, _
77. sockaddr.sin_port   =   htons(port);
    $ L! t- s3 o. Q! |& A( G7 _
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    5 ], x6 A$ {+ b$ R
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    ' u' x. h# e8 A- v/ d9 B$ m9 T" n
84. {
    
85. int   pos   =   0;
    
86. 
    % Q& y* m. u, X7 X' P9 `: q
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    * C" _& Q5 v8 @& m) _! L
88. 
    # o" w. ~% P3 X" |* i. d5 W" U
89. result   =   response;
    
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    3 a  v$ V2 v1 ?1 X
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    
98. 
    - ~2 F) |$ G* i5 n# F
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    3 N& c  T( Y( y+ @
100. {
     8 l- f' I& |; V5 `8 N3 X5 `
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     " g4 M, o" c3 e7 K4 [5 h
103. CString   property;
     . e  d3 h5 I6 w; D4 u1 Y
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     * h* h- l( A# G! P1 [
107. 
     ! u& |+ f0 I6 s, ?, U, [) M" M- G
108. int   posEnd   =   all.Find(endTag,   posStart);
     3 O) q; a( ~7 D5 U0 X5 d# b5 L
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     : m% _+ l8 J& L' z0 i' ]$ Y6 ~
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     : J% r. f4 A* u5 h' t+ e: j
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     - d5 c/ M8 U) c8 r2 {% b
115. :   m_version(1)
     1 E- U( D7 k: \% ~4 @
116. {
     9 Q* l9 C  S( Q9 B4 B
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     $ y' c% i; D, S) m6 v( y% w
119. }
     9 ~. Q/ s" \, I
120. 
     ! E& \0 H' y) m7 a
121. MyUPnP::~MyUPnP()
     5 g6 e% S( m3 x2 ?) a; `
122. {
     
123. UPNPNAT_MAPPING   search;
     # Y* [6 C* W8 _4 U& [( Z* z
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     3 ^% g+ D1 e3 ]% ^
125. while(pos){
     ! n4 _  q  F0 a  U, K
126. search   =   m_Mappings.GetNext(pos);
     * h% R( P3 |! s8 H  T' \  q6 G
127. RemoveNATPortMapping(search,   false);
     6 w9 X# V' ^* p5 ^2 g8 @% l: _
128. }
     : ^% i+ H2 `2 Q( f# }
129. 
     
130. m_Mappings.RemoveAll();
     . D$ r9 q9 v, o* w
131. }
     
132. 
     2 v2 g% U# s! D7 ^3 c' {$ J, h) [' o/ F
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     5 P  N  _  z& c) c8 [
135. {
     * B& x! k3 M0 @, c; S2 N- F8 b) K
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     8 M5 g: b2 R! |
139. #define   NUMBEROFDEVICES 2
     9 c) @" B/ S: o! ^1 }# C
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     . T, p0 c2 O+ L& {% I4 p
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     3 y3 Z8 z+ Q1 F8 i
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     ) }: ?. }! O5 X4 P9 s) g5 d
150. int   rlen   =   0;
     . [. Q- N# [" H8 U7 |9 }
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     9 s6 E$ }7 Z6 J- p: [4 A- j0 f
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     0 w. U1 T' t  S
155. CString   request;
     
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);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     8 y: l, }0 o1 @: Y" G
160. }
     & f7 _% Q1 y! h% }1 r) g/ ]
161. 
     
162. Sleep(10);
     . I- m! M+ J( q( f% m6 s% L/ I
163. 
     
164. char   buffer[10240];
     . `, i+ p: P' e, K
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     # c' ?0 K8 F) F4 b" ?0 t' l
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     ( F" c# m0 F3 ~5 H# H7 x
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     7 v- r* R" P, P+ z/ {
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     ( j" i8 G/ J/ ]6 e3 s# z) ^; n( U
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
       Z& h" B' V) o; R6 k
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     % }; q2 B# m5 n# p" t1 y$ j
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     + J# Q; s* P! J+ p) Z
182. line.Delete(0,   9);
     
183. m_description   =   line;
     : k" A2 w# H; Y5 R
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     
189. }
     
190. }
     : [, i2 R0 B9 ^; T2 j1 n% O
191. closesocket(s);
     
192. 
     
193. return   false;
     $ G; c. z! k1 W9 {: p
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
! I/ h- j3 P5 J; z6 H# C

///////////////////////////////////////////
5 _* [7 `/ W; P8 V% |* ]) s//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
2 O* b5 F4 T# K) T2 V

3 w2 d% |) {8 ]4 Y0 o6 j0 S#pragma once
2 R0 E5 x; w1 S+ z, F, I#include <exception>
, ?5 B; ]; E' f9 Z2 y) L8 u% Q* L

  enum TRISTATE{
  e: F, @6 n% l- O. v        TRIS_FALSE,
- [* h$ n& F* W9 H1 _. g+ a        TRIS_UNKNOWN,
        TRIS_TRUE
( b- |5 o! p. ~3 ^+ z  M1 I% h};


enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
  m+ e' M  I$ u: x/ M- B6 q: x        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
- q4 Z& g) U/ w" j8 q! O& ^};
7 H! K; t! y) W! [, {
8 W% B" }! k" @
4 h' l/ x: m/ z9 A7 W5 C

% D9 E4 `2 \2 {0 bclass CUPnPImpl
9 \% f# e" |/ e! N# u{
public:
        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
7 @. B0 T% b0 [8 O* d                UPNP_OK,
' P6 q- m( ~8 m                UPNP_FAILED,
                UPNP_TIMEOUT
; S! C6 D$ `" D" S        };
  J  v5 t6 ~- m0 w
& U6 {. J- N6 \" ]
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
4 t$ }9 s) g& |3 |; ?7 x- `# P        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
- W% I9 G8 g7 k7 d: S        virtual int                GetImplementationID() = 0;
; p" X* p( ^6 ~       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


3 R5 |3 T6 o- X& ?: K        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
% e( n& h$ {' N5 \0 q        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
$ K3 u5 u( A, c        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
$ r! G, G, V8 G; U        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
* q( A: Y: ^/ N. S6 E

// Implementation
! B4 [# J2 T5 @5 v' c) Lprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
( w* f' L! ?6 }        void                                SendResultMessage();
        uint16                                m_nUDPPort;
. u5 K/ z' X# g        uint16                                m_nTCPPort;
& g% k8 H+ h% N9 Z$ P        uint16                                m_nTCPWebPort;
0 u1 W& E  h( L) `        bool                                m_bCheckAndRefresh;
8 i" C8 ]! q! r% z

private:
        HWND        m_hResultMessageWindow;
" c3 i$ U5 B! @6 ]) _; R1 V        UINT        m_nResultMessageID;


};
7 Q& |7 m) X. R9 X

// Dummy Implementation to be used when no other implementation is available
; c( p1 C0 b- ?3 |+ \class CUPnPImplNone: public CUPnPImpl
{
public:
' F/ \& v; e' G; @' K        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
- t  ^/ \6 d( R# @$ `1 P        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
+ G- x" N1 m3 y+ ^( [        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
) I: `6 \  }/ h5 N};
5 z' _0 \  [1 `) g

9 C% E1 |6 u/ T! \& n/ t/////////////////////////////////////
2 o1 B# ]- H6 h7 h//下面是使用windows操作系统自带的UPNP功能的子类

: a. p0 H7 V+ ^9 Q% ^1 p6 ^1 R5 r; j
# @. I1 Y+ K1 b' N/ T#pragma once
#pragma warning( disable: 4355 )


#include "UPnPImpl.h"
4 e& o' g/ T$ H  _( u+ H6 o  s#include <upnp.h>
; x) ?* n5 M  v/ y1 w#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
% W+ L0 f% _- h6 q0 r/ {( t
. r7 [# i) C( ~6 ]* j3 W2 p9 C5 N
3 m1 W! @  U# a' A( H* c#include <vector>
#include <exception>
#include <functional>

6 o, x9 D, \% i( c8 p+ E* V- p6 z

$ c' L; ~' ]! l
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
+ c/ P0 i  A2 F8 g/ Ctypedef _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;
  R- i6 i) e" z! u% |; C  [: v& a- etypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
2 o  d: z7 N$ wtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
0 R# G, K0 W! u5 J. h

. R; X! ~! V: T4 G" {6 h6 C, ltypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
8 p8 S  z! I& W5 i/ G* e3 j/ u

typedef DWORD (WINAPI* TGetIpAddrTable) (
' g+ @* W7 S- N  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
0 F0 A/ Z! `$ J& D  BOOL bOrder
);


$ {6 ~+ o: D0 s7 `, I" ntypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);

' e9 h+ V. H2 k9 c9 x8 T- Q9 O) v
CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
- [$ B4 h8 Y; V9 G7 y

" H0 n( \& g/ o9 l2 W/ N$ Qclass CUPnPImplWinServ: public CUPnPImpl
' E  _; j4 d. Z{
- I4 k. X) H% @5 ?& ?1 v        friend class CDeviceFinderCallback;
4 H5 R) c# D, I8 i# b9 _        friend class CServiceCallback;
% V& Y0 ~# }+ v- T2 o1 R// Construction
public:
" a+ C1 t# k  r: _! n        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
3 z$ \& ^" P* _$ n' P9 r

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
8 m9 g4 Z1 |. j) y0 h9 J        virtual void        DeletePorts();
/ @+ E& I  Y$ ]0 |# {/ B) T        virtual bool        IsReady();
6 ^* i% |! M& Y        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }


  i" r$ q& n+ L        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
5 M& ^4 j! q6 m2 P3 \        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
- E0 H: l. p6 g* W# l0 I: {; Z# B
# a8 m  w% R2 C& q" `) u6 J# J; D
protected:
  u1 }! h5 w: u$ @, ]$ L) y        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
8 H. a2 l; k* L& C( Z; [- r        bool        OnSearchComplete();
        void        Init();


. a# \3 g, Y- b' W; F! }! n5 [        inline bool IsAsyncFindRunning()
        {
* i9 j: o2 a9 V+ \! h6 S6 G                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
' l1 P6 f/ `* ^& q  J                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
8 X- N- V$ |3 P3 W                        m_bAsyncFindRunning = false;
                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
1 V: ]$ D5 e% d4 w                        DispatchMessage( &msg );
                }
6 K$ s5 {* f% w6 E; Q7 w  e# i, p                return m_bAsyncFindRunning;
/ f( J- U5 \( W, D        }
3 }) J+ k' o& C5 g

        TRISTATE                        m_bUPnPDeviceConnected;

8 L( z0 b5 ~8 N. O) c
* Z# X1 o, O2 t5 S// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
, j; k, r% f- A$ z: d1 Y        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
3 D2 y4 U( h! v8 k5 J# d        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
) U5 D; Q: Y$ c+ w* ^- F

- A3 [0 |. U! @: B        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
4 Q3 |5 Q% l) x        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
  I% u5 e4 M6 n1 a  i/ p/ x        struct FindDevice : std::unary_function< DevicePointer, bool >
' f& I: }; }) [" B5 J        {
# p; X( G2 a7 m                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
4 f" g6 [. N" t: _) {                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

* y0 ~5 d! H. @# F' i9 a
; b2 Y+ ?- r9 J* t* e) e                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

+ \( d; p9 {6 e
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
& ?: A! A( ~! M6 }                }
                CComBSTR m_udn;
        };
$ ?$ f" e" ~6 Z1 ]+ D7 D! b       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
5 U: z) K+ v9 r4 _        void        StartPortMapping();
; g. ~) H' c2 _/ Q! x. L) T        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
& k  G6 p6 R- p" [, z7 I+ @$ {, A) ?        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
4 N( F" [; Y2 W3 E        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
; d' V2 h4 n& G- b/ K  \                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

6 c& L8 h* g+ V% R+ f* g! G
4 l1 m% V) I. G# l1 Z        // Utility functions
) ]  H" k) M9 z3 j& ^        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
* H8 J7 n: I. y) ^* v) x) B5 l9 p        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
* Y6 R$ [9 F: Z; H        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
: {, {1 P0 ~: j3 E        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
3 @4 C" J/ a5 M        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);

; c0 x3 i* M0 z
// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
' R8 E* y% m+ u3 }+ G        DeviceFinderCallback        m_pDeviceFinderCallback;
" V2 I% U! l+ x        ServiceCallback                        m_pServiceCallback;


2 l+ n9 Y8 @: T8 m2 S; Z- z5 `+ O        LONG        m_nAsyncFindHandle;
) m' Y5 d6 W1 J9 e/ [        bool        m_bCOM;
* g  c% Q$ x0 R; j8 r        bool        m_bPortIsFree;
        CString m_sLocalIP;
, [% K  A0 D. L8 Z2 e9 D, X, j        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
. D* h1 h: P% `- ^8 O% I        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
3 l: U/ g5 l4 `/ l. F. b+ b% ^        HMODULE m_hADVAPI32_DLL;
7 w3 P' y1 l' p$ d        HMODULE        m_hIPHLPAPI_DLL;
2 k3 ^( v/ M3 K& y6 ]& _        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
) z. L# `7 }  g2 o' N
: J: L! C3 {- v3 J! b- G
, c3 ?0 y& p/ ]$ i};


* a8 A2 T9 F) a, E' \% [// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
, A6 y' o2 m2 C- |2 b" w2 w{
public:
2 i$ G1 p. _5 @4 a- ^  g        CDeviceFinderCallback(CUPnPImplWinServ& instance)
4 P, X" d2 r* s) ~                : m_instance( instance )
2 ^+ ]5 `- X5 ^& }        { m_lRefCount = 0; }


: W+ T9 j1 V9 u) ]   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
2 }* R) _2 W0 M" @" m- o3 R1 p% @3 [2 c

0 Z6 s6 [1 J8 o( l3 O; Q9 |# ~! Y// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
: P- P; H" Z  ^* w        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
/ k3 r4 i2 f0 U% ]3 b        HRESULT __stdcall SearchComplete(LONG nFindData);
+ L1 x7 ^; l8 l$ c* }

5 S8 u" @. u# _private:
        CUPnPImplWinServ& m_instance;
1 w3 a! k6 b; p8 O# H& o        LONG m_lRefCount;
% C! v' [4 P# p. I% i: t/ H' @};
* K0 w* F- w7 S: I( A* l" ^) Z( [
. i) P3 g, X; y! }0 Z
// Service Callback
4 V+ z7 ]. _! Fclass CServiceCallback
& `; o3 X. T- y1 W8 F- a        : public IUPnPServiceCallback
{
public:
, |& G( x' K- h- ~7 q        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
   
8 O1 K; m, ]- Y* r! _   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

( N$ e0 a6 ~% n/ c& h. \
// implementation
3 ~; {* S6 D3 u9 gprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
; Y$ B9 A0 S: [+ M; d+ J        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
: M$ I: w1 G( l, e# z        CUPnPImplWinServ& m_instance;
+ N% e; g* f5 [. k, w6 h2 \        LONG m_lRefCount;
};
4 y2 N$ H# }" |
( [/ O/ V9 m# x: s, f. ~. \
# K- h8 @6 c5 M' W/////////////////////////////////////////////////
7 W. l( t8 m* z! v
3 q' M' h# x# r$ V* v
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
6 |. j! e4 ?$ ^3 ]' x- kCUPnPImpl::DeletePorts删除端口映射.