23,110
社区成员
发帖
与我相关
我的任务
分享
#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>
#include <unistd.h>
#include <arpa/inet.h>
#include <openssl/ssl.h>
#include <openssl/err.h>
#include <fcntl.h>
#include <sys/epoll.h>
#include <sys/time.h>
#include <sys/resource.h>
#include <pthread.h>
#define MAXBUF 1024
#define MAXEPOLLSIZE 10000
void *TransThread(void* pdata);
/*
setnonblocking - 设置句柄为非阻塞方式
*/
int setnonblocking(int sockfd)
{
if (fcntl(sockfd, F_SETFL, fcntl(sockfd, F_GETFD, 0)|O_NONBLOCK) == -1) {
return -1;
}
return 0;
}
static int count111 = 0;
static time_t oldtime = 0, nowtime = 0;
//------------------------------------------------------------
int main(int argc, char **argv)
{
int listener, new_fd, nfds, n, ret;
struct epoll_event ev;
int kdpfd, curfds;
socklen_t len;
struct sockaddr_in my_addr, their_addr;
unsigned int myport, lisnum;
struct epoll_event events[MAXEPOLLSIZE];
struct rlimit rt;
if (argc>1)
myport = atoi(argv[1]);
else
myport = 8006;
if (argc>2)
lisnum = atoi(argv[2]);
else
lisnum = 10;
/* 设置每个进程允许打开的最大文件数 */
rt.rlim_max = rt.rlim_cur = MAXEPOLLSIZE;
if (setrlimit(RLIMIT_NOFILE, &rt) == -1) {
perror("setrlimit");
exit(1);
}
else printf("设置系统资源参数成功!/n");
/* 开启 socket 监听 */
if ((listener = socket(PF_INET, SOCK_STREAM, 0)) == -1) {
perror("socket");
exit(1);
} else
printf("socket 创建成功!/n");
/*设置socket属性,端口可以重用*/
int opt=SO_REUSEADDR;
setsockopt(listener,SOL_SOCKET,SO_REUSEADDR,&opt,sizeof(opt));
/*设置socket为非阻塞模式*/
setnonblocking(listener);
bzero(&my_addr, sizeof(my_addr));
my_addr.sin_family = PF_INET;
my_addr.sin_port = htons(myport);
if (argc>3)
my_addr.sin_addr.s_addr = inet_addr(argv[3]);
else
my_addr.sin_addr.s_addr = INADDR_ANY;
if (bind
(listener, (struct sockaddr *) &my_addr, sizeof(struct sockaddr))
== -1) {
perror("bind");
exit(1);
} else
printf("IP 地址和端口绑定成功/n");
if (listen(listener, lisnum) == -1) {
perror("listen");
exit(1);
} else
printf("开启服务成功!/n");
/* 创建 epoll 句柄,把监听 socket 加入到 epoll 集合里 */
kdpfd = epoll_create(MAXEPOLLSIZE);
len = sizeof(struct sockaddr_in);
ev.events = EPOLLIN | EPOLLET;
ev.data.fd = listener;
if (epoll_ctl(kdpfd, EPOLL_CTL_ADD, listener, &ev) < 0) {
fprintf(stderr, "epoll set insertion error: fd=%d/n", listener);
return -1;
} else
printf("监听 socket 加入 epoll 成功!/n");
curfds = 1;
while (1) {
/* 等待有事件发生 */
nfds = epoll_wait(kdpfd, events, curfds, -1);
if (nfds == -1) {
perror("epoll_wait");
continue;
}
/* 处理所有事件 */
for (n = 0; n < nfds; ++n) {
if (events[n].data.fd == listener) {
new_fd = accept(listener, (struct sockaddr *) &their_addr,
&len);
if (new_fd < 0) {
perror("accept");
continue;
} else
{
printf("有连接来自于: %s:%d, 分配的 socket 为:%d/n", inet_ntoa(their_addr.sin_addr), ntohs(their_addr.sin_port), new_fd);
}
setnonblocking(new_fd);
ev.events = EPOLLIN | EPOLLET;
ev.data.fd = new_fd;
if (epoll_ctl(kdpfd, EPOLL_CTL_ADD, new_fd, &ev) < 0) {
fprintf(stderr, "把 socket '%d' 加入 epoll 失败!%s/n",
new_fd, strerror(errno));
return -1;
}
curfds++;
} else {
pthread_attr_t attr;
pthread_t threadId;
/*初始化属性值,均设为默认值*/
pthread_attr_init(&attr);
pthread_attr_setscope(&attr, PTHREAD_SCOPE_SYSTEM);
/* 设置线程为分离属性*/
pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
if(pthread_create(&threadId,&attr,TransThread,(void*)&(events[n].data.fd)))
{
perror("pthread_creat error!");
exit(-1);
}
}
}
}
close(listener);
return 0;
}
/********************************************************************
* 函数名称: TransThread
* 函数描述:
* 输入参数: void* pdata
* 输出参数: 无
* 返回值 : 0 - Success;Other - Error
* 调用者 :
********************************************************************/
void *TransThread(void* pdata)
{
struct sThreadInfo* pchild_info; /*Thread params*/
char recvbuf[RECV_BUF_SIZE];
char sendbuf[SEND_BUF_SIZE]; /*send buffer*/
long recvlen; /*receive charactor count*/
long sendlen; /*send charactor count*/
struct FileQuestHead header; /*Communication header*/
int result,retval;
/*Log the connection information Trans params*/
int *pSocket = pdata;
int size;
char sMsgType[MESSAGE_TYPE_LEN+1];
/*报文*/
CommMsg *commMsg;
memset(recvbuf,0x00,sizeof(recvbuf));
recvlen = recv_req(*pSocket,recvbuf,RECV_BUF_SIZE,0);
if(recvlen <= 0)
{
userlog("%s %d Receive Quest Failure.\n",__FILE__,__LINE__);
CloseSocket(*pSocket);
return;
}
debug_string(recvbuf,recvlen);
userlog("%s %d befor unpack.\n",__FILE__,__LINE__);
result = unpack(sendbuf,&sendlen,recvbuf,recvlen);
if(result)
{
userlog("%s %d unpack err.\n",__FILE__,__LINE__);
}
commMsg =(CommMsg *)sendbuf;
#ifdef __DEBUG__
userlog("%s %d \n"
"版本=[%s]\n"
"消息类型=[%s]\n"
,__FILE__,__LINE__
,commMsg->Version
,commMsg->MsgType);
#endif
memset(sMsgType,0x00,sizeof(sMsgType));
memcpy(sMsgType,commMsg->MsgType,MESSAGE_TYPE_LEN);
switch(atoi(sMsgType))
{
/*联机报文*/
case 300:
case 600:
case 810:
case 400:
case 100:
case 200:
TransDiagram(sendbuf,*pSocket,sendlen);
break;
default:
{
userlog("%s %d Unkonwn Quest [%s]\n",__FILE__,__LINE__,recvbuf);
memcpy(commMsg->RespCode,COM_TXN_CODE_INVALID,2);
userlog("%s %d before pack \n",__FILE__,__LINE__);
sendlen = pack(commMsg,sendbuf);
userlog("%s %d after pack \n",__FILE__,__LINE__);
if( (size = send_rsp(*pSocket,sendbuf,sendlen,SNDFLG)) <= 0 )
{
userlog("%s %d Send Response Failure.\n",__FILE__,__LINE__);
}
break;
}
}/*end switch*/
CloseSocket(*pSocket);
*pSocket = INVALID_SOCKET;
return;
}