现在的位置: 首页 > 综合 > 正文

使用MFC编写internet查询程序

2013年05月02日 ⁄ 综合 ⁄ 共 11844字 ⁄ 字号 评论关闭
在VC++ 5.0中,MFC的WinInet类包装了相关的用于internet 客户机程序编程的win32 API函数。这样,无需了解winsock或TCP/IP的细节就可以编制出internet客户机程序。本文中,我们将探讨如何使用WinInet类来编写一个internet查询程序,该程序起名为“探路者”。该程序能使用各种协议来查询网络,包括古老的FINGER和WHOIS。

顾名思义,“探路者”用于探查一部internet服务器的情况,查看它能提供哪些服务。例如说,你知道某人的e-mail地址,假设是wang@eop.com,我们就可以通过该程序,尝试用各种办法建立到eop.com的链接,随后对该指定域依次采用WWW查询、FTP查询、GOPHER查询、FINGER查询和WHOIS查询。根据返回的结果,可以判断该域能提供哪些服务。此外,如果你想给自己的服务器起某个域名,你也可以通过本程序知道该域名是否已被采用。

一、查询程序界面的实现
本程序的用户界面将基于对话框来实现。建立界面的步骤如下:

在developer studio中,
1、选择file-new…,高亮MFC appwizard(exe),在Project name栏内给程序取名为query ,单击ok。
2、在step-1中,单击dialog based,选English做为资源语言。单击next。
3、在step-2中,取消ActiveX Controls的选中标记。不要选择windows socket(该程序不直接调用socket函数),在对话框标题栏中键入“探路者”。
4、在step-3中,选择yes,please和As a ststically linked library
5、在step-4中,不要改变appwiard所生成的任何类名,appwizard结束后,我们准备着手编写程序的核心部分。

appwizard建立了一个空的对话框,我们将从它的基础上开始工作。下面编辑对话框:
选resource view ,展开query resources-dialogs,双击IDD-QUERY-DIALOG 资源,下面编辑对话框:

1、将OK按钮改为“查询主机”,右击该按钮,选择properties,将该按钮的ID名改为id-query。
2、将CANCEL按钮改为“结束查询”。
3、删除to do等静态文本。
4、将对话框增大到300像素宽
5、在对话框顶端增加一个编辑框,资源id名为IDC-HOST,将编辑框拉伸到最宽。
6、给编辑框增加一个名为“地址名”的标签。
7、将对话框拉伸到150像素高。
8、在对话框底部增加另一个编辑框,id名为IDC-OUT,将它拉伸到尽可能的大,填满对话框的剩余空间。
9、给该编辑框增加Multi-line,Horizontal scroll,Vertical scroll,Border,Read-only等特性。

当用户单击“查询主机”按钮时,程序将使用各种方法查询网址。因此,需使用classwizard,把实现查询功能的代码链接到query按钮。

1、选view-classwizard。
2、选CQueryDlg类,主机名将由该类接受。
3、高亮ID-query,高亮右边列表栏里的BN-CLICKED。
4、按Add Fuction按钮,增加一个函数。
5、Class Wizard建议的名字为OnOk,将它改为OnQuery ,,单击ok
6、单击成员变量栏,准备将edit控制连接到对话框类的变量
7、高亮IDC-HOST并单击Add Variable。将把EDIT控制连接到对话框类的Cstring成员变量,名为m_host
8、类似以上步骤,将IDC-OUT链接到CString变量m_out

点击ok关闭classwizard,剩下的工作是编写CQueryDlg::OnQuery()函数,它将使用m_host值进行查询并将结果输出到m_out变量。

二、编写代码,进行http查询
查询一个internet地址时,首先应尝试建立http链接。这是因为大量的地址都含有web页面。使用http建立链接的最简单的办法是使用winlnet类CInternetSession,并调用其成员函数OpenURL()。该函数将返回一个文件,我们在m_out中显示该文件的头几行文字。首先,在QueryDLG.CPP的开始加入以下行:
#include‘afxinet.h’

这将定义访问Winlnet类的代码。由于本程序将访问大量的URLS,在CQueryDlg中增加一个名为TryURL的函数,它含有一个CString类的参数,名为URL,返回值为void。右击CQueryDLG类,选择Add Member function…。增加函数TryURL(),将它定义为protected类型。这个新函数将从CQueryDlg::OnQuery()中调用。在OnQuery()中增加以下代码:

void CQueryDlg::OnQuery() 
{ const CString http = "http://";
UpdateData(TRUE);
m_out = "";
UpdateData(FALSE);
TryURL(http + m_host);
TryURL(http + "www." + m_host);
}

UpdateData(TRUE)的调用将给m_host赋予用户定义的值。UpdateData(FALSE)语句将清空输出编辑框变量m_out的内容。接下来调用两次TryURL(),例如说,当用户输入microsoft.com,程序将首先试一试http://microsoft.com,然后试一试http://www.microsoft.com。以下是TryURL的代码。

void CQueryDlg::TryURL(CString URL)
{
CInternetSession session;
m_out+="正在链接"+URL+"/r/n";
UpdateData(FALSE);
CInternetFile* file=NULL;
try
{
file=(CInternetFile*)session.OpenURL(URL);
}
catch(CInternetException* pEx)
{
file=NULL;
pEx->Delete();
}
if(file)
{
m_out+="已建立链接。/r/n";
CString line;
for(int i=0;i<20&&file->ReadString(line);i++)
{
m_out+=line+"/r/n";
}
file->Close();
delete file;
}
else
{
m_out+="本地址没有发现http主机/r/n";
}
m_out+="------------------------------------------------------/r/n";
UpdateData(FALSE);
}

下面,我们对以上代码进行逐段分析。首先,建立一个internet区,这要定义一个CInternetSession的对象。其构造函数的原形如下:

CInternetSession( LPCTSTR pstrAgent = NULL, DWORD dwContext = 1, DWORD dwAccessType = INTERNET_OPEN_TYPE_PRECONFIG, LPCTSTR pstrProxyName = NULL, LPCTSTR pstrProxyBypass = NULL, DWORD dwFlags = 0 );这需要定义很多参数,但是,本程序都使用缺省值,即“=”号后的值。CInternetSession构造函数参数说明如下:

LPCTSTR pstrAgent-应用程序名,如果为NULL,它将替你填入你在AppWizard中给定的程序名。
DWORD dwContext-本操作的设备关联符定义。

DWORD dwAccessType-访问类型,为以下参数之一,INTERNET_OPEN_TYPE_PRECONFIG (default), INTERNET_OPEN_TYPE_DIRECT, 或 INTERNET_OPEN_TYPE_PROXY
LPCTSTR pstrProxyName-如访问类型为INTERNET_OPEN_TYPE_PROXY,则给该参数赋予协议名称。
LPCTSTR pstrProxyBypass-如访问类型为INTERNET_OPEN_TYPE_PROXY,则该参数为不通过协议服务器而直接链接的一系列地址。

DWORD dwFlags-可为以下参数,INTERNET_FLAG_DONT_CACHE, INTERNET_FLAG_ASYNC, 和INTERNET_FLAG_OFFLINE.
dwAccessType值缺省时将使用系统注册簿定义的值。显然,程序允许使用者定义访问类型将比由程序内部直接定义要好。因此,要正确使用本程序,必需先在windows系统中定义好网络访问类型,步骤如下:

1、双击桌面上“my computer"图标。
2、点击“contyol panel".
3、点击“internet ”。
4、在随后弹出的对话框中,选“connection"栏,然后填写网络连接属性。如果你是拨号上网,选中“dial”选择项,并填写相关属性。如果你是通过proxy服务器上网,选中“proxy”选项,点击“setting”按钮,设置proxy服务器地址和端口号。如果你是直接连入internet,应使所有的选项均为非选中状态。

本程序在构造CInternetSession对象时使用缺省值,因此,构造函数将不带任何参数。如下所示:

CInternetSession session;
在构造对象session后,我们需写两行程序作一些输出,表示程序已开始工作。
m_out+="正在链接"+URL+"/r/n";
UpdateData(FALSE);

接下来我们使用session对象的成员函数OpenURL()来打开一个URL资源。该函数返回一个文件的指针,文件类型为以下四种之一:

// 如果访问的是本地机器,函数返回一个CStudioFile类对象的指针。
ftp:// 如果访问的是一ftp地址,函数返回一个CInternetFile类对象的指针。
gopher:// 如果访问的是一gopher地址,函数返回一个CGopherFile类对象的指针。
http:// 如果访问的是一http地址,函数返回一个CHttpFile类对象的指针。

本程序用于访问远程机器,因此,函数不会返回一个//类型的本地文件。而CGopherFile和CHttpFile均派生自CInternetFile,所以将该函数返回值赋给CInternetFile类的指针是安全的。当OpenURL()不能正常打开URL资源时,该函数将会抛出一个异常(exception),从而导致程序运行时错误。由于本程序用于探查未知的网址,该网址可能不提供相应服务或根本不存在,因此OpenURL()有时可能不会正常运行。为了避免程序异常终止,我们需使用try-catch结构来处理异常。本段程序代码如下:

CInternetFile* file=NULL;
try
{
file=(CInternetFile*)session.OpenURL(URL);
}
catch(CInternetException* pEx)
{
file=NULL;//如果发生运行时错误,给file赋空值,程序将继续运行
pEx->Delete();
}

通过以上代码,程序将使用用户指定的地址来试图打开Http网址,如果失败,返回的文件为空,程序将继续运行,尝试用其它协议打开网址。随后,无论网址是否成功打开,我们都应作相应输出以提示用户。如果成功,我们用一个for循环读出返回文件的头20句并输出,如果失败,也要给出相应的提示。程序如下:
if(file) //判定链接是否成功
{
m_out+="已建立链接。/r/n";
CString line;
for(int i=0;i<20&&file->ReadString(line);i++)
{
m_out+=line+"/r/n";
}
file->Close();
delete file;
}
else
{
m_out+="本地址没有发现http主机/r/n";
}
m_out+="------------------------------------------------------/r/n";
UpdateData(FALSE);

现在我们可以编译该程序并运行,键入地址microsof.com并查询,输出的信息表明,程序在http://microsoft.com和http://www.microsoft.com处均发现了www网页,并输出了主页的HTML文件的头20行。

三、ftp查询的实现

现在我们继续编程,来探查用户输入的网址是否提供ftp服务。ftp是internet上的一种文件传输协议,主要用于在服务器和客户机之间传送文件。重新调用TryURL()来达到目的是不可能的,因为TryURL()假设该网址指向一个文件,而一个ftp网址指向一系列文件。必需重新编写一个函数,仿照以前步骤,给CQueryDlg类增加另一个成员函数void TryFtp(CString host)。如果所探查的网址提供ftp服务,该函数将找出ftp缺省目录并显示出来。代码如下:

void CQueryDlg::TryFTP(CString host)
{
CInternetSession session;
m_out += "正在链接FTP地址 " + host + "/r/n";
UpdateData(FALSE);
CFtpConnection* connection = NULL;
try
{
connection = session.GetFtpConnection(host);
}
catch (CInternetException* pEx)
{
connection = NULL;
pEx->Delete();
}
if (connection)
{
m_out += "已建立链接。 /r/n";
CString line;
connection->GetCurrentDirectory(line);
m_out += "缺省目录为 " + line + "/r/n";
connection->Close();
delete connection;
}
else
{
m_out += "本地址没有发现ftp主机 。/r/n";

}
m_out += "------------------------------------------------------/r/n";
UpdateData(FALSE);
}

本函数和TryURL()很相似,不过,它不使用OpenURL()来打开一个文件,而是用GetFtpConnection()来与ftp服务器建立链接。如果链接成功,将使用GetCurrentDirectory()来得到服务器的缺省目录。

大多数ftp地址前有ftp.的前缀,但一些老的地址没有此前缀。我们可以在OnQuery()函数的末尾增加两行来调用这个新的函数:

TryFTP(m_host);
TryFTP("ftp."+m_host);

重新编译程序并运行,可以发现,在ftp.microsoft.com处提供ftp服务。在开始查询到出结果将有一些延迟,因为程序等结果全部探查到后再一次显示,如果我们希望结果实时地显示,必需使用异步套接字(asynchronous sockets)或多线程编程。

四、gopher查询的实现

GOPHER是一种基于文本的协议,它和WWW相似,可以通过点击文字内容,实现网络内的链接和浏览。但是,GOPHER是通过逐级文字菜单来组织链接和内容的,它不象WWW那样有丰富的多媒体页面。要实现GOPHER查询,我们应给CQueryDlg类增加另一个成员函数void TryGopher(CString host)。如果查询成功,该函数将返回查询地址的第一个Gopher位置(locator)。位置是gopher协议的概念,任何gopher客户程序必需先得到一个gopher位置,然后才能进行相应的gopher操作。TryGopher()函数如下:

void CQueryDlg::TryGopher(CString host)
{
CInternetSession session;
m_out += "正在链接gopher地址 " + host + "/r/n";
UpdateData(FALSE);
CGopherConnection* connection = NULL;
try
{
connection = session.GetGopherConnection(host);
}
catch (CInternetException* pEx)
{
connection = NULL;
pEx->Delete();
}
if (connection)
{
m_out += "已建立链接。 /r/n";
CString line;
CGopherLocator locator = connection->CreateLocator(NULL, NULL, GOPHER_TYPE_DIRECTORY);
line = locator;
m_out += "第一个Gopher位置是" + line + "/r/n";
connection->Close();
delete connection;
}
else
{
m_out += "本地址没有发现gopher主机 。 /r/n";
}
m_out += "------------------------------------------------------/r/n";
UpdateData(FALSE);
}

本函数和前两个函数大致相似,在通过调用connection = session.GetGopher Connection(host);来建立Gopher链接后,通过语句CGopherLocator locator = connection-> CreateLocator(NULL, NULL, GOPHER_TYPE_DIRECTORY);来建立一个Gopher位置(locator),函数CreateLocator()有多个版本,现在我们使用的是其含三个参数的版本。其原形为CGopherLocator CreateLocator( LPCTSTR pstrDisplayString, LPCTSTR pstrSelectorString, DWORD dwGopherType );。其中参数pstrDisplayString指明要查询的服务器上的具体文件或目录名,如果它为NULL,则返回服务器缺省目录名;参数pstrSelectorString是发送给服务器的字符命令,以便检索某个项目,它可设为空;参数dwGopherType指明Gopher访问类型,本例中定义为GOPHER_TYPE_DIRECTORY,指明要访问的是目录。它的其它可取值请参考VC++5.0文档。Gopher位置(locator)建立后,我们把它强制转换为Cstring类型,并把该位置显示出来。在OnQuery()函数的末尾加入以下行:

TryGopher(m_host);
TryGopher("gopher." + m_host);

重新编译程序,输入地址harvard.edu,程序将会探查出它是一个Gopher地址,并显示出第一个Gopher位置。

五、使用Gopher来实现Finger查询

Finger协议的作用是给你提供一个网址的具体情况,它是Internet上最古老的协议之一。在一个Finger服务器上,你可以查询它的某一个用户或整个网址的情况。当然,这对网络的安全是不利的,实际上,有经验的黑客们在攻击一个未知网络时,第一步就是向它发送Finger和Whois查询,这也是黑客网址上的黑客教程中建议的步骤。为了安全,许多网络服务器不提供Finger服务,然而,当它接受到Finger查询请求时,仍然会返回一些其它的有用信息。

在MFC和WIN32 API中,没有提供直接实现Finger查询的函数,但是,我们仍有变通的办法来实现它。所有的internet链接都需要一个宿主名和端口号,所有的著名的服务都有其特定的端口号,例如:http服务使用远程宿主机上的端口80,ftp服务使用端口21,gopher服务使用端口70。对于finger服务来说,它使用端口79。finger是一种简单的协议,如果你向远程宿主机的端口79发送字符串,finger服务器在端口79侦听到后,将会发送出一个finger回答。如果你发送的字符串仅仅包含/r/n,服务器通常将会把本服务器上所有用户的列表及相关信息(如用户真实姓名等)做为应答返回。因此,如果我们不使用缺省的端口70,而是使用端口79来建立gopher链接,我们就能发出finger查询。给CQueryDlg类增加一个成员函数void TryFinger(CString host)如下:

void CQueryDlg::TryFinger(CString host)
{
CInternetSession session;
m_out += "正在链接finger地址 " + host + "/r/n";
UpdateData(FALSE);
CGopherConnection* connection = NULL;
try
{
connection = session.GetGopherConnection(host,NULL,NULL,79);
}
catch (CInternetException* pEx)
{
connection = NULL;
pEx->Delete();
}
if (connection)
{
m_out += "已建立链接。 /r/n";
CGopherLocator locator = connection->CreateLocator(NULL, NULL, GOPHER_TYPE_TEXT_FILE);
CGopherFile* file =NULL;
try
{
file = connection->OpenFile(locator);
}
catch (CInternetException* pEx)
{
file = NULL;
pEx->Delete();
}
if (file)
{
CString line;
for (int i=0; i < 20 && file->ReadString(line); i++)
{
m_out += line + "/r/n";
}
file->Close();
delete file;
}
else
{
m_out+="finger查询失败。/r/n";
}
connection->Close();
delete connection;
}
else
{
m_out += "本地址没有发现finger主机 。 /r/n";
}
m_out += "------------------------------------------------------/r/n";
UpdateData(FALSE);
}
本函数中,语句connection = session.GetGopherConnection(host,NULL,NULL,79);用于建立finger链接。随后,我们创立一个文本文件类型的Gopher位置用来操作服务器返回的信息:CGopherLocator locator = connection->CreateLocator(NULL, NULL, GOPHER_TYPE_TEXT_FILE);。使用该Gopher位置打开文件并使用一个for循环来读出该文件的头20行,随后将它显示出来。

在OnQuery()函数的末尾加入以下行:TryFinger(m_host);。编译程序,输入地址whitehouse.gov,程序将会返回该服务器的e-mail地址,从返回的信息可知,出于安全考虑,该服务器的其它finger服务已被取消了。如果你输入的网址没有提供finger服务,程序将有较长一段时间的延迟,最后弹出一个消息框,通知用户链接出现超时错误,单击ok按钮即可。

六、使用gopher协议发送whois查询
还有一个协议也能提供网址的相关信息,它也是一种古老的协议,MFC并不直接支持它,这就是whois协议。在整个internet上,只有少数服务器提供whois服务。whois服务建立了internet上的域名数据库,如果对某个域名进行whois查询,服务器将会返回拥有该域的机构或个人的实际姓名、地址、电话号码等信息。国际上的域名注册机构拥有whois服务器,例如,域名结尾为.com的域都在一个称为InterNIC的机构中注册,该机构拥有一个whois服务器称为rs.internic.net。whois协议和finger协议一样,是一种简单的协议,它使用端口43,如果向whois服务器的端口43发送包含域名的字符串,则whois服务器将会返回该域拥有者的情况。给CQueryDlg类增加一个成员函数void TryWhois(CString host)如下:

void CQueryDlg::TryWhois(CString host)
{
CInternetSession session;
m_out += "正在链接Whois地址 " + host + "/r/n";
UpdateData(FALSE);
CGopherConnection* connection = NULL;
try
{
connection = session.GetGopherConnection("rs.internic.net",NULL,NULL,43);
}
catch (CInternetException* pEx)
{
connection = NULL;
pEx->Delete();
}
if (connection)
{
m_out += "已建立链接。 /r/n";
CGopherLocator locator = connection->CreateLocator(NULL, host, GOPHER_TYPE_TEXT_FILE);
CGopherFile* file = NULL;
try
{
file = connection->OpenFile(locator);
}
catch (CInternetException* pEx)
{
file = NULL;
pEx->Delete();
}
if (file)
{
CString line;
for (int i=0; i < 20 && file->ReadString(line); i++)
{
m_out += line + "/r/n";
}
file->Close();
delete file;
}
else
{
m_out+="Whois查询失败。/r/n";
}
connection->Close();
delete connection;
}
else
{
m_out += "Whois查询失败。/r/n";
}
m_out += "------------------------------------------------------/r/n";
UpdateData(FALSE);
}

在本函数中,语句connection = session.GetGopherConnection("rs.internic.net",NULL, NULL,43);使程序链接到了whois服务器rs.internic.net。随后,我们建立一个gopher位置来查询用户输入的域:CGopherLocator locator = connection->CreateLocator(NULL, host, GOPHER_TYPE_TEXT_FILE);由于链接的域为rs.internic.net,所以,本函数只能查询结尾为.com的域。读者可以对本段程序进行扩充,链接到其它相关whois服务器,以查询其它类型的域。

在OnQuery()函数的末尾加入以下行:TryFinger(m_host);。重新编译程序,现在,我们可以对结尾为.com的域进行whois查询了。

至此,本程序已全部结束。当然,有兴趣的读者可以对它进一步扩充,以完成更多的功能。可以对WinInet类进行一些小小的扩充,以便能通过特定的端口访问e-mail和news服务。此外,也可以链接到一些著名的网络搜索引擎上并提交查询,使程序具有搜索功能。这一切,就取决于你的创造力了。
 

抱歉!评论已关闭.