> Tech > Le programme SNTP serveur

Le programme SNTP serveur

Tech - Par Renaud ROSSET - Publié le 24 juin 2010
email

Bien que les PC ne soient pas d'une extrême précision en matière d'heure, on peut parfois être amené à  adresser des requêtes d'heure à  un PC. Un programme SNTP serveur PC est plus simple à  coder qu'un client parce que le rôle du serveur se borne à  se lier au

port 123, à  recevoir des requêtes et à  renvoyer des réponses
donnant l’heure courante. Comme le programme client, mon programme serveur utilise
le contrôle MSWINSCK pour communiquer avec l’interface sockets et SNTP.CLS pour
fournir des méthodes permettant de travailler avec les données de message NTP.

La sous-routine Form_Load du programme serveur règle d’abord le protocole pour
les communications sur UDP, règle la propriété LocalPort de MSWINSCK sur SNTPProtocolPort
(port 123 sur le système serveur local), puis tente de se lier au port serveur
:
Winsock1.Protocol = sckUDPProtocol

Winsock1.LocalPort = SNTPProtocolPort

Winsock1.Bind

Quand les données arrivent d’un client, le code dans l’événement MSWINSCK DataArrival
du programme serveur s’exécute. La sous-routine Winsock1_DataArrival reçoit les
données avec l’instruction suivante :

Winsock1.GetData ReceiveData

Pour formuler une réponse appropriée au client, Winsock1_DataArrival doit initialiser
les zones de contrôle dans le message NTP, copier dans la zone d’horodatage Originate
le tampon horodateur Receive provenant du client, et placer l’heure courante dans
la zone d’horodatage Transmit. Winsock1_DataArrival appelle la méthode ServerFormatNTPResponse
de SNTP.CLS pour exécuter ces étapes. Ensuite, la sous-routine renvoie au client
le tampon horodateur NTP formaté, avec la ligne

Winsock1.SendData ServerResponse()

Le contrôle MSWINSCK garde la trace des clients ayant envoyé une requête donnée
via leurs propriétés RemoteHostIP et RemotePort. Quand le programme serveur reçoit
une requête d’un programme client, l’adresse IP et le port client sont placés
automatiquement dans ces propriétés. Ensuite, quand la méthode SendData de MSWINSCK
est invoquée, les propriétés servent à  déterminer la destination de la réponse.

Téléchargez cette ressource

Guide de technologie 5G pour l’entreprise

Guide de technologie 5G pour l’entreprise

Pourquoi la 5G est-elle faite pour votre entreprise ? La 5G peut améliorer la vitesse, la fiabilité et la capacité de votre réseau, permettant ainsi une meilleure collaboration, une productivité accrue et une prise de décision plus rapide. Notre livre blanc " The Big Book of Enterprise 5G" vous fournit les informations stratégiques dont vous avez besoin pour prendre des décisions éclairées et préparer votre entreprise à prospérer dans l'ère de la 5G. Cradlepoint, part of Ericsson est le leader mondial des solutions de réseau sans fil 4G LTE et 5G fournies via le cloud. Connectez vos employés, lieux et objets avec la 4G LTE et la 5G pour un WAN sans fil d'entreprise.

Tech - Par Renaud ROSSET - Publié le 24 juin 2010