UPnP

天云上人

/*uPnP.h*/

1. 
   7 u9 H7 O/ R/ ]7 n1 q! x8 ]* _1 J; w# `
2. #ifndef   MYUPNP_H_
   
3. 
   2 e3 Q' {, s  S: \& U, ~
4. #pragma   once
   
5. 
   5 ~; l9 C% y% T" x4 a
6. typedef   unsigned   long   ulong;
   
7. 
   ( \: d( B; d: e* i
8. class   MyUPnP
   
9. {
   $ L8 v0 e' K0 Z' d
10. public:
    
11. typedef   enum{
    ) b# Q& p' ^6 x7 ^4 E
12. UNAT_OK, //   Successfull
    
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    ' l' y" D# f7 f" F* T
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
    
17. }   UPNPNAT_RETURN;
    ) X% Z; N+ P0 e7 ^+ x3 F
18. 
    
19. typedef   enum{
    7 W# B6 S* Z, H
20. UNAT_TCP, //   TCP   Protocol
    4 @3 G* p: ~# y) _/ Y- J! h$ _
21. UNAT_UDP //   UDP   Protocol
    2 e. Z; u* w- j# {0 u5 z' N
22. }   UPNPNAT_PROTOCOL;
    ) B7 C2 R! u! x2 _& N) V" I
23. 
    
24. typedef   struct{
    ' N! O, v! x& i
25. WORD   internalPort; //   Port   mapping   internal   port
    " _- q  W/ n+ o1 u
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    # t9 o0 R& b' F, k: ?. a
28. CString   description; //   Port   mapping   description
      U( l6 x6 f" G5 l( R' }+ i4 n. N
29. }   UPNPNAT_MAPPING;
    2 r& ^& A7 S$ Z# }$ J( T
30. 
    * ?. W/ w. D' _( f* l
31. MyUPnP();
    
32. ~MyUPnP();
    2 a: e# ^7 f" G/ K; @
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    5 {7 J: ?, I0 \: L- q4 G' a9 g% X
36. void   clearNATPortMapping();
    
37. 
    4 ]7 d* I1 [' y# }0 [. X
38. CString GetLastError();
    ! k- {! o: a+ L1 a
39. CString GetLocalIPStr();
    ( @5 H5 p! [' ]* m: B! n
40. WORD GetLocalIP();
    - N9 a/ {& k5 @0 S
41. bool IsLANIP(WORD   nIP);
    6 U; f8 A, h. k  _' g0 L" n+ ^$ y
42. 
    
43. protected:
    # h% H  F7 f: {; g! e
44. void InitLocalIP();
    . L+ N: w  R: ^7 `/ v
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    + I8 n# T5 m, w. j" `6 ]- n
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    , T3 V- q6 ~$ N) t
54. bool GetDescription();
    1 e: }8 _+ R, [! v
55. CString GetProperty(const   CString&   name,   CString&   response);
    9 B- M" ]6 r* l' w" d3 r
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    $ A. ~( I$ I) k/ s
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    ' v* o. ^* P4 z. H" ~% M
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    3 y/ Y) b6 v  g: Y/ t0 c2 C1 h
66. CString m_modelname;
    
67. int m_version;
    : M$ p- j& D: T% Z  J
68. 
    ' [3 ?' A9 Z$ h6 B% k' V( x
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    1 ]/ b1 I+ G# Z; M1 M2 C
72. CString m_slocalIP;
    
73. CString m_slastError;
    & f9 D4 u6 L, a2 l  g- i
74. WORD m_uLocalIP;
    " S5 X1 y) E3 g# {) c
75. 
    4 s: ~# I( Q, ?8 ]2 E" w$ g" D
76. bool isSearched;
    * o9 P) y" {+ k# {/ S$ [5 e
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   7 _5 P0 `$ [- A' f
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   7 U1 M  ~/ T6 s
5. 
   3 e  Q$ D. l. |7 C- V1 f' ?
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   , ]  u) T5 y7 \( X. P( W, l6 v
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   3 |9 I% L  Z2 x9 Z( i& M& ?) s
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    * V- C4 d+ S4 Q% q- c% T
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    ' t8 ~( W* }$ j+ Q7 O6 y0 F
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    6 h" Z, ?  x& d/ D/ @
17. {
    ) T" ]8 ]2 ]3 ]% `
18. CString   s;
    " w5 D( f; A% G# s+ K: I1 x
19. 
    $ c3 b0 }1 E  `+ p
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    ! \9 I+ l7 |' c/ }# a  `5 E
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    ; X, n2 B6 b7 ]$ g
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    9 F; l/ h: q1 H. g/ y
28. }
    % F" b. r- U  @$ a- u
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    * F" W( w9 j( ?. y9 \+ v
33. }
    1 b( q: H7 y: J7 \, a
34. 
    ( s1 w5 }$ l% e
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    8 I; ]$ I6 ]: }! g
38. 
    
39. const   CStringA   sa(request);
    % ?( y/ E% Y6 h+ `
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    4 A) ?( w- P" S4 r- q
42. 
    ; Z' q! Y% f0 }6 L4 B8 H1 L+ I$ K
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    0 F& R$ X1 i3 A- y# F9 c, [
47. sockaddr.sin_port   =   htons(port);
    ) V$ q$ I- R( J' e4 ?
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    % ?' [4 M+ l" \
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    , X$ I6 I8 n# C' z9 S  _7 H1 }& T
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    2 }' J* j+ }; E5 n
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    
59. if   (!rlen)   return   false;
    0 b) H) V( ?# c, |6 c! x$ M" M
60. 
    % [; f& R; f5 W$ W' L
61. response   =   CString(CStringA(buffer,   rlen));
    # D0 X4 y- D2 x
62. 
    
63. return   true;
    
64. }
    7 L# D( [% ^2 [4 q
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    + s8 N, Z0 ]6 n. |& y: V
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    7 j% ?6 y! H! a! V) e3 ~" S( C  W
71. int   length   =   sa.GetLength();
    4 f3 t# k- h& T& v" R
72. strcpy(buffer,   (const   char*)sa);
    ; g; ]: u# A. K1 N; ~
73. 
    0 ?  }! K" C" `! S7 o( U$ P. H
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    7 x: r0 F* y- o* Z4 q; w
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    , v. E$ y: H/ Y
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    5 u, W. |# _" W2 m7 v- y
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    / t7 A2 Q. w9 L/ \/ S
82. 
    ) Y) I1 n: |. Z% A
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    
85. int   pos   =   0;
    6 _9 X2 O0 z8 k& i( ]
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    : [" P0 e- l' W* R, h
88. 
    ) d8 ]9 i3 S$ h) K% W
89. result   =   response;
    5 h: _2 m7 O4 ~) A; V3 M0 A, S
90. result.Delete(0,   pos);
    
91. 
    - [4 P: N$ A1 }9 d3 L9 s% H
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    5 p' i( {! z, }/ V
94. status   =   status.Tokenize(_T( "   "),   pos);
    ; d2 @) |' U3 @7 @5 l
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    . L" W6 Q3 w  X' [  z
97. }
    
98. 
    ; q& m/ y8 ?+ L2 n, C
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    , p, B) @2 J+ n' Q
100. {
     8 y# h# c* w1 L  U
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     6 p, ~+ p2 t5 N$ x. A* {
103. CString   property;
     
104. 
     5 J) M2 m6 @/ \  t5 c
105. int   posStart   =   all.Find(startTag);
       w7 _9 B# C1 Q% t, H! T
106. if   (posStart <0)   return   CString();
     
107. 
     - E3 o1 b; @$ {! u# ^
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());
     
112. }
     
113. 
     1 D* t% `( v6 q6 H* h. I- b
114. MyUPnP::MyUPnP()
     1 E+ x3 F2 p' B
115. :   m_version(1)
     " x+ }( q. v* N/ R* U" v0 x2 h
116. {
     ( z; R6 X( V  ^! E' A( Q1 X
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     " H. b9 x/ e* _; |  b- P
119. }
     
120. 
     / D4 q& z* m1 y& {4 @' R8 n
121. MyUPnP::~MyUPnP()
     
122. {
     * h& H# W7 Y6 g) V' a$ V# K$ `
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     * y% B1 {+ D3 i) M, T: C5 A
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     8 V2 {- {8 U# a  S
127. RemoveNATPortMapping(search,   false);
     
128. }
     , ?9 |( r; p: p: z# h
129. 
     7 E7 a5 [8 T' w2 w0 r
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     3 X  I7 M# H/ c$ D- c
133. 
     ( s6 x& v4 a+ {" H6 @
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     , e  D  ?& ^3 i3 c+ S3 i% z: C/ G
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     6 Y( c9 k6 w5 s' C2 V( Y1 C
141. {UPNPPORTMAP1,   _T( "service ")},
     ! i. c* b4 X6 X  g1 F5 _& h
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     / P6 x) _+ v5 A! c' O9 u) b0 v
145. 
     * M; T, _9 d# X" C3 {
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     5 y1 Y- L3 C* g! @) q7 u  c
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     ! q8 w- Y- Y  e
150. int   rlen   =   0;
     + G; k6 v) a8 s  r/ }5 R
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     5 G# d" u/ e( h
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     9 ]1 S+ l  F5 o' M3 z
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 "),
     2 K; n' `  J  w
157. 6,   m_name);
     : z6 k* J: j& a" v4 C5 ~$ y
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     1 K5 t8 G3 N7 H6 N8 q
160. }
     
161. 
     + U/ ^+ h3 y' X6 \" u7 o+ c; k/ ~& X
162. Sleep(10);
     - S  s5 ?/ x/ Q  \
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     8 }; N2 u' p9 G" h' R) _0 m  a5 B
166. if   (rlen   <=   0)   continue;
     # I) S" R( \( c8 n0 N- S; t: m
167. closesocket(s);
     
168. 
     3 @* d3 m, s" s! Z
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     ' e- k8 C9 R/ K: G- r' a3 d
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     / g5 M9 N( ?3 q+ t  W
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     4 k: n; c: h: {, u! x$ C( N
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     % o  ^) y# H2 n3 L7 b5 D2 D
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     8 v& u2 h2 W: I
181. if   (name   ==   _T( "LOCATION: "))   {
     5 j7 y9 {3 F  D/ n; j
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     : c% N" N8 ]' O3 S$ }& a/ Z
185. return   GetDescription();
     
186. }
     
187. }
     ! }# F2 H! i$ k0 D
188. }
     . I/ B) s2 {9 Y/ x3 ]" S
189. }
     
190. }
     - U' V" [# ?, V! g9 _8 H: U7 m
191. closesocket(s);
     
192. 
     / O$ h' m5 x5 q! Z: t
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，


///////////////////////////////////////////
% N6 n7 K3 h# P7 O//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
  ?! O6 v# p' S

) T+ G7 m5 h5 {#pragma once
#include <exception>

& L0 B2 N( @- ?8 b- h- `) |
  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
};
4 Q+ C8 x7 ^- N) }# P7 W; @

enum UPNP_IMPLEMENTATION{
: P9 c: ?3 |2 m- m2 u        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
3 u/ \) e4 ]3 H; @, G        UPNP_IMPL_NONE /*last*/
};


4 S* B6 e* l3 u* {) R
& A5 C1 R- J. V; H
- N" c# x! U5 Y/ }class CUPnPImpl
{
5 d+ P" E# A4 r; ppublic:
! A' Q9 S- ]9 z# {, q& D        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
: i' M) D& N* J& s$ x; B        };


( i3 z. x7 U, I# c8 ^8 \' |        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
0 Y1 W1 S, v1 {* L7 ]2 X" m& ]! t        virtual bool        CheckAndRefresh() = 0;
9 d' W5 w/ \  ]9 q9 L. M        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
: N5 S5 x, c* k9 |" F9 E       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

$ O* {' e4 J1 w0 V4 b$ o
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
8 @" A; ~) i5 q5 \; {  H

// Implementation
protected:
2 H# I0 C3 ?5 u  L, G) h        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;

) V( t& F! i" o0 c9 X
private:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;


};

7 E( t3 a5 k2 i
// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
( w5 f) V2 n) i{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
1 e3 ^/ z$ U+ |/ l$ ~- h+ b' Z) r        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
4 W' @8 |6 }2 O- `" _

) a, ?$ ~" Y; M8 B; C9 T3 u7 ]/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类

) E1 i- e% T' @- B8 i/ U1 O8 F
6 s0 D6 O) i+ X# w3 [, ^) f! ?$ B#pragma once
/ i* b# _: u* c. t#pragma warning( disable: 4355 )
+ r, B* H6 c: [% G- |2 ?

8 k4 Q" J: m( @#include "UPnPImpl.h"
8 p3 r/ _  z0 E* I0 w#include <upnp.h>
! z- M- J6 M5 c#include <iphlpapi.h>
6 F" @7 O4 }% J2 w% z0 G5 |7 o#include <comdef.h>
" e2 u4 }8 z, `' X9 C. L#include <winsvc.h>
7 e* j) A* v% M

. r# ~: T& [8 ]% d#include <vector>
#include <exception>
#include <functional>
/ d  W5 O( M6 ]: z* J) V' Q1 {/ H
. ]% p/ T6 D# A
  h4 B/ ?# A  v: q  Y: M2 A, E

typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _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;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
2 ~! X, }% Z' i
8 c5 j  b9 |' e$ Z$ f
  w' M' _* g; W+ y, ^; S! Ktypedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
5 h* |# b, M$ z1 y6 @& m) [  PDWORD pdwBestIfIndex
6 }: E; U5 @5 X# y* _/ e3 z);

4 Q( ]2 Q% p5 I6 b/ ?  m. [& F
typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
4 R8 Q7 i) F5 y  PULONG pdwSize,
  BOOL bOrder
2 g& U$ j) c% P2 U" z);


" H8 g9 U6 L1 X, c7 E3 M- m* ltypedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
, I: u4 |2 K8 E2 R+ L);
' e3 }' S( L* V' @" C, F( x0 g
* p! E4 A6 h1 K5 ^% d4 o* }. t5 v
CString translateUPnPResult(HRESULT hr);
' d! j8 E5 O' v+ X7 d! dHRESULT UPnPMessage(HRESULT hr);
# x: i2 S) u; V7 j$ |
  D9 l- r9 z! {( k. f, g
5 Z% @0 N; ]( J6 K9 Iclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
. C; g- a; R6 v5 L, h0 k! X        friend class CServiceCallback;
, x8 `% y% R4 T4 b) N4 \" V// Construction
/ T, c7 S! G" o+ tpublic:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();

  e+ \# }' v8 |; a5 c
4 P, \$ _1 @; X5 ]7 z) h        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
( S* c# P* w9 J7 H        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
- s* s: K9 h% N1 r

        // 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
" V2 s- M# j3 ~0 E. a1 q4 e' Y        virtual bool        CheckAndRefresh()                                                                                { return false; };
2 J4 S" K+ N% R
. I8 {1 l, e7 m4 u
/ D6 P3 B  m4 y: tprotected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
+ l; H( p- z+ @0 g5 S        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
4 U6 R. {' b) ~! o5 T8 \5 {( n        bool        OnSearchComplete();
        void        Init();


        inline bool IsAsyncFindRunning()
        {
# E! b- V, v4 Q$ ^4 O1 o6 a                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
3 I! ]. e* x  ?0 y; c' b# F! h                {
                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
; ^3 `8 N& ~- G                return m_bAsyncFindRunning;
        }

! T. [4 n4 x% d0 {$ R$ {" S# x
. V# c- K2 e) }( i# h5 |        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
( z( H* C+ Q1 E. I% Z        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
& o) o9 X# y# [( Y7 E; w5 M        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
1 f/ N1 W. N) ~0 P7 ]+ T1 f        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
/ g6 @8 ^4 c# {3 d5 I7 O
" {# k; U5 H6 ]$ F# ]/ |
% O9 J# Z) Y/ M5 x) f4 _        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
5 O/ x3 a0 c+ u$ x! y& [: D6 i- q                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
! v0 b' x9 l; ~) z, T                {
' n+ b6 ~  g2 @3 B4 C                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
# _1 g4 p( D# K% W

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

+ Z, z& A! D5 T, \* Y
4 I+ d3 }8 }1 k* `* {4 O8 r                        return wcscmp( deviceName.m_str, m_udn ) == 0;
; U& V/ m  h( p. Z, G' Q$ m% d                }
                CComBSTR m_udn;
        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
. |1 W4 ~# e! q8 @) q% I: J        HRESULT        GetDeviceServices(DevicePointer pDevice);
- V7 O, `+ g6 Q8 C/ s        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
! y4 W: h) r+ n: V1 u        void        StopUPnPService();
7 f! F$ v7 ?: {( a. i
, \9 L9 a7 K$ O
        // Utility functions
; L" g8 C: }! g/ r0 }' L/ f        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
( }; m- g5 ?+ |# \9 c        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
* r1 G7 L% b/ T5 w3 X        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
& O9 S' i: S9 K" C) @        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
' _3 ]2 s. n+ n% V

0 Q7 ^6 J) l. M& n7 R// Private members
! {, J5 B* G1 Y  A8 `, i6 p! B. ]private:
        DWORD        m_tLastEvent;        // When the last event was received?
' H. o- v$ {7 p. J, _        std::vector< DevicePointer >  m_pDevices;
9 O+ q% {; i7 c        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
% [; B' F, T' O5 g$ i        ServiceCallback                        m_pServiceCallback;

  q( @5 f% a1 x5 Z7 I* t7 E+ o
        LONG        m_nAsyncFindHandle;
, [# L+ U, d3 U7 P$ U" u        bool        m_bCOM;
$ ^% Z1 a$ l3 }) V7 m        bool        m_bPortIsFree;
9 t: Q' e5 X0 D: r$ F7 v        CString m_sLocalIP;
1 H1 e' l. T: b        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
3 k2 e$ T: }$ S0 H- d' o1 z        bool        m_bInited;
* K  i4 w. p. G/ P' D, d- ^        bool        m_bAsyncFindRunning;
4 o/ ^5 L9 ^( J0 ?7 Y7 [" X; M+ U        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
9 h# x7 L" m4 O0 {        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;

) u! `4 [% a% z/ H- q
* |" a2 Q, I: W0 P};
3 I1 s+ E; b" C/ ?, W9 ?. d

// DeviceFinder Callback
9 F# ^+ S9 ]; S+ C3 ]class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
) m! B* S/ U6 P8 Z3 \3 opublic:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
5 N& j1 k, z" N# A" L: c  c        { m_lRefCount = 0; }

; p5 ?" B2 Y9 l, Q$ ~
# k' B$ |% T" d: Q% }; i& p0 D% D$ V   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
- y' J" n0 ?9 I& I- n" @
4 a$ f2 e# e* E; T: x
// implementation
% d+ a! F- ]: e* W9 ^; uprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
  n2 I. L5 t# ]3 C5 K/ [; x& B2 Z        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);


private:
+ J1 n/ t! Z8 t) P+ m+ A        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};

3 ^9 C3 V* U; E9 _7 G
$ x' O9 |3 l: l6 }" _# T# W// Service Callback
0 ~0 a1 l0 `1 W0 Rclass CServiceCallback
+ ]0 \" w$ Y+ {& [        : public IUPnPServiceCallback
% O1 a+ R& K1 ^$ ^{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
0 T% F, D- w) `. H, Y        { m_lRefCount = 0; }
   
8 I) j1 x* t. h9 U" {3 m   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
+ f1 `+ D. B$ h   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
! o4 c; ~7 D/ w8 L$ U6 v) C; c* Y: g

// implementation
7 v4 k; G; M2 M! B) p. Vprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
8 J2 S7 }. L& M' ^4 n+ h" n( M        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
  b4 C5 G" Z& I# V

; b7 J- i7 Z/ ?+ [7 b  [2 Q/ Wprivate:
+ \  M( w" V$ {! x6 R, Y( c        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
) a, R1 M- Q- k8 z1 O
* I9 c, {9 x" i2 x. [
/////////////////////////////////////////////////
- y' Z- c1 R6 J

使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.