UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   
3. 
   . ?( N! p9 ~! N/ Q
4. #pragma   once
   
5. 
   2 M" Q- s/ d0 o) c0 R5 c" b6 R
6. typedef   unsigned   long   ulong;
   
7. 
   9 J. |; E! J* [8 N8 g# ?1 }% u. ~( J
8. class   MyUPnP
   
9. {
   8 I  v. D( {9 G7 t
10. public:
    
11. typedef   enum{
    / R0 i/ s) J' a! A
12. UNAT_OK, //   Successfull
    
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
    ( o8 {! i5 {, c
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    4 K" s) z/ [6 h8 `# B) T4 k
18. 
    & ?( c- a1 w$ A2 ~0 S, l
19. typedef   enum{
    " E5 E# R! x4 i5 S# r- x9 R6 k. U
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    ( J5 j6 ]% H9 C% q' T8 c
22. }   UPNPNAT_PROTOCOL;
    4 v  C8 ~. P( O% X( q
23. 
    5 ^' A! P/ I' j1 K7 P
24. typedef   struct{
    7 E* R9 |* M3 g$ ^9 m; W( n
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)
    5 {0 s" S4 O6 i) J& {
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    , |+ p3 k3 ^- X7 _& J. R  u/ S
30. 
    1 r1 W3 E+ @' o
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    1 {) R3 \& J( Z2 `; h% f
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    $ @, V. [# B$ I
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    3 r- O/ l. f5 _1 U+ p3 U8 y
37. 
    
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    
42. 
    
43. protected:
    " T: g' K0 d3 R  u( O; n7 J
44. void InitLocalIP();
    4 Q8 S  G& P8 m
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    8 d) K7 }4 y) V. X- G4 |4 d# {* D4 H7 ?
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    7 ^' f; z# i3 Q& K
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    4 x" D0 j8 D/ b" P* ]
53. bool Search(int   version=1);
    . z8 j1 w9 j1 t! j- o0 B- e1 K& L4 R
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    ( Z' {! j7 }% K( E1 ~6 Q* \
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    ; l1 Y* b# @' M1 C! R  J1 P
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    
61. CString m_name;
    . w$ ]8 f6 `& v
62. CString m_description;
    : ~( y$ ^; t6 H% ~, }% B
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    
68. 
    
69. private:
    
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    : p7 o# }0 k1 P9 g3 X  T
71. 
    1 L- w, K7 k2 R) y9 y
72. CString m_slocalIP;
    
73. CString m_slastError;
    3 i0 f0 x' o1 J- f( [9 x
74. WORD m_uLocalIP;
    # B7 L5 ?1 k; e6 O: s( v
75. 
    ; J: C- u- A# s3 a+ p% ~( E) v8 z2 k
76. bool isSearched;
    
77. };
    % h  y1 u9 |( s
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   
4. #include   "upnp.h "
   
5. 
   " T* A* a# |8 E! Z' h
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   8 L# _  H6 {3 x6 p# X$ |+ a
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    % ?  E/ `5 B0 M+ d! Q
11. 
      R  Y$ X  L7 l
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    % a8 F* q- V, |. A4 i6 i
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    
15. 
    
16. const   CString   getString(int   i)
    
17. {
    
18. CString   s;
    
19. 
    + w1 m5 a' ?& `9 u* k
20. s.Format(_T( "%d "),   i);
    
21. 
    9 K5 ]: u) Q9 d+ f/ }& a
22. return   s;
    
23. }
    , T5 x' N- q8 }* H+ `) i' L/ e
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    # S. x# X6 H( Q$ ^
26. {
    / Y9 T# M! ]. J2 O! z0 S0 m' y
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    8 c, D! n' p6 Y" x* ~% U& i- |  Q4 Q
29. 
      L# s: i7 C- F! q) f' K2 F8 p1 @
30. const   CString   GetArgString(const   CString&   name,   int   value)
    7 a* j6 @! ?/ j6 G& X7 o
31. {
    6 a4 ]5 A' W9 l8 W+ B3 u' {# x7 z3 P
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    / w( C, [) ~$ Q+ ]+ p! z
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    # ]: {5 I/ }" v( V5 f: c' s
36. {
    ) \% S# \7 R* J1 P" l0 ?8 @
37. char   buffer[10240];
    , Q9 V; J$ x0 b1 e. l5 c+ I
38. 
    
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    4 P! a" Q/ G1 D; W) f
41. strcpy(buffer,   (const   char*)sa);
    % d% f" c# o" h! ^' m
42. 
    " f6 r2 q  T! S; g
43. uint32   ip   =   inet_addr(CStringA(addr));
    3 s4 v7 U0 [0 z
44. struct   sockaddr_in   sockaddr;
    7 V$ B4 D' r# i  I' k6 f) G: g
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    8 L* g* r/ n  ^3 [" D; n* w* B
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    8 ]  D' W/ Q7 O/ d: |' z
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    + r6 ?' @/ C0 P- R5 o% w& S
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    ( p1 G: T, V1 E0 u1 P6 c) N
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    & \$ D" ?* O: E+ L( O) P0 }
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    : y% D. R$ m  B* Z; J- f
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    0 ^: K% t8 v# J5 W6 J& V1 y. i& [
59. if   (!rlen)   return   false;
    . v8 C. @9 h0 }2 y3 k5 Z
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    ) B- W& l2 ?( L3 H7 ]7 q( ?
62. 
    0 z0 [! _3 o7 S+ h# g" ]& A
63. return   true;
    
64. }
    
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    ' X( O! W: L( B, S* s7 \2 y
67. {
    
68. char   buffer[10240];
    
69. 
    & w0 q, q7 x6 K5 I9 J4 C
70. const   CStringA   sa(request);
    % \; k+ w" n4 `$ {5 K9 E+ I( p
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    7 a9 U+ H' R( i
76. sockaddr.sin_family   =   AF_INET;
      G0 V3 `5 K) [" \  n5 S
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    # ?* x+ l& v. `' ?2 r, X
79. 
    2 A! K, V7 ?3 w1 `& p' I
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    ) I7 o7 `7 O# n4 S+ ~4 l
81. }
    " f5 K; R- A5 I, v
82. 
    2 x) H7 d9 p5 G; K. h* P8 Y5 k
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    
84. {
    " }+ a2 |9 \- y: ~3 w0 U
85. int   pos   =   0;
    
86. 
    
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    
90. result.Delete(0,   pos);
    : D8 t. I& k. i8 b+ L9 G8 s
91. 
    
92. pos   =   0;
    
93. status.Tokenize(_T( "   "),   pos);
    
94. status   =   status.Tokenize(_T( "   "),   pos);
    ' @0 D6 E) G" t$ w. ~$ V* D8 k
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    " D5 Z/ p: @9 z+ |& X
96. return   true;
    
97. }
    . J6 P: r& u. S; y
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     ) I7 p& A! u* j  S/ o
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     
104. 
     
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     $ ?2 Z/ B# Z/ |
107. 
     ' R1 T& b8 S* V7 S8 a: S; C5 B
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     5 ]$ l0 `; Z1 \. B: D# B$ A
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     + W- Z: F8 T5 n' H. d, e4 f& h& M
112. }
     
113. 
     7 R: ~7 Y; V2 l, H1 F
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     
117. m_uLocalIP   =   0;
     ! x+ o' y+ ]6 A
118. isSearched   =   false;
     
119. }
     . }! F8 ?6 t& f/ A" p1 G( |) V
120. 
     % a5 L. y3 k8 e: I, X$ Y  u
121. MyUPnP::~MyUPnP()
     
122. {
     5 O- n( j- c/ E8 `9 |$ p( Z  I
123. UPNPNAT_MAPPING   search;
     7 r' I" P1 U9 I: e( D
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     
125. while(pos){
     7 H1 i% e$ q5 B; k" ~1 G
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     
130. m_Mappings.RemoveAll();
     3 _6 t5 F1 c9 y; H6 O# V; H0 P+ u
131. }
     
132. 
     
133. 
     # j  F5 x* a( n) H: H. s3 u
134. bool   MyUPnP::InternalSearch(int   version)
     1 _$ [' z6 F0 \' ^
135. {
     4 M* E; B+ W! t' t5 H' {; |
136. if(version <=0)version   =   1;
     9 Y, X* c5 n' S8 ?. v. Y2 z
137. m_version   =   version;
     
138. 
     0 P9 O" k; N3 }) k1 ~
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     6 u" D8 n0 b1 h, o# L0 v( k4 X
141. {UPNPPORTMAP1,   _T( "service ")},
     * M" S4 y0 \$ n* ^  v% N/ S
142. {UPNPPORTMAP0,   _T( "service ")},
     6 }" y/ F+ q: P) c( Z8 p1 ^
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     9 [2 n) \( s9 M/ w* ~, I" e
144. };
     8 u+ i7 A1 B7 j9 Q5 p, B6 [6 E
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     2 y* M' P" J$ l3 e' K  j3 _
147. u_long   lv   =   1;
     ' F# O% u6 O5 N) `5 Y2 }! T4 h5 g
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     8 k& @( J% C, H, r3 T# U$ e
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     - ^0 N) G$ ~1 y* T; [  R: [6 V
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;
     * t  N* X* y# `$ c0 X
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 "),
     % z& n% f8 H$ k
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     0 s( D; E; N8 u! O6 {
159. }
     8 v2 @0 Z) d: a) U
160. }
     9 u5 B1 s5 V. [: y2 W1 [
161. 
     2 s4 J# ?/ m% {5 K2 c
162. Sleep(10);
     
163. 
     ) _: k' G. @# J$ y
164. char   buffer[10240];
     - z( H+ \  B3 [7 l
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     . m0 q' |: I+ H: w1 l
167. closesocket(s);
     & F; S' X3 Y7 y0 G; d  ~' }
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     6 \7 y5 l4 U! G1 ~- u1 p1 g
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     6 a; Y8 Y% r6 t
172. 
     ) T9 H3 s) h" A" I  N  Q
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);
     " J' ]5 z& t9 U. h
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     , n' e; s4 C) G: M4 K
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     7 M7 h. m0 h, r& y
179. CString   name   =   line.Mid(0,   9);
     3 v3 Y& h9 n3 ~* R
180. name.MakeUpper();
     ! G- B5 l- A  z) @" d! N
181. if   (name   ==   _T( "LOCATION: "))   {
     9 U* I% u6 E) z/ |
182. line.Delete(0,   9);
     
183. m_description   =   line;
     
184. m_description.Trim();
     " s8 J$ W1 }* h- e
185. return   GetDescription();
     5 u* d& \9 n. E" c8 F
186. }
     : P; C+ ~" C/ J0 f: B2 ?2 F
187. }
     
188. }
     ) v  X9 E% }3 g! V1 i  f( ^
189. }
     . e9 L4 X1 J, D! |
190. }
     
191. closesocket(s);
     
192. 
     , y6 _9 N, ?, D4 ]- G; D
193. return   false;
     6 x6 L: d; D6 Q' N& d$ X
194. }
     1 a* b/ w  m. i: x2 s' K

复制代码

天云上人

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


  Y! _( V5 @1 I% V: u( j///////////////////////////////////////////
: j' C3 m/ a  T  T$ y" g4 ^% [) `//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
2 j4 I8 ?( v( p) f* s

#pragma once
0 e# A' }2 ~0 c( b3 K#include <exception>
( }% P1 h+ x) e& {  c

) V2 f* t! Q$ }& g$ M+ H; R1 ?  enum TRISTATE{
        TRIS_FALSE,
$ G4 C& \6 Y: Y# b& z6 I( ?$ d        TRIS_UNKNOWN,
6 j% e8 @+ F. u) L; o7 L        TRIS_TRUE
};

# f( s; A. `% d/ U2 A
enum UPNP_IMPLEMENTATION{
        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
) Y# K9 ?6 H; C1 N' _! R+ \! m        UPNP_IMPL_NONE /*last*/
! |  m+ y$ a$ X# y3 s};
3 |/ o% _8 A3 }: u7 ~



class CUPnPImpl
{
public:
2 V7 H/ Q+ i! P$ p( B& Y6 M/ y( k        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
5 `. E; X" j2 p- j! E        enum {
8 y# P3 _, R& z8 Q7 }2 l                UPNP_OK,
) p9 l3 u! J% C0 v, I9 m                UPNP_FAILED,
6 P8 _4 `$ `$ {3 {, y) a! b, _; d                UPNP_TIMEOUT
        };


        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
# _6 m$ M' b- G% \3 U. g; X        virtual bool        CheckAndRefresh() = 0;
7 a# m5 @1 n5 N; @        virtual void        StopAsyncFind() = 0;
        virtual void        DeletePorts() = 0;
        virtual bool        IsReady() = 0;
8 m( a2 m# o2 g" H0 p        virtual int                GetImplementationID() = 0;
       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping


# v; l7 Q7 w; X4 |# F        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
/ J2 F  Y; w) M9 {        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
# s- p  H$ M) y( Q3 M        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
# q  Q; D$ e$ e1 x        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
% K$ Y' X8 ?; [! p, N& Z1 S
5 C; Q9 O3 N3 o
// Implementation
5 t% Q  z; o+ F. ], j4 iprotected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
$ `. G1 d$ l2 S& C, u        void                                SendResultMessage();
+ H+ U) \( }/ \" D        uint16                                m_nUDPPort;
        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;


3 J! A8 o/ _, i# Nprivate:
/ g2 N  M# \' {: {# g/ K$ U7 R! g        HWND        m_hResultMessageWindow;
* I. X& C& g7 X0 F) R/ U        UINT        m_nResultMessageID;
& G( {' n5 y& |5 s

};


// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
1 S. o* q6 B4 R& O$ S8 D7 m{
- q9 U. s; H& D" G. gpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
. C& V5 D6 P- p% g        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
7 c/ |* U  U5 {! ~( p        virtual void        DeletePorts()                                                                                        { }
, J$ \9 Y5 J0 K7 k2 l/ C        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
( j! F* l/ N( X+ ~$ C9 |};

, }# ^3 b$ F) F5 n1 D6 s& g
/////////////////////////////////////
, d" a8 `/ V9 V% ?# C4 ]//下面是使用windows操作系统自带的UPNP功能的子类
" Y% E- c# n! G' S  H
2 Y; r" T2 p* P
$ D! `/ ?% f4 {& q8 Z, b  q#pragma once
; @0 i3 E2 m, X! C5 ?#pragma warning( disable: 4355 )
$ r9 C- c5 j! C7 E
4 Q( ?$ g/ S+ L8 h
! S. s. t! A! E5 @% q#include "UPnPImpl.h"
  s3 q, V3 D& i! f  i#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
2 n0 E& S$ k2 z* i+ d- [& d#include <winsvc.h>

$ \0 b1 ]5 [+ R3 s
* |7 L' [* F' |! o, J#include <vector>
#include <exception>
# h; h$ \, S" c2 ?$ ]  n  c8 k#include <functional>
" U3 L' b7 I' Q7 V% X, i
& l' R" \; b+ H. T; R/ g% J


4 j) @, N; J! C2 W8 s, a9 Atypedef _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;
! |" ~; ^8 ?7 ?$ T- K, |6 ]/ W& @typedef        _com_ptr_t<_com_IIID<IUPnPDeviceFinderCallback,&IID_IUPnPDeviceFinderCallback> > DeviceFinderCallback;
2 e3 v8 _6 W3 m  L) y% }( O+ Ptypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
; Y4 U. L4 M$ j0 i) b& a- mtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
5 d9 N+ X6 Y& l2 k% G& L  utypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


$ [- b  V+ i( J: r$ a% ltypedef DWORD (WINAPI* TGetBestInterface) (
5 q& C- l4 i3 d/ s) a: }  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
+ @: g7 _% i8 j+ W! q; v8 W: Q);
+ j9 ]$ L, @  z  ?7 X; Z. j
! b& S) A! b2 p# k  d9 J/ `* Z
typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
! V6 v9 q& u5 B6 s: T8 g5 n6 K' d  BOOL bOrder
);
& W# p- u# Q& P$ y1 w/ U

typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);
6 q  c/ F0 w' A6 @
9 M7 d& |# J2 {( j  r( c
CString translateUPnPResult(HRESULT hr);
( {/ i, Y* {" P& PHRESULT UPnPMessage(HRESULT hr);
6 l$ d5 O/ o! ], Z

class CUPnPImplWinServ: public CUPnPImpl
{
        friend class CDeviceFinderCallback;
# k  i7 K5 @# ?. i6 U        friend class CServiceCallback;
" `+ `- e7 `7 F, r8 S// Construction
& ~- s% t" D/ `( s( A7 ~public:
. X( s6 G) N( o. F5 q  ^        virtual ~CUPnPImplWinServ();
) N' S5 m' W* G& V7 p+ B# ?- S* E        CUPnPImplWinServ();
  b5 G/ n( ^" K+ O" W
7 g$ w/ j8 N4 y
3 d+ `. Q( C' n0 g! B4 v$ O# {        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
* e4 i0 w$ z' [) D4 X' R2 O        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
+ F* A! G! ^" a3 w$ X% Z' N3 f" t        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)
- J9 G& k1 j4 g' G        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };
' y4 `: u7 h- B. X$ K! l

protected:
, Y4 p" |+ Y9 j0 ^* \, K        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
: _6 [$ @8 G* f: n/ o. N8 `1 L8 f" B        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
, P" L8 u$ ]9 o# ?3 C1 A" a) p% |        bool        OnSearchComplete();
        void        Init();


        inline bool IsAsyncFindRunning()
        {
! g9 J! }0 z8 o8 Z) E& R2 X                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
! R8 }/ Z  i$ \% w1 M; u                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
                }
0 z) Z- c6 A: @3 A" C                MSG msg;
* a2 Y+ M, a" b$ T                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
- W8 g1 k1 \. K/ v0 V" P5 w                {
& V, r; }% d3 l8 p1 k9 O                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
                }
                return m_bAsyncFindRunning;
        }


# R3 i, `. `0 h6 c6 d9 r, m( V        TRISTATE                        m_bUPnPDeviceConnected;


// Implementation
) [* a+ H2 A* \7 Y7 Z$ e( A* N        // API functions
: P, ?8 ^# t+ `& v5 Y0 O; L        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);
  P! @" _5 ?# L: u        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
$ y; p3 }% b1 V; B        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
$ E+ @( F5 T  w5 ^3 R, P
1 T( b) [! |! o6 B- ]# `
        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
( d5 S& z$ X# K        TGetIfEntry                                m_pfGetIfEntry;

' Y( R7 w4 @  \  B
0 I& R6 |9 r  F8 w$ A% v, l        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
4 ~+ |6 p! W1 \: J0 u; N( @        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
6 w* p) ]. i+ i5 j                {
- x! M; e1 R0 P0 X& ~                        CComBSTR deviceName;
                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );

" ^. v# V- D$ {3 S" N# m. W- [
* R' g, H% \* ~! i' {2 X                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
, E% ]! D4 C0 ^; H. r% h; J

: a' \1 P" w+ @5 U1 l                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
" y$ e* j$ g  k                CComBSTR m_udn;
        };
) X/ x$ C/ s! R6 V+ f1 i       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
6 U/ q6 A* F9 {9 H9 d0 u! p        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
& P; ]: W3 j- g/ B% N. ~        void        DeleteExistingPortMappings(ServicePointer pService);
        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
2 u0 P8 ?# o$ A: c( U4 N8 G  Q9 T* j$ ]        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();
* ?) P5 `# `6 M" i
' }: k& [( j# R- P7 f; V) \1 H
        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
8 C( h, s$ Y5 X' w! V0 I+ e8 t% ?        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
+ K3 ^9 K+ \5 \, \        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
5 W# h, A1 y' d4 u! Y8 U        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
  S8 K3 O+ d: A- l! ]: n

// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
4 G$ Q7 }1 c7 E; \! I6 ^        std::vector< DevicePointer >  m_pDevices;
: W2 m; B. ?! U        std::vector< ServicePointer > m_pServices;
        FinderPointer                        m_pDeviceFinder;
6 u" G: W7 u& m8 n        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
. @- `1 c) s: q+ N6 _& X% D7 n1 i) ^
+ X+ g% ?4 S/ u* @
        LONG        m_nAsyncFindHandle;
4 V3 R8 O  I, N- {0 T  `/ @        bool        m_bCOM;
        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
6 a3 \% p9 a# j+ ]! I8 p" f" f        bool        m_bADSL;                // Is the device ADSL?
9 D' W! @  J4 a" P7 `1 L        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
% p5 J8 N. A* y7 f0 Z% B0 S        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
6 J. n1 u6 A6 x. M4 E        HMODULE        m_hIPHLPAPI_DLL;
! }9 r" u- N& L( {% M        bool        m_bSecondTry;
, ?+ }' U8 G0 k- X        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
. k1 x' M+ P& j        bool        m_bDisableWANPPPSetup;
. c* M3 j5 W" b4 B
- ^) I9 H5 J0 p( Y/ G1 O
+ w: W" j2 F# d};
+ l9 Z. D5 v2 n, @
' G2 X" I6 X8 Z5 Y# f
// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
; u9 X/ U- z* I$ u6 x, S; a6 F        { m_lRefCount = 0; }
( l1 e1 ]* j6 B, _/ F! v3 N1 l' z

   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
6 h6 Q0 Z. e' i1 b" M   STDMETHODIMP_(ULONG) Release();
# M; W# X1 w8 Z" `! a% |+ t

- H. c3 @$ D: x0 ~3 E0 p// implementation
  f* {' U5 w2 ^+ _) N# e+ mprivate:
+ _( o/ L! k4 ~2 |( _  K- V0 p  d        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);


: ^3 H+ F% v' aprivate:
        CUPnPImplWinServ& m_instance;
) Q6 J- l  P. ?$ W- z- R0 p        LONG m_lRefCount;
* y8 J0 b! a6 _" f};

( v6 y: f2 s: @; d% Y
8 j* e) ^2 R+ b( w( M4 W// Service Callback
class CServiceCallback
        : public IUPnPServiceCallback
{
' W' y* z1 R+ w, i$ X" tpublic:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
$ r2 W, m* b& ^; Z2 L3 w" {$ r0 u0 @9 j        { m_lRefCount = 0; }
& H2 H' @  {+ Q" x2 S& {   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
$ m8 `1 K; X! P4 P8 n+ Z) }   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
: c2 Y3 f8 O- g  X
$ h+ [- l6 N* z, G: d' j( N
// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
6 S! K. D5 W# j+ N; W        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
8 h  A" J8 e% ]. V# n
0 z+ `4 Z( y. C
: G* L7 ]" w, l0 ]# `' cprivate:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
};
/ S2 S+ @4 \* C" x# B# Q9 g! D
& N7 v" K0 z# _) }! v/ ~
4 e) }6 `0 x9 d* Q7 M; [0 h% G/////////////////////////////////////////////////
) A. K( {( o- L& L( l. k7 F

8 ]0 t2 C3 A  p( F' t- P使用时只需要使用抽象类的接口。
) T$ P5 v( X4 v7 ]. K) OCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
$ b* U1 U' c3 H- P1 L7 C" \4 Z! ?' }* H2 HCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
+ ?# X6 u5 u) @: rCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.