UPnP

天云上人

/*uPnP.h*/

1. 
   , U! _: G" u; w9 {" M0 c# H
2. #ifndef   MYUPNP_H_
   
3. 
   
4. #pragma   once
   ! x4 j8 y( G3 k# m) l. q
5. 
   
6. typedef   unsigned   long   ulong;
   2 n( v4 d% g  K3 }5 m8 Z% c
7. 
   
8. class   MyUPnP
   " \( X2 j3 i; s" V
9. {
   
10. public:
    ) E3 }* o, e" F7 F, N8 Y$ @
11. typedef   enum{
    
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
    
16. UNAT_NOT_IN_LAN //   Error,   you   aren 't   in   a   LAN   ->   no   router   or   firewall
    : @$ P- }6 Q0 R* T. J
17. }   UPNPNAT_RETURN;
    
18. 
    , ~- T& z3 e! t" i
19. typedef   enum{
    
20. UNAT_TCP, //   TCP   Protocol
    
21. UNAT_UDP //   UDP   Protocol
    % P6 p! A! I3 S  Y7 I9 b* `
22. }   UPNPNAT_PROTOCOL;
    
23. 
    8 A4 X+ e1 B7 h+ `; n/ p
24. typedef   struct{
    9 H6 ^1 B3 k( p+ L7 i( p% M
25. WORD   internalPort; //   Port   mapping   internal   port
    
26. WORD   externalPort; //   Port   mapping   external   port
    
27. UPNPNAT_PROTOCOL   protocol; //   Protocol->   TCP   (UPNPNAT_PROTOCOL:UNAT_TCP)   ||   UDP   (UPNPNAT_PROTOCOL:UNAT_UDP)
    
28. CString   description; //   Port   mapping   description
    
29. }   UPNPNAT_MAPPING;
    
30. 
    
31. MyUPnP();
    
32. ~MyUPnP();
    
33. 
    
34. UPNPNAT_RETURN   AddNATPortMapping(UPNPNAT_MAPPING   *mapping,   bool   tryRandom   =   false);
    
35. UPNPNAT_RETURN   RemoveNATPortMapping(UPNPNAT_MAPPING   mapping,   bool   removeFromList   =   true);
    
36. void   clearNATPortMapping();
    1 m  c+ Y7 s$ o
37. 
    # e2 a- o  ?- f+ F, ]9 ^
38. CString GetLastError();
    6 N4 a) X9 L9 `; r
39. CString GetLocalIPStr();
    
40. WORD GetLocalIP();
    
41. bool IsLANIP(WORD   nIP);
    - [% n  ]& K- A' K+ x5 F
42. 
    $ T+ N  r% i' C4 v6 o
43. protected:
    8 n9 U; O% D. d1 d- t# x
44. void InitLocalIP();
    
45. void SetLastError(CString   error);
    
46. 
    
47. bool   addPortmap(int   eport,   int   iport,   const   CString&   iclient,
    9 r; ~3 M* `% _3 R7 Y4 M
48.       const   CString&   descri,   const   CString&   type);
    3 {1 J) v# U% J  u6 i7 f3 ^8 l
49. bool   deletePortmap(int   eport,   const   CString&   type);
    
50. 
    : f, B( B& ^. I6 u- P4 _
51. bool isComplete()   const   {   return   !m_controlurl.IsEmpty();   }
    
52. 
    
53. bool Search(int   version=1);
    4 M8 y$ _5 B9 b+ s
54. bool GetDescription();
    
55. CString GetProperty(const   CString&   name,   CString&   response);
    
56. bool InvokeCommand(const   CString&   name,   const   CString&   args);
    
57. 
    / {/ O) J5 [3 p8 v* I
58. bool Valid()const{return   (!m_name.IsEmpty()&&!m_description.IsEmpty());}
    
59. bool InternalSearch(int   version);
    4 Z0 F0 g( p- \! a
60. CString m_devicename;
    
61. CString m_name;
    
62. CString m_description;
    
63. CString m_baseurl;
    
64. CString m_controlurl;
    
65. CString m_friendlyname;
    5 c: N! g- r2 c# Q5 X+ e
66. CString m_modelname;
    . d1 |8 A% D, C2 ]. y
67. int m_version;
    
68. 
    ( X$ {5 s5 f+ O& F/ B
69. private:
      b* e3 D9 f' k9 s
70. CList <UPNPNAT_MAPPING,   UPNPNAT_MAPPING>   m_Mappings;
    & j  i1 s! d: P, h: G& j
71. 
    
72. CString m_slocalIP;
    
73. CString m_slastError;
    
74. WORD m_uLocalIP;
    
75. 
    + U, R7 v% j6 }# ]5 I
76. bool isSearched;
    
77. };
    4 s+ e5 n- k7 j- w+ e( X9 |  ]
78. #endif

复制代码

天云上人

/*UPnP.cpp*/

1. 
   
2. #include   "stdafx.h "
   
3. 
     {7 O2 l1 R  x  ^6 ^2 |
4. #include   "upnp.h "
   ' z1 X1 V' m- y& @- \: }
5. 
   
6. #define   UPNPPORTMAP0       _T( "WANIPConnection ")
   7 h0 g3 t- K1 d3 Z
7. #define   UPNPPORTMAP1       _T( "WANPPPConnection ")
   ) ^: r5 g( l, H6 M" i  @* C" x6 I
8. #define   UPNPGETEXTERNALIP   _T( "GetExternalIPAddress "),_T( "NewExternalIPAddress ")
   
9. #define   UPNPADDPORTMAP   _T( "AddPortMapping ")
   , p$ Q1 B4 d( r8 {# D
10. #define   UPNPDELPORTMAP   _T( "DeletePortMapping ")
    8 S; Q2 l7 x& o" `4 m& y
11. 
    6 r( D8 M; c7 ^
12. static   const   ulong UPNPADDR   =   0xFAFFFFEF;
    
13. static   const   int UPNPPORT   =   1900;
    , ?% l1 `6 ]* t  M
14. static   const   CString URNPREFIX   =   _T( "urn:schemas-upnp-org: ");
    : ]+ ^& |, [, A! k) f5 F) L# V
15. 
    
16. const   CString   getString(int   i)
    
17. {
    + s- e4 g: j; B7 N- T
18. CString   s;
    
19. 
      E3 I. D  H: t, `! w
20. s.Format(_T( "%d "),   i);
    
21. 
    
22. return   s;
    . m. |/ d+ |8 E' D8 \8 e% D% {* w
23. }
    $ i& W* W& l% N8 n: r
24. 
    8 Y+ g5 h+ }1 Y9 b: [' f
25. const   CString   GetArgString(const   CString&   name,   const   CString&   value)
    
26. {
    / z7 W- e' U$ ]( R
27. return   _T( " < ")   +   name   +   _T( "> ")   +   value   +   _T( " </ ")   +   name   +   _T( "> ");
    
28. }
    " R/ o# S- O0 b/ k
29. 
    
30. const   CString   GetArgString(const   CString&   name,   int   value)
    8 v$ A9 y1 D, J, \7 @9 {. l
31. {
    ; ^+ D0 A4 d# l+ L6 [# J
32. return   _T( " < ")   +   name   +   _T( "> ")   +   getString(value)   +   _T( " </ ")   +   name   +   _T( "> ");
    
33. }
    5 b! `" `; m$ T  \. Z3 t6 z6 e$ D7 Z
34. 
    
35. bool   SOAP_action(CString   addr,   uint16   port,   const   CString   request,   CString   &response)
    
36. {
    
37. char   buffer[10240];
    8 F+ z" L9 u# Y
38. 
    1 _% w# N* M+ g/ f: s1 `$ a
39. const   CStringA   sa(request);
    9 x, l, h8 T  W) H
40. int   length   =   sa.GetLength();
    % w- k+ i/ @$ G$ S
41. strcpy(buffer,   (const   char*)sa);
    
42. 
    
43. uint32   ip   =   inet_addr(CStringA(addr));
      V) S6 ^% B$ m3 Q( S& x
44. struct   sockaddr_in   sockaddr;
      Z* Y+ `3 _0 n5 l: v, A6 j
45. memset(&sockaddr,   0,   sizeof(sockaddr));
    
46. sockaddr.sin_family   =   AF_INET;
    
47. sockaddr.sin_port   =   htons(port);
    
48. sockaddr.sin_addr.S_un.S_addr   =   ip;
    , _5 j, i- g4 X; C& L
49. int   s   =   socket(AF_INET,   SOCK_STREAM,   0);
    ; s0 I% \* L0 s: c/ Y3 M# L, N+ _
50. u_long   lv   =   1;
    
51. ioctlsocket(s,   FIONBIO,   &lv);
    
52. connect(s,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    4 k% b+ M& f/ L: c& h
53. Sleep(20);
    
54. int   n   =   send(s,   buffer,   length,   0);
      Y4 e# G  P# j/ @9 A: m
55. Sleep(100);
    
56. int   rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
    0 s' p" X; g, N+ z
57. closesocket(s);
    
58. if   (rlen   ==   SOCKET_ERROR)   return   false;
    + ?. T9 R$ V% w. j( q" A" Z
59. if   (!rlen)   return   false;
    
60. 
    ( T0 l( t4 I. H0 \3 P% u, y
61. response   =   CString(CStringA(buffer,   rlen));
    : _+ t3 F3 b* v, g6 f3 u
62. 
    
63. return   true;
    ; `% w3 V; U6 B# _
64. }
    ' J6 W5 r0 y* ?
65. 
    ' \; a6 v. I( l: c) z; V5 J
66. int   SSDP_sendRequest(int   s,   uint32   ip,   uint16   port,   const   CString&   request)
    
67. {
    
68. char   buffer[10240];
    5 m9 Q3 r- a1 F- _! z- p  A
69. 
      Y2 l* B* t/ z7 P8 y4 \6 f5 Z
70. const   CStringA   sa(request);
    
71. int   length   =   sa.GetLength();
    
72. strcpy(buffer,   (const   char*)sa);
    
73. 
    
74. struct   sockaddr_in   sockaddr;
    
75. memset(&sockaddr,   0,   sizeof(sockaddr));
    ' z0 l8 W! M6 O1 n% O8 a. G
76. sockaddr.sin_family   =   AF_INET;
    ! u5 p0 f" n' l
77. sockaddr.sin_port   =   htons(port);
    
78. sockaddr.sin_addr.S_un.S_addr   =   ip;
      B! `" M0 `) f4 v: H
79. 
    
80. return   sendto(s,   buffer,   length,   0,   (struct   sockaddr   *)&sockaddr,   sizeof(sockaddr));
    
81. }
    
82. 
    $ X- _5 F# H6 n$ K( P3 q7 B/ y
83. bool   parseHTTPResponse(const   CString&   response,   CString&   result)
    3 j) f" r+ s" t7 q& b+ W
84. {
    
85. int   pos   =   0;
    4 r! C5 E4 c8 T4 S3 `2 z$ h
86. 
    3 D; M& i! E$ b' \
87. CString   status   =   response.Tokenize(_T( "\r\n "),   pos);
    8 F- d. N) y; p: F3 r0 B) b
88. 
    1 L& F* C6 @8 n. v# {; \+ b
89. result   =   response;
    # b: k! ~9 @6 b% P. `& N
90. result.Delete(0,   pos);
    ; Y3 B/ k8 I8 \  S. N- e
91. 
    2 s% Z& P9 S) s+ o( r$ \$ G
92. pos   =   0;
    , z5 s/ U, j; p# a+ w$ y
93. status.Tokenize(_T( "   "),   pos);
    5 w% f: l7 O6 G9 k
94. status   =   status.Tokenize(_T( "   "),   pos);
    
95. if   (status.IsEmpty()   ||   status[0]!= '2 ')   return   false;
    - \% C! q% K. ]( i
96. return   true;
    8 i7 @1 Y9 c: H& U, g- t- ^. k, \
97. }
    
98. 
    
99. const   CString   getProperty(const   CString&   all,   const   CString&   name)
    
100. {
     6 i3 X( }5 A( g/ A& e( ^! S# `
101. CString   startTag   =   ' < '   +   name   +   '> ';
     
102. CString   endTag   =   _T( " </ ")   +   name   +   '> ';
     3 k' a7 |" U0 T0 H# e# Q! w
103. CString   property;
     & ?" Y+ s/ U6 U9 w/ H' c
104. 
     # K! M8 t: q5 }( g% \/ I5 P
105. int   posStart   =   all.Find(startTag);
     
106. if   (posStart <0)   return   CString();
     9 m) V- L3 l  O7 P0 U) D
107. 
     , M8 k" R, e8 Q  G" Q4 h
108. int   posEnd   =   all.Find(endTag,   posStart);
     
109. if   (posStart> =posEnd)   return   CString();
     / g/ C/ n* m& s
110. 
     ) _7 F; g5 F3 H6 _" J, J
111. return   all.Mid(posStart   +   startTag.GetLength(),   posEnd   -   posStart   -   startTag.GetLength());
     ' g; Q: M) G+ S% G$ j
112. }
     . v+ C: S' @% H' Y! U5 x9 b
113. 
     
114. MyUPnP::MyUPnP()
     : B# e+ a  E- K; i5 ^# P% @
115. :   m_version(1)
     2 y0 k" S/ v+ {7 x; ?2 n+ v
116. {
     " I7 c2 ~5 T9 B& K2 j2 l9 p
117. m_uLocalIP   =   0;
     
118. isSearched   =   false;
     4 n6 ^8 R- R; i  X/ d6 S
119. }
     ; Z, f' U$ z3 W, f+ ]- m
120. 
     0 n# O* h: m8 l( Q) r0 D' y, j
121. MyUPnP::~MyUPnP()
       y. c3 |& C! M# E: u7 i2 S0 g
122. {
     3 ^. h% V2 b' P2 A" G
123. UPNPNAT_MAPPING   search;
     
124. POSITION   pos   =   m_Mappings.GetHeadPosition();
     ( P3 Y# ?7 m7 `$ R# C5 {
125. while(pos){
     , M; l  P* e8 h8 H$ G
126. search   =   m_Mappings.GetNext(pos);
     & g2 C; n9 m# q+ Q. s' k
127. RemoveNATPortMapping(search,   false);
     
128. }
     
129. 
     $ v! e$ [% P3 y; w  L3 f
130. m_Mappings.RemoveAll();
     # X* C5 x/ F5 a: B4 l$ j: }# b
131. }
     
132. 
     8 s; ]/ S- D) B( N  n; F; v
133. 
     , @3 T6 e0 l0 i& v
134. bool   MyUPnP::InternalSearch(int   version)
     
135. {
     : y2 f1 m% v" r, Y9 o" x8 ]
136. if(version <=0)version   =   1;
     9 L% Q7 E( S/ f  W: {2 H1 J1 ]. \
137. m_version   =   version;
     % O: R( B2 H! U9 F4 H
138. 
     
139. #define   NUMBEROFDEVICES 2
     
140. CString   devices[][2]   =   {
     ' [* i- ^/ J# ~6 L; F; @9 o% i
141. {UPNPPORTMAP1,   _T( "service ")},
     6 ]1 v$ p* v9 c* T" l' A' w( Y
142. {UPNPPORTMAP0,   _T( "service ")},
     
143. {_T( "InternetGatewayDevice "),   _T( "device ")},
     ; B  \" {6 U( [0 q& t  r7 u) @' E
144. };
     
145. 
     , q+ Q" m# n+ j& B
146. int   s   =   socket(AF_INET,   SOCK_DGRAM,   0);
     7 [& S; S5 p& f! a% p2 `( a
147. u_long   lv   =   1;
     - k2 q* I, s* t6 s9 a
148. ioctlsocket(s,   FIONBIO,   &lv);
     
149. 
     * ^, S+ B# j* ]3 {. X* O5 c
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++)   {
     6 O7 A" `, [6 B: f+ F, G0 E% @1 j
154. m_name.Format(_T( "%s%s:%s:%d "),   URNPREFIX,   devices[i][1],   devices[i][0],   version);
     
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 "),
     
157. 6,   m_name);
     
158. SSDP_sendRequest(s,   UPNPADDR,   UPNPPORT,   request);
     $ m+ n+ F' y  n; q/ M
159. }
     2 y2 r2 q* f. c( |7 X
160. }
     
161. 
     
162. Sleep(10);
     
163. 
     
164. char   buffer[10240];
     & P+ }- V2 D9 A& Q: r
165. rlen   =   recv(s,   buffer,   sizeof(buffer),   0);
     $ y$ [- O  _, v5 V1 J# Y
166. if   (rlen   <=   0)   continue;
     
167. closesocket(s);
     
168. 
     
169. CString   response   =   CString(CStringA(buffer,   rlen));
     ' `  P( _! M7 _9 c* t7 [; a. F
170. CString   result;
     7 c/ N2 S4 y( u& M* W, u7 E
171. if   (!parseHTTPResponse(response,   result))   return   false;
     
172. 
     9 w$ i$ ~" H" B' i7 W
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);
     
175. if   (result.Find(m_name)   > =   0)   {
     
176. for   (int   pos   =   0;;)   {
     4 K7 P$ n4 Z1 J
177. CString   line   =   result.Tokenize(_T( "\r\n "),   pos);
     
178. if   (line.IsEmpty())   return   false;
     
179. CString   name   =   line.Mid(0,   9);
     
180. name.MakeUpper();
     0 @; t2 Y0 u* Y
181. if   (name   ==   _T( "LOCATION: "))   {
     
182. line.Delete(0,   9);
     * h2 t$ \4 [7 @# a' B
183. m_description   =   line;
     & ~$ m$ V; w0 p0 n3 T& }+ }
184. m_description.Trim();
     
185. return   GetDescription();
     
186. }
     
187. }
     
188. }
     , E3 S# R5 R' Q2 _+ `0 b5 ~- S
189. }
     
190. }
     ' l3 h. X  v( U/ b6 V* i2 t! I
191. closesocket(s);
     " e% z1 T8 Z! Y3 P! M8 I" Y
192. 
     
193. return   false;
     
194. }
     , E, R9 I4 d6 Q8 u) o, ^

复制代码

天云上人

以下有关upnp的接口来自emule，
' Y0 V& ^0 ~5 U( Y! J
5 R8 {5 L+ Y, P/ m
- h, }5 o7 |) @* p+ G, K5 t///////////////////////////////////////////
//upnp的抽象接口类,只需调用这些接口即可实现端口映射功能.
/ N1 @! G* \5 D& T% ]2 r2 a
" ~8 O8 O6 G' y7 O; y2 S
: t! s. g+ p8 m' N+ C: D2 L% ^#pragma once
#include <exception>


  enum TRISTATE{
        TRIS_FALSE,
* v+ x) x) n* u; Q& b. g' B6 T        TRIS_UNKNOWN,
( }: E- R9 ]. L8 ?9 E1 t        TRIS_TRUE
};

/ q) Q6 R/ P( m. w2 R. }
enum UPNP_IMPLEMENTATION{
2 f* s. ]# c! b; H! G$ J) b! L        UPNP_IMPL_WINDOWSERVICE = 0,
        UPNP_IMPL_MINIUPNPLIB,
& l0 F: {2 {$ z8 H4 z& o        UPNP_IMPL_NONE /*last*/
};

. U8 b  C- O7 \; y/ P6 a3 H
( N- G- D' R$ |7 z) a  y

class CUPnPImpl
7 F, N1 Q, i( w8 P/ `6 P) B{
, }, D% h( a. ?. C1 N5 M$ r  Kpublic:
        CUPnPImpl();
        virtual ~CUPnPImpl();
        struct UPnPError : std::exception {};
0 G4 X: V, P$ \% C2 V        enum {
                UPNP_OK,
# ^: C2 ?% x  P4 |8 {* r                UPNP_FAILED,
$ Z7 j1 ?$ K$ T5 Q: N5 ~0 L                UPNP_TIMEOUT
2 i7 ~/ F' V& B) @        };

: x4 z$ l. H# A7 ~! ~" b; ~" X  w& Q
2 Y1 X$ r0 J. }& g        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort) = 0;
$ q- c& i. \. V# @% r6 f% h        virtual bool        CheckAndRefresh() = 0;
        virtual void        StopAsyncFind() = 0;
, [% k% h& i$ L/ f& n- {* @5 c        virtual void        DeletePorts() = 0;
7 t; ?! c0 g3 [) Q3 ^        virtual bool        IsReady() = 0;
        virtual int                GetImplementationID() = 0;
       
' m. l" b4 {6 ^        void                        LateEnableWebServerPort(uint16 nPort); // Add Webserverport on already installed portmapping
# N& Y# Z2 Z0 g3 x$ _

* P: Y$ |% d7 x1 z9 u% j6 h4 _        void                        SetMessageOnResult(HWND hWindow, UINT nMessageID);
        TRISTATE                ArePortsForwarded() const                                                                { return m_bUPnPPortsForwarded; }
9 @: }; `( g. Y  E- @! ]' D% m        uint16                        GetUsedTCPPort()                                                                                { return m_nTCPPort; }
: u: O# s! |' b5 ]+ D1 T) x        uint16                        GetUsedUDPPort()                                                                                { return m_nUDPPort; }       
1 e: D; s' M; p

7 \5 a( M* k9 {( B" e1 D// Implementation
protected:
2 r7 x( X3 o4 T$ a9 V        volatile TRISTATE        m_bUPnPPortsForwarded;
        void                                SendResultMessage();
        uint16                                m_nUDPPort;
8 k4 J, s, n6 d  s  y- c# b5 g8 w! @        uint16                                m_nTCPPort;
        uint16                                m_nTCPWebPort;
; G1 j5 F6 o; n9 j1 |  I+ ~9 }        bool                                m_bCheckAndRefresh;


private:
        HWND        m_hResultMessageWindow;
% P3 C3 R; @' D9 E5 m        UINT        m_nResultMessageID;
% ]4 K' S' L. O) X! k6 z
1 h' B& M9 Z  i- ~$ |5 o. m
+ Z$ `* D( Z/ y" S3 I: @};


// Dummy Implementation to be used when no other implementation is available
class CUPnPImplNone: public CUPnPImpl
{
" ]6 W( B; u! L$ e3 X% O3 N' _public:
' D! e. S* D" x9 ?* U2 f        virtual void        StartDiscovery(uint16, uint16, uint16)                                        { ASSERT( false ); }
        virtual bool        CheckAndRefresh()                                                                                { return false; }
        virtual void        StopAsyncFind()                                                                                        { }
4 w6 n; `8 F/ B/ n3 ~5 q        virtual void        DeletePorts()                                                                                        { }
+ @6 r9 p0 o! h# g% w8 {$ e        virtual bool        IsReady()                                                                                                { return false; }
' J4 l0 `  f( A3 e6 ~        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_NONE; }
. d; ?( J( [' k4 {5 J};
* @8 i4 A8 J" t! \- H% j9 W( M

/////////////////////////////////////
4 J+ J+ l2 V* j2 W' f& x//下面是使用windows操作系统自带的UPNP功能的子类
+ z3 b4 I4 e! i, q
& S9 ~# h. }; l* y, y8 d+ l) j' Y
0 Y/ B" r, m8 w- h) ^* B* n( }3 @#pragma once
#pragma warning( disable: 4355 )
& ^0 O6 p. U' q
' `5 X/ x  U8 V
" r: g. w' m: d7 B8 L#include "UPnPImpl.h"
#include <upnp.h>
#include <iphlpapi.h>
# b% G$ P0 d* H#include <comdef.h>
  I/ b# Z, ?8 h( f' u#include <winsvc.h>
8 R. x/ a$ `. q" ?8 f* u; G5 h

, U4 G7 i1 @' \2 p$ ~5 j9 d#include <vector>
. X3 @+ C, U5 T$ |1 x#include <exception>
#include <functional>


2 i% ?7 X" }) E- l: H, P( W

- n) j+ b0 G1 C0 p' X( Gtypedef _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;
( f" B( d8 l' I* G5 F# rtypedef _com_ptr_t<_com_IIID<IUnknown,&IID_IUnknown> >                                                UnknownPtr;


typedef DWORD (WINAPI* TGetBestInterface) (
6 H1 Y5 c' A" O* _: [4 y. A  IPAddr dwDestAddr,
  PDWORD pdwBestIfIndex
);

" `! l' G" i& A. o" ]8 d
$ o% [8 U) C3 m+ I" ^typedef DWORD (WINAPI* TGetIpAddrTable) (
  PMIB_IPADDRTABLE pIpAddrTable,
. U$ Z$ B1 u7 Z, b6 T- u4 K  PULONG pdwSize,
  BOOL bOrder
);

3 ?3 f2 x2 ]' y5 L* T
' e7 h# E! T: F3 [1 L1 o" m0 D! Qtypedef DWORD (WINAPI* TGetIfEntry) (
$ Y( u, p8 Y. r1 ?# c% l* C9 U  PMIB_IFROW pIfRow
);
4 m& H$ `4 m0 l) ]% o* w

CString translateUPnPResult(HRESULT hr);
0 ^6 E7 w5 K( @, H8 gHRESULT UPnPMessage(HRESULT hr);
' D  B  |( p' y, A% r6 v

class CUPnPImplWinServ: public CUPnPImpl
' p( [0 ~2 r3 W" v{
        friend class CDeviceFinderCallback;
: g3 A" i- H5 ^5 I- h        friend class CServiceCallback;
% h  k: y0 `" z( [: G1 F, ^8 \// Construction
6 a$ c3 {6 m9 U  B% Z1 N: ~public:
7 w8 m+ T, [7 g. g% H        virtual ~CUPnPImplWinServ();
+ K0 t- H' r$ b; A, `; `3 k. C9 q        CUPnPImplWinServ();

2 V/ U& f7 I  ^4 {' n4 H
2 j/ |) m, \8 p+ c0 D9 u        virtual void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort)                { StartDiscovery(nTCPPort, nUDPPort, nTCPWebPort, false); }
        virtual void        StopAsyncFind();
        virtual void        DeletePorts();
2 M* \) d+ |3 j& h0 A8 ]        virtual bool        IsReady();
        virtual int                GetImplementationID()                                                                        { return UPNP_IMPL_WINDOWSERVICE; }

- i" p1 ]9 F% e* {8 C+ ]: ~
        // No Support for Refreshing on this  (fallback) implementation yet - in many cases where it would be needed (router reset etc)
; `* C1 H' K9 v        // the windows side of the implementation tends to get bugged untill reboot anyway. Still might get added later
9 \" O, B+ h* l( [5 ?. O- I        virtual bool        CheckAndRefresh()                                                                                { return false; };
5 ]: m" z; M# b

protected:
        void        StartDiscovery(uint16 nTCPPort, uint16 nUDPPort, uint16 nTCPWebPort, bool bSecondTry);
4 U$ e( v) L* b# w( q        void        AddDevice(DevicePointer pDevice, bool bAddChilds, int nLevel = 0);
8 Q2 S, B' b' G5 v  L7 k, J+ o        void        RemoveDevice(CComBSTR bsUDN);
        bool        OnSearchComplete();
  {1 n1 x7 A/ G' F1 `) c        void        Init();
) [* s% _* h6 j/ j+ N8 ]. }. Y5 ?
8 J$ \) H  d/ w, O, j% b
; C: T; M3 r. G, D% V8 u' @7 U        inline bool IsAsyncFindRunning()
        {
4 C& y: E0 H$ Z3 W; w                if ( m_pDeviceFinder != NULL && m_bAsyncFindRunning && GetTickCount() - m_tLastEvent > 10000 )
                {
                        m_pDeviceFinder->CancelAsyncFind( m_nAsyncFindHandle );
# a! [& o% X( Q3 q1 g                        m_bAsyncFindRunning = false;
                }
                MSG msg;
                while ( PeekMessage( &msg, NULL, 0, 0, PM_REMOVE ) )
                {
# @' [/ T; F/ a                        TranslateMessage( &msg );
                        DispatchMessage( &msg );
9 ?0 w( Z5 |* [                }
                return m_bAsyncFindRunning;
( i6 |. q1 j5 ]! G        }

" H# H) d$ J% O5 ^5 ]( t
        TRISTATE                        m_bUPnPDeviceConnected;
" L" d. j; y7 z$ I

5 o' X' K2 M4 X; `+ o// Implementation
        // API functions
        SC_HANDLE (WINAPI *m_pfnOpenSCManager)(LPCTSTR, LPCTSTR, DWORD);
$ Z4 b( S6 N6 Q; @5 t) a& I. a        SC_HANDLE (WINAPI *m_pfnOpenService)(SC_HANDLE, LPCTSTR, DWORD);
        BOOL (WINAPI *m_pfnQueryServiceStatusEx)(SC_HANDLE, SC_STATUS_TYPE, LPBYTE, DWORD, LPDWORD);
& `9 c% ^2 A. `1 e) ~; y        BOOL (WINAPI *m_pfnCloseServiceHandle)(SC_HANDLE);
7 k$ q; V3 p% w5 Q  ]. }        BOOL (WINAPI *m_pfnStartService)(SC_HANDLE, DWORD, LPCTSTR*);
  T" c5 O( E6 a$ X        BOOL (WINAPI *m_pfnControlService)(SC_HANDLE, DWORD, LPSERVICE_STATUS);
+ M: n9 Y1 _  v, J
4 ?4 O% b/ b. i6 D7 W: J0 U9 }# L
0 i( V( y$ ^# r  U        TGetBestInterface                m_pfGetBestInterface;
7 K; ~) E' M8 U$ e7 Q        TGetIpAddrTable                        m_pfGetIpAddrTable;
" T* x% U) B* w$ n" x        TGetIfEntry                                m_pfGetIfEntry;

" }- |0 j8 ~2 r5 Z8 \
& a( a# O. X5 z! f! \        static FinderPointer CreateFinderInstance();
; c3 V7 e4 N; q) p, g5 ]        struct FindDevice : std::unary_function< DevicePointer, bool >
        {
                FindDevice(const CComBSTR& udn) : m_udn( udn ) {}
                result_type operator()(argument_type device) const
                {
                        CComBSTR deviceName;
+ a  m* G, T2 g4 L+ j4 [                        HRESULT hr = device->get_UniqueDeviceName( &deviceName );


                        if ( FAILED( hr ) )
                                return UPnPMessage( hr ), false;
+ l3 M' t6 V$ S, `& ~$ B

                        return wcscmp( deviceName.m_str, m_udn ) == 0;
                }
                CComBSTR m_udn;
        };
5 @$ X( f. L; N& ^, ^( s/ }- \7 N       
        void        ProcessAsyncFind(CComBSTR bsSearchType);
, _3 U- v5 y. C' J5 P        HRESULT        GetDeviceServices(DevicePointer pDevice);
        void        StartPortMapping();
- y& U% v( e4 a# M4 ^        HRESULT        MapPort(const ServicePointer& service);
        void        DeleteExistingPortMappings(ServicePointer pService);
2 V# l. A5 O; W8 m" @, b2 N0 s7 t        void        CreatePortMappings(ServicePointer pService);
# O2 k0 d% f& ~; B* D        HRESULT SaveServices(EnumUnknownPtr pEU, const LONG nTotalItems);
5 Q+ I+ Q% O4 q- ?0 B2 P7 h        HRESULT InvokeAction(ServicePointer pService, CComBSTR action,
7 E0 g/ K1 [7 [* b                LPCTSTR pszInArgString, CString& strResult);
4 y# s/ w8 W' l        void        StopUPnPService();


        // Utility functions
        HRESULT CreateSafeArray(const VARTYPE vt, const ULONG nArgs, SAFEARRAY** ppsa);
% ~! `1 C  }0 F        INT_PTR CreateVarFromString(const CString& strArgs, VARIANT*** pppVars);
        INT_PTR        GetStringFromOutArgs(const VARIANT* pvaOutArgs, CString& strArgs);
  z, n. m' `: `) B        void        DestroyVars(const INT_PTR nCount, VARIANT*** pppVars);
) v: i9 s# N9 m' w        HRESULT GetSafeArrayBounds(SAFEARRAY* psa, LONG* pLBound, LONG* pUBound);
        HRESULT GetVariantElement(SAFEARRAY* psa, LONG pos, VARIANT* pvar);
7 w1 z4 x1 I& ?! W9 u! v' G        CString        GetLocalRoutableIP(ServicePointer pService);
, D2 ^5 U! T' ]- r, N

// Private members
private:
; x; F# D0 e) }  j        DWORD        m_tLastEvent;        // When the last event was received?
0 B+ L6 X% }: n3 X/ }        std::vector< DevicePointer >  m_pDevices;
" v0 y: p0 i2 e: o9 ~        std::vector< ServicePointer > m_pServices;
% a9 f1 Z1 q" p% N# A, u1 L8 U        FinderPointer                        m_pDeviceFinder;
7 T* E+ h! q( N- U4 w        DeviceFinderCallback        m_pDeviceFinderCallback;
/ s! m  R  @/ h5 s        ServiceCallback                        m_pServiceCallback;


5 c5 c+ H/ [0 P) x- \8 Y; T        LONG        m_nAsyncFindHandle;
        bool        m_bCOM;
, ~; Z9 i% k+ `- ~* {        bool        m_bPortIsFree;
  j- @8 P2 N6 ^        CString m_sLocalIP;
9 R3 r7 U( m: h# Z/ H        CString m_sExternalIP;
        bool        m_bADSL;                // Is the device ADSL?
        bool        m_ADSLFailed;        // Did port mapping failed for the ADSL device?
) Z6 r# R3 `+ e# ]        bool        m_bInited;
        bool        m_bAsyncFindRunning;
" @! B4 \- U/ s/ S8 I8 c' R6 k& `        HMODULE m_hADVAPI32_DLL;
( [" t. Z/ I2 p/ ]4 d" a* M# {        HMODULE        m_hIPHLPAPI_DLL;
        bool        m_bSecondTry;
' K6 q" B/ ?; h# O2 ?) {- P        bool        m_bServiceStartedByEmule;
        bool        m_bDisableWANIPSetup;
1 @1 t! O9 i9 x9 e        bool        m_bDisableWANPPPSetup;
$ b5 ~/ V% T0 {: v4 D- {: z" j
0 `8 |' O; Q9 `' C6 V; A
. c* ^: q! W; G  {8 Y0 d7 B};

7 G# j4 o% M8 l# W9 n7 o
; \# T6 o6 M( f6 ?; o9 e// DeviceFinder Callback
class CDeviceFinderCallback
5 i+ q) i/ _1 |# `! I8 G3 S        : public IUPnPDeviceFinderCallback
, c! \% |1 q3 g  H: o6 d& z{
public:
5 Y6 S- ]7 p6 p# }2 i: g        CDeviceFinderCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
4 U+ P- `" ]* ]- }

1 _7 t( M, h, W' H0 m/ H   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
   STDMETHODIMP_(ULONG) AddRef();
   STDMETHODIMP_(ULONG) Release();

4 g7 a. \& E; g
/ L: \( L6 s" {; A' }9 o// implementation
private:
" `7 j, \0 N: v0 b3 r/ Q9 v9 G7 i        HRESULT __stdcall DeviceAdded(LONG nFindData, IUPnPDevice* pDevice);
        HRESULT __stdcall DeviceRemoved(LONG nFindData, BSTR bsUDN);
+ D( B2 r# \/ Z, O% h/ u8 O        HRESULT __stdcall SearchComplete(LONG nFindData);
4 P; R; b5 U  ^& W7 c9 n% A

private:
        CUPnPImplWinServ& m_instance;
" O/ g7 o; Y1 g5 W        LONG m_lRefCount;
+ r! m1 j0 D1 X  Z3 M7 I};


// Service Callback
+ F! n4 f5 M, L. a* ?$ A- R3 C! Sclass CServiceCallback
7 o4 C$ v. x, P) r/ p4 }        : public IUPnPServiceCallback
{
public:
        CServiceCallback(CUPnPImplWinServ& instance)
                : m_instance( instance )
        { m_lRefCount = 0; }
   
1 B2 p% k$ u& e- w   STDMETHODIMP QueryInterface(REFIID iid, LPVOID* ppvObject);
0 ]1 J' p% f4 Q" ]   STDMETHODIMP_(ULONG) AddRef();
1 i7 [* C3 G9 L$ M   STDMETHODIMP_(ULONG) Release();
/ `5 d# r) _# F" P

3 J; ~, j4 A0 d) d) J// implementation
5 X4 k( v- a- \" i5 Sprivate:
4 B3 f& s  v+ U2 G, z8 i" E        HRESULT __stdcall StateVariableChanged(IUPnPService* pService, LPCWSTR pszStateVarName, VARIANT varValue);
        HRESULT __stdcall ServiceInstanceDied(IUPnPService* pService);
$ R' o2 n0 G. i0 b) s
" ^$ @* t- ]' _
! ?! e1 ]+ w9 c+ i- [- Lprivate:
0 d8 m5 s5 r: r$ ]/ p3 B        CUPnPImplWinServ& m_instance;
7 b0 N( d: z/ T        LONG m_lRefCount;
0 Z- v  l/ _$ P};


: k( l+ o4 |6 b# h% n) c: n/////////////////////////////////////////////////

  I3 _* i9 c! B+ B0 p$ m
使用时只需要使用抽象类的接口。
CUPnPImpl::SetMessageOnResult设置需要接受UPNP端口映射是否成功的窗口句柄和消息ID.
3 d' q, e2 X1 E' x7 GCUPnPImpl::StartDiscovery将开启一个异步设备查找并进行端口映射,其参数为需要映射的内网端口.
CUPnPImpl::StopAsyncFind停止设备查找.
' ~( C. b8 f3 x3 h5 PCUPnPImpl::DeletePorts删除端口映射.