时间协议（Time Protocol）

/*

Time Protocol （RFC-868）是一种非常简单的应用层协议。它返回一个未格式化的32
位二进制数字，这个数字描述了从1900年1月1日午夜到现在的秒数。服务器在端口37监
听时间协议请求，以TCP/IP或者UDP/IP格式返回响应。将服务器的返回值转化成本地时间
是客户端程序的责任（进行转化时需要借用文件时间，详见后面的程序代码）。
下面是在传输层使用TCP的Time Protocol的工作过程（S代表服务器，C代表客户）：
z  S: 监听端口37 
z  C: 连接到端口37 
z  S: 以32位二进制数发送时间
z  C: 接收时间
z  C: 关闭连接
z  S: 关闭连接
如果服务器不能决定现在是什么时间，服务器会拒绝连接或不发送任何数据而直接关闭
连接。

下面是使用Time Protocol实现的基于TCP/IP的网络对时程序。

*/

#include <stdio.h>

#include <winsock2.h>
#pragma comment(lib, "WS2_32") // 链接到WS2_32.lib






void SetTimeFromTP(ULONG ulTime) // 根据时间协议返回的时间设置系统时间
{
// Windows文件时间是一个64位的值，它是从1601年1月1日中午12:00到现在的时间间隔，
// 单位是1/1000 0000秒，即1000万分之1秒（100-nanosecond ）
FILETIME ft;
SYSTEMTIME st;


// 首先将基准时间（1900年1月1日0点0分0秒0毫秒）转化为Windows文件时间
st.wYear = 1900;
st.wMonth = 1;
st.wDay = 1;
st.wHour = 0;
st.wMinute = 0;
st.wSecond = 0;
st.wMilliseconds = 0;
SystemTimeToFileTime(&st, &ft);


// 然后将Time Protocol使用的基准时间加上以及逝去的时间，即ulTime
LONGLONG *pLLong = (LONGLONG *)&ft;
// 注意，文件时间单位是1/1000 0000秒，即1000万分之1秒（100-nanosecond ）
*pLLong += (LONGLONG)10000000 * ulTime; 


// 再将时间转化回来，更新系统时间
FileTimeToSystemTime(&ft, &st);
SetSystemTime(&st);
}


int main()
{
BYTE minorVer = 2,majorVer = 2;
WSADATA wsaData;
WORD sockVersion = MAKEWORD(minorVer, majorVer);
::WSAStartup(sockVersion, &wsaData);


SOCKET s = ::socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
if(s == INVALID_SOCKET)
{
printf(" Failed socket() \n");
return 0;
}


// 填写远程地址信息，连接到时间服务器
sockaddr_in servAddr; 
servAddr.sin_family = AF_INET;
servAddr.sin_port = htons(37); 
// 这里使用的时间服务器是132.163.4.101，更多地址请参考http://tf.nist.gov/service/its.htm
servAddr.sin_addr.S_un.S_addr = inet_addr("132.163.4.101");
if(::connect(s, (sockaddr*)&servAddr, sizeof(servAddr)) == -1)
{
printf(" Failed connect() \n");
return 0;
}

// 等待接收时间协议返回的时间。学习了Winsock I/O模型之后，最好使用异步I/O，以便设置超时
ULONG ulTime = 0;
int nRecv = ::recv(s, (char*)&ulTime, sizeof(ulTime), 0);
if(nRecv > 0)
{
ulTime = ntohl(ulTime);
SetTimeFromTP(ulTime);
printf(" 成功与时间服务器的时间同步！\n");
}
else
{
printf(" 时间服务器不能确定当前时间！\n");
}

::closesocket(s);
::WSACleanup();
return 0;
}