电驴里源码UPNP绑定的问题.请高手帮忙

bool MyUPnP::InternalSearch(int version)
{
if(version<=0)version = 1;
m_version = version;

#define NUMBEROFDEVICES 2
CString devices[][2] = {
{UPNPPORTMAP1, _T("service")},
{UPNPPORTMAP0, _T("service")},
{_T("InternetGatewayDevice"), _T("device")},
};

int s = socket(AF_INET, SOCK_DGRAM, 0);
int yt = ::GetLastError();
u_long lv = 1;
ioctlsocket(s, FIONBIO, &lv);

int rlen = 0;
for (int i=0; rlen<=0 && i<500; i++) {
if (!(i%100)) {
for (int i=0; i<NUMBEROFDEVICES; i++) {
m_name.Format(_T("%s%s:%s:%d"), URNPREFIX, devices[i][1], devices[i][0], version);
CString request;
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"),
6, m_name);
SSDP_sendRequest(s, UPNPADDR, UPNPPORT, request);
}
}

Sleep(10);

char buffer[10240];
rlen = recv(s, buffer, sizeof(buffer), 0);
if (rlen <= 0) continue;
closesocket(s);

CString response = CString(CStringA(buffer, rlen));
CString result;
if (!parseHTTPResponse(response, result)) return false;

for (int d=0; d<NUMBEROFDEVICES; d++) {
m_name.Format(_T("%s%s:%s:%d"), URNPREFIX, devices[d][1], devices[d][0], version);
if (result.Find(m_name) >= 0) {
for (int pos = 0;;) {
CString line = result.Tokenize(_T("\r\n"), pos);
if (line.IsEmpty()) return false;
CString name = line.Mid(0, 9);
name.MakeUpper();
if (name == _T("LOCATION:")) {
line.Delete(0, 9);
m_description = line;
m_description.Trim();
return GetDescription();
}
}
}
}
}
closesocket(s);

return false;
}
我SSDP_sendRequest(s, UPNPADDR, UPNPPORT, request);后收不到对方的回复.在接收的时候总是-1.大家帮帮忙