利用RFC868协议编写网络对时程序


作者：四川绵阳电业局　缪元虎

下载源代码


一、网络授时服务

　　网络授时服务是在网络上设置一些时间服务器，用户通过Internet访问这些时间服务器就可同步本地计算机时钟的服务。网络授时服务有三个协议，分别是Network Time Protocol (RFC-1305)，Daytime Protocol (RFC-867)，Time Protocol (RFC-868)。

有关这些协议的详细信息，可参考以下网站：

http://www.boulder.nist.gov/timefreq/service/its.htm
http://www.faqs.org/rfcs/rfc867.html
http://www.faqs.org/rfcs/rfc1305.html
http://www.faqs.org/rfcs/rfc868.html

我的程序中列出的时间服务器列表，主要来自：

http://www.boulder.nist.gov/timefreq/service/time-servers.html

更多的时间服务器列表请参考以下网站：

http://www.eecis.udel.edu/~mills/ntp/servers.html

二、Time Protocol (RFC-868)协议

　　Time Protocol (RFC-868)协议是一种较简单的协议。此协议提供了一个独立于站点的，机器可读的日期和时间信息。时间服务返回的是以秒数，是从1900年1月1日午夜到现在的秒数。
　　这个协议可以工作在TCP和UDP协议下。下面是通过TCP协议工作的时间协议的工作过程：这里S代表服务器，C代表客户。

S: 检测端口37
U: 连接到端口37
S: 以32位二进制数发送时间
U: 接收时间
U: 关闭连接
S: 关闭连接

如果服务器不能决定现在是什么时间，服务器会拒绝连接或不发送任何数据而直接关闭连接。

下面我们看看使用UDP协议的情况：这里S代表服务器，C代表客户。

S: 检测端口37
U: 发送一个空数据报到端口37
S: 接收这个空数据报
S: 发送包含32位二进制数（用于表示时间）的数据报
U: 接收时间数据报

BOOL GetRemoteTime(char* szSever, unsigned long& ulTime)
{
	SOCKET sock = socket(AF_INET, SOCK_DGRAM, 0);	//使用UDP协议
	if(sock == INVALID_SOCKET)
	{
		return FALSE;
	}	
	sockaddr_in severAddr;
	severAddr.sin_family = AF_INET;
	severAddr.sin_port = htons(NET_TIME_PORT); 				
	severAddr.sin_addr.S_un.S_addr = inet_addr(szSever);

	if (sendto(sock, (char*)&ulTime, 4, 0, (sockaddr*)&severAddr, sizeof(severAddr)) == 4)
	{
		unsigned long flag = 1; 	
		if ((ioctlsocket(sock, FIONBIO, &flag) == 0))
		{	
			struct fd_set mask;			
			FD_ZERO(&mask);
			FD_SET(sock, &mask);
			
			struct timeval timeout;
			timeout.tv_sec = TIMEOUT_RECEIVE;
			timeout.tv_usec = 0;
			
			if (select(0, &mask, NULL, NULL, &timeout) == 1)
			{				
				if (recv(sock, (char*)&ulTime, 4, 0) == 4)
				{
					ulTime = ntohl(ulTime);
					closesocket(sock);
					return TRUE;
				}			
			}
		}
	}
	closesocket(sock);
	return FALSE;
}
      

void MySetTime(unsigned long ulTime)
{
	FILETIME ft;
	SYSTEMTIME st;
	
	st.wYear = 1900;
	st.wMonth = 1;
	st.wDay = 1;
	st.wHour = 0;
	st.wMinute = 0;
	st.wSecond = 0;
	st.wMilliseconds = 0;
	
	SystemTimeToFileTime(&st, &ft);
	LARGE_INTEGER li = *(LARGE_INTEGER*)&ft;
	li.QuadPart += (LONGLONG)10000000 * ulTime;
	ft = *(FILETIME*)&li;
	FileTimeToSystemTime(&ft, &st);	
	SetSystemTime(&st);
}

int APIENTRY WinMain(HINSTANCE hInstance,
		 HINSTANCE hPrevInstance,
		 LPSTR     lpCmdLine,
		 int       nCmdShow)
{
	//初始化TCP协议
	WSADATA wsaData;	
	if(WSAStartup(MAKEWORD(2,2), &wsaData)!= 0)
	{
		MessageBox(NULL, "初始化网络协议失败!", "错误报告", MB_OK|MB_ICONHAND);
		return -1;
	}
	
	int i = 0;
	unsigned long ulTime = 0;
	
	while (sever[i] != NULL)
	{
		if (GetRemoteTime(sever[i], ulTime))
		{
			MySetTime(ulTime);
			char buff[100];
			sprintf(buff, "已成功与时间服务器\r\n%s\r\n的时间同步", sever[i]);
			MessageBox(NULL, buff, "成功报告", MB_OK|MB_ICONINFORMATION);
			return 0;
		}
		i++;
	}	
	MessageBox(NULL, "所有服务器均不能正常连接或超时!", "错误报告", MB_OK|MB_ICONHAND);
	WSACleanup();
	return 0;
}