NetCat... надо написать сервер и клиент

:; while [ $? -eq 0 ]; do nc -vlp 8080 -c'(r=read; e=echo;$r a b c; z=$r; while [ ${#z} -gt 2 ]; do $r z; done; f=`$e $b|sed 's/[^a-z0-9_.-]//gi'`; h=«HTTP/1.0»; o=«$h 200 OK\r\n»; c=«Content»; if [ -z $f ]; then($e $o; ls|(while $r n; do if [ -f «$n» ]; then $e «`ls -gh $n`»; fi; done);); elif [ -f $f ]; then $e «$o$c-Type: `file -ib $f`\n$c-Length: `stat -c%s $f`»;$e; cat $f; else $e -e «$h 404 Not Found\n\n404\n»; fi)'; done

int sock;  /* The socket file descriptor for our "listening" socket */

int connectlist[MAXCONNECTIONS];  /* Array of connected sockets so we know who	we are talking to */

//указатель на кучу дескрипторов кот. надо скармливать select'у
//готовится из connectlist[]
fd_set socks;        /* Socket file descriptors we want to wake	up for, using select() */

int highsock;	     /* Highest #'d file descriptor, needed for select() */

//---------------------------------------------------
void read_socks() {
	int listnum;	     /* Current item in connectlist for for loops */

	/* OK, now socks will be set with whatever socket(s)
	   are ready for reading.  Lets first check our
	   "listening" socket, and then check the sockets
	   in connectlist. */
	
	/* If a client is trying to connect() to our listening
		socket, select() will consider that as the socket
		being 'readable'. Thus, if the listening socket is
		part of the fd_set, we need to accept a new connection. */
	
	if (FD_ISSET(sock,&socks))
		handle_new_connection();
	/* Now check connectlist for available data */
	
	/* Run through our sockets and check to see if anything
		happened with them, if so 'service' them. */
	
	for (listnum = 0; listnum < MAXCONNECTIONS; listnum++) {
		if (FD_ISSET(connectlist[listnum],&socks)){
			
			//DBGMSG("reading connection:%d\n", listnum);
			
			//if FD_ISSET says there is data for us and there is non, something is wrong
			//close connection
			if( !deal_with_data(listnum) ){ 
				//DBGMSG("FD_ISSET says there is data for us and there is non, closing connection:%d\n", listnum);
				//close_connection(listnum);
				return;
			}
		}
	} /* for (all entries in queue) */
}

//---------------------------------------------------
void handle_new_connection() {
	int listnum;	     /* Current item in connectlist for for loops */
	int connection; /* Socket file descriptor for incoming connections */

	/* We have a new connection coming in!  We'll 	try to find a spot for it in connectlist. */
	connection = accept(sock, NULL, NULL);
	if (connection < 0) {
		//perror("accept");
		ERRMSG("accept:%s\n", strerror (errno));
		exit(EXIT_FAILURE);
	}
	setnonblocking(connection);
	for (listnum = 0; (listnum < MAXCONNECTIONS) && (connection != -1); listnum ++)
		if (connectlist[listnum] == 0) {
			//printf("\nConnection accepted:   FD=%d; Slot=%d\n",	connection,listnum);
			DBGMSG("\nConnection accepted:   FD=%d; Slot=%d\n",	connection,listnum);
			connectlist[listnum] = connection;
			connection = -1;
			connectlist_last_act_time[listnum] = time(NULL);
		}
	if (connection != -1) {
		/* No room left in the queue! */
		//printf("\nNo room left for new client.\n");
		ERRMSG("No room left for new client.\n","");
		//sock_puts(connection,"Sorry, this server is too busy. Try again later!\r\n");
		close(connection);
	}
}


//---------------------------------------------------
int deal_with_data(const int listnum) {/* Current item in connectlist for for loops */

	char rx_buffer[STRBUFLEN+1];     /* Buffer for socket reads */
	char strbuf[STRBUFLEN+1];
//	char *cur_char;      /* Used in processing buffer */
	//unsigned long	IMEI;
	long long	IMEI;
	DIR	*	dir_p;
	struct	dirent *dir_entry_p;
	char *	IMEI_str_p;
	FILE *	new_packet_file;
	char	new_packet_fname[STRBUFLEN+1];
	time_t	packet_rx_time;
	struct tm * packet_rx_time_local;
	//struct tm    	packet_rx_time_local;
	
	int ret_val=0;
	int q;
	
	bzero(rx_buffer, STRBUFLEN+1);

	ret_val=sock_gets(connectlist[listnum], rx_buffer, STRBUFLEN);
	if (  ret_val < 0) {
		//Connection closed, close this end and free up entry in connectlist 
		DBGMSG("\nConnection lost FD:%d Slot:%d ret_val:%d IMEI:%s\n", connectlist[listnum], listnum, ret_val, connectlistIMEI[listnum]);
		close_connection( listnum );
		return(0);
	} 
	
	if( ret_val == 0 ){
		//dbgmsg("empty packet\n");
		DBGMSG("FD_ISSET says there is data for us and there is non, closing connection:%d IMEI:%s\n", listnum, connectlistIMEI[listnum]);
		close_connection(listnum);
		return(0);
	}
//Сделать с полученными в rx_buffer данными что надо
}

//-------------------------------------
main(){
	
	/* Obtain a file descriptor for our "listening" socket */
	sock = socket(AF_INET, SOCK_STREAM, 0);
	if (sock < 0) {
		//perror("socket");
		ERRMSG("socket:%s\n", strerror (errno));
		exit(EXIT_FAILURE);
	}
	/* So that we can re-bind to it without TIME_WAIT problems */
	setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &reuse_addr,	sizeof(reuse_addr));

	/* Set socket to non-blocking with our setnonblocking routine */
	setnonblocking(sock);

	/* Get the address information, and bind it to the socket */
	memset((char *) &server_address, 0, sizeof(server_address));
	server_address.sin_family = AF_INET;
	server_address.sin_addr.s_addr = htonl(INADDR_ANY);
	server_address.sin_port = htons(port);
	//printf("port:%d server_address.sin_port:%d\n", port,server_address.sin_port);
	if (bind(sock, (struct sockaddr *) &server_address,	  sizeof(server_address)) < 0 ) {
		//perror("bind");
		ERRMSG("bind:%s\n", strerror (errno));
		close(sock);
		exit(EXIT_FAILURE);
	}

	/* Set up queue for incoming connections. */
	listen(sock, MAXCONNECTIONS);

	/* Since we start with only one socket, the listening socket, it is the highest socket so far. */
	highsock = sock;
	memset((char *) &connectlist, 0, sizeof(connectlist));

	while (1) { /* Main server loop - forever */
		build_select_list();
		//timeout.tv_sec = 1;
		timeout.tv_sec = 0;
		timeout.tv_usec = 1000;
		
		
		readsocks = select(highsock+1, &socks, (fd_set *) 0, (fd_set *) 0, &timeout);
		
		/* select() returns the number of sockets that had
			things going on with them -- i.e. they're readable. */
			
		/* Once select() returns, the original fd_set has been
			modified so it now reflects the state of why select()
			woke up. i.e. If file descriptor 4 was originally in
			the fd_set, and then it became readable, the fd_set
			contains file descriptor 4 in it. */
		
		if (readsocks < 0) {
			//perror("select");
			ERRMSG("select:%s\n", strerror (errno));
			exit(EXIT_FAILURE);
		}
		if (readsocks == 0) {
			/* Nothing ready to read, just show that  we're alive */
		} 
		else{
			read_socks();
			IMEI_connected_report();
		}

	} /* while(1) */
} /* main */

socat TCP4-LISTEN:5555,fork,tcpwrap=script \
EXEC:/bin/myscript,chroot=/home/sandbox,su-d=sandbox,pty,stderr