UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   8 Y6 q6 L% d8 m$ E. [9 N/ h# W
3. 
   , x8 H2 r) m. O& q
4. #pragma   once
   7 f1 V/ I0 i  d2 G2 f8 v  \
5. 
   4 W1 [/ Q* l& S7 o
6. typedef   unsigned   long   ulong;
   
7. 
   
8. class   MyUPnP
   
9. {
   
10. public:
    $ `. g% ]/ M0 ^9 H6 b" R% k3 R
11. typedef   enum{
    
12. UNAT_OK, //   Successfull
    4 q: u4 ^1 q3 {% S# M% w
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
    ) A* v" P4 Q5 J/ E# y+ M
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
    ; S6 F& z1 a) `, [( ^& W5 z6 l
17. }   UPNPNAT_RETURN;
    
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    
22. }   UPNPNAT_PROTOCOL;
    : K& H( d, [. a3 u
23. 
    + ]* r: M8 Z' A( J
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    ! G: ]5 B! Q  |% b3 j# R6 Q
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    9 C$ V6 S) X$ r% c$ k; ^
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    2 Q% p1 ]5 Q" T( l
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    7 K9 }7 T: t4 ]  J# c* ?3 {
36. void   clearNATPortMapping();
    
37. 
    
38. CString GetLastError();
    3 W& Y( ?% C* L/ M
39. CString GetLocalIPStr();
    0 ^. i: o! X" j' n+ ]3 p& v. ~6 t8 B
40. WORD GetLocalIP();
    / G1 V5 I) i5 @5 N) v
41. bool IsLANIP(WORD   nIP);
    6 n& u3 s' e: |8 ~9 ~
42. 
    1 o# a1 E9 a, G7 k/ V0 x
43. protected:
    & |0 I, {0 Q8 u& u
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    7 I8 y$ x0 ~. q4 n$ R9 M, r& F
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    ( y4 D# K; e# {7 [$ }3 [
48.       const   CString&   descri,   const   CString&   type);
    - k8 v* r& ]" z5 z6 R" D
49. bool   deletePortmap(int   eport,   const   CString&   type);
      V; p: G# d9 ]
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    7 h. D* R) E  u' S) T/ f  |( k8 x
52. 
    0 ~9 Q6 B& a4 e3 R* Q+ Z& w
53. bool Search(int   version=1);
    6 ^) f9 h, m8 j0 [3 k) m
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    1 z9 p" s$ a2 J% m/ d- }+ p
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    ) L+ e" C4 y5 O  y9 q
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    ' [% ?$ |& e3 S  S) o
61. CString m_name;
    # V5 k- p, g- @& [8 T; K3 b7 h
62. CString m_description;
    
63. CString m_baseurl;
    : S7 Q, U" L# {# s3 M
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    - \1 Q+ h* G; R' }$ O" m
68. 
    5 k% `5 U" Q* f( S" l7 e
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    + L$ M0 W& v+ k
71. 
    ( i0 o, o3 i1 _5 k3 u
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    1 I5 c( h' k9 P) C$ Q  ?$ \5 f
75. 
    
76. bool isSearched;
    6 X  S* ?$ K! a- V. p2 p
77. };
    
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   " J% N1 y# p/ W& s6 y
3. 
   ; j; J' d# h0 |6 D& |
4. #include   "upnp.h "
   / U1 j" N1 ~, m9 S% U, ]
5. 
   2 V7 \8 ?: o. Y$ n
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   7 m4 g, i0 |* y* [
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   0 y+ I, k% [! N& w
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   " u& m  ~5 j; I& V- z0 r* D
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ' E- v6 m, G' f! H5 W
13. static   const   int UPNPPORT   =   1900;
    : G- p1 B6 [0 `+ R# r+ T
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    ! ?6 c4 p) C5 @
15. 
    
16. const   CString   getString(int   i)
    
17. {
    * _8 r! u) L8 h8 X- y5 {! N; l1 F
18. CString   s;
    6 q. C# Z9 h- m. e/ y8 E& [% j
19. 
    ! e9 r/ }/ G8 H' R) ]8 t
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    ! Z9 s" t3 Q. C9 y" y
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    
29. 
    3 _2 ^2 f* n: n$ \
30. const   CString   GetArgString(const   CString&   name,   int   value)
    
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    " i2 F$ k# [: q2 A1 B
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    ) z1 s- x. x4 S  _: t7 R
37. char   buffer[10240];
    
38. 
    
39. const   CStringA   sa(request);
    ) }# C4 c3 j, B7 l5 ^0 t
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    5 `$ \# D% r& ]  s
43. uint32   ip   =   inet_addr(CStringA(addr));
    3 a) I" Z3 M) s1 N
44. struct   sockaddr_in   sockaddr;
    3 {. C: T( \$ s1 F; |9 c
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    : P$ x2 y3 \$ ?) a, ^9 P+ t
47. sockaddr.sin_port   =   htons(port);
    0 {* n: {2 ?) [% z# u, K
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);
    + X# M# W, {. M9 Q
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    " K/ I# c7 u: K1 p# Z6 Z
53. Sleep(20);
    . Y! O4 ?  i. O! ^( _
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    8 u5 d5 l# x: Z$ g0 y4 u2 Q5 U
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    3 e! s% w) ^; A; L' g5 N
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    & F$ U8 U+ c8 Q1 u) u: C
59. if   (!rlen)   return   false;
    
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    2 T$ R, W+ U3 O( W4 s5 A
62. 
    
63. return   true;
    7 l3 J" K. N& E* k/ _) ]
64. }
    5 Q8 }, M* w2 t
65. 
    0 q9 w) _+ S1 P% t
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    6 F! X+ m+ J: M
67. {
      V% l4 z% d/ Q# |8 e2 N5 C$ F5 @
68. char   buffer[10240];
    
69. 
    + c( f, u) T- B4 L  N& A: s
70. const   CStringA   sa(request);
    1 L# G4 a. s; Z+ q2 L
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    # L' [" m  k8 K1 m; T
73. 
    
74. struct   sockaddr_in   sockaddr;
    " u1 S/ f  o3 T9 C) x% k
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    8 }# h- `3 |; @! T
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    9 o5 u! }: I. T9 {, e
79. 
    ) y1 Q! a9 U+ e, d
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    2 I5 a6 n0 L# E( r# ~
81. }
    
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    6 w' x- u; \- A2 y5 Q
85. int   pos   =   0;
    : G3 j! f" \" f& N
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    1 B: [2 v, S; b
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    2 D( O  P, d/ Q7 \% @9 u4 g
91. 
    & A2 k/ A. ]! q! |5 E, M  q) D
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    & C8 R& }/ N' p2 y- k% y
94. status   =   status.Tokenize(_T( "   "),   pos);
    2 |3 L4 x- j; p+ g4 ]) R5 W
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    ; C( b0 N8 O6 s0 J9 ~
96. return   true;
    ) x$ V& {; m% o" W' H# D0 a8 P8 W
97. }
    " `) B' ]: f# y7 ^5 B( Y. ^
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    * _9 L( o" C; e+ b: }# U  u
100. {
     ; r0 N8 |  w+ k; V. {0 R' r
101. CString   startTag   =   ' < '   +   name   +   '> ';
     4 e+ [5 K/ b; {' p6 C7 U! F
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     , Y9 Z  a" z/ w# |" V! s
105. int   posStart   =   all.Find(startTag);
     & I- d& n& Q3 q, b
106. if   (posStart <0)   return   CString();
     3 q/ [/ [- m4 l7 D* j) V9 [# E7 |
107. 
     . O$ Y  f5 n3 _( S; n
108. int   posEnd   =   all.Find(endTag,   posStart);
     9 Y  {2 m) K7 W. }
109. if   (posStart> =posEnd)   return   CString();
     ! X- z9 a9 B9 q+ p0 U, Q" I: g
110. 
     : l9 U6 \* J6 \) M  g
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     
113. 
     
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     ) W  Z. C* ^: q4 p3 U
116. {
     
117. m_uLocalIP   =   0;
     9 `7 ?9 }; m; ]3 K# T! G
118. isSearched   =   false;
     5 M' z' ^: \5 e% e( X3 {2 w
119. }
       Y) z! q' f9 O( u) Y( ^% }
120. 
     - o8 X- G2 N/ O
121. MyUPnP::~MyUPnP()
     & K* }/ y- I) E
122. {
     7 D. }/ G3 p# k9 H
123. UPNPNAT_MAPPING   search;
     # {- C  X* [! N" X6 p. G; L& i
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     . i: ~3 C: s, G6 E! E. N
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     / `: K' N. z! I+ w) k9 a
129. 
     
130. m_Mappings.RemoveAll();
     
131. }
     7 h* ~0 d9 m% k( [- B4 h2 Y1 r
132. 
     8 k; }; t+ f" ]/ _/ T
133. 
     : x" u: X- N" {, O
134. bool   MyUPnP::InternalSearch(int   version)
     5 K* o& _2 u5 b6 t8 ]
135. {
     
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     1 C2 I( r7 Y" P  E* L
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     / H' h$ N& H9 h0 P# K7 K
141. {UPNPPORTMAP1,   _T( "service ")},
     ! j; n# m. U+ n
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     $ h6 Q  O, b+ E6 Y: k& R
144. };
     
145. 
     ! L; P3 V( d- {% R
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     $ a" W: _3 o' r! i0 m7 l; ]& Y
147. u_long   lv   =   1;
       N/ O$ ~9 Y% M
148. ioctlsocket(s,   FIONBIO,   &lv);
     8 r; O) `( h: f! t! F
149. 
     ) a2 t9 f1 B; s7 I
150. int   rlen   =   0;
     ! V; m# }) |0 a  e5 _& `
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     ! A* S5 L0 X* t( \9 ~! \
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     9 ~& K+ u0 D& o9 s* n* q# A0 c  E
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     7 e" U1 s& n3 d- s/ N# k9 @
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 "),
     $ Y; D1 r' L# w+ v7 L5 E
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     9 b' S' l: Z+ l- a; w
159. }
     , }6 e' x8 ]- Q1 E
160. }
     
161. 
     
162. Sleep(10);
     0 H, y# s( i" C+ T
163. 
     
164. char   buffer[10240];
     7 k' j9 B$ _8 i" D- t0 A6 y
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
       Q! P* @- s, [6 f( J* G% C( X$ I, _
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     0 t! X3 l9 ^% d& @$ Z, @
171. if   (!parseHTTPResponse(response,   result))   return   false;
     9 W1 Q! v0 o5 q1 `  W% ~4 C
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
       B3 G5 U( c8 D1 ^
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     & `0 U8 h7 L: d  ~
178. if   (line.IsEmpty())   return   false;
     . o) ~$ Y+ ], Y+ @/ F
179. CString   name   =   line.Mid(0,   9);
     " I& O) p+ A5 ^: b9 x
180. name.MakeUpper();
     
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     
185. return   GetDescription();
     0 U! T! \, b: |4 [6 @* s6 j- t; C
186. }
     
187. }
     
188. }
     : g: X+ T4 x# L1 [# Q) v
189. }
     , [  |! M  [' K1 ^7 [- H
190. }
     
191. closesocket(s);
     
192. 
     & X! \9 p7 Q- @% P5 s
193. return   false;
     ) b$ |2 p2 ~; V
194. }
     ( q: N* u% t1 u8 c; X- [/ m0 T

复制代码

天云上人

以下有关upnp的接口来自emule，
: D9 p, J* a' J  }) P
' a) W/ O! Q1 Q
///////////////////////////////////////////
5 J8 ^  W3 }* O//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
& G/ f' ^' m5 Y. [: p! |" g
  x3 i4 Z* \% s
#pragma once
#include <exception>

( V/ }# T1 U7 K$ ~! i
# ]+ G# f6 @, N  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
! R' p) E. ~: }: d& j$ ]/ q        TRIS_TRUE
8 _8 `' S1 A5 E& i/ g2 i: @};

) G8 w4 C: w4 M  c) {
% @7 p+ r0 V3 L: ?enum UPNP_IMPLEMENTATION{
: }& \$ q% F% H        UPNP_IMPL_WINDOWSERVICE = 0,
3 G; X' y& O9 N8 h' p* o% v        UPNP_IMPL_MINIUPNPLIB,
' }! C$ B* P  q        UPNP_IMPL_NONE /*last*/
};
; t. u, ~8 y+ |" j


+ u9 e- F- Y% D; g* p) O, N
class CUPnPImpl
4 x9 ~8 I2 P0 G# b! [0 X) V# {7 t5 r{
public:
3 A1 r5 _4 s; J9 g        CUPnPImpl();
        virtual ~CUPnPImpl();
; z& e' \7 x* T        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
7 v; O! @$ |  Y                UPNP_FAILED,
5 T6 g( H) R7 o% K+ {$ R                UPNP_TIMEOUT
        };


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
4 \. h5 X: J/ w" G        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
4 @3 ], v; @' H        virtual int                GetImplementationID() = 0;
       
" {9 U( T! M1 |$ O# A        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
! o* D9 V( {7 ^: A' N' r3 O

        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


! J: Q- I9 Q4 @0 `1 h// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
! U# X7 @4 ]5 i6 G        void                                SendResultMessage();
9 A( ^# R7 _, o: _9 z8 n+ Y# Z* M4 ]6 H5 P        uint16                                m_nUDPPort;
0 ?+ d: j" ~( f; }9 ~        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
5 w' C6 f/ {2 h. u2 C
$ q# x$ j, h9 L! J, Z. w7 u' J
private:
! |. d* K& x# L3 j$ V2 W        HWND        m_hResultMessageWindow;
( ^& o' r: ~- x/ `. N+ ^0 A4 v        UINT        m_nResultMessageID;
1 E# S' ^& P, o) A- L  a
0 ^# H4 M6 n5 i9 N9 U
. y' h; X! E4 [0 G7 B8 @% }$ o9 w  v6 P};


! F9 B" k/ j, L2 W3 H9 z// Dummy Implementation to be used when no other implementation is available
1 j# j' k) s6 f$ Eclass CUPnPImplNone: public CUPnPImpl
4 V: ?" N2 Q( C7 m) @+ f$ o2 W, E{
5 N& R) d% y- y) _( `public:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
' J- K6 g0 T$ O: _( ?        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
};
6 l7 u7 l! p' d# _( ]: p0 {
7 \2 g7 W* c  T7 P% c
/////////////////////////////////////
& T; ?9 W% s/ w& `7 Q0 Q' H//下面是使用windows操作系统自带的UPNP功能的子类
8 y. S* [& p: `# S3 d2 S: c
$ R$ g9 Q  l, y- K
#pragma once
5 y# S5 O' z$ u. o+ b, t#pragma warning( disable: 4355 )
6 c/ n& `3 P, J  R5 t" U6 A% A- d

9 _" R4 H6 b  K5 |#include "UPnPImpl.h"
- ^  _! o" j4 I  P4 q5 W' w#include <upnp.h>
0 A) K- C1 q! ?% ]/ L#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>

! v2 h5 s- q9 ?, K( I
#include <vector>
#include <exception>
. b- E9 P4 b" b' b& v$ I; O#include <functional>
! D! ~& p4 j. P6 Q( n* L% d


1 h' }3 Z5 A3 h/ y4 `
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
6 r- r2 T) R0 u- a$ T# h- ^/ Vtypedef _com_ptr_t<_com_IIID<IUPnPDevice,&IID_IUPnPDevice>        >                                DevicePointer;
typedef _com_ptr_t<_com_IIID<IUPnPService,&IID_IUPnPService> >                                ServicePointer;
2 b" H, C" Z6 {$ h6 z2 ]typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
2 F( V& d. N' k; b# rtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
* Q2 ~5 W0 H+ g" [typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
# @  Q: W4 R. q  n$ C( d7 J% u
. j9 W4 u! u; N( w. ^: ?% ^
typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
' }. {# l1 R6 E* Z' d);
& N# z2 R, }& B
/ k, |. c$ F1 g% V: X+ t
typedef DWORD (WINAPI* TGetIpAddrTable) (
. p+ ~/ d3 c1 K  PMIB_IPADDRTABLE pIpAddrTable,
5 X; x- o0 |# G" r: f& I  PULONG pdwSize,
4 b( W6 U. q; {  BOOL bOrder
- u+ K5 v3 X3 P);

$ v6 b; V" ]2 G; o
typedef DWORD (WINAPI* TGetIfEntry) (
. |, ^1 n! V0 s; u  PMIB_IFROW pIfRow
);

; d; |+ v0 {8 L4 F
CString translateUPnPResult(HRESULT hr);
; s' b$ b3 x# E/ h0 i/ UHRESULT UPnPMessage(HRESULT hr);


9 j4 h# Z2 C; x1 i% ]class CUPnPImplWinServ: public CUPnPImpl
, C* D" x) }, X% Z{
        friend class CDeviceFinderCallback;
! l# T4 D# _6 R  b2 R        friend class CServiceCallback;
// Construction
: g! h. V9 q- h( ^public:
        virtual ~CUPnPImplWinServ();
        CUPnPImplWinServ();

- v# o- @6 l! Q
        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
' t( I/ X/ E& j6 z        virtual void        StopAsyncFind();
6 V9 m* |9 @3 @- A( u6 H, Q        virtual void        DeletePorts();
        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }
( Y2 a! t2 w) N" t1 h5 o) Y
# ~" R+ |9 H( `* v  I
4 v+ v4 ?6 e- c7 a5 }( B        // 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
        virtual bool        CheckAndRefresh()                                                                                { return false; };
! @" Y) [( m6 F# k+ T( J
1 N' s9 Q$ r; T7 K5 K6 E
/ E* k0 `. S7 J1 |protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
8 P& s4 D; j; y" X2 V) w& \$ a" ~        bool        OnSearchComplete();
0 N& m% j" I7 U7 }/ G        void        Init();

2 v& f6 h( r2 x! r
        inline bool IsAsyncFindRunning()
5 h2 N" _% n* l0 b6 V( n2 c        {
4 Y0 m- v. v% O4 l4 f. u0 ]! m                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
* D) w! u5 D6 @! [                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
4 [8 A" @: ~1 ^3 Y2 B. y                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
                        TranslateMessage( &msg );
0 U2 H1 ?& S7 h# H* _                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
/ M. e1 B. L8 S, n1 U. i7 b2 W        }
+ Q4 V' s$ `$ T4 }/ [
) Y+ H) f# i! E) H
        TRISTATE                        m_bUPnPDeviceConnected;
2 @- `8 P' ]9 ^4 _5 D. s" `& F) V

// Implementation
1 \1 E8 X1 a+ j6 N9 u6 w% ^3 U        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
; C* V" }' k6 x5 a# _+ Z2 L: q        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
- i8 f% H) _$ r4 T        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
" U* J. x3 q7 G/ O

        TGetBestInterface                m_pfGetBestInterface;
* k* [" q& O' ^, N: _+ `        TGetIpAddrTable                        m_pfGetIpAddrTable;
4 c9 u1 A8 k: J: F        TGetIfEntry                                m_pfGetIfEntry;

+ u4 o% d" y* Z$ g. H
' ]8 {" W; J! e7 k% h( _        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
  c3 B) ^! Y/ h% P: V* d        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
$ w$ `! p" S2 O; g: H# p% C                result_type operator()(argument_type device) const
                {
: X! O2 w( Q6 Y) M5 {0 x4 A                        CComBSTR deviceName;
+ O( E. r- W* z: L: r                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
2 O( @9 B' t. Y! q3 i% R. o

                        if ( FAILED( hr ) )
# Y! |  Z7 a& R3 u- ?- s  h                                return UPnPMessage( hr ), false;

: {: T  f% t% ^* |) }! t
, t/ \! B  b' u+ [5 r9 I+ X                        return wcscmp( deviceName.m_str, m_udn ) == 0;
6 L% W: v, Z2 T1 s6 S2 u& D                }
& `# ^# v2 y- H8 ]5 S                CComBSTR m_udn;
        };
& }: [1 Y9 }3 u" o) U       
# b& @$ o2 Q" Y& _: n        void        ProcessAsyncFind(CComBSTR bsSearchType);
        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
2 E1 v4 Y! W' V- q) I/ ~9 c        void        DeleteExistingPortMappings(ServicePointer pService);
3 e) \3 B9 `' v7 h# X2 T, t        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
6 U$ e$ D$ F2 E7 n  z                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

# ?, n$ s* I3 a( G
8 z. l0 R. Y4 b5 Z        // Utility functions
1 V5 O" R* p$ x: Y' B        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
4 {# R" R% g# {5 [0 N2 s        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
% m" H4 e. T* }% t6 u        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
" T+ D  r, I/ ?# H" E; [& l- z& Z        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
% i5 E3 k9 Y+ a$ G* A        CString        GetLocalRoutableIP(ServicePointer pService);


// Private members
9 W2 w& K, ]- Z& {0 M! i! ]private:
. r- V4 e) _4 O# X7 X7 @        DWORD        m_tLastEvent;        // When the last event was received?
* x/ N) p! S0 p; y        std::vector< DevicePointer >  m_pDevices;
7 \( r/ h+ j* l, d0 `& z& o5 i5 q5 e        std::vector< ServicePointer > m_pServices;
' |0 f3 N/ ]( \* ]0 R        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
6 ~6 W9 B, ]' m) `8 f        ServiceCallback                        m_pServiceCallback;


, \& c+ n# Y! y; u: z! R        LONG        m_nAsyncFindHandle;
1 }3 _$ D7 C/ o9 N4 j, X7 S        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
% S  M# ~% b* J; n/ M  b        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
# l* {2 }% Z' B4 h        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
+ ^& I' Q/ T% [, z1 Y# {        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
; h, T1 X0 v% c5 K5 x
2 D; X; ?2 X4 V3 p
};


// DeviceFinder Callback
+ ]* \& |4 L3 x; Cclass CDeviceFinderCallback
, B7 |% Z, N) H: ^        : public IUPnPDeviceFinderCallback
{
2 e' s  [: p! f- i9 Y9 N. Qpublic:
6 [, [4 G- m' l( f* r& F: o        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
' z6 Q: T2 y2 Y  G+ A; i        { m_lRefCount = 0; }


, g& S% Q1 H2 y7 ~; p; F, N: y; f   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
# u. H: e% U4 b' E- S' |   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
' Y% K/ U- P3 i; n% i        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
" z. C  b1 ~% j5 n5 N        HRESULT __stdcall SearchComplete(LONG nFindData);
2 n4 \, K7 x$ a

private:
. X: ~# C$ z: S        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
& m8 Z* n; D$ ^' `6 K
4 B, D) o! v; e  I
+ C8 A3 T) h2 ]0 F9 k6 H# u& c, E// Service Callback
class CServiceCallback
8 e- X* ?8 \5 Z! G( ^1 H        : public IUPnPServiceCallback
6 `; J+ `3 `% {/ @8 w+ f{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
' r: M) L! q4 x, K1 y0 N# g$ @& X   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
2 S: B& ^) M3 f- x; _' m
5 ^( g, g' P8 g0 @! ^
// implementation
" d/ a: c/ m. J/ Bprivate:
2 z, P7 ]! \# ]5 `6 E# R2 s+ s        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
6 y# p5 h' U0 `$ i( L" V        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);


private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
* a0 k' s5 g$ i
0 _' w" ~% N8 c- P/ A4 z2 j
( ^4 O; ^- |& D/////////////////////////////////////////////////
, a6 R; z4 ^( n

使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
' J2 {! P" _8 Z& {CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
' \6 K$ \, U( _4 T; [' Z  H, zCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.