You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
417 lines
10 KiB
417 lines
10 KiB
/* -*- linux-c -*- */
|
|
/*
|
|
*
|
|
*
|
|
* Copyright (c) International Business Machines Corp., 2000
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
|
|
* the GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*
|
|
*
|
|
*/
|
|
/*
|
|
* ltpServer.c
|
|
*
|
|
* LTP Network Socket Test Server
|
|
*
|
|
*
|
|
*/
|
|
#include <sys/types.h>
|
|
#include <sys/socket.h>
|
|
#include <netinet/in.h>
|
|
#include <arpa/inet.h>
|
|
#include <netdb.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <pthread.h>
|
|
#include <unistd.h>
|
|
|
|
#define LOCAL_UDP_SERVER_PORT 10000
|
|
#define LOCAL_TCP_SERVER_PORT 10001
|
|
#define LOCAL_MULTI_SERVER_PORT 10002
|
|
#define MAX_MSG_LEN 256
|
|
#define MAX_HOSTNAME_LEN 256
|
|
#define ERROR -1
|
|
#define END_LINE 0x0A
|
|
|
|
int udpSocketHandle,
|
|
rc, msg_bytes, tcpSocketHandle, newTcpSocketHandle, multiSocketHandle;
|
|
|
|
socklen_t udpClientLen, tcpClientLen, multiClientLen;
|
|
|
|
struct sockaddr_in udpClientAddr,
|
|
udpServerAddr,
|
|
tcpClientAddr, tcpServerAddr, multiClientAddr, multiServerAddr;
|
|
|
|
struct ip_mreq multiCastReq;
|
|
struct in_addr multiCastAddr;
|
|
struct hostent *hostEntry;
|
|
|
|
char message[MAX_MSG_LEN];
|
|
char hostname[MAX_HOSTNAME_LEN];
|
|
char ServerProg[MAX_HOSTNAME_LEN];
|
|
|
|
void *ltp_udp_server_queue(void *);
|
|
void *ltp_tcp_server_queue(void *);
|
|
void *ltp_multi_server_queue(void *);
|
|
int tcp_receive_buffer(int, char *);
|
|
|
|
int main(int argc, char *argv[])
|
|
{
|
|
|
|
pthread_t udp_server_queue, tcp_server_queue, multi_server_queue;
|
|
|
|
pthread_attr_t udpthread_attr, tcpthread_attr, multithread_attr;
|
|
|
|
if (argc != 2) {
|
|
printf
|
|
("Server arguments : %s <multiCast I.P.address/hostname>\n",
|
|
argv[0]);
|
|
exit(0);
|
|
}
|
|
|
|
strncpy(hostname, argv[1], 255);
|
|
strncpy(ServerProg, argv[0], 255);
|
|
|
|
/* get mcast address to listen to */
|
|
|
|
hostEntry = gethostbyname(argv[1]);
|
|
|
|
if (hostEntry == NULL) {
|
|
printf("Server %s : You need to pass a multiCast group '%s'\n",
|
|
argv[0], argv[1]);
|
|
exit(1);
|
|
}
|
|
|
|
memcpy(&multiCastAddr, hostEntry->h_addr_list[0], hostEntry->h_length);
|
|
|
|
/* check given address is multicast */
|
|
if (!IN_MULTICAST(ntohl(multiCastAddr.s_addr))) {
|
|
printf
|
|
("%s : Hostname [%s] passed [%s] is not a multicast server\n",
|
|
argv[0], hostname, inet_ntoa(multiCastAddr));
|
|
printf("The multiCast Server will not be started \n");
|
|
} else {
|
|
|
|
/* create multiCast socket */
|
|
multiSocketHandle = socket(AF_INET, SOCK_DGRAM, 0);
|
|
|
|
if (multiSocketHandle < 0) {
|
|
printf("%s : cannot create multiCast socket\n",
|
|
argv[0]);
|
|
} else {
|
|
/* bind multiCast port */
|
|
multiServerAddr.sin_family = AF_INET;
|
|
multiServerAddr.sin_addr.s_addr = htonl(INADDR_ANY);
|
|
multiServerAddr.sin_port =
|
|
htons(LOCAL_MULTI_SERVER_PORT);
|
|
|
|
if (bind
|
|
(multiSocketHandle,
|
|
(struct sockaddr *)&multiServerAddr,
|
|
sizeof(multiServerAddr)) < 0) {
|
|
printf("%s : cannot bind Multicast port %d \n",
|
|
argv[0], LOCAL_MULTI_SERVER_PORT);
|
|
} else {
|
|
/* join multicast group */
|
|
multiCastReq.imr_multiaddr.s_addr =
|
|
multiCastAddr.s_addr;
|
|
multiCastReq.imr_interface.s_addr =
|
|
htonl(INADDR_ANY);
|
|
|
|
rc = setsockopt(multiSocketHandle, IPPROTO_IP,
|
|
IP_ADD_MEMBERSHIP,
|
|
(void *)&multiCastReq,
|
|
sizeof(multiCastReq));
|
|
if (rc < 0) {
|
|
printf
|
|
("%s : cannot join multicast group '%s'",
|
|
argv[0], inet_ntoa(multiCastAddr));
|
|
} else {
|
|
printf
|
|
("%s : listening to mgroup %s:%d\n",
|
|
argv[0], inet_ntoa(multiCastAddr),
|
|
LOCAL_MULTI_SERVER_PORT);
|
|
}
|
|
}
|
|
}
|
|
|
|
rc = pthread_attr_init(&multithread_attr);
|
|
rc = pthread_create(&multi_server_queue, &multithread_attr,
|
|
ltp_multi_server_queue, NULL);
|
|
}
|
|
|
|
/* udp socket creation */
|
|
udpSocketHandle = socket(AF_INET, SOCK_DGRAM, 0);
|
|
|
|
if (udpSocketHandle < 0) {
|
|
printf("%s: cannot open socket \n", argv[0]);
|
|
exit(1);
|
|
}
|
|
|
|
/* tcp socket creation */
|
|
tcpSocketHandle = socket(AF_INET, SOCK_STREAM, 0);
|
|
|
|
if (tcpSocketHandle < 0) {
|
|
printf("Error: cannot open socket %d \n", tcpSocketHandle);
|
|
return ERROR;
|
|
}
|
|
|
|
/* bind local udp server port */
|
|
udpServerAddr.sin_family = AF_INET;
|
|
udpServerAddr.sin_addr.s_addr = htonl(INADDR_ANY);
|
|
udpServerAddr.sin_port = htons(LOCAL_UDP_SERVER_PORT);
|
|
|
|
rc = bind(udpSocketHandle, (struct sockaddr *)&udpServerAddr,
|
|
sizeof(udpServerAddr));
|
|
|
|
if (rc < 0) {
|
|
printf("%s: Error binding port number %d \n",
|
|
argv[0], LOCAL_UDP_SERVER_PORT);
|
|
exit(1);
|
|
} else {
|
|
printf("%s: bound port number %d \n",
|
|
argv[0], LOCAL_UDP_SERVER_PORT);
|
|
}
|
|
|
|
/* bind local tcp server port */
|
|
tcpServerAddr.sin_family = AF_INET;
|
|
tcpServerAddr.sin_addr.s_addr = htonl(INADDR_ANY);
|
|
tcpServerAddr.sin_port = htons(LOCAL_TCP_SERVER_PORT);
|
|
|
|
rc = bind(tcpSocketHandle, (struct sockaddr *)&tcpServerAddr,
|
|
sizeof(tcpServerAddr));
|
|
|
|
if (rc < 0) {
|
|
printf("%s: Error binding port number %d \n",
|
|
argv[0], LOCAL_TCP_SERVER_PORT);
|
|
exit(1);
|
|
} else {
|
|
printf("%s: bound port number %d \n",
|
|
argv[0], LOCAL_TCP_SERVER_PORT);
|
|
}
|
|
|
|
rc = pthread_attr_init(&udpthread_attr);
|
|
rc = pthread_create(&udp_server_queue, &udpthread_attr,
|
|
ltp_udp_server_queue, NULL);
|
|
|
|
rc = pthread_attr_init(&tcpthread_attr);
|
|
rc = pthread_create(&tcp_server_queue, &tcpthread_attr,
|
|
ltp_tcp_server_queue, NULL);
|
|
|
|
while (1) ;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* Function: ltp_udp_server_queue
|
|
* Description: This function grabs the udp message from the queue and outputs to stdio
|
|
*/
|
|
void *ltp_udp_server_queue(void *junk)
|
|
{
|
|
|
|
printf("%s: waiting for data on port UDP %u\n",
|
|
hostname, LOCAL_UDP_SERVER_PORT);
|
|
|
|
/* server infinite loop */
|
|
while (1) {
|
|
|
|
/* init buffer */
|
|
memset(message, 0, MAX_MSG_LEN);
|
|
|
|
/* receive message */
|
|
udpClientLen = sizeof(udpClientAddr);
|
|
|
|
msg_bytes =
|
|
recvfrom(udpSocketHandle, message, MAX_MSG_LEN, 0,
|
|
(struct sockaddr *)&udpClientAddr, &udpClientLen);
|
|
|
|
printf("msg_bytes:%d \n", msg_bytes);
|
|
|
|
if (msg_bytes < 0) {
|
|
printf("%s: Error receiving data \n", hostname);
|
|
} else {
|
|
/* print message */
|
|
printf("%s: from %s:UDP%u : %s \n",
|
|
hostname, inet_ntoa(udpClientAddr.sin_addr),
|
|
ntohs(udpClientAddr.sin_port), message);
|
|
}
|
|
|
|
} /* end of server infinite loop */
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
/*
|
|
* Function: ltp_tcp_server_queue
|
|
* Description: This function grabs the tcp message from the queue and outputs to stdio
|
|
*/
|
|
void *ltp_tcp_server_queue(void *junk)
|
|
{
|
|
|
|
listen(tcpSocketHandle, 5);
|
|
|
|
while (1) {
|
|
|
|
printf("%s: waiting for data on port TCP %u\n", hostname,
|
|
LOCAL_TCP_SERVER_PORT);
|
|
|
|
tcpClientLen = sizeof(tcpClientAddr);
|
|
newTcpSocketHandle =
|
|
accept(tcpSocketHandle, (struct sockaddr *)&tcpClientAddr,
|
|
&tcpClientLen);
|
|
|
|
if (newTcpSocketHandle < 0) {
|
|
printf("cannot accept TCP connection ");
|
|
break;
|
|
}
|
|
|
|
/* init line */
|
|
memset(message, 0x0, MAX_MSG_LEN);
|
|
|
|
/* receive segments */
|
|
while (tcp_receive_buffer(newTcpSocketHandle, message) != ERROR) {
|
|
|
|
printf("%s: received from %s:TCP%d : %s\n", hostname,
|
|
inet_ntoa(tcpClientAddr.sin_addr),
|
|
ntohs(tcpClientAddr.sin_port), message);
|
|
|
|
/* init line */
|
|
memset(message, 0x0, MAX_MSG_LEN);
|
|
|
|
} /* while (read_line) */
|
|
printf("looping in TCP \n");
|
|
|
|
} /* while (1) */
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
/*
|
|
* Function: tcp_receive_buffer
|
|
* Description: This function grabs the message from the tcp queue and
|
|
* returns it to the calling function in the buffer.
|
|
*/
|
|
int tcp_receive_buffer(int newSocket, char *return_buffer)
|
|
{
|
|
|
|
static int bytes_received = 0;
|
|
static char message_received[MAX_MSG_LEN];
|
|
static int count = 0;
|
|
int offset;
|
|
|
|
offset = 0;
|
|
|
|
while (1) {
|
|
|
|
if (bytes_received == 0) {
|
|
/* read data from socket */
|
|
|
|
memset(message_received, 0x0, MAX_MSG_LEN); /* init buffer */
|
|
|
|
count =
|
|
recvfrom(newSocket, message_received, MAX_MSG_LEN,
|
|
0, (struct sockaddr *)&tcpClientAddr,
|
|
&tcpClientLen);
|
|
|
|
if (count < 0) {
|
|
perror(" cannot receive data ");
|
|
return ERROR;
|
|
} else if (count == 0) {
|
|
printf(" connection closed by client\n");
|
|
close(newSocket);
|
|
if (count) {
|
|
}
|
|
return ERROR;
|
|
}
|
|
}
|
|
|
|
/* Check for new data read on socket or */
|
|
/* if still more data in buffer */
|
|
|
|
/* copy line into 'return_buffer' */
|
|
while (*(message_received + bytes_received) != END_LINE
|
|
&& bytes_received < count) {
|
|
memcpy(return_buffer + offset,
|
|
message_received + bytes_received, 1);
|
|
offset++;
|
|
bytes_received++;
|
|
}
|
|
|
|
/* end of line + end of buffer => return line */
|
|
if (bytes_received == count - 1) {
|
|
/* set last byte to END_LINE */
|
|
*(return_buffer + offset) = END_LINE;
|
|
bytes_received = 0;
|
|
return ++offset;
|
|
}
|
|
|
|
/* end of line but still some data in buffer => return line */
|
|
if (bytes_received < count - 1) {
|
|
/* set last byte to END_LINE */
|
|
*(return_buffer + offset) = END_LINE;
|
|
bytes_received++;
|
|
return ++offset;
|
|
}
|
|
|
|
/* end of buffer but line is not ended => */
|
|
/* wait for more data to arrive on socket */
|
|
if (bytes_received == count) {
|
|
bytes_received = 0;
|
|
return offset;
|
|
}
|
|
|
|
} /* while */
|
|
|
|
}
|
|
|
|
/*
|
|
* Function: ltp_multi_server_queue
|
|
* Description: This function grabs the multiCast message from the queue and outputs to stdio
|
|
*/
|
|
void *ltp_multi_server_queue(void *junk)
|
|
{
|
|
|
|
printf("%s: waiting for data on port Multicast %u\n",
|
|
hostname, LOCAL_MULTI_SERVER_PORT);
|
|
|
|
/* infinite server loop */
|
|
while (1) {
|
|
|
|
multiClientLen = sizeof(multiClientAddr);
|
|
|
|
msg_bytes =
|
|
recvfrom(multiSocketHandle, message, MAX_MSG_LEN, 0,
|
|
(struct sockaddr *)&multiClientAddr,
|
|
&multiClientLen);
|
|
|
|
if (msg_bytes < 0) {
|
|
printf("%s : cannot receive data\n", hostname);
|
|
continue;
|
|
}
|
|
|
|
printf("%s : from %s:%d on %s : %s\n", ServerProg,
|
|
inet_ntoa(multiClientAddr.sin_addr),
|
|
ntohs(multiClientAddr.sin_port), hostname, message);
|
|
|
|
} /* end of infinite server loop */
|
|
|
|
return NULL;
|
|
|
|
}
|