UPnP

天云上人

/*uPnP.h*/

1. 
   % A$ e  W; ]% a5 i, x/ {' }: k) f
2. #ifndef   MYUPNP_H_
   0 e( G0 N0 w2 U: n% H6 ?& R6 s
3. 
   
4. #pragma   once
   1 t+ Z" P0 s' A
5. 
   
6. typedef   unsigned   long   ulong;
   0 y4 A: Q  n; o  y
7. 
   / R2 D. L% T& b- _2 E, j" b
8. class   MyUPnP
   
9. {
   
10. public:
    / A5 B) U$ d" D% L0 [  T
11. typedef   enum{
    8 V. \' {, B+ }7 w
12. UNAT_OK, //   Successfull
    & q3 f/ ~1 g: z8 ]/ `' n4 O( j' ~
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
    : P" O8 ^  B7 j4 ]6 Y" f) A$ O
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    . [3 _! \1 [; J
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    - |5 t+ t* b. H; L
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    / Q. u: s7 j8 V9 _, R; z
22. }   UPNPNAT_PROTOCOL;
    : S! ~6 A- G& N2 L2 [% B1 s0 V, S* @& m% A
23. 
    
24. typedef   struct{
    ; J0 Z. O3 ]6 R
25. WORD   internalPort; //   Port   mapping   internal   port
    
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
    7 h( N0 q- t4 I% L- a6 a
29. }   UPNPNAT_MAPPING;
    
30. 
    8 e  _7 B, L8 G
31. MyUPnP();
    0 ]( d* Y2 J: [0 y
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    7 Q) _' v/ O+ ^6 u
36. void   clearNATPortMapping();
    
37. 
    , j3 W1 |( G' @3 U
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    ; ~2 q) L" ]- Y3 o& `, [
41. bool IsLANIP(WORD   nIP);
    4 {% T" p9 g3 E% F1 E/ \
42. 
    * Q2 V$ H4 z+ q  j$ d3 r
43. protected:
    
44. void InitLocalIP();
    6 W+ F# P* z$ H6 k$ o% Y7 u
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    ) ~+ M/ s- s& |. E2 f, L( T7 Y4 I
48.       const   CString&   descri,   const   CString&   type);
    + R% H3 j" J: d  [- Q; x
49. bool   deletePortmap(int   eport,   const   CString&   type);
    ' T. V3 v. q; A2 N" t& d6 {' w
50. 
    : q: X& g" j5 y; ^$ E
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    # Q' r  D' u4 i4 W* K; ?( H
52. 
    : B' q3 e$ A% {7 i! I
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);
    ; O9 w: ^7 j4 A+ Z1 {5 h/ \" p4 m
57. 
    0 u0 ?" ]% z7 k
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    7 J. N1 l+ z! I4 b" G
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    : q3 n: y$ D) F8 v! u6 }
65. CString m_friendlyname;
    ( _. Y+ _( C  r- M
66. CString m_modelname;
    + B8 J8 R$ {8 \8 F! L/ B
67. int m_version;
    
68. 
    
69. private:
    : R5 j! B( h$ {2 d0 d: R2 L
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    8 M# X1 M9 w0 ]
71. 
    6 \7 t+ v4 D8 C0 ~' H
72. CString m_slocalIP;
    ! B2 U3 v" s0 Z% M& B. K
73. CString m_slastError;
    % X# c8 M( S* @  b9 X9 N/ |
74. WORD m_uLocalIP;
    8 a4 \' e' d; Q; h
75. 
    
76. bool isSearched;
    . L* {' D/ @) L
77. };
    3 H2 y# `) m' [1 }; r
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   " l! l' p+ v4 x+ j6 X" L
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   / n( P% K- l6 d" _
5. 
   4 T0 g/ ?' C- p3 H
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   ; h6 D5 e$ m9 U) p! @$ F; `
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   3 i$ |# ]6 l2 O9 i. Z" E! V% ?
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    , q4 g$ H6 s8 k0 O, j! C
11. 
    ( N7 p- H. g% x' O8 x$ o. g
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    & t: D0 c" a4 z# o' \
13. static   const   int UPNPPORT   =   1900;
    ( l- ]; V, }2 T2 K- q: m9 ^0 J
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    & H9 R6 I: ~: z' m
15. 
    ' W: U) L  {6 d0 M8 C" B8 N
16. const   CString   getString(int   i)
    ( ?* E2 r3 l9 a. ]3 h# m1 ?
17. {
    1 Q: a& ~% T- A( s+ Y! K+ @
18. CString   s;
    
19. 
    ' J( @3 h. d: P8 g  h
20. s.Format(_T( "%d "),   i);
    , t& G5 w9 j! D, W8 C% E+ O; q
21. 
    
22. return   s;
    
23. }
    6 l, A8 Q1 J1 w' N6 @
24. 
    4 N$ o3 S$ I" @5 D3 x5 r
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    / X3 h, C* r* b, p3 o# [
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    " v+ k5 }0 x& _3 q4 x
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    7 F/ n( M3 q4 H( r3 |2 `+ E& s: J
33. }
    
34. 
    & F# a$ i. b& k( w$ I/ T
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    " u. E$ V2 O/ }. E  ^9 R- X5 O9 Z
38. 
    # ^. @$ A/ O) c. G  L
39. const   CStringA   sa(request);
    % k% V6 W5 g& u" g) r# p% e* ?
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    % C$ w# @* J( H1 y" U/ _6 X
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    
44. struct   sockaddr_in   sockaddr;
    
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    7 z" v. S4 P8 |% D$ r9 m
47. sockaddr.sin_port   =   htons(port);
      [+ ?. J5 a9 S% O5 A
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    9 l  Z! r; e3 w, _
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ! n1 n1 d6 k& T& g& _. d
50. u_long   lv   =   1;
    4 I" S6 U' k. t  E, R2 t  H8 ]. x
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    . K7 I$ n/ B+ y0 I! A
55. Sleep(100);
    7 F8 D& u0 Z0 ?- C- _0 H! d4 w9 [, d
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    $ v% F& d# }$ \$ k/ S, R' _
57. closesocket(s);
    0 g; n5 [9 v3 F0 K, n5 i# r
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    % W) D/ ~1 ~+ z0 U" H
59. if   (!rlen)   return   false;
    # s- f* l7 I) `+ Q3 R
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    
63. return   true;
    & h" b& [- L  N8 Q0 N$ l2 T
64. }
    
65. 
    / j, E( |, c3 h3 h0 _" H
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    
69. 
    
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    . \4 L7 u4 N6 m8 c* `% L) E! q
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    6 i( W: K( a6 |  n& q
76. sockaddr.sin_family   =   AF_INET;
    / E7 y6 k# O# l: V- W
77. sockaddr.sin_port   =   htons(port);
    5 }- U1 t% r% [+ }6 n( t+ F
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    / c& b/ Y8 {$ [; p6 W" p
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    * R5 D% S" |: n& f; X
84. {
    
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    : o3 y4 d+ f1 {; [! b5 f
88. 
    
89. result   =   response;
    - ?# N) `: o0 h- d! U! u5 d1 I
90. result.Delete(0,   pos);
    6 V7 q7 W9 Q% M5 A0 _6 w  U
91. 
    ( L  h8 U+ E% R* B( }5 [$ p
92. pos   =   0;
    9 B+ g$ p7 P& k3 q
93. status.Tokenize(_T( "   "),   pos);
    * v% |1 d, W2 F7 o7 L
94. status   =   status.Tokenize(_T( "   "),   pos);
    4 {$ x' M3 D: m) I7 p
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    5 c* `0 B9 R' @2 |# c7 \
96. return   true;
      v" I4 Q( F$ W. f2 I+ J1 s
97. }
    9 a  ^4 v9 f% q+ e4 w* E4 S3 [
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     / m: ~/ L8 C6 P3 J1 ^  \
101. CString   startTag   =   ' < '   +   name   +   '> ';
       O6 _# @3 ?% e0 I
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     & {7 [6 b2 [7 U: K" ~* x
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     0 W# @8 ^8 [  z4 {/ z
106. if   (posStart <0)   return   CString();
     
107. 
     ' Z' X1 @% E/ I( Q; P6 ^9 Z* S8 r
108. int   posEnd   =   all.Find(endTag,   posStart);
     - v0 X: O% }7 N( k1 l
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     3 l5 Z4 t  g4 y4 F9 p6 i
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     5 c7 A6 F1 D: g0 D7 u/ @# r; v, `7 S
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     9 J8 w0 B% }# X* S$ \6 i( r7 H
115. :   m_version(1)
     
116. {
     " n- ~1 b" n- i7 |
117. m_uLocalIP   =   0;
     - g/ w/ v0 Z: V
118. isSearched   =   false;
     ! P5 h$ y2 U4 K. i* ~
119. }
     2 \: _+ R5 K4 Y; u
120. 
     
121. MyUPnP::~MyUPnP()
     7 w# N9 G. [% ?# v& Y
122. {
     
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     * S' K6 W% `& D; R) ?- K. ^
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     & {# Q0 ~& W8 T; s$ m+ j
130. m_Mappings.RemoveAll();
     0 V1 \. r+ e9 E1 p- J
131. }
     & f' q8 v9 a( s# A) h7 ?
132. 
     
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     ! r& g+ S6 V! P* l& ~7 b: |1 x% u) Z
135. {
     
136. if(version <=0)version   =   1;
     % F- |" @4 r8 N8 U
137. m_version   =   version;
     4 B. W% ], _, m. g5 t$ V7 H5 @) N6 ]
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     / _- Z( w+ [+ r% J4 E( u- K
141. {UPNPPORTMAP1,   _T( "service ")},
     * M$ c5 a& N$ [1 X3 S
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     1 a' G1 S' i# V  o4 b
145. 
     & f7 Z7 ?0 \! M, n# U
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     ! G8 Z& e' @& }& E2 ^' Q
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     : C; `% @/ n5 K
149. 
     
150. int   rlen   =   0;
     0 e9 m+ v7 ?- u: _+ E
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     2 \" D2 ?# A0 _  y. [
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;
     - c: {% x  W% |- T$ s% 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);
     
159. }
     : A3 V5 w) w) U0 x: U9 F
160. }
     0 |2 k% h1 O, u  p! E- D
161. 
     , g( ]' d" E. J* Q' C8 p% w
162. Sleep(10);
     % C5 H: Y' X( c6 M# n/ U( b
163. 
     
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     ( I7 |  Q& t" c3 R
169. CString   response   =   CString(CStringA(buffer,   rlen));
     5 V1 G2 S0 ?$ v" d
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     0 l$ Z$ I0 j& ?/ Z* _
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     7 v9 m* K; ~! [: T
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     0 m% y( e( b0 ?( {" |* z5 n3 k
175. if   (result.Find(m_name)   > =   0)   {
     0 z( H- G6 v0 q2 I
176. for   (int   pos   =   0;;)   {
     - c0 O  R8 M# X
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     ! F( k9 D: [5 w
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     9 ?3 W* d* g' [/ P
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     : d, h2 C: t, q) A: h0 h2 R
184. m_description.Trim();
     2 \# J* F7 w" V! r" o. T
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     
189. }
     
190. }
     # I. U' w5 A# X, B
191. closesocket(s);
     
192. 
     9 ^9 S. ?" f, {8 U6 i
193. return   false;
     
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
' s' ]1 p  `% v( u9 _& q' N3 x

///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
* \& j* Q* H6 z( u& F) b) C

. V% a2 x9 e6 v" F5 o" e#pragma once
7 j2 G. N# f- z  P8 e#include <exception>
9 X# \; I* d* {2 v6 n5 A+ S/ z

! [3 s/ ?! }% t: O  enum TRISTATE{
, j: Z  x: g! O* k5 X8 h# `        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
, F- X5 h) A- F, P- N1 x};


enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
& o% n  K* X3 H        UPNP_IMPL_MINIUPNPLIB,
7 ^7 T- y' h3 k8 E* z        UPNP_IMPL_NONE /*last*/
1 B* |* g) Y& o5 w7 C, D};

/ F4 h' O, S5 s, p7 k( m

0 Z, o3 t- U4 i
class CUPnPImpl
% `4 z. s! z6 y8 z{
: D( t3 `, F2 K% gpublic:
' {: N+ O: k$ X5 j: m" S! X% M        CUPnPImpl();
3 z8 v, E! o( ~$ a        virtual ~CUPnPImpl();
. E+ `* C# k- J! X( J) ]        struct UPnPError : std::exception {};
        enum {
9 U0 K: d' @" X                UPNP_OK,
! P- i( y2 i& a  g, S4 _                UPNP_FAILED,
$ j$ ?2 G. X9 |, }# H: Y$ a, s& o4 |' g                UPNP_TIMEOUT
        };

, {, Z/ k6 x+ o" x1 |
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
% o, S1 @3 M+ K  v3 a3 w        virtual void        DeletePorts() = 0;
+ z8 h$ F. W/ B0 ?7 h2 t" K0 l% i        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
  p2 _/ j+ F4 q0 U' E4 b        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping

+ _! g8 X0 D7 ^& F$ t
/ [% v" X: Q2 j" K        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
4 k) u1 l# ^: e( |8 _; L9 i. m        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
. \) P1 o8 Y) H$ N+ y

// Implementation
8 w" Y3 @9 Y+ Dprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
0 ]$ g5 b+ r; G        void                                SendResultMessage();
' h* y) b" w# p/ }        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
" k8 P: ?+ Y  o+ k        bool                                m_bCheckAndRefresh;


0 C3 z# s4 W# D) z) S' `private:
        HWND        m_hResultMessageWindow;
9 ?/ F  {! Q5 Y  b        UINT        m_nResultMessageID;
# @* K; ^0 A8 h  V
1 P( A; {$ r1 m9 X% @7 P* H
};
7 |; W1 Z# _5 }. g& C

// Dummy Implementation to be used when no other implementation is available
$ n0 c8 M! u$ Y4 A$ j4 bclass CUPnPImplNone: public CUPnPImpl
{
public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
. E3 T8 K: `. N6 E7 C* }        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
. R0 z  D# {/ l        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
8 L7 U; {* |0 p2 U* L/ @; Q};
2 `" x  }: W# o3 h' v
/ I! U/ ~. }) D, t; K9 P: R' g
2 I8 @3 \! w, r' I/////////////////////////////////////
4 C" g, a  S1 }: Y//下面是使用windows操作系统自带的UPNP功能的子类
3 k4 f& L2 i9 v# D) V2 c

! E9 W) i2 `0 F#pragma once
/ ~3 G# M1 B* b; K* |#pragma warning( disable: 4355 )

/ J" S% w) K  I5 f4 r& U9 c/ d
/ P' v+ n2 y6 R) l7 ?  n5 N2 L. b0 S#include "UPnPImpl.h"
; H3 y8 M0 `0 D8 n; T2 M#include <upnp.h>
, `. F: c, ]5 Q#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>
) y  q# _' n" n
5 y& H& b, v; J" x0 V; J
- o3 _/ {7 ?9 d1 p' F6 x#include <vector>
#include <exception>
3 q2 a# t2 s3 @: m#include <functional>
5 E* e" u+ T6 b. V# y, b4 H
  {3 U4 V. G9 n7 r9 A- t# n

& y. i7 A# g+ N* l
- x( b9 O7 H' ^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;
/ X5 |; Z1 \0 J; \% A: Htypedef        _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 @7 u5 F1 i5 t1 A3 J5 U
  V8 W2 H# a' B' m7 H; ztypedef DWORD (WINAPI* TGetBestInterface) (
9 k2 t* Y5 r9 j: Q( ?) d  IPAddr dwDestAddr,
/ A6 [) J  J. q* {' S8 H  PDWORD pdwBestIfIndex
( f/ ~8 u% \4 |0 i3 q);
# Y- H2 [5 u  Y2 R

typedef DWORD (WINAPI* TGetIpAddrTable) (
, i% [( L+ [0 @- c; S" N  PMIB_IPADDRTABLE pIpAddrTable,
$ \; u5 B5 m# L$ o  PULONG pdwSize,
2 V4 [1 A9 z3 ?; c& @% P9 A  BOOL bOrder
);


typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
9 G4 @9 u7 {( u& h8 d% X; r1 i( O);
, ?& C1 m; g2 S  I- K0 N2 u! I& m
7 C, N9 r. h9 X2 E
. E* O7 m# x& dCString translateUPnPResult(HRESULT hr);
; j" x  d2 K# z( F# |$ J, MHRESULT UPnPMessage(HRESULT hr);


class CUPnPImplWinServ: public CUPnPImpl
( n4 B8 T3 L% ^* r  E& N& T{
# f! E) O& P2 g2 l& K$ n) @        friend class CDeviceFinderCallback;
        friend class CServiceCallback;
// Construction
public:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();
3 C- Z0 e# y8 Y% t7 ^2 t

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
- k# j' [! w7 W        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

" g" m5 a5 p$ m. F/ {8 |- m4 V; L
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
5 E" A+ H$ F) i        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
  W& R  N( D. f

protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
5 C5 j& q  H0 n        void        RemoveDevice(CComBSTR bsUDN);
. b  u7 ]( m$ [% M        bool        OnSearchComplete();
0 J1 }. H9 L5 w; ]7 ~        void        Init();
/ _3 t: Q9 P& U& D- M
' f+ E$ s' e4 g
$ m! V3 W$ N6 T- ]7 v5 L        inline bool IsAsyncFindRunning()
        {
                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
6 ]7 @1 s$ {2 w% j/ W' y# n                MSG msg;
6 H) X! G" Q' @8 M8 |9 w8 y& r                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
' H3 s' L) T, f7 P, m' n( u                {
                        TranslateMessage( &msg );
+ a* O; U9 \# a                        DispatchMessage( &msg );
% H5 ]7 G# L. K' H: _% j                }
                return m_bAsyncFindRunning;
        }
6 M' b' x# {+ O- u& \/ Q
( g$ O7 {, w, [; U; |) E' C
        TRISTATE                        m_bUPnPDeviceConnected;

* Y# A) {3 F* P
// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
* A" _0 E9 d. z2 Y2 b: }0 \        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
' n1 G- J) s" n9 u; w        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
7 O& j3 g0 {, i4 `) f        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);


        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


+ @! z) g! ~( `% c. ~        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
0 J& r  ]4 _9 T        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
6 `& @6 @* b9 y! @! v                {
  K+ G4 U9 v- H8 p, ^0 ]                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

1 C! ?6 P/ d+ J( z8 u
% i+ y. O( Y, }. r) j6 G                        if ( FAILED( hr ) )
& O1 X: r4 m4 @' \) Y0 M. X                                return UPnPMessage( hr ), false;
3 ?' V9 M) ^) H5 P. x0 c, w
: x5 v2 r- R2 r( Q' H2 a# q1 |
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
        };
       
2 O+ M. `2 x, a        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
& {# p- e0 @3 _) X- a- n/ ^        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
/ W8 o3 ?4 c3 i; S+ \/ F: ^% y                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();


        // Utility functions
  C3 t) O+ s, H1 d" q        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);
' A9 h; y! [9 s6 z% y) ~+ r" D        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
" `; o$ {1 ?( P9 E. V1 a        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
1 m* N# r% E8 ]        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
/ _2 M# Z7 r) {0 q* W        CString        GetLocalRoutableIP(ServicePointer pService);
9 y( v! t+ H) s' x+ I

// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
! w- h: w% y# ]& {: u0 p, V" S        std::vector< DevicePointer >  m_pDevices;
5 J9 V3 W% V! E. |, J' F        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
3 S5 U9 J2 f1 S, ^        ServiceCallback                        m_pServiceCallback;

1 _; f; q1 f, n) \. M' e
        LONG        m_nAsyncFindHandle;
- p6 `1 f9 G4 A, I1 @- V        bool        m_bCOM;
        bool        m_bPortIsFree;
% j) l1 E$ W% C& ?        CString m_sLocalIP;
        CString m_sExternalIP;
& k2 v  h! Z- R, ~7 X        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
6 n' U9 v* f0 V( I" e- [: J! `/ y/ t        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
2 c. _5 C0 ^: H: k/ h4 g        HMODULE        m_hIPHLPAPI_DLL;
, z6 w/ ]# p1 v        bool        m_bSecondTry;
. Y7 V  y% B* O, [: X) O2 m+ K        bool        m_bServiceStartedByEmule;
4 s1 a) y  {0 Q        bool        m_bDisableWANIPSetup;
0 w" ]; u  p% W$ ?5 g( s        bool        m_bDisableWANPPPSetup;
& H* w& }1 \( N, R+ c" m9 A

};
& b. q& ~2 V( w, m! k2 ?, C
/ b0 j- L) S+ h, S0 }* L5 N7 I* F
8 X  J# j+ v- M, Q' S// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
5 V' x& B; l  M( R$ t: s{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }


3 c  [( t+ ^* ?- T! x   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
' N0 h7 `. A, C5 ]2 l( f! P6 B

6 N% C5 `" X4 m) }; u1 z7 E// implementation
7 L2 B/ Z9 i" f4 ~private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
6 \1 G4 V. Y+ [  P, |. i- `        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);


private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
3 \2 w8 p0 X3 d4 {

, H5 P+ ?9 l, n1 L- S0 }// Service Callback
class CServiceCallback
: ^) K$ H6 g7 n5 K8 i, J        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
4 c* n1 Z. d# m3 ~        { m_lRefCount = 0; }
6 x+ E: K$ b; I3 d" Y0 ]   
6 r8 ]# i5 h( D% U6 |: |3 f   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
; ~3 e0 C* _# t8 Z* R2 s   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
& }( v% N2 I8 l1 J) |

: a9 j) @7 R- }( M0 G" y( G// implementation
/ c4 D4 c0 z+ [0 c6 b) R1 aprivate:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
5 M( k0 u: Z- x2 p        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
  m. q2 \! e- }. `  n! x' ]  {
/ h" n$ x+ `2 ]8 o& s: A- h+ y
; v* g; p" _9 kprivate:
        CUPnPImplWinServ& m_instance;
/ J4 F0 x4 E' h/ P        LONG m_lRefCount;
8 |: V0 ~* D# Z8 z! q% u};

  r" X) ]! ~) O! j) V, K) d! W" i" X
/////////////////////////////////////////////////


使用时只需要使用抽象类的接口。
% [' d  O7 z& g! {9 }' ?, BCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
- U+ S1 I  G. s* F4 S! @CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.