udp例子server

#include <stdio.h>
#include <stdlib.h>
#include <errno.h>
#include <string.h>
#include <sys/types.h>
#include <netinet/in.h>
#include <sys/socket.h>
#include <sys/wait.h>

#define SERVPORT 8888 /*服务器监听端口号 */
#define MAX_MSG_SIZE    1024
void udps_respon(int sockfd)
{
	struct sockaddr_in addr;
	int n;
	socklen_t addrlen;
	char msg[MAX_MSG_SIZE];
	while(1)
	{
		memset(msg,0,sizeof(msg));
		addrlen=sizeof(struct sockaddr);
		//从sockfd接收数据 
		n=recvfrom(sockfd,msg,MAX_MSG_SIZE,0,(struct sockaddr*)&addr,&addrlen);
		 /* 显示服务端已经收到了信息  */
   		fprintf(stdout,"I have received %s",msg);
     	sendto(sockfd,msg,n,0,(struct sockaddr*)&addr,addrlen);//发送回给客户 
	}
}

int main(int argc, char **argv)
{
    int sockfd,client_fd; /* sock_fd:监听socket;client_fd:数据传输socket */
    struct sockaddr_in my_addr; /* 本机地址信息 */
    struct sockaddr_in remote_addr; /* 客户端地址信息 */
	int sin_size;
    //创建套接字 
    if ((sockfd = socket(AF_INET, SOCK_DGRAM, 0)) == -1) {
		perror("socket创建出错!"); exit(1);
     }
    //地址初始化 
     my_addr.sin_family=AF_INET;
     my_addr.sin_port=htons(SERVPORT);
     my_addr.sin_addr.s_addr = INADDR_ANY;
   
    //绑定 sockfd和 my_addr
     if (bind(sockfd, (struct sockaddr *)&my_addr, sizeof(struct sockaddr)) == -1) {
		perror("bind出错!");
		exit(1);
     }
	udps_respon(sockfd);
     close(sockfd);
	 return 0;
}

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
Delphi是一种编程语言,提供了丰富的库来开发各类应用程序。其中,UDP协议是一种无连接的传输协议,适用于一对一或一对多的通信。 Delphi提供了UDP服务器的例子,可以帮助开发者快速搭建UDP服务器应用程序。使用Delphi编写UDP服务器需要使用TIdUDPServer组件。 以下是一个简单的Delphi UDP服务器的例子: 1. 首先,在Delphi中创建一个新的控制台应用程序项目。 2. 双击项目窗口中的"Form1",在Form1的代码编辑器中添加一个TIdUDPServer组件。代码如下: ```delphi unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, IdContext, IdBaseComponent, IdComponent, IdCustomTCPServer, IdUDPServer, Vcl.StdCtrls; type TForm1 = class(TForm) IdUDPServer1: TIdUDPServer; Memo1: TMemo; procedure IdUDPServer1UDPRead(AThread: TIdUDPListenerThread; AData: TBytes; ABinding: TIdSocketHandle); procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin IdUDPServer1.DefaultPort := 1234; IdUDPServer1.Active := True; end; procedure TForm1.IdUDPServer1UDPRead(AThread: TIdUDPListenerThread; AData: TBytes; ABinding: TIdSocketHandle); var ReceivedText: string; begin ReceivedText := StringOf(AData); Memo1.Lines.Add('Received: ' + ReceivedText); end; end. ``` 3. 添加一个TMemo控件,用于显示从客户端接收到的数据。 4. 在Form1的OnCreate事件中启动UDP服务器,设置默认端口为1234。 5. 添加UDP数据接收事件,当接收到客户端发送的数据时,将数据显示在Memo控件中。 可以使用Delphi设计界面并对代码进行编译和运行。通过UDP客户端向服务器发送数据,服务器将在Memo控件中显示接收到的数据。 这是一个简单的Delphi UDP服务器的例子,仅供参考。你可以根据自己的需求进行修改和扩展。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值