UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   * l: _1 V2 y2 p$ I  x+ g; N
3. 
   
4. #pragma   once
   
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   7 t* g# M2 O; @+ x
9. {
   
10. public:
    
11. typedef   enum{
    6 {. j% P/ v6 `5 s$ h/ k
12. UNAT_OK, //   Successfull
    
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    ! a" `' ?- f4 W. ]$ d
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    ) p; i) p1 I$ W" n: c
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
    5 W6 A) Z, U# t& f: s, R4 j& @
17. }   UPNPNAT_RETURN;
    $ f- ]1 a2 W4 u! X" C; f$ m* D
18. 
    4 A8 \: j/ K7 q1 M' W+ i" x
19. typedef   enum{
    & k" s9 `+ q$ j
20. UNAT_TCP, //   TCP   Protocol
    $ h* x8 j1 j# P- M( M
21. UNAT_UDP //   UDP   Protocol
    + j# w8 N7 b/ I  N3 O
22. }   UPNPNAT_PROTOCOL;
    
23. 
    1 p  a0 j& t3 @
24. typedef   struct{
    / E8 N  `. T$ Z5 E$ p
25. WORD   internalPort; //   Port   mapping   internal   port
    ( X9 ^' _3 `# V
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
    9 ^! b, M! Y1 W0 X1 w$ ]
29. }   UPNPNAT_MAPPING;
    
30. 
    . J0 l. i  t% H* r4 b' |
31. MyUPnP();
    0 [3 Z% J+ y" [; }) f9 q; n6 x5 V/ l
32. ~MyUPnP();
    
33. 
    + j% P; g: Y1 |
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    1 o6 O( f! P' N# L
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    : ^9 n# h9 S$ J/ F4 E7 f
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    ! E. q9 \3 C, o1 P7 g8 M5 _
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    % H! t; U1 \+ Y. _+ f
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    . R2 m- |. j4 a# U0 `5 A
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    - p- I$ Y3 _5 \" B4 R7 I0 b5 j0 k) f* m
59. bool InternalSearch(int   version);
    2 T1 ~1 P' Z- y, N0 y) A
60. CString m_devicename;
    1 G1 T  x  l5 L3 j$ [
61. CString m_name;
    ( {7 l( F+ y7 O7 B2 w. m2 U
62. CString m_description;
    
63. CString m_baseurl;
      ~& ?. ?' l4 w& h. r
64. CString m_controlurl;
    : j0 n( c' O' @) ^6 z6 w
65. CString m_friendlyname;
    : i8 f- }8 ^" u; |
66. CString m_modelname;
    
67. int m_version;
    
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    ( X1 `) j. _* S" M
71. 
    + z8 g# J( S1 G( C" I
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    # Q* v% x) X! w
76. bool isSearched;
    0 O# k4 c) f; W  W9 U5 s
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   ! H/ z  u8 N6 R
3. 
   
4. #include   "upnp.h "
   0 H+ X7 m( v7 z3 I
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   0 ^2 F+ R1 |6 S  `. S, E/ f
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   ) O& X- m8 Y5 }0 W
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   ) l* i- D* u5 p$ ?  [
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    ( E  e/ l7 M: D9 P$ y. g9 k
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    8 `+ ~5 ?* I. O: E2 N8 m, I  Q
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    - ]+ B. s6 `$ f. M: H! D* U
16. const   CString   getString(int   i)
    - W( H; n9 C- `0 G3 r* P* t8 S
17. {
    ; }+ w& o6 L1 m: s  f
18. CString   s;
    0 J5 }" [! D$ S9 r, v9 ^- F
19. 
    * x/ s6 I2 S- m! }! S( _: B! a
20. s.Format(_T( "%d "),   i);
    
21. 
    3 y1 g9 i2 ^  Q/ e9 J5 O
22. return   s;
    0 E% C) y$ q" S7 Y! v; ^9 X6 T# ?: N
23. }
    " ]  `; e6 n4 r8 g6 I( ^0 J
24. 
    6 w& |- e* M% J4 I1 A$ A  A
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    & l) `# c) {  J$ X4 d) l5 L% `
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    " }( {  v: E. ^9 d0 z
28. }
    ) Q. M- F" k" r/ X- a
29. 
    0 C' H0 g6 v/ \6 s. N
30. const   CString   GetArgString(const   CString&   name,   int   value)
    % q, @( B# a  K/ s8 q! L; e
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    # e) ?! Q0 U6 P* K) p; G9 l
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    & A  S) Q" W8 `
38. 
    
39. const   CStringA   sa(request);
    8 U- z8 y4 c7 B7 {) [' Z4 `% n' b
40. int   length   =   sa.GetLength();
    * N, ]9 w* i  Z
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    " z0 }0 L( E) B% z
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    ; {1 {- U% G# \
47. sockaddr.sin_port   =   htons(port);
      ?# W& o3 f0 B! r
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    + _$ i* p- C6 L* @+ O8 ]
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
      t  m% Z' u# K! l# z/ f7 k. k
51. ioctlsocket(s,   FIONBIO,   &lv);
      ?: N* t- q9 A
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    ( o+ S/ q0 s) N! |! O, j3 C( i
54. int   n   =   send(s,   buffer,   length,   0);
    ) i; {5 ]; D& q2 n' \5 j
55. Sleep(100);
    , `7 |! j9 O4 _6 Y4 k( D- [* d2 n) [0 l
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    3 t1 o) f4 r: ~, H) ?/ x
57. closesocket(s);
    $ p6 g( _" `+ F: h+ w: V# s$ Y/ W
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    3 ]9 }  r+ N" W! ]# {- {; \5 x
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    4 ~) `* i( ~' r3 n5 p& U
63. return   true;
    
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ' y$ |2 B! e6 M* Y; m
67. {
    : C9 D  Q$ E) ]3 W. a/ O
68. char   buffer[10240];
    " I& M, ~) L* f3 z4 w
69. 
    $ F, U# U  K. ~7 A6 o
70. const   CStringA   sa(request);
    ' }( m8 C' @9 Q8 j% o) ~* w; h
71. int   length   =   sa.GetLength();
    - j) ^7 Q6 o8 ]( }& d! S
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    6 {; I" V% @3 C8 r) Q: E" b
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    & F( M5 g- f4 n4 L8 f* w" v
82. 
      Y8 U, ]$ X2 A; X+ @4 a4 b
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    % w0 I& m( ^2 `- n8 u6 t
84. {
    
85. int   pos   =   0;
    ! g" i' V& e; u; }6 R
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    ' i* }4 R. \/ V2 {
90. result.Delete(0,   pos);
    " o" p0 e! R. d: i' H  K6 v, ~! }
91. 
    
92. pos   =   0;
    / j, f" E4 k, t; H
93. status.Tokenize(_T( "   "),   pos);
    6 u& M" j3 ~0 `1 M& y/ G  R& b& G
94. status   =   status.Tokenize(_T( "   "),   pos);
    ; v! _1 E+ I* U& \; p( t1 }& _: D
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    8 {; _  X2 W: ]
97. }
    
98. 
    2 ^+ n& J8 T: J5 d) p" b5 J
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     + }7 ~5 j( @- U0 m
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     & _3 V, q( o  v  m& |% `
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     5 v" s" N, \7 ~5 F
106. if   (posStart <0)   return   CString();
     
107. 
     # a  @/ v7 M* ]" ?
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     ! z: G6 x, R5 X; }4 a
112. }
     : a. b# P# k7 Q  U
113. 
     
114. MyUPnP::MyUPnP()
     ) B) K% `3 a: P8 V7 c
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     + M! d& D( e; l0 h/ X& T
118. isSearched   =   false;
     + _2 e+ \# r: D. q% j. X
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     0 c1 F0 K5 Z" _1 w* |& D  @
127. RemoveNATPortMapping(search,   false);
     
128. }
     ' e) u6 N( |, e8 @
129. 
     
130. m_Mappings.RemoveAll();
     " c1 }7 V9 S. e8 A7 O: t
131. }
     ! q+ y! R% i, d" A- S+ f$ B1 Y! j
132. 
     . P9 L" c8 n$ U1 g, K
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     1 h3 _4 j+ |- `1 y
136. if(version <=0)version   =   1;
     " R* g0 W) D/ r
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     ) t* P8 C2 h& l7 K/ V/ [$ q
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     & f* s4 B. Q. T7 s5 Y: E
142. {UPNPPORTMAP0,   _T( "service ")},
     4 V9 G* @: V6 ?' D/ |
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     ; A8 `- |9 `/ f# ]' l6 t
144. };
     & O# G* a6 S8 q- j( n" E) x
145. 
     6 N5 {+ }$ k5 D$ }% Z( e
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     . y  O: j9 z- _  J: i
147. u_long   lv   =   1;
     1 B6 |& a( w3 \; K
148. ioctlsocket(s,   FIONBIO,   &lv);
     3 n8 \2 c/ t8 L0 P( ?" j, r" X) d
149. 
     2 q. n, t' o7 M% X% F
150. int   rlen   =   0;
     9 m3 O. w9 U0 A6 u+ V5 h0 q3 q
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     , [. ~+ T0 V$ T/ i/ x
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     9 J1 u6 S+ r. _6 J
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     8 X* j1 N. h6 u* H
155. CString   request;
     ( X& m) B8 j  p# e  a+ S
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 "),
     * a7 r$ j3 P* |2 v; p$ I
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     ) F+ |. z! B- a+ L( n2 v# J
159. }
     
160. }
     / ?$ N: ]: k# m; q2 S1 ]
161. 
     
162. Sleep(10);
     ) w8 J- \! k/ |3 U
163. 
     % Y9 Q2 |) c. z5 V3 e
164. char   buffer[10240];
     ! q& b: r7 K; D  H4 X3 |6 |
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     , [* n. y/ H, k1 O; P5 B3 I
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     # a/ u! z+ F5 c
169. CString   response   =   CString(CStringA(buffer,   rlen));
     % c! b; ^4 K) h0 y
170. CString   result;
     ) {8 Y9 t) O6 T2 ?; \# |0 Y$ b
171. if   (!parseHTTPResponse(response,   result))   return   false;
       T' C7 `) g$ {4 z) \9 y
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     7 x, ?: P' b9 e+ F3 o( q7 ], e
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
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();
     1 h, E9 q* S  L3 _' H; a0 W! A! w
185. return   GetDescription();
     
186. }
     + z7 W9 t, y* `
187. }
     # e7 @" g* n1 Y# O( a
188. }
     
189. }
     
190. }
     * L- z% h4 T) U6 c+ O- z# e
191. closesocket(s);
     : d: U1 |% v9 T( Y# c  P
192. 
       ]! M- f" Q. H
193. return   false;
     
194. }
     " q+ ?4 r# g+ S1 a

复制代码

天云上人

以下有关upnp的接口来自emule，
- h/ O& s2 b8 A, W: ]4 i) k
. }' l3 I% V, r$ R/ }! `
///////////////////////////////////////////
* [$ B2 c- y8 ~6 v- I//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
1 k0 y; l$ [2 q( e. O2 P* L5 V

" v& Y; |/ m5 b#pragma once
#include <exception>
& |" R$ [4 O- r. x! q1 x

; K6 r( Y% u" M& |1 Q& q& Q, F+ q7 l1 b  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
9 |$ J9 T3 |: v- V};
4 x/ k8 ~6 C/ V1 y  Z

. J8 E) _) E' U9 M) O# V5 L; U. o; u& [enum UPNP_IMPLEMENTATION{
8 |1 d* j8 q7 v& _. D        UPNP_IMPL_WINDOWSERVICE = 0,
& S# d( m: Q# C- C' K        UPNP_IMPL_MINIUPNPLIB,
        UPNP_IMPL_NONE /*last*/
};
1 i0 j2 ^5 r$ q5 y2 X) F( Z5 [3 i
# D, ]3 ^; t$ T; V8 V$ b
' y) _9 G% E5 y; Z% F- e9 Q7 f

9 ~6 Z. V! h" C  m. ^class CUPnPImpl
8 i4 x/ Y- ~4 P{
! v9 M, v5 l0 Z; Zpublic:
8 G% b% t* O! \' v        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
* Y+ P! R  {7 I: h6 y        enum {
                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
        };


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
: C( x' }& ~) y5 ^2 P) W7 g# ^/ q        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
; D1 E7 v6 r: {. h# g/ S; Y$ a4 @* y( m3 P       
9 f" z/ }8 V0 i$ a( ?8 t        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
" @- \  b7 W4 c0 i

        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
: E" N7 R& n5 M0 O- _        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


! r' v5 I1 h& ~- `// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
, `& X# S: i2 R( \: B& q        void                                SendResultMessage();
        uint16                                m_nUDPPort;
' Y5 q& X4 U) B/ R7 k- ~- \8 N        uint16                                m_nTCPPort;
2 C: }! C' H/ h% a        uint16                                m_nTCPWebPort;
; L5 f! S) d( b- O. m  k        bool                                m_bCheckAndRefresh;


# q( y7 f  f. N3 zprivate:
4 l! u  J3 N! j/ ^2 t* }* V        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;


; Y' m, [! `+ i- n! G* r1 Q; @4 X};
5 X0 b; q& j" X- [- f  I! k

// Dummy Implementation to be used when no other implementation is available
6 y' e) l' G+ s7 v- w" [class CUPnPImplNone: public CUPnPImpl
{
; `0 t8 z6 t( ?0 g# Qpublic:
9 p2 f% J  {. R, O' n( l. Z' B        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};

' X# c. A) A* e+ @
2 d+ z7 S0 O$ Y; k/////////////////////////////////////
* n: [% [7 \0 T+ o//下面是使用windows操作系统自带的UPNP功能的子类


% D. P: k' a: _7 Q, C' r7 h#pragma once
& s: b& A$ \  Y+ L+ q; V#pragma warning( disable: 4355 )
; i, |# N0 ?  C

#include "UPnPImpl.h"
#include <upnp.h>
7 I, Y0 @5 e0 t7 s1 D1 F#include <iphlpapi.h>
#include <comdef.h>
8 y+ F  K9 N; j$ h1 V0 a4 M( c#include <winsvc.h>


#include <vector>
9 G1 }) W" e9 Z) [* n5 z$ I#include <exception>
; O9 Y3 i2 z8 m: ]$ F! w#include <functional>



# X; C( q( O8 ]! G1 q
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
# t9 `3 J' m4 H9 Ctypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
, v5 M2 N$ }: x, m5 I- G9 |typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
) s) M/ u$ ^( k+ m5 m; U' jtypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
( x% l/ z+ Z& J3 u& U1 b" vtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
9 i( N2 |6 }: j. u! s
' ~* U* H, R0 t
typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);


6 r/ m& n' O) ^' m+ Y( h7 m* q. l( `" Dtypedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
5 u1 D( t/ o" p2 l2 V+ Z8 o6 {  PULONG pdwSize,
! N8 G7 u' N) p6 N  BOOL bOrder
);

, R% F& c5 f, T, d! u0 N& K
typedef DWORD (WINAPI* TGetIfEntry) (
1 p" t, ]( J3 t4 S, X  PMIB_IFROW pIfRow
- n! l+ E  e. n);
: L' s0 w# E" H: ~: Y

2 M* f# ~" h/ VCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);


1 `/ ]# G) X( `* P; p) kclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
; z* w+ s& }4 w" ^& B// Construction
( Y0 J+ `- Y( |2 l4 jpublic:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();


; e( |+ }( h1 }- ^5 N9 x- Q        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
3 \. G% s7 N/ V& g4 G        virtual void        StopAsyncFind();
* W$ N+ d0 k* S1 F; O% L/ n- a        virtual void        DeletePorts();
        virtual bool        IsReady();
# h* r1 m$ w& @2 `1 [+ n8 F        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
, c! A" F9 D0 X8 ]+ v+ D8 R6 R( q

9 O2 {# E3 j3 v6 ~+ H        // 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
6 a$ v' g. i* w6 C- W; R        virtual bool        CheckAndRefresh()                                                                                { return false; };
9 a% E% L( ^# [2 R6 C1 b- y

protected:
7 {' c3 m( s/ v        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
9 }6 O: U8 q+ [6 P' e& w  `        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
. [! _" m( J7 p: t7 K        bool        OnSearchComplete();
& G' f4 w: W# ?" k! W  \  J7 n        void        Init();
8 g3 {; }+ T% h  ]( r4 f
3 p" A5 Y: D* D, b5 x7 R2 k, ^
        inline bool IsAsyncFindRunning()
  O; @' l! C- o; p        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
2 D9 P! y& K* a& d% g# \2 ?                }
                MSG msg;
7 c" Y% U: D2 M9 e                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
0 C/ B, l4 u+ f8 K) I' d                {
                        TranslateMessage( &msg );
9 t0 `6 E+ {, o, ~0 C. A2 h5 E! }                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
! d, a' p2 N1 k2 A4 B) W        }
( ?. t5 _% h6 }: S% H/ Y' X

        TRISTATE                        m_bUPnPDeviceConnected;

0 d6 @3 e* ^& i4 f% G7 @9 e% I% C3 v
& v  s0 q* V. q! i4 P// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
6 R/ H1 B% s2 |: [. r        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
2 l6 G2 N9 z; V        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
+ N$ D2 G/ @) \+ U( e( f5 |9 G        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
/ q' j# }# k- R* [2 h0 M        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
  B5 T; Q1 ]) h6 m- ?        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
) H/ Y# H3 p$ \' F' A* ^

! H) [) V! H, |        TGetBestInterface                m_pfGetBestInterface;
! T2 ?! ]  B' v0 T        TGetIpAddrTable                        m_pfGetIpAddrTable;
3 ]) Z* d, n3 f+ A, `        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
! y1 g8 d: U, d% G! [# @) ]. {        struct FindDevice : std::unary_function< DevicePointer, bool >
+ s5 r' H' H; Q6 i+ C& G7 k        {
5 `+ c; ?$ R2 ^) s+ E, P                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
2 u% W8 t3 V0 h+ L7 i* b  x. }: |                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
1 a$ E- P! n8 I3 M3 f                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
* T' ^! a4 J: O' i4 C& |) T8 @
5 `* p5 W# _. V# Z" Y, U% H6 y8 ~/ ]
5 @+ y1 ^' O* F2 S) U8 e$ _! S' w, R                        if ( FAILED( hr ) )
7 O: {/ S. [, w                                return UPnPMessage( hr ), false;
$ ^# f: l) T, C* {
7 C  V; X: v3 P( z& k7 e, t
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
) t4 J+ H1 _) T- K# `0 U                }
) S  o2 x" x' a! M                CComBSTR m_udn;
        };
6 h( ?3 I* q# S! h2 k5 }6 p: q       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
: b: d' ~* R9 {        HRESULT        MapPort(const ServicePointer& service);
5 l3 N% Y: m* _% Y' s. W, I        void        DeleteExistingPortMappings(ServicePointer pService);
3 b4 V% `' w. a; M        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
6 Z1 v) m* C" Q. v        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
: L$ P: j1 g- e8 R7 S6 ^( h0 l                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

: o2 H) E6 m2 J1 @1 q7 i  g  U# d
0 X3 e, I9 u- w  j7 R5 J- Z; _        // Utility functions
: V- W5 d" y$ S: M! f2 o. B        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
2 ?$ I9 T/ S9 I% C        CString        GetLocalRoutableIP(ServicePointer pService);
7 b, c' P! D; V& c/ E

// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
3 Z6 W" Q9 H. Z        std::vector< DevicePointer >  m_pDevices;
. U# S, \* \0 b, R9 [        std::vector< ServicePointer > m_pServices;
! |; j; M( l3 s; @* ?( ^        FinderPointer                        m_pDeviceFinder;
8 E5 O4 U/ J  f! M$ N" q        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;

) }" \/ T/ i% t; n
        LONG        m_nAsyncFindHandle;
) V  f2 }6 f$ b' H        bool        m_bCOM;
. V: q4 V4 Q: k" r, P! u) a        bool        m_bPortIsFree;
6 T% k* A3 U4 s0 u8 w        CString m_sLocalIP;
        CString m_sExternalIP;
: N6 {- Y7 b. D1 @! [# K6 O        bool        m_bADSL;                // Is the device ADSL?
+ k/ ]# Q& R: `3 ^        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
+ x0 b2 f0 W) P( d0 A; p        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
  i' _2 V/ @3 X( }! o6 ?        bool        m_bServiceStartedByEmule;
5 O4 y5 m5 m- T9 |+ T        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

9 u+ q9 B& G1 b% e
};


: J" t1 A; h* y* ~8 ~6 N6 \// DeviceFinder Callback
9 {3 b- p/ |) yclass CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
, E$ \4 R  `3 [7 U. y  Hpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
; p6 x/ X2 g/ O6 P                : m_instance( instance )
2 V3 P' k  {: Y* x9 |        { m_lRefCount = 0; }
+ u% i' w4 _, D" \$ f

   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
' D5 m# H; W/ W/ N

// implementation
private:
( Q% m; F4 j7 p: i6 \$ I3 A        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
! c! s; S* d/ K) ~" z& C9 E8 r& ~" O$ Z        HRESULT __stdcall SearchComplete(LONG nFindData);


+ K) r6 U% T* K( @. n. [private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};

( y- h# f3 R5 t4 ?) [: W6 t' L  p
; M. N& S- {3 c// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
{
$ }( `/ M: z* d8 \public:
        CServiceCallback(CUPnPImplWinServ& instance)
# r- ^6 A5 ~' B2 T  Z% a# j                : m_instance( instance )
: l1 X$ m8 y* q; Q6 ^+ l        { m_lRefCount = 0; }
   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
, j8 a- ~! H* ]; g   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
9 B2 h- d8 G- l) O

8 [8 K$ J( a' d, Z, U# N/ O5 p// implementation
$ L) K3 |$ @) A) gprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
( j, N! u1 `! t* _        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);

! r$ m9 c! W8 k3 R7 [4 }
private:
$ _2 E* {& o2 J% i4 w6 O; F        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
( @' s8 R- B$ f. ^( y2 V: ~9 O

/////////////////////////////////////////////////

  \6 i. X! T; M$ g  c& C$ y
" D, Z% t9 g5 {8 ]6 [- k& `. u使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.