UPnP

天云上人

/*uPnP.h*/

1. 
   6 V% D8 M! i) X1 c$ g
2. #ifndef   MYUPNP_H_
   1 s5 f, k7 S* n! ~
3. 
   
4. #pragma   once
   6 t$ B6 M- A- B, t, l' R' ^2 |
5. 
   
6. typedef   unsigned   long   ulong;
   
7. 
   - I, P2 C8 m5 e* V
8. class   MyUPnP
   ' R/ ^- k- q* B0 P1 j$ g- V
9. {
   
10. public:
    2 I9 A% y: B4 b2 A
11. typedef   enum{
    " X2 b' O3 n3 |
12. UNAT_OK, //   Successfull
    $ M: d. J/ W+ A9 J* c6 V8 j
13. UNAT_ERROR, //   Error,   use   GetLastError()   to   get   an   error   description
    : m# `- E: s9 L
14. UNAT_NOT_OWNED_PORTMAPPING, //   Error,   you   are   trying   to   remove   a   port   mapping   not   owned   by   this   class
    2 |- H1 C7 h0 O" y9 K& @
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
    5 `' f' c8 P9 I$ Y" J8 x
17. }   UPNPNAT_RETURN;
    ; O! N: P% A) s' P# q
18. 
    
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    + v7 f: ^  {3 l6 M+ m
22. }   UPNPNAT_PROTOCOL;
    
23. 
    
24. typedef   struct{
    * z! ?, x5 q5 y9 V
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    ! F+ n, M( \4 D/ I; J
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    5 u/ `2 T. l1 F$ }
29. }   UPNPNAT_MAPPING;
    1 W6 z; }! Q7 E% Z* E
30. 
    + O1 \4 F, Z& l) \5 U0 d0 H. u
31. MyUPnP();
    8 y% Z( c# A- u5 y; r
32. ~MyUPnP();
    
33. 
    ; R# z* g3 Q; O( A# D3 a
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    . Y' l1 ~4 r7 V3 [
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    2 Q5 X0 M" _: _3 H3 H" y1 W) Y
36. void   clearNATPortMapping();
    
37. 
    0 Y( ?6 ]% `& g- M+ O& w* ~$ |. t
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    # y% r1 U8 E" K# s8 y9 P
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    / @  ?  ?- K2 v6 v6 f
42. 
    : b5 D- k- X4 P7 U2 R! T7 C
43. protected:
    ' S+ X5 J6 ?! y
44. void InitLocalIP();
    " \% s+ R) k: U' U* p
45. void SetLastError(CString   error);
    
46. 
    : S; O3 |: \, B" V$ A. L- F8 u
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    
48.       const   CString&   descri,   const   CString&   type);
    ! `: T; ?* r% `% K% t, h
49. bool   deletePortmap(int   eport,   const   CString&   type);
    ' @2 |9 h, G6 N7 L7 X9 Z$ z' P. @
50. 
    
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    9 U- k5 s  L% A+ s% C$ N( h
52. 
    
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);
    
57. 
    + B0 t3 W' M+ K  y8 u
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    % S6 I! u8 W' W+ E# N8 ]
59. bool InternalSearch(int   version);
    
60. CString m_devicename;
    ) X  j6 Y+ B6 K+ @
61. CString m_name;
    8 r" h( I3 l5 X8 f# F: ^7 F# ^) p
62. CString m_description;
    0 W2 N( q7 A# Y9 m
63. CString m_baseurl;
    . F5 d8 q7 F: V# @1 ?
64. CString m_controlurl;
    ) J* I$ q/ q. {9 }
65. CString m_friendlyname;
    
66. CString m_modelname;
    
67. int m_version;
    4 V' W9 U' y+ N; R/ x0 i0 s: M
68. 
    
69. private:
    5 @% O. V% j" I) k. ^# o( R
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    0 j) k* m2 l1 X7 O. W4 R0 J
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    
76. bool isSearched;
    + @. P0 m  k1 F7 N6 J7 [
77. };
    ; w5 m, a. B2 G1 f- }
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   3 A6 L% m7 M- Y( g
2. #include   "stdafx.h "
   4 e% c/ E& j# W2 Y& I' K. k% C
3. 
   
4. #include   "upnp.h "
   ; V0 h6 \2 ?6 |) C! W, c( |
5. 
   , H. |: ~+ b, n, M' B; B; ^
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   ; S! ?" G  J( J# {: Q) E
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   . Y6 y% O' T6 l$ i/ \
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   " d. Q, g0 ^; V) M' F0 z' b
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   ) y3 o4 d) _  Y0 E
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    
11. 
    ; Y" d& w" Z& a! s3 Z; y
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    ) i6 J/ r" @5 h  T; K5 F
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    1 h) P: W0 q% E$ o- U9 ~
15. 
    
16. const   CString   getString(int   i)
    # {) R7 e8 D/ _' A1 o0 d4 c
17. {
    $ q7 c  l/ {* p
18. CString   s;
    + g& T( Y3 \" m) T' {
19. 
    3 O: o( J, N3 Q5 F5 G; L
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    * }$ b8 ~( y! q' l
23. }
    6 R/ j- `4 o- f5 P
24. 
      s% j6 S% {; V3 g- l+ S
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
      J! @  u' J6 i+ ~' Z( |9 a
28. }
    5 f; V, b; ]+ O- F) T5 `
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    ; ]* o$ d) _7 W0 V. t
31. {
    9 j9 L: ^5 [( T% s/ H9 o6 X  O
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    9 Z% Y  |0 {1 }
34. 
    3 D& t1 K8 b- i
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    / S" e- z5 }: Q/ S
37. char   buffer[10240];
    
38. 
    5 Y- B; N; v, h* Y& u1 h3 {$ g
39. const   CStringA   sa(request);
    
40. int   length   =   sa.GetLength();
    
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    % e. \' _; [/ p% N4 U2 {" ]+ G
44. struct   sockaddr_in   sockaddr;
    " Y) B& q5 t3 I; N) I
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    ) o' e/ J% I* q2 r* |4 ~4 e" r
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    / a. h5 J6 a1 {. C8 n
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));
    & p1 S7 O2 K9 _* c* s6 E
53. Sleep(20);
    ! S$ h$ i" y7 C2 A, e( }0 _+ d
54. int   n   =   send(s,   buffer,   length,   0);
    
55. Sleep(100);
    ( u9 G. F3 S- C: w& s9 h
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    % s9 O- Q- b3 G( k
59. if   (!rlen)   return   false;
    1 A9 |% Q0 s5 @- ]6 d2 Y
60. 
    5 a. ]2 ^) w3 E) K, y8 e
61. response   =   CString(CStringA(buffer,   rlen));
    ' L3 l" Z  j2 b; m/ R2 ~
62. 
    
63. return   true;
    
64. }
    / @3 I9 u$ O2 j8 q
65. 
    
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    3 C& G" G2 e# c  U4 O
69. 
    . u% [1 a! l, a9 J5 V8 G% @
70. const   CStringA   sa(request);
    0 A" i, I+ v2 F9 [. V
71. int   length   =   sa.GetLength();
    , x1 ^; C6 k) {7 |
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    . p9 L) B4 `3 Y7 G, a
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    / Q3 ]1 }' y% j' n
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    5 ?) w1 E$ _4 {& L7 ?
82. 
    , h% A1 ]# A4 s! S0 J% p0 F  V" N
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    ( O! R8 ^7 O4 ]0 k
84. {
    ; W" V" {. R$ {: y
85. int   pos   =   0;
    4 R+ C! W8 b' G+ o+ \7 c7 C
86. 
    4 f7 q& k6 L9 z, t
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    * L5 e. o) A1 G5 W& i$ n$ a* C
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    1 z- }! B+ N/ H$ E
93. status.Tokenize(_T( "   "),   pos);
    % ?9 y( P; K# a; q' A( J7 ^) f
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    8 z/ r+ t( j, S6 Z+ n* k
96. return   true;
    
97. }
    
98. 
    ; u8 Y3 [4 @* {" {
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     - L) }: G8 M& s. c# W! H
101. CString   startTag   =   ' < '   +   name   +   '> ';
     / n) u1 t6 p1 \* _/ ?
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     : x4 `/ ]- r& x; W9 O2 ]
103. CString   property;
     - Y2 e, R1 {3 ^3 X6 z
104. 
     5 Q+ ^9 y. e  p5 v" A( n
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     : X& G  ^  D4 S0 \' F2 }
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     
112. }
     & A6 R7 G4 ?! R+ N6 }7 K; c
113. 
     ! b7 E& ?7 n: \" b
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     
116. {
     0 N7 W0 K% Z. {% y: h  f
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     
119. }
     
120. 
     
121. MyUPnP::~MyUPnP()
     
122. {
     
123. UPNPNAT_MAPPING   search;
     9 ~- r) b% m1 e$ k7 L
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
       q, N' k7 K# A3 P0 P  \) j! ]
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     + s3 E! @; c4 y2 a5 y
128. }
     - ]% q$ m6 a4 x7 T
129. 
     
130. m_Mappings.RemoveAll();
     $ `; a' G# `* j  [5 z
131. }
     
132. 
     8 f! D7 z" \  r* T
133. 
     # w, Z! \* v2 p  G
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     + D  Y, E; s+ w) E
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     9 e4 g# l1 d+ k, q% P' v4 v; a$ X
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     ( ?& p, M' M8 i1 {' V2 ~
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     
145. 
     3 g8 C  x9 [& @+ C) `
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     
147. u_long   lv   =   1;
     
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     6 J% w' B8 \8 L3 \
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     & M' u2 E2 j- B8 t4 m+ H9 d
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);
     2 ]% X; @7 }( K" W( J3 r
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 "),
     7 M6 s% P7 q1 n) W# Z
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     " O( B2 Q4 u7 z* j0 M
160. }
     
161. 
     
162. Sleep(10);
     
163. 
     & [0 n! I+ h& u. G* f1 M! r' S! k
164. char   buffer[10240];
     
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     # G3 J  R3 Q" V
166. if   (rlen   <=   0)   continue;
     ( |4 _* g0 J5 \2 {: K+ {
167. closesocket(s);
     6 S; q7 P5 V6 P6 r' q: T# _
168. 
     - P: Z( |# Y$ d
169. CString   response   =   CString(CStringA(buffer,   rlen));
     
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     
173. for   (int   d=0;   d <NUMBEROFDEVICES;   d++)   {
     5 x  i# k7 u" y1 K9 ]
174. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[d][1],   devices[d][0],   version);
     
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     & E% P. V7 m2 G/ W
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     ) h+ x- v5 j* M" ?  ~0 a7 e
181. if   (name   ==   _T( "LOCATION: "))   {
     9 K7 X' Z/ _9 T1 t& P
182. line.Delete(0,   9);
     
183. m_description   =   line;
     # A( u$ e1 Q4 `% t5 q1 y
184. m_description.Trim();
     $ w) G) a1 I( v: p9 {* E. ]% u
185. return   GetDescription();
     
186. }
     
187. }
     6 F5 P; e) J9 ]9 S
188. }
     
189. }
     ! Q# v1 P' Y- j% |
190. }
     6 [; d; c& R7 B' M/ }) H
191. closesocket(s);
     
192. 
     
193. return   false;
     / K$ H2 \& x# ]
194. }
     

复制代码

天云上人

以下有关upnp的接口来自emule，
: D3 A/ A$ q5 c6 A6 O
) C; R5 R, B- v! ~- C
# E+ T. K7 d, K, ~( T///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
" R* N  Z# ~" |/ q# d( [
/ z/ m& P, d6 ?  V% X8 S$ J) Y+ o
#pragma once
6 h) T' [1 J& a6 e#include <exception>


  enum TRISTATE{
        TRIS_FALSE,
        TRIS_UNKNOWN,
        TRIS_TRUE
. @3 ]; ?0 A. G1 r! t2 {7 O};
4 f* E& \- Z# y7 e/ L( e3 |
; Q, C+ U" v" m: E
enum UPNP_IMPLEMENTATION{
+ i+ }6 _5 E7 H4 X2 }% H* n        UPNP_IMPL_WINDOWSERVICE = 0,
$ F% D: E6 Y+ @        UPNP_IMPL_MINIUPNPLIB,
$ T" O! P+ }+ O6 H: {+ N        UPNP_IMPL_NONE /*last*/
};
' t: T4 L2 `! r, g
. G) r& L* U9 w4 Z* ?( o/ _+ g


class CUPnPImpl
# r$ W. \0 w" x6 `{
public:
. S0 @3 U8 _: g4 b3 _        CUPnPImpl();
        virtual ~CUPnPImpl();
# M, g% E+ B6 M) \2 {8 }+ w* D; G        struct UPnPError : std::exception {};
+ D9 i" Y3 r  e& n* ]* E        enum {
: I8 U0 k) e$ m% g+ s4 P                UPNP_OK,
3 g% O  @% G0 y  n, T4 m7 \" s; ]/ {                UPNP_FAILED,
0 A7 ^: w- {! Y4 n; [, w3 L( O; b                UPNP_TIMEOUT
        };
0 w" N3 h  R" \! b2 e

        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;
' U- O+ t, S9 N5 }: Z# k; r        virtual int                GetImplementationID() = 0;
8 G0 @  H1 `- l/ ]5 o       
        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
/ M& {* s( |# w: g8 H% i5 p

        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
; M6 _1 {4 S/ r. Z        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
- t# T0 ?. v/ g+ m( A9 \" M1 m9 c        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       


2 o$ ?! G4 s& n// Implementation
protected:
0 }' _$ P& c0 r        volatile TRISTATE        m_bUPnPPortsForwarded;
' z0 B) L$ Y& ]3 q        void                                SendResultMessage();
        uint16                                m_nUDPPort;
" ]8 u( S$ T6 J" u; q! ^' |; g        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
6 J) E. ]! E$ f  @" b1 L4 C
+ c  j7 r6 \& l0 k
private:
        HWND        m_hResultMessageWindow;
+ t# A0 @" ^/ ^3 m, d' f' |0 P        UINT        m_nResultMessageID;
. a7 g( Z+ N2 T! @: T

" }( @) z& b% o4 b- R6 ^};
1 k9 D- i; {: D5 o6 `/ Z0 k

// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
6 a7 F, ]2 H! |$ k7 l! A: Hpublic:
        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
- t" `3 ]4 i3 A9 R- S};
$ r& n2 s6 a' V- e0 ~

  N6 `% W, c4 p5 y/ |6 {/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类


! ]# A& g' m" J! t; Q/ I#pragma once
7 [, l. t; k) j#pragma warning( disable: 4355 )
7 Y1 ~  o  {& e# q4 y& [  n9 ~
/ q: W6 b* [. \  f# W) D3 E) _
& A, p3 Y+ \. W* \$ j#include "UPnPImpl.h"
& \' s( N) _7 x9 F#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>


- @$ m: T* o! k$ V- H& @* S% s#include <vector>
; W% L9 P4 t& Q( S+ D3 o8 m- G#include <exception>
#include <functional>

1 n; c, T' L/ V9 h- e! H/ n- y
" o' L8 Q% k- ~! @% c& M7 f3 j
3 U8 s1 H& X+ _2 @! @" \$ u
typedef _com_ptr_t<_com_IIID<IUPnPDeviceFinder,&IID_IUPnPDeviceFinder> >        FinderPointer;
+ C# V- g  J1 H" B2 F. Itypedef _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;
# ]/ L: U5 J/ h! e) C  `8 _& jtypedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
4 r- S+ ~( W# H; s8 H( m* Xtypedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
( C: a. X! W1 c% b% F$ B1 Xtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;
, L' m2 @& q2 z5 h
  C4 P* {9 _: t9 q  f5 ^
8 @; o" u. {+ `; Z; k8 c* Utypedef DWORD (WINAPI* TGetBestInterface) (
) a  d2 y+ }' ?  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
* f$ O- }" K9 I( ?);
8 x8 R) c6 |6 D# h

, d+ X4 Q  J9 R" F% utypedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
5 o2 s8 W- H( e" p" V  BOOL bOrder
5 s! W# C% }% E);


typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
);


CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
' k9 q4 j7 A* C0 {) K
! |* i" |# \2 K$ X$ V
class CUPnPImplWinServ: public CUPnPImpl
! L5 c' ^# A2 S  l% e; z* m{
        friend class CDeviceFinderCallback;
/ x2 }( n& v9 Y: N0 }        friend class CServiceCallback;
6 k* D+ a2 ?* z" r) v// Construction
5 Z: G' C6 Q3 C( upublic:
        virtual ~CUPnPImplWinServ();
0 y" Y* O; n) M        CUPnPImplWinServ();
# z% u+ \$ U9 D8 n: e

        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
- H, K4 ]: y+ N) n, a1 p        virtual void        DeletePorts();
        virtual bool        IsReady();
, X% i0 M, G. x8 v* O4 r0 ~8 Z        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)
  _' F0 w& w- t4 R2 R4 W7 b        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
        virtual bool        CheckAndRefresh()                                                                                { return false; };

9 N5 S- Y! J) Q* a" j
protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
. B+ R. c  k- W7 G3 G4 L        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
8 D2 O8 e. G) T4 |, ?+ b5 V        void        Init();
6 |0 I) W4 q0 f# Y
& Y3 Z' Y+ b- h; }. z4 `+ [. L8 ^
2 {+ O$ T7 b4 f9 n. u        inline bool IsAsyncFindRunning()
        {
. x" s8 \0 W6 n5 i! S5 m                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
$ T; a1 C$ I% s- f0 u3 ~8 y- j                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
; C# s4 y# A: q' p; G- y0 p                        m_bAsyncFindRunning = false;
                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
% M* }8 d& V" m                {
! u# d6 K- d+ y' s9 L                        TranslateMessage( &msg );
6 t! W2 ]' m3 C7 T- L- I                        DispatchMessage( &msg );
                }
! r- z( C3 o$ E( y' C                return m_bAsyncFindRunning;
        }
( B) O4 n% i/ q& @, f7 @- I3 v

        TRISTATE                        m_bUPnPDeviceConnected;
; G' u& R0 T6 E
1 }5 S. S8 g; |" |; l2 w
% f9 i& n3 E7 f, p// Implementation
        // API functions
# \( C& v- |$ M* {        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
% ]- m- b9 f& e% g% S$ K        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
2 z4 `/ X- a2 j. z6 a        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*);
        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);

& a; C( Z! d8 c4 Z
        TGetBestInterface                m_pfGetBestInterface;
        TGetIpAddrTable                        m_pfGetIpAddrTable;
        TGetIfEntry                                m_pfGetIfEntry;


        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
1 g; |- K/ p6 h                result_type operator()(argument_type device) const
* Q1 ~$ R2 P% f, X. I! a/ h- ]                {
! c4 \- q: H* t1 Q  F1 [! P0 H                        CComBSTR deviceName;
, G. m0 t" K7 ?5 _9 y                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


% b3 j. H$ s' ~) N                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

7 ]8 l! Q! z6 |0 f6 N  G2 `
2 o1 Z9 n  L- \2 Y- @  y! Z                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
: }6 w/ U. q" J( T! i4 K; p- A                CComBSTR m_udn;
" T3 v4 t9 o9 l  h4 e: U6 l! t        };
       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
/ t) j# |9 P) ]; T! {        HRESULT        GetDeviceServices(DevicePointer pDevice);
6 R+ p8 w6 V1 X0 G        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
+ D$ M9 W% K7 Z. R* ?        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
        void        StopUPnPService();

  J2 |0 v& B) k; ~9 f
        // Utility functions
1 U/ ^/ e$ f- b: q        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
. M/ `: S" ~& U& y6 }6 z        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
: i% }7 @2 }7 W0 Y        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
; ?. E" i% ]/ H" K' o        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
! F5 @. ~3 |4 m) p
* @3 K) c. h* M, e3 H5 X
// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
" S: u' ?% w- G" p& b        std::vector< DevicePointer >  m_pDevices;
        std::vector< ServicePointer > m_pServices;
) {% }7 V8 E% Z  A2 W        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
1 l6 R7 \% y6 @+ o9 [6 K& ^1 F: \& g* }        ServiceCallback                        m_pServiceCallback;

) e! ~3 [7 L' J
: d! V9 @6 u$ Y/ j" C' [. X, E+ G        LONG        m_nAsyncFindHandle;
4 b9 X7 J/ Q6 E5 ]        bool        m_bCOM;
        bool        m_bPortIsFree;
6 k4 r: {$ x) E$ M        CString m_sLocalIP;
        CString m_sExternalIP;
" I( P5 w; [) A        bool        m_bADSL;                // Is the device ADSL?
+ ^. t6 y1 ]; ]0 g: o        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
# q( v. I, m1 U3 k* J        HMODULE        m_hIPHLPAPI_DLL;
% I7 h3 k, F" _2 i/ _0 E        bool        m_bSecondTry;
7 e3 I& b, U" d2 M8 i        bool        m_bServiceStartedByEmule;
# ?9 I) A( b. j, b% J7 ^9 ?        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
5 q2 ]* @- l# e% w* s7 L2 x
* |+ c- y, v- N0 O3 @+ F: N. Y
, U1 Q1 F, S2 L+ k! `% w- K};

* i9 ]" P8 W4 r- C
// DeviceFinder Callback
class CDeviceFinderCallback
        : public IUPnPDeviceFinderCallback
0 k& i2 ^- K; Y' s3 K{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
0 ]5 t' F+ U- h6 P9 c* V* [
! f! e* e* V  V6 t( {- e
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
* [, A6 {9 L) p+ Z" s& f* X   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();
% ^' \( \/ r% O, J' k( H

// implementation
+ W7 ^8 U) B0 v0 R! wprivate:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);

/ ~' r. R6 ^: Z1 a+ |
private:
        CUPnPImplWinServ& m_instance;
/ R* ]1 a% J5 |; r- N1 C& @. g        LONG m_lRefCount;
};
: I6 o9 ]# j$ o

// Service Callback
class CServiceCallback
, @' A9 x) X; j1 ~$ Q$ ^0 I& y& G- V        : public IUPnPServiceCallback
{
, z% ~4 l- Y  ?% ]5 h/ Jpublic:
5 k/ c% o* {- C3 m4 K. R        CServiceCallback(CUPnPImplWinServ& instance)
/ Q, n9 W, t, H                : m_instance( instance )
% Y  `0 C' v. ?1 l        { m_lRefCount = 0; }
   
" ?( m1 a0 O8 m$ P   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
* E1 t& k. j8 B( u! F4 T% ^   STDMETHODIMP_(ULONG) AddRef();
# D: C3 ^9 P4 n4 W6 x; }+ G   STDMETHODIMP_(ULONG) Release();

: l  I, W% U  \. B
8 c* A( ^' M& x  f// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
* K* w# P" d2 L( [7 Q
3 s6 h9 c( z- P5 Q# G
private:
        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
7 a, \- V2 `5 M, f8 f};
6 P- c7 ?" O( g/ s/ r
* u. o) k. z4 `. ?+ i/ m
2 ~2 a; d' @+ @% Y5 G/////////////////////////////////////////////////


- i: ~' H; t8 t) a使用时只需要使用抽象类的接口。
$ B3 h8 ?0 N' gCUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
' \! L* _' u# ?0 Q7 w3 A& n7 @CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
) ]& d# y+ Q# {; g0 p$ K3 JCUPnPImpl::StopAsyncFind停止设备查找.
) H, `% m! i% ]: W3 T( W- v: nCUPnPImpl::DeletePorts删除端口映射.