Пример реализации inetd для Windows

      /*
     INETD v1.3 для WINDOWS. Автор: Александр Пристенский [a.k.a. RekoD]
*/
      #include
      "stdafx.h"
      #include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include <process.h>
#include <windows.h>
#include <winsock2.h>
#include <algorithm>

#pragma comment (lib, "ws2_32.lib")

#define BUFSIZE 255
#define KEEPALIVE 10
#define MAXCONNQUEUE 5

bool telnet = false; // соединяется ли клиент по протоколу telnet?#define BZERO(a) memset(a, 0, sizeof(a))

typedefstruct _t_param
{
  SOCKET s;
  char   exe[MAX_PATH];
}
THREAD_PARAM;

unsignedint__stdcall ServerThread(LPVOID tParam);

int main(int argc, char* argv[])
{
  WSADATA WSAData;
  SOCKET listen_socket, server_socket;
  SOCKADDR_IN server_addr, temp_addr;
  int accepted_len = sizeof(temp_addr);

  // Проверка параметровif (argc < 3)
  {
    printf("\nUsage: %s PORT CMDLINE [-FF]\n"
      "Example: %s 23 c:\\winnt\\system32\\cmd.exe -FF\n"
      "Flag -FF should be used if client will connect using TELNET protocol.",
      argv[0], argv[0]);
    return -1;
  }

  if (atoi(argv[1] < 1) || atoi(argv[1]) > 65535)
  {
    printf("\nIncorrect port number. Value must be in range 1-65535");
    return -1;
  }

  if (argc > 3 && !strcmp(argv[3], "-FF"))
  {
    telnet = true;
  }
...

      // 1.1. Инициализация WINSOCK
      if (WSAStartup(MAKEWORD(2,0), &WSAData) != 0)
   {
      printf("\nWSAStartup() failed with error: %i", WSAGetLastError());
      return -1;
   }

   // 1.2. Создание "слушающего" сокетаif ((listen_socket = socket(AF_INET, SOCK_STREAM, 0)) == INVALID_SOCKET)
   {
      printf("\nsocket() failed with error: %i", WSAGetLastError());
      return -1;
   }

      // Установка опции: REUSE ADDRESS.
      // Если сервер "упадёт" при подсоединённых клиентах
      // он сможет снова стартовать используя тот же порт.
      bool opt = true;

if(SOCKET_ERROR == setsockopt(
listen_socket, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, sizeof(opt)))
{
  printf("\nsetsockopt(SO_REUSEADDR) failed with error: %i", 
    WSAGetLastError());
  return -1;
}

// 1.3. Привязка сокета к локальному адресу
server_addr.sin_family      = AF_INET;
server_addr.sin_addr.s_addr = htonl(INADDR_ANY);
server_addr.sin_port        = htons(atoi(argv[1]));

if(bind(listen_socket, (struct sockaddr *)&server_addr, 
  sizeof(server_addr)) == SOCKET_ERROR)
{
  printf("\nbind() failed with error: %i", WSAGetLastError());
  return -1;
}

      // 1.4. Начать прослушивать серверный сокет
      if(listen(listen_socket, MAXCONNQUEUE) == SOCKET_ERROR)
  {
    printf("\nlisten() failed with error: %i", WSAGetLastError());
    return -1;
  }

  // 1.5. Цикл принятия соединений от клиентовwhile ((server_socket = accept(
listen_socket, (struct sockaddr *) &temp_addr, 
    (int *)&accepted_len)) != INVALID_SOCKET)
  {
    // Какой хост соединился с сервером?
    SOCKADDR peer;
    int peerlen = sizeof(peer);
    
    if (0 == getpeername(server_socket, &peer, &peerlen))
    {
      printf("\nConnect from %s:%i", 
        inet_ntoa(((SOCKADDR_IN *)&peer)->sin_addr), 
        ntohs(((SOCKADDR_IN *)&peer)->sin_port));
    }

    // Запуск потока для работы с сокетом и передача параметров// (динамическая память будет освобождена при выходе из потока).
    HANDLE hThread = NULL;

    THREAD_PARAM* t_param = NULL;

    t_param = new THREAD_PARAM;

    if(NULL == t_param)
    {
      printf("\n memory allocation error!");
      break;
    }

    t_param->s = server_socket;
    BZERO(t_param->exe);
    strcpy(t_param->exe, argv[2]);

    // создаём поток с помощью _beginthreadex()if(NULL == (hThread = (HANDLE)_beginthreadex( 
NULL, 0, ServerThread, t_param, 0, NULL)))
    {
      printf("\nCreateThread() failed with error: %i", GetLastError());
    }
    else
    {
      CloseHandle(hThread); // HANDLE потока нам больше не нужен
    }
  }
  closesocket(listen_socket);
  return 0;
}

DWORD WINAPI EchoThread(LPVOID tParam)
{
  THREAD_PARAM *param = (THREAD_PARAM *)tParam;
  char buf[255];
  int  received = 0;

  send(param->s, "echo service:\r\n", sizeof("echo service:\r\n"), 0);
  while (1)
  {
    if (0 != (received = recv(param->s, buf, sizeof(buf), 0)))
      send(param->s, buf, received, 0);
    elsebreak;
  }

  // Закрыть сокет и освободить память переданной структуры
  shutdown(param->s, SD_BOTH);
  closesocket(param->s);
  delete param;
  return 0;
}

      // Потоковая функция, которая запускает дочерний процесс
      // и перенаправляет его STDIN и STDOUT на сокет
      unsigned
      int
      __stdcall ServerThread(LPVOID tParam)
{
  THREAD_PARAM *param = (THREAD_PARAM*)tParam;

  char buf[BUFSIZE];
  // временная переменная для хранения результатов вызовов функцийint res;

  unsignedlong received = 0;
  unsignedlong sent = 0;

  fd_set  read_s;
  timeval time_out;

  time_out.tv_sec  = 0;
  time_out.tv_usec = 5000; // 0.005 сек.// для keep-alive проверок
  SYSTEMTIME oldtime, curtime;
  GetSystemTime(&oldtime);
  GetSystemTime(&curtime);

  // Структура STARTUPINFO используется в CreateProcess()// для задания атрибутов главного окна создаваемого процесса.
  // В данном случае я задаю новые STDIN, STDOUT и STDERR,
  // а также указываю опцию SW_HIDE – не показывать окно
  // дочернего процесса (см. инициализацию структуры далее)
  STARTUPINFO si;
  // Структуры SECURITY_ATTRIBUTES и SECURITY_DESCRIPTOR// используются для задания свойств каналов в CreatePipe()
  SECURITY_ATTRIBUTES sa; // Поле sa.bInheritHandle задаёт возможность// наследования HANDLE дочерним процессом.
  SECURITY_DESCRIPTOR sd; // SECURITY_DESCRIPTOR содержит права доступа
// и идентифицирует владельца объекта.// Структура PROCESS_INFORMATION заполняется при создании дочернего
  // процесса и используется в цикле чтения-записи (см. далее)
  // для определения ситуации когда дочерний процесс завершился сам.
  PROCESS_INFORMATION pi;
  // новые STDIN и STDOUT для дочернего процесса
  HANDLE newstdin, newstdout;
  // дескрипторы каналов
  HANDLE read_stdout, write_stdin;  

  unsignedlong quit = 0;
  unsignedlong bread;
  unsignedlong avail;

  // Инициализация дескриптора безопасности
  InitializeSecurityDescriptor(&sd, SECURITY_DESCRIPTOR_REVISION);
  SetSecurityDescriptorDacl(&sd, true, NULL, false);

  // Инициализация security attributes
  sa.lpSecurityDescriptor = &sd;
  sa.nLength = sizeof(SECURITY_ATTRIBUTES);
  // разрешить наследование дескриптора дочерним процессом
  sa.bInheritHandle = true;

...

      // Создание pipes и перенаправление
  CreatePipe(&newstdin, &write_stdin, &sa, 0);
  CreatePipe(&read_stdout, &newstdout, &sa, 0);

  // Инициализация стартовой информации для дочернего процесса
  GetStartupInfo(&si);
  si.dwFlags = STARTF_USESTDHANDLES | STARTF_USESHOWWINDOW;
  si.wShowWindow = SW_HIDE;  // не показывать окно дочернего приложения
  si.hStdOutput = newstdout; // вместо STDOUT использовать newstdout
  si.hStdError  = newstdout; // вместо STDERR использовать newstdout
  si.hStdInput  = newstdin;  // вместо STDIN  использовать newstdin// Запуск дочернего приложения (дочернее приложение - // любое консольное приложение). STDIN и STDOUT перенаправляются // в сокет - задача дочернего приложения лишь реализовывать определённый
  // протокол (HTTP, POP, SMTP и т.д.)if(0 == CreateProcess(
param->exe, NULL, NULL, NULL, true, CREATE_NEW_CONSOLE, 
    NULL, NULL, &si, &pi))
  {
    printf("\nCreateProcess() fails with error: %i", GetLastError());
    return -1;
  }

      // Цикл чтения-записи
      while(1)
  {  
    // сколько данных осталось принять/отправить?
unsignedlong left; 
    unsignedint  idx;

    // 2.1. Дочерний процесс нормально завершился сам?if (0 == GetExitCodeProcess(pi.hProcess, &quit))
      printf("\nGetExitCodeProcess() fails with error: %i", GetLastError());
    if (STILL_ACTIVE != quit) 
      break;

    // 2.2. Есть ли данные на STDOUT дочернего процесса ?
    BZERO(buf);

    if (0 == PeekNamedPipe(
read_stdout, buf, BUFSIZE - 1, &bread, &avail, NULL))
    {
      printf("\nPeekNamedPipe() fails with error: %i", GetLastError());
      break;
    }

    if (bread > 0)
    {
      // ReadFile() может прочитать меньше, чем есть в STDOUT дочернего // процесса, необходимо организовать цикл, чтобы прочитать все данные.
      left = bread;
      idx  = 0;

      while (left > 0)
      {
        if (0 == (res = ReadFile(
read_stdout, &buf[idx], left, &received, NULL)))
        {
          printf("\nReadFile() fails with error: %i", GetLastError());
          break;
        }
        if(res && (received == 0)) 
          break; // EOF
        left -= received;
        idx  += received;
      }

      left = bread;
      idx  = 0;

      // Если клиент соединился по протоколу TELNET, надо убрать// из полученных данных 0xFF, т.к. это значение TELNET// воспринимает как начало команды.if (true == telnet)
      {
        std::replace(
          (unsignedchar*)buf, (unsignedchar*)(buf + left), 0xFF, 0x20);
      }

      // send() может отправить меньше данных, чем было в буфере,// поэтому необходимо организовать цикл, чтобы отправить все данныеwhile (left > 0)
      {
        if (SOCKET_ERROR == (res = send(param->s, &buf[idx], left, 0)))
        {
          printf("\nsend() fails with error: %i", WSAGetLastError());
          break;
        }

        left -= res;
        idx  += res;
      }    
    }

    // 2.3. Отправка keep-alive каждые KEEPALIVE секунд
    GetSystemTime(&curtime);
    if (abs(curtime.wSecond - oldtime.wSecond) >= KEEPALIVE)
    {
      oldtime = curtime;
      if (SOCKET_ERROR == send(param->s, "", 1, 0))
      {
        printf(
          "\nkeep-alive send(): fails with error: %i", WSAGetLastError());
      }
    }

    // 2.4. Есть ли данные от клиента?
    BZERO(buf);

    FD_ZERO(&read_s);
    FD_SET(param->s, &read_s);
    received = 0;

    if (SOCKET_ERROR == select(0, &read_s, NULL, NULL, &time_out))
    {
      printf("\nselect() fails with error: %i", WSAGetLastError());
      break;
    }

    if (FD_ISSET(param->s, &read_s))
    {
      if (SOCKET_ERROR == (received = recv(param->s, buf, BUFSIZE, 0)))
      {
        if (WSAECONNABORTED == WSAGetLastError())
          // keep-alive - ответ не получен (см. 2.3.)// или соединение оборвалось при пересылке данных
          printf("\nrecv(): client cut the connection.");
        else
          printf("\nrecv() fails with error: %i", WSAGetLastError());
        break;
      }
    }

    // WriteFile() может записать в STDIN дочернего процесса меньше, чем есть// в буфере, поэтому организуем цикл для записи всех данных,
    // принятых recv()
    left = received;
    idx  = 0;

    while (left > 0)
    {
      if (0 == (res = WriteFile(write_stdin, &buf[idx], left, &sent, NULL)))
      {
        printf("\nWriteFile() fails with error: %i", GetLastError());
        break;
      }
      left -= sent;
      idx  += sent;
    }
  } // Цикл чтения-записи (конец)// Если клиент неожиданно оборвёт соединение,// надо уничтожить соответствующий дочерний процесс
  TerminateProcess(pi.hProcess, 0);

  // Закрыть все хэндлы дочернего процесса
  CloseHandle(pi.hThread);
  CloseHandle(pi.hProcess);
  CloseHandle(newstdin);
  CloseHandle(newstdout);
  CloseHandle(read_stdout);
  CloseHandle(write_stdin);

  // Сообщить, кто отключился
  SOCKADDR peer;
  int peerlen = sizeof(peer);
      
  if(0 == getpeername(param->s, &peer, &peerlen))
  {
    printf(
      "\nDisconnect %s:%i", inet_ntoa(((SOCKADDR_IN *)&peer)->sin_addr), 
ntohs(((SOCKADDR_IN *)&peer)->sin_port));
  }

  // Закрыть сокет и освободить память переданной структуры
  shutdown(param->s, SD_BOTH);
  closesocket(param->s);
  delete param;
  param = NULL;

  return 0;
}

>inetd 4000 c:\windows\system32\cmd.exe –FF