UPnP

天云上人

/*uPnP.h*/

1. 
   * |: w- [! s. o& C
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   
5. 
   5 l6 {1 q; k/ Y7 `7 c2 F% @
6. typedef   unsigned   long   ulong;
   
7. 
   . B+ l( K/ A* p( ?6 b- C
8. class   MyUPnP
   
9. {
   ; z3 B: P9 D0 r, m  s
10. public:
    
11. typedef   enum{
    ( W6 b- M( c7 @) m% g
12. UNAT_OK, //   Successfull
    2 |2 K$ F  D7 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
    8 k: R. U3 `) X$ ^$ d& q! S
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    ( L. o5 n& f0 j+ ~- W
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    & o: h' Z1 u  A8 N0 o. ], N
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    
23. 
    2 x/ T' V7 A3 [- R1 q1 ^
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    ; d  O. g. r* L$ T* S
26. WORD   externalPort; //   Port   mapping   external   port
    5 P& T$ b; d# Z; v- r
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    : F7 |$ P5 K! s) R! Z* O. g! @
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    / R1 V& G1 r1 Q! x+ [
32. ~MyUPnP();
    . u& \2 |3 D, I, p- g& y9 I
33. 
    4 ]. ~" ]" X" M+ W7 W; A, g/ e8 P
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
      d+ e7 ?: w  `1 \! G
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    + y( ?1 l* e2 [6 W. \7 f. `
39. CString GetLocalIPStr();
    $ K# p2 G- U3 e7 P7 \& J5 d
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    0 q' P: c# p, {8 }; P6 B
42. 
    % e  u1 H5 q, r
43. protected:
    
44. void InitLocalIP();
    9 q9 @: ?9 \7 U
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    9 c. n) L6 `  T
49. bool   deletePortmap(int   eport,   const   CString&   type);
    / H8 n* W; w$ H6 @  w1 ]$ \5 y
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    / p. ^# I- f4 `
53. bool Search(int   version=1);
    7 W( S, j$ y3 w5 j0 F
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    " e7 Z: @& _  B; o: E# ^
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
      V( g. m% @: Z
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    ; D3 z1 \  k( Z' ^8 {) }. R
60. CString m_devicename;
    & w2 {+ ?& U  M" |7 C. R/ M
61. CString m_name;
    
62. CString m_description;
    % w: H! f; T" k% L1 w
63. CString m_baseurl;
    
64. CString m_controlurl;
    ! l# F+ s8 ?# l
65. CString m_friendlyname;
    
66. CString m_modelname;
    2 d( a' i7 D0 }) r  n8 s* P; i
67. int m_version;
      E! f- |* G4 u+ v' U5 c) o1 w4 }4 P
68. 
    % c0 g/ a6 A; i6 e
69. private:
    9 A7 q! g( w- E) C3 B9 l
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    ' c7 m7 i7 D) L4 v3 v
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    6 J$ a, N6 b! H# T
75. 
    + Z; \4 _) E1 Y+ P
76. bool isSearched;
    
77. };
    : H  [& y- y7 K4 @  h
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   5 ^! _* u7 `/ f2 k* s. Y
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   : X  I5 B3 p# d
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    7 N6 f! v& i3 W! s' y
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    / }6 p3 u% ?/ F4 b, ^9 J, b
13. static   const   int UPNPPORT   =   1900;
    0 A. O! x( Q& E/ s( {- B# i
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    * X4 h% k1 k+ t" A5 H1 U8 ~7 P
15. 
    4 N: R, e) R% q
16. const   CString   getString(int   i)
    # [7 u6 I+ L5 G1 M. w1 y" R
17. {
      [4 ^+ L7 F- ~+ ]! [8 U8 ~0 u
18. CString   s;
    
19. 
    
20. s.Format(_T( "%d "),   i);
    . g$ v9 _! ], o
21. 
    
22. return   s;
    
23. }
    & {! L" C. m) T; K
24. 
    1 o; {0 L/ v# F# B+ |0 ^
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    - }' W3 I% \- s/ O8 r+ t
26. {
    9 q% F2 ^, s/ j. U: P3 k
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    4 Y# z0 U4 B; ^; J: r$ I. \
28. }
    8 d$ N' M8 I" q( \
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    0 t( H0 Z% L( @" f: B8 c& |* w. e
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    , f+ a; ]# r+ t- ~& Z% m
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    : k& x9 }. B3 c
36. {
    % |. I( q% Y1 B% q# ?' p, x
37. char   buffer[10240];
    3 X0 ?, H" v3 _/ G
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    5 Q' f% G" ~3 Y
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    # n+ T1 j+ |3 D! O* o0 a1 E
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    6 ]% ^* ]; I6 {
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    0 K# T' h- z( t
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    $ G" l& j- J- x' b
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    5 X2 o% n! @) L0 D& A- k. n
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    # Y/ s( c) l0 }4 l8 g( z# P
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
      B4 b: z! A  N$ B5 Z- E
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    7 |5 n2 W; a" z- m
63. return   true;
    ( P6 h$ r( i0 |" o3 r+ A: @' {8 @" q0 j" Z
64. }
    / j0 }* K" b# H2 M: {) H! ?1 l" A# v% J$ N
65. 
      [( ?. @4 Q% u2 ]) G- u2 I
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    2 W' ?9 G3 V: `6 U. i
69. 
    
70. const   CStringA   sa(request);
    ' D' J1 I* ~( E
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    3 }7 {4 f* ~  V7 F
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    : \  X5 F  }+ p
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    . u% y# |* ]- x' u9 K' M  i. ]
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    1 Y3 m: X. r& X! A' X
81. }
    # h- |7 A9 U: W9 D& e
82. 
    0 t: d1 i5 X; B/ C' z
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    * `9 p( s" y0 t
86. 
    : s1 W6 r8 M; k5 q
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    8 W+ U7 T6 n  v) g6 d! n
89. result   =   response;
    , A: J0 ], T) T) l
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    $ F; D2 R) j( C
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    # d+ z/ R$ l3 ^
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    $ T) O3 q+ ~6 X' b0 y. k: i
96. return   true;
    
97. }
    # N% k, I1 @% H) m! v& ^8 t
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     $ N+ y% Z0 l! |+ G% s% ~0 z( u: t
104. 
     9 N7 f/ W# C) J5 |/ C/ o4 ~% Y
105. int   posStart   =   all.Find(startTag);
     ! f% \/ Z/ Q! e/ R: u+ e# a
106. if   (posStart <0)   return   CString();
       b% H& W2 U- B' v6 U& W+ I# t% H: Z' r
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     9 Y6 m# M3 ?8 l$ h/ C  R
109. if   (posStart> =posEnd)   return   CString();
     * k  I  d' ?. k- y( L* H3 J
110. 
     3 A# @; t8 R4 v' B: U  ?& ~
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     ! q& \4 f, C+ c) M. P3 @* d
113. 
     
114. MyUPnP::MyUPnP()
     ' _3 V6 {! j$ y( {  U
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     ; d7 w  |  H& Q
118. isSearched   =   false;
       b/ ?0 {5 {& b. {' k, B
119. }
     
120. 
     % Q2 q% J, `) |2 Q0 B
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     , o7 u) d( k/ U
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     7 c# Y' \& r3 r; G% _0 E4 T
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     ' l' C% `2 i! ^) b/ E; ?1 s" z
127. RemoveNATPortMapping(search,   false);
     * K8 M8 E+ k5 x$ ~/ c" }; S
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     9 g4 ^( e. w/ [
131. }
     * u$ a& U/ ]; V: K: V* d
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     5 L) `9 ~9 }2 M3 [3 L; W
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     4 Z" E2 _% U' @6 y+ z
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     , {, F$ b2 E5 P$ y9 {
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     . c& l. O7 k; N! S) Y! n' k' l# Q
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     2 M! g/ L" x0 g- k7 t- E" F: H. Q
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     , r) p( G/ v* k* w' ^0 e; K- V1 g
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     3 g. w' w: \# t( y7 z- M; T% ^1 Q
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;
     
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 "),
     . j1 q; Y3 ?' a! x/ M8 z
157. 6,   m_name);
     ! e- L/ z' \9 D
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     ' I0 s9 ]7 ]# ^, ?. Q  v) m/ m
160. }
     
161. 
     
162. Sleep(10);
     ' q: {# F+ V  z6 s4 k
163. 
     1 G$ i% e) F0 b* _% i7 x; s$ G
164. char   buffer[10240];
     $ u- q5 l& o' Q/ T- \0 S- x
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     1 a! x7 g' v% m  q; ]) t4 J- X
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     & Y4 k; `8 S3 M7 g* J9 n
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     * o, W" G/ }3 [, I0 j" J
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     # e! R9 f7 K+ b1 H8 J
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     ! u" P7 `- w9 d) W4 F
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();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     
189. }
     
190. }
     . F4 p0 d) N- U  l9 R* h) n1 {
191. closesocket(s);
     * W7 n5 f. y& ^+ W) x  g# P
192. 
     
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
. w' ]4 f0 S, s$ V! g0 Y

///////////////////////////////////////////
" j: @, W( O; k) [  u3 l% Z4 W//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
, u3 t, l7 J, h) }( Q0 D

#pragma once
4 ~. `/ P- k( ^3 w9 f8 q- o) F#include <exception>
2 |4 `* G* J: j& d1 J

: v; W  m; O) F# _( s) T! H9 _$ J  enum TRISTATE{
        TRIS_FALSE,
1 d! m5 ]2 i1 i5 Y0 _" ]' p# }        TRIS_UNKNOWN,
2 h- A# }% P% X9 B        TRIS_TRUE
};
! Q$ D0 q% d) `% ^

enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
( b+ z3 Q& w( y9 |& I        UPNP_IMPL_MINIUPNPLIB,
- _$ M; g4 E% Q, L7 d& q        UPNP_IMPL_NONE /*last*/
};

4 ~( `2 }+ |# V, Y- O
) `: n" A6 E5 A) ~6 j- K  i1 o( D

class CUPnPImpl
{
1 ~8 L% y# g+ G: [% Apublic:
        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
. ~' G/ ~; |; P        enum {
, P/ J% y% B  A& Q% f7 Y  E6 [- W( R                UPNP_OK,
4 f, o" L6 Y9 h( h- i5 p4 n                UPNP_FAILED,
                UPNP_TIMEOUT
        };
1 c* a9 Q+ s' [9 _. m& c
* a$ }. V& M4 k
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
1 o, H5 r5 h; [+ K        virtual bool        CheckAndRefresh() = 0;
' w* h4 o2 ~2 G; c. Z2 z        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
: @5 W! z. ]+ o, M6 F        virtual bool        IsReady() = 0;
. D. ~* @6 `3 o2 I) M        virtual int                GetImplementationID() = 0;
       
0 r' z3 E1 J9 X  {        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
- z: c- n/ p6 F8 }

        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
5 C5 `" |6 U( p$ \2 W8 V% k! x5 c+ ]) L        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
  i1 a6 M7 L" T4 z        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
( E: [: o. g& b1 Z8 U, R; ~0 _
7 N& z$ a% K8 Y  R
( g+ a, f7 [% q) v, p// Implementation
9 j# \5 H) O5 V' {' Qprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
6 R6 k* W! J' }' q' N9 r9 X        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
8 W7 V) t6 p3 R* d4 Y8 v        uint16                                m_nTCPWebPort;
# G6 W, ?: S" x        bool                                m_bCheckAndRefresh;
( U+ \8 G$ V- K0 Z

private:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
7 e, P) C5 `7 |2 i: A6 P: {: f. Z
* Z, ^9 K) \+ O# Y* Y
};


// Dummy Implementation to be used when no other implementation is available
. c" R+ K; ]6 pclass CUPnPImplNone: public CUPnPImpl
1 r0 E7 Q0 U" v$ I" F* o( ~" F{
public:
% ^1 F' @5 n7 o& d* |0 I4 j        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
9 F8 J; e3 a$ u        virtual bool        CheckAndRefresh()                                                                                { return false; }
5 g  H% d! N( }+ O; N        virtual void        StopAsyncFind()                                                                                        { }
' k9 ~1 ], T8 ]" ]2 p, Q        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
  R5 m) u8 o9 N        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
( _# u6 N6 H+ _3 l/ G0 t};


/////////////////////////////////////
0 P0 S: t4 t6 k! q" q+ y* p% Y//下面是使用windows操作系统自带的UPNP功能的子类


, Y( W) k6 e4 d+ i3 H#pragma once
#pragma warning( disable: 4355 )
; u, y8 {5 Z; \  c1 C" s1 r) N" Z
' n/ o" [8 J, x0 Z" ~8 J
#include "UPnPImpl.h"
  x- r4 a0 O4 g, v3 Z#include <upnp.h>
) b- a$ U  Q1 i#include <iphlpapi.h>
: O9 p7 \5 o1 N5 |6 T" E#include <comdef.h>
#include <winsvc.h>

. f7 ^1 D" L- O* L# W
#include <vector>
#include <exception>
#include <functional>

4 [1 `9 B& \( q


typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
, Q0 v/ t8 y; e4 k, ]. Ltypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
8 A) I, y- ^% d  F* S3 W* Etypedef _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;
' v/ m& ^2 E2 Z% I/ a0 N0 L6 {typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
5 I1 R# o7 n# s0 i7 Wtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


typedef DWORD (WINAPI* TGetBestInterface) (
( T5 ]; h' m. [3 W  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);


( Y2 U; _% Z3 V) `$ btypedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
& w' i7 {$ V* J  W9 d, B) C) b! s- S  BOOL bOrder
. ^5 `8 N7 L) M);

( ]7 _& f$ D/ l6 u5 q
typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
/ T, c9 e3 X* ]4 S% M7 S: U);


2 B) P' _6 L4 `/ c. y& b& y1 }2 KCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);

( ]) f+ o+ X" V1 n! r$ `8 e; J) n
: W# G! K1 p" g# ?1 \% J& Fclass CUPnPImplWinServ: public CUPnPImpl
7 Q# q- q+ c2 T( {4 t7 Y% C% |% X{
+ b8 b0 Z& v$ ?6 ?1 g  Y8 ]        friend class CDeviceFinderCallback;
& q/ A7 ]+ w* u) {& L  n/ C" D" v        friend class CServiceCallback;
// Construction
public:
6 X6 X: t- H6 N% Z        virtual ~CUPnPImplWinServ();
% j/ v2 ]- {& |) ~2 E" z        CUPnPImplWinServ();
  e- Q6 a2 i! Q7 E7 p" f
1 G: [# y! Z9 G9 F) o+ ^. a" R
/ S" m' t$ A* x# M% k        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
1 e- a1 |% ~9 x0 b4 q0 p        virtual void        DeletePorts();
" ]6 U6 `$ R# f) U, K+ o" s# P6 Q        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

7 s& r. y% ^8 m: O2 H
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
- G" b- Y% F) h: N. L: W        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
; M5 }2 H6 p* V; \' `+ ]        virtual bool        CheckAndRefresh()                                                                                { return false; };


protected:
, C* p" n/ ^8 |) G( n2 j# T% E        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
# g' L. o) ~5 \1 p/ N: P* P! Q        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
5 {* O3 M9 w. [7 o1 H        void        RemoveDevice(CComBSTR bsUDN);
9 M. [8 w8 @# F. @7 a: J        bool        OnSearchComplete();
        void        Init();
2 g+ Z9 d. k+ ~6 Z2 z
) v) D. v: Y* W. P
        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
  m4 e% {2 \4 B' y) Q  j8 m                {
/ j2 `" M6 L4 P                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
: \. H5 d: v. l4 |# F9 v5 E2 t                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
2 m3 @  ~5 E2 U: X2 F  o                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
: u6 D. {. P4 D                return m_bAsyncFindRunning;
        }


        TRISTATE                        m_bUPnPDeviceConnected;
1 V* Y2 S4 N  j- g. x4 \

// Implementation
7 M% `1 K6 a! S- t        // API functions
& @+ {0 f* |. B2 c        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
. ]+ ~8 @7 G% ?8 N8 l        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
  c* w: Q$ m- d5 `$ `- ]- C        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


) T6 P9 H% _: b# D7 [        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
4 F# g) m* H4 ?  \6 H        TGetIfEntry                                m_pfGetIfEntry;
' t! E# Q/ M4 `! H3 W
) k; D! W6 n$ m: B+ v: J
7 ?$ i0 A; ^% p5 u+ D& \" ^) {        static FinderPointer CreateFinderInstance();
: C5 N4 w8 q; F6 e( u0 e( R        struct FindDevice : std::unary_function< DevicePointer, bool >
# Y8 J- M+ ?# U        {
6 B" l- q5 c% r5 J4 t, ^                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
/ B; y3 ^1 A+ }                {
                        CComBSTR deviceName;
4 g: x) H, @( o& I) M4 {                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

' v- S/ o: k! K; W
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
! i0 Q: A6 u: S. ~3 u        };
% E. l( q5 n+ U0 R& K       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
. P/ q* k  [2 f        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
5 x- Q9 N3 k3 i) ~        void        DeleteExistingPortMappings(ServicePointer pService);
& j1 _+ M) |( E9 e! M        void        CreatePortMappings(ServicePointer pService);
" P& }' M1 A) m- s  }4 _        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
) f3 [7 Y1 v8 \( G        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
' N/ m; C/ \, h8 V: y                LPCTSTR pszInArgString, CString& strResult);
0 I7 R1 \8 D- t0 [$ b2 a# Q        void        StopUPnPService();

3 l8 s1 D5 m$ t9 e
( h6 I4 X# e$ W# Y% L& B" m7 B        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
- ]4 V) H& a% D, \8 `' h        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
7 z  }+ e+ e# j        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
: P- h5 t+ H, P4 a        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
! t- X' A1 o8 S% I

0 x" H* X" K) S! J  g5 S7 [5 i, n// Private members
3 t. h( O9 O% ^3 p  k* eprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
0 f$ O5 R% Y! p        std::vector< ServicePointer > m_pServices;
. I- f$ G& d  G. d        FinderPointer                        m_pDeviceFinder;
. O5 @. \# m0 d- L9 K1 T        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
- h: J; }6 E- B8 G+ T5 Y. [( s* ?- ^

% x$ n4 [5 K+ f& W1 V6 W        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
+ E2 s% u* a) Y8 t        bool        m_bPortIsFree;
8 l# }5 E( W5 b; E- _* s3 U        CString m_sLocalIP;
        CString m_sExternalIP;
! C( j2 X3 X* k# L2 L        bool        m_bADSL;                // Is the device ADSL?
. Z- G# m" C( \7 T8 ]9 N5 _$ e) V        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
; i: o5 c+ ]- B" E: Z+ P        bool        m_bInited;
7 U9 n2 v4 m( {        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
6 x, r0 e3 X2 ^; g0 k        bool        m_bServiceStartedByEmule;
% }  I9 i0 T9 E4 o        bool        m_bDisableWANIPSetup;
- X& _( }7 {: Q9 O        bool        m_bDisableWANPPPSetup;
' C5 x2 W  H) U8 s7 T
+ p3 H3 X4 T7 [2 Q1 v! M; \& l
};
6 n2 C, y2 z: u, Q9 G% t

// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
/ B" x) R! V1 V: D  f- |! [, g0 S{
+ P. O: [( F2 U4 @& u- n8 |( Q$ Qpublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
9 [6 Y% M( Z, h. v9 G        { m_lRefCount = 0; }
/ u/ Q& @/ e' ]* i; e

. G( ?3 @  o% `' p- g1 K" I/ E$ `   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
/ S8 l, n' j. b4 Y7 C5 ?
% ?! {7 D5 A  m) }: p# g
// implementation
( N  }; y  j& S; ~" {' Xprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
7 i* C$ |7 [: t" d6 x8 T4 Y        HRESULT __stdcall SearchComplete(LONG nFindData);
, M, j, Z( m. \0 H4 n" }" y8 }
: z. J: o" p6 N/ O. t! ~
private:
) c4 b% j' z6 d# T# ]# Q6 G$ B/ t) z        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
& p% u$ j) n* ~# `3 N" C};

/ w/ y1 o: b* ~  l; G. d
: T9 R$ k0 b$ O9 D  m// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
$ z% J' A! O, G  F8 v0 g{
public:
; \; J1 g' J1 k        CServiceCallback(CUPnPImplWinServ& instance)
  F7 @" {9 R9 }5 P$ @8 P                : m_instance( instance )
        { m_lRefCount = 0; }
   
' F! Q6 v( x) f2 f0 q$ y   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
( J6 L/ S5 Y8 m' A# Q, b   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

2 T( ?! b$ s* O7 H; q1 h
6 l7 o7 r0 M8 D" y// implementation
' K% D+ d( u8 W7 Iprivate:
# |* c4 a5 m/ J3 I& N; v        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
! f! u; p" m6 _" r0 ~. T4 g        CUPnPImplWinServ& m_instance;
2 W: a" r$ v! g% l: F$ c& R8 n6 s6 d        LONG m_lRefCount;
};
2 n- C2 L* D4 u) u0 @% p8 ^( E
; t; b! `7 P9 C8 B/ _* b  R
9 B& W- H, B: b2 }- S4 O. k/////////////////////////////////////////////////


. z! m2 F8 p3 Y, C使用时只需要使用抽象类的接口。
( b; a4 s7 A5 R* W' P- `9 rCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
& g0 D& ]' K9 b/ @# uCUPnPImpl::DeletePorts删除端口映射.