UPnP

天云上人

/*uPnP.h*/

1. 
   * x0 b! n1 l" M" |% u6 H
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   : M# K% m* i1 [% `' D: X
5. 
   2 N! A! f0 A2 V' c; _* i6 D7 ~
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   * R2 b$ q. y, C/ Z7 F( _+ v  B
9. {
   ' X7 K' J3 f; G/ L! |
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    
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
    0 I" O' u2 Y* p1 |
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    ) V, j6 t, @5 p+ m- a
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    
18. 
    / O" i8 |) c' a3 z; N
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    ) U2 b/ J7 D3 M: q" |$ \
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    4 {1 i6 `# i" o$ W, i
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    4 {) R8 @: T# F. x. H
28. CString   description; //   Port   mapping   description
    6 h  S8 ?$ _6 W# [
29. }   UPNPNAT_MAPPING;
    4 O: |6 B9 [1 n, Y1 M! [
30. 
      b9 b* C( L8 ^) E) |& k' a
31. MyUPnP();
      g* w; z; G. F* o+ F* n$ Z4 g7 w
32. ~MyUPnP();
    # C' Y& l7 H" I5 L8 `; t9 o/ f
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    " j3 v1 I: c1 g) e$ R# ?! ]- d
36. void   clearNATPortMapping();
    2 y; a, h! R7 ?0 m
37. 
    
38. CString GetLastError();
      ?9 \+ f# o3 u6 [
39. CString GetLocalIPStr();
    . \' v  @/ k2 l. y- O$ }
40. WORD GetLocalIP();
    # K3 D' B* ^1 R, r  |# G- R5 f; u
41. bool IsLANIP(WORD   nIP);
    
42. 
    % l3 K5 p( w4 s" A: @
43. protected:
    
44. void InitLocalIP();
    / p, n) H- }9 f: `
45. void SetLastError(CString   error);
    
46. 
    " E4 S& g. G$ U- b" N. \9 U# r
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    & Q: k4 P5 T8 o7 J$ X3 I* g6 N
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. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
      z/ L$ }4 W4 E2 K
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    + k) _! D3 `( @8 A- B9 M! @
57. 
    $ k5 R) x# L% e( X7 [  G/ n7 V/ l
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    * S' h( d/ y8 Y' _% E# W
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    9 p/ d5 A( Q) K
62. CString m_description;
    + c" i% v+ r. d+ i! s* m
63. CString m_baseurl;
    ) N8 a( Y- H% d) Z
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    ' \/ w, Q% v6 ]: W1 Y1 c
68. 
    
69. private:
    4 V- e* @9 |7 K
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    9 M9 u# T/ I0 [7 z# Q3 b: @
71. 
    
72. CString m_slocalIP;
    1 N2 y7 u$ H% r9 U3 m7 v% ?$ ~
73. CString m_slastError;
    6 y' L6 p' a5 h6 Q: i
74. WORD m_uLocalIP;
    ( {9 ?  z1 g% N) q" i* J6 A
75. 
    
76. bool isSearched;
    
77. };
    7 {, s* e1 |2 g2 L% v* M; j' A
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   " k( Q$ M/ }# d( a: D' s- t; M9 @
3. 
   
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   + P- M1 L: }; |# R1 q
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   8 z3 E6 Y0 R' E0 K9 n; `. @- u
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   " l) Y( Q1 ~! V; i  ]
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    2 C0 I! h+ ~* \- {' }/ j5 R
11. 
    0 W- M8 Y2 V' k& C# g
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    1 t' L* d/ U! S7 O$ O& @
13. static   const   int UPNPPORT   =   1900;
    % Z) E4 P; j+ R9 m( G
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    " ]$ M9 O5 o# Y
17. {
    6 h! ^  [+ r2 p: \9 X
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    5 ^$ x# @; k  r
21. 
    
22. return   s;
    
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    ! ]4 l9 h2 N' A3 _" F& C; B+ Z0 X0 S
30. const   CString   GetArgString(const   CString&   name,   int   value)
    0 T) v3 q, {. k8 A
31. {
    ' v+ q  V0 q, N$ |3 E
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    / Q. K! t0 C+ A
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    1 t: a7 P; ]0 K; \1 j. `' \
36. {
    - E- N* F7 t. }; ~
37. char   buffer[10240];
    5 d! P, l; H2 X, z3 ?! |, v
38. 
    1 f! n' |' L7 `+ e1 g/ f$ k8 N
39. const   CStringA   sa(request);
    $ h9 B( Z! r% Q  ^5 ]
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    + q* s7 g: B5 I  {" O9 f
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    1 x, C6 L! O6 H/ _0 F1 G0 r! l  E
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    1 j; [3 n3 @- Q3 m3 ]1 }: k
46. sockaddr.sin_family   =   AF_INET;
    8 r. H9 K" ^5 _5 M3 n4 y8 @! V
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    ( d: P/ w+ L7 e) o) o# K
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    5 j  L  S) t/ {0 ~8 X" ?7 U' t
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    9 d0 a3 _8 \/ w9 P6 }! a
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    ' ~* U! A) B* ]1 p
62. 
    
63. return   true;
    
64. }
    0 y* o: F- I$ N+ \' g% U  }
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ' f: ~! U  V+ t
67. {
    $ h  J# k" O$ y  P  w& q
68. char   buffer[10240];
    + _. U8 o7 ~6 H! h+ a* o" o
69. 
    9 z/ `* T. T6 r6 `/ }* o" T
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    " R( \! O/ R$ s0 m6 N
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    " a9 H& W# b5 ?& b8 |
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    5 U" n% v/ p& B  y) x
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    9 l' n% v5 W$ _7 k5 e$ F
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    + z0 F9 W/ t8 t. a1 T
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    / @' Q4 }1 {- W3 p% ~$ V
84. {
    ! p, p1 J0 k. q' i: s3 g% Y* \
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    . J- H/ Y0 ~2 R/ u$ a" G6 r
89. result   =   response;
    ' W0 }  R6 G9 k' ~2 g
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    6 K% i; H8 P2 K; J; ]( y" @
93. status.Tokenize(_T( "   "),   pos);
    % J) e# G& ~" `) {( f/ p: T/ {: {) T
94. status   =   status.Tokenize(_T( "   "),   pos);
    ! @* v( C1 W# E
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    6 |; b- e. ^/ u1 m( O" f3 {
97. }
    6 A( L2 G# ^  N- Y
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    ; Q6 ~) \. ~: F. a; q- |: K# F
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     ' p& r6 Z( o) y2 V" P6 n2 P
103. CString   property;
     : M/ G8 A& G, e4 O
104. 
     ( x( X0 M/ f# L  z, }! W" v
105. int   posStart   =   all.Find(startTag);
     7 U9 R; m" o3 D/ C1 a/ p
106. if   (posStart <0)   return   CString();
     6 g1 f* [" J$ _2 o4 o2 N
107. 
     6 K3 ~+ b9 x* O
108. int   posEnd   =   all.Find(endTag,   posStart);
     ( c4 f5 o2 K- t1 _3 z) a
109. if   (posStart> =posEnd)   return   CString();
     - N& q  I# F! O7 \* o9 @& |# v
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     5 p  ]7 P# G4 W- c' f
116. {
     
117. m_uLocalIP   =   0;
     3 Q( z. Q  L, S$ r! R6 \; m
118. isSearched   =   false;
     
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     4 c- M9 b9 h7 X( y
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     ( [3 T' W, B; z; o  ?. P* E
128. }
     5 m' Z7 W0 B; y' ^. j2 Q' g
129. 
     & s& v4 z7 Y: T7 O% U" k
130. m_Mappings.RemoveAll();
     
131. }
     : b# v' v$ z  w. f
132. 
     ! s& @5 q; {+ V0 k3 X
133. 
     * z& O; h+ o8 L" a( L( J  L
134. bool   MyUPnP::InternalSearch(int   version)
     ) u$ _$ g. ?+ T
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     % y0 C3 B; _. S2 O. L
138. 
     
139. #define   NUMBEROFDEVICES 2
     ( ?, g0 Z9 e8 p$ y
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     2 J  f$ M/ J2 ~! f( P
148. ioctlsocket(s,   FIONBIO,   &lv);
     # S2 v3 e, g+ L$ L5 b
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     ! u. \4 y  u1 C! e
152. if   (!(i%100))   {
     * T/ U' I7 V3 ^' `8 d
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     0 q% {! J3 ^5 I) V- H
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     5 S' S2 L4 p+ g% ?  J
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. }
     / o; J+ U% |0 W* c( p4 ~( V8 F7 q3 |
160. }
     ; o+ {" w  O2 o
161. 
     
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     - R* {' Z; N" d
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     8 n& W6 W! m* }- O( }3 [& z
167. closesocket(s);
     
168. 
     4 L& T1 O' i4 O& s
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     ) i. C" W# Z( o) j( h8 W# d( v
171. if   (!parseHTTPResponse(response,   result))   return   false;
     " h7 _% J( V9 U8 \% s9 |
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     7 [7 s5 f8 `; r) \2 n  e
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     % l( {. J6 `7 W3 I& D( F
176. for   (int   pos   =   0;;)   {
     7 Y5 d3 Z- G" M! E0 Q1 S
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     3 e' D- D7 H) }* a! c
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     ' s7 U& y- w/ {: a$ I/ I5 G9 ]7 ]
185. return   GetDescription();
     
186. }
     $ R3 f' P& ~0 g" [/ P9 q  m
187. }
     ; q* i8 X" h( L6 R$ e3 l& z3 f; V
188. }
     
189. }
     4 A. Q( n6 `9 H2 x. q/ U. S
190. }
     
191. closesocket(s);
     
192. 
     
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
+ j. z: ]* N4 H1 i; o* o/ `, t

. l! b9 t9 j% L& o, t- {' V///////////////////////////////////////////
7 j5 Y0 n3 A& Q, {$ I  a& m//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
, F5 T( w" z) }+ A& H9 P

% g: N& ^: W1 \8 V% `#pragma once
#include <exception>
7 x) \4 W# d$ t/ o& M/ D# d" l

  enum TRISTATE{
! ]7 X/ T2 N* Y        TRIS_FALSE,
3 G% H" L, k9 S9 t; t        TRIS_UNKNOWN,
2 f$ F: e3 f2 ?4 _6 D$ _        TRIS_TRUE
2 |4 s4 W4 p8 ^) [' B+ K};
$ `( B) p3 h$ q) s4 g8 y3 S
  Q$ p' m* i; m2 S
/ z& N. y$ q4 ^enum UPNP_IMPLEMENTATION{
, B$ w  D  y6 |8 L/ }        UPNP_IMPL_WINDOWSERVICE = 0,
$ V9 W" S3 z% P! |        UPNP_IMPL_MINIUPNPLIB,
9 H1 s- q; ~& {2 g( H+ ?        UPNP_IMPL_NONE /*last*/
};
: j8 M7 ?, x* F' i" x# C



+ |# d" M( B1 N; Oclass CUPnPImpl
% |: H# U% R" \" k! q  ]; Y{
public:
        CUPnPImpl();
0 {; [; \" M; B        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
  o' k7 S9 w7 w                UPNP_FAILED,
$ m/ ^" N. ^: h; F: S/ v                UPNP_TIMEOUT
- I* h6 |; ]; k+ j# Y% x& o        };
' `* [3 O6 i3 [$ H" H& D
# _6 n# n3 y% a
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
& C; e1 K  T* a$ p) x        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
1 C0 v7 Q& {5 O+ ]; U        virtual void        DeletePorts() = 0;
2 m; R9 W2 q$ J& r+ `' ?; s7 E9 V        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
1 I9 ^4 Q: y1 P! t5 O: U  ]
# t9 Q3 G: j% B3 O, f1 N
- `, Z1 Q  L0 J, p2 Q9 h        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
, d1 `# H( t7 D: T+ x        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
2 B& y' }, d. a

- w$ \2 s" X- J; c. I0 i$ _- ]// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
- G' U" b( d+ l1 O        uint16                                m_nTCPPort;
7 G* Z1 S2 g' U6 w' q, d        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;

- [, T# ~9 w" `) n1 V* ?
, E' I8 ~+ z. ]3 o" ~private:
4 F5 P, @( d* _/ o, w. p& y1 B2 h) I        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
8 f# Z  p: Y4 N
- ~% k. V0 f8 J- x$ O1 L( F/ c
};


, u: e7 b4 `% e9 g: A// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
) H  c8 J7 H; \/ kpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
: x( m- x) W  x! x        virtual void        StopAsyncFind()                                                                                        { }
9 Z* d' E/ j- Q. H        virtual void        DeletePorts()                                                                                        { }
6 o; v8 u/ ]3 H% b  G        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
1 ?& }7 X  C. r, L$ g% V: w- l};

) M. q9 @* Q; }! a/ Y
/////////////////////////////////////
, A* v7 d; y: F3 ^6 \) P3 ^7 n//下面是使用windows操作系统自带的UPNP功能的子类


#pragma once
#pragma warning( disable: 4355 )
, n3 Q; w9 B: g0 f5 E. q

' l* |% N4 c; `& z  Z! ?#include "UPnPImpl.h"
#include <upnp.h>
7 q4 Q# A/ }  e; |. a& d5 w#include <iphlpapi.h>
1 Z5 k. p8 [2 I- {  W6 b* X#include <comdef.h>
& ]- D/ o0 O/ d4 E#include <winsvc.h>
9 E& ~$ v1 K( w8 p
# R# |5 K4 G, v
#include <vector>
#include <exception>
#include <functional>

3 U& b& w3 r8 l
( n/ c+ k& X! l! d% H
& q# H& ~' w+ T+ ]& u- }
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
. f1 O2 z6 R- W: Y2 {& @6 ztypedef _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;
' r; I5 Y. l+ utypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
* X2 r" j8 z1 s5 H! [( ~% F

/ ]6 i' w& ?! `% {1 P- Otypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
% m* @5 l! l1 H  PDWORD pdwBestIfIndex
+ f4 e; K0 e" l' U0 {2 T);
& L' X; d: Q) p
. P7 A# D$ m. Z6 [( R& ~' C
9 k& ]% i+ t' a  Q4 itypedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
  BOOL bOrder
);
2 C2 f1 B( k7 N2 m. a
  O/ @5 _. b9 N7 R
typedef DWORD (WINAPI* TGetIfEntry) (
$ Y# U" A' Q; [) c$ _: U  PMIB_IFROW pIfRow
$ N) C! [6 ]6 a  n" I);

- q4 r# }( Y5 h2 o" j9 H0 `5 N# u
) O. }( f& j! j! E: ?. gCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
  t0 ~8 U, N1 p* i

, ], m9 y: u# f& e3 Yclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
public:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
( G6 u' F  O* Y) C. e5 F- W

3 l# d( E. A- i5 w        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
; e' M# x* W; b6 _! k; V% F        virtual void        StopAsyncFind();
  a; C6 u# k7 d# S5 v6 ~        virtual void        DeletePorts();
        virtual bool        IsReady();
! Y! A2 i4 o$ ^+ j        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

; }: T9 J8 ~! G, e+ \
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
4 V5 ]! \# t0 ~+ w        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };


# i, R6 O/ n/ e3 s) E9 Yprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
/ R& y  Y; L+ F        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();
5 R4 f# ]5 C% {4 @" s3 u

! Y. ?% N5 g7 w, c# x* B/ y        inline bool IsAsyncFindRunning()
: r# W1 ^; E7 d8 [; }) t        {
( W; L" i& Y; {  _: s$ C% w                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
, Z) t. u1 J: g& t. K/ H                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
- j- I& ?! h; E- C. \                        TranslateMessage( &msg );
' h- D: }% R$ z) ^$ S/ x* u                        DispatchMessage( &msg );
2 B' r6 ^8 ~! `( c+ \" v                }
7 c0 R) {' {* L+ s7 s                return m_bAsyncFindRunning;
        }


        TRISTATE                        m_bUPnPDeviceConnected;
5 ]) }  n' p( d( ?- v
) j  \, {1 L4 a" R$ q
1 n# m4 G+ e+ |4 W" ^/ m8 d// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
$ |1 D) C% |3 W! s% [+ y        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
2 q9 {- X$ t7 w# Q( t) I        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
3 O7 S0 F! F( C0 `" V        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


& G$ C* @9 J$ e        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


. V; }, `: B. b        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
. |/ e# n3 k3 `) W        {
  E6 ~6 J7 S- [) G9 e! a" a                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
+ P. r# p  B+ F$ C7 A0 N/ ]% p                result_type operator()(argument_type device) const
/ v2 T$ h, a( G8 x                {
                        CComBSTR deviceName;
+ u( N( k% }3 w5 d2 T0 B+ d$ d                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

% h: h: t- ^) L5 U
1 ~8 Q, y- p1 m; I+ E                        if ( FAILED( hr ) )
# w2 L. j! x8 R0 J' [4 C                                return UPnPMessage( hr ), false;
/ R2 F9 A3 n* |; {2 e

                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
3 c- ]! r4 x+ c, H                CComBSTR m_udn;
. t7 j+ u8 k2 w$ e        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
1 `5 [' y1 U4 G6 g4 V        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
. K5 N" a4 N5 z, O0 ]5 U  y  {        void        DeleteExistingPortMappings(ServicePointer pService);
6 M2 [  e7 V* O+ r2 S        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
# g; ~6 j2 Q; _! o& ~( j        void        StopUPnPService();
7 A3 Z! ~& h2 \

% f' X6 a+ L" g  V9 W2 k$ c        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
, E0 v2 {7 u, e* v+ R% s% ]/ E* o        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
% U2 B; ]; z1 ]# {2 v        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
; b7 T+ L. t( V        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
' _. Z; m$ d& e6 P        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
' T: o- o! g2 F" d2 J        CString        GetLocalRoutableIP(ServicePointer pService);
- U2 w# i; k- W1 `9 O+ Y0 L# ?% E* d7 r
$ V) f5 h4 U5 S) e" ]0 J- W3 S
3 ]5 l* ~( F# a# J7 ]" R: z5 v0 s8 K// Private members
private:
5 N  q3 l& {- I( l! J& H        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
4 A; P2 K5 N3 {( I3 V        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
. ~6 ]5 N" {/ ]/ B( s9 o
8 b) s3 l- R, Z$ \
        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
        bool        m_bPortIsFree;
$ y# ]8 h/ }$ P- H1 y9 ]2 V+ \9 _        CString m_sLocalIP;
        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
5 ]! K0 ]  ]; C5 a0 V+ t        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
& O* d2 ~! V% h2 H  E, i* A        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
3 d% p0 b; B" z4 ]4 E9 [        bool        m_bDisableWANPPPSetup;


};
' U8 Z; O; Y& P- k# |; S5 F
0 ]" p7 j2 C; a2 ~4 a$ K
// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
, R! o, ?0 ^. h- U9 f$ T{
1 j' t6 {2 }- r3 J3 z0 m' k! Ppublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
/ e/ l4 @' i! Q- ]                : m_instance( instance )
        { m_lRefCount = 0; }
: |9 f5 o4 t/ `6 F9 |0 H5 B

   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
2 N2 A9 s: r, T* w4 x
- i+ ~* r5 ~6 m9 h/ f
// implementation
private:
( v+ n# _, y- u        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
8 G- F5 T% l/ o) ]  f        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
6 h$ N+ C$ D/ W% i& a1 d# ?# J2 Q& D, P        HRESULT __stdcall SearchComplete(LONG nFindData);


3 T0 n3 d( E) j( X7 ~( Dprivate:
        CUPnPImplWinServ& m_instance;
6 H' j# ^* N7 x1 ?# p& p/ C/ K  h        LONG m_lRefCount;
9 L' n0 }! z- g5 ?9 e};
8 O$ A( G8 ~, V% j9 A, N: p% ]

3 S4 z7 T) C* F4 g* M% v3 T// Service Callback
3 V& V5 o, J2 O0 j  eclass CServiceCallback
        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
& L, \! V! h0 v- X                : m_instance( instance )
        { m_lRefCount = 0; }
   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


# `$ a/ P$ E. ?; I% J$ z4 b8 ~. U// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
- c$ K5 d8 [+ ?' N$ j0 {0 w        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
5 X3 u6 A" ^) V, S# j2 e% s1 m
1 A! i8 e/ s7 t4 H' @" @; R: `) U; y
4 D; q/ @. @4 G) F/ s/ [+ D. ^8 @private:
        CUPnPImplWinServ& m_instance;
5 e5 x" n) g7 [0 a        LONG m_lRefCount;
6 n/ c" s' V/ w. z% H) x};
# u& I! u5 N3 ?" s4 P& p* f7 u

/////////////////////////////////////////////////
* ^4 b# \/ U  `/ `) o
: t+ p, E- q' v2 h# k+ A! t
使用时只需要使用抽象类的接口。
( W: `5 c' E; h+ O& tCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
! e) j' }+ |4 n) r4 c, K+ ACUPnPImpl::StopAsyncFind停止设备查找.
# g* e5 _" t; V1 RCUPnPImpl::DeletePorts删除端口映射.