UPnP

天云上人

/*uPnP.h*/

1. 
   
2. #ifndef   MYUPNP_H_
   . R- X" B! @! Q1 W" O, `
3. 
   7 a, ?/ V1 M  o5 C* a3 B- Z# a3 M
4. #pragma   once
   
5. 
   # Q  A: v/ h- N$ D; R; G% h
6. typedef   unsigned   long   ulong;
   " X& g/ P1 Y9 k
7. 
   " R3 p+ B' e% N+ M5 g1 o. ?
8. class   MyUPnP
   
9. {
   7 [0 m- e: G4 Q9 ^' j
10. public:
    * t, J- C) G; E0 q4 [
11. typedef   enum{
    7 x0 N5 A# @8 W# 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
    - F* ^2 M! {: o; H
15. UNAT_EXTERNAL_PORT_IN_USE, //   Error,   you   are   trying   to   add   a   port   mapping   with   an   external   port   in   use
    5 G& E5 }) S1 N# Q7 h
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    
17. }   UPNPNAT_RETURN;
    
18. 
      ^* |+ x4 Q5 F" `
19. typedef   enum{
    7 \4 W) s+ p2 p. \4 q  Y
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
      P2 C/ K) ?) Q
22. }   UPNPNAT_PROTOCOL;
    
23. 
    / f" O+ o: p6 g# o# P  K( v
24. typedef   struct{
    
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    ' ?: t! j. Z& B8 L+ a$ q' o% o
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    ! n4 R* g0 I, |1 {) R7 ~3 B
31. MyUPnP();
    
32. ~MyUPnP();
    " ]: t, }' M/ l
33. 
    3 k6 A' e: a' F3 m
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    7 ?0 K& S" M" M- |- H
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    . m3 b0 _: R, O  R8 v2 T9 v7 `, o- g6 v
37. 
    , @' G- X' |7 }3 r: H
38. CString GetLastError();
    
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    # \2 [9 a! `) i+ }% _- \* |$ p2 `& K
41. bool IsLANIP(WORD   nIP);
    - o. N& X1 }. l# `4 {1 t
42. 
    ! d" N4 I; G  v' b
43. protected:
    % c( f! P) ?% x5 ]3 p1 x% {* S
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    ) r) W4 y& f4 p, Z
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    5 X4 A1 t2 ~3 o* Q9 S
48.       const   CString&   descri,   const   CString&   type);
    
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    - c7 j! e0 ^. ^. y, e
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    2 f: o2 D5 q/ x; |. x/ n$ d: w
52. 
    & O9 X& k# F* q
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);
    " u- j! J3 I6 Q# j. l
57. 
    
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    . W  k8 @3 ?! @! ?# P7 e' H
60. CString m_devicename;
    8 [5 g) a& B) }- W
61. CString m_name;
    
62. CString m_description;
    " q" P. [& Z- ^
63. CString m_baseurl;
    8 ~1 K' P' F0 X$ `& e8 d( P# y
64. CString m_controlurl;
    
65. CString m_friendlyname;
    % F; [* X' X9 s* M  L9 Q' F
66. CString m_modelname;
    3 M% j. t/ R( G' }: `) T$ j* j
67. int m_version;
    
68. 
    
69. private:
    6 X) S/ |4 B8 R1 k4 ^8 P  Y
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    
71. 
    
72. CString m_slocalIP;
    8 j+ G# g3 L. E5 z
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    2 @1 l- i4 m& ~' S( r- J/ j2 W7 r
76. bool isSearched;
    
77. };
    & ^5 J% M: @5 |9 s; e( \1 R, m
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
   3 W+ N4 B5 z( X2 B9 @
4. #include   "upnp.h "
   
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   + F+ e1 A* H. }! b* R5 P" k
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   5 b- _: D7 o6 ~- s
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    - {) {  G  c1 h; W  G
11. 
    
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    , T( l  y0 ?% R. F# K
13. static   const   int UPNPPORT   =   1900;
    
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    ( N% Q0 |4 ~0 n7 N9 a/ v8 o4 y2 r
15. 
    
16. const   CString   getString(int   i)
    # P6 d, a* k0 q9 ^
17. {
    
18. CString   s;
    ' v* F$ V% K: w9 R6 m
19. 
    % x5 N% _7 G. v" I
20. s.Format(_T( "%d "),   i);
    / Z2 ^  u2 t2 t
21. 
    
22. return   s;
    
23. }
    
24. 
    
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    0 x0 g& k' }8 a. Y4 \7 }
26. {
      \7 y9 e, \% I* y1 o
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    1 b4 t& s% r# U2 N; Z1 C/ w
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    9 e6 q/ p. t6 R# l. Z5 h' `
31. {
    
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    ; \7 S1 ^- [* g; a% n0 {
37. char   buffer[10240];
    8 V8 V+ V+ s$ A7 Y  c! F
38. 
    
39. const   CStringA   sa(request);
    , m4 w# v: p6 q* Y; G; I
40. int   length   =   sa.GetLength();
    9 z6 d. ]7 a& n- r
41. strcpy(buffer,   (const   char*)sa);
    8 D  X5 H" W! F( V6 p: i( y$ i
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
    5 R, G8 x* y$ H! O2 t- Y- z8 n7 ]
44. struct   sockaddr_in   sockaddr;
    8 w3 v" O6 @" p- d
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    + \; C1 {! z9 D; b* h( J
47. sockaddr.sin_port   =   htons(port);
    " T, j6 e' n, ]
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    8 ]- E/ P, C2 V) C% L7 U% @
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
    . S# n- ]; a: H  B
55. Sleep(100);
    ; Y  w  V1 p$ n$ R
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    # M) T$ x8 U: q4 v6 c, [
57. closesocket(s);
    ( Y- y6 h2 A8 h. b$ [, b
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    : M. g9 j  R5 J0 s" h
59. if   (!rlen)   return   false;
    % x8 h; y0 L3 x; N4 W& g6 ~
60. 
    
61. response   =   CString(CStringA(buffer,   rlen));
    
62. 
    . ~) ?5 S* Y9 {1 L1 ~! H4 r
63. return   true;
    
64. }
    
65. 
    + n" E% n4 H6 G- e7 m& S8 i' s
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    7 Y1 y; g$ }+ ^) {# [5 L
68. char   buffer[10240];
    6 u7 B# I; q: p% S
69. 
      S, w3 r) K4 c: Z) {
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    / t* m5 b: X! S$ s7 ?( H
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    
76. sockaddr.sin_family   =   AF_INET;
    
77. sockaddr.sin_port   =   htons(port);
    ( w) F7 p6 p% m( E
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
    * H2 J  x; e- w: L
79. 
    * H! E: \1 Y) }) B
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    8 E4 w* u' }+ A1 E& Z( b
81. }
    2 {7 S* [( K, }8 X5 i6 w5 f" J
82. 
    
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    6 V, Y; s. a5 U' x; F, Y9 ]
84. {
    
85. int   pos   =   0;
    
86. 
    ; g4 T- w% m% _$ Q- `
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    
88. 
    
89. result   =   response;
    / o3 x5 j, B8 n8 @' e7 B
90. result.Delete(0,   pos);
    
91. 
    
92. pos   =   0;
    ( \& F. a  U6 a# P. _0 z( f6 W  m* X3 o
93. status.Tokenize(_T( "   "),   pos);
    ' ^* R% l! N8 T& Q3 p$ i
94. status   =   status.Tokenize(_T( "   "),   pos);
    1 D' _- q* [$ O
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    0 J' P& |8 U3 p! p; D, i
96. return   true;
    & d& q& k  N6 d2 d7 l. s5 l
97. }
    9 x4 v2 F5 E. e# g8 o, D- b
98. 
    + T2 `8 t+ f! e5 W
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     
103. CString   property;
     ( M4 {  p! L' i* Q# C
104. 
     / G* N  u. g% z& f& w$ Q
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     
107. 
     # x! y) f7 g6 g8 J' z' o! v# o
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     
110. 
     
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     ; Q9 |2 m! H. y* X2 R
112. }
     + k5 w! f+ U9 e/ F
113. 
     : R/ P5 Y  ?8 ~9 G& I+ S
114. MyUPnP::MyUPnP()
     
115. :   m_version(1)
     ! |) ~2 o2 ~2 `" L1 W, Z
116. {
     
117. m_uLocalIP   =   0;
     " j- K$ q0 _4 H. _& b4 h* T8 c, |
118. isSearched   =   false;
     
119. }
     
120. 
     ! |& a! ~6 v# M4 A* i9 p
121. MyUPnP::~MyUPnP()
     
122. {
       v0 y2 W, `% z/ W' a. `
123. UPNPNAT_MAPPING   search;
     # g3 Y, @0 ?8 \1 m* j
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     . Y  P2 H, m  _; J  i
125. while(pos){
     
126. search   =   m_Mappings.GetNext(pos);
     
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     5 y* {) e: ^; i5 M& N
130. m_Mappings.RemoveAll();
     
131. }
     
132. 
     2 \2 O% w; M7 |) z% P5 I
133. 
     
134. bool   MyUPnP::InternalSearch(int   version)
     # s! d, W$ m2 o+ L% ]; X5 n
135. {
     ) b: p8 w9 @- G! `0 t
136. if(version <=0)version   =   1;
     
137. m_version   =   version;
     
138. 
     
139. #define   NUMBEROFDEVICES 2
     ( R4 ?# T% o+ u( h* I
140. CString   devices[][2]   =   {
     
141. {UPNPPORTMAP1,   _T( "service ")},
     
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     
144. };
     ; ]# ^2 f, d. \1 D
145. 
     
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     ) w: e! ]' {+ U3 b0 a. g4 {9 ]
147. u_long   lv   =   1;
     0 i/ ]( \9 Z( m1 Z- r, _# W7 f  E5 O" u: G" p
148. ioctlsocket(s,   FIONBIO,   &lv);
     " z8 p' d2 X3 _7 [9 _; x; v
149. 
     
150. int   rlen   =   0;
     
151. for   (int   i=0;   rlen <=0   &&   i <500;   i++)   {
     
152. if   (!(i%100))   {
     
153. for   (int   i=0;   i <NUMBEROFDEVICES;   i++)   {
     
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
155. CString   request;
     6 j1 d8 c9 t3 i" ?. [  q
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);
     + G) q- r: \" p4 ]& b5 a" @! S
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     
159. }
     
160. }
     & \  V- @+ f& J- f% k6 D; s
161. 
     
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     6 C; y0 a# ^: T5 \  `
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     
166. if   (rlen   <=   0)   continue;
     % a9 Q! i6 Y" y. p1 c% M: I1 D
167. closesocket(s);
     " t% S& k' v3 J% d4 E; |/ _
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     , y( @% |% ?/ g. X( s% F$ Z
170. CString   result;
     
171. if   (!parseHTTPResponse(response,   result))   return   false;
     . k* U/ y4 p0 G, C# n+ F; x2 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);
     # k. y  c$ |; S( `1 z0 G
175. if   (result.Find(m_name)   > =   0)   {
     . y) u% [" O- W  ?( x, [3 H6 s' `
176. for   (int   pos   =   0;;)   {
     . _0 r9 {& ~) `5 ^, S
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     - m" {/ Q3 {9 e: Z7 a% k: M
180. name.MakeUpper();
     1 c; h! C: f( q4 i! x
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     
183. m_description   =   line;
     # u! \* X1 U. r$ Y- A
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     , V( k5 C. c5 {
187. }
     
188. }
     ; l5 t7 F9 g/ w8 k0 M
189. }
     
190. }
     . V6 l0 x+ P" q3 p$ c
191. closesocket(s);
     
192. 
     ' |+ c! N4 I  V! x) L% _
193. return   false;
     
194. }
     ( L( x* y' s) I

复制代码

天云上人

以下有关upnp的接口来自emule，
! y7 B# `' e( Q5 t5 w

///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.


& o" G) i9 ]& u% o6 r" L, ?#pragma once
: M" ^9 @1 {+ ]3 ^' l# ]9 _2 y; d#include <exception>


  enum TRISTATE{
& e, F7 A7 `5 C  X. Y6 Z2 q0 ^' C        TRIS_FALSE,
- Z( h) q$ c2 B% E) p/ T- N( E        TRIS_UNKNOWN,
        TRIS_TRUE
$ A. l& }; j% Y5 @" \};


& ]$ w. l! b) a, Genum UPNP_IMPLEMENTATION{
5 s* Z* Z8 B" k5 k) r        UPNP_IMPL_WINDOWSERVICE = 0,
2 |! j9 @1 O5 m        UPNP_IMPL_MINIUPNPLIB,
$ A4 F. B: T2 g+ O$ p- }7 @" u        UPNP_IMPL_NONE /*last*/
};



7 A% N( C! S$ I( d& R( j
) r1 f8 K. v7 m2 pclass CUPnPImpl
{
public:
% I. b" q) L2 t& J1 D        CUPnPImpl();
        virtual ~CUPnPImpl();
" E, n. m( C: c        struct UPnPError : std::exception {};
        enum {
                UPNP_OK,
/ K. _0 E' S9 B2 {* E, Y  a                UPNP_FAILED,
                UPNP_TIMEOUT
        };

: V8 K5 m! S  d! x
6 a8 d7 `( Q8 Q. [" E- R        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
6 Q, G2 y5 b5 Y7 ?2 A        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
/ O; U" @# O# N. R        virtual void        DeletePorts() = 0;
4 w+ z$ ~* [3 F4 V+ P        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
9 P! S1 C8 w2 `: p; m       
9 B9 f6 U# {. K; D/ v4 _0 e1 O8 y+ K2 N        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
4 C) ^6 O' `& S8 O5 o( h
7 S0 L- O) Y* e. n" o+ B2 \
  A* u- m. z6 P; k3 X1 h        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
* d" \& j4 j4 }# f7 S( {) L        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       

  A7 n) Q- t% Y/ U; W
// Implementation
protected:
        volatile TRISTATE        m_bUPnPPortsForwarded;
8 P9 I; ]) M( o# l' K        void                                SendResultMessage();
        uint16                                m_nUDPPort;
% L7 u/ j3 h( ~8 @  h$ U        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
        bool                                m_bCheckAndRefresh;
/ X" O! s9 m  q
/ Y% \7 T! C; v
7 ?  m: R3 Q5 K7 C, e2 M  Eprivate:
        HWND        m_hResultMessageWindow;
        UINT        m_nResultMessageID;
5 m7 e% L5 L8 ]# \1 \/ F) e
! y) ]( L/ D! O  \3 j1 I: Z& X
};
* `/ J: \; n, g  _' u
' h% L7 P. p' l
+ [( ^( `" @) B& x// Dummy Implementation to be used when no other implementation is available
9 V0 ]3 D7 L. H" m- D. Y+ A4 Uclass CUPnPImplNone: public CUPnPImpl
{
. D( T5 T% @; b/ p) W; \0 tpublic:
4 F0 @% M" w6 i8 O# z: S& b        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
, \5 ~2 ]5 B' s8 I( k        virtual void        StopAsyncFind()                                                                                        { }
        virtual void        DeletePorts()                                                                                        { }
3 f) ^& V' d0 V: c* T        virtual bool        IsReady()                                                                                                { return false; }
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
: A9 j3 |  {( m: |! E- p5 M% G};
  P7 v2 n. m4 \' _& s0 t
5 H8 `" U6 n$ b  p8 O
& \8 v; o; M3 o# Y1 G4 ~  y0 y2 l/////////////////////////////////////
//下面是使用windows操作系统自带的UPNP功能的子类
# A% j) @! D0 s
. |( x- y8 Y/ Q* u. ~7 O; p
#pragma once
6 b# R3 H; M: g& M#pragma warning( disable: 4355 )


#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
#include <comdef.h>
#include <winsvc.h>


#include <vector>
#include <exception>
#include <functional>
: h8 T0 A0 P. u7 a8 i& Q3 c
6 M0 Y5 j/ b1 Q$ ^- t7 A9 d2 _
! ^+ j$ A/ W0 u* G

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;
typedef        _com_ptr_t<_com_IIID<IUPnPServiceCallback,&IID_IUPnPServiceCallback> >                        ServiceCallback;
typedef _com_ptr_t<_com_IIID<IEnumUnknown,&IID_IEnumUnknown> >                                EnumUnknownPtr;
. q3 k9 d1 ?% l' P0 [typedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;

: d& g+ {1 b; r  }4 _
1 X# J: Y( s& E" V! `; b" ]typedef DWORD (WINAPI* TGetBestInterface) (
  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);

* a* M! D. o* x- Z* c; Q9 R
typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
  PULONG pdwSize,
% q5 d% c/ k( W; d2 i  BOOL bOrder
);


! b* j. Q7 Q7 Z' G0 \typedef DWORD (WINAPI* TGetIfEntry) (
  PMIB_IFROW pIfRow
0 z( v1 t- ~3 R# F);
0 R+ w' z+ F5 z9 E, D% V$ }$ J

CString translateUPnPResult(HRESULT hr);
HRESULT UPnPMessage(HRESULT hr);
3 J. O; d7 C5 Q% g2 M" l* V

class CUPnPImplWinServ: public CUPnPImpl
) u- g0 P; X. l  I5 E8 m, D{
        friend class CDeviceFinderCallback;
: A" A. |/ Q$ u/ R2 D, e* s2 x        friend class CServiceCallback;
3 G0 k5 }8 |7 V. u  E( D+ y// Construction
public:
        virtual ~CUPnPImplWinServ();
/ U8 s2 @, D2 w- }        CUPnPImplWinServ();
7 \* d9 T* t* E5 z( G) k% y
5 l: }$ j* X: l$ K5 L3 v  p  S
" m3 |0 e" i5 h5 Z# i1 L        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
% h- e2 k! w4 m6 g; M1 R        virtual void        StopAsyncFind();
9 f2 g( e- S1 Q' Y0 u0 I        virtual void        DeletePorts();
  C0 t! M3 Q- Y# o7 k; w) x        virtual bool        IsReady();
: Z& M; N# Y; j4 s( C0 E        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

% Y: k$ y2 r" C
& J# M" ]: G$ Z        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
0 j, n4 T$ F( E4 Y        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
% U( @( L$ i6 n; u. N        virtual bool        CheckAndRefresh()                                                                                { return false; };


: }- b# L: k  V+ {" l; tprotected:
) \' ?3 b$ _0 X        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
        void        Init();

+ p/ @; ^6 b7 }
  v! `; c) N2 K8 M4 v9 _1 q        inline bool IsAsyncFindRunning()
5 x: \! ^2 Y4 d9 W' j        {
0 O. e6 ?# [3 C: y9 F                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
0 X- s* y; P/ ^6 D" S6 o                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
                        m_bAsyncFindRunning = false;
1 `# M' C. c2 _                }
; C! G" T$ [/ i3 O* s0 d, f& z                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
4 H; X$ c0 `' P+ C/ H! v. F                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
& b) x. G- K4 x  e                }
                return m_bAsyncFindRunning;
        }
6 n% s$ e9 W- `& r4 @. [; L: L
( O" I) f$ a4 L! P, ^! `1 r4 f
        TRISTATE                        m_bUPnPDeviceConnected;


2 R8 j- ?( a% K" v3 C4 R) D+ s: x0 t// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
& m7 B" h+ U; c2 S        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        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);
( }+ D) c. J$ T
# x+ B" ?/ L9 v2 P
        TGetBestInterface                m_pfGetBestInterface;
; `) p7 z: [9 j5 g3 b8 U" _! {        TGetIpAddrTable                        m_pfGetIpAddrTable;
" c7 ^/ ]$ m; |7 W' c/ Q        TGetIfEntry                                m_pfGetIfEntry;
9 R8 d1 N# N" V" V
- f& G9 ~. e. q
  E8 v4 L  d8 ~, l; v        static FinderPointer CreateFinderInstance();
        struct FindDevice : std::unary_function< DevicePointer, bool >
9 o; i( J7 @% A7 |6 Q        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
  `3 j6 l. d' n/ l                {
( y5 w5 {0 @7 v  n                        CComBSTR deviceName;
. h  b( O: u. L4 |% d                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );
( d; m* E+ v5 V: L: O, V
' q6 G" p) m0 U- W6 E2 ~. S. }  F
  o& X+ z; T2 h$ k# f                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;

7 M1 F. |) ?# u9 @, d" r' Q5 n) |, A
                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
! ^, u8 z' ]0 B( C( k# B                CComBSTR m_udn;
& O) z% ?. @  a8 f        };
       
  n7 H* S+ ?4 ~- k$ }, v6 O        void        ProcessAsyncFind(CComBSTR bsSearchType);
, h! m+ `1 E* U2 I        HRESULT        GetDeviceServices(DevicePointer pDevice);
$ B. c- Q. m1 z+ r8 \( K" [        void        StartPortMapping();
        HRESULT        MapPort(const ServicePointer& service);
% f6 W- o/ Q% W/ U% F        void        DeleteExistingPortMappings(ServicePointer pService);
, V  J0 @6 H. n, [        void        CreatePortMappings(ServicePointer pService);
        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
6 W1 ]7 \% O- y- y; j        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
                LPCTSTR pszInArgString, CString& strResult);
. z5 }& L( ?' e* F2 X3 c- o$ w        void        StopUPnPService();
) N3 k0 @. S  \! d1 D

& S! V1 m+ }+ [        // Utility functions
: `* U9 h9 W! _( W! ~        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
0 I; C, @! E/ z6 E        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
: }6 B7 I, t, e7 ~6 B, m2 l- h        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
2 o& f, J0 i6 X$ I        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
# T/ I$ h# d. C; |8 A: [        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
        CString        GetLocalRoutableIP(ServicePointer pService);
/ t3 E( f' k' w7 b  J  f( D- B/ F

" K# ^' {9 Z" W4 K5 f8 y1 K// Private members
private:
        DWORD        m_tLastEvent;        // When the last event was received?
        std::vector< DevicePointer >  m_pDevices;
1 N- b2 V+ X: H9 f( ?5 o: o        std::vector< ServicePointer > m_pServices;
4 E$ H4 g6 ?$ A$ ~- }4 Y! ?8 q        FinderPointer                        m_pDeviceFinder;
        DeviceFinderCallback        m_pDeviceFinderCallback;
        ServiceCallback                        m_pServiceCallback;
6 l! W# E' X. N' Y
* B' L! T  D3 }3 u7 S
5 f7 D* }' c* [        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
& S5 z1 Q- L$ i; t! F$ _        bool        m_bPortIsFree;
        CString m_sLocalIP;
        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
        bool        m_bInited;
        bool        m_bAsyncFindRunning;
        HMODULE m_hADVAPI32_DLL;
        HMODULE        m_hIPHLPAPI_DLL;
# V$ Q4 I& |' R" E$ w        bool        m_bSecondTry;
, p" F* Q# m2 b; w        bool        m_bServiceStartedByEmule;
* [" o1 n. Y* [, N+ n8 `        bool        m_bDisableWANIPSetup;
        bool        m_bDisableWANPPPSetup;
- ^) K' m" e+ u4 A' e: X: Z
- Z( r5 K9 U0 c, w" D) `  k; D
};
. O+ ?: z' r1 h* ^) e% O

; O) O( y" [* q# J// DeviceFinder Callback
class CDeviceFinderCallback
: s" r9 j1 V. D* y' l+ t9 c        : public IUPnPDeviceFinderCallback
, @# H9 E* m% `3 u6 P{
public:
        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
) X: C$ H# I" t
8 @0 y( R+ q5 j, `7 ~) ~* e9 [
) ?9 S0 ~' i; q/ d. v4 l! R   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
) `: V% t2 e6 T   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();


/ q% e5 l/ q* }9 N5 s0 L// implementation
private:
        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
2 V# G; f' ~- m        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
        HRESULT __stdcall SearchComplete(LONG nFindData);
; i4 Q2 q) _0 x
; }, [$ ~* ~' W! X/ N
private:
- R/ I9 F' `& r! N        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
7 K0 x+ p$ F' t* H3 ~* ^};


// Service Callback
6 o; S# y# }7 D2 f" x* T  [class CServiceCallback
. u* x3 W  [# h" w9 G, e/ c- L: }        : public IUPnPServiceCallback
{
public:
$ A9 b( q1 X9 O: ~/ F% ^! F        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
( P2 N- K0 c8 P  }8 b        { m_lRefCount = 0; }
& b3 }. P& n  u% }7 h   
   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

6 r' O$ z3 O+ q7 p6 Z% u% \
. U: W: A! F1 p: b' @' b9 m+ n// implementation
private:
        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
$ y1 q4 e) X0 _0 P

private:
. R" Y  z* W( m9 x' O; ]4 R        CUPnPImplWinServ& m_instance;
        LONG m_lRefCount;
+ X9 W+ y5 [( i) G& ?; n+ y% P};


/////////////////////////////////////////////////

" i' }  |4 D$ U9 s0 P- y/ O
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
% a) c  L8 y5 s* K4 L& ^CUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
+ X* Y) b$ u9 q; `8 |' zCUPnPImpl::StopAsyncFind停止设备查找.
CUPnPImpl::DeletePorts删除端口映射.