#ident "@(#)tcp_server.c,v 6.1 1993/08/21 02:17:17 stevea Exp - STREAMware TCP/IP source"
/* SCCS IDENTIFICATION */
/*
* copyright (C) 1986, 1988 by Larry McVoy.
* MUST be distributed in source form only.
*/
/* server.c 1.0 - main */
# include <stdio.h>
# include <signal.h>
# include <sys/types.h>
# include <sys/socket.h>
# include <sys/time.h>
# include <netinet/in.h>
# include <netdb.h>
struct sockaddr_in sin = { AF_INET }; /* the rest is null */
/*
* try to see what we can say.
*/
main(argc, argv)
int argc ;
char **argv;
{
char buf[2048];
int seq, namelen, newsock, sock;
if ( argc<2 )
{
printf ( "usage:%s port_number\n", argv[0] ) ;
exit ( -1 ) ;
}
if ((sock = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP)) < 0)
{
perror("socket");
exit(1);
}
printf ( "socket()...\n" ) ;
sin.sin_port = htons ( atoi(argv[1]) ) ;
if (bind(sock, &sin, sizeof(sin)) < 0)
{
perror("bind");
exit(2);
}
printf ( "bind() port:%d ok.\n", sin.sin_port ) ;
namelen = sizeof(sin);
if (getsockname(sock, &sin, &namelen) < 0)
{
perror("getsockname");
exit(3);
}
printf ( "getsockname()...\n" ) ;
printf("Server bound to port %u 0x%x \n", ntohs(sin.sin_port),sin.sin_port);
if (fork())
{
exit(0);
}
printf ( "father process exit..\n" ) ;
if (listen(sock, 5) < 0)
{
perror("listen");
exit(4);
}
printf ( "listen()...\n" ) ;
namelen = sizeof(sin);
if ((newsock = accept(sock, &sin, &namelen)) < 0)
{
perror("accept");
exit(5);
}
printf ( "accept()...\n" ) ;
/*
* At this point we have a connection much like a pipe. You may read and
* write from newsock and that is talking to sock on the client side.
*/
seq = 0;
sleep(5);
for (;;)
{
int netint = htonl(seq);
printf ( "send %d\n", seq ) ;
/***test send-Q *
memset ( buf, 0, 2048 ) ;
write(newsock, buf, 2048) ;
****/
if ( write(newsock, &netint, 4)< 0 )
{
printf ( "server send fail. exit!\n" ) ;
exit ( -1 ) ;
}
seq++;
sleep(3);
}
}
评论0