---恢复内容开始---
- #include #include <sys/types.h> #include #include #include #include #include #include #include #include #include <sys/socket.h> #include <arpa/inet.h> #include <sys/param.h> #define TIME_SIZE 16 // 表示时间的字符串长度 #define IP_SIZE 16 // IP 字符串长度 #define BUF_SIZE 256 // 缓冲区大小 #define CLIENT_SIZE 8 // 允许的客户端数量 #define BACKLOG CLIENT_SIZE // listen 队列长度，等于允许的客户端数量 #define INVALID -1 /** 保存客户端连接信息结构体 */ struct CLIENT { int clientfd; struct sockaddr_in sockaddr; char ip[IP_SIZE]; int port; } clients[CLIENT_SIZE]; //守护进程 void init_daemon() { int pid; int i; pid=fork(); if(pid>0)//结束父进程 exit(0); else if(pid<0) exit(1); setsid();//让第一个子进程成为进程组组长 pid=fork();//取消子进程与控制终端 文件的关系,并且防止重新打开心的控制终端 if(pid>0)//关闭第一个子进程 exit(0); else if(pid<0) exit(1); //关闭所有文件 //是代表最大文件打开数 for(i=0;i<NOFILE;i++) { close(i); } chdir("/tmp");//改变工作目录 umask(0);//改变掩码 } //日志函数 void writelog(char* buffer) { FILE *fd; time_t t; chdir("/tmp"); fd = fopen("serlog.txt", "a"); while (fd == NULL) { fd = fopen("serlog.txt", "a"); } fprintf(fd, buffer); fprintf(fd, asctime(localtime(&t))); fclose(fd); } /** 初始化客户端列表 */ void init_clients(void) { int i; for (i = 0; i< CLIENT_SIZE; i++) clients[i].clientfd = INVALID; } /** 向每一个已连接的用户广播消息 */ void broadcast(char *msg) { int i; for (i = 0; i< CLIENT_SIZE; i++) if (clients[i].clientfd != INVALID) write(clients[i].clientfd, msg, strlen(msg)); } /** 格式化要发送的消息 */ void strfmsg(int i, char *buffer, const char *msg) { char curtime[TIME_SIZE]; time_t curtime_t; struct tm *timeinfo; time(&curtime_t); timeinfo = localtime(&curtime_t); strftime(curtime, TIME_SIZE, "%X", timeinfo); sprintf( buffer, "<%s %s:%d> %s", curtime, clients[i].ip, clients[i].port, msg); } /** 新连接处理 */ void accept_connect(int listenfd) { int connectfd, i; char tmp[4]; char buffer[BUF_SIZE]; struct sockaddr_in clientaddr; socklen_t connectlen = sizeof(struct sockaddr_in); connectfd = accept( listenfd, (struct sockaddr *)&clientaddr, &connectlen); memset(buffer, 0, sizeof(buffer)); /** 记录连接者信息 */ for (i = 0; i < CLIENT_SIZE; i++) { if (clients[i].clientfd == INVALID) { sprintf(buffer,"your id is %d\n", i); clients[i].clientfd = connectfd; send(connectfd, buffer, strlen(buffer), 0); memcpy(&clients[i].sockaddr, &clientaddr, connectlen); memset(buffer, 0, sizeof(buffer)); break; } } if (i == CLIENT_SIZE) { strcpy(buffer, "Out of Number\n"); write(connectfd, buffer, strlen(buffer)); close(connectfd); } } /** 客户端消息处理 */ void chat(fd_set fdset) { int sockfd, read_size, i; char read_buf[BUF_SIZE], send_buf[BUF_SIZE]; for (i = 0; i < CLIENT_SIZE; i++) { sockfd = clients[i].clientfd; if (sockfd != INVALID && FD_ISSET(sockfd, &fdset)) { read_size = read(sockfd, read_buf, BUF_SIZE - 1); if (read_size == 0) { /** 失去连接 */ close(sockfd); clients[i].clientfd = INVALID; strfmsg(i, send_buf, "logout\n"); printf("%s", send_buf); broadcast(send_buf); continue; } else { read_buf[read_size] = '\0'; int tmp = atoi(&read_buf[0]); send(clients[tmp].clientfd, read_buf, strlen(read_buf), 0); } } } } /** 负责 socket 初始化，绑定监听端口 */ int socket_setup(int port) { int rtn, listenfd = socket(AF_INET, SOCK_STREAM, 0); struct sockaddr_in sockaddr; bzero(&sockaddr, sizeof(sockaddr)); sockaddr.sin_family = AF_INET; sockaddr.sin_port = htons(port); sockaddr.sin_addr.s_addr= inet_addr("127.0.0.1"); rtn = bind(listenfd, (struct sockaddr *)&sockaddr, sizeof(sockaddr)); if (rtn == INVALID) { writelog("Bind failure"); exit(1); } if (listen(listenfd, BACKLOG) == INVALID) { writelog("Listen failure"); exit(1); } writelog("Service startup"); return listenfd; } /* *线程池里所有运行和等待的任务都是一个CThread_worker *由于所有任务都在链表里，所以是一个链表结构 */ typedef struct worker { /*回调函数，任务运行时会调用此函数，注意也可声明成其它形式*/ void *(*process) (void *arg); void *arg;/*回调函数的参数*/ struct worker *next; } CThread_worker; /*线程池结构*/ typedef struct { pthread_mutex_t queue_lock; pthread_cond_t queue_ready; /*链表结构，线程池中所有等待任务*/ CThread_worker *queue_head; /*是否销毁线程池*/ int shutdown; pthread_t *threadid; /*线程池中允许的活动线程数目*/ int max_thread_num; /*当前等待队列的任务数目*/ int cur_queue_size; } CThread_pool; int pool_add_worker (void *(*process) (void *arg), void *arg); void *thread_routine (void *arg); static CThread_pool *pool = NULL; void pool_init (int max_thread_num) { pool = (CThread_pool *) malloc (sizeof (CThread_pool)); pthread_mutex_init (&(pool->queue_lock), NULL); pthread_cond_init (&(pool->queue_ready), NULL); pool->queue_head = NULL; pool->max_thread_num = max_thread_num; pool->cur_queue_size = 0; pool->shutdown = 0; pool->threadid = (pthread_t *) malloc (max_thread_num * sizeof (pthread_t)); int i = 0; for (i = 0; i < max_thread_num; i++) { pthread_create (&(pool->threadid[i]), NULL, thread_routine, NULL); } } /*向线程池中加入任务*/ int pool_add_worker (void *(*process)(void *arg), void *arg) { /*构造一个新任务*/ CThread_worker *newworker = (CThread_worker *) malloc (sizeof (CThread_worker)); newworker->process = process; newworker->arg = arg; newworker->next = NULL;/*别忘置空*/ pthread_mutex_lock (&(pool->queue_lock)); /*将任务加入到等待队列中*/ CThread_worker *member = pool->queue_head; if (member != NULL) { while (member->next != NULL) member = member->next; member->next = newworker; } else { pool->queue_head = newworker; } assert (pool->queue_head != NULL); pool->cur_queue_size++; pthread_mutex_unlock (&(pool->queue_lock)); /*好了，等待队列中有任务了，唤醒一个等待线程； 注意如果所有线程都在忙碌，这句没有任何作用*/ pthread_cond_signal (&(pool->queue_ready)); return 0; } /*销毁线程池，等待队列中的任务不会再被执行，但是正在运行的线程会一直 把任务运行完后再退出*/ int pool_destroy () { if (pool->shutdown) return -1;/*防止两次调用*/ pool->shutdown = 1; /*唤醒所有等待线程，线程池要销毁了*/ pthread_cond_broadcast (&(pool->queue_ready)); /*阻塞等待线程退出，否则就成僵尸了*/ int i; for (i = 0; i < pool->max_thread_num; i++) pthread_join (pool->threadid[i], NULL); free (pool->threadid); /*销毁等待队列*/ CThread_worker *head = NULL; while (pool->queue_head != NULL) { head = pool->queue_head; pool->queue_head = pool->queue_head->next; free (head); } /*条件变量和互斥量也别忘了销毁*/ pthread_mutex_destroy(&(pool->queue_lock)); pthread_cond_destroy(&(pool->queue_ready)); free (pool); /*销毁后指针置空是个好习惯*/ pool=NULL; return 0; } void * thread_routine (void *arg) { printf ("starting thread 0x%x\n", pthread_self ()); while (1) { pthread_mutex_lock (&(pool->queue_lock)); /*如果等待队列为0并且不销毁线程池，则处于阻塞状态; 注意 pthread_cond_wait是一个原子操作，等待前会解锁，唤醒后会加锁*/ while (pool->cur_queue_size == 0 && !pool->shutdown) { //printf ("thread 0x%x is waiting\n", pthread_self ()); pthread_cond_wait (&(pool->queue_ready), &(pool->queue_lock)); } /*线程池要销毁了*/ if (pool->shutdown) { /*遇到break,continue,return等跳转语句，千万不要忘记先解锁*/ pthread_mutex_unlock (&(pool->queue_lock)); //printf ("thread 0x%x will exit\n", pthread_self ()); pthread_exit (NULL); } //printf ("thread 0x%x is starting to work\n", pthread_self ()); /*assert是调试的好帮手*/ assert (pool->cur_queue_size != 0); assert (pool->queue_head != NULL); /*等待队列长度减去1，并取出链表中的头元素*/ pool->cur_queue_size--; CThread_worker *worker = pool->queue_head; pool->queue_head = worker->next; pthread_mutex_unlock (&(pool->queue_lock)); /*调用回调函数，执行任务*/ (*(worker->process)) (worker->arg); free (worker); worker = NULL; } /*这一句应该是不可达的*/ pthread_exit (NULL); } void * myprocess (void *arg) { int listenfd = *(int*)(arg); int maxfdp, i; fd_set fdset; while (true) { FD_ZERO(&fdset); FD_SET(listenfd, &fdset); maxfdp = listenfd; /** 将可用的客户端 socket 加入 fdset，并计算 maxfdp */ for (i = 0; i < CLIENT_SIZE; i++) { if (clients[i].clientfd != INVALID) { FD_SET(clients[i].clientfd, &fdset); if (clients[i].clientfd > maxfdp) maxfdp = clients[i].clientfd; } } select(maxfdp + 1, &fdset, NULL, NULL, NULL); if (FD_ISSET(listenfd, &fdset)) accept_connect(listenfd); chat(fdset); } sleep (1);/*休息一秒，延长任务的执行时间*/ return NULL; } int main (int argc, char **argv) { init_daemon(); int maxfdp, i, listenfd = socket_setup(atoi(argv[1])); fd_set fdset; init_clients(); pool_init (3);/*线程池中最多三个活动线程*/ /*连续向池中投入10个任务*/ int *workingnum = (int *) malloc (sizeof (int) * 10); for (i = 0; i < 2; i++) { workingnum[i] = i; pool_add_worker (myprocess(&listenfd), &workingnum[i]); } /*等待所有任务完成*/ sleep (5); /*销毁线程池*/ pool_destroy (); free (workingnum); return 0; }
---恢复内容结束---