#include <winsock.h>
#include <stdio.h>
#include <io.h>
#include <process.h>
int
main ()
{
struct sockaddr_in sa;
SOCKET t;
SOCKET s;
WSADATA data;
if (WSAStartup (MAKEWORD (1, 1), &data))
{
fprintf (stderr, "cvs: unable to initialize winsock\n");
exit (1);
}
t = socket (PF_INET, SOCK_STREAM, 0);
if (t == INVALID_SOCKET)
{
printf ("Error in socket(): %d\n", WSAGetLastError ());
exit (1);
}
sa.sin_family = AF_INET;
sa.sin_addr.s_addr = INADDR_ANY;
sa.sin_port = htons (2401);
if (bind (t, (struct sockaddr *) &sa, sizeof (sa)) != 0)
{
printf ("Cannot bind(): %d\n", WSAGetLastError ());
exit (1);
}
if (listen (t, 1) != 0)
{
printf ("Cannot listen(): %d\n", WSAGetLastError ());
exit (1);
}
while (1)
{
int sasize = sizeof (sa);
#if 0
int save_stdin, save_stdout;
#endif
s = accept (t, (struct sockaddr *) &sa, &sasize);
if (s == INVALID_SOCKET)
{
printf ("Cannot accept(): %d\n", WSAGetLastError ());
exit (1);
}
#if 0
save_stdin = _dup (0);
if (save_stdin < 0)
{
printf ("Cannot save stdin: %s\n", strerror (errno));
exit (1);
}
save_stdout = _dup (1);
if (save_stdout < 0)
{
printf ("Cannot save stdout: %s\n", strerror (errno));
exit (1);
}
if (_dup2 (s, 0) < 0)
{
printf ("Cannot dup stdin: %s\n", strerror (errno));
exit (1);
}
if (_dup2 (s, 1) < 0)
{
printf ("Cannot dup stdout: %s\n", strerror (errno));
exit (1);
}
if (_spawnl (_P_DETACH, "netstat", "netstat", NULL) < 0)
{
printf ("Cannot spawn subprocess: %s\n", strerror (errno));
exit (1);
}
#else
if (send (s, "hello, world\n", 13, 0) == SOCKET_ERROR)
{
printf ("Cannot send(): %d\n", WSAGetLastError ());
exit (1);
}
#endif
if (closesocket (s) != 0)
{
printf ("Cannot closesocket(): %d\n", WSAGetLastError ());
exit (1);
}
}
return 0;
}