UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   % `, p6 f, h$ h+ t* y$ ?
3. 
   
4. #pragma   once
   
5. 
   7 X% p3 n, T1 x/ _! Z; M
6. typedef   unsigned   long   ulong;
   ! c& l9 a8 ?3 o- M" G
7. 
   ; J; r* ~. J0 T7 B
8. class   MyUPnP
   
9. {
   - \& Z) h( @, D  U+ b
10. public:
    
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    - Z5 d/ y0 y+ D
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
    % J5 m9 R& W7 i# o! i/ `
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    4 ^+ H  j' k: n6 g8 z2 F
18. 
    3 c4 D& e& P( _6 X% H9 [% P
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    ( ~) N2 K& C2 `) L% L1 b
23. 
    
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    ( k- G; Q# h* [
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    1 `$ E2 _( K" n- l* V9 K( f# E! R
30. 
      _# _& q- q2 K# t9 r! c% M- P" p$ _
31. MyUPnP();
    
32. ~MyUPnP();
    % \% M$ ?: m( t% t
33. 
    * k' _% {- @0 L' P, A" ~
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    6 L: Z+ t1 `: [
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    + q! v5 {* x5 o+ e
40. WORD GetLocalIP();
    ' n& m9 ?: F2 V) {4 n. o$ O, T: D
41. bool IsLANIP(WORD   nIP);
    : a4 ^  ^7 d" d4 r  X! W! {
42. 
    1 I* w4 x4 K- q1 t0 z
43. protected:
    ; n- r6 i  ~/ u9 |9 K  @# e) j: }2 @8 K
44. void InitLocalIP();
    5 x3 I. ~) ]3 t( i4 x
45. void SetLastError(CString   error);
    # c1 o4 P' p% i8 m
46. 
    # n8 z6 x, l/ q: A
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    : ]+ E* d. D" w$ f
49. bool   deletePortmap(int   eport,   const   CString&   type);
    . H& t% Z) T, @/ a8 s5 v. r
50. 
    8 W( t2 t: X. R
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    ( M2 S/ \9 S' u; D2 ]2 m
52. 
    % I8 |/ Q+ ?6 G
53. bool Search(int   version=1);
    
54. bool GetDescription();
    $ U+ v) G7 o& L' h/ h% x
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());}
    : r: v1 b# _. }
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    ! ^1 N" p5 ~; a$ [1 \
61. CString m_name;
    , T; f( f' G. [6 P& m
62. CString m_description;
    
63. CString m_baseurl;
    8 x+ c: a* X+ F2 ?
64. CString m_controlurl;
    " C3 M; w. _+ X- _  \
65. CString m_friendlyname;
    ) y4 y6 L' B! f
66. CString m_modelname;
    
67. int m_version;
    
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    2 K+ H5 t! j) M1 z  q9 r5 [2 t
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    3 q4 @0 L( B6 Z8 |* O
75. 
    7 Q$ A5 P* q. v! j: [. X0 a
76. bool isSearched;
    
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   * L* M2 G! F, E) D' ~7 Y9 ]
2. #include   "stdafx.h "
   , h+ s& y- m2 o
3. 
   $ w1 _. I6 d# W
4. #include   "upnp.h "
   
5. 
   5 l9 F& |/ i3 P2 G( a1 @
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   - x& F$ O; j& x2 n/ v4 [# e# S; w
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    # Q) K8 {: `" i  X4 l
13. static   const   int UPNPPORT   =   1900;
    $ f, Z: n/ h4 ~9 S) z! z; t
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    
19. 
    8 B7 e- N# R1 v: }
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    
23. }
    0 \( Y# n& q% {- w* y
24. 
    1 t, U% Y3 E6 Y" Y3 }8 u3 c
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    0 R4 \6 N. Y* L1 L+ ]+ k& g
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    # d# @4 R6 P3 f1 w  c
31. {
    ( q" h: w) r. B" a
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    6 o  |+ w# ?: \
33. }
    1 @! [7 W% c+ ]! x7 `% G& K3 v9 w: O
34. 
    : J0 h; |! ]6 `
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    7 E* r& F+ H, m7 j* g
37. char   buffer[10240];
    5 X1 p2 e; c7 J
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    4 r5 {) w& F5 q: L* @
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    ! n  @4 s. X1 |( _) v* A  }& ?
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    4 g, J6 }! A2 m7 Y7 V$ }! u4 j; o! U
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    ' [3 o4 f  N2 M, Y
46. sockaddr.sin_family   =   AF_INET;
    ! h1 |+ T7 o2 x7 w% ]" o
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    
50. u_long   lv   =   1;
    
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);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    4 m1 W" Q3 `  [8 S4 }9 r
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    7 F' E! i( g. L) }7 R( ^
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    4 u. k$ Z7 L! u2 X0 M
63. return   true;
    & l& X+ s5 C. T* e: n* V6 R
64. }
    , u+ G# k) R4 v8 |) h7 h7 A& |4 [+ J
65. 
    9 |/ w& J+ W7 F1 z1 _, o% Z* F# x
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    9 m9 R% ?5 m! z! f) v5 t
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
      T% X& B* L# S% y$ L2 X) x
71. int   length   =   sa.GetLength();
    . \3 w, ]) }2 ?3 M
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    1 e! m+ h. r& z- v8 k( |
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;
    ( d1 s( p% s) i  ^! m0 }
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    : u% U% s9 v5 {. d  m; X5 w
82. 
    " c8 I4 [! y  _- l7 f, ~# a/ d
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    % K5 A' u" y; [" |& L* I6 a
84. {
    & U+ J6 b% Z7 v" L5 a3 l% c& k
85. int   pos   =   0;
    6 S& _  d+ H3 Y. @3 G
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    # h% C! g5 b4 m6 A6 M2 [$ j
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    % }, z) h5 y+ G
91. 
    
92. pos   =   0;
      |2 `/ g. @5 B4 q( Z3 v
93. status.Tokenize(_T( "   "),   pos);
    9 x/ @0 q! t0 V4 y
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    
96. return   true;
    
97. }
    , c* J- M- k) R7 x% J
98. 
    % w9 g" T! V: f- D4 ^! X- u7 P
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    6 y. H5 }6 U% c" r, C
100. {
     % p0 v- v) q8 }% H8 F
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     - K0 ~2 k$ i( f  ~* d4 [
104. 
     % m3 o9 g- D/ Y8 g2 R
105. int   posStart   =   all.Find(startTag);
     . I  u9 t5 y5 O$ ]* r$ R5 ~
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     $ g1 C* b% m) ]1 U
109. if   (posStart> =posEnd)   return   CString();
     8 w* v* `; o$ u# A) O5 Y+ e
110. 
       \7 z* G+ i1 z+ {1 o7 L7 m
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     / Y* @, A' T* Z' f% E
112. }
     $ {1 J; w  ]2 |/ K4 j3 L
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
       O- S+ R1 [6 h5 j! k4 Y
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     4 J- A; q+ u8 p( K+ Z- g: _* y
122. {
     
123. UPNPNAT_MAPPING   search;
     + {% g4 n9 D" A5 q4 g! R6 y5 C
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     ( c' p, l# V# H/ |
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     1 w; V" b+ M' U8 A+ A5 u) F1 N$ M; t
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     $ @$ h# V8 Z% q) ]* z
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     5 a3 H* S& \- J8 h  U* @
138. 
     ; i9 c, z. V0 \, A
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     8 t. E% P. i+ W, Y
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     * O$ f2 E; D) b! M5 ?8 o# C% m
145. 
     : }3 s( e! \: F# d% E' M
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     ' {: [( @+ L3 B& x
147. u_long   lv   =   1;
     " C- D1 B) q  \" q! }
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     
150. int   rlen   =   0;
     9 W" V( _/ k1 O% ?& |) p
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
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);
     
155. CString   request;
     6 h2 f8 M- r) O* {
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);
     " f! a5 q2 \  J5 \5 Z7 Q7 |
159. }
     + m0 O& c1 f. [0 }
160. }
     ; x' p& I' L. C$ E0 ?* p2 `
161. 
       D0 O) V  M6 J/ F
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     ' k5 [) D' T: S/ e' J! _
167. closesocket(s);
     
168. 
     8 {8 A1 K2 j( M5 c4 N& @
169. CString   response   =   CString(CStringA(buffer,   rlen));
     8 W' N) B0 h1 [8 o; A6 c, J
170. CString   result;
     7 a% ?( c- W8 F3 q' i/ M% Q
171. if   (!parseHTTPResponse(response,   result))   return   false;
     6 k1 d4 f/ ^3 F
172. 
     + l" }7 q, z' H/ \8 F
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);
     5 B) J4 W" w% H7 L% y+ Z
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     9 w: y3 A* h% t+ d( M. H0 {
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: "))   {
     4 J0 D: G# V7 _5 e$ O  N4 n
182. line.Delete(0,   9);
     
183. m_description   =   line;
     ( ?( g6 P3 H3 u5 Y, {: {8 }
184. m_description.Trim();
     
185. return   GetDescription();
     $ `. |# ?( j: S- S
186. }
     
187. }
     + {8 Q! }. C3 `- T
188. }
     
189. }
     0 }. S. j1 t3 W5 ?0 F) z8 }
190. }
     
191. closesocket(s);
     2 g7 h* b( H9 L+ [0 F+ h5 k& N6 T
192. 
     
193. return   false;
     , w- P) z4 |. k& H* b
194. }
     

复制代码

天云上人

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


///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
$ P# q8 m  M$ ^& C& ^* U! E4 U/ v

1 ?* W# I) r& B4 F#pragma once
6 E5 f! U* s9 i* g0 k#include <exception>
0 w# M) k! }, ~; M
; D' @" _0 m; q' p. @4 u
  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
; A( T6 J6 l! i- _! A) L$ U5 @        TRIS_TRUE
$ a' J! V# e- r+ k4 ?0 n};


1 j! s* H  F$ u9 }- Menum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
4 H- V+ Q+ e0 g  J, [( a- b* \        UPNP_IMPL_NONE /*last*/
0 D9 V; R' I5 I# E, O% m/ E};


; L( V0 a! X. v3 [* e5 O
& H9 d! W8 e& Q( Q! x6 q9 y& }
- Q! N3 a' h! _' [( G* S0 cclass CUPnPImpl
{
public:
        CUPnPImpl();
        virtual ~CUPnPImpl();
! V& w( f+ u+ s+ s, U6 G2 Q        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
                UPNP_FAILED,
                UPNP_TIMEOUT
        };
* ?/ J2 d+ i' D" `2 u
" W2 s" n/ D( K: X( N
6 V! t4 c5 O5 }( ~        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
6 K% {2 Q2 N; `. J        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

9 Q' ]0 L1 W. O* v% L) r; g+ h7 \
        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

. |. q, o, i- y; k
// Implementation
  \: t$ B, s* Xprotected:
& D- x/ G  v7 T' W        volatile TRISTATE        m_bUPnPPortsForwarded;
! f+ E- {( d1 `# O3 d        void                                SendResultMessage();
        uint16                                m_nUDPPort;
7 B) Z& p5 d2 w. i9 s; @9 ?        uint16                                m_nTCPPort;
) l6 S  ]8 w( p, U0 K1 B        uint16                                m_nTCPWebPort;
8 D- x  i, p7 q: W. r( X( ^# H        bool                                m_bCheckAndRefresh;
$ L( ~3 g$ Q; R& y

private:
        HWND        m_hResultMessageWindow;
1 _, d* d# V) `) O, X5 z( \        UINT        m_nResultMessageID;
' q% Q; n0 _6 a. W. P6 }3 v

/ {8 Z2 W9 }; Z, d* [, E};

" w6 m* }* e5 b4 h4 g! _7 C  B
// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
# t  d. E! \: i" C{
: L; d  Y" _6 Z3 R. s/ m6 gpublic:
1 C6 S- Z  [8 i% ^0 v        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
- q+ ?8 Z& K  S% c        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
5 U2 l$ Y3 N- |. V! W4 J  u        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
: J& m' T$ ^1 x};
* \; Y& S" K- p0 r9 e
- `; ^7 e* J8 p$ B
' C) i8 l- b) C1 `" r- d+ C. A- {2 y/////////////////////////////////////
1 l% Z4 F* k/ y+ p* m( Y* m$ C4 S//下面是使用windows操作系统自带的UPNP功能的子类

3 k9 \* S# E2 R. |
. r' m) Z. }; L  Y4 L0 ~! Z9 h#pragma once
#pragma warning( disable: 4355 )
" P+ c/ f5 I' c
5 Y4 N* ]2 ^0 q# D
- e% Z8 Q/ _2 n$ ]! z5 Y#include "UPnPImpl.h"
( W. s( ?% h+ `3 ]4 d# h#include <upnp.h>
0 o* u: ?0 R# C+ }( K  r#include <iphlpapi.h>
#include <comdef.h>
+ U$ c) Z0 t  I3 J: s/ \5 k! G3 [#include <winsvc.h>
! x. U7 ~$ q4 s1 a+ b9 r
+ K2 D; J8 b. j4 Y9 M% O) D: ?
4 Z1 ~$ ]" G+ Q#include <vector>
  b+ B$ [1 a$ ]2 {#include <exception>
* x" }# l/ d9 [; j. ?#include <functional>

( W" \' f5 p8 j, Q5 G
" k+ r( r5 r# ~4 @
2 w& t. N/ O8 H1 P6 i
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
typedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
% j7 q% m- \) ^6 Htypedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
+ P1 A* K# g- H( Dtypedef        _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;
& F) ^/ G6 V( ^( e) s
. k% o, {  x: t& z2 k
2 ^' h3 U' I; M( Xtypedef DWORD (WINAPI* TGetBestInterface) (
6 a6 }( ~) K) V6 A# Y- z1 Q  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);
$ ~7 o7 ?$ ]3 o/ D6 l' M

typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
7 J1 v0 p3 E! O( ]9 K  i( p& ~* I  BOOL bOrder
);

4 l1 E% I( u6 J
typedef DWORD (WINAPI* TGetIfEntry) (
+ o; ~5 p# l$ l- o) _; P  PMIB_IFROW pIfRow
);
* z7 z# M$ t, u  ?; D0 {8 R

, j6 q, e: U' r. c% J! p! H- vCString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);


6 U8 c! B! S2 Eclass CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
public:
5 d- V; w7 t3 ^1 _) e        virtual ~CUPnPImplWinServ();
9 N/ n) A" j6 }5 v3 G" B2 N: {' t# Q$ `4 r        CUPnPImplWinServ();
% @8 Z+ \8 l6 J" z$ K, P8 _& I
  G: G1 r9 `! D. h
$ P# S- p  ?! B2 e# H6 P        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
0 n0 l4 d4 D6 ~        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }


        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
% R$ M# f, X+ }) `        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
, k% n; j+ X% T4 P( R5 U1 E

protected:
$ O1 W/ R- U2 l4 B        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
% k3 q2 C3 P( [& y        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();
& ]* T( J1 B/ P4 d: c/ c/ @

        inline bool IsAsyncFindRunning()
        {
1 k0 c" Y- o- M6 C, u3 L                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
  L" `# `( j3 l( O                        m_bAsyncFindRunning = false;
                }
1 b3 ~9 o  K. E' I1 i/ V  g                MSG msg;
. p3 b5 @5 e2 w6 {. r7 y                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
  x6 |* Q. R% v' w! G/ T                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
' T* s" x' D* [8 c        }

/ d: _% Z% V2 U- O, Z( u& h9 R+ s
        TRISTATE                        m_bUPnPDeviceConnected;
  u0 ~3 K/ W. z1 T; D
  Q* N1 A/ c  I( A; h" n: e
) f, K5 G7 G0 z// Implementation
. h- l3 T& U2 o% r2 h: j2 j! B        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
4 N: N2 h* f% q0 G        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
7 W7 ?" H3 o: w$ Z: B0 U
+ l0 l; g" a# D  v. c% v3 d9 F
        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
' \0 }6 a# N8 d. F        TGetIfEntry                                m_pfGetIfEntry;

9 q8 w7 e8 U* G, {
' `$ `; |8 i/ F3 r        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
# U' e" z4 _# V                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

+ n+ t8 I' X# T( k
6 B" Y- I# R; r, q3 r                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;


                        return wcscmp( deviceName.m_str, m_udn ) == 0;
; ], _2 b% o% K( N3 b) s                }
                CComBSTR m_udn;
        };
  r  c, q7 L1 d8 v3 m" t* j       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
2 ^" n: M3 ]# _  {5 r        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
( H6 [$ ^; t+ B8 @- E        void        DeleteExistingPortMappings(ServicePointer pService);
0 T! s8 L9 \. [0 Q        void        CreatePortMappings(ServicePointer pService);
6 `* S9 C: W. I) D        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
* `% P/ {& Z( f! z) V+ a, h        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
7 F* A6 U' Y* X

. D( z0 D$ \0 w0 B( G6 L/ o3 l* v        // Utility functions
$ v9 a" U% N( s7 \; u. G        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);
/ A. O* W( Y% x, L8 F3 X4 p        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
5 i# j6 `+ W8 E, X        CString        GetLocalRoutableIP(ServicePointer pService);


// Private members
( Q% x+ P/ F/ O% [' z- Z% S( k+ R$ \. k# lprivate:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
3 g# Y# ?; \. K$ Z! i        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
1 f% E+ |9 f1 v7 l7 J$ w2 y8 l        ServiceCallback                        m_pServiceCallback;

6 f9 ]- d% ~1 {; ]/ j' k
' N) |- n7 _4 _8 i; Y. F3 F# U% \6 j        LONG        m_nAsyncFindHandle;
% s% t- a, d; X        bool        m_bCOM;
9 J! p  h. h" o- Z$ Q        bool        m_bPortIsFree;
% k/ u+ w+ N4 E  K+ M        CString m_sLocalIP;
, H4 k9 Q# O0 j+ }. q4 A& }! M% U        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
/ l1 }# `) C( G$ ?- o: P' ?# j        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
% k( W0 A! @' U8 E1 ?& ~8 o        bool        m_bAsyncFindRunning;
# ?. M3 L: v5 B7 Z6 _+ E- v        HMODULE m_hADVAPI32_DLL;
" ~* Y( Z4 i, ~8 u: F% n        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
! h3 K% D3 b8 P6 N( |' ?

: D1 F0 z) O. C6 O5 T8 y};


// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
4 ?: [. U( J$ @, A3 F8 O{
: K4 l1 A) S$ X0 U  `: Xpublic:
7 O, W# k; g7 b        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
$ X: I* w# X7 X% ?        { m_lRefCount = 0; }


) W% ~" L7 n- P5 R5 M/ ^2 s   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

( o7 ~5 V) f2 g1 I0 F
  a# J) [- Q* i6 ]& o- t* M// implementation
3 I- j; e" \3 w  C0 Eprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
1 P) j4 Q2 k4 [% N4 `        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
: F7 F! z5 P5 [  s* @        HRESULT __stdcall SearchComplete(LONG nFindData);

+ r4 g* r4 T- N6 {8 F4 E
/ j) z  r3 i8 X$ N" E5 s- P- aprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
# k& r$ R4 L" m/ M) C};
% F, k) J. u/ m& f" l4 X

9 U3 V( m" P# Q- z, N// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
0 u4 T* T5 |& ~; h- m{
/ O2 ]+ Q+ P; X9 M8 r; _, y# Rpublic:
6 v5 j% {; S# N7 [" M0 J& o7 T        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
8 X. a% r6 i: T; ~        { m_lRefCount = 0; }
5 N$ Y, q1 x' \, l. {/ i   
2 V' j# @2 F9 v( X* h1 i8 q+ r   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
2 u( E- j1 [3 \5 o' i   STDMETHODIMP_(ULONG) Release();
& \" G1 |/ x5 M1 o8 R
6 T; _/ j2 @, w5 D% v/ [2 _
7 F) v! [: X2 c2 `6 [// implementation
private:
" D; s6 _/ X6 R" T        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
2 N, Y3 v- g* b) S1 Y        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
  `0 i! E6 B3 W# h" `3 j1 c
, s9 K' S+ Y$ N2 t5 }. G
private:
+ H" e) |& ?) _* `) T' ^" w2 v        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
" h: y3 l9 j9 q6 \4 [; b  f3 n# {0 i};
+ i, D1 u  n2 v) @

/////////////////////////////////////////////////
2 F6 K% e: n* M' u. o2 F

使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
  r" f4 W8 X! X) uCUPnPImpl::StopAsyncFind停止设备查找.
2 n: Q) F' R' N) u1 i( |CUPnPImpl::DeletePorts删除端口映射.